Some more patchelttes from Larry Doolittle.
[oweals/busybox.git] / df.c
1 /* vi: set sw=4 ts=4: */
2 /*
3  * Mini df implementation for busybox
4  *
5  * Copyright (C) 1999,2000,2001 by Lineo, inc.
6  * Written by Erik Andersen <andersen@lineo.com>, <andersee@debian.org>
7  * based on original code by (I think) Bruce Perens <bruce@pixar.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 <stdio.h>
26 #include <stdlib.h>
27 #include <string.h>
28 #include <mntent.h>
29 #include <sys/vfs.h>
30 #include <getopt.h>
31 #include "busybox.h"
32
33 extern const char mtab_file[];  /* Defined in utility.c */
34 #ifdef BB_FEATURE_HUMAN_READABLE
35 static unsigned long df_disp_hr = KILOBYTE; 
36 #endif
37
38 static int do_df(char *device, const char *mount_point)
39 {
40         struct statfs s;
41         long blocks_used;
42         long blocks_percent_used;
43 #ifdef BB_FEATURE_HUMAN_READABLE
44         long base;
45 #endif  
46
47         if (statfs(mount_point, &s) != 0) {
48                 perror_msg("%s", mount_point);
49                 return FALSE;
50         }
51
52         if (s.f_blocks > 0) {
53                 blocks_used = s.f_blocks - s.f_bfree;
54                 if(blocks_used == 0)
55                         blocks_percent_used = 0;
56                 else {
57                         blocks_percent_used = (long)
58                           (blocks_used * 100.0 / (blocks_used + s.f_bavail) + 0.5);
59                 }
60                 if (strcmp(device, "/dev/root") == 0) {
61                         /* Adjusts device to be the real root device,
62                          * or leaves device alone if it can't find it */
63                         device = find_real_root_device_name(device);
64                         if(device==NULL)
65                                 return FALSE;
66                 }
67 #ifdef BB_FEATURE_HUMAN_READABLE
68                 switch (df_disp_hr) {
69                         case MEGABYTE:
70                                 base = KILOBYTE;
71                                 break;
72                         case KILOBYTE:
73                                 base = 1;
74                                 break;
75                         default:
76                                 base = 0;
77                 }
78                 printf("%-20s %9s ", device,
79                            make_human_readable_str((unsigned long)(s.f_blocks * 
80                                            (s.f_bsize/(double)KILOBYTE)), base));
81                 printf("%9s ",
82                            make_human_readable_str((unsigned long)(
83                                            (s.f_blocks - s.f_bfree) * 
84                                            (s.f_bsize/(double)KILOBYTE)), base));
85                 printf("%9s %3ld%% %s\n",
86                            make_human_readable_str((unsigned long)(s.f_bavail * 
87                                            (s.f_bsize/(double)KILOBYTE)), base),
88                            blocks_percent_used, mount_point);
89 #else
90                 printf("%-20s %9ld %9ld %9ld %3ld%% %s\n",
91                                 device,
92                                 (long) (s.f_blocks * (s.f_bsize / (double)KILOBYTE)),
93                                 (long) ((s.f_blocks - s.f_bfree)*(s.f_bsize/(double)KILOBYTE)),
94                                 (long) (s.f_bavail * (s.f_bsize / (double)KILOBYTE)),
95                                 blocks_percent_used, mount_point);
96 #endif
97         }
98
99         return TRUE;
100 }
101
102 extern int df_main(int argc, char **argv)
103 {
104         int status = EXIT_SUCCESS;
105         int opt = 0;
106         int i = 0;
107         char disp_units_hdr[80] = "1k-blocks"; /* default display is kilobytes */
108
109         while ((opt = getopt(argc, argv, "k"
110 #ifdef BB_FEATURE_HUMAN_READABLE
111         "hm"
112 #endif
113 )) > 0)
114         {
115                 switch (opt) {
116 #ifdef BB_FEATURE_HUMAN_READABLE
117                         case 'h':
118                                 df_disp_hr = 0;
119                                 strcpy(disp_units_hdr, "     Size");
120                                 break;
121                         case 'm':
122                                 df_disp_hr = MEGABYTE;
123                                 strcpy(disp_units_hdr, "1M-blocks");
124                                 break;
125 #endif
126                         case 'k':
127                                 /* default display is kilobytes */
128                                 break;
129                         default:
130                                           show_usage();
131                 }
132         }
133
134         printf("%-20s %-14s %s %s %s %s\n", "Filesystem", disp_units_hdr,
135                "Used", "Available", "Use%", "Mounted on");
136
137         if(optind < argc) {
138                 struct mntent *mount_entry;
139                 for(i = optind; i < argc; i++)
140                 {
141                         if ((mount_entry = find_mount_point(argv[i], mtab_file)) == 0) {
142                                 error_msg("%s: can't find mount point.", argv[i]);
143                                 status = EXIT_FAILURE;
144                         } else if (!do_df(mount_entry->mnt_fsname, mount_entry->mnt_dir))
145                                 status = EXIT_FAILURE;
146                 }
147         } else {
148                 FILE *mount_table;
149                 struct mntent *mount_entry;
150
151                 mount_table = setmntent(mtab_file, "r");
152                 if (mount_table == 0) {
153                         perror_msg("%s", mtab_file);
154                         return EXIT_FAILURE;
155                 }
156
157                 while ((mount_entry = getmntent(mount_table))) {
158                         if (!do_df(mount_entry->mnt_fsname, mount_entry->mnt_dir))
159                                 status = EXIT_FAILURE;
160                 }
161                 endmntent(mount_table);
162         }
163
164         return status;
165 }
166
167 /*
168 Local Variables:
169 c-file-style: "linux"
170 c-basic-offset: 4
171 tab-width: 4
172 End:
173 */