nnn/nnn.c

1435 lines
30 KiB
C
Raw Normal View History

2015-11-20 14:36:40 +00:00
/* See LICENSE file for copyright and license details. */
#include <sys/stat.h>
2014-10-07 06:05:30 +00:00
#include <sys/types.h>
2014-10-22 15:27:08 +00:00
#include <sys/wait.h>
2014-10-07 06:05:30 +00:00
2015-06-09 08:12:17 +00:00
#include <curses.h>
#include <dirent.h>
2014-10-07 06:05:30 +00:00
#include <errno.h>
#include <fcntl.h>
#include <limits.h>
2014-10-07 06:05:30 +00:00
#include <locale.h>
2014-10-09 09:33:49 +00:00
#include <regex.h>
2015-06-09 08:12:17 +00:00
#include <signal.h>
#include <stdarg.h>
2014-10-07 06:05:30 +00:00
#include <stdio.h>
2015-06-09 08:12:17 +00:00
#include <stdlib.h>
2014-10-07 06:05:30 +00:00
#include <string.h>
#include <unistd.h>
2017-03-30 04:39:21 +00:00
#include <time.h>
#include <pwd.h>
#include <grp.h>
2014-10-07 06:05:30 +00:00
#ifdef DEBUG
2014-10-08 08:36:17 +00:00
#define DEBUG_FD 8
2017-04-02 02:45:07 +00:00
#define DPRINTF_D(x) xprintf(DEBUG_FD, #x "=%d\n", x)
#define DPRINTF_U(x) xprintf(DEBUG_FD, #x "=%u\n", x)
#define DPRINTF_S(x) xprintf(DEBUG_FD, #x "=%s\n", x)
#define DPRINTF_P(x) xprintf(DEBUG_FD, #x "=0x%p\n", x)
2014-10-07 06:05:30 +00:00
#else
#define DPRINTF_D(x)
2014-10-08 08:36:17 +00:00
#define DPRINTF_U(x)
2014-10-07 06:05:30 +00:00
#define DPRINTF_S(x)
#define DPRINTF_P(x)
#endif /* DEBUG */
#define LEN(x) (sizeof(x) / sizeof(*(x)))
2014-10-22 16:41:16 +00:00
#undef MIN
2014-10-07 06:49:46 +00:00
#define MIN(x, y) ((x) < (y) ? (x) : (y))
#define ISODD(x) ((x) & 1)
#define CONTROL(c) ((c) ^ 0x40)
#define TOUPPER(ch) \
(((ch) >= 'a' && (ch) <= 'z') ? ((ch) - 'a' + 'A') : (ch))
2017-04-01 07:26:25 +00:00
#define MAX_CMD_LEN (PATH_MAX << 1)
#define CURSYM(flag) (flag ? CURSR : EMPTY)
2014-10-07 06:05:30 +00:00
2014-10-07 15:36:29 +00:00
struct assoc {
2014-10-09 09:33:49 +00:00
char *regex; /* Regex to match on filename */
char *bin; /* Program */
2014-10-07 15:36:29 +00:00
};
/* Supported actions */
enum action {
SEL_QUIT = 1,
SEL_BACK,
SEL_GOIN,
SEL_FLTR,
SEL_NEXT,
SEL_PREV,
SEL_PGDN,
SEL_PGUP,
SEL_HOME,
SEL_END,
SEL_CD,
SEL_CDHOME,
SEL_TOGGLEDOT,
SEL_DETAIL,
SEL_STATS,
SEL_FSIZE,
SEL_MTIME,
SEL_REDRAW,
SEL_COPY,
2017-04-03 17:03:46 +00:00
SEL_HELP,
SEL_RUN,
SEL_RUNARG,
};
struct key {
int sym; /* Key pressed */
enum action act; /* Action */
char *run; /* Program to run */
char *env; /* Environment variable to run */
};
2014-10-21 10:15:27 +00:00
#include "config.h"
2014-10-07 15:36:29 +00:00
2017-04-01 07:26:25 +00:00
typedef struct entry {
char name[PATH_MAX];
mode_t mode;
time_t t;
off_t size;
2017-04-01 07:26:25 +00:00
} *pEntry;
/* Global context */
2017-04-01 09:11:07 +00:00
static struct entry *dents;
static int ndents, cur;
static int idle;
2017-04-01 12:02:58 +00:00
static char *opener;
static char *fallback_opener;
static char *copier;
2017-04-01 09:11:07 +00:00
static const char* size_units[] = {"B", "K", "M", "G", "T", "P", "E", "Z", "Y"};
2014-10-07 06:05:30 +00:00
/*
* Layout:
* .---------
* | cwd: /mnt/path
* |
2014-10-07 14:55:14 +00:00
* | file0
2014-10-07 06:05:30 +00:00
* | file1
2014-10-07 14:55:14 +00:00
* | > file2
* | file3
* | file4
2014-10-07 06:05:30 +00:00
* ...
* | filen
* |
2014-10-07 14:55:14 +00:00
* | Permission denied
2014-10-07 06:05:30 +00:00
* '------
*/
2017-04-01 09:11:07 +00:00
static void printmsg(char *);
static void printwarn(void);
static void printerr(int, char *);
2017-04-01 09:11:07 +00:00
static int
2017-04-02 02:45:07 +00:00
xprintf(int fd, const char *fmt, ...)
{
char buf[BUFSIZ];
int r;
va_list ap;
va_start(ap, fmt);
r = vsnprintf(buf, sizeof(buf), fmt, ap);
if (r > 0)
r = write(fd, buf, r);
va_end(ap);
return r;
}
2017-04-01 09:11:07 +00:00
static void *
2014-10-22 13:15:27 +00:00
xrealloc(void *p, size_t size)
2014-10-22 13:10:04 +00:00
{
2014-10-22 13:15:27 +00:00
p = realloc(p, size);
if (p == NULL)
2014-10-22 13:10:04 +00:00
printerr(1, "realloc");
2014-10-22 13:15:27 +00:00
return p;
}
static size_t
xstrlcpy(char *dest, const char *src, size_t n)
{
size_t i;
for (i = 0; i < n && *src; i++)
*dest++ = *src++;
if (n) {
*dest = '\0';
#ifdef CHECK_XSTRLCPY_RET
/* Compiling this out as we are not checking
the return value anywhere (controlled case).
Just returning the number of bytes copied. */
while(*src++)
i++;
#endif
}
return i;
}
2017-04-01 12:02:58 +00:00
/*
* The poor man's implementation of memrchr(3).
2017-04-01 12:02:58 +00:00
* We are only looking for '/' in this program.
*/
static void *
xmemrchr(const void *s, int c, size_t n)
{
unsigned char *p;
unsigned char ch = (unsigned char)c;
if (!s || !n)
return NULL;
p = (unsigned char *)s + n - 1;
while(n--)
if ((*p--) == ch)
return ++p;
return NULL;
}
#if 0
/* Some implementations of dirname(3) may modify `path' and some
* return a pointer inside `path'. */
2017-04-01 09:11:07 +00:00
static char *
xdirname(const char *path)
{
static char out[PATH_MAX];
char tmp[PATH_MAX], *p;
xstrlcpy(tmp, path, sizeof(tmp));
p = dirname(tmp);
if (p == NULL)
printerr(1, "dirname");
xstrlcpy(out, p, sizeof(out));
return out;
}
2017-04-01 12:02:58 +00:00
#endif
/*
* The following dirname(3) implementation does not
2017-04-01 12:02:58 +00:00
* change the input. We use a copy of the original.
*
* Modified from the glibc (GNU LGPL) version.
*/
static char *
xdirname(const char *path)
{
static char name[PATH_MAX];
char *last_slash;
xstrlcpy(name, path, PATH_MAX);
2017-04-01 12:02:58 +00:00
/* Find last '/'. */
last_slash = strrchr(name, '/');
2017-04-01 12:02:58 +00:00
if (last_slash != NULL && last_slash != name && last_slash[1] == '\0') {
/* Determine whether all remaining characters are slashes. */
char *runp;
for (runp = last_slash; runp != name; --runp)
if (runp[-1] != '/')
break;
/* The '/' is the last character, we have to look further. */
if (runp != name)
last_slash = xmemrchr(name, '/', runp - name);
}
if (last_slash != NULL) {
/* Determine whether all remaining characters are slashes. */
char *runp;
for (runp = last_slash; runp != name; --runp)
if (runp[-1] != '/')
break;
/* Terminate the name. */
if (runp == name) {
/* The last slash is the first character in the string.
We have to return "/". As a special case we have to
return "//" if there are exactly two slashes at the
beginning of the string. See XBD 4.10 Path Name
Resolution for more information. */
if (last_slash == name + 1)
++last_slash;
else
last_slash = name + 1;
} else
last_slash = runp;
last_slash[0] = '\0';
} else {
/* This assignment is ill-designed but the XPG specs require to
return a string containing "." in any case no directory part
is found and so a static and constant string is required. */
name[0] = '.';
name[1] = '\0';
}
return name;
}
2017-04-01 09:11:07 +00:00
static void
2016-02-08 16:59:19 +00:00
spawn(char *file, char *arg, char *dir)
{
pid_t pid;
int status;
pid = fork();
if (pid == 0) {
if (dir != NULL)
status = chdir(dir);
execlp(file, file, arg, NULL);
_exit(1);
} else {
/* Ignore interruptions */
while (waitpid(pid, &status, 0) == -1)
DPRINTF_D(status);
DPRINTF_D(pid);
}
}
2017-04-01 09:11:07 +00:00
static char *
xgetenv(char *name, char *fallback)
{
2015-11-26 13:42:41 +00:00
char *value;
if (name == NULL)
return fallback;
2015-11-26 13:42:41 +00:00
value = getenv(name);
return value && value[0] ? value : fallback;
}
int xisdigit(const char c) {
if (c >= '0' && c <= '9') \
return 1; \
return 0;
}
/*
* We assume none of the strings are NULL.
*
* Let's have the logic to sort numeric names in numeric order.
* E.g., the order '1, 10, 2' doesn't make sense to human eyes.
*
* If the absolute numeric values are same, we fallback to alphasort.
*/
2017-04-01 09:11:07 +00:00
static int
xstricmp(const char *s1, const char *s2)
{
static char *c1, *c2;
static long long num1, num2;
num1 = strtoll(s1, &c1, 10);
num2 = strtoll(s2, &c2, 10);
if (*c1 == '\0' && *c2 == '\0') {
if (num1 != num2) {
if (num1 > num2)
return 1;
else
return -1;
}
} else if (*c1 == '\0' && *c2 != '\0')
return -1;
else if (*c1 != '\0' && *c2 == '\0')
return 1;
while (*s2 && *s1 && TOUPPER(*s1) == TOUPPER(*s2))
s1++, s2++;
/* In case of alphabetically same names, make sure
lower case one comes before upper case one */
if (!*s1 && !*s2)
return 1;
return (int) (TOUPPER(*s1) - TOUPPER(*s2));
}
2017-04-01 09:11:07 +00:00
static char *
openwith(char *file)
2014-10-07 06:05:30 +00:00
{
2014-10-09 09:33:49 +00:00
regex_t regex;
char *bin = NULL;
2017-04-01 09:11:07 +00:00
unsigned int i;
2014-10-07 06:05:30 +00:00
2014-10-09 09:33:49 +00:00
for (i = 0; i < LEN(assocs); i++) {
if (regcomp(&regex, assocs[i].regex,
REG_NOSUB | REG_EXTENDED | REG_ICASE) != 0)
2014-10-09 09:33:49 +00:00
continue;
if (regexec(&regex, file, 0, NULL, 0) == 0) {
bin = assocs[i].bin;
2014-10-09 09:33:49 +00:00
break;
}
}
DPRINTF_S(bin);
return bin;
2014-10-07 06:05:30 +00:00
}
2017-04-01 09:11:07 +00:00
static int
setfilter(regex_t *regex, char *filter)
{
char errbuf[LINE_MAX];
size_t len;
int r;
r = regcomp(regex, filter, REG_NOSUB | REG_EXTENDED | REG_ICASE);
if (r != 0) {
len = COLS;
if (len > sizeof(errbuf))
len = sizeof(errbuf);
regerror(r, regex, errbuf, len);
printmsg(errbuf);
}
return r;
}
2017-04-01 09:11:07 +00:00
static void
initfilter(int dot, char **ifilter)
{
*ifilter = dot ? "." : "^[^.]";
}
2017-04-01 09:11:07 +00:00
static int
visible(regex_t *regex, char *file)
{
2014-12-20 19:21:03 +00:00
return regexec(regex, file, 0, NULL, 0) == 0;
}
2017-04-01 09:11:07 +00:00
static int
entrycmp(const void *va, const void *vb)
2014-10-07 06:05:30 +00:00
{
2017-04-01 20:18:33 +00:00
static pEntry pa, pb;
pa = (pEntry)va;
pb = (pEntry)vb;
/* Sort directories first */
if (S_ISDIR(pb->mode) && !S_ISDIR(pa->mode))
return 1;
else if (S_ISDIR(pa->mode) && !S_ISDIR(pb->mode))
return -1;
/* Do the actual sorting */
if (mtimeorder)
2017-04-01 20:18:33 +00:00
return pb->t - pa->t;
if (sizeorder)
if (pb->size != pa->size)
return pb->size - pa->size;
2017-04-01 20:18:33 +00:00
return xstricmp(pa->name, pb->name);
2014-10-07 06:05:30 +00:00
}
2017-04-01 09:11:07 +00:00
static void
2014-10-07 11:37:23 +00:00
initcurses(void)
{
if (initscr() == NULL) {
2017-03-29 14:12:23 +00:00
char *term = getenv("TERM");
if (term != NULL)
fprintf(stderr, "error opening terminal: %s\n", term);
else
fprintf(stderr, "failed to initialize curses\n");
exit(1);
}
2014-10-07 11:37:23 +00:00
cbreak();
noecho();
nonl();
intrflush(stdscr, FALSE);
keypad(stdscr, TRUE);
curs_set(FALSE); /* Hide cursor */
timeout(1000); /* One second */
2014-10-07 11:37:23 +00:00
}
2017-04-01 09:11:07 +00:00
static void
2014-10-07 11:37:23 +00:00
exitcurses(void)
{
endwin(); /* Restore terminal */
}
2014-10-07 14:47:35 +00:00
/* Messages show up at the bottom */
2017-04-01 09:11:07 +00:00
static void
2014-10-07 14:47:35 +00:00
printmsg(char *msg)
2014-10-07 06:05:30 +00:00
{
move(LINES - 1, 0);
2014-10-07 14:47:35 +00:00
printw("%s\n", msg);
}
/* Display warning as a message */
2017-04-01 09:11:07 +00:00
static void
2014-10-07 14:47:35 +00:00
printwarn(void)
{
printmsg(strerror(errno));
2014-10-07 06:05:30 +00:00
}
/* Kill curses and display error before exiting */
2017-04-01 09:11:07 +00:00
static void
2014-10-07 06:05:30 +00:00
printerr(int ret, char *prefix)
{
2014-10-07 17:59:41 +00:00
exitcurses();
2014-10-22 13:08:16 +00:00
fprintf(stderr, "%s: %s\n", prefix, strerror(errno));
2014-10-07 06:05:30 +00:00
exit(ret);
}
/* Clear the last line */
2017-04-01 09:11:07 +00:00
static void
clearprompt(void)
{
printmsg("");
}
/* Print prompt on the last line */
2017-04-01 09:11:07 +00:00
static void
printprompt(char *str)
{
clearprompt();
printw(str);
}
2016-02-08 17:22:30 +00:00
/* Returns SEL_* if key is bound and 0 otherwise.
* Also modifies the run and env pointers (used on SEL_{RUN,RUNARG}) */
2017-04-01 09:11:07 +00:00
static int
nextsel(char **run, char **env)
2014-10-07 06:05:30 +00:00
{
2017-04-01 09:11:07 +00:00
int c;
unsigned int i;
2014-10-07 06:05:30 +00:00
c = getch();
if (c == -1)
idle++;
else
idle = 0;
2014-12-20 19:14:10 +00:00
for (i = 0; i < LEN(bindings); i++)
if (c == bindings[i].sym) {
*run = bindings[i].run;
*env = bindings[i].env;
return bindings[i].act;
}
2014-10-07 06:05:30 +00:00
return 0;
}
2017-04-01 09:11:07 +00:00
static char *
readln(void)
{
static char ln[LINE_MAX];
timeout(-1);
echo();
curs_set(TRUE);
2015-11-20 11:55:41 +00:00
memset(ln, 0, sizeof(ln));
wgetnstr(stdscr, ln, sizeof(ln) - 1);
noecho();
curs_set(FALSE);
timeout(1000);
return ln[0] ? ln : NULL;
}
2017-04-01 09:11:07 +00:00
static int
2014-10-22 16:26:35 +00:00
canopendir(char *path)
2014-10-07 06:05:30 +00:00
{
DIR *dirp;
dirp = opendir(path);
2014-12-20 19:35:27 +00:00
if (dirp == NULL)
2014-10-07 06:05:30 +00:00
return 0;
2014-12-20 19:35:27 +00:00
closedir(dirp);
return 1;
2014-10-07 06:05:30 +00:00
}
2017-04-02 08:48:54 +00:00
/*
* Returns "dir/name or "/name"
*/
2017-04-01 09:11:07 +00:00
static char *
mkpath(char *dir, char *name, char *out, size_t n)
{
/* Handle absolute path */
2017-03-29 14:12:23 +00:00
if (name[0] == '/')
xstrlcpy(out, name, n);
2017-03-29 14:12:23 +00:00
else {
/* Handle root case */
2017-03-29 14:12:23 +00:00
if (strcmp(dir, "/") == 0)
snprintf(out, n, "/%s", name);
else
snprintf(out, n, "%s/%s", dir, name);
}
return out;
}
2017-04-01 09:11:07 +00:00
static void
printent(struct entry *ent, int active)
{
2017-03-29 20:55:51 +00:00
if (S_ISDIR(ent->mode))
printw("%s%s/\n", CURSYM(active), ent->name);
2017-03-29 20:55:51 +00:00
else if (S_ISLNK(ent->mode))
printw("%s%s@\n", CURSYM(active), ent->name);
2017-03-29 20:55:51 +00:00
else if (S_ISSOCK(ent->mode))
printw("%s%s=\n", CURSYM(active), ent->name);
2017-03-29 20:55:51 +00:00
else if (S_ISFIFO(ent->mode))
printw("%s%s|\n", CURSYM(active), ent->name);
2017-03-29 20:55:51 +00:00
else if (ent->mode & S_IXUSR)
printw("%s%s*\n", CURSYM(active), ent->name);
else
printw("%s%s\n", CURSYM(active), ent->name);
}
2017-04-01 09:11:07 +00:00
static void (*printptr)(struct entry *ent, int active) = &printent;
2017-04-01 05:18:18 +00:00
2017-04-01 09:11:07 +00:00
static char*
coolsize(off_t size)
{
2017-04-01 07:26:25 +00:00
static char size_buf[12]; /* Buffer to hold human readable size */
int i = 0;
long double fsize = (double)size;
while (fsize > 1024) {
fsize /= 1024;
i++;
}
snprintf(size_buf, 12, "%.*Lf%s", i, fsize, size_units[i]);
return size_buf;
}
2017-04-01 09:11:07 +00:00
static void
printent_long(struct entry *ent, int active)
{
2017-03-30 04:39:21 +00:00
static char buf[18];
strftime(buf, 18, "%b %d %H:%M %Y", localtime(&ent->t));
2017-03-30 04:39:21 +00:00
if (active)
attron(A_REVERSE);
if (S_ISDIR(ent->mode))
2017-04-01 07:26:25 +00:00
printw("%s%-17.17s / %s/\n",
CURSYM(active), buf, ent->name);
else if (S_ISLNK(ent->mode))
2017-04-01 07:26:25 +00:00
printw("%s%-17.17s @ %s@\n",
CURSYM(active), buf, ent->name);
else if (S_ISSOCK(ent->mode))
2017-04-01 07:26:25 +00:00
printw("%s%-17.17s = %s=\n",
CURSYM(active), buf, ent->name);
else if (S_ISFIFO(ent->mode))
2017-04-01 07:26:25 +00:00
printw("%s%-17.17s | %s|\n",
CURSYM(active), buf, ent->name);
else if (S_ISBLK(ent->mode))
2017-04-01 07:26:25 +00:00
printw("%s%-17.17s b %s\n",
CURSYM(active), buf, ent->name);
else if (S_ISCHR(ent->mode))
2017-04-01 07:26:25 +00:00
printw("%s%-17.17s c %s\n",
CURSYM(active), buf, ent->name);
else if (ent->mode & S_IXUSR)
2017-04-01 07:26:25 +00:00
printw("%s%-17.17s %8.8s* %s*\n", CURSYM(active),
buf, coolsize(ent->size), ent->name);
else
2017-04-01 07:26:25 +00:00
printw("%s%-17.17s %8.8s %s\n", CURSYM(active),
buf, coolsize(ent->size), ent->name);
if (active)
attroff(A_REVERSE);
}
static char
get_fileind(mode_t mode, char *desc)
{
char c;
if (S_ISREG(mode)) {
c = '-';
sprintf(desc, "%s", "regular file");
if (mode & S_IXUSR)
strcat(desc, ", executable");
} else if (S_ISDIR(mode)) {
c = 'd';
sprintf(desc, "%s", "directory");
} else if (S_ISBLK(mode)) {
c = 'b';
sprintf(desc, "%s", "block special device");
} else if (S_ISCHR(mode)) {
c = 'c';
sprintf(desc, "%s", "character special device");
#ifdef S_ISFIFO
} else if (S_ISFIFO(mode)) {
c = 'p';
sprintf(desc, "%s", "FIFO");
#endif /* S_ISFIFO */
#ifdef S_ISLNK
} else if (S_ISLNK(mode)) {
c = 'l';
sprintf(desc, "%s", "symbolic link");
#endif /* S_ISLNK */
#ifdef S_ISSOCK
} else if (S_ISSOCK(mode)) {
c = 's';
sprintf(desc, "%s", "socket");
#endif /* S_ISSOCK */
#ifdef S_ISDOOR
/* Solaris 2.6, etc. */
} else if (S_ISDOOR(mode)) {
c = 'D';
desc[0] = '\0';
#endif /* S_ISDOOR */
} else {
/* Unknown type -- possibly a regular file? */
c = '?';
desc[0] = '\0';
}
return(c);
}
/* Convert a mode field into "ls -l" type perms field. */
static char *
get_lsperms(mode_t mode, char *desc)
{
static const char *rwx[] = {"---", "--x", "-w-", "-wx",
"r--", "r-x", "rw-", "rwx"};
static char bits[11];
bits[0] = get_fileind(mode, desc);
strcpy(&bits[1], rwx[(mode >> 6) & 7]);
strcpy(&bits[4], rwx[(mode >> 3) & 7]);
strcpy(&bits[7], rwx[(mode & 7)]);
if (mode & S_ISUID)
bits[3] = (mode & S_IXUSR) ? 's' : 'S';
if (mode & S_ISGID)
bits[6] = (mode & S_IXGRP) ? 's' : 'l';
if (mode & S_ISVTX)
bits[9] = (mode & S_IXOTH) ? 't' : 'T';
bits[10] = '\0';
return(bits);
}
char *
get_output(char *buf, size_t bytes)
{
char *ret;
FILE *pf = popen(buf, "r");
if (pf) {
ret = fgets(buf, bytes, pf);
pclose(pf);
return ret;
}
return NULL;
}
/*
* Follows the stat(1) output closely
*/
void
show_stats(char* fpath, char* fname, struct stat *sb)
{
char buf[PATH_MAX + 48];
char *perms = get_lsperms(sb->st_mode, buf);
FILE *pf;
char *p, *begin = buf;
clear();
/* Show file name or 'symlink' -> 'target' */
if (perms[0] == 'l') {
char symtgt[PATH_MAX];
ssize_t len = readlink(fpath, symtgt, PATH_MAX);
if (len != -1) {
symtgt[len] = '\0';
printw("\n\n File: '%s' -> '%s'", fname, symtgt);
}
} else
printw("\n File: '%s'", fname);
/* Show size, blocks, file type */
printw("\n Size: %-15llu Blocks: %-10llu IO Block: %-6llu %s",
sb->st_size, sb->st_blocks, sb->st_blksize, buf);
/* Show containing device, inode, hardlink count */
sprintf(buf, "%lxh/%lud", sb->st_dev, sb->st_dev);
printw("\n Device: %-15s Inode: %-11lu Links: %-9lu",
buf, sb->st_ino, sb->st_nlink);
/* Show major, minor number for block or char device */
if (perms[0] == 'b' || perms[0] == 'c')
printw(" Device type: %lx,%lx",
major(sb->st_rdev), minor(sb->st_rdev));
/* Show permissions, owner, group */
printw("\n Access: 0%d%d%d/%s Uid: (%lu/%s) Gid: (%lu/%s)",
(sb->st_mode >> 6) & 7, (sb->st_mode >> 3) & 7, sb->st_mode & 7,
perms,
sb->st_uid, (getpwuid(sb->st_uid))->pw_name,
sb->st_gid, (getgrgid(sb->st_gid))->gr_name);
/* Show last access time */
strftime(buf, 40, "%a %d-%b-%Y %T %z,%Z", localtime(&sb->st_atime));
printw("\n\n Access: %s", buf);
/* Show last modification time */
strftime(buf, 40, "%a %d-%b-%Y %T %z,%Z", localtime(&sb->st_mtime));
printw("\n Modify: %s", buf);
/* Show last status change time */
strftime(buf, 40, "%a %d-%b-%Y %T %z,%Z", localtime(&sb->st_ctime));
printw("\n Change: %s", buf);
if (S_ISREG(sb->st_mode)) {
/* Show file(1) output */
sprintf(buf, "file -b \"%s\" 2>&1", fpath);
p = get_output(buf, PATH_MAX + 48);
if (p) {
printw("\n\n ");
while (*p) {
if (*p == ',') {
*p = '\0';
printw(" %s\n", begin);
begin = p + 1;
}
p++;
}
printw(" %s", begin);
}
/* Show md5 */
sprintf(buf, "openssl md5 \"%s\" 2>&1", fpath);
p = get_output(buf, PATH_MAX + 48);
if (p) {
p = xmemrchr(buf, ' ', strlen(buf));
if (!p)
p = buf;
else
p++;
printw("\n md5: %s", p);
}
/* Show sha256 */
sprintf(buf, "openssl sha256 \"%s\" 2>&1", fpath);
p = get_output(buf, PATH_MAX + 48);
if (p) {
p = xmemrchr(buf, ' ', strlen(buf));
if (!p)
p = buf;
else
p++;
printw(" sha256: %s", p);
}
}
/* Show exit keys */
printw("\n\n << (q/Esc)");
while (*buf = getch())
if (*buf == 'q' || *buf == 27)
return;
}
2017-04-03 17:03:46 +00:00
void
show_help(void)
{
char c;
clear();
printw("\n\
<< Key >> << Function >>\n\n\
[Up], k, ^P Previous entry\n\
[Down], j, ^N Next entry\n\
[PgUp], ^U Scroll half page up\n\
[PgDn], ^D Scroll half page down\n\
[Home], ^, ^A Jump to first dir entry\n\
[End], $, ^E Jump to last dir entry\n\
[Right], [Enter], l, ^M Open file or enter dir\n\
[Left], [Backspace], h, ^H Go to parent dir\n\
~ Jump to HOME dir\n\
/, & Filter dir contents\n\
c Show change dir prompt\n\
d Toggle detail view\n\
D Show details of selected file\n\
. Toggle hide .dot files\n\
s Toggle sort by file size\n\
t Toggle sort by modified time\n\
! Spawn SHELL in PWD (fallback sh)\n\
z Run top\n\
e Edit entry in EDITOR (fallback vi)\n\
p Open entry in PAGER (fallback less)\n\
^K Invoke file name copier\n\
^L Force a redraw\n\
? Show help\n\
q Quit\n");
/* Show exit keys */
printw("\n\n << (q/Esc)");
while (c = getch())
if (c == 'q' || c == 27)
return;
}
2017-04-01 09:11:07 +00:00
static int
dentfill(char *path, struct entry **dents,
2014-10-22 15:21:50 +00:00
int (*filter)(regex_t *, char *), regex_t *re)
{
char newpath[PATH_MAX];
DIR *dirp;
2014-10-22 15:21:50 +00:00
struct dirent *dp;
struct stat sb;
2014-12-17 11:48:34 +00:00
int r, n = 0;
dirp = opendir(path);
if (dirp == NULL)
return 0;
2014-10-22 15:21:50 +00:00
while ((dp = readdir(dirp)) != NULL) {
/* Skip self and parent */
2016-02-19 14:03:06 +00:00
if (strcmp(dp->d_name, ".") == 0 ||
strcmp(dp->d_name, "..") == 0)
2014-10-22 15:21:50 +00:00
continue;
if (filter(re, dp->d_name) == 0)
continue;
*dents = xrealloc(*dents, (n + 1) * sizeof(**dents));
xstrlcpy((*dents)[n].name, dp->d_name, sizeof((*dents)[n].name));
2014-10-22 15:21:50 +00:00
/* Get mode flags */
mkpath(path, dp->d_name, newpath, sizeof(newpath));
r = lstat(newpath, &sb);
2014-10-22 15:21:50 +00:00
if (r == -1)
printerr(1, "lstat");
2014-10-22 15:21:50 +00:00
(*dents)[n].mode = sb.st_mode;
(*dents)[n].t = sb.st_mtime;
(*dents)[n].size = sb.st_size;
2014-10-22 15:21:50 +00:00
n++;
}
/* Should never be null */
r = closedir(dirp);
if (r == -1)
printerr(1, "closedir");
2014-10-22 15:21:50 +00:00
return n;
}
2017-04-01 09:11:07 +00:00
static void
dentfree(struct entry *dents)
2014-10-22 15:21:50 +00:00
{
free(dents);
}
/* Return the position of the matching entry or 0 otherwise */
2017-04-01 09:11:07 +00:00
static int
2017-04-02 08:48:54 +00:00
dentfind(struct entry *dents, int n, char *path)
{
2017-04-02 08:48:54 +00:00
if (!path)
return 0;
2017-04-02 08:48:54 +00:00
char *p = xmemrchr(path, '/', strlen(path));
if (!p)
p = path;
else
/* We are assuming an entry with actual
name ending in '/' will not appear */
p++;
DPRINTF_S(p);
for (int i = 0; i < n; i++)
if (strcmp(p, dents[i].name) == 0)
return i;
2017-04-02 08:48:54 +00:00
return 0;
}
2017-04-01 09:11:07 +00:00
static int
populate(char *path, char *oldpath, char *fltr)
2014-10-07 06:05:30 +00:00
{
regex_t re;
int r;
2014-10-22 15:33:59 +00:00
/* Can fail when permissions change while browsing */
if (canopendir(path) == 0)
return -1;
2014-10-07 06:05:30 +00:00
/* Search filter */
r = setfilter(&re, fltr);
if (r != 0)
return -1;
dentfree(dents);
ndents = 0;
dents = NULL;
ndents = dentfill(path, &dents, visible, &re);
2014-10-07 06:05:30 +00:00
qsort(dents, ndents, sizeof(*dents), entrycmp);
2014-10-07 06:05:30 +00:00
/* Find cur from history */
2017-04-02 08:48:54 +00:00
cur = dentfind(dents, ndents, oldpath);
return 0;
}
2014-10-07 11:23:44 +00:00
2017-04-01 09:11:07 +00:00
static void
redraw(char *path)
{
2017-04-01 07:26:25 +00:00
static char cwd[PATH_MAX];
static int nlines, odd;
static int i;
2014-10-07 06:05:30 +00:00
nlines = MIN(LINES - 4, ndents);
/* Clean screen */
erase();
2014-10-07 06:05:30 +00:00
/* Strip trailing slashes */
for (i = strlen(path) - 1; i > 0; i--)
if (path[i] == '/')
path[i] = '\0';
else
break;
DPRINTF_D(cur);
DPRINTF_S(path);
/* No text wrapping in cwd line */
2017-04-01 07:26:25 +00:00
if (!realpath(path, cwd)) {
printmsg("Cannot resolve path");
return;
}
2017-04-01 07:26:25 +00:00
printw(CWD "%s\n\n", cwd);
/* Print listing */
odd = ISODD(nlines);
2017-03-29 14:12:23 +00:00
if (cur < (nlines >> 1)) {
for (i = 0; i < nlines; i++)
printptr(&dents[i], i == cur);
2017-03-29 14:12:23 +00:00
} else if (cur >= ndents - (nlines >> 1)) {
for (i = ndents - nlines; i < ndents; i++)
printptr(&dents[i], i == cur);
} else {
2017-03-29 14:12:23 +00:00
nlines >>= 1;
for (i = cur - nlines; i < cur + nlines + odd; i++)
printptr(&dents[i], i == cur);
}
if (showdetail) {
2017-03-30 13:24:18 +00:00
if (ndents) {
2017-04-01 12:31:54 +00:00
static char ind[2] = "\0\0";
static char sort[9];
if (mtimeorder)
sprintf(sort, "by time ");
else if (sizeorder)
sprintf(sort, "by size ");
else
sort[0] = '\0';
2017-03-31 14:02:59 +00:00
if (S_ISDIR(dents[cur].mode))
2017-04-01 12:31:54 +00:00
ind[0] = '/';
2017-03-31 14:02:59 +00:00
else if (S_ISLNK(dents[cur].mode))
2017-04-01 12:31:54 +00:00
ind[0] = '@';
2017-03-31 14:02:59 +00:00
else if (S_ISSOCK(dents[cur].mode))
2017-04-01 12:31:54 +00:00
ind[0] = '=';
2017-03-31 14:02:59 +00:00
else if (S_ISFIFO(dents[cur].mode))
2017-04-01 12:31:54 +00:00
ind[0] = '|';
2017-03-31 14:02:59 +00:00
else if (dents[cur].mode & S_IXUSR)
2017-04-01 12:31:54 +00:00
ind[0] = '*';
else
ind[0] = '\0';
2017-03-31 14:02:59 +00:00
2017-04-01 12:31:54 +00:00
sprintf(cwd, "total %d %s[%s%s]", ndents, sort,
dents[cur].name, ind);
2017-03-30 13:24:18 +00:00
printmsg(cwd);
} else
printmsg("0 items");
}
}
2017-04-01 09:11:07 +00:00
static void
browse(char *ipath, char *ifilter)
{
2017-04-01 07:26:25 +00:00
static char path[PATH_MAX], oldpath[PATH_MAX], newpath[PATH_MAX];
static char fltr[LINE_MAX];
char *bin, *dir, *tmp, *run, *env;
struct stat sb;
regex_t re;
int r, fd;
xstrlcpy(path, ipath, sizeof(path));
xstrlcpy(fltr, ifilter, sizeof(fltr));
oldpath[0] = '\0';
2017-04-01 07:26:25 +00:00
newpath[0] = '\0';
begin:
r = populate(path, oldpath, fltr);
if (r == -1) {
printwarn();
goto nochange;
}
for (;;) {
redraw(path);
2014-10-07 06:05:30 +00:00
nochange:
switch (nextsel(&run, &env)) {
case SEL_QUIT:
dentfree(dents);
2014-10-07 06:05:30 +00:00
return;
case SEL_BACK:
2014-10-10 10:14:55 +00:00
/* There is no going back */
if (strcmp(path, "/") == 0 ||
strcmp(path, ".") == 0 ||
2017-04-01 21:20:56 +00:00
strchr(path, '/') == NULL) {
printmsg("You are at /");
2014-10-07 06:05:30 +00:00
goto nochange;
2017-04-01 21:20:56 +00:00
}
dir = xdirname(path);
if (canopendir(dir) == 0) {
printwarn();
goto nochange;
}
/* Save history */
xstrlcpy(oldpath, path, sizeof(oldpath));
xstrlcpy(path, dir, sizeof(path));
/* Reset filter */
xstrlcpy(fltr, ifilter, sizeof(fltr));
goto begin;
case SEL_GOIN:
2014-10-07 14:07:56 +00:00
/* Cannot descend in empty directories */
if (ndents == 0)
2014-10-07 14:07:56 +00:00
goto nochange;
mkpath(path, dents[cur].name, newpath, sizeof(newpath));
DPRINTF_S(newpath);
/* Get path info */
fd = open(newpath, O_RDONLY | O_NONBLOCK);
if (fd == -1) {
printwarn();
goto nochange;
}
r = fstat(fd, &sb);
if (r == -1) {
printwarn();
close(fd);
goto nochange;
}
close(fd);
DPRINTF_U(sb.st_mode);
2014-10-22 15:55:26 +00:00
2014-10-22 15:50:30 +00:00
switch (sb.st_mode & S_IFMT) {
case S_IFDIR:
if (canopendir(newpath) == 0) {
printwarn();
goto nochange;
}
xstrlcpy(path, newpath, sizeof(path));
/* Reset filter */
xstrlcpy(fltr, ifilter, sizeof(fltr));
goto begin;
2014-10-22 15:50:30 +00:00
case S_IFREG:
2017-04-01 07:26:25 +00:00
{
static char cmd[MAX_CMD_LEN];
static char *runvi = "vi";
static int status;
static FILE *fp;
2016-08-21 08:18:19 +00:00
/* If default mime opener is set, use it */
if (opener) {
2017-04-01 07:26:25 +00:00
snprintf(cmd, MAX_CMD_LEN,
"%s \"%s\" > /dev/null 2>&1",
opener, newpath);
2016-08-21 08:18:19 +00:00
status = system(cmd);
continue;
}
/* Try custom applications */
bin = openwith(newpath);
2014-10-07 06:05:30 +00:00
if (bin == NULL) {
2017-04-01 07:26:25 +00:00
/* If a custom handler application is
not set, open plain text files with
vi, then try fallback_opener */
snprintf(cmd, MAX_CMD_LEN,
"file \"%s\"", newpath);
fp = popen(cmd, "r");
if (fp == NULL)
goto nochange;
2017-04-01 07:26:25 +00:00
if (fgets(cmd, MAX_CMD_LEN, fp) == NULL) {
pclose(fp);
goto nochange;
}
pclose(fp);
if (strstr(cmd, "ASCII text") != NULL)
2017-04-01 07:26:25 +00:00
bin = runvi;
2016-08-21 10:19:54 +00:00
else if (fallback_opener) {
2017-04-01 07:26:25 +00:00
snprintf(cmd, MAX_CMD_LEN,
"%s \"%s\" > \
/dev/null 2>&1",
fallback_opener,
newpath);
status = system(cmd);
continue;
2016-08-21 10:19:54 +00:00
} else {
printmsg("No association");
goto nochange;
}
2014-10-07 06:05:30 +00:00
}
2014-10-07 11:37:23 +00:00
exitcurses();
spawn(bin, newpath, NULL);
2014-10-07 11:37:23 +00:00
initcurses();
2014-12-18 09:13:45 +00:00
continue;
2017-04-01 07:26:25 +00:00
}
2014-10-22 15:50:30 +00:00
default:
printmsg("Unsupported file");
goto nochange;
2014-10-07 06:05:30 +00:00
}
case SEL_FLTR:
/* Read filter */
printprompt("filter: ");
tmp = readln();
if (tmp == NULL)
tmp = ifilter;
2015-01-27 07:58:32 +00:00
/* Check and report regex errors */
r = setfilter(&re, tmp);
if (r != 0)
goto nochange;
xstrlcpy(fltr, tmp, sizeof(fltr));
DPRINTF_S(fltr);
2014-11-26 16:09:03 +00:00
/* Save current */
if (ndents > 0)
mkpath(path, dents[cur].name, oldpath, sizeof(oldpath));
goto begin;
case SEL_NEXT:
if (cur < ndents - 1)
cur++;
2017-03-29 10:29:56 +00:00
else if (ndents)
/* Roll over, set cursor to first entry */
cur = 0;
break;
case SEL_PREV:
if (cur > 0)
cur--;
2017-03-29 10:29:56 +00:00
else if (ndents)
/* Roll over, set cursor to last entry */
cur = ndents - 1;
break;
case SEL_PGDN:
if (cur < ndents - 1)
cur += MIN((LINES - 4) / 2, ndents - 1 - cur);
break;
case SEL_PGUP:
if (cur > 0)
cur -= MIN((LINES - 4) / 2, cur);
break;
case SEL_HOME:
cur = 0;
break;
case SEL_END:
cur = ndents - 1;
break;
case SEL_CD:
/* Read target dir */
printprompt("chdir: ");
tmp = readln();
if (tmp == NULL) {
clearprompt();
goto nochange;
}
mkpath(path, tmp, newpath, sizeof(newpath));
if (canopendir(newpath) == 0) {
printwarn();
goto nochange;
}
xstrlcpy(path, newpath, sizeof(path));
/* Reset filter */
xstrlcpy(fltr, ifilter, sizeof(fltr));
2014-10-22 15:56:31 +00:00
DPRINTF_S(path);
goto begin;
case SEL_CDHOME:
tmp = getenv("HOME");
if (tmp == NULL) {
clearprompt();
goto nochange;
}
if (canopendir(tmp) == 0) {
printwarn();
goto nochange;
}
xstrlcpy(path, tmp, sizeof(path));
/* Reset filter */
xstrlcpy(fltr, ifilter, sizeof(fltr));
DPRINTF_S(path);
goto begin;
case SEL_TOGGLEDOT:
showhidden ^= 1;
initfilter(showhidden, &ifilter);
xstrlcpy(fltr, ifilter, sizeof(fltr));
goto begin;
case SEL_DETAIL:
showdetail = !showdetail;
2017-04-01 07:26:25 +00:00
showdetail ? (printptr = &printent_long)
: (printptr = &printent);
/* Save current */
if (ndents > 0)
mkpath(path, dents[cur].name, oldpath, sizeof(oldpath));
goto begin;
case SEL_STATS:
{
struct stat sb;
if (ndents > 0)
mkpath(path, dents[cur].name, oldpath, sizeof(oldpath));
r = lstat(oldpath, &sb);
if (r == -1)
printerr(1, "lstat");
else
show_stats(oldpath, dents[cur].name, &sb);
goto begin;
}
case SEL_FSIZE:
sizeorder = !sizeorder;
mtimeorder = 0;
/* Save current */
if (ndents > 0)
mkpath(path, dents[cur].name, oldpath, sizeof(oldpath));
goto begin;
case SEL_MTIME:
mtimeorder = !mtimeorder;
sizeorder = 0;
/* Save current */
if (ndents > 0)
mkpath(path, dents[cur].name, oldpath, sizeof(oldpath));
goto begin;
case SEL_REDRAW:
/* Save current */
if (ndents > 0)
mkpath(path, dents[cur].name, oldpath, sizeof(oldpath));
goto begin;
case SEL_COPY:
if (copier && ndents) {
char abspath[PATH_MAX];
if (strcmp(path, "/") == 0)
2017-04-01 07:26:25 +00:00
snprintf(abspath, PATH_MAX, "/%s",
dents[cur].name);
else
2017-04-01 07:26:25 +00:00
snprintf(abspath, PATH_MAX, "%s/%s",
path, dents[cur].name);
spawn(copier, abspath, NULL);
printmsg(abspath);
} else if (!copier)
printmsg("NNN_COPIER is not set");
goto nochange;
2017-04-03 17:03:46 +00:00
case SEL_HELP:
show_help();
/* Save current */
if (ndents > 0)
mkpath(path, dents[cur].name, oldpath, sizeof(oldpath));
goto begin;
case SEL_RUN:
run = xgetenv(env, run);
exitcurses();
spawn(run, NULL, path);
initcurses();
/* Re-populate as directory content may have changed */
goto begin;
case SEL_RUNARG:
run = xgetenv(env, run);
exitcurses();
spawn(run, dents[cur].name, path);
initcurses();
break;
}
/* Screensaver */
if (idletimeout != 0 && idle == idletimeout) {
idle = 0;
exitcurses();
spawn(idlecmd, NULL, NULL);
initcurses();
}
2014-10-07 06:05:30 +00:00
}
}
2017-04-01 09:11:07 +00:00
static void
2017-04-01 05:18:18 +00:00
usage(void)
2015-11-26 16:00:26 +00:00
{
2017-04-01 05:18:18 +00:00
fprintf(stderr, "usage: nnn [-d] [dir]\n");
2015-11-26 16:00:26 +00:00
exit(1);
}
2014-10-07 06:05:30 +00:00
int
main(int argc, char *argv[])
{
char cwd[PATH_MAX], *ipath;
2014-10-21 11:03:53 +00:00
char *ifilter;
2017-04-01 05:18:18 +00:00
int opt = 0;
2015-11-26 16:00:26 +00:00
2015-03-12 12:57:34 +00:00
/* Confirm we are in a terminal */
if (!isatty(0) || !isatty(1)) {
fprintf(stderr, "stdin or stdout is not a tty\n");
exit(1);
}
2015-03-12 12:57:34 +00:00
2017-04-01 05:18:18 +00:00
if (argc > 3)
usage();
2017-04-01 05:18:18 +00:00
while ((opt = getopt(argc, argv, "d")) != -1) {
switch (opt) {
case 'd':
/* Open in detail mode, if set */
showdetail = 1;
printptr = &printent_long;
break;
default:
usage();
}
2017-04-01 05:18:18 +00:00
}
if (argc == optind) {
/* Start in the current directory */
ipath = getcwd(cwd, sizeof(cwd));
if (ipath == NULL)
ipath = "/";
2017-04-01 05:18:18 +00:00
} else {
ipath = realpath(argv[optind], cwd);
if (!ipath) {
fprintf(stderr, "%s: no such dir\n", argv[optind]);
exit(1);
}
}
2017-04-01 05:18:18 +00:00
if (getuid() == 0)
showhidden = 1;
initfilter(showhidden, &ifilter);
2016-08-21 08:18:19 +00:00
/* Get the default desktop mime opener, if set */
opener = getenv("NNN_OPENER");
2016-08-21 08:18:19 +00:00
2016-08-21 10:19:54 +00:00
/* Get the fallback desktop mime opener, if set */
fallback_opener = getenv("NNN_FALLBACK_OPENER");
2016-08-21 10:19:54 +00:00
/* Get the default copier, if set */
copier = getenv("NNN_COPIER");
signal(SIGINT, SIG_IGN);
2014-10-07 06:05:30 +00:00
/* Test initial path */
if (canopendir(ipath) == 0) {
fprintf(stderr, "%s: %s\n", ipath, strerror(errno));
exit(1);
}
2014-10-07 06:05:30 +00:00
/* Set locale before curses setup */
setlocale(LC_ALL, "");
2014-10-07 11:37:23 +00:00
initcurses();
browse(ipath, ifilter);
2014-10-07 11:37:23 +00:00
exitcurses();
exit(0);
2014-10-07 06:05:30 +00:00
}