/*
- * dus is a simple utility designed to display the list of files and
- * directories with disk occupancy, sorted according to it.
+ * dus is a simple utility to display the files and directories
+ * according to their total disk occupancy.
*
- * Copyright (c) 2009 Francois Fleuret
+ * Copyright (c) 2010 Francois Fleuret
* Written by Francois Fleuret <francois@fleuret.org>
*
* This file is part of dus.
*
*/
+#define VERSION_NUMBER "1.1"
+
#define _BSD_SOURCE
#include <sys/types.h>
#include <sys/stat.h>
+#include <sys/param.h>
#include <dirent.h>
#include <stdlib.h>
#include <stdio.h>
#include <unistd.h>
#include <errno.h>
#include <string.h>
+#include <sys/ioctl.h>
+#include <locale.h>
+#include <getopt.h>
+
+#define BUFFER_SIZE 4096
+
+typedef int64_t size_sum_t;
+
+/* Yeah, global variables! */
+
+int ignore_dotfiles = 0; /* 1 means ignore files and directories
+ starting with a dot */
+
+int forced_width = 0; /* -1 means no width limit, strictly positive
+ means limit, 0 means not active */
+
+int forced_height = 0; /* -1 means no height limit, strictly positive
+ means limit, 0 means not active */
+
+int fancy_size_display = 0; /* 1 means to use floating values with K, M and G
+ as units */
+
+int reverse_sorting = 0; /* 1 means to show the large ones first */
+
+int show_top = 0; /* 1 means to show the top of the sorted list
+ instead of the bottom */
+
+size_sum_t size_min = -1; /* -1 means no minimum size, otherwise lower
+ bound on the size to display a
+ file/dir */
+
+/********************************************************************/
-size_t file_or_dir_size(char *name) {
+/* malloc with error checking. */
+
+void *safe_malloc(size_t n) {
+ void *p = malloc(n);
+ if (!p && n != 0) {
+ fprintf(stderr, "Can not allocate memory: %s\n", strerror(errno));
+ exit(EXIT_FAILURE);
+ }
+ return p;
+}
+
+/********************************************************************/
+
+int ignore_entry(const char *name) {
+ return
+ strcmp(name, ".") == 0 ||
+ strcmp(name, "..") == 0 ||
+ (ignore_dotfiles && name[0] == '.' && name[1] != '/');
+}
+
+size_sum_t entry_size(const char *name) {
DIR *dir;
struct dirent *dir_e;
struct stat dummy;
- size_t result;
- char subname[1024];
+ size_sum_t result;
+ char subname[PATH_MAX];
result = 0;
if(lstat(name, &dummy) != 0) {
- printf("Can not stat %s (%s).\n", name, strerror(errno));
- exit (1);
+ fprintf(stderr, "Can not stat %s: %s\n", name, strerror(errno));
+ exit(EXIT_FAILURE);
}
if(S_ISLNK(dummy.st_mode)) {
if(dir) {
while((dir_e = readdir(dir))) {
- if(strcmp(dir_e->d_name, ".") &&
- strcmp(dir_e->d_name, "..")) {
- sprintf(subname, "%s/%s", name, dir_e->d_name);
- result += file_or_dir_size(subname);
+ if(!ignore_entry(dir_e->d_name)) {
+ snprintf(subname, PATH_MAX, "%s/%s", name, dir_e->d_name);
+ result += entry_size(subname);
}
}
closedir(dir);
return result;
}
+size_sum_t atoss(const char *string) {
+ size_sum_t total, partial_total;
+ const char *c;
+ total = 0;
+ partial_total = 0;
+
+ for(c = string; *c; c++) {
+ if(*c >= '0' && *c <= '9') {
+ partial_total = 10 * partial_total + ((int) (*c - '0'));
+ } else if(*c == 'K' || *c == 'k') {
+ total += partial_total * 1024;
+ partial_total = 0;
+ } else if(*c == 'M' || *c == 'm') {
+ total += partial_total * 1024 * 1024;
+ partial_total = 0;
+ } else if(*c == 'G' || *c == 'g') {
+ total += partial_total * 1024 * 1024 * 1024;
+ partial_total = 0;
+ } else {
+ fprintf(stderr, "Syntax error in %s\n", string);
+ }
+ }
+ return total;
+}
+
/**********************************************************************/
-struct file_with_size {
- char *filename;
- size_t size;
- struct file_with_size *next;
+struct entry_node {
+ struct entry_node *next;
+ char *name;
+ size_sum_t size;
};
-struct file_with_size *create(char *name, struct file_with_size *current) {
- struct file_with_size *result;
- result = malloc(sizeof(struct file_with_size));
- result->filename = strdup(name);
- result->size = file_or_dir_size(name);
- result->next = current;
+struct entry_node *push_entry(char *name, struct entry_node *head) {
+ struct entry_node *result;
+ result = safe_malloc(sizeof(struct entry_node));
+ result->name = strdup(name);
+ result->size = entry_size(name);
+ result->next = head;
return result;
}
-void destroy(struct file_with_size *node) {
- struct file_with_size *next;
+void destroy_entry_list(struct entry_node *node) {
+ struct entry_node *next;
while(node) {
next = node->next;
- free(node->filename);
+ free(node->name);
free(node);
node = next;
}
/**********************************************************************/
-void print_sorted(struct file_with_size *root) {
- struct file_with_size *node;
- struct file_with_size **nodes;
- int nb, n;
+int compare_files(const void *x1, const void *x2) {
+ const struct entry_node **f1, **f2;
+
+ f1 = (const struct entry_node **) x1;
+ f2 = (const struct entry_node **) x2;
+
+ if(reverse_sorting) {
+ if((*f1)->size < (*f2)->size) {
+ return 1;
+ } else if((*f1)->size > (*f2)->size) {
+ return -1;
+ } else {
+ return 0;
+ }
+ } else {
+ if((*f1)->size < (*f2)->size) {
+ return -1;
+ } else if((*f1)->size > (*f2)->size) {
+ return 1;
+ } else {
+ return 0;
+ }
+ }
+}
+
+void raw_print(char *buffer, size_t buffer_size,
+ char *filename, size_sum_t size) {
+ char *a, *b, *c, u;
- nb = 0;
+ b = buffer;
+ do {
+ if(b >= buffer + buffer_size) {
+ fprintf(stderr, "Buffer overflow in raw_print (hu?!).\n");
+ exit(EXIT_FAILURE);
+ }
+ *(b++) = size%10 + '0';
+ size /= 10;
+ } while(size);
+
+ a = buffer;
+ c = b;
+ while(a < c) {
+ u = *a;
+ *(a++) = *(--c);
+ *c = u;
+ }
+
+ *(b++) = ' ';
+
+ snprintf(b, buffer_size - (b - buffer), "%s\n", filename);
+}
+
+void fancy_print(char *buffer, size_t buffer_size, char *filename, size_sum_t size) {
+ if(size < 1024) {
+ snprintf(buffer,
+ buffer_size,
+ "% 7d -- %s\n",
+ ((int) size),
+ filename);
+ } else if(size < 1024 * 1024) {
+ snprintf(buffer,
+ buffer_size,
+ "% 6.1fK -- %s\n",
+ ((double) (size))/(1024.0),
+ filename);
+ } else if(size < 1024 * 1024 * 1024) {
+ snprintf(buffer,
+ buffer_size,
+ "% 6.1fM -- %s\n",
+ ((double) (size))/(1024.0 * 1024),
+ filename);
+ } else {
+ snprintf(buffer,
+ buffer_size,
+ "% 6.1fG -- %s\n",
+ ((double) (size))/(1024.0 * 1024.0 * 1024.0),
+ filename);
+ }
+}
+
+void print_sorted(struct entry_node *root, int width, int height) {
+ char line[BUFFER_SIZE];
+ struct entry_node *node;
+ struct entry_node **nodes;
+ int nb_nodes, n, first, last;
+
+ nb_nodes = 0;
for(node = root; node; node = node->next) {
- nb++;
+ if(size_min < 0 || node->size >= size_min) {
+ nb_nodes++;
+ }
}
- nodes = malloc(nb * sizeof(struct file_with_size *));
+ nodes = safe_malloc(nb_nodes * sizeof(struct entry_node *));
n = 0;
for(node = root; node; node = node->next) {
- nodes[n++] = node;
+ if(size_min < 0 || node->size >= size_min) {
+ nodes[n++] = node;
+ }
}
- for(n = 0; n < nb; n++) {
- printf("%u %s\n", nodes[n]->size, nodes[n]->filename);
+ qsort(nodes, nb_nodes, sizeof(struct entry_node *), compare_files);
+
+ first = 0;
+ last = nb_nodes;
+
+ if(forced_height) {
+ height = forced_height;
+ }
+
+ if(forced_width) {
+ width = forced_width;
+ }
+
+ if(height >= 0 && nb_nodes > height && !show_top && !forced_height) {
+ printf("...\n");
+ }
+
+ if(height > 0 && height < nb_nodes) {
+ first = nb_nodes - height;
+ }
+
+ if(show_top) {
+ n = last;
+ last = nb_nodes - first;
+ first = nb_nodes - n;
+ }
+
+ /* I do not like valgrind to complain about uninitialized data */
+ if(width < BUFFER_SIZE) {
+ line[width] = '\0';
+ }
+
+ for(n = first; n < last; n++) {
+ if(fancy_size_display) {
+ fancy_print(line, BUFFER_SIZE, nodes[n]->name, nodes[n]->size);
+ } else {
+ raw_print(line, BUFFER_SIZE, nodes[n]->name, nodes[n]->size);
+ }
+ if(width >= 1 && width + 1 < BUFFER_SIZE && line[width]) {
+ line[width] = '\n';
+ line[width + 1] = '\0';
+ }
+ printf(line);
+ }
+
+ if(height >= 0 && nb_nodes > height && show_top && !forced_height) {
+ printf("...\n");
}
free(nodes);
/**********************************************************************/
+void usage(FILE *out) {
+ fprintf(out, "Usage: dus [OPTION]... [FILE]...\n");
+ fprintf(out, "Version %s (%s)\n", VERSION_NUMBER, UNAME);
+ fprintf(out, "List files and directories sorted according to their sizes. If no files or directories are provided as arguments, use the content of the current directory.\n");
+ fprintf(out, "\n");
+ /* 01234567890123456789012345678901234567890123456789012345678901234567890123456789*/
+ fprintf(out, " -d, --ignore-dots ignore files and directories starting with a '.'\n");
+ fprintf(out, " -f, --fancy display size with float values and K, M and G\n");
+ fprintf(out, " units.\n");
+ fprintf(out, " -r, --reverse-order reverse the sorting order.\n");
+ fprintf(out, " -t, --show-top show the top of the list.\n");
+ fprintf(out, " -c <cols>, --nb-columns <cols>\n");
+ fprintf(out, " specificy the number of columns to display. The\n");
+ fprintf(out, " value -1 corresponds to no constraint. By default\n");
+ fprintf(out, " the command uses the tty width, or no constraint\n");
+ fprintf(out, " if the stdout is not a tty.\n");
+ fprintf(out, " -l <lines>, --nb-lines <lines>\n");
+ fprintf(out, " same as -c for number of lines.\n");
+ fprintf(out, " -h, --help show this help.\n");
+ fprintf(out, " -m <size>, --size-min <size>\n");
+ fprintf(out, " set the listed entries minimum size.\n");
+ fprintf(out, "\n");
+ fprintf(out, "Report bugs and comments to <francois@fleuret.org>.\n");
+}
+
+/**********************************************************************/
+
+static struct option long_options[] = {
+ { "ignore-dots", no_argument, 0, 'd' },
+ { "reverse-order", no_argument, 0, 'r' },
+ { "show-top", no_argument, 0, 't' },
+ { "help", no_argument, 0, 'h' },
+ { "fancy", no_argument, 0, 'f' },
+ { "nb-columns", 1, 0, 'c' },
+ { "nb-lines", 1, 0, 'l' },
+ { "size-min", 1, 0, 'm' },
+ { 0, 0, 0, 0 }
+};
+
int main(int argc, char **argv) {
- int k;
- struct file_with_size *root;
+ int c;
+ struct entry_node *root;
+ struct winsize win;
root = 0;
- for(k = 1; k < argc; k++) {
- root = create(argv[k], root);
+
+ setlocale (LC_ALL, "");
+
+ while ((c = getopt_long(argc, argv, "dfrtl:c:m:hd",
+ long_options, NULL)) != -1) {
+ switch (c) {
+
+ case 'd':
+ ignore_dotfiles = 1;
+ break;
+
+ case 'f':
+ fancy_size_display = 1;
+ break;
+
+ case 'r':
+ reverse_sorting = 1;
+ break;
+
+ case 't':
+ show_top = 1;
+ break;
+
+ case 'l':
+ forced_height = atoi(optarg);
+ break;
+
+ case 'c':
+ forced_width = atoi(optarg);
+ break;
+
+ case 'm':
+ size_min = atoss(optarg);
+ break;
+
+ case 'h':
+ usage(stdout);
+ exit(EXIT_SUCCESS);
+
+ break;
+
+ default:
+ usage(stderr);
+ exit(EXIT_FAILURE);
+ }
}
- print_sorted(root);
+ if (optind < argc) {
+ while (optind < argc) {
+ root = push_entry(argv[optind++], root);
+ }
+ } else {
+ DIR *dir;
+ struct dirent *dir_e;
+ dir = opendir(".");
+ if(dir) {
+ while((dir_e = readdir(dir))) {
+ if(!ignore_entry(dir_e->d_name)) {
+ root = push_entry(dir_e->d_name, root);
+ }
+ }
+ closedir(dir);
+ } else {
+ fprintf(stderr, "Can not open ./: %s\n", strerror(errno));
+ exit (EXIT_FAILURE);
+ }
+ }
+
+ if(isatty(STDOUT_FILENO) &&
+ !ioctl (STDOUT_FILENO, TIOCGWINSZ, (char *) &win)) {
+ print_sorted(root, win.ws_col, win.ws_row - 2);
+ } else {
+ print_sorted(root, -1, -1);
+ }
- destroy(root);
+ destroy_entry_list(root);
- exit(0);
+ exit(EXIT_SUCCESS);
}