1 /* stat.c -- display file or file system status
2 Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007 Free Software Foundation.
4 This program is free software; you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation; either version 2, or (at your option)
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
14 You should have received a copy of the GNU General Public License
15 along with this program; if not, write to the Free Software Foundation,
16 Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
18 Written by Michael Meskes. */
22 /* Keep this conditional in sync with the similar conditional in
23 ../m4/stat-prog.m4. */
25 && (HAVE_STRUCT_STATVFS_F_BASETYPE || HAVE_STRUCT_STATVFS_F_FSTYPENAME \
26 || (! HAVE_STRUCT_STATFS_F_FSTYPENAME && HAVE_STRUCT_STATVFS_F_TYPE)))
27 # define USE_STATVFS 1
29 # define USE_STATVFS 0
34 #include <sys/types.h>
38 # include <sys/statvfs.h>
41 #elif HAVE_SYS_MOUNT_H && HAVE_SYS_PARAM_H
42 /* NOTE: freebsd5.0 needs sys/param.h and sys/mount.h for statfs.
43 It does have statvfs.h, but shouldn't use it, since it doesn't
44 HAVE_STRUCT_STATVFS_F_BASETYPE. So find a clean way to fix it. */
45 /* NetBSD 1.5.2 needs these, for the declaration of struct statfs. */
46 # include <sys/param.h>
47 # include <sys/mount.h>
48 # if HAVE_NETINET_IN_H && HAVE_NFS_NFS_CLNT_H && HAVE_NFS_VFS_H
49 /* Ultrix 4.4 needs these for the declaration of struct statfs. */
50 # include <netinet/in.h>
51 # include <nfs/nfs_clnt.h>
54 #elif HAVE_OS_H /* BeOS */
62 #include "file-type.h"
68 #include "stat-time.h"
70 #include "xreadlink.h"
72 #define alignof(type) offsetof (struct { char c; type x; }, x)
75 # define STRUCT_STATVFS struct statvfs
76 # define STRUCT_STATXFS_F_FSID_IS_INTEGER STRUCT_STATVFS_F_FSID_IS_INTEGER
77 # define HAVE_STRUCT_STATXFS_F_TYPE HAVE_STRUCT_STATVFS_F_TYPE
78 # if HAVE_STRUCT_STATVFS_F_NAMEMAX
79 # define SB_F_NAMEMAX(S) ((S)->f_namemax)
81 # define STATFS statvfs
82 # define STATFS_FRSIZE(S) ((S)->f_frsize)
84 # define HAVE_STRUCT_STATXFS_F_TYPE HAVE_STRUCT_STATFS_F_TYPE
85 # if HAVE_STRUCT_STATFS_F_NAMELEN
86 # define SB_F_NAMEMAX(S) ((S)->f_namelen)
88 # define STATFS statfs
89 # if HAVE_OS_H /* BeOS */
90 /* BeOS has a statvfs function, but it does not return sensible values
91 for f_files, f_ffree and f_favail, and lacks f_type, f_basetype and
92 f_fstypename. Use 'struct fs_info' instead. */
94 statfs (char const *filename, struct fs_info *buf)
96 dev_t device = dev_for_path (filename);
99 errno = (device == B_ENTRY_NOT_FOUND ? ENOENT
100 : device == B_BAD_VALUE ? EINVAL
101 : device == B_NAME_TOO_LONG ? ENAMETOOLONG
102 : device == B_NO_MEMORY ? ENOMEM
103 : device == B_FILE_ERROR ? EIO
107 /* If successful, buf->dev will be == device. */
108 return fs_stat_dev (device, buf);
111 # define f_blocks total_blocks
112 # define f_bfree free_blocks
113 # define f_bavail free_blocks
114 # define f_bsize io_size
115 # define f_files total_nodes
116 # define f_ffree free_nodes
117 # define STRUCT_STATVFS struct fs_info
118 # define STRUCT_STATXFS_F_FSID_IS_INTEGER true
119 # define STATFS_FRSIZE(S) ((S)->block_size)
121 # define STRUCT_STATVFS struct statfs
122 # define STRUCT_STATXFS_F_FSID_IS_INTEGER STRUCT_STATFS_F_FSID_IS_INTEGER
123 # define STATFS_FRSIZE(S) 0
128 # define OUT_NAMEMAX out_uint
130 /* NetBSD 1.5.2 has neither f_namemax nor f_namelen. */
131 # define SB_F_NAMEMAX(S) "*"
132 # define OUT_NAMEMAX out_string
135 #if HAVE_STRUCT_STATVFS_F_BASETYPE
136 # define STATXFS_FILE_SYSTEM_TYPE_MEMBER_NAME f_basetype
138 # if HAVE_STRUCT_STATVFS_F_FSTYPENAME || HAVE_STRUCT_STATFS_F_FSTYPENAME
139 # define STATXFS_FILE_SYSTEM_TYPE_MEMBER_NAME f_fstypename
140 # elif HAVE_OS_H /* BeOS */
141 # define STATXFS_FILE_SYSTEM_TYPE_MEMBER_NAME fsh_name
145 /* FIXME: these are used by printf.c, too */
146 #define isodigit(c) ('0' <= (c) && (c) <= '7')
147 #define octtobin(c) ((c) - '0')
148 #define hextobin(c) ((c) >= 'a' && (c) <= 'f' ? (c) - 'a' + 10 : \
149 (c) >= 'A' && (c) <= 'F' ? (c) - 'A' + 10 : (c) - '0')
151 #define PROGRAM_NAME "stat"
153 #define AUTHORS "Michael Meskes"
157 PRINTF_OPTION = CHAR_MAX + 1
160 static struct option const long_options[] = {
161 {"dereference", no_argument, NULL, 'L'},
162 {"file-system", no_argument, NULL, 'f'},
163 {"filesystem", no_argument, NULL, 'f'}, /* obsolete and undocumented alias */
164 {"format", required_argument, NULL, 'c'},
165 {"printf", required_argument, NULL, PRINTF_OPTION},
166 {"terse", no_argument, NULL, 't'},
167 {GETOPT_HELP_OPTION_DECL},
168 {GETOPT_VERSION_OPTION_DECL},
174 /* Whether to interpret backslash-escape sequences.
175 True for --printf=FMT, not for --format=FMT (-c). */
176 static bool interpret_backslash_escapes;
178 /* The trailing delimiter string:
179 "" for --printf=FMT, "\n" for --format=FMT (-c). */
180 static char const *trailing_delim = "";
182 /* Return the type of the specified file system.
183 Some systems have statfvs.f_basetype[FSTYPSZ] (AIX, HP-UX, and Solaris).
184 Others have statvfs.f_fstypename[_VFS_NAMELEN] (NetBSD 3.0).
185 Others have statfs.f_fstypename[MFSNAMELEN] (NetBSD 1.5.2).
186 Still others have neither and have to get by with f_type (Linux).
187 But f_type may only exist in statfs (Cygwin). */
189 human_fstype (STRUCT_STATVFS const *statfsbuf)
191 #ifdef STATXFS_FILE_SYSTEM_TYPE_MEMBER_NAME
192 return statfsbuf->STATXFS_FILE_SYSTEM_TYPE_MEMBER_NAME;
194 switch (statfsbuf->f_type)
196 # if defined __linux__
198 /* IMPORTANT NOTE: Each of the following `case S_MAGIC_...:'
199 statements must be followed by a hexadecimal constant in
200 a comment. The S_MAGIC_... name and constant are automatically
201 combined to produce the #define directives in fs.h. */
203 case S_MAGIC_AFFS: /* 0xADFF */
205 case S_MAGIC_DEVPTS: /* 0x1CD1 */
207 case S_MAGIC_EXT: /* 0x137D */
209 case S_MAGIC_EXT2_OLD: /* 0xEF51 */
211 case S_MAGIC_EXT2: /* 0xEF53 */
213 case S_MAGIC_JFS: /* 0x3153464a */
215 case S_MAGIC_XFS: /* 0x58465342 */
217 case S_MAGIC_HPFS: /* 0xF995E849 */
219 case S_MAGIC_ISOFS: /* 0x9660 */
221 case S_MAGIC_ISOFS_WIN: /* 0x4000 */
223 case S_MAGIC_ISOFS_R_WIN: /* 0x4004 */
225 case S_MAGIC_MINIX: /* 0x137F */
227 case S_MAGIC_MINIX_30: /* 0x138F */
228 return "minix (30 char.)";
229 case S_MAGIC_MINIX_V2: /* 0x2468 */
231 case S_MAGIC_MINIX_V2_30: /* 0x2478 */
232 return "minix v2 (30 char.)";
233 case S_MAGIC_MSDOS: /* 0x4d44 */
235 case S_MAGIC_FAT: /* 0x4006 */
237 case S_MAGIC_NCP: /* 0x564c */
239 case S_MAGIC_NFS: /* 0x6969 */
241 case S_MAGIC_PROC: /* 0x9fa0 */
243 case S_MAGIC_SMB: /* 0x517B */
245 case S_MAGIC_XENIX: /* 0x012FF7B4 */
247 case S_MAGIC_SYSV4: /* 0x012FF7B5 */
249 case S_MAGIC_SYSV2: /* 0x012FF7B6 */
251 case S_MAGIC_COH: /* 0x012FF7B7 */
253 case S_MAGIC_UFS: /* 0x00011954 */
255 case S_MAGIC_XIAFS: /* 0x012FD16D */
257 case S_MAGIC_NTFS: /* 0x5346544e */
259 case S_MAGIC_TMPFS: /* 0x1021994 */
261 case S_MAGIC_REISERFS: /* 0x52654973 */
263 case S_MAGIC_CRAMFS: /* 0x28cd3d45 */
265 case S_MAGIC_ROMFS: /* 0x7275 */
267 case S_MAGIC_RAMFS: /* 0x858458f6 */
269 case S_MAGIC_SQUASHFS: /* 0x73717368 */
271 case S_MAGIC_SYSFS: /* 0x62656572 */
331 unsigned long int type = statfsbuf->f_type;
332 static char buf[sizeof "UNKNOWN (0x%lx)" - 3
333 + (sizeof type * CHAR_BIT + 3) / 4];
334 sprintf (buf, "UNKNOWN (0x%lx)", type);
342 human_access (struct stat const *statbuf)
344 static char modebuf[12];
345 filemodestring (statbuf, modebuf);
351 human_time (struct timespec t)
353 static char str[MAX (INT_BUFSIZE_BOUND (intmax_t),
354 (INT_STRLEN_BOUND (int) /* YYYY */
355 + 1 /* because YYYY might equal INT_MAX + 1900 */
356 + sizeof "-MM-DD HH:MM:SS.NNNNNNNNN +ZZZZ"))];
357 struct tm const *tm = localtime (&t.tv_sec);
359 return (TYPE_SIGNED (time_t)
360 ? imaxtostr (t.tv_sec, str)
361 : umaxtostr (t.tv_sec, str));
362 nstrftime (str, sizeof str, "%Y-%m-%d %H:%M:%S.%N %z", tm, 0, t.tv_nsec);
367 out_string (char *pformat, size_t prefix_len, char const *arg)
369 strcpy (pformat + prefix_len, "s");
370 printf (pformat, arg);
373 out_int (char *pformat, size_t prefix_len, intmax_t arg)
375 strcpy (pformat + prefix_len, PRIdMAX);
376 printf (pformat, arg);
379 out_uint (char *pformat, size_t prefix_len, uintmax_t arg)
381 strcpy (pformat + prefix_len, PRIuMAX);
382 printf (pformat, arg);
385 out_uint_o (char *pformat, size_t prefix_len, uintmax_t arg)
387 strcpy (pformat + prefix_len, PRIoMAX);
388 printf (pformat, arg);
391 out_uint_x (char *pformat, size_t prefix_len, uintmax_t arg)
393 strcpy (pformat + prefix_len, PRIxMAX);
394 printf (pformat, arg);
397 /* print statfs info */
399 print_statfs (char *pformat, size_t prefix_len, char m, char const *filename,
402 STRUCT_STATVFS const *statfsbuf = data;
407 out_string (pformat, prefix_len, filename);
412 #if STRUCT_STATXFS_F_FSID_IS_INTEGER
413 uintmax_t fsid = statfsbuf->f_fsid;
415 typedef unsigned int fsid_word;
416 verify (alignof (STRUCT_STATVFS) % alignof (fsid_word) == 0);
417 verify (offsetof (STRUCT_STATVFS, f_fsid) % alignof (fsid_word) == 0);
418 verify (sizeof statfsbuf->f_fsid % alignof (fsid_word) == 0);
419 fsid_word const *p = (fsid_word *) &statfsbuf->f_fsid;
421 /* Assume a little-endian word order, as that is compatible
422 with glibc's statvfs implementation. */
424 int words = sizeof statfsbuf->f_fsid / sizeof *p;
426 for (i = 0; i < words && i * sizeof *p < sizeof fsid; i++)
428 uintmax_t u = p[words - 1 - i];
429 fsid |= u << (i * CHAR_BIT * sizeof *p);
432 out_uint_x (pformat, prefix_len, fsid);
437 OUT_NAMEMAX (pformat, prefix_len, SB_F_NAMEMAX (statfsbuf));
440 #if HAVE_STRUCT_STATXFS_F_TYPE
441 out_uint_x (pformat, prefix_len, statfsbuf->f_type);
447 out_string (pformat, prefix_len, human_fstype (statfsbuf));
450 out_int (pformat, prefix_len, statfsbuf->f_blocks);
453 out_int (pformat, prefix_len, statfsbuf->f_bfree);
456 out_int (pformat, prefix_len, statfsbuf->f_bavail);
459 out_uint (pformat, prefix_len, statfsbuf->f_bsize);
463 uintmax_t frsize = STATFS_FRSIZE (statfsbuf);
465 frsize = statfsbuf->f_bsize;
466 out_uint (pformat, prefix_len, frsize);
470 out_int (pformat, prefix_len, statfsbuf->f_files);
473 out_int (pformat, prefix_len, statfsbuf->f_ffree);
482 /* print stat info */
484 print_stat (char *pformat, size_t prefix_len, char m,
485 char const *filename, void const *data)
487 struct stat *statbuf = (struct stat *) data;
488 struct passwd *pw_ent;
489 struct group *gw_ent;
494 out_string (pformat, prefix_len, filename);
497 out_string (pformat, prefix_len, quote (filename));
498 if (S_ISLNK (statbuf->st_mode))
500 char *linkname = xreadlink_with_size (filename, statbuf->st_size);
501 if (linkname == NULL)
503 error (0, errno, _("cannot read symbolic link %s"),
508 out_string (pformat, prefix_len, quote (linkname));
512 out_uint (pformat, prefix_len, statbuf->st_dev);
515 out_uint_x (pformat, prefix_len, statbuf->st_dev);
518 out_uint (pformat, prefix_len, statbuf->st_ino);
521 out_uint_o (pformat, prefix_len, statbuf->st_mode & CHMOD_MODE_BITS);
524 out_string (pformat, prefix_len, human_access (statbuf));
527 out_uint_x (pformat, prefix_len, statbuf->st_mode);
530 out_string (pformat, prefix_len, file_type (statbuf));
533 out_uint (pformat, prefix_len, statbuf->st_nlink);
536 out_uint (pformat, prefix_len, statbuf->st_uid);
540 pw_ent = getpwuid (statbuf->st_uid);
541 out_string (pformat, prefix_len,
542 pw_ent ? pw_ent->pw_name : "UNKNOWN");
545 out_uint (pformat, prefix_len, statbuf->st_gid);
549 gw_ent = getgrgid (statbuf->st_gid);
550 out_string (pformat, prefix_len,
551 gw_ent ? gw_ent->gr_name : "UNKNOWN");
554 out_uint_x (pformat, prefix_len, major (statbuf->st_rdev));
557 out_uint_x (pformat, prefix_len, minor (statbuf->st_rdev));
560 out_uint (pformat, prefix_len, statbuf->st_size);
563 out_uint (pformat, prefix_len, ST_NBLOCKSIZE);
566 out_uint (pformat, prefix_len, ST_NBLOCKS (*statbuf));
569 out_uint (pformat, prefix_len, statbuf->st_blksize);
572 out_string (pformat, prefix_len, human_time (get_stat_atime (statbuf)));
575 if (TYPE_SIGNED (time_t))
576 out_int (pformat, prefix_len, statbuf->st_atime);
578 out_uint (pformat, prefix_len, statbuf->st_atime);
581 out_string (pformat, prefix_len, human_time (get_stat_mtime (statbuf)));
584 if (TYPE_SIGNED (time_t))
585 out_int (pformat, prefix_len, statbuf->st_mtime);
587 out_uint (pformat, prefix_len, statbuf->st_mtime);
590 out_string (pformat, prefix_len, human_time (get_stat_ctime (statbuf)));
593 if (TYPE_SIGNED (time_t))
594 out_int (pformat, prefix_len, statbuf->st_ctime);
596 out_uint (pformat, prefix_len, statbuf->st_ctime);
604 /* Output a single-character \ escape. */
607 print_esc_char (char c)
611 case 'a': /* Alert. */
614 case 'b': /* Backspace. */
617 case 'f': /* Form feed. */
620 case 'n': /* New line. */
623 case 'r': /* Carriage return. */
626 case 't': /* Horizontal tab. */
629 case 'v': /* Vertical tab. */
636 error (0, 0, _("warning: unrecognized escape `\\%c'"), c);
643 print_it (char const *format, char const *filename,
644 void (*print_func) (char *, size_t, char, char const *, void const *),
647 /* Add 2 to accommodate our conversion of the stat `%s' format string
648 to the longer printf `%llu' one. */
651 MAX_ADDITIONAL_BYTES =
652 (MAX (sizeof PRIdMAX,
653 MAX (sizeof PRIoMAX, MAX (sizeof PRIuMAX, sizeof PRIxMAX)))
656 size_t n_alloc = strlen (format) + MAX_ADDITIONAL_BYTES + 1;
657 char *dest = xmalloc (n_alloc);
659 for (b = format; *b; b++)
665 size_t len = strspn (b + 1, "#-+.I 0123456789");
666 char const *fmt_char = b + len + 1;
667 memcpy (dest, b, len + 1);
678 dest[len + 1] = *fmt_char;
679 dest[len + 2] = '\0';
680 error (EXIT_FAILURE, 0, _("%s: invalid directive"),
681 quotearg_colon (dest));
686 print_func (dest, len + 1, *fmt_char, filename, data);
693 if ( ! interpret_backslash_escapes)
701 int esc_value = octtobin (*b);
702 int esc_length = 1; /* number of octal digits */
703 for (++b; esc_length < 3 && isodigit (*b);
706 esc_value = esc_value * 8 + octtobin (*b);
711 else if (*b == 'x' && isxdigit (to_uchar (b[1])))
713 int esc_value = hextobin (b[1]); /* Value of \xhh escape. */
714 /* A hexadecimal \xhh escape sequence must have
715 1 or 2 hex. digits. */
717 if (isxdigit (to_uchar (b[1])))
720 esc_value = esc_value * 16 + hextobin (*b);
726 error (0, 0, _("warning: backslash at end of format"));
728 /* Arrange to exit the loop. */
744 fputs (trailing_delim, stdout);
747 /* Stat the file system and print what we find. */
749 do_statfs (char const *filename, bool terse, char const *format)
751 STRUCT_STATVFS statfsbuf;
753 if (STATFS (filename, &statfsbuf) != 0)
755 error (0, errno, _("cannot read file system information for %s"),
763 ? "%n %i %l %t %s %S %b %f %a %c %d\n"
765 " ID: %-8i Namelen: %-7l Type: %T\n"
766 "Block size: %-10s Fundamental block size: %S\n"
767 "Blocks: Total: %-10b Free: %-10f Available: %a\n"
768 "Inodes: Total: %-10c Free: %d\n");
771 print_it (format, filename, print_statfs, &statfsbuf);
775 /* stat the file and print what we find */
777 do_stat (char const *filename, bool follow_links, bool terse,
782 if ((follow_links ? stat : lstat) (filename, &statbuf) != 0)
784 error (0, errno, _("cannot stat %s"), quote (filename));
792 format = "%n %s %b %f %u %g %D %i %h %t %T %X %Y %Z %o\n";
796 /* Temporary hack to match original output until conditional
798 if (S_ISBLK (statbuf.st_mode) || S_ISCHR (statbuf.st_mode))
802 " Size: %-10s\tBlocks: %-10b IO Block: %-6o %F\n"
803 "Device: %Dh/%dd\tInode: %-10i Links: %-5h"
804 " Device type: %t,%T\n"
805 "Access: (%04a/%10.10A) Uid: (%5u/%8U) Gid: (%5g/%8G)\n"
806 "Access: %x\n" "Modify: %y\n" "Change: %z\n";
812 " Size: %-10s\tBlocks: %-10b IO Block: %-6o %F\n"
813 "Device: %Dh/%dd\tInode: %-10i Links: %h\n"
814 "Access: (%04a/%10.10A) Uid: (%5u/%8U) Gid: (%5g/%8G)\n"
815 "Access: %x\n" "Modify: %y\n" "Change: %z\n";
819 print_it (format, filename, print_stat, &statbuf);
826 if (status != EXIT_SUCCESS)
827 fprintf (stderr, _("Try `%s --help' for more information.\n"),
831 printf (_("Usage: %s [OPTION] FILE...\n"), program_name);
833 Display file or file system status.\n\
835 -L, --dereference follow links\n\
836 -f, --file-system display file system status instead of file status\n\
839 -c --format=FORMAT use the specified FORMAT instead of the default;\n\
840 output a newline after each use of FORMAT\n\
841 --printf=FORMAT like --format, but interpret backslash escapes,\n\
842 and do not output a mandatory trailing newline.\n\
843 If you want a newline, include \\n in FORMAT.\n\
844 -t, --terse print the information in terse form\n\
846 fputs (HELP_OPTION_DESCRIPTION, stdout);
847 fputs (VERSION_OPTION_DESCRIPTION, stdout);
850 The valid format sequences for files (without --file-system):\n\
852 %a Access rights in octal\n\
853 %A Access rights in human readable form\n\
854 %b Number of blocks allocated (see %B)\n\
855 %B The size in bytes of each block reported by %b\n\
858 %d Device number in decimal\n\
859 %D Device number in hex\n\
860 %f Raw mode in hex\n\
862 %g Group ID of owner\n\
863 %G Group name of owner\n\
866 %h Number of hard links\n\
869 %N Quoted file name with dereference if symbolic link\n\
871 %s Total size, in bytes\n\
872 %t Major device type in hex\n\
873 %T Minor device type in hex\n\
876 %u User ID of owner\n\
877 %U User name of owner\n\
878 %x Time of last access\n\
879 %X Time of last access as seconds since Epoch\n\
880 %y Time of last modification\n\
881 %Y Time of last modification as seconds since Epoch\n\
882 %z Time of last change\n\
883 %Z Time of last change as seconds since Epoch\n\
888 Valid format sequences for file systems:\n\
890 %a Free blocks available to non-superuser\n\
891 %b Total data blocks in file system\n\
892 %c Total file nodes in file system\n\
893 %d Free file nodes in file system\n\
894 %f Free blocks in file system\n\
897 %i File System ID in hex\n\
898 %l Maximum length of filenames\n\
900 %s Block size (for faster transfers)\n\
901 %S Fundamental block size (for block counts)\n\
903 %T Type in human readable form\n\
905 printf (USAGE_BUILTIN_WARNING, PROGRAM_NAME);
906 printf (_("\nReport bugs to <%s>.\n"), PACKAGE_BUGREPORT);
912 main (int argc, char *argv[])
916 bool follow_links = false;
922 initialize_main (&argc, &argv);
923 program_name = argv[0];
924 setlocale (LC_ALL, "");
925 bindtextdomain (PACKAGE, LOCALEDIR);
926 textdomain (PACKAGE);
928 atexit (close_stdout);
930 while ((c = getopt_long (argc, argv, "c:fLt", long_options, NULL)) != -1)
936 interpret_backslash_escapes = true;
942 interpret_backslash_escapes = false;
943 trailing_delim = "\n";
958 case_GETOPT_HELP_CHAR;
960 case_GETOPT_VERSION_CHAR (PROGRAM_NAME, AUTHORS);
963 usage (EXIT_FAILURE);
969 error (0, 0, _("missing operand"));
970 usage (EXIT_FAILURE);
973 for (i = optind; i < argc; i++)
975 ? do_statfs (argv[i], terse, format)
976 : do_stat (argv[i], follow_links, terse, format));
978 exit (ok ? EXIT_SUCCESS : EXIT_FAILURE);