a04dba6d3677befedd5add3c2ed4ccb974f32cf5
[oweals/busybox.git] / du.c
1 /* vi: set sw=4 ts=4: */
2 /*
3  * Mini du implementation for busybox
4  *
5  *
6  * Copyright (C) 1999,2000 by Lineo, inc.
7  * Written by John Beppu <beppu@lineo.com>
8  *
9  * This program is free software; you can redistribute it and/or modify
10  * it under the terms of the GNU General Public License as published by
11  * the Free Software Foundation; either version 2 of the License, or
12  * (at your option) any later version.
13  *
14  * This program is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
17  * General Public License for more details.
18  *
19  * You should have received a copy of the GNU General Public License
20  * along with this program; if not, write to the Free Software
21  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
22  *
23  */
24
25 #include "busybox.h"
26 #define BB_DECLARE_EXTERN
27 #define bb_need_name_too_long
28 #include "messages.c"
29
30 #include <sys/types.h>
31 #include <fcntl.h>
32 #include <dirent.h>
33 #include <stdio.h>
34 #include <errno.h>
35
36 typedef void (Display) (long, char *);
37
38 static int du_depth = 0;
39 static int count_hardlinks = 0;
40
41 static Display *print;
42
43 static void print_normal(long size, char *filename)
44 {
45         fprintf(stdout, "%ld\t%s\n", size, filename);
46 }
47
48 static void print_summary(long size, char *filename)
49 {
50         if (du_depth == 1) {
51                 print_normal(size, filename);
52         }
53 }
54
55 /* tiny recursive du */
56 static long du(char *filename)
57 {
58         struct stat statbuf;
59         long sum;
60         int len;
61
62         if ((lstat(filename, &statbuf)) != 0) {
63                 perror_msg_and_die("%s", filename);
64         }
65
66         du_depth++;
67         sum = (statbuf.st_blocks >> 1);
68
69         /* Don't add in stuff pointed to by symbolic links */
70         if (S_ISLNK(statbuf.st_mode)) {
71                 sum = 0L;
72                 if (du_depth == 1)
73                         print(sum, filename);
74         }
75         if (S_ISDIR(statbuf.st_mode)) {
76                 DIR *dir;
77                 struct dirent *entry;
78
79                 dir = opendir(filename);
80                 if (!dir) {
81                         du_depth--;
82                         return 0;
83                 }
84
85                 len = strlen(filename);
86                 if (filename[len - 1] == '/')
87                         filename[--len] = '\0';
88
89                 while ((entry = readdir(dir))) {
90                         char newfile[BUFSIZ + 1];
91                         char *name = entry->d_name;
92
93                         if ((strcmp(name, "..") == 0)
94                                 || (strcmp(name, ".") == 0)) {
95                                 continue;
96                         }
97
98                         if (len + strlen(name) + 1 > BUFSIZ) {
99                                 error_msg(name_too_long);
100                                 du_depth--;
101                                 return 0;
102                         }
103                         sprintf(newfile, "%s/%s", filename, name);
104
105                         sum += du(newfile);
106                 }
107                 closedir(dir);
108                 print(sum, filename);
109         }
110         else if (statbuf.st_nlink > 1 && !count_hardlinks) {
111                 /* Add files with hard links only once */
112                 if (is_in_ino_dev_hashtable(&statbuf, NULL)) {
113                         sum = 0L;
114                         if (du_depth == 1)
115                                 print(sum, filename);
116                 }
117                 else {
118                         add_to_ino_dev_hashtable(&statbuf, NULL);
119                 }
120         }
121         du_depth--;
122         return sum;
123 }
124
125 int du_main(int argc, char **argv)
126 {
127         int status = EXIT_SUCCESS;
128         int i;
129         int c;
130
131         /* default behaviour */
132         print = print_normal;
133
134         /* parse argv[] */
135         while ((c = getopt(argc, argv, "sl")) != EOF) {
136                         switch (c) {
137                         case 's':
138                                         print = print_summary;
139                                         break;
140                         case 'l':
141                                         count_hardlinks = 1;
142                                         break;
143                         default:
144                                         usage(du_usage);
145                         }
146         }
147
148         /* go through remaining args (if any) */
149         if (optind >= argc) {
150                 if (du(".") == 0)
151                         status = EXIT_FAILURE;
152         } else {
153                 long sum;
154
155                 for (i=optind; i < argc; i++) {
156                         if ((sum = du(argv[i])) == 0)
157                                 status = EXIT_FAILURE;
158                         if (is_directory(argv[i], FALSE, NULL)==FALSE) {
159                                 print_normal(sum, argv[i]);
160                         }
161                         reset_ino_dev_hashtable();
162                 }
163         }
164
165         return status;
166 }
167
168 /* $Id: du.c,v 1.32 2000/12/12 23:17:26 andersen Exp $ */
169 /*
170 Local Variables:
171 c-file-style: "linux"
172 c-basic-offset: 4
173 tab-width: 4
174 End:
175 */