ireverted some changes and improved display performances - iomenu - interactive terminal-based selection menu Err bitreich.org 70 hgit clone git://bitreich.org/iomenu git://enlrupgkhuxnvlhsf6lc3fziv5h2hhfrinws65d7roiv6bfj7d652fid.onion/iomenu URL:git://bitreich.org/iomenu git://enlrupgkhuxnvlhsf6lc3fziv5h2hhfrinws65d7roiv6bfj7d652fid.onion/iomenu bitreich.org 70 1Log /scm/iomenu/log.gph bitreich.org 70 1Files /scm/iomenu/files.gph bitreich.org 70 1Refs /scm/iomenu/refs.gph bitreich.org 70 1Tags /scm/iomenu/tag bitreich.org 70 1README /scm/iomenu/file/README.gph bitreich.org 70 1LICENSE /scm/iomenu/file/LICENSE.gph bitreich.org 70 i--- Err bitreich.org 70 1commit a59517e3e67ce0600a1dc3b2f4d7377f419f4af5 /scm/iomenu/commit/a59517e3e67ce0600a1dc3b2f4d7377f419f4af5.gph bitreich.org 70 1parent 345619b172bfd56f1807f8ffce5795e54c453127 /scm/iomenu/commit/345619b172bfd56f1807f8ffce5795e54c453127.gph bitreich.org 70 hAuthor: Josuah Demangeon URL:mailto:mail@josuah.net bitreich.org 70 iDate: Sat, 15 Apr 2017 13:00:07 +0200 Err bitreich.org 70 i Err bitreich.org 70 ireverted some changes and improved display performances Err bitreich.org 70 i Err bitreich.org 70 iDiffstat: Err bitreich.org 70 i M Makefile | 4 ++-- Err bitreich.org 70 i M iomenu.c | 19 +++++++++---------- Err bitreich.org 70 i D stest.1 | 90 ------------------------------- Err bitreich.org 70 i D stest.c | 162 ------------------------------ Err bitreich.org 70 i Err bitreich.org 70 i4 files changed, 11 insertions(+), 264 deletions(-) Err bitreich.org 70 i--- Err bitreich.org 70 1diff --git a/Makefile b/Makefile /scm/iomenu/file/Makefile.gph bitreich.org 70 i@@ -1,7 +1,7 @@ Err bitreich.org 70 i CFLAGS = -std=c99 -Wpedantic -Wall -Wextra -g # -static Err bitreich.org 70 i OBJ = ${SRC:.c=.o} Err bitreich.org 70 i Err bitreich.org 70 i-all: clean iomenu stest Err bitreich.org 70 i+all: clean iomenu Err bitreich.org 70 i Err bitreich.org 70 i clean: Err bitreich.org 70 i rm -f iomenu ${OBJ} Err bitreich.org 70 i@@ -9,4 +9,4 @@ clean: Err bitreich.org 70 i install: iomenu Err bitreich.org 70 i mkdir -p $(PREFIX)/bin $(PREFIX)/man/man1 Err bitreich.org 70 i cp *.1 $(PREFIX)/man/man1/ Err bitreich.org 70 i- cp iomenu stest $(PREFIX)/bin/ Err bitreich.org 70 i+ cp iomenu $(PREFIX)/bin/ Err bitreich.org 70 1diff --git a/iomenu.c b/iomenu.c /scm/iomenu/file/iomenu.c.gph bitreich.org 70 i@@ -10,7 +10,6 @@ Err bitreich.org 70 i #include Err bitreich.org 70 i Err bitreich.org 70 i Err bitreich.org 70 i-#define MARGIN 4 /* amount of space at the left and right of the feed */ Err bitreich.org 70 i #define CONTINUE 2 /* as opposed to EXIT_SUCCESS and EXIT_FAILURE */ Err bitreich.org 70 i Err bitreich.org 70 i #define CONTROL(char) (char ^ 0x40) Err bitreich.org 70 i@@ -177,15 +176,15 @@ print_lines(int count) Err bitreich.org 70 i offset = current / count * count; Err bitreich.org 70 i Err bitreich.org 70 i for (int i = offset; p < count && i < matchc; p++, i++) { Err bitreich.org 70 i- fputc('\n', stderr); Err bitreich.org 70 i+ char *s = format(matchv[i], ws.ws_col - 1); Err bitreich.org 70 i Err bitreich.org 70 i- fputs(i == current ? "\033[30;47m\033[K" : "\033[K", stderr); Err bitreich.org 70 i- Err bitreich.org 70 i- fprintf(stderr, Err bitreich.org 70 i- opt_s && matchv[i][0] == '#' ? "\033[1m%s" : " %s", Err bitreich.org 70 i- format(matchv[i], ws.ws_col - 2 * MARGIN)); Err bitreich.org 70 i- Err bitreich.org 70 i- fputs(" \033[m", stderr); Err bitreich.org 70 i+ if (opt_s && matchv[i][0] == '#') { Err bitreich.org 70 i+ fprintf(stderr, "\n\033[1m\033[K %s\033[m", s); Err bitreich.org 70 i+ } else if (i == current) { Err bitreich.org 70 i+ fprintf(stderr, "\n\033[30;47m\033[K %s\033[m", s); Err bitreich.org 70 i+ } else { Err bitreich.org 70 i+ fprintf(stderr, "\n\033[K %s\033[m", s); Err bitreich.org 70 i+ } Err bitreich.org 70 i } Err bitreich.org 70 i Err bitreich.org 70 i while (p++ < count) Err bitreich.org 70 i@@ -198,7 +197,7 @@ print_screen(void) Err bitreich.org 70 i { Err bitreich.org 70 i extern char formatted[BUFSIZ * 8]; Err bitreich.org 70 i Err bitreich.org 70 i- int cols = ws.ws_col - MARGIN; Err bitreich.org 70 i+ int cols = ws.ws_col - 1; Err bitreich.org 70 i Err bitreich.org 70 i fputs("\r\033[K", stderr); Err bitreich.org 70 i Err bitreich.org 70 1diff --git a/stest.1 b/stest.1 /scm/iomenu/file/stest.1.gph bitreich.org 70 i@@ -1,90 +0,0 @@ Err bitreich.org 70 i-.TH STEST 1 dmenu\-VERSION Err bitreich.org 70 i-.SH NAME Err bitreich.org 70 i-stest \- filter a list of files by properties Err bitreich.org 70 i-.SH SYNOPSIS Err bitreich.org 70 i-.B stest Err bitreich.org 70 i-.RB [ -abcdefghlpqrsuwx ] Err bitreich.org 70 i-.RB [ -n Err bitreich.org 70 i-.IR file ] Err bitreich.org 70 i-.RB [ -o Err bitreich.org 70 i-.IR file ] Err bitreich.org 70 i-.RI [ file ...] Err bitreich.org 70 i-.SH DESCRIPTION Err bitreich.org 70 i-.B stest Err bitreich.org 70 i-takes a list of files and filters by the files' properties, analogous to Err bitreich.org 70 i-.IR test (1). Err bitreich.org 70 i-Files which pass all tests are printed to stdout. If no files are given, stest Err bitreich.org 70 i-reads files from stdin. Err bitreich.org 70 i-.SH OPTIONS Err bitreich.org 70 i-.TP Err bitreich.org 70 i-.B \-a Err bitreich.org 70 i-Test hidden files. Err bitreich.org 70 i-.TP Err bitreich.org 70 i-.B \-b Err bitreich.org 70 i-Test that files are block specials. Err bitreich.org 70 i-.TP Err bitreich.org 70 i-.B \-c Err bitreich.org 70 i-Test that files are character specials. Err bitreich.org 70 i-.TP Err bitreich.org 70 i-.B \-d Err bitreich.org 70 i-Test that files are directories. Err bitreich.org 70 i-.TP Err bitreich.org 70 i-.B \-e Err bitreich.org 70 i-Test that files exist. Err bitreich.org 70 i-.TP Err bitreich.org 70 i-.B \-f Err bitreich.org 70 i-Test that files are regular files. Err bitreich.org 70 i-.TP Err bitreich.org 70 i-.B \-g Err bitreich.org 70 i-Test that files have their set-group-ID flag set. Err bitreich.org 70 i-.TP Err bitreich.org 70 i-.B \-h Err bitreich.org 70 i-Test that files are symbolic links. Err bitreich.org 70 i-.TP Err bitreich.org 70 i-.B \-l Err bitreich.org 70 i-Test the contents of a directory given as an argument. Err bitreich.org 70 i-.TP Err bitreich.org 70 i-.BI \-n " file" Err bitreich.org 70 i-Test that files are newer than Err bitreich.org 70 i-.IR file . Err bitreich.org 70 i-.TP Err bitreich.org 70 i-.BI \-o " file" Err bitreich.org 70 i-Test that files are older than Err bitreich.org 70 i-.IR file . Err bitreich.org 70 i-.TP Err bitreich.org 70 i-.B \-p Err bitreich.org 70 i-Test that files are named pipes. Err bitreich.org 70 i-.TP Err bitreich.org 70 i-.B \-q Err bitreich.org 70 i-No files are printed, only the exit status is returned. Err bitreich.org 70 i-.TP Err bitreich.org 70 i-.B \-r Err bitreich.org 70 i-Test that files are readable. Err bitreich.org 70 i-.TP Err bitreich.org 70 i-.B \-s Err bitreich.org 70 i-Test that files are not empty. Err bitreich.org 70 i-.TP Err bitreich.org 70 i-.B \-u Err bitreich.org 70 i-Test that files have their set-user-ID flag set. Err bitreich.org 70 i-.TP Err bitreich.org 70 i-.B \-v Err bitreich.org 70 i-Invert the sense of tests, only failing files pass. Err bitreich.org 70 i-.TP Err bitreich.org 70 i-.B \-w Err bitreich.org 70 i-Test that files are writable. Err bitreich.org 70 i-.TP Err bitreich.org 70 i-.B \-x Err bitreich.org 70 i-Test that files are executable. Err bitreich.org 70 i-.SH EXIT STATUS Err bitreich.org 70 i-.TP Err bitreich.org 70 i-.B 0 Err bitreich.org 70 i-At least one file passed all tests. Err bitreich.org 70 i-.TP Err bitreich.org 70 i-.B 1 Err bitreich.org 70 i-No files passed all tests. Err bitreich.org 70 i-.TP Err bitreich.org 70 i-.B 2 Err bitreich.org 70 i-An error occurred. Err bitreich.org 70 i-.SH SEE ALSO Err bitreich.org 70 i-.IR dmenu (1), Err bitreich.org 70 i-.IR test (1) Err bitreich.org 70 1diff --git a/stest.c b/stest.c /scm/iomenu/file/stest.c.gph bitreich.org 70 i@@ -1,162 +0,0 @@ Err bitreich.org 70 i-/* MIT/X Consortium License Err bitreich.org 70 i- * Err bitreich.org 70 i- * copyright (c) 2006-2014 Anselm R Garbe Err bitreich.org 70 i- * copyright (c) 2010-2012 Connor Lane Smith Err bitreich.org 70 i- * copyright (c) 2009 Gottox Err bitreich.org 70 i- * copyright (c) 2009 Markus Schnalke Err bitreich.org 70 i- * copyright (c) 2009 Evan Gates Err bitreich.org 70 i- * copyright (c) 2006-2008 Sander van Dijk Err bitreich.org 70 i- * copyright (c) 2006-2007 Michał Janeczek Err bitreich.org 70 i- * copyright (c) 2014-2015 Hiltjo Posthuma Err bitreich.org 70 i- * Err bitreich.org 70 i- * Permission is hereby granted, free of charge, to any person obtaining a Err bitreich.org 70 i- * copy of this software and associated documentation files (the "Software"), Err bitreich.org 70 i- * to deal in the Software without restriction, including without limitation Err bitreich.org 70 i- * the rights to use, copy, modify, merge, publish, distribute, sublicense, Err bitreich.org 70 i- * and/or sell copies of the Software, and to permit persons to whom the Err bitreich.org 70 i- * Software is furnished to do so, subject to the following conditions: Err bitreich.org 70 i- * Err bitreich.org 70 i- * The above copyright notice and this permission notice shall be included in Err bitreich.org 70 i- * all copies or substantial portions of the Software. Err bitreich.org 70 i- * Err bitreich.org 70 i- * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR Err bitreich.org 70 i- * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, Err bitreich.org 70 i- * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL Err bitreich.org 70 i- * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER Err bitreich.org 70 i- * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING Err bitreich.org 70 i- * FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER Err bitreich.org 70 i- * DEALINGS IN THE SOFTWARE. Err bitreich.org 70 i- */ Err bitreich.org 70 i- Err bitreich.org 70 i-#define _POSIX_C_SOURCE 200809L Err bitreich.org 70 i- Err bitreich.org 70 i-#include Err bitreich.org 70 i- Err bitreich.org 70 i-#include Err bitreich.org 70 i-#include Err bitreich.org 70 i-#include Err bitreich.org 70 i-#include Err bitreich.org 70 i-#include Err bitreich.org 70 i-#include Err bitreich.org 70 i- Err bitreich.org 70 i-static char *argv0; Err bitreich.org 70 i- Err bitreich.org 70 i-#define FLAG(x) (flag[(x)-'a']) Err bitreich.org 70 i- Err bitreich.org 70 i-static void test(const char *, const char *); Err bitreich.org 70 i-static void usage(void); Err bitreich.org 70 i- Err bitreich.org 70 i-static int match = 0; Err bitreich.org 70 i-static int flag[26]; Err bitreich.org 70 i-static struct stat old, new; Err bitreich.org 70 i- Err bitreich.org 70 i-static void Err bitreich.org 70 i-test(const char *path, const char *name) Err bitreich.org 70 i-{ Err bitreich.org 70 i- struct stat st, ln; Err bitreich.org 70 i- Err bitreich.org 70 i- if ((!stat(path, &st) && (FLAG('a') || name[0] != '.') /* hidden files */ Err bitreich.org 70 i- && (!FLAG('b') || S_ISBLK(st.st_mode)) /* block special */ Err bitreich.org 70 i- && (!FLAG('c') || S_ISCHR(st.st_mode)) /* character special */ Err bitreich.org 70 i- && (!FLAG('d') || S_ISDIR(st.st_mode)) /* directory */ Err bitreich.org 70 i- && (!FLAG('e') || access(path, F_OK) == 0) /* exists */ Err bitreich.org 70 i- && (!FLAG('f') || S_ISREG(st.st_mode)) /* regular file */ Err bitreich.org 70 i- && (!FLAG('g') || st.st_mode & S_ISGID) /* set-group-id flag */ Err bitreich.org 70 i- && (!FLAG('h') || (!lstat(path, &ln) && S_ISLNK(ln.st_mode))) /* symbolic link */ Err bitreich.org 70 i- && (!FLAG('n') || st.st_mtime > new.st_mtime) /* newer than file */ Err bitreich.org 70 i- && (!FLAG('o') || st.st_mtime < old.st_mtime) /* older than file */ Err bitreich.org 70 i- && (!FLAG('p') || S_ISFIFO(st.st_mode)) /* named pipe */ Err bitreich.org 70 i- && (!FLAG('r') || access(path, R_OK) == 0) /* readable */ Err bitreich.org 70 i- && (!FLAG('s') || st.st_size > 0) /* not empty */ Err bitreich.org 70 i- && (!FLAG('u') || st.st_mode & S_ISUID) /* set-user-id flag */ Err bitreich.org 70 i- && (!FLAG('w') || access(path, W_OK) == 0) /* writable */ Err bitreich.org 70 i- && (!FLAG('x') || access(path, X_OK) == 0)) != FLAG('v')) { /* executable */ Err bitreich.org 70 i- if (FLAG('q')) Err bitreich.org 70 i- exit(0); Err bitreich.org 70 i- match = 1; Err bitreich.org 70 i- puts(name); Err bitreich.org 70 i- } Err bitreich.org 70 i-} Err bitreich.org 70 i- Err bitreich.org 70 i-static void Err bitreich.org 70 i-usage(void) Err bitreich.org 70 i-{ Err bitreich.org 70 i- fprintf(stderr, "usage: %s [-abcdefghlpqrsuvwx] " Err bitreich.org 70 i- "[-n file] [-o file] [file...]\n", argv0); Err bitreich.org 70 i- exit(2); /* like test(1) return > 1 on error */ Err bitreich.org 70 i-} Err bitreich.org 70 i- Err bitreich.org 70 i-int Err bitreich.org 70 i-main(int argc, char *argv[]) Err bitreich.org 70 i-{ Err bitreich.org 70 i- struct dirent *d; Err bitreich.org 70 i- char path[PATH_MAX], *line = NULL, *file; Err bitreich.org 70 i- size_t linesiz = 0; Err bitreich.org 70 i- ssize_t n; Err bitreich.org 70 i- DIR *dir; Err bitreich.org 70 i- int r; Err bitreich.org 70 i- Err bitreich.org 70 i- for ( Err bitreich.org 70 i- argv0 = *argv, argv++, argc--; Err bitreich.org 70 i- argv[0] && argv[0][0] == '-' && argv[0][1]; Err bitreich.org 70 i- argv++, argc-- Err bitreich.org 70 i- ) { Err bitreich.org 70 i- int brk = 0; Err bitreich.org 70 i- Err bitreich.org 70 i- if (argv[0][1] == '-' && argv[0][2] == '\0') { Err bitreich.org 70 i- argv++, argc--; Err bitreich.org 70 i- break; Err bitreich.org 70 i- } Err bitreich.org 70 i- Err bitreich.org 70 i- for (argv[0]++; !brk && argv[0][0]; argv[0]++) { Err bitreich.org 70 i- char f = argv[0][1]; Err bitreich.org 70 i- Err bitreich.org 70 i- switch (f) { Err bitreich.org 70 i- Err bitreich.org 70 i- case 'n': /* newer than file */ Err bitreich.org 70 i- case 'o': /* older than file */ Err bitreich.org 70 i- if (argv[0][1] == '\0' && argv[1] == NULL) Err bitreich.org 70 i- usage(); Err bitreich.org 70 i- Err bitreich.org 70 i- file = (brk = 1, (argv[0][1] != '\0') ? Err bitreich.org 70 i- (&argv[0][1]) : (argc--, argv++, argv[0])); Err bitreich.org 70 i- Err bitreich.org 70 i- if (!(FLAG(f) = !stat(file, (f == 'n' ? &new : &old)))) Err bitreich.org 70 i- perror(file); Err bitreich.org 70 i- break; Err bitreich.org 70 i- default: Err bitreich.org 70 i- /* miscellaneous operators */ Err bitreich.org 70 i- if (strchr("abcdefghlpqrsuvwx", f)) Err bitreich.org 70 i- FLAG(f) = 1; Err bitreich.org 70 i- else Err bitreich.org 70 i- usage(); /* unknown flag */ Err bitreich.org 70 i- } Err bitreich.org 70 i- } Err bitreich.org 70 i- } Err bitreich.org 70 i- Err bitreich.org 70 i- if (!argc) { Err bitreich.org 70 i- /* read list from stdin */ Err bitreich.org 70 i- while ((n = getline(&line, &linesiz, stdin)) > 0) { Err bitreich.org 70 i- if (n && line[n - 1] == '\n') Err bitreich.org 70 i- line[n - 1] = '\0'; Err bitreich.org 70 i- test(line, line); Err bitreich.org 70 i- } Err bitreich.org 70 i- free(line); Err bitreich.org 70 i- } else { Err bitreich.org 70 i- for (; argc; argc--, argv++) { Err bitreich.org 70 i- if (FLAG('l') && (dir = opendir(*argv))) { Err bitreich.org 70 i- /* test directory contents */ Err bitreich.org 70 i- while ((d = readdir(dir))) { Err bitreich.org 70 i- r = snprintf(path, sizeof path, "%s/%s", Err bitreich.org 70 i- *argv, d->d_name); Err bitreich.org 70 i- if (r >= 0 && (size_t)r < sizeof path) Err bitreich.org 70 i- test(path, d->d_name); Err bitreich.org 70 i- } Err bitreich.org 70 i- closedir(dir); Err bitreich.org 70 i- } else { Err bitreich.org 70 i- test(*argv, *argv); Err bitreich.org 70 i- } Err bitreich.org 70 i- } Err bitreich.org 70 i- } Err bitreich.org 70 i- return match ? 0 : 1; Err bitreich.org 70 i-} Err bitreich.org 70 .