+/* 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)(size_t, char *);
+typedef void (Display) (long, char *);
-static const char du_usage[] =
-"Usage: du [OPTION]... [FILE]...\n\n"
-"\t-s\tdisplay only a total for each argument\n"
-;
+static int du_depth = 0;
+static int count_hardlinks = 0;
-static int du_depth = 0;
+static Display *print;
-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);
+ }
+}
-static void
-print_null(size_t size, char *filename) { }
+#define HASH_SIZE 311 /* Should be prime */
+#define hash_inode(i) ((i) % HASH_SIZE)
-static void
-print_normal(size_t size, char *filename)
+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 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)
{
- fprintf(stdout, "%-7d %s\n", (size >> 1), filename);
+ ino_dev_hashtable_bucket_t *bucket;
+
+ 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_summary(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)
{
- if (du_depth == 1) {
- print_normal(size, 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;
+ struct stat statbuf;
+ long sum;
- if ((lstat(filename, &statbuf)) != 0) {
- fprintf(stdout, "du: %s: %s\n", filename, strerror(errno));
- return 0;
- }
+ if ((lstat(filename, &statbuf)) != 0) {
+ perror_msg("%s", filename);
+ return 0;
+ }
- du_depth++;
- sum = statbuf.st_blocks;
+ du_depth++;
+ sum = (statbuf.st_blocks >> 1);
- if (S_ISDIR(statbuf.st_mode)) {
- DIR *dir;
- struct dirent *entry;
+ /* Don't add in stuff pointed to by symbolic links */
+ if (S_ISLNK(statbuf.st_mode)) {
+ sum = 0L;
+ if (du_depth == 1)
+ print(sum, filename);
+ }
+ if (S_ISDIR(statbuf.st_mode)) {
+ DIR *dir;
+ struct dirent *entry;
+ char *newfile;
+
+ dir = opendir(filename);
+ if (!dir) {
+ du_depth--;
+ return 0;
+ }
- dir = opendir(filename);
- if (!dir) { return 0; }
- while ((entry = readdir(dir))) {
- char newfile[512];
- char *name = entry->d_name;
+ newfile = last_char_is(filename, '/');
+ if (newfile)
+ *newfile = '\0';
- if ( (strcmp(name, "..") == 0)
- || (strcmp(name, ".") == 0))
- { continue; }
+ while ((entry = readdir(dir))) {
+ char *name = entry->d_name;
- sprintf(newfile, "%s/%s", filename, name);
- sum += du(newfile);
+ if ((strcmp(name, "..") == 0)
+ || (strcmp(name, ".") == 0)) {
+ continue;
+ }
+ newfile = concat_path_file(filename, name);
+ sum += du(newfile);
+ free(newfile);
+ }
+ closedir(dir);
+ print(sum, filename);
}
- closedir(dir);
- print(sum, filename);
- }
- du_depth--;
- return sum;
+ 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;
-
- /* default behaviour */
- print = print_normal;
-
- /* parse argv[] */
- for (i = 1; i < argc; i++) {
- if (argv[i][0] == '-') {
- opt = argv[i][1];
- switch (opt) {
- case 's':
- print = print_summary;
- 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]);
- if (sum) { print_normal(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++) {
+ if ((sum = du(argv[i])) == 0)
+ status = EXIT_FAILURE;
+ 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.6 1999/12/15 18:52:17 beppu Exp $ */
+/* $Id: du.c,v 1.49 2001/06/13 08:02:44 andersen Exp $ */
+/*
+Local Variables:
+c-file-style: "linux"
+c-basic-offset: 4
+tab-width: 4
+End:
+*/