toys/other/stat.c

   1 /* stat.c : display file or file system status
   2  * Copyright 2012 <warior.linux@gmail.com>
   3  * Copyright 2013 <anand.sinha85@gmail.com>
   4
   5 USE_STAT(NEWTOY(stat, "c:f", TOYFLAG_BIN))
   6
   7 config STAT
   8   bool stat
   9   default y
  10   help
  11     usage: stat [-f] [-c FORMAT] FILE...
  12
  13     Display status of files or filesystems.
  14
  15     -f display filesystem status instead of file status
  16     -c Output specified FORMAT string instead of default
  17
  18     The valid format escape sequences for files:
  19     %a  Access bits (octal) |%A  Access bits (flags)|%b  Blocks allocated
  20     %B  Bytes per block     |%d  Device ID (dec)    |%D  Device ID (hex)
  21     %f  All mode bits (hex) |%F  File type          |%g  Group ID
  22     %G  Group name          |%h  Hard links         |%i  Inode
  23     %n  Filename            |%N  Long filename      |%o  I/O block size
  24     %s  Size (bytes)        |%u  User ID            |%U  User name
  25     %x  Access time         |%X  Access unix time   |%y  File write time
  26     %Y  File write unix time|%z  Dir change time    |%Z  Dir change unix time
  27
  28     The valid format escape sequences for filesystems:
  29     %a  Available blocks    |%b  Total blocks       |%c  Total inodes
  30     %d  Free inodes         |%f  Free blocks        |%i  File system ID
  31     %l  Max filename length |%n  File name          |%s  Fragment size
  32     %S  Best transfer size  |%t  File system type
  33 */
  34
  35 #define FOR_stat
  36 #include "toys.h"
  37
  38 GLOBALS(
  39   char *fmt;
  40
  41   union {
  42     struct stat st;
  43     struct statfs sf;
  44   } stat;
  45   struct passwd *user_name;
  46   struct group *group_name;
  47 )
  48
  49
  50 // Note: the atime, mtime, and ctime fields in struct stat are the start
  51 // of embedded struct timespec, but posix won't let them use that
  52 // struct definition for legacy/namespace reasons.
  53
  54 static void date_stat_format(struct timespec *ts)
  55 {
  56   strftime(toybuf, sizeof(toybuf), "%Y-%m-%d %H:%M:%S",
  57     localtime(&(ts->tv_sec)));
  58   xprintf("%s.%09d", toybuf, ts->tv_nsec);
  59 }
  60
  61 static void print_stat(char type)
  62 {
  63   struct stat *stat = (struct stat *)&TT.stat;
  64
  65   if (type == 'a') xprintf("%lo", stat->st_mode & ~S_IFMT);
  66   else if (type == 'A') {
  67     char str[11];
  68
  69     mode_to_string(stat->st_mode, str);
  70     xprintf("%s", str);
  71   } else if (type == 'b') xprintf("%llu", stat->st_blocks);
  72   else if (type == 'B') xprintf("%lu", stat->st_blksize);
  73   else if (type == 'd') xprintf("%ldd", stat->st_dev);
  74   else if (type == 'D') xprintf("%llxh", stat->st_dev);
  75   else if (type == 'f') xprintf("%lx", stat->st_mode);
  76   else if (type == 'F') {
  77     char *t = "character device\0directory\0block device\0" \
  78               "regular file\0symbolic link\0socket\0FIFO (named pipe)";
  79     int i, filetype = stat->st_mode & S_IFMT;
  80
  81     for (i = 1; filetype != (i*8192) && i < 7; i++) t += strlen(t)+1;
  82     if (!stat->st_size && filetype == S_IFREG) t = "regular empty file";
  83     xprintf("%s", t);
  84   } else if (type == 'g') xprintf("%lu", stat->st_gid);
  85   else if (type == 'G') xprintf("%8s", TT.user_name->pw_name);
  86   else if (type == 'h') xprintf("%lu", stat->st_nlink);
  87   else if (type == 'i') xprintf("%llu", stat->st_ino);
  88   else if (type == 'N') {
  89     xprintf("`%s'", *toys.optargs);
  90     if (S_ISLNK(stat->st_mode))
  91       if (0<readlink(*toys.optargs, toybuf, sizeof(toybuf)))
  92         xprintf(" -> `%s'", toybuf);
  93   } else if (type == 'o') xprintf("%lu", stat->st_blksize);
  94   else if (type == 's') xprintf("%llu", stat->st_size);
  95   else if (type == 'u') xprintf("%lu", stat->st_uid);
  96   else if (type == 'U') xprintf("%8s", TT.user_name->pw_name);
  97   else if (type == 'x') date_stat_format((void *)&stat->st_atime);
  98   else if (type == 'X') xprintf("%llu", (long long)stat->st_atime);
  99   else if (type == 'y') date_stat_format((void *)&stat->st_mtime);
 100   else if (type == 'Y') xprintf("%llu", (long long)stat->st_mtime);
 101   else if (type == 'z') date_stat_format((void *)&stat->st_ctime);
 102   else if (type == 'Z') xprintf("%llu", (long long)stat->st_ctime);
 103   else xprintf("?");
 104 }
 105
 106 static void print_statfs(char type) {
 107   struct statfs *statfs = (struct statfs *)&TT.stat;
 108
 109   if (type == 'a') xprintf("%llu", statfs->f_bavail);
 110   else if (type == 'b') xprintf("%llu", statfs->f_blocks);
 111   else if (type == 'c') xprintf("%llu", statfs->f_files);
 112   else if (type == 'd') xprintf("%llu", statfs->f_ffree);
 113   else if (type == 'f') xprintf("%llu", statfs->f_bfree);
 114   else if (type == 'l') xprintf("%ld", statfs->f_namelen);
 115   else if (type == 't') xprintf("%lx", statfs->f_type);
 116   else if (type == 'i')
 117     xprintf("%08x%08x", statfs->f_fsid.__val[0], statfs->f_fsid.__val[1]);
 118   else if (type == 's') xprintf("%d", statfs->f_frsize);
 119   else if (type == 'S') xprintf("%d", statfs->f_bsize);
 120   else xprintf("?");
 121 }
 122
 123 void stat_main(void)
 124 {
 125   int flagf = toys.optflags & FLAG_f;
 126   char *format = flagf
 127     ? "  File: \"%n\"\n    ID: %i Namelen: %l    Type: %t\n"
 128       "Block Size: %s    Fundamental block size: %S\n"
 129       "Blocks: Total: %b\tFree: %f\tAvailable: %a\n"
 130       "Inodes: Total: %c\tFree: %d"
 131     : "  File: %N\n  Size: %s\t Blocks: %b\t IO Blocks: %B\t%F\n"
 132       "Device: %D\t Inode: %i\t Links: %h\n"
 133       "Access: (%a/%A)\tUid: (%u/%U)\tGid: (%g/%G)\n"
 134       "Access: %x\nModify: %y\nChange: %z";
 135
 136   if (toys.optflags & FLAG_c) format = TT.fmt;
 137
 138   for (; *toys.optargs; toys.optargs++) {
 139     char *f;
 140
 141     if (flagf && !statfs(*toys.optargs, (void *)&TT.stat));
 142     else if (!flagf && !lstat(*toys.optargs, (void *)&TT.stat)) {
 143       struct stat *stat = (struct stat*)&TT.stat;
 144
 145       // check user and group name
 146       TT.user_name = getpwuid(stat->st_uid);
 147       TT.group_name = getgrgid(stat->st_gid);
 148     } else {
 149       perror_msg("'%s'", *toys.optargs);
 150       continue;
 151     }
 152
 153     for (f = format; *f; f++) {
 154       if (*f != '%') putchar(*f);
 155       else {
 156         if (*++f == 'n') xprintf("%s", *toys.optargs);
 157         else if (flagf) print_statfs(*f);
 158         else print_stat(*f);
 159       }
 160     }
 161     xputc('\n');
 162   }
 163 }