/* stat.c : display file or file system status * Copyright 2012 * Copyright 2013 USE_STAT(NEWTOY(stat, "<1c:(format)fLt", TOYFLAG_BIN)) config STAT bool stat default y help usage: stat [-tfL] [-c FORMAT] FILE... Display status of files or filesystems. -c Output specified FORMAT string instead of default -f Display filesystem status instead of file status -L Follow symlinks -t terse (-c "%n %s %b %f %u %g %D %i %h %t %T %X %Y %Z %o") (with -f = -c "%n %i %l %t %s %S %b %f %a %c %d") The valid format escape sequences for files: %a Access bits (octal) |%A Access bits (flags)|%b Size/512 %B Bytes per %b (512) |%C Security context |%d Device ID (dec) %D Device ID (hex) |%f All mode bits (hex)|%F File type %g Group ID |%G Group name |%h Hard links %i Inode |%m Mount point |%n Filename %N Long filename |%o I/O block size |%s Size (bytes) %t Devtype major (hex) |%T Devtype minor (hex)|%u User ID %U User name |%x Access time |%X Access unix time %y Modification time |%Y Mod unix time |%z Creation time %Z Creation unix time The valid format escape sequences for filesystems: %a Available blocks |%b Total blocks |%c Total inodes %d Free inodes |%f Free blocks |%i File system ID %l Max filename length |%n File name |%s Best transfer size %S Actual block size |%t FS type (hex) |%T FS type (driver name) */ #define FOR_stat #include "toys.h" GLOBALS( char *c; union { struct stat st; struct statfs sf; } stat; char *file, *pattern; int patlen; ) // Force numeric output to long long instead of manually typecasting everything // and safely parse length prefix static void out(char c, long long val) { sprintf(toybuf, "%.*sll%c", TT.patlen, TT.pattern, c); printf(toybuf, val); } // Output string with parsed length prefix static void strout(char *val) { sprintf(toybuf, "%.*ss", TT.patlen, TT.pattern); printf(toybuf, val); } static void date_stat_format(struct timespec *ts) { strout(format_iso_time(toybuf+128, sizeof(toybuf)-128, ts)); } static void print_stat(char type) { struct stat *stat = (struct stat *)&TT.stat; if (type == 'a') out('o', stat->st_mode&~S_IFMT); else if (type == 'A') { char str[11]; mode_to_string(stat->st_mode, str); strout(str); } else if (type == 'b') out('u', stat->st_blocks); else if (type == 'B') out('d', 512); else if (type == 'C') { char *context = NULL; strout(lsm_get_context(TT.file, &context) != -1 ? context : "?"); free(context); } else if (type == 'd') out('d', stat->st_dev); else if (type == 'D') out('x', stat->st_dev); else if (type == 'f') out('x', stat->st_mode); else if (type == 'F') { char *t = "character device\0directory\0block device\0" \ "regular file\0symbolic link\0socket\0FIFO (named pipe)"; int i, filetype = stat->st_mode & S_IFMT; for (i = 1; filetype != (i*8192) && i < 7; i++) t += strlen(t)+1; if (!stat->st_size && filetype == S_IFREG) t = "regular empty file"; strout(t); } else if (type == 'g') out('u', stat->st_gid); else if (type == 'G') strout(getgroupname(stat->st_gid)); else if (type == 'h') out('u', stat->st_nlink); else if (type == 'i') out('u', stat->st_ino); else if (type == 'm') { struct mtab_list *mt = xgetmountlist(0); dev_t dev = stat->st_rdev ? stat->st_rdev : stat->st_dev; // This mount point could exist multiple times, so show oldest. for (dlist_terminate(mt); mt; mt = mt->next) if (mt->stat.st_dev == dev) { strout(mt->dir); break; } llist_traverse(mt, free); } else if (type == 'N') { printf("%s", TT.file); if (S_ISLNK(stat->st_mode)) if (readlink0(TT.file, toybuf, sizeof(toybuf))) printf(" -> '%s'", toybuf); } else if (type == 'o') out('u', stat->st_blksize); else if (type == 's') out('u', stat->st_size); else if (type == 't') out('x', dev_major(stat->st_rdev)); else if (type == 'T') out('x', dev_minor(stat->st_rdev)); else if (type == 'u') out('u', stat->st_uid); else if (type == 'U') strout(getusername(stat->st_uid)); else if (type == 'x') date_stat_format(&stat->st_atim); else if (type == 'X') out('u', stat->st_atime); else if (type == 'y') date_stat_format(&stat->st_mtim); else if (type == 'Y') out('u', stat->st_mtime); else if (type == 'z') date_stat_format(&stat->st_ctim); else if (type == 'Z') out('u', stat->st_ctime); else putchar('?'); } static void print_statfs(char type) { struct statfs *statfs = (struct statfs *)&TT.stat; if (type == 'a') out('u', statfs->f_bavail); else if (type == 'b') out('u', statfs->f_blocks); else if (type == 'c') out('u', statfs->f_files); else if (type == 'd') out('u', statfs->f_ffree); else if (type == 'f') out('u', statfs->f_bfree); else if (type == 'l') out('d', pathconf(TT.file, _PC_NAME_MAX)); else if (type == 't') out('x', statfs->f_type); else if (type == 'T') strout(fs_type_name(statfs)); else if (type == 'i') { int *val = (int *) &statfs->f_fsid; char buf[32]; sprintf(buf, "%08x%08x", val[0], val[1]); strout(buf); } else if (type == 's') out('d', statfs_bsize(statfs)); else if (type == 'S') out('d', statfs_frsize(statfs)); else strout("?"); } void stat_main(void) { int flagf = FLAG(f), i; char *format, *f; if (FLAG(t)) format = flagf ? "%n %i %l %t %s %S %b %f %a %c %d" : "%n %s %b %f %u %g %D %i %h %t %T %X %Y %Z %o"; else format = flagf ? " File: \"%n\"\n ID: %i Namelen: %l Type: %T\n" "Block Size: %s Fundamental block size: %S\n" "Blocks: Total: %b\tFree: %f\tAvailable: %a\n" "Inodes: Total: %c\tFree: %d" : " File: %N\n Size: %s\t Blocks: %b\t IO Blocks: %B\t %F\n" "Device: %Dh/%dd\t Inode: %i\t Links: %h\t Device type: %t,%T\n" "Access: (%04a/%A)\tUid: (%5u/%8U)\tGid: (%5g/%8G)\n" "Access: %x\nModify: %y\nChange: %z"; if (FLAG(c)) format = TT.c; // loop through files listed on command line for (i = 0; toys.optargs[i]; i++) { // stat the file or filesystem TT.file = toys.optargs[i]; if (flagf && !statfs(TT.file, (void *)&TT.stat)); else if (flagf || (FLAG(L) ? stat : lstat)(TT.file, (void *)&TT.stat)) { perror_msg("'%s'", TT.file); continue; } // parse format and print what it says for (f = format; *f; f++) { if (*f != '%' || !f[1]) putchar(*f); else if (f[1]=='%') putchar(*f++); else { f = next_printf(f, &TT.pattern); TT.patlen = f-TT.pattern; if (!*f || TT.patlen>99) error_exit("bad %s", TT.pattern); if (*f == 'n') strout(TT.file); else if (flagf) print_statfs(*f); else print_stat(*f); } } xputc('\n'); } }