coreutils/stat.c

   1 /* vi: set sw=4 ts=4: */
   2 /*
   3  * stat -- display file or file system status
   4  *
   5  * Copyright (C) 2001, 2002, 2003, 2004, 2005 Free Software Foundation.
   6  * Copyright (C) 2005 by Erik Andersen <andersen@codepoet.org>
   7  * Copyright (C) 2005 by Mike Frysinger <vapier@gentoo.org>
   8  * Copyright (C) 2006 by Yoshinori Sato <ysato@users.sourceforge.jp>
   9  *
  10  * Written by Michael Meskes
  11  * Taken from coreutils and turned into a busybox applet by Mike Frysinger
  12  *
  13  * Licensed under GPLv2 or later, see file LICENSE in this source tree.
  14  */
  15 //config:config STAT
  16 //config:       bool "stat (11 kb)"
  17 //config:       default y
  18 //config:       help
  19 //config:       display file or filesystem status.
  20 //config:
  21 //config:config FEATURE_STAT_FORMAT
  22 //config:       bool "Enable custom formats (-c)"
  23 //config:       default y
  24 //config:       depends on STAT
  25 //config:       help
  26 //config:       Without this, stat will not support the '-c format' option where
  27 //config:       users can pass a custom format string for output. This adds about
  28 //config:       7k to a nonstatic build on amd64.
  29 //config:
  30 //config:config FEATURE_STAT_FILESYSTEM
  31 //config:       bool "Enable display of filesystem status (-f)"
  32 //config:       default y
  33 //config:       depends on STAT
  34 //config:       select PLATFORM_LINUX # statfs()
  35 //config:       help
  36 //config:       Without this, stat will not support the '-f' option to display
  37 //config:       information about filesystem status.
  38
  39 //applet:IF_STAT(APPLET_NOEXEC(stat, stat, BB_DIR_BIN, BB_SUID_DROP, stat))
  40
  41 //kbuild:lib-$(CONFIG_STAT) += stat.o
  42
  43 //usage:#define stat_trivial_usage
  44 //usage:       "[OPTIONS] FILE..."
  45 //usage:#define stat_full_usage "\n\n"
  46 //usage:       "Display file"
  47 //usage:            IF_FEATURE_STAT_FILESYSTEM(" (default) or filesystem")
  48 //usage:            " status\n"
  49 //usage:        IF_FEATURE_STAT_FORMAT(
  50 //usage:     "\n        -c FMT  Use the specified format"
  51 //usage:        )
  52 //usage:        IF_FEATURE_STAT_FILESYSTEM(
  53 //usage:     "\n        -f      Display filesystem status"
  54 //usage:        )
  55 //usage:     "\n        -L      Follow links"
  56 //usage:     "\n        -t      Terse display"
  57 //usage:        IF_SELINUX(
  58 //usage:     "\n        -Z      Print security context"
  59 //usage:        )
  60 //usage:        IF_FEATURE_STAT_FORMAT(
  61 //usage:       "\n\nFMT sequences"IF_FEATURE_STAT_FILESYSTEM(" for files")":\n"
  62 //usage:       " %a     Access rights in octal\n"
  63 //usage:       " %A     Access rights in human readable form\n"
  64 //usage:       " %b     Number of blocks allocated (see %B)\n"
  65 //usage:       " %B     Size in bytes of each block reported by %b\n"
  66 //usage:       " %d     Device number in decimal\n"
  67 //usage:       " %D     Device number in hex\n"
  68 //usage:       " %f     Raw mode in hex\n"
  69 //usage:       " %F     File type\n"
  70 //usage:       " %g     Group ID\n"
  71 //usage:       " %G     Group name\n"
  72 //usage:       " %h     Number of hard links\n"
  73 //usage:       " %i     Inode number\n"
  74 //usage:       " %n     File name\n"
  75 //usage:       " %N     File name, with -> TARGET if symlink\n"
  76 //usage:       " %o     I/O block size\n"
  77 //usage:       " %s     Total size in bytes\n"
  78 //usage:       " %t     Major device type in hex\n"
  79 //usage:       " %T     Minor device type in hex\n"
  80 //usage:       " %u     User ID\n"
  81 //usage:       " %U     User name\n"
  82 //usage:       " %x     Time of last access\n"
  83 //usage:       " %X     Time of last access as seconds since Epoch\n"
  84 //usage:       " %y     Time of last modification\n"
  85 //usage:       " %Y     Time of last modification as seconds since Epoch\n"
  86 //usage:       " %z     Time of last change\n"
  87 //usage:       " %Z     Time of last change as seconds since Epoch\n"
  88 //usage:        IF_FEATURE_STAT_FILESYSTEM(
  89 //usage:       "\nFMT sequences for file systems:\n"
  90 //usage:       " %a     Free blocks available to non-superuser\n"
  91 //usage:       " %b     Total data blocks\n"
  92 //usage:       " %c     Total file nodes\n"
  93 //usage:       " %d     Free file nodes\n"
  94 //usage:       " %f     Free blocks\n"
  95 //usage:        IF_SELINUX(
  96 //usage:       " %C     Security context in selinux\n"
  97 //usage:        )
  98 //usage:       " %i     File System ID in hex\n"
  99 //usage:       " %l     Maximum length of filenames\n"
 100 //usage:       " %n     File name\n"
 101 //usage:       " %s     Block size (for faster transfer)\n"
 102 //usage:       " %S     Fundamental block size (for block counts)\n"
 103 //usage:       " %t     Type in hex\n"
 104 //usage:       " %T     Type in human readable form"
 105 //usage:        )
 106 //usage:        )
 107
 108 #include "libbb.h"
 109 #include "common_bufsiz.h"
 110
 111 enum {
 112         OPT_TERSE       = (1 << 0),
 113         OPT_DEREFERENCE = (1 << 1),
 114         OPT_FILESYS     = (1 << 2) * ENABLE_FEATURE_STAT_FILESYSTEM,
 115         OPT_SELINUX     = (1 << (2+ENABLE_FEATURE_STAT_FILESYSTEM)) * ENABLE_SELINUX,
 116 };
 117
 118 #if ENABLE_FEATURE_STAT_FORMAT
 119 typedef bool (*statfunc_ptr)(const char *, const char *);
 120 #else
 121 typedef bool (*statfunc_ptr)(const char *);
 122 #endif
 123
 124 static const char *file_type(const struct stat *st)
 125 {
 126         /* See POSIX 1003.1-2001 XCU Table 4-8 lines 17093-17107
 127          * for some of these formats.
 128          * To keep diagnostics grammatical in English, the
 129          * returned string must start with a consonant.
 130          */
 131         if (S_ISREG(st->st_mode))  return st->st_size == 0 ? "regular empty file" : "regular file";
 132         if (S_ISDIR(st->st_mode))  return "directory";
 133         if (S_ISBLK(st->st_mode))  return "block special file";
 134         if (S_ISCHR(st->st_mode))  return "character special file";
 135         if (S_ISFIFO(st->st_mode)) return "fifo";
 136         if (S_ISLNK(st->st_mode))  return "symbolic link";
 137         if (S_ISSOCK(st->st_mode)) return "socket";
 138 #ifdef S_TYPEISMQ
 139         if (S_TYPEISMQ(st))        return "message queue";
 140 #endif
 141 #ifdef S_TYPEISSEM
 142         if (S_TYPEISSEM(st))       return "semaphore";
 143 #endif
 144 #ifdef S_TYPEISSHM
 145         if (S_TYPEISSHM(st))       return "shared memory object";
 146 #endif
 147 #ifdef S_TYPEISTMO
 148         if (S_TYPEISTMO(st))       return "typed memory object";
 149 #endif
 150         return "weird file";
 151 }
 152
 153 static const char *human_time(struct timespec *ts)
 154 {
 155         char fmt[sizeof("%Y-%m-%d %H:%M:%S.123456789 %z") + /*paranoia*/ 8];
 156
 157         /* coreutils 6.3 compat */
 158 #define buf bb_common_bufsiz1
 159         setup_common_bufsiz();
 160
 161         sprintf(stpcpy(fmt, "%Y-%m-%d %H:%M:%S"), ".%09u %%z", (unsigned)ts->tv_nsec);
 162         strftime(buf, COMMON_BUFSIZE, fmt, localtime(&ts->tv_sec));
 163         return buf;
 164 #undef buf
 165 }
 166
 167 #if ENABLE_FEATURE_STAT_FILESYSTEM
 168 #define FS_TYPE_LIST \
 169 FS_TYPE(0xADFF,     "affs") \
 170 FS_TYPE(0x1CD1,     "devpts") \
 171 FS_TYPE(0x137D,     "ext") \
 172 FS_TYPE(0xEF51,     "ext2") \
 173 FS_TYPE(0xEF53,     "ext2/ext3") \
 174 FS_TYPE(0x3153464a, "jfs") \
 175 FS_TYPE(0x58465342, "xfs") \
 176 FS_TYPE(0xF995E849, "hpfs") \
 177 FS_TYPE(0x9660,     "isofs") \
 178 FS_TYPE(0x4000,     "isofs") \
 179 FS_TYPE(0x4004,     "isofs") \
 180 FS_TYPE(0x137F,     "minix") \
 181 FS_TYPE(0x138F,     "minix (30 char.)") \
 182 FS_TYPE(0x2468,     "minix v2") \
 183 FS_TYPE(0x2478,     "minix v2 (30 char.)") \
 184 FS_TYPE(0x4d44,     "msdos") \
 185 FS_TYPE(0x4006,     "fat") \
 186 FS_TYPE(0x564c,     "novell") \
 187 FS_TYPE(0x6969,     "nfs") \
 188 FS_TYPE(0x9fa0,     "proc") \
 189 FS_TYPE(0x517B,     "smb") \
 190 FS_TYPE(0x012FF7B4, "xenix") \
 191 FS_TYPE(0x012FF7B5, "sysv4") \
 192 FS_TYPE(0x012FF7B6, "sysv2") \
 193 FS_TYPE(0x012FF7B7, "coh") \
 194 FS_TYPE(0x00011954, "ufs") \
 195 FS_TYPE(0x012FD16D, "xia") \
 196 FS_TYPE(0x5346544e, "ntfs") \
 197 FS_TYPE(0x1021994,  "tmpfs") \
 198 FS_TYPE(0x52654973, "reiserfs") \
 199 FS_TYPE(0x28cd3d45, "cramfs") \
 200 FS_TYPE(0x7275,     "romfs") \
 201 FS_TYPE(0x858458f6, "ramfs") \
 202 FS_TYPE(0x73717368, "squashfs") \
 203 FS_TYPE(0x62656572, "sysfs")
 204 /* Return the type of the specified file system.
 205  * Some systems have statfvs.f_basetype[FSTYPSZ]. (AIX, HP-UX, and Solaris)
 206  * Others have statfs.f_fstypename[MFSNAMELEN]. (NetBSD 1.5.2)
 207  * Still others have neither and have to get by with f_type (Linux).
 208  */
 209 static const char *human_fstype(uint32_t f_type)
 210 {
 211 # define FS_TYPE(type, name) type,
 212         static const uint32_t fstype[] = {
 213                 FS_TYPE_LIST
 214         };
 215 # undef FS_TYPE
 216 # define FS_TYPE(type, name) name"\0"
 217         static const char humanname[] ALIGN1 =
 218                 FS_TYPE_LIST
 219                 "UNKNOWN";
 220 # undef FS_TYPE
 221         int i;
 222
 223         for (i = 0; i < ARRAY_SIZE(fstype); ++i)
 224                 if (fstype[i] == f_type)
 225                         break;
 226         return nth_string(humanname, i);
 227 }
 228
 229 /* "man statfs" says that statfsbuf->f_fsid is a mess */
 230 /* coreutils treats it as an array of ints, most significant first */
 231 static unsigned long long get_f_fsid(const struct statfs *statfsbuf)
 232 {
 233         const unsigned *p = (const void*) &statfsbuf->f_fsid;
 234         unsigned sz = sizeof(statfsbuf->f_fsid) / sizeof(unsigned);
 235         unsigned long long r = 0;
 236
 237         do
 238                 r = (r << (sizeof(unsigned)*8)) | *p++;
 239         while (--sz > 0);
 240         return r;
 241 }
 242 #endif  /* FEATURE_STAT_FILESYSTEM */
 243
 244 #if ENABLE_FEATURE_STAT_FORMAT
 245 static void strcatc(char *str, char c)
 246 {
 247         int len = strlen(str);
 248         str[len++] = c;
 249         str[len] = '\0';
 250 }
 251
 252 static void printfs(char *pformat, const char *msg)
 253 {
 254         strcatc(pformat, 's');
 255         printf(pformat, msg);
 256 }
 257
 258 #if ENABLE_FEATURE_STAT_FILESYSTEM
 259 /* print statfs info */
 260 static void FAST_FUNC print_statfs(char *pformat, const char m,
 261                 const char *const filename, const void *data
 262                 IF_SELINUX(, security_context_t scontext))
 263 {
 264         const struct statfs *statfsbuf = data;
 265         if (m == 'n') {
 266                 printfs(pformat, filename);
 267         } else if (m == 'i') {
 268                 strcat(pformat, "llx");
 269                 printf(pformat, get_f_fsid(statfsbuf));
 270         } else if (m == 'l') {
 271                 strcat(pformat, "lu");
 272                 printf(pformat, (unsigned long) statfsbuf->f_namelen);
 273         } else if (m == 't') {
 274                 strcat(pformat, "lx");
 275                 printf(pformat, (unsigned long) statfsbuf->f_type); /* no equiv */
 276         } else if (m == 'T') {
 277                 printfs(pformat, human_fstype(statfsbuf->f_type));
 278         } else if (m == 'b') {
 279                 strcat(pformat, "llu");
 280                 printf(pformat, (unsigned long long) statfsbuf->f_blocks);
 281         } else if (m == 'f') {
 282                 strcat(pformat, "llu");
 283                 printf(pformat, (unsigned long long) statfsbuf->f_bfree);
 284         } else if (m == 'a') {
 285                 strcat(pformat, "llu");
 286                 printf(pformat, (unsigned long long) statfsbuf->f_bavail);
 287         } else if (m == 's' || m == 'S') {
 288                 strcat(pformat, "lu");
 289                 printf(pformat, (unsigned long) statfsbuf->f_bsize);
 290         } else if (m == 'c') {
 291                 strcat(pformat, "llu");
 292                 printf(pformat, (unsigned long long) statfsbuf->f_files);
 293         } else if (m == 'd') {
 294                 strcat(pformat, "llu");
 295                 printf(pformat, (unsigned long long) statfsbuf->f_ffree);
 296 # if ENABLE_SELINUX
 297         } else if (m == 'C' && (option_mask32 & OPT_SELINUX)) {
 298                 printfs(pformat, scontext);
 299 # endif
 300         } else {
 301                 strcatc(pformat, 'c');
 302                 printf(pformat, m);
 303         }
 304 }
 305 #endif
 306
 307 /* print stat info */
 308 static void FAST_FUNC print_stat(char *pformat, const char m,
 309                 const char *const filename, const void *data
 310                 IF_SELINUX(, security_context_t scontext))
 311 {
 312 #define TYPE_SIGNED(t) (! ((t) 0 < (t) -1))
 313         struct stat *statbuf = (struct stat *) data;
 314         struct passwd *pw_ent;
 315         struct group *gw_ent;
 316
 317         if (m == 'n') {
 318                 printfs(pformat, filename);
 319         } else if (m == 'N') {
 320                 strcatc(pformat, 's');
 321                 if (S_ISLNK(statbuf->st_mode)) {
 322                         char *linkname = xmalloc_readlink_or_warn(filename);
 323                         if (linkname == NULL)
 324                                 return;
 325                         printf("'%s' -> '%s'", filename, linkname);
 326                         free(linkname);
 327                 } else {
 328                         printf(pformat, filename);
 329                 }
 330         } else if (m == 'd') {
 331                 strcat(pformat, "llu");
 332                 printf(pformat, (unsigned long long) statbuf->st_dev);
 333         } else if (m == 'D') {
 334                 strcat(pformat, "llx");
 335                 printf(pformat, (unsigned long long) statbuf->st_dev);
 336         } else if (m == 'i') {
 337                 strcat(pformat, "llu");
 338                 printf(pformat, (unsigned long long) statbuf->st_ino);
 339         } else if (m == 'a') {
 340                 strcat(pformat, "lo");
 341                 printf(pformat, (unsigned long) (statbuf->st_mode & (S_ISUID|S_ISGID|S_ISVTX|S_IRWXU|S_IRWXG|S_IRWXO)));
 342         } else if (m == 'A') {
 343                 printfs(pformat, bb_mode_string(statbuf->st_mode));
 344         } else if (m == 'f') {
 345                 strcat(pformat, "lx");
 346                 printf(pformat, (unsigned long) statbuf->st_mode);
 347         } else if (m == 'F') {
 348                 printfs(pformat, file_type(statbuf));
 349         } else if (m == 'h') {
 350                 strcat(pformat, "lu");
 351                 printf(pformat, (unsigned long) statbuf->st_nlink);
 352         } else if (m == 'u') {
 353                 strcat(pformat, "lu");
 354                 printf(pformat, (unsigned long) statbuf->st_uid);
 355         } else if (m == 'U') {
 356                 pw_ent = getpwuid(statbuf->st_uid);
 357                 printfs(pformat, (pw_ent != NULL) ? pw_ent->pw_name : "UNKNOWN");
 358         } else if (m == 'g') {
 359                 strcat(pformat, "lu");
 360                 printf(pformat, (unsigned long) statbuf->st_gid);
 361         } else if (m == 'G') {
 362                 gw_ent = getgrgid(statbuf->st_gid);
 363                 printfs(pformat, (gw_ent != NULL) ? gw_ent->gr_name : "UNKNOWN");
 364         } else if (m == 't') {
 365                 strcat(pformat, "lx");
 366                 printf(pformat, (unsigned long) major(statbuf->st_rdev));
 367         } else if (m == 'T') {
 368                 strcat(pformat, "lx");
 369                 printf(pformat, (unsigned long) minor(statbuf->st_rdev));
 370         } else if (m == 's') {
 371                 strcat(pformat, "llu");
 372                 printf(pformat, (unsigned long long) statbuf->st_size);
 373         } else if (m == 'B') {
 374                 strcat(pformat, "lu");
 375                 printf(pformat, (unsigned long) 512); //ST_NBLOCKSIZE
 376         } else if (m == 'b') {
 377                 strcat(pformat, "llu");
 378                 printf(pformat, (unsigned long long) statbuf->st_blocks);
 379         } else if (m == 'o') {
 380                 strcat(pformat, "lu");
 381                 printf(pformat, (unsigned long) statbuf->st_blksize);
 382         } else if (m == 'x') {
 383                 printfs(pformat, human_time(&statbuf->st_atim));
 384         } else if (m == 'X') {
 385                 strcat(pformat, TYPE_SIGNED(time_t) ? "ld" : "lu");
 386                 /* note: (unsigned long) would be wrong:
 387                  * imagine (unsigned long64)int32 */
 388                 printf(pformat, (long) statbuf->st_atime);
 389         } else if (m == 'y') {
 390                 printfs(pformat, human_time(&statbuf->st_mtim));
 391         } else if (m == 'Y') {
 392                 strcat(pformat, TYPE_SIGNED(time_t) ? "ld" : "lu");
 393                 printf(pformat, (long) statbuf->st_mtime);
 394         } else if (m == 'z') {
 395                 printfs(pformat, human_time(&statbuf->st_ctim));
 396         } else if (m == 'Z') {
 397                 strcat(pformat, TYPE_SIGNED(time_t) ? "ld" : "lu");
 398                 printf(pformat, (long) statbuf->st_ctime);
 399 # if ENABLE_SELINUX
 400         } else if (m == 'C' && (option_mask32 & OPT_SELINUX)) {
 401                 printfs(pformat, scontext);
 402 # endif
 403         } else {
 404                 strcatc(pformat, 'c');
 405                 printf(pformat, m);
 406         }
 407 }
 408
 409 static void print_it(const char *masterformat,
 410                 const char *filename,
 411                 void FAST_FUNC (*print_func)(char*, char, const char*, const void* IF_SELINUX(, security_context_t scontext)),
 412                 const void *data
 413                 IF_SELINUX(, security_context_t scontext))
 414 {
 415         /* Create a working copy of the format string */
 416         char *format = xstrdup(masterformat);
 417         /* Add 2 to accommodate our conversion of the stat '%s' format string
 418          * to the printf '%llu' one.  */
 419         char *dest = xmalloc(strlen(format) + 2 + 1);
 420         char *b;
 421
 422         b = format;
 423         while (b) {
 424                 /* Each iteration finds next %spec,
 425                  * prints preceding string and handles found %spec
 426                  */
 427                 size_t len;
 428                 char *p = strchr(b, '%');
 429                 if (!p) {
 430                         /* coreutils 6.3 always prints newline at the end */
 431                         /*fputs(b, stdout);*/
 432                         puts(b);
 433                         break;
 434                 }
 435
 436                 /* dest = "%<modifiers>" */
 437                 len = 1 + strspn(p + 1, "#-+.I 0123456789");
 438                 memcpy(dest, p, len);
 439                 dest[len] = '\0';
 440
 441                 /* print preceding string */
 442                 *p = '\0';
 443                 fputs(b, stdout);
 444
 445                 p += len;
 446                 b = p + 1;
 447                 switch (*p) {
 448                 case '\0':
 449                         b = NULL;
 450                         /* fall through */
 451                 case '%':
 452                         bb_putchar('%');
 453                         break;
 454                 default:
 455                         /* Completes "%<modifiers>" with specifier and printfs */
 456                         print_func(dest, *p, filename, data IF_SELINUX(,scontext));
 457                         break;
 458                 }
 459         }
 460
 461         free(format);
 462         free(dest);
 463 }
 464 #endif  /* FEATURE_STAT_FORMAT */
 465
 466 #if ENABLE_FEATURE_STAT_FILESYSTEM
 467 /* Stat the file system and print what we find.  */
 468 #if !ENABLE_FEATURE_STAT_FORMAT
 469 #define do_statfs(filename, format) do_statfs(filename)
 470 #endif
 471 static bool do_statfs(const char *filename, const char *format)
 472 {
 473         struct statfs statfsbuf;
 474 #if !ENABLE_FEATURE_STAT_FORMAT
 475         const char *format;
 476 #endif
 477 #if ENABLE_SELINUX
 478         security_context_t scontext = NULL;
 479
 480         if (option_mask32 & OPT_SELINUX) {
 481                 if ((option_mask32 & OPT_DEREFERENCE
 482                      ? lgetfilecon(filename, &scontext)
 483                      : getfilecon(filename, &scontext)
 484                     ) < 0
 485                 ) {
 486                         bb_simple_perror_msg(filename);
 487                         return 0;
 488                 }
 489         }
 490 #endif
 491         if (statfs(filename, &statfsbuf) != 0) {
 492                 bb_perror_msg("can't read file system information for '%s'", filename);
 493                 return 0;
 494         }
 495
 496 #if ENABLE_FEATURE_STAT_FORMAT
 497         if (format == NULL) {
 498 # if !ENABLE_SELINUX
 499                 format = (option_mask32 & OPT_TERSE
 500                         ? "%n %i %l %t %s %b %f %a %c %d"
 501                         : "  File: \"%n\"\n"
 502                           "    ID: %-8i Namelen: %-7l Type: %T\n"
 503                           "Block size: %-10s\n"
 504                           "Blocks: Total: %-10b Free: %-10f Available: %a\n"
 505                           "Inodes: Total: %-10c Free: %d");
 506 # else
 507                 format = (option_mask32 & OPT_TERSE
 508                         ? (option_mask32 & OPT_SELINUX
 509                                 ? "%n %i %l %t %s %b %f %a %c %d %C"
 510                                 : "%n %i %l %t %s %b %f %a %c %d")
 511                         : (option_mask32 & OPT_SELINUX
 512                                 ? "  File: \"%n\"\n"
 513                                 "    ID: %-8i Namelen: %-7l Type: %T\n"
 514                                 "Block size: %-10s\n"
 515                                 "Blocks: Total: %-10b Free: %-10f Available: %a\n"
 516                                 "Inodes: Total: %-10c Free: %d"
 517                                 "  S_context: %C"
 518                                 : "  File: \"%n\"\n"
 519                                 "    ID: %-8i Namelen: %-7l Type: %T\n"
 520                                 "Block size: %-10s\n"
 521                                 "Blocks: Total: %-10b Free: %-10f Available: %a\n"
 522                                 "Inodes: Total: %-10c Free: %d")
 523                         );
 524 # endif /* SELINUX */
 525         }
 526         print_it(format, filename, print_statfs, &statfsbuf IF_SELINUX(, scontext));
 527 #else /* !FEATURE_STAT_FORMAT */
 528         format = (option_mask32 & OPT_TERSE
 529                 ? "%s %llx %lu "
 530                 : "  File: \"%s\"\n"
 531                   "    ID: %-8llx Namelen: %-7lu ");
 532         printf(format,
 533                filename,
 534                get_f_fsid(&statfsbuf),
 535                statfsbuf.f_namelen);
 536
 537         if (option_mask32 & OPT_TERSE)
 538                 printf("%lx ", (unsigned long) statfsbuf.f_type);
 539         else
 540                 printf("Type: %s\n", human_fstype(statfsbuf.f_type));
 541
 542 # if !ENABLE_SELINUX
 543         format = (option_mask32 & OPT_TERSE
 544                 ? "%lu %llu %llu %llu %llu %llu\n"
 545                 : "Block size: %-10lu\n"
 546                   "Blocks: Total: %-10llu Free: %-10llu Available: %llu\n"
 547                   "Inodes: Total: %-10llu Free: %llu\n");
 548         printf(format,
 549                (unsigned long) statfsbuf.f_bsize,
 550                (unsigned long long) statfsbuf.f_blocks,
 551                (unsigned long long) statfsbuf.f_bfree,
 552                (unsigned long long) statfsbuf.f_bavail,
 553                (unsigned long long) statfsbuf.f_files,
 554                (unsigned long long) statfsbuf.f_ffree);
 555 # else
 556         format = (option_mask32 & OPT_TERSE
 557                 ? (option_mask32 & OPT_SELINUX ? "%lu %llu %llu %llu %llu %llu %C\n" : "%lu %llu %llu %llu %llu %llu\n")
 558                 : (option_mask32 & OPT_SELINUX
 559                         ?       "Block size: %-10lu\n"
 560                                 "Blocks: Total: %-10llu Free: %-10llu Available: %llu\n"
 561                                 "Inodes: Total: %-10llu Free: %llu"
 562                                 "S_context: %C\n"
 563                         :       "Block size: %-10lu\n"
 564                                 "Blocks: Total: %-10llu Free: %-10llu Available: %llu\n"
 565                                 "Inodes: Total: %-10llu Free: %llu\n"
 566                         )
 567                 );
 568         printf(format,
 569                 (unsigned long) statfsbuf.f_bsize,
 570                 (unsigned long long) statfsbuf.f_blocks,
 571                 (unsigned long long) statfsbuf.f_bfree,
 572                 (unsigned long long) statfsbuf.f_bavail,
 573                 (unsigned long long) statfsbuf.f_files,
 574                 (unsigned long long) statfsbuf.f_ffree,
 575                 scontext);
 576
 577         if (scontext)
 578                 freecon(scontext);
 579 # endif
 580 #endif  /* FEATURE_STAT_FORMAT */
 581         return 1;
 582 }
 583 #endif  /* FEATURE_STAT_FILESYSTEM */
 584
 585 /* stat the file and print what we find */
 586 #if !ENABLE_FEATURE_STAT_FORMAT
 587 #define do_stat(filename, format) do_stat(filename)
 588 #endif
 589 static bool do_stat(const char *filename, const char *format)
 590 {
 591         struct stat statbuf;
 592 #if ENABLE_SELINUX
 593         security_context_t scontext = NULL;
 594
 595         if (option_mask32 & OPT_SELINUX) {
 596                 if ((option_mask32 & OPT_DEREFERENCE
 597                      ? lgetfilecon(filename, &scontext)
 598                      : getfilecon(filename, &scontext)
 599                     ) < 0
 600                 ) {
 601                         bb_simple_perror_msg(filename);
 602                         return 0;
 603                 }
 604         }
 605 #endif
 606         if ((option_mask32 & OPT_DEREFERENCE ? stat : lstat) (filename, &statbuf) != 0) {
 607                 bb_perror_msg("can't stat '%s'", filename);
 608                 return 0;
 609         }
 610
 611 #if ENABLE_FEATURE_STAT_FORMAT
 612         if (format == NULL) {
 613 # if !ENABLE_SELINUX
 614                 if (option_mask32 & OPT_TERSE) {
 615                         format = "%n %s %b %f %u %g %D %i %h %t %T %X %Y %Z %o";
 616                 } else {
 617                         if (S_ISBLK(statbuf.st_mode) || S_ISCHR(statbuf.st_mode)) {
 618                                 format =
 619                                         "  File: %N\n"
 620                                         "  Size: %-10s\tBlocks: %-10b IO Block: %-6o %F\n"
 621                                         "Device: %Dh/%dd\tInode: %-10i  Links: %-5h"
 622                                         " Device type: %t,%T\n"
 623                                         "Access: (%04a/%10.10A)  Uid: (%5u/%8U)   Gid: (%5g/%8G)\n"
 624                                         "Access: %x\n" "Modify: %y\n" "Change: %z";
 625                         } else {
 626                                 format =
 627                                         "  File: %N\n"
 628                                         "  Size: %-10s\tBlocks: %-10b IO Block: %-6o %F\n"
 629                                         "Device: %Dh/%dd\tInode: %-10i  Links: %h\n"
 630                                         "Access: (%04a/%10.10A)  Uid: (%5u/%8U)   Gid: (%5g/%8G)\n"
 631                                         "Access: %x\n" "Modify: %y\n" "Change: %z";
 632                         }
 633                 }
 634 # else
 635                 if (option_mask32 & OPT_TERSE) {
 636                         format = (option_mask32 & OPT_SELINUX ?
 637                                 "%n %s %b %f %u %g %D %i %h %t %T %X %Y %Z %o %C\n"
 638                                 :
 639                                 "%n %s %b %f %u %g %D %i %h %t %T %X %Y %Z %o\n"
 640                                 );
 641                 } else {
 642                         if (S_ISBLK(statbuf.st_mode) || S_ISCHR(statbuf.st_mode)) {
 643                                 format = (option_mask32 & OPT_SELINUX ?
 644                                         "  File: %N\n"
 645                                         "  Size: %-10s\tBlocks: %-10b IO Block: %-6o %F\n"
 646                                         "Device: %Dh/%dd\tInode: %-10i  Links: %-5h"
 647                                         " Device type: %t,%T\n"
 648                                         "Access: (%04a/%10.10A)  Uid: (%5u/%8U)   Gid: (%5g/%8G)\n"
 649                                         "   S_Context: %C\n"
 650                                         "Access: %x\n" "Modify: %y\n" "Change: %z"
 651                                         :
 652                                         "  File: %N\n"
 653                                         "  Size: %-10s\tBlocks: %-10b IO Block: %-6o %F\n"
 654                                         "Device: %Dh/%dd\tInode: %-10i  Links: %-5h"
 655                                         " Device type: %t,%T\n"
 656                                         "Access: (%04a/%10.10A)  Uid: (%5u/%8U)   Gid: (%5g/%8G)\n"
 657                                         "Access: %x\n" "Modify: %y\n" "Change: %z"
 658                                         );
 659                         } else {
 660                                 format = (option_mask32 & OPT_SELINUX ?
 661                                         "  File: %N\n"
 662                                         "  Size: %-10s\tBlocks: %-10b IO Block: %-6o %F\n"
 663                                         "Device: %Dh/%dd\tInode: %-10i  Links: %h\n"
 664                                         "Access: (%04a/%10.10A)  Uid: (%5u/%8U)   Gid: (%5g/%8G)\n"
 665                                         "S_Context: %C\n"
 666                                         "Access: %x\n" "Modify: %y\n" "Change: %z"
 667                                         :
 668                                         "  File: %N\n"
 669                                         "  Size: %-10s\tBlocks: %-10b IO Block: %-6o %F\n"
 670                                         "Device: %Dh/%dd\tInode: %-10i  Links: %h\n"
 671                                         "Access: (%04a/%10.10A)  Uid: (%5u/%8U)   Gid: (%5g/%8G)\n"
 672                                         "Access: %x\n" "Modify: %y\n" "Change: %z"
 673                                         );
 674                         }
 675                 }
 676 # endif
 677         }
 678         print_it(format, filename, print_stat, &statbuf IF_SELINUX(, scontext));
 679 #else   /* FEATURE_STAT_FORMAT */
 680         if (option_mask32 & OPT_TERSE) {
 681                 printf("%s %llu %llu %lx %lu %lu %llx %llu %lu %lx %lx %lu %lu %lu %lu"
 682                        IF_NOT_SELINUX("\n"),
 683                        filename,
 684                        (unsigned long long) statbuf.st_size,
 685                        (unsigned long long) statbuf.st_blocks,
 686                        (unsigned long) statbuf.st_mode,
 687                        (unsigned long) statbuf.st_uid,
 688                        (unsigned long) statbuf.st_gid,
 689                        (unsigned long long) statbuf.st_dev,
 690                        (unsigned long long) statbuf.st_ino,
 691                        (unsigned long) statbuf.st_nlink,
 692                        (unsigned long) major(statbuf.st_rdev),
 693                        (unsigned long) minor(statbuf.st_rdev),
 694                        (unsigned long) statbuf.st_atime,
 695                        (unsigned long) statbuf.st_mtime,
 696                        (unsigned long) statbuf.st_ctime,
 697                        (unsigned long) statbuf.st_blksize
 698                 );
 699 # if ENABLE_SELINUX
 700                 if (option_mask32 & OPT_SELINUX)
 701                         printf(" %s\n", scontext);
 702                 else
 703                         bb_putchar('\n');
 704 # endif
 705         } else {
 706                 char *linkname = NULL;
 707                 struct passwd *pw_ent;
 708                 struct group *gw_ent;
 709
 710                 gw_ent = getgrgid(statbuf.st_gid);
 711                 pw_ent = getpwuid(statbuf.st_uid);
 712
 713                 if (S_ISLNK(statbuf.st_mode))
 714                         linkname = xmalloc_readlink_or_warn(filename);
 715                 if (linkname) {
 716                         printf("  File: '%s' -> '%s'\n", filename, linkname);
 717                         free(linkname);
 718                 } else {
 719                         printf("  File: '%s'\n", filename);
 720                 }
 721
 722                 printf("  Size: %-10llu\tBlocks: %-10llu IO Block: %-6lu %s\n"
 723                        "Device: %llxh/%llud\tInode: %-10llu  Links: %-5lu",
 724                        (unsigned long long) statbuf.st_size,
 725                        (unsigned long long) statbuf.st_blocks,
 726                        (unsigned long) statbuf.st_blksize,
 727                        file_type(&statbuf),
 728                        (unsigned long long) statbuf.st_dev,
 729                        (unsigned long long) statbuf.st_dev,
 730                        (unsigned long long) statbuf.st_ino,
 731                        (unsigned long) statbuf.st_nlink);
 732                 if (S_ISBLK(statbuf.st_mode) || S_ISCHR(statbuf.st_mode))
 733                         printf(" Device type: %lx,%lx\n",
 734                                (unsigned long) major(statbuf.st_rdev),
 735                                (unsigned long) minor(statbuf.st_rdev));
 736                 else
 737                         bb_putchar('\n');
 738                 printf("Access: (%04lo/%10.10s)  Uid: (%5lu/%8s)   Gid: (%5lu/%8s)\n",
 739                        (unsigned long) (statbuf.st_mode & (S_ISUID|S_ISGID|S_ISVTX|S_IRWXU|S_IRWXG|S_IRWXO)),
 740                        bb_mode_string(statbuf.st_mode),
 741                        (unsigned long) statbuf.st_uid,
 742                        (pw_ent != NULL) ? pw_ent->pw_name : "UNKNOWN",
 743                        (unsigned long) statbuf.st_gid,
 744                        (gw_ent != NULL) ? gw_ent->gr_name : "UNKNOWN");
 745 # if ENABLE_SELINUX
 746                 if (option_mask32 & OPT_SELINUX)
 747                         printf("   S_Context: %s\n", scontext);
 748 # endif
 749                 printf("Access: %s\n", human_time(&statbuf.st_atim));
 750                 printf("Modify: %s\n", human_time(&statbuf.st_mtim));
 751                 printf("Change: %s\n", human_time(&statbuf.st_ctim));
 752         }
 753 #endif  /* FEATURE_STAT_FORMAT */
 754         return 1;
 755 }
 756
 757 int stat_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
 758 int stat_main(int argc UNUSED_PARAM, char **argv)
 759 {
 760         IF_FEATURE_STAT_FORMAT(char *format = NULL;)
 761         int i;
 762         int ok;
 763         statfunc_ptr statfunc = do_stat;
 764 #if ENABLE_FEATURE_STAT_FILESYSTEM || ENABLE_SELINUX
 765         unsigned opts;
 766
 767         opts =
 768 #endif
 769         getopt32(argv, "^"
 770                 "tL"
 771                 IF_FEATURE_STAT_FILESYSTEM("f")
 772                 IF_SELINUX("Z")
 773                 IF_FEATURE_STAT_FORMAT("c:")
 774                 "\0" "-1" /* min one arg */
 775                 IF_FEATURE_STAT_FORMAT(,&format)
 776         );
 777 #if ENABLE_FEATURE_STAT_FILESYSTEM
 778         if (opts & OPT_FILESYS) /* -f */
 779                 statfunc = do_statfs;
 780 #endif
 781 #if ENABLE_SELINUX
 782         if (opts & OPT_SELINUX) {
 783                 selinux_or_die();
 784         }
 785 #endif
 786         ok = 1;
 787         argv += optind;
 788         for (i = 0; argv[i]; ++i)
 789                 ok &= statfunc(argv[i] IF_FEATURE_STAT_FORMAT(, format));
 790
 791         return (ok ? EXIT_SUCCESS : EXIT_FAILURE);
 792 }