Fail silently on failure to read tar header, its unfortunate that many tar implementa...
[oweals/busybox.git] / du.c
diff --git a/du.c b/du.c
index 14e0bdf243cb341a53c804a0d47780b579db0cf5..fb649aee5e15f6720bec55ee5f4caebc9fbceb41 100644 (file)
--- a/du.c
+++ b/du.c
@@ -1,8 +1,9 @@
+/* vi: set sw=4 ts=4: */
 /*
  * Mini du implementation for busybox
  *
  *
- * Copyright (C) 1999 by Lineo, inc.
+ * Copyright (C) 1999,2000,2001 by Lineo, inc.
  * Written by John Beppu <beppu@lineo.com>
  *
  * This program is free software; you can redistribute it and/or modify
  *
  */
 
-#include "internal.h"
 #include <sys/types.h>
 #include <fcntl.h>
 #include <dirent.h>
 #include <stdio.h>
+#include <stdlib.h>
+#include <getopt.h>
+#include <string.h>
 #include <errno.h>
-#if 0
-#include <unistd.h>
-#include <sys/stat.h>
+#include "busybox.h"
+
+
+#ifdef BB_FEATURE_HUMAN_READABLE
+static unsigned long disp_hr = KILOBYTE;
+#endif
+
+typedef void (Display) (long, char *);
+
+static int du_depth = 0;
+static int count_hardlinks = 0;
+
+static Display *print;
+
+static void print_normal(long size, char *filename)
+{
+#ifdef BB_FEATURE_HUMAN_READABLE
+       printf("%s\t%s\n", make_human_readable_str(size<<10, 1, disp_hr), filename);
+#else
+       printf("%ld\t%s\n", size, filename);
 #endif
+}
+
+static void print_summary(long size, char *filename)
+{
+       if (du_depth == 1) {
+               print_normal(size, filename);
+       }
+}
+
+#define HASH_SIZE       311             /* Should be prime */
+#define hash_inode(i)   ((i) % HASH_SIZE)
+
+typedef struct ino_dev_hash_bucket_struct {
+  struct ino_dev_hash_bucket_struct *next;
+  ino_t ino;
+  dev_t dev;
+  char name[1];
+} ino_dev_hashtable_bucket_t;
 
-static const char du_usage[] =
-"Usage: du [OPTION]... [FILE]...\n";
+static ino_dev_hashtable_bucket_t *ino_dev_hashtable[HASH_SIZE];
+
+/*
+ * Return 1 if statbuf->st_ino && statbuf->st_dev are recorded in
+ * `ino_dev_hashtable', else return 0
+ *
+ * If NAME is a non-NULL pointer to a character pointer, and there is
+ * a match, then set *NAME to the value of the name slot in that
+ * bucket.
+ */
+static int is_in_ino_dev_hashtable(const struct stat *statbuf, char **name)
+{
+       ino_dev_hashtable_bucket_t *bucket;
 
-typedef void (Display)(size_t, char *);
+       bucket = ino_dev_hashtable[hash_inode(statbuf->st_ino)];
+       while (bucket != NULL) {
+         if ((bucket->ino == statbuf->st_ino) &&
+                 (bucket->dev == statbuf->st_dev))
+         {
+               if (name) *name = bucket->name;
+               return 1;
+         }
+         bucket = bucket->next;
+       }
+       return 0;
+}
 
-static void
-print(size_t size, char *filename)
+/* Add statbuf to statbuf hash table */
+static void add_to_ino_dev_hashtable(const struct stat *statbuf, const char *name)
 {
-    fprintf(stdout, "%-7d %s\n", (size >> 1), filename);
+       int i;
+       size_t s;
+       ino_dev_hashtable_bucket_t *bucket;
+
+       i = hash_inode(statbuf->st_ino);
+       s = name ? strlen(name) : 0;
+       bucket = xmalloc(sizeof(ino_dev_hashtable_bucket_t) + s);
+       bucket->ino = statbuf->st_ino;
+       bucket->dev = statbuf->st_dev;
+       if (name)
+               strcpy(bucket->name, name);
+       else
+               bucket->name[0] = '\0';
+       bucket->next = ino_dev_hashtable[i];
+       ino_dev_hashtable[i] = bucket;
+}
+
+/* Clear statbuf hash table */
+static void reset_ino_dev_hashtable(void)
+{
+       int i;
+       ino_dev_hashtable_bucket_t *bucket;
+
+       for (i = 0; i < HASH_SIZE; i++) {
+               while (ino_dev_hashtable[i] != NULL) {
+                       bucket = ino_dev_hashtable[i]->next;
+                       free(ino_dev_hashtable[i]);
+                       ino_dev_hashtable[i] = bucket;
+               }
+       }
 }
 
 /* tiny recursive du */
-static size_t
-du(char *filename)
+static long du(char *filename)
 {
-    struct stat statbuf;
-    size_t     sum;
-
-    if ((lstat(filename, &statbuf)) != 0) { 
-       fprintf(stdout, "du: %s: %s\n", filename, strerror(errno));
-       return 0; 
-    }
-    sum = statbuf.st_blocks;
-
-    if (S_ISDIR(statbuf.st_mode)) {
-       DIR             *dir;
-       struct dirent   *entry;
-
-       dir = opendir(filename);
-       if (!dir) { return 0; }
-       while ((entry = readdir(dir))) {
-           char newfile[512];
-           char *name = entry->d_name;
-
-           if (  (strcmp(name, "..") == 0)
-              || (strcmp(name, ".")  == 0)) 
-           { continue; }
-
-           sprintf(newfile, "%s/%s", filename, name);
-           sum += du(newfile);
+       struct stat statbuf;
+       long sum;
+
+       if ((lstat(filename, &statbuf)) != 0) {
+               perror_msg("%s", filename);
+               return 0;
+       }
+
+       du_depth++;
+       sum = (statbuf.st_blocks >> 1);
+
+       /* Don't add in stuff pointed to by symbolic links */
+       if (S_ISLNK(statbuf.st_mode)) {
+               sum = 0L;
+               if (du_depth == 1) {
+               }
        }
-       closedir(dir);
-       print(sum, filename);
-    }
-    return sum;
+       if (S_ISDIR(statbuf.st_mode)) {
+               DIR *dir;
+               struct dirent *entry;
+               char *newfile;
+
+               dir = opendir(filename);
+               if (!dir) {
+                       du_depth--;
+                       return 0;
+               }
+
+               newfile = last_char_is(filename, '/');
+               if (newfile)
+                       *newfile = '\0';
+
+               while ((entry = readdir(dir))) {
+                       char *name = entry->d_name;
+
+                       if ((strcmp(name, "..") == 0)
+                               || (strcmp(name, ".") == 0)) {
+                               continue;
+                       }
+                       newfile = concat_path_file(filename, name);
+                       sum += du(newfile);
+                       free(newfile);
+               }
+               closedir(dir);
+               print(sum, filename);
+       }
+       else if (statbuf.st_nlink > 1 && !count_hardlinks) {
+               /* Add files with hard links only once */
+               if (is_in_ino_dev_hashtable(&statbuf, NULL)) {
+                       sum = 0L;
+                       if (du_depth == 1)
+                               print(sum, filename);
+               }
+               else {
+                       add_to_ino_dev_hashtable(&statbuf, NULL);
+               }
+       }
+       du_depth--;
+       return sum;
 }
 
-int 
-du_main(int argc, char **argv)
+int du_main(int argc, char **argv)
 {
-    int i;
-    char opt;
-
-    /* parse argv[] */
-    for (i = 1; i < argc; i++) {
-       if (argv[i][0] == '-') {
-           opt = argv[i][1];
-           switch (opt) {
-               case 's':
-                   break;
-               case 'h':
-                   usage(du_usage);
-                   break;
-               default:
-                   fprintf(stderr, "du: invalid option -- %c\n", opt);
-                   usage(du_usage);
-           }
-       } else {
-           break;
+       int status = EXIT_SUCCESS;
+       int i;
+       int c;
+
+       /* default behaviour */
+       print = print_normal;
+
+       /* parse argv[] */
+       while ((c = getopt(argc, argv, "sl"
+#ifdef BB_FEATURE_HUMAN_READABLE
+"hm"
+#endif
+"k")) != EOF) {
+                       switch (c) {
+                       case 's':
+                                       print = print_summary;
+                                       break;
+                       case 'l':
+                                       count_hardlinks = 1;
+                                       break;
+#ifdef BB_FEATURE_HUMAN_READABLE
+                       case 'h': disp_hr = 0;        break;
+                       case 'm': disp_hr = MEGABYTE; break;
+#endif
+                       case 'k': break;
+                       default:
+                                       show_usage();
+                       }
        }
-    }
-
-    /* go through remaining args (if any) */
-    if (i >= argc) {
-       du(".");
-    } else {
-       int sum;
-       for ( ; i < argc; i++) {
-           sum = du(argv[i]) >> 1;
-           if (sum) printf("%-7d %s\n", sum, argv[i]);
+
+       /* go through remaining args (if any) */
+       if (optind >= argc) {
+               if (du(".") == 0)
+                       status = EXIT_FAILURE;
+       } else {
+               long sum;
+
+               for (i=optind; i < argc; i++) {
+                       sum = du(argv[i]);
+                       if(is_directory(argv[i], FALSE, NULL)==FALSE) {
+                               print_normal(sum, argv[i]);
+                       }
+                       reset_ino_dev_hashtable();
+               }
        }
-    }
 
-    exit(0);
+       return status;
 }
 
-/* $Id: du.c,v 1.5 1999/12/10 15:23:47 beppu Exp $ */
+/* $Id: du.c,v 1.50 2001/06/30 17:54:20 andersen Exp $ */
+/*
+Local Variables:
+c-file-style: "linux"
+c-basic-offset: 4
+tab-width: 4
+End:
+*/