aboutsummaryrefslogtreecommitdiffstats
path: root/xtest.c
diff options
context:
space:
mode:
authorMattias Andrée <maandree@kth.se>2016-12-28 12:46:02 +0100
committerMattias Andrée <maandree@kth.se>2016-12-28 12:46:02 +0100
commit102a20609667e7a66a7edb9db3285b0d95424e1f (patch)
tree7a3ad19b296ad83f692fb413fe509316e041c046 /xtest.c
parentfirst commit (diff)
downloadxtest-102a20609667e7a66a7edb9db3285b0d95424e1f.tar.gz
xtest-102a20609667e7a66a7edb9db3285b0d95424e1f.tar.bz2
xtest-102a20609667e7a66a7edb9db3285b0d95424e1f.tar.xz
Add LICENSE, arg.h, and xtest.c
Signed-off-by: Mattias Andrée <maandree@kth.se>
Diffstat (limited to 'xtest.c')
-rw-r--r--xtest.c143
1 files changed, 143 insertions, 0 deletions
diff --git a/xtest.c b/xtest.c
new file mode 100644
index 0000000..46baad3
--- /dev/null
+++ b/xtest.c
@@ -0,0 +1,143 @@
+/* See LICENSE file for copyright and license details. */
+#include <sys/stat.h>
+
+#include <errno.h>
+#include <fcntl.h>
+#include <limits.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <unistd.h>
+
+#include "arg.h"
+
+char *argv0;
+static char delim = '\n';
+static long int tests = 0;
+
+static int test_b(char *s) { struct stat buf; if ( stat(s, &buf)) return 0; return S_ISBLK (buf.st_mode); }
+static int test_c(char *s) { struct stat buf; if ( stat(s, &buf)) return 0; return S_ISCHR (buf.st_mode); }
+static int test_d(char *s) { struct stat buf; if ( stat(s, &buf)) return 0; return S_ISDIR (buf.st_mode); }
+static int test_f(char *s) { struct stat buf; if ( stat(s, &buf)) return 0; return S_ISREG (buf.st_mode); }
+static int test_g(char *s) { struct stat buf; if ( stat(s, &buf)) return 0; return S_ISGID & buf.st_mode ; }
+static int test_h(char *s) { struct stat buf; if (lstat(s, &buf)) return 0; return S_ISLNK (buf.st_mode); }
+static int test_k(char *s) { struct stat buf; if ( stat(s, &buf)) return 0; return S_ISVTX & buf.st_mode ; }
+static int test_p(char *s) { struct stat buf; if ( stat(s, &buf)) return 0; return S_ISFIFO (buf.st_mode); }
+static int test_S(char *s) { struct stat buf; if ( stat(s, &buf)) return 0; return S_ISSOCK (buf.st_mode); }
+static int test_s(char *s) { struct stat buf; if ( stat(s, &buf)) return 0; return buf.st_size ; }
+static int test_u(char *s) { struct stat buf; if ( stat(s, &buf)) return 0; return S_ISUID & buf.st_mode ; }
+
+static int test_e(char *s) { return !faccessat(AT_FDCWD, s, F_OK, AT_EACCESS); }
+static int test_r(char *s) { return !faccessat(AT_FDCWD, s, R_OK, AT_EACCESS); }
+static int test_w(char *s) { return !faccessat(AT_FDCWD, s, W_OK, AT_EACCESS); }
+static int test_x(char *s) { return !faccessat(AT_FDCWD, s, X_OK, AT_EACCESS); }
+
+static int
+test_t(char *s)
+{
+ long int fd;
+ char *end;
+ errno = 0;
+ fd = strtol(s, &end, 10);
+ if (errno || *end || fd < 0 || fd > INT_MAX)
+ return 0;
+ return isatty((int)fd);
+}
+
+static int (*testmap[])(char *) = {
+ test_b,
+ test_c,
+ test_d,
+ test_e,
+ test_f,
+ test_g,
+ test_h,
+ test_k,
+ test_p,
+ test_r,
+ test_S,
+ test_s,
+ test_t,
+ test_u,
+ test_w,
+ test_x
+};
+
+static void
+usage(void)
+{
+ fprintf(stderr, "usage: %s [-0bcdefghkLprSstuwx] file ...\n", argv0);
+ exit(1);
+}
+
+static void
+test(char *s)
+{
+ long int i, j;
+ for (i = 0; j = 1L << i, j <= tests; i++) {
+ if ((tests & j) && testmap[i](s)) {
+ printf("%s%c", s, delim);
+ fflush(stdout);
+ break;
+ }
+ }
+}
+
+int
+main(int argc, char *argv[])
+{
+ char *line = NULL;
+ size_t size = 0;
+ ssize_t len;
+
+ ARGBEGIN {
+ case '0':
+ delim = '\0';
+ break;
+ case 'b': tests |= 1 << 0; break;
+ case 'c': tests |= 1 << 1; break;
+ case 'd': tests |= 1 << 2; break;
+ case 'e': tests |= 1 << 3; break;
+ case 'f': tests |= 1 << 4; break;
+ case 'g': tests |= 1 << 5; break;
+ case 'h': tests |= 1 << 6; break;
+ case 'k': tests |= 1 << 7; break;
+ case 'L': tests |= 1 << 6; break;
+ case 'p': tests |= 1 << 8; break;
+ case 'r': tests |= 1 << 9; break;
+ case 'S': tests |= 1 << 10; break;
+ case 's': tests |= 1 << 11; break;
+ case 't': tests |= 1 << 12; break;
+ case 'u': tests |= 1 << 13; break;
+ case 'w': tests |= 1 << 14; break;
+ case 'x': tests |= 1 << 15; break;
+ default:
+ usage();
+ } ARGEND;
+
+ if (!tests) {
+ fprintf(stderr, "%s: at least one test is required\n", argv0);
+ return 1;
+ }
+
+ if (argc) {
+ for (; *argv; argv++)
+ test(*argv);
+ } else {
+ while (len = getdelim(&line, &size, delim, stdin), len >= 0) {
+ if (len && line[len - 1] == delim)
+ line[len - 1] = '\0';
+ test(line);
+ }
+ if (ferror(stdin)) {
+ fprintf(stderr, "%s: <stdin>: %s\n", strerror(errno));
+ return 1;
+ }
+ }
+
+ if (ferror(stdout)) {
+ fprintf(stderr, "%s: <stdout>: %s\n", strerror(errno));
+ return 1;
+ }
+ return 0;
+}