df.c revision 1.102 1 /* $NetBSD: df.c,v 1.102 2023/12/18 08:27:24 kre Exp $ */
2
3 /*
4 * Copyright (c) 1980, 1990, 1993, 1994
5 * The Regents of the University of California. All rights reserved.
6 * (c) UNIX System Laboratories, Inc.
7 * All or some portions of this file are derived from material licensed
8 * to the University of California by American Telephone and Telegraph
9 * Co. or Unix System Laboratories, Inc. and are reproduced herein with
10 * the permission of UNIX System Laboratories, Inc.
11 *
12 * Redistribution and use in source and binary forms, with or without
13 * modification, are permitted provided that the following conditions
14 * are met:
15 * 1. Redistributions of source code must retain the above copyright
16 * notice, this list of conditions and the following disclaimer.
17 * 2. Redistributions in binary form must reproduce the above copyright
18 * notice, this list of conditions and the following disclaimer in the
19 * documentation and/or other materials provided with the distribution.
20 * 3. Neither the name of the University nor the names of its contributors
21 * may be used to endorse or promote products derived from this software
22 * without specific prior written permission.
23 *
24 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
25 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
28 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
34 * SUCH DAMAGE.
35 */
36
37 #include <sys/cdefs.h>
38 #ifndef lint
39 __COPYRIGHT(
40 "@(#) Copyright (c) 1980, 1990, 1993, 1994\
41 The Regents of the University of California. All rights reserved.");
42 #endif /* not lint */
43
44 #ifndef lint
45 #if 0
46 static char sccsid[] = "@(#)df.c 8.7 (Berkeley) 4/2/94";
47 #else
48 __RCSID("$NetBSD: df.c,v 1.102 2023/12/18 08:27:24 kre Exp $");
49 #endif
50 #endif /* not lint */
51
52 #include <sys/param.h>
53 #include <sys/stat.h>
54 #include <sys/mount.h>
55
56 #include <assert.h>
57 #include <err.h>
58 #include <errno.h>
59 #include <stdbool.h>
60 #include <fcntl.h>
61 #include <locale.h>
62 #include <util.h>
63 #include <stdio.h>
64 #include <stdlib.h>
65 #include <string.h>
66 #include <unistd.h>
67 #include <util.h>
68
69 static char *getmntpt(const char *);
70 static void addstat(struct statvfs *, const struct statvfs *);
71 static void prtstat(const struct statvfs *, int);
72 static int selected(const char *, size_t);
73 static void maketypelist(char *);
74 static size_t regetmntinfo(struct statvfs **, size_t);
75 __dead static void usage(void);
76 static void prthumanval(int64_t, int);
77 static void prthuman(const struct statvfs *, int64_t, int64_t);
78
79 static int aflag, cflag, fflag, gflag, hflag, iflag, lflag;
80 static int Nflag, nflag, Pflag, Wflag;
81 static long usize;
82 static char **typelist;
83 static size_t mntcount;
84
85 #define WIDTH_INODE 10
86 #define WIDTH_BLKSIZE 12
87 static int blksize_width = WIDTH_BLKSIZE;
88
89 static int fudgeunits = 0;
90
91 int
92 main(int argc, char *argv[])
93 {
94 struct stat stbuf;
95 struct statvfs *mntbuf, totals;
96 int ch, maxwidth, width;
97 size_t i;
98 char *mntpt;
99
100 setprogname(argv[0]);
101 (void)setlocale(LC_ALL, "");
102
103 while ((ch = getopt(argc, argv, "abcfGgHhiklmNnPt:W")) != -1)
104 switch (ch) {
105 case 'a':
106 aflag = 1;
107 break;
108 case 'b':
109 hflag = 0;
110 usize = 512;
111 break;
112 case 'c':
113 cflag = 1;
114 break;
115 case 'f':
116 fflag = 1;
117 break;
118 case 'g':
119 hflag = 0;
120 usize = 1024 * 1024 * 1024;
121 break;
122 case 'G':
123 gflag = 1;
124 break;
125 case 'H':
126 fudgeunits = HN_DIVISOR_1000;
127 /* FALL THROUGH */
128 case 'h':
129 hflag = 1;
130 usize = 0;
131 break;
132 case 'i':
133 iflag = 1;
134 break;
135 case 'k':
136 hflag = 0;
137 usize = 1024;
138 break;
139 case 'l':
140 lflag = 1;
141 break;
142 case 'm':
143 hflag = 0;
144 usize = 1024 * 1024;
145 break;
146 case 'N':
147 Nflag = 1;
148 break;
149 case 'n':
150 nflag = 1;
151 break;
152 case 'P':
153 Pflag = 1;
154 break;
155 case 'W':
156 Wflag = 1;
157 break;
158 case 't':
159 if (typelist != NULL)
160 errx(EXIT_FAILURE,
161 "only one -t option may be specified.");
162 maketypelist(optarg);
163 break;
164 case '?':
165 default:
166 usage();
167 }
168
169 if (fflag && (Pflag || gflag))
170 errx(EXIT_FAILURE,
171 "only one of -f -G and -P may be specified");
172 if (gflag && (Pflag || iflag))
173 errx(EXIT_FAILURE,
174 "only one of -G and -P or -i may be specified");
175 if (Pflag && iflag)
176 errx(EXIT_FAILURE,
177 "only one of -P and -i may be specified");
178 if (fflag)
179 Nflag = 1;
180
181 #if 0
182 /*
183 * The block size cannot be checked until after getbsize() is called.
184 */
185 if (Pflag && (hflag || (usize != 1024 && usize != 512)))
186 errx(EXIT_FAILURE,
187 "non-standard block size incompatible with -P");
188 #endif
189 argc -= optind;
190 argv += optind;
191
192 mntcount = getmntinfo(&mntbuf, MNT_NOWAIT);
193 if (mntcount == 0)
194 err(EXIT_FAILURE,
195 "retrieving information on mounted file systems");
196
197 if (*argv == NULL) {
198 mntcount = regetmntinfo(&mntbuf, mntcount);
199 } else {
200 if ((mntbuf = calloc(argc, sizeof(*mntbuf))) == NULL)
201 err(EXIT_FAILURE, "can't allocate statvfs array");
202 mntcount = 0;
203 for (/*EMPTY*/; *argv != NULL; argv++) {
204 if (stat(*argv, &stbuf) < 0) {
205 if ((mntpt = getmntpt(*argv)) == 0) {
206 warn("%s", *argv);
207 continue;
208 }
209 } else if (S_ISBLK(stbuf.st_mode)) {
210 if ((mntpt = getmntpt(*argv)) == 0)
211 mntpt = *argv;
212 } else
213 mntpt = *argv;
214 /*
215 * Statfs does not take a `wait' flag, so we cannot
216 * implement nflag here.
217 */
218 if (!statvfs(mntpt, &mntbuf[mntcount]))
219 if (lflag &&
220 (mntbuf[mntcount].f_flag & MNT_LOCAL) == 0)
221 warnx("Warning: %s is not a local %s",
222 *argv, "file system");
223 else if
224 (!selected(mntbuf[mntcount].f_fstypename,
225 sizeof(mntbuf[mntcount].f_fstypename)))
226 warnx("Warning: %s mounted as a %s %s",
227 *argv,
228 mntbuf[mntcount].f_fstypename,
229 "file system");
230 else
231 ++mntcount;
232 else
233 warn("%s", *argv);
234 }
235 }
236
237 if (cflag) {
238 memset(&totals, 0, sizeof(totals));
239 totals.f_frsize = DEV_BSIZE;
240 strlcpy(totals.f_mntfromname, "total",
241 sizeof(totals.f_mntfromname));
242 }
243
244 maxwidth = 0;
245 for (i = 0; i < mntcount; i++) {
246 width = 0;
247 if (Wflag && mntbuf[i].f_mntfromlabel[0]) {
248 /* +5 is for "NAME=" added later */
249 width = (int)strlen(mntbuf[i].f_mntfromlabel) + 5;
250 }
251 if (width == 0)
252 width = (int)strlen(mntbuf[i].f_mntfromname);
253 if (width > maxwidth)
254 maxwidth = width;
255 if (cflag)
256 addstat(&totals, &mntbuf[i]);
257 }
258
259 if (cflag == 0 || fflag == 0)
260 for (i = 0; i < mntcount; i++)
261 prtstat(&mntbuf[i], maxwidth);
262
263 mntcount = fflag;
264 if (cflag)
265 prtstat(&totals, maxwidth);
266
267 return 0;
268 }
269
270 static char *
271 getmntpt(const char *name)
272 {
273 size_t count, i;
274 struct statvfs *mntbuf;
275
276 count = getmntinfo(&mntbuf, MNT_NOWAIT);
277 if (count == 0)
278 err(EXIT_FAILURE, "Can't get mount information");
279 for (i = 0; i < count; i++) {
280 if (!strcmp(mntbuf[i].f_mntfromname, name))
281 return mntbuf[i].f_mntonname;
282 }
283 return 0;
284 }
285
286 static enum { IN_LIST, NOT_IN_LIST } which;
287
288 static int
289 selected(const char *type, size_t len)
290 {
291 char **av;
292
293 /* If no type specified, it's always selected. */
294 if (typelist == NULL)
295 return 1;
296 for (av = typelist; *av != NULL; ++av)
297 if (!strncmp(type, *av, len))
298 return which == IN_LIST ? 1 : 0;
299 return which == IN_LIST ? 0 : 1;
300 }
301
302 static void
303 maketypelist(char *fslist)
304 {
305 size_t i;
306 char *nextcp, **av;
307
308 if ((fslist == NULL) || (fslist[0] == '\0'))
309 errx(EXIT_FAILURE, "empty type list");
310
311 /*
312 * XXX
313 * Note: the syntax is "noxxx,yyy" for no xxx's and
314 * no yyy's, not the more intuitive "noyyy,noyyy".
315 */
316 if (fslist[0] == 'n' && fslist[1] == 'o') {
317 fslist += 2;
318 which = NOT_IN_LIST;
319 } else
320 which = IN_LIST;
321
322 /* Count the number of types. */
323 for (i = 1, nextcp = fslist;
324 (nextcp = strchr(nextcp, ',')) != NULL; i++)
325 ++nextcp;
326
327 /* Build an array of that many types. */
328 if ((av = typelist = calloc((i + 1), sizeof(*av))) == NULL)
329 err(EXIT_FAILURE, "can't allocate type array");
330 av[0] = fslist;
331 for (i = 1, nextcp = fslist;
332 (nextcp = strchr(nextcp, ',')) != NULL; i++) {
333 *nextcp = '\0';
334 av[i] = ++nextcp;
335 }
336 /* Terminate the array. */
337 av[i] = NULL;
338 }
339
340 /*
341 * Make a pass over the filesystem info in ``mntbuf'' filtering out
342 * filesystem types not in ``fsmask'' and possibly re-stating to get
343 * current (not cached) info. Returns the new count of valid statvfs bufs.
344 */
345 static size_t
346 regetmntinfo(struct statvfs **mntbufp, size_t count)
347 {
348 size_t i, j;
349 struct statvfs *mntbuf;
350
351 if (!lflag && typelist == NULL && aflag)
352 return nflag ? count : (size_t)getmntinfo(mntbufp, MNT_WAIT);
353
354 mntbuf = *mntbufp;
355 j = 0;
356 for (i = 0; i < count; i++) {
357 if (!aflag && (mntbuf[i].f_flag & MNT_IGNORE) != 0)
358 continue;
359 if (lflag && (mntbuf[i].f_flag & MNT_LOCAL) == 0)
360 continue;
361 if (!selected(mntbuf[i].f_fstypename,
362 sizeof(mntbuf[i].f_fstypename)))
363 continue;
364 if (nflag)
365 mntbuf[j] = mntbuf[i];
366 else {
367 struct statvfs layerbuf = mntbuf[i];
368 (void)statvfs(mntbuf[i].f_mntonname, &mntbuf[j]);
369 /*
370 * If the FS name changed, then new data is for
371 * a different layer and we don't want it.
372 */
373 if (memcmp(layerbuf.f_mntfromname,
374 mntbuf[j].f_mntfromname, MNAMELEN))
375 mntbuf[j] = layerbuf;
376 }
377 j++;
378 }
379 return j;
380 }
381
382 static void
383 prthumanval(int64_t bytes, int width)
384 {
385 char buf[6];
386
387 (void)humanize_number(buf, sizeof(buf) - (bytes < 0 ? 0 : 1),
388 bytes, "", HN_AUTOSCALE,
389 HN_B | HN_NOSPACE | HN_DECIMAL | fudgeunits);
390
391 (void)printf("%*s", width, buf);
392 }
393
394 static void
395 prthuman(const struct statvfs *sfsp, int64_t used, int64_t bavail)
396 {
397
398 prthumanval((int64_t)(sfsp->f_blocks * sfsp->f_frsize), blksize_width);
399 prthumanval((int64_t)(used * sfsp->f_frsize), 1 + blksize_width);
400 prthumanval((int64_t)(bavail * sfsp->f_frsize), 1 + blksize_width);
401 }
402
403 /*
404 * Convert statvfs returned filesystem size into BLOCKSIZE units.
405 * Attempts to avoid overflow for large filesystems.
406 */
407 #define fsbtoblk(num, fsbs, bs) \
408 (((fsbs) != 0 && (uint64_t)(fsbs) < (uint64_t)(bs)) ? \
409 (int64_t)(num) / (int64_t)((bs) / (fsbs)) : \
410 (int64_t)(num) * (int64_t)((fsbs) / (bs)))
411
412 static void
413 addstat(struct statvfs *totalfsp, const struct statvfs *sfsp)
414 {
415 uint64_t frsize;
416
417 frsize = sfsp->f_frsize / totalfsp->f_frsize;
418 totalfsp->f_blocks += sfsp->f_blocks * frsize;
419 totalfsp->f_bfree += sfsp->f_bfree * frsize;
420 totalfsp->f_bavail += sfsp->f_bavail * frsize;
421 totalfsp->f_bresvd += sfsp->f_bresvd * frsize;
422 totalfsp->f_files += sfsp->f_files;
423 totalfsp->f_ffree += sfsp->f_ffree;
424 totalfsp->f_favail += sfsp->f_favail;
425 totalfsp->f_fresvd += sfsp->f_fresvd;
426 }
427
428 /*
429 * Print out status about a filesystem.
430 */
431 static void
432 prtstat(const struct statvfs *sfsp, int maxwidth)
433 {
434 static long blocksize;
435 static int headerlen, timesthrough;
436 static const char *header;
437 static const char full[] = "100";
438 static const char empty[] = " 0";
439 int64_t used, availblks, inodes;
440 int64_t bavail;
441 char pb[64];
442 char mntfromname[sizeof(sfsp->f_mntfromname) + 10];
443
444 if (Wflag && sfsp->f_mntfromlabel[0]) {
445 snprintf(mntfromname, sizeof(mntfromname), "NAME=%s",
446 sfsp->f_mntfromlabel);
447 } else {
448 strlcpy(mntfromname, sfsp->f_mntfromname, sizeof(mntfromname));
449 }
450
451 if (gflag) {
452 /*
453 * From SunOS-5.6:
454 *
455 * /var (/dev/dsk/c0t0d0s3 ): 8192 block size 1024 frag size
456 * 984242 total blocks 860692 free blocks 859708 available 249984 total files
457 * 248691 free files 8388611 filesys id
458 * ufs fstype 0x00000004 flag 255 filename length
459 *
460 */
461 (void)printf("%10s (%-12s): %7ld block size %12ld frag size\n",
462 sfsp->f_mntonname, mntfromname,
463 sfsp->f_bsize, /* On UFS/FFS systems this is
464 * also called the "optimal
465 * transfer block size" but it
466 * is of course the file
467 * system's block size too.
468 */
469 sfsp->f_frsize); /* not so surprisingly the
470 * "fundamental file system
471 * block size" is the frag
472 * size.
473 */
474 (void)printf("%10" PRId64 " total blocks %10" PRId64
475 " free blocks %10" PRId64 " available\n",
476 (uint64_t)sfsp->f_blocks, (uint64_t)sfsp->f_bfree,
477 (uint64_t)sfsp->f_bavail);
478 (void)printf("%10" PRId64 " total files %10" PRId64
479 " free files %12lx filesys id\n",
480 (uint64_t)sfsp->f_ffree, (uint64_t)sfsp->f_files,
481 sfsp->f_fsid);
482 (void)printf("%10s fstype %#15lx flag %17ld filename "
483 "length\n", sfsp->f_fstypename, sfsp->f_flag,
484 sfsp->f_namemax);
485 (void)printf("%10lu owner %17" PRId64 " syncwrites %12" PRId64
486 " asyncwrites\n\n", (unsigned long)sfsp->f_owner,
487 sfsp->f_syncwrites, sfsp->f_asyncwrites);
488
489 /*
490 * a concession by the structured programming police to the
491 * indentation police....
492 */
493 return;
494 }
495 if (maxwidth < 12)
496 maxwidth = 12;
497 if (++timesthrough == 1) {
498 switch (blocksize = usize) {
499 case 512:
500 header = "512-blocks";
501 headerlen = (int)strlen(header);
502 break;
503 case 1024:
504 header = Pflag ? "1024-blocks" : "1K-blocks";
505 headerlen = (int)strlen(header);
506 break;
507 case 1024 * 1024:
508 header = "1M-blocks";
509 headerlen = (int)strlen(header);
510 break;
511 case 1024 * 1024 * 1024:
512 header = "1G-blocks";
513 headerlen = (int)strlen(header);
514 break;
515 default:
516 if (hflag) {
517 header = "Size";
518 headerlen = (int)strlen(header);
519 blksize_width = 6;
520 } else
521 header = getbsize(&headerlen, &blocksize);
522 break;
523 }
524
525 if (blocksize >= 1024 * 1024)
526 blksize_width -= 3;
527 if (blocksize >= 1024 * 1024 * 1024)
528 blksize_width -= 3;
529 if (blksize_width < headerlen)
530 blksize_width = headerlen;
531
532 if (Pflag) {
533 /*
534 * either:
535 * "Filesystem 1024-blocks Used Available Capacity Mounted on\n"
536 * or:
537 * "Filesystem 512-blocks Used Available Capacity Mounted on\n"
538 */
539 if (blocksize != 1024 && blocksize != 512)
540 errx(EXIT_FAILURE,
541 "non-standard block size incompatible with -P");
542 (void)printf("Filesystem %s Used Available Capacity "
543 "Mounted on\n", header);
544 } else if (!Nflag) {
545 (void)printf("%-*.*s %*s %*s %*s %%Cap",
546 maxwidth, maxwidth, "Filesystem",
547 blksize_width, header,
548 blksize_width, "Used",
549 blksize_width, "Avail");
550 if (iflag) {
551 (void)printf(" %*s %*s %%iCap",
552 WIDTH_INODE, "iUsed",
553 WIDTH_INODE, "iAvail");
554 }
555 (void)printf(" Mounted on\n");
556 }
557 }
558 used = sfsp->f_blocks - sfsp->f_bfree;
559 bavail = sfsp->f_bfree - sfsp->f_bresvd;
560 availblks = bavail + used;
561 if (Pflag) {
562 assert(hflag == 0);
563 assert(blocksize > 0);
564 /*
565 * "%s %d %d %d %s %s\n", <file system name>, <total space>,
566 * <space used>, <space free>, <percentage used>,
567 * <file system root>
568 */
569 (void)printf("%s %" PRId64 " %" PRId64 " %" PRId64 " %s%% %s\n",
570 mntfromname,
571 fsbtoblk(sfsp->f_blocks, sfsp->f_frsize, blocksize),
572 fsbtoblk(used, sfsp->f_frsize, blocksize),
573 fsbtoblk(bavail, sfsp->f_frsize, blocksize),
574 availblks == 0 ? full : strspct(pb, sizeof(pb), used,
575 availblks, 0), sfsp->f_mntonname);
576 /*
577 * another concession by the structured programming police to
578 * the indentation police....
579 *
580 * Note iflag cannot be set when Pflag is set.
581 */
582 return;
583 }
584
585 if (fflag) {
586 if (iflag)
587 (void)printf("%jd", sfsp->f_ffree);
588 else if (hflag)
589 prthumanval(bavail * sfsp->f_frsize, 1);
590 else
591 (void)printf("%jd", fsbtoblk(bavail,
592 sfsp->f_frsize, blocksize));
593
594 if (mntcount != 1)
595 (void)printf(" %s\n", sfsp->f_mntonname);
596 else
597 (void)printf("\n");
598 return;
599 }
600
601 (void)printf("%-*.*s ", maxwidth, maxwidth, mntfromname);
602
603 if (hflag)
604 prthuman(sfsp, used, bavail);
605 else
606 (void)printf("%*" PRId64 " %*" PRId64 " %*" PRId64,
607 blksize_width,
608 fsbtoblk(sfsp->f_blocks, sfsp->f_frsize, blocksize),
609 blksize_width, fsbtoblk(used, sfsp->f_frsize, blocksize),
610 blksize_width, fsbtoblk(bavail, sfsp->f_frsize, blocksize));
611 (void)printf(" %3s%%",
612 availblks == 0 ? full :
613 strspct(pb, sizeof(pb), used, availblks, 0));
614 if (iflag) {
615 inodes = sfsp->f_files;
616 used = inodes - sfsp->f_ffree;
617 (void)printf(" %*jd %*jd %4s%%",
618 WIDTH_INODE, (intmax_t)used,
619 WIDTH_INODE, (intmax_t)sfsp->f_ffree,
620 inodes == 0 ? (used == 0 ? empty : full) :
621 strspct(pb, sizeof(pb), used, inodes, 0));
622 }
623 (void)printf(" %s\n", sfsp->f_mntonname);
624 }
625
626 static void
627 usage(void)
628 {
629
630 (void)fprintf(stderr,
631 "Usage: %s [-aclnW] [-G|-bkP|-bfgHhikmN] [-t type] [file | "
632 "file_system]...\n",
633 getprogname());
634 exit(1);
635 /* NOTREACHED */
636 }
637