stest.c (3224B) - raw

      1 /* See LICENSE file for copyright and license details. */
      2 #include <sys/stat.h>
      3 
      4 #include <dirent.h>
      5 #include <limits.h>
      6 #include <stdio.h>
      7 #include <stdlib.h>
      8 #include <string.h>
      9 #include <unistd.h>
     10 
     11 #include "arg.h"
     12 char *argv0;
     13 
     14 #define FLAG(x)  (flag[(x)-'a'])
     15 
     16 static void test(const char *, const char *);
     17 static void usage(void);
     18 
     19 static int match = 0;
     20 static int flag[26];
     21 static struct stat old, new;
     22 
     23 static void
     24 test(const char *path, const char *name)
     25 {
     26 	struct stat st, ln;
     27 
     28 	if ((!stat(path, &st) && (FLAG('a') || name[0] != '.')        /* hidden files      */
     29 	&& (!FLAG('b') || S_ISBLK(st.st_mode))                        /* block special     */
     30 	&& (!FLAG('c') || S_ISCHR(st.st_mode))                        /* character special */
     31 	&& (!FLAG('d') || S_ISDIR(st.st_mode))                        /* directory         */
     32 	&& (!FLAG('e') || access(path, F_OK) == 0)                    /* exists            */
     33 	&& (!FLAG('f') || S_ISREG(st.st_mode))                        /* regular file      */
     34 	&& (!FLAG('g') || st.st_mode & S_ISGID)                       /* set-group-id flag */
     35 	&& (!FLAG('h') || (!lstat(path, &ln) && S_ISLNK(ln.st_mode))) /* symbolic link     */
     36 	&& (!FLAG('n') || st.st_mtime > new.st_mtime)                 /* newer than file   */
     37 	&& (!FLAG('o') || st.st_mtime < old.st_mtime)                 /* older than file   */
     38 	&& (!FLAG('p') || S_ISFIFO(st.st_mode))                       /* named pipe        */
     39 	&& (!FLAG('r') || access(path, R_OK) == 0)                    /* readable          */
     40 	&& (!FLAG('s') || st.st_size > 0)                             /* not empty         */
     41 	&& (!FLAG('u') || st.st_mode & S_ISUID)                       /* set-user-id flag  */
     42 	&& (!FLAG('w') || access(path, W_OK) == 0)                    /* writable          */
     43 	&& (!FLAG('x') || access(path, X_OK) == 0)) != FLAG('v')) {   /* executable        */
     44 		if (FLAG('q'))
     45 			exit(0);
     46 		match = 1;
     47 		puts(name);
     48 	}
     49 }
     50 
     51 static void
     52 usage(void)
     53 {
     54 	fprintf(stderr, "usage: %s [-abcdefghlpqrsuvwx] "
     55 	        "[-n file] [-o file] [file...]\n", argv0);
     56 	exit(2); /* like test(1) return > 1 on error */
     57 }
     58 
     59 int
     60 main(int argc, char *argv[])
     61 {
     62 	struct dirent *d;
     63 	char path[PATH_MAX], *line = NULL, *file;
     64 	size_t linesiz = 0;
     65 	ssize_t n;
     66 	DIR *dir;
     67 	int r;
     68 
     69 	ARGBEGIN {
     70 	case 'n': /* newer than file */
     71 	case 'o': /* older than file */
     72 		file = EARGF(usage());
     73 		if (!(FLAG(ARGC()) = !stat(file, (ARGC() == 'n' ? &new : &old))))
     74 			perror(file);
     75 		break;
     76 	default:
     77 		/* miscellaneous operators */
     78 		if (strchr("abcdefghlpqrsuvwx", ARGC()))
     79 			FLAG(ARGC()) = 1;
     80 		else
     81 			usage(); /* unknown flag */
     82 	} ARGEND;
     83 
     84 	if (!argc) {
     85 		/* read list from stdin */
     86 		while ((n = getline(&line, &linesiz, stdin)) > 0) {
     87 			if (line[n - 1] == '\n')
     88 				line[n - 1] = '\0';
     89 			test(line, line);
     90 		}
     91 		free(line);
     92 	} else {
     93 		for (; argc; argc--, argv++) {
     94 			if (FLAG('l') && (dir = opendir(*argv))) {
     95 				/* test directory contents */
     96 				while ((d = readdir(dir))) {
     97 					r = snprintf(path, sizeof path, "%s/%s",
     98 					             *argv, d->d_name);
     99 					if (r >= 0 && (size_t)r < sizeof path)
    100 						test(path, d->d_name);
    101 				}
    102 				closedir(dir);
    103 			} else {
    104 				test(*argv, *argv);
    105 			}
    106 		}
    107 	}
    108 	return match ? 0 : 1;
    109 }