sistema_progs

Programas para customizar o meu entorno de traballo nos meus equipos persoais
Log | Files | Refs

nnn.c (206138B)


      1 /*
      2  * BSD 2-Clause License
      3  *
      4  * Copyright (C) 2014-2016, Lazaros Koromilas <lostd@2f30.org>
      5  * Copyright (C) 2014-2016, Dimitris Papastamos <sin@2f30.org>
      6  * Copyright (C) 2016-2023, Arun Prakash Jana <engineerarun@gmail.com>
      7  * All rights reserved.
      8  *
      9  * Redistribution and use in source and binary forms, with or without
     10  * modification, are permitted provided that the following conditions are met:
     11  *
     12  * * Redistributions of source code must retain the above copyright notice, this
     13  *   list of conditions and the following disclaimer.
     14  *
     15  * * Redistributions in binary form must reproduce the above copyright notice,
     16  *   this list of conditions and the following disclaimer in the documentation
     17  *   and/or other materials provided with the distribution.
     18  *
     19  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
     20  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     21  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
     22  * DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE
     23  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     24  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
     25  * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
     26  * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
     27  * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
     28  * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     29  */
     30 
     31 #define _FILE_OFFSET_BITS 64 /* Support large files on 32-bit glibc */
     32 
     33 #if defined(__linux__) || defined(MINGW) || defined(__MINGW32__) \
     34 	|| defined(__MINGW64__) || defined(__CYGWIN__)
     35 #ifndef _GNU_SOURCE
     36 #define _GNU_SOURCE
     37 #endif
     38 #if defined(__linux__)
     39 #include <sys/inotify.h>
     40 #define LINUX_INOTIFY
     41 #endif
     42 #if !defined(__GLIBC__)
     43 #include <sys/types.h>
     44 #endif
     45 #endif
     46 #include <sys/resource.h>
     47 #include <sys/stat.h>
     48 #include <sys/statvfs.h>
     49 #if defined(__FreeBSD__) || defined(__OpenBSD__) || defined(__NetBSD__) || defined(__APPLE__)
     50 #include <sys/types.h>
     51 #include <sys/event.h>
     52 #include <sys/time.h>
     53 #define BSD_KQUEUE
     54 #elif defined(__HAIKU__)
     55 #include "../misc/haiku/haiku_interop.h"
     56 #define HAIKU_NM
     57 #else
     58 #include <sys/sysmacros.h>
     59 #endif
     60 #include <sys/wait.h>
     61 
     62 #ifdef __linux__ /* Fix failure due to mvaddnwstr() */
     63 #ifndef NCURSES_WIDECHAR
     64 #define NCURSES_WIDECHAR 1
     65 #endif
     66 #elif defined(__FreeBSD__) || defined(__OpenBSD__) || defined(__NetBSD__) \
     67 	|| defined(__APPLE__) || defined(__sun)
     68 #ifndef _XOPEN_SOURCE_EXTENDED
     69 #define _XOPEN_SOURCE_EXTENDED
     70 #endif
     71 #endif
     72 #ifndef __USE_XOPEN /* Fix wcswidth() failure, ncursesw/curses.h includes whcar.h on Ubuntu 14.04 */
     73 #define __USE_XOPEN
     74 #endif
     75 #include <dirent.h>
     76 #include <errno.h>
     77 #include <fcntl.h>
     78 #include <fts.h>
     79 #include <libgen.h>
     80 #include <limits.h>
     81 #ifndef NOLC
     82 #include <locale.h>
     83 #endif
     84 #include <pthread.h>
     85 #include <stdio.h>
     86 #ifndef NORL
     87 #include <readline/history.h>
     88 #include <readline/readline.h>
     89 #endif
     90 #ifdef PCRE
     91 #include <pcre.h>
     92 #else
     93 #include <regex.h>
     94 #endif
     95 #include <signal.h>
     96 #include <stdarg.h>
     97 #include <stdlib.h>
     98 #include <string.h>
     99 #include <strings.h>
    100 #include <time.h>
    101 #include <unistd.h>
    102 #include <stddef.h>
    103 #include <stdalign.h>
    104 #ifndef __USE_XOPEN_EXTENDED
    105 #define __USE_XOPEN_EXTENDED 1
    106 #endif
    107 #include <ftw.h>
    108 #include <pwd.h>
    109 #include <grp.h>
    110 
    111 #ifdef MACOS_BELOW_1012
    112 #include "../misc/macos-legacy/mach_gettime.h"
    113 #endif
    114 
    115 #if !defined(alloca) && defined(__GNUC__)
    116 /*
    117  * GCC doesn't expand alloca() to __builtin_alloca() in standards mode
    118  * (-std=...) and not all standard libraries do or supply it, e.g.
    119  * NetBSD/arm64 so explicitly use the builtin.
    120  */
    121 #define alloca(size) __builtin_alloca(size)
    122 #endif
    123 
    124 #include "nnn.h"
    125 #include "dbg.h"
    126 
    127 #if defined(ICONS_IN_TERM) || defined(NERD) || defined(EMOJI)
    128 #define ICONS_ENABLED
    129 #include ICONS_INCLUDE
    130 #include "icons-hash.c"
    131 #include "icons.h"
    132 #endif
    133 
    134 #if defined(ICONS_ENABLED) && defined(__APPLE__)
    135 /*
    136  * For some reason, wcswidth returns 2 for certain icons on macOS
    137  * leading to duplicated first characters in filenames when navigating.
    138  * https://github.com/jarun/nnn/issues/1692
    139  * There might be a better way to fix it without requiring a refresh.
    140  */
    141 #define macos_icons_hack() do { clrtoeol(); refresh(); } while(0)
    142 #else
    143 #define macos_icons_hack()
    144 #endif
    145 
    146 #ifdef TOURBIN_QSORT
    147 #include "qsort.h"
    148 #endif
    149 
    150 /* Macro definitions */
    151 #define VERSION      "4.9"
    152 #define GENERAL_INFO "BSD 2-Clause\nhttps://github.com/jarun/nnn"
    153 
    154 #ifndef NOSSN
    155 #define SESSIONS_VERSION 1
    156 #endif
    157 
    158 #ifndef S_BLKSIZE
    159 #define S_BLKSIZE 512 /* S_BLKSIZE is missing on Android NDK (Termux) */
    160 #endif
    161 
    162 /*
    163  * NAME_MAX and PATH_MAX may not exist, e.g. with dirent.c_name being a
    164  * flexible array on Illumos. Use somewhat accommodating fallback values.
    165  */
    166 #ifndef NAME_MAX
    167 #define NAME_MAX 255
    168 #endif
    169 
    170 #ifndef PATH_MAX
    171 #define PATH_MAX 4096
    172 #endif
    173 
    174 #define _ABSSUB(N, M)   (((N) <= (M)) ? ((M) - (N)) : ((N) - (M)))
    175 #define ELEMENTS(x)     (sizeof(x) / sizeof(*(x)))
    176 #undef MIN
    177 #define MIN(x, y)       ((x) < (y) ? (x) : (y))
    178 #undef MAX
    179 #define MAX(x, y)       ((x) > (y) ? (x) : (y))
    180 #define ISODD(x)        ((x) & 1)
    181 #define ISBLANK(x)      ((x) == ' ' || (x) == '\t')
    182 #define TOUPPER(ch)     (((ch) >= 'a' && (ch) <= 'z') ? ((ch) - 'a' + 'A') : (ch))
    183 #define TOLOWER(ch)     (((ch) >= 'A' && (ch) <= 'Z') ? ((ch) - 'A' + 'a') : (ch))
    184 #define ISUPPER_(ch)    ((ch) >= 'A' && (ch) <= 'Z')
    185 #define ISLOWER_(ch)    ((ch) >= 'a' && (ch) <= 'z')
    186 #define CMD_LEN_MAX     (PATH_MAX + ((NAME_MAX + 1) << 1))
    187 #define ALIGN_UP(x, A)  ((((x) + (A) - 1) / (A)) * (A))
    188 #define READLINE_MAX    256
    189 #define FILTER          '/'
    190 #define RFILTER         '\\'
    191 #define CASE            ':'
    192 #define MSGWAIT         '$'
    193 #define SELECT          ' '
    194 #define PROMPT          ">>> "
    195 #define REGEX_MAX       48
    196 #define ENTRY_INCR      64 /* Number of dir 'entry' structures to allocate per shot */
    197 #define NAMEBUF_INCR    0x800 /* 64 dir entries at once, avg. 32 chars per file name = 64*32B = 2KB */
    198 #define DESCRIPTOR_LEN  32
    199 #define _ALIGNMENT      0x10 /* 16-byte alignment */
    200 #define _ALIGNMENT_MASK 0xF
    201 #define TMP_LEN_MAX     64
    202 #define DOT_FILTER_LEN  7
    203 #define ASCII_MAX       128
    204 #define EXEC_ARGS_MAX   10
    205 #define LIST_FILES_MAX  (1 << 14) /* Support listing 16K files */
    206 #define LIST_INPUT_MAX  ((size_t)LIST_FILES_MAX * PATH_MAX)
    207 #define SCROLLOFF       3
    208 #define COLOR_256       256
    209 #define CREATE_NEW_KEY  (-1)
    210 
    211 /* Time intervals */
    212 #define DBLCLK_INTERVAL_NS (400000000)
    213 #define XDELAY_INTERVAL_MS (350000) /* 350 ms delay */
    214 
    215 #ifndef CTX8
    216 #define CTX_MAX 4
    217 #else
    218 #define CTX_MAX 8
    219 #endif
    220 
    221 #ifndef SED
    222 /* BSDs or Solaris or SunOS */
    223 #if defined(__FreeBSD__) || defined(__OpenBSD__) || defined(__NetBSD__) || defined(__APPLE__) || defined(sun) || defined(__sun)
    224 #define SED "gsed"
    225 #else
    226 #define SED "sed"
    227 #endif
    228 #endif
    229 
    230 /* Large selection threshold */
    231 #ifndef LARGESEL
    232 #define LARGESEL 1000
    233 #endif
    234 
    235 #define MIN_DISPLAY_COL (CTX_MAX * 2)
    236 #define ARCHIVE_CMD_LEN 16
    237 #define BLK_SHIFT_512   9
    238 
    239 /* Detect hardlinks in du */
    240 #define HASH_BITS   (0xFFFFFF)
    241 #define HASH_OCTETS (HASH_BITS >> 6) /* 2^6 = 64 */
    242 
    243 /* Entry flags */
    244 #define DIR_OR_DIRLNK 0x01
    245 #define HARD_LINK     0x02
    246 #define SYM_ORPHAN    0x04
    247 #define FILE_MISSING  0x08
    248 #define FILE_SELECTED 0x10
    249 #define FILE_SCANNED  0x20
    250 #define FILE_YOUNG    0x40
    251 
    252 /* Macros to define process spawn behaviour as flags */
    253 #define F_NONE    0x00  /* no flag set */
    254 #define F_MULTI   0x01  /* first arg can be combination of args; to be used with F_NORMAL */
    255 #define F_NOWAIT  0x02  /* don't wait for child process (e.g. file manager) */
    256 #define F_NOTRACE 0x04  /* suppress stdout and stderr (no traces) */
    257 #define F_NORMAL  0x08  /* spawn child process in non-curses regular CLI mode */
    258 #define F_CONFIRM 0x10  /* run command - show results before exit (must have F_NORMAL) */
    259 #define F_CHKRTN  0x20  /* wait for user prompt if cmd returns failure status */
    260 #define F_NOSTDIN 0x40  /* suppress stdin */
    261 #define F_PAGE    0x80  /* page output in run-cmd-as-plugin mode */
    262 #define F_TTY     0x100 /* Force stdout to go to tty if redirected to a non-tty */
    263 #define F_CLI     (F_NORMAL | F_MULTI)
    264 #define F_SILENT  (F_CLI | F_NOTRACE)
    265 
    266 /* Version compare macros */
    267 /*
    268  * states: S_N: normal, S_I: comparing integral part, S_F: comparing
    269  *         fractional parts, S_Z: idem but with leading Zeroes only
    270  */
    271 #define S_N 0x0
    272 #define S_I 0x3
    273 #define S_F 0x6
    274 #define S_Z 0x9
    275 
    276 /* result_type: VCMP: return diff; VLEN: compare using len_diff/diff */
    277 #define VCMP 2
    278 #define VLEN 3
    279 
    280 /* Volume info */
    281 #define VFS_AVAIL 0
    282 #define VFS_USED  1
    283 #define VFS_SIZE  2
    284 
    285 /* TYPE DEFINITIONS */
    286 typedef unsigned int uint_t;
    287 typedef unsigned char uchar_t;
    288 typedef unsigned short ushort_t;
    289 typedef unsigned long long ullong_t;
    290 
    291 /* STRUCTURES */
    292 
    293 /* Directory entry */
    294 typedef struct entry {
    295 	char *name;  /* 8 bytes */
    296 	time_t sec;  /* 8 bytes */
    297 	uint_t nsec; /* 4 bytes (enough to store nanosec) */
    298 	mode_t mode; /* 4 bytes */
    299 	off_t size;  /* 8 bytes */
    300 	struct {
    301 		ullong_t blocks : 40; /* 5 bytes (enough for 512 TiB in 512B blocks allocated) */
    302 		ullong_t nlen   : 16; /* 2 bytes (length of file name) */
    303 		ullong_t flags  : 8;  /* 1 byte (flags specific to the file) */
    304 	};
    305 #ifndef NOUG
    306 	uid_t uid; /* 4 bytes */
    307 	gid_t gid; /* 4 bytes */
    308 #endif
    309 } *pEntry;
    310 
    311 /* Selection marker */
    312 typedef struct {
    313 	char *startpos;
    314 	size_t len;
    315 } selmark;
    316 
    317 /* Key-value pairs from env */
    318 typedef struct {
    319 	int key;
    320 	int off;
    321 } kv;
    322 
    323 typedef struct {
    324 #ifdef PCRE
    325 	const pcre *pcrex;
    326 #else
    327 	const regex_t *regex;
    328 #endif
    329 	const char *str;
    330 } fltrexp_t;
    331 
    332 /*
    333  * Settings
    334  */
    335 typedef struct {
    336 	uint_t filtermode : 1;  /* Set to enter filter mode */
    337 	uint_t timeorder  : 1;  /* Set to sort by time */
    338 	uint_t sizeorder  : 1;  /* Set to sort by file size */
    339 	uint_t apparentsz : 1;  /* Set to sort by apparent size (disk usage) */
    340 	uint_t blkorder   : 1;  /* Set to sort by blocks used (disk usage) */
    341 	uint_t extnorder  : 1;  /* Order by extension */
    342 	uint_t showhidden : 1;  /* Set to show hidden files */
    343 	uint_t reserved0  : 1;
    344 	uint_t showdetail : 1;  /* Clear to show lesser file info */
    345 	uint_t ctxactive  : 1;  /* Context active or not */
    346 	uint_t reverse    : 1;  /* Reverse sort */
    347 	uint_t version    : 1;  /* Version sort */
    348 	uint_t reserved1  : 1;
    349 	/* The following settings are global */
    350 	uint_t curctx     : 3;  /* Current context number */
    351 	uint_t prefersel  : 1;  /* Prefer selection over current, if exists */
    352 	uint_t fileinfo   : 1;  /* Show file information on hover */
    353 	uint_t nonavopen  : 1;  /* Open file on right arrow or `l` */
    354 	uint_t autoenter  : 1;  /* auto-enter dir in type-to-nav mode */
    355 	uint_t reserved2  : 1;
    356 	uint_t useeditor  : 1;  /* Use VISUAL to open text files */
    357 	uint_t reserved3  : 3;
    358 	uint_t regex      : 1;  /* Use regex filters */
    359 	uint_t x11        : 1;  /* Copy to system clipboard, show notis, xterm title */
    360 	uint_t timetype   : 2;  /* Time sort type (0: access, 1: change, 2: modification) */
    361 	uint_t cliopener  : 1;  /* All-CLI app opener */
    362 	uint_t waitedit   : 1;  /* For ops that can't be detached, used EDITOR */
    363 	uint_t rollover   : 1;  /* Roll over at edges */
    364 } settings;
    365 
    366 /* Non-persistent program-internal states (alphabeical order) */
    367 typedef struct {
    368 	uint_t autofifo   : 1;  /* Auto-create NNN_FIFO */
    369 	uint_t autonext   : 1;  /* Auto-advance on file open */
    370 	uint_t dircolor   : 1;  /* Current status of dir color */
    371 	uint_t dirctx     : 1;  /* Show dirs in context color */
    372 	uint_t duinit     : 1;  /* Initialize disk usage */
    373 	uint_t fifomode   : 1;  /* FIFO notify mode: 0: preview, 1: explorer */
    374 	uint_t forcequit  : 1;  /* Do not prompt on quit */
    375 	uint_t initfile   : 1;  /* Positional arg is a file */
    376 	uint_t interrupt  : 1;  /* Program received an interrupt */
    377 	uint_t move       : 1;  /* Move operation */
    378 	uint_t oldcolor   : 1;  /* Use older colorscheme */
    379 	uint_t picked     : 1;  /* Plugin has picked files */
    380 	uint_t picker     : 1;  /* Write selection to user-specified file */
    381 	uint_t pluginit   : 1;  /* Plugin framework initialized */
    382 	uint_t prstssn    : 1;  /* Persistent session */
    383 	uint_t rangesel   : 1;  /* Range selection on */
    384 	uint_t runctx     : 3;  /* The context in which plugin is to be run */
    385 	uint_t runplugin  : 1;  /* Choose plugin mode */
    386 	uint_t selbm      : 1;  /* Select a bookmark from bookmarks directory */
    387 	uint_t selmode    : 1;  /* Set when selecting files */
    388 	uint_t stayonsel  : 1;  /* Disable auto-advance on selection */
    389 	uint_t trash      : 2;  /* Trash method 0: rm -rf, 1: trash-cli, 2: gio trash */
    390 	uint_t uidgid     : 1;  /* Show owner and group info */
    391 	uint_t usebsdtar  : 1;  /* Use bsdtar as default archive utility */
    392 	uint_t reserved   : 5;  /* Adjust when adding/removing a field */
    393 } runstate;
    394 
    395 /* Contexts or workspaces */
    396 typedef struct {
    397 	char c_path[PATH_MAX];     /* Current dir */
    398 	char c_last[PATH_MAX];     /* Last visited dir */
    399 	char c_name[NAME_MAX + 1]; /* Current file name */
    400 	char c_fltr[REGEX_MAX];    /* Current filter */
    401 	settings c_cfg;            /* Current configuration */
    402 	uint_t color;              /* Color code for directories */
    403 } context;
    404 
    405 #ifndef NOSSN
    406 typedef struct {
    407 	size_t ver;
    408 	size_t pathln[CTX_MAX];
    409 	size_t lastln[CTX_MAX];
    410 	size_t nameln[CTX_MAX];
    411 	size_t fltrln[CTX_MAX];
    412 } session_header_t;
    413 #endif
    414 
    415 /* GLOBALS */
    416 
    417 /* Configuration, contexts */
    418 static settings cfg = {
    419 	.ctxactive = 1,
    420 	.autoenter = 1,
    421 	.timetype = 2, /* T_MOD */
    422 	.rollover = 1,
    423 };
    424 
    425 alignas(max_align_t) static context g_ctx[CTX_MAX];
    426 
    427 static int ndents, cur, last, curscroll, last_curscroll, total_dents = ENTRY_INCR, scroll_lines = 1;
    428 static int nselected;
    429 #ifndef NOFIFO
    430 static int fifofd = -1;
    431 #endif
    432 static time_t gtimesecs;
    433 static uint_t idletimeout, selbufpos, selbuflen;
    434 static ushort_t xlines, xcols;
    435 static ushort_t idle;
    436 static uchar_t maxbm, maxplug, maxorder;
    437 static uchar_t cfgsort[CTX_MAX + 1];
    438 static char *bmstr;
    439 static char *pluginstr;
    440 static char *orderstr;
    441 static char *opener;
    442 static char *editor;
    443 static char *enveditor;
    444 static char *pager;
    445 static char *shell;
    446 static char *home;
    447 static char *initpath;
    448 static char *cfgpath;
    449 static char *selpath;
    450 static char *listpath;
    451 static char *listroot;
    452 static char *plgpath;
    453 static char *pnamebuf, *pselbuf, *findselpos;
    454 static char *mark;
    455 #ifndef NOX11
    456 static char hostname[_POSIX_HOST_NAME_MAX + 1];
    457 #endif
    458 #ifndef NOFIFO
    459 static char *fifopath;
    460 #endif
    461 static char *lastcmd;
    462 static ullong_t *ihashbmp;
    463 static struct entry *pdents;
    464 static blkcnt_t dir_blocks;
    465 static kv *bookmark;
    466 static kv *plug;
    467 static kv *order;
    468 static uchar_t tmpfplen, homelen;
    469 static uchar_t blk_shift = BLK_SHIFT_512;
    470 #ifndef NOMOUSE
    471 static int middle_click_key;
    472 #endif
    473 #ifdef PCRE
    474 static pcre *archive_pcre;
    475 #else
    476 static regex_t archive_re;
    477 #endif
    478 
    479 /* pthread related */
    480 #define NUM_DU_THREADS (4) /* Can use sysconf(_SC_NPROCESSORS_ONLN) */
    481 #define DU_TEST (((node->fts_info & FTS_F) && \
    482 		(sb->st_nlink <= 1 || test_set_bit((uint_t)sb->st_ino))) || node->fts_info & FTS_DP)
    483 
    484 static int threadbmp = -1; /* Has 1 in the bit position for idle threads */
    485 static volatile int active_threads;
    486 static pthread_mutex_t running_mutex = PTHREAD_MUTEX_INITIALIZER;
    487 static pthread_mutex_t hardlink_mutex = PTHREAD_MUTEX_INITIALIZER;
    488 static ullong_t *core_files;
    489 static blkcnt_t *core_blocks;
    490 static ullong_t num_files;
    491 
    492 typedef struct {
    493 	char path[PATH_MAX];
    494 	int entnum;
    495 	ushort_t core;
    496 	bool mntpoint;
    497 } thread_data;
    498 
    499 static thread_data *core_data;
    500 
    501 /* Retain old signal handlers */
    502 static struct sigaction oldsighup;
    503 static struct sigaction oldsigtstp;
    504 static struct sigaction oldsigwinch;
    505 
    506 /* For use in functions which are isolated and don't return the buffer */
    507 alignas(max_align_t) static char g_buf[CMD_LEN_MAX];
    508 
    509 /* For use as a scratch buffer in selection manipulation */
    510 alignas(max_align_t) static char g_sel[PATH_MAX];
    511 
    512 /* Buffer to store tmp file path to show selection, file stats and help */
    513 alignas(max_align_t) static char g_tmpfpath[TMP_LEN_MAX];
    514 
    515 /* Buffer to store plugins control pipe location */
    516 alignas(max_align_t) static char g_pipepath[TMP_LEN_MAX];
    517 
    518 /* Non-persistent runtime states */
    519 static runstate g_state;
    520 
    521 /* Options to identify file MIME */
    522 #if defined(__APPLE__)
    523 #define FILE_MIME_OPTS "-bIL"
    524 #elif !defined(__sun) /* no MIME option for 'file' */
    525 #define FILE_MIME_OPTS "-biL"
    526 #endif
    527 
    528 /* Macros for utilities */
    529 #define UTIL_OPENER    0
    530 #define UTIL_ATOOL     1
    531 #define UTIL_BSDTAR    2
    532 #define UTIL_UNZIP     3
    533 #define UTIL_TAR       4
    534 #define UTIL_LOCKER    5
    535 #define UTIL_LAUNCH    6
    536 #define UTIL_SH_EXEC   7
    537 #define UTIL_BASH      8
    538 #define UTIL_SSHFS     9
    539 #define UTIL_RCLONE    10
    540 #define UTIL_VI        11
    541 #define UTIL_LESS      12
    542 #define UTIL_SH        13
    543 #define UTIL_FZF       14
    544 #define UTIL_NTFY      15
    545 #define UTIL_CBCP      16
    546 #define UTIL_NMV       17
    547 #define UTIL_TRASH_CLI 18
    548 #define UTIL_GIO_TRASH 19
    549 #define UTIL_RM_RF     20
    550 #define UTIL_ARCHMNT   21
    551 
    552 /* Utilities to open files, run actions */
    553 static char * const utils[] = {
    554 #ifdef __APPLE__
    555 	"/usr/bin/open",
    556 #elif defined __CYGWIN__
    557 	"cygstart",
    558 #elif defined __HAIKU__
    559 	"open",
    560 #else
    561 	"xdg-open",
    562 #endif
    563 	"atool",
    564 	"bsdtar",
    565 	"unzip",
    566 	"tar",
    567 #ifdef __APPLE__
    568 	"bashlock",
    569 #elif defined(__FreeBSD__) || defined(__OpenBSD__) || defined(__NetBSD__)
    570 	"lock",
    571 #elif defined __HAIKU__
    572 	"peaclock",
    573 #else
    574 	"vlock",
    575 #endif
    576 	"launch",
    577 	"sh -c",
    578 	"bash",
    579 	"sshfs",
    580 	"rclone",
    581 	"vi",
    582 	"less",
    583 	"sh",
    584 	"fzf",
    585 	".ntfy",
    586 	".cbcp",
    587 	".nmv",
    588 	"trash-put",
    589 	"gio trash",
    590 	"rm -rf",
    591 	"archivemount",
    592 };
    593 
    594 /* Common strings */
    595 #define MSG_ZERO         0 /* Unused */
    596 #define MSG_0_ENTRIES    1
    597 #define STR_TMPFILE      2
    598 #define MSG_0_SELECTED   3
    599 #define MSG_CANCEL       4
    600 #define MSG_FAILED       5
    601 #define MSG_SSN_NAME     6
    602 #define MSG_CP_MV_AS     7
    603 #define MSG_CUR_SEL_OPTS 8
    604 #define MSG_FORCE_RM     9
    605 #define MSG_SIZE_LIMIT   10
    606 #define MSG_NEW_OPTS     11
    607 #define MSG_CLI_MODE     12
    608 #define MSG_OVERWRITE    13
    609 #define MSG_SSN_OPTS     14
    610 #define MSG_QUIT_ALL     15
    611 #define MSG_HOSTNAME     16
    612 #define MSG_ARCHIVE_NAME 17
    613 #define MSG_OPEN_WITH    18
    614 #define MSG_NEW_PATH     19
    615 #define MSG_LINK_PREFIX  20
    616 #define MSG_COPY_NAME    21
    617 #define MSG_ENTER        22
    618 #define MSG_SEL_MISSING  23
    619 #define MSG_ACCESS       24
    620 #define MSG_EMPTY_FILE   25
    621 #define MSG_UNSUPPORTED  26
    622 #define MSG_NOT_SET      27
    623 #define MSG_EXISTS       28
    624 #define MSG_FEW_COLUMNS  29
    625 #define MSG_REMOTE_OPTS  30
    626 #define MSG_RCLONE_DELAY 31
    627 #define MSG_APP_NAME     32
    628 #define MSG_ARCHIVE_OPTS 33
    629 #define MSG_KEYS         34
    630 #define MSG_INVALID_REG  35
    631 #define MSG_ORDER        36
    632 #define MSG_LAZY         37
    633 #define MSG_FIRST        38
    634 #define MSG_RM_TMP       39
    635 #define MSG_INVALID_KEY  40
    636 #define MSG_NOCHANGE     41
    637 #define MSG_DIR_CHANGED  42
    638 #define MSG_BM_NAME      43
    639 #define MSG_FILE_LIMIT   44
    640 
    641 static const char * const messages[] = {
    642 	"",
    643 	"0 entries",
    644 	"/.nnnXXXXXX",
    645 	"0 selected",
    646 	"cancelled",
    647 	"failed!",
    648 	"session name: ",
    649 	"'c'p/'m'v as?",
    650 	"'c'urrent/'s'el?",
    651 	"%s %s? [Esc cancels]",
    652 	"size limit exceeded",
    653 	"['f'ile]/'d'ir/'s'ym/'h'ard?",
    654 	"['g'ui]/'c'li?",
    655 	"overwrite?",
    656 	"'s'ave/'l'oad/'r'estore?",
    657 	"Quit all contexts?",
    658 	"remote name (- for hovered): ",
    659 	"archive [path/]name: ",
    660 	"open with: ",
    661 	"[path/]name: ",
    662 	"link prefix [@ for none]: ",
    663 	"copy [path/]name: ",
    664 	"\n'Enter' to continue",
    665 	"open failed",
    666 	"dir inaccessible",
    667 	"empty! edit/open with",
    668 	"?",
    669 	"not set",
    670 	"entry exists",
    671 	"too few cols!",
    672 	"'s'shfs/'r'clone?",
    673 	"refresh if slow",
    674 	"app: ",
    675 	"['l's]/'o'pen/e'x'tract/'m'nt?",
    676 	"keys:",
    677 	"invalid regex",
    678 	"'a'u/'d'u/'e'xt/'r'ev/'s'z/'t'm/'v'er/'c'lr/'^T'?",
    679 	"unmount failed! try lazy?",
    680 	"first file (\')/char?",
    681 	"remove tmp file?",
    682 	"invalid key",
    683 	"unchanged",
    684 	"dir changed, range sel off",
    685 	"name: ",
    686 	"file limit exceeded",
    687 };
    688 
    689 /* Supported configuration environment variables */
    690 #define NNN_OPTS    0
    691 #define NNN_BMS     1
    692 #define NNN_PLUG    2
    693 #define NNN_OPENER  3
    694 #define NNN_COLORS  4
    695 #define NNN_FCOLORS 5
    696 #define NNNLVL      6
    697 #define NNN_PIPE    7
    698 #define NNN_MCLICK  8
    699 #define NNN_SEL     9
    700 #define NNN_ARCHIVE 10
    701 #define NNN_ORDER   11
    702 #define NNN_HELP    12 /* strings end here */
    703 #define NNN_TRASH   13 /* flags begin here */
    704 
    705 static const char * const env_cfg[] = {
    706 	"NNN_OPTS",
    707 	"NNN_BMS",
    708 	"NNN_PLUG",
    709 	"NNN_OPENER",
    710 	"NNN_COLORS",
    711 	"NNN_FCOLORS",
    712 	"NNNLVL",
    713 	"NNN_PIPE",
    714 	"NNN_MCLICK",
    715 	"NNN_SEL",
    716 	"NNN_ARCHIVE",
    717 	"NNN_ORDER",
    718 	"NNN_HELP",
    719 	"NNN_TRASH",
    720 };
    721 
    722 /* Required environment variables */
    723 #define ENV_SHELL  0
    724 #define ENV_VISUAL 1
    725 #define ENV_EDITOR 2
    726 #define ENV_PAGER  3
    727 #define ENV_NCUR   4
    728 
    729 static const char * const envs[] = {
    730 	"SHELL",
    731 	"VISUAL",
    732 	"EDITOR",
    733 	"PAGER",
    734 	"nnn",
    735 };
    736 
    737 /* Time type used */
    738 #define T_ACCESS 0
    739 #define T_CHANGE 1
    740 #define T_MOD    2
    741 
    742 #define PROGRESS_CP   "cpg -giRp"
    743 #define PROGRESS_MV   "mvg -gi"
    744 static char cp[sizeof PROGRESS_CP] = "cp -iRp";
    745 static char mv[sizeof PROGRESS_MV] = "mv -i";
    746 
    747 /* Archive commands */
    748 static char * const archive_cmd[] = {"atool -a", "bsdtar -acvf", "zip -r", "tar -acvf"};
    749 
    750 /* Tokens used for path creation */
    751 #define TOK_BM  0
    752 #define TOK_SSN 1
    753 #define TOK_MNT 2
    754 #define TOK_PLG 3
    755 
    756 static const char * const toks[] = {
    757 	"bookmarks",
    758 	"sessions",
    759 	"mounts",
    760 	"plugins", /* must be the last entry */
    761 };
    762 
    763 /* Patterns */
    764 #define P_CPMVFMT 0
    765 #define P_CPMVRNM 1
    766 #define P_ARCHIVE 2
    767 #define P_REPLACE 3
    768 #define P_ARCHIVE_CMD 4
    769 
    770 static const char * const patterns[] = {
    771 	SED" -i 's|^\\(\\(.*/\\)\\(.*\\)$\\)|#\\1\\n\\3|' %s",
    772 	SED" 's|^\\([^#/][^/]\\?.*\\)$|%s/\\1|;s|^#\\(/.*\\)$|\\1|' "
    773 		"%s | tr '\\n' '\\0' | xargs -0 -n2 sh -c '%s \"$0\" \"$@\" < /dev/tty'",
    774 	"\\.(bz|bz2|gz|tar|taz|tbz|tbz2|tgz|z|zip)$", /* Basic formats that don't need external tools */
    775 	SED" -i 's|^%s\\(.*\\)$|%s\\1|' %s",
    776 	"xargs -0 %s %s < '%s'",
    777 };
    778 
    779 /* Colors */
    780 #define C_BLK (CTX_MAX + 1) /* Block device: DarkSeaGreen1 */
    781 #define C_CHR (C_BLK + 1)   /* Character device: Yellow1 */
    782 #define C_DIR (C_CHR + 1)   /* Directory: DeepSkyBlue1 */
    783 #define C_EXE (C_DIR + 1)   /* Executable file: Green1 */
    784 #define C_FIL (C_EXE + 1)   /* Regular file: Normal */
    785 #define C_HRD (C_FIL + 1)   /* Hard link: Plum4 */
    786 #define C_LNK (C_HRD + 1)   /* Symbolic link: Cyan1 */
    787 #define C_MIS (C_LNK + 1)   /* Missing file OR file details: Grey62 */
    788 #define C_ORP (C_MIS + 1)   /* Orphaned symlink: DeepPink1 */
    789 #define C_PIP (C_ORP + 1)   /* Named pipe (FIFO): Orange1 */
    790 #define C_SOC (C_PIP + 1)   /* Socket: MediumOrchid1 */
    791 #define C_UND (C_SOC + 1)   /* Unknown OR 0B regular/exe file: Red1 */
    792 
    793 static char gcolors[] = "c1e2272e006033f7c6d6abc4";
    794 static uint_t fcolors[C_UND + 1] = {0};
    795 
    796 /* Event handling */
    797 #ifdef LINUX_INOTIFY
    798 #define NUM_EVENT_SLOTS 32 /* Make room for 32 events */
    799 #define EVENT_SIZE (sizeof(struct inotify_event))
    800 #define EVENT_BUF_LEN (EVENT_SIZE * NUM_EVENT_SLOTS)
    801 static int inotify_fd, inotify_wd = -1;
    802 static uint_t INOTIFY_MASK = /* IN_ATTRIB | */ IN_CREATE | IN_DELETE | IN_DELETE_SELF
    803 			   | IN_MODIFY | IN_MOVE_SELF | IN_MOVED_FROM | IN_MOVED_TO;
    804 #elif defined(BSD_KQUEUE)
    805 #define NUM_EVENT_SLOTS 1
    806 #define NUM_EVENT_FDS 1
    807 static int kq, event_fd = -1;
    808 static struct kevent events_to_monitor[NUM_EVENT_FDS];
    809 static uint_t KQUEUE_FFLAGS = NOTE_DELETE | NOTE_EXTEND | NOTE_LINK
    810 			    | NOTE_RENAME | NOTE_REVOKE | NOTE_WRITE;
    811 static struct timespec gtimeout;
    812 #elif defined(HAIKU_NM)
    813 static bool haiku_nm_active = FALSE;
    814 static haiku_nm_h haiku_hnd;
    815 #endif
    816 
    817 /* Function macros */
    818 #define tolastln() move(xlines - 1, 0)
    819 #define tocursor() move(cur + 2 - curscroll, 0)
    820 #define exitcurses() endwin()
    821 #define printwarn(presel) printwait(strerror(errno), presel)
    822 #define istopdir(path) ((path)[1] == '\0' && (path)[0] == '/')
    823 #define copycurname() xstrsncpy(lastname, ndents ? pdents[cur].name : "\0", NAME_MAX + 1)
    824 #define settimeout() timeout(1000)
    825 #define cleartimeout() timeout(-1)
    826 #define errexit() printerr(__LINE__)
    827 #define setdirwatch() (cfg.filtermode ? (presel = FILTER) : (watch = TRUE))
    828 #define filterset() (g_ctx[cfg.curctx].c_fltr[1])
    829 /* We don't care about the return value from strcmp() */
    830 #define xstrcmp(a, b)  (*(a) != *(b) ? -1 : strcmp((a), (b)))
    831 /* A faster version of xisdigit */
    832 #define xisdigit(c) ((unsigned int) (c) - '0' <= 9)
    833 #define xerror() perror(xitoa(__LINE__))
    834 
    835 #ifdef TOURBIN_QSORT
    836 #define ENTLESS(i, j) (entrycmpfn(pdents + (i), pdents + (j)) < 0)
    837 #define ENTSWAP(i, j) (swap_ent((i), (j)))
    838 #define ENTSORT(pdents, ndents, entrycmpfn) QSORT((ndents), ENTLESS, ENTSWAP)
    839 #else
    840 #define ENTSORT(pdents, ndents, entrycmpfn) qsort((pdents), (ndents), sizeof(*(pdents)), (entrycmpfn))
    841 #endif
    842 
    843 /* Forward declarations */
    844 static void redraw(char *path);
    845 static int spawn(char *file, char *arg1, char *arg2, char *arg3, ushort_t flag);
    846 static void move_cursor(int target, int ignore_scrolloff);
    847 static char *load_input(int fd, const char *path);
    848 static int set_sort_flags(int r);
    849 static void statusbar(char *path);
    850 static bool get_output(char *file, char *arg1, char *arg2, int fdout, bool page);
    851 #ifndef NOFIFO
    852 static void notify_fifo(bool force);
    853 #endif
    854 
    855 /* Functions */
    856 
    857 static void sigint_handler(int sig)
    858 {
    859 	(void) sig;
    860 	g_state.interrupt = 1;
    861 }
    862 
    863 static void clean_exit_sighandler(int sig)
    864 {
    865 	(void) sig;
    866 	exitcurses();
    867 	/* This triggers cleanup() thanks to atexit() */
    868 	exit(EXIT_SUCCESS);
    869 }
    870 
    871 static char *xitoa(uint_t val)
    872 {
    873 	static char dst[32] = {'\0'};
    874 	static const char digits[201] =
    875 		"0001020304050607080910111213141516171819"
    876 		"2021222324252627282930313233343536373839"
    877 		"4041424344454647484950515253545556575859"
    878 		"6061626364656667686970717273747576777879"
    879 		"8081828384858687888990919293949596979899";
    880 	uint_t next = 30, quo, i;
    881 
    882 	while (val >= 100) {
    883 		quo = val / 100;
    884 		i = (val - (quo * 100)) * 2;
    885 		val = quo;
    886 		dst[next] = digits[i + 1];
    887 		dst[--next] = digits[i];
    888 		--next;
    889 	}
    890 
    891 	/* Handle last 1-2 digits */
    892 	if (val < 10)
    893 		dst[next] = '0' + val;
    894 	else {
    895 		i = val * 2;
    896 		dst[next] = digits[i + 1];
    897 		dst[--next] = digits[i];
    898 	}
    899 
    900 	return &dst[next];
    901 }
    902 
    903 /* Return the integer value of a char representing HEX */
    904 static uchar_t xchartohex(uchar_t c)
    905 {
    906 	if (xisdigit(c))
    907 		return c - '0';
    908 
    909 	if (c >= 'a' && c <= 'f')
    910 		return c - 'a' + 10;
    911 
    912 	if (c >= 'A' && c <= 'F')
    913 		return c - 'A' + 10;
    914 
    915 	return c;
    916 }
    917 
    918 /*
    919  * Source: https://elixir.bootlin.com/linux/latest/source/arch/alpha/include/asm/bitops.h
    920  */
    921 static bool test_set_bit(uint_t nr)
    922 {
    923 	nr &= HASH_BITS;
    924 
    925 	pthread_mutex_lock(&hardlink_mutex);
    926 	ullong_t *m = ((ullong_t *)ihashbmp) + (nr >> 6);
    927 
    928 	if (*m & (1 << (nr & 63))) {
    929 		pthread_mutex_unlock(&hardlink_mutex);
    930 		return FALSE;
    931 	}
    932 
    933 	*m |= 1 << (nr & 63);
    934 	pthread_mutex_unlock(&hardlink_mutex);
    935 
    936 	return TRUE;
    937 }
    938 
    939 #ifndef __APPLE__
    940 /* Increase the limit on open file descriptors, if possible */
    941 static void max_openfds(void)
    942 {
    943 	struct rlimit rl;
    944 
    945 	if (!getrlimit(RLIMIT_NOFILE, &rl))
    946 		if (rl.rlim_cur < rl.rlim_max) {
    947 			rl.rlim_cur = rl.rlim_max;
    948 			setrlimit(RLIMIT_NOFILE, &rl);
    949 		}
    950 }
    951 #endif
    952 
    953 /*
    954  * Wrapper to realloc()
    955  * Frees current memory if realloc() fails and returns NULL.
    956  *
    957  * The *alloc() family returns aligned address: https://man7.org/linux/man-pages/man3/malloc.3.html
    958  */
    959 static void *xrealloc(void *pcur, size_t len)
    960 {
    961 	void *pmem = realloc(pcur, len);
    962 
    963 	if (!pmem)
    964 		free(pcur);
    965 
    966 	return pmem;
    967 }
    968 
    969 /*
    970  * Just a safe strncpy(3)
    971  * Always null ('\0') terminates if both src and dest are valid pointers.
    972  * Returns the number of bytes copied including terminating null byte.
    973  */
    974 static size_t xstrsncpy(char *restrict dst, const char *restrict src, size_t n)
    975 {
    976 	char *end = memccpy(dst, src, '\0', n);
    977 
    978 	if (!end) {
    979 		dst[n - 1] = '\0'; // NOLINT
    980 		end = dst + n; /* If we return n here, binary size increases due to auto-inlining */
    981 	}
    982 
    983 	return end - dst;
    984 }
    985 
    986 static inline size_t xstrlen(const char *restrict s)
    987 {
    988 #if !defined(__GLIBC__)
    989 	return strlen(s); // NOLINT
    990 #else
    991 	return (char *)rawmemchr(s, '\0') - s; // NOLINT
    992 #endif
    993 }
    994 
    995 static char *xstrdup(const char *restrict s)
    996 {
    997 	size_t len = xstrlen(s) + 1;
    998 	char *ptr = malloc(len);
    999 	return ptr ? memcpy(ptr, s, len) : NULL;
   1000 }
   1001 
   1002 static bool is_suffix(const char *restrict str, const char *restrict suffix)
   1003 {
   1004 	if (!str || !suffix)
   1005 		return FALSE;
   1006 
   1007 	size_t lenstr = xstrlen(str);
   1008 	size_t lensuffix = xstrlen(suffix);
   1009 
   1010 	if (lensuffix > lenstr)
   1011 		return FALSE;
   1012 
   1013 	return (xstrcmp(str + (lenstr - lensuffix), suffix) == 0);
   1014 }
   1015 
   1016 static inline bool is_prefix(const char *restrict str, const char *restrict prefix, size_t len)
   1017 {
   1018 	return !strncmp(str, prefix, len);
   1019 }
   1020 
   1021 static inline bool is_bad_len_or_dir(const char *restrict path)
   1022 {
   1023 	size_t len = xstrlen(path);
   1024 
   1025 	return ((len >= PATH_MAX) || (path[len - 1] == '/'));
   1026 }
   1027 
   1028 static char *get_cwd_entry(const char *restrict cwdpath, char *entrypath, size_t *tokenlen)
   1029 {
   1030 	size_t len = xstrlen(cwdpath);
   1031 	char *end;
   1032 
   1033 	if (!is_prefix(entrypath, cwdpath, len))
   1034 		return NULL;
   1035 
   1036 	entrypath += len + 1; /* Add 1 for trailing / */
   1037 	end = strchr(entrypath, '/');
   1038 	if (end)
   1039 		*tokenlen = end - entrypath;
   1040 	else
   1041 		*tokenlen = xstrlen(entrypath);
   1042 	DPRINTF_U(*tokenlen);
   1043 
   1044 	return entrypath;
   1045 }
   1046 
   1047 /*
   1048  * The poor man's implementation of memrchr(3).
   1049  * We are only looking for '/' and '.' in this program.
   1050  * And we are NOT expecting a '/' at the end.
   1051  * Ideally 0 < n <= xstrlen(s).
   1052  */
   1053 static void *xmemrchr(uchar_t *restrict s, uchar_t ch, size_t n)
   1054 {
   1055 #if defined(__GLIBC__) || defined(__FreeBSD__) || defined(__OpenBSD__) || defined(__NetBSD__)
   1056 	return memrchr(s, ch, n);
   1057 #else
   1058 
   1059 	if (!s || !n)
   1060 		return NULL;
   1061 
   1062 	uchar_t *ptr = s + n;
   1063 
   1064 	do {
   1065 		if (*--ptr == ch)
   1066 			return ptr;
   1067 	} while (s != ptr);
   1068 
   1069 	return NULL;
   1070 #endif
   1071 }
   1072 
   1073 /* A very simplified implementation, changes path */
   1074 static char *xdirname(char *path)
   1075 {
   1076 	char *base = xmemrchr((uchar_t *)path, '/', xstrlen(path));
   1077 
   1078 	if (base == path)
   1079 		path[1] = '\0';
   1080 	else
   1081 		*base = '\0';
   1082 
   1083 	return path;
   1084 }
   1085 
   1086 static char *xbasename(char *path)
   1087 {
   1088 	char *base = xmemrchr((uchar_t *)path, '/', xstrlen(path)); // NOLINT
   1089 
   1090 	return base ? base + 1 : path;
   1091 }
   1092 
   1093 static inline char *xextension(const char *fname, size_t len)
   1094 {
   1095 	return xmemrchr((uchar_t *)fname, '.', len);
   1096 }
   1097 
   1098 #ifndef NOUG
   1099 /*
   1100  * One-shot cache for getpwuid/getgrgid. Returns the cached name if the
   1101  * provided uid is the same as the previous uid. Returns xitoa(guid) if
   1102  * the guid is not found in the password database.
   1103  */
   1104 static char *getpwname(uid_t uid)
   1105 {
   1106 	static uint_t uidcache = UINT_MAX;
   1107 	static char *namecache;
   1108 
   1109 	if (uidcache != uid) {
   1110 		struct passwd *pw = getpwuid(uid);
   1111 
   1112 		uidcache = uid;
   1113 		namecache = pw ? pw->pw_name : NULL;
   1114 	}
   1115 
   1116 	return namecache ? namecache : xitoa(uid);
   1117 }
   1118 
   1119 static char *getgrname(gid_t gid)
   1120 {
   1121 	static uint_t gidcache = UINT_MAX;
   1122 	static char *grpcache;
   1123 
   1124 	if (gidcache != gid) {
   1125 		struct group *gr = getgrgid(gid);
   1126 
   1127 		gidcache = gid;
   1128 		grpcache = gr ? gr->gr_name : NULL;
   1129 	}
   1130 
   1131 	return grpcache ? grpcache : xitoa(gid);
   1132 }
   1133 #endif
   1134 
   1135 static inline bool getutil(char *util)
   1136 {
   1137 	return spawn("which", util, NULL, NULL, F_NORMAL | F_NOTRACE) == 0;
   1138 }
   1139 
   1140 static inline bool tilde_is_home(const char *s)
   1141 {
   1142 	return s[0] == '~' && (s[1] == '\0' || s[1] == '/');
   1143 }
   1144 
   1145 static inline bool tilde_is_home_strict(const char *s)
   1146 {
   1147 	return s[0] == '~' && s[1] == '/';
   1148 }
   1149 
   1150 /*
   1151  * Updates out with "dir/name or "/name"
   1152  * Returns the number of bytes copied including the terminating NULL byte
   1153  *
   1154  * Note: dir and out must be PATH_MAX in length to avoid macOS fault
   1155  */
   1156 static size_t mkpath(const char *dir, const char *name, char *out)
   1157 {
   1158 	size_t len = 0;
   1159 
   1160 	/* same rational for being strict as abspath() */
   1161 	if (tilde_is_home_strict(name)) { //NOLINT
   1162 		len = xstrsncpy(out, home, PATH_MAX);
   1163 		--len;
   1164 		++name;
   1165 	} else if (name[0] != '/') { // NOLINT
   1166 		/* Handle root case */
   1167 		len = istopdir(dir) ? 1 : xstrsncpy(out, dir, PATH_MAX);
   1168 		out[len - 1] = '/'; // NOLINT
   1169 	}
   1170 	return (xstrsncpy(out + len, name, PATH_MAX - len) + len);
   1171 }
   1172 
   1173 /* Assumes both the paths passed are directories */
   1174 static char *common_prefix(const char *path, char *prefix)
   1175 {
   1176 	const char *x = path, *y = prefix;
   1177 	char *sep;
   1178 
   1179 	if (!path || !*path || !prefix)
   1180 		return NULL;
   1181 
   1182 	if (!*prefix) {
   1183 		xstrsncpy(prefix, path, PATH_MAX);
   1184 		return prefix;
   1185 	}
   1186 
   1187 	while (*x && *y && (*x == *y))
   1188 		++x, ++y;
   1189 
   1190 	/* Strings are same */
   1191 	if (!*x && !*y)
   1192 		return prefix;
   1193 
   1194 	/* Path is shorter */
   1195 	if (!*x && *y == '/') {
   1196 		xstrsncpy(prefix, path, y - path);
   1197 		return prefix;
   1198 	}
   1199 
   1200 	/* Prefix is shorter */
   1201 	if (!*y && *x == '/')
   1202 		return prefix;
   1203 
   1204 	/* Shorten prefix */
   1205 	prefix[y - prefix] = '\0';
   1206 
   1207 	sep = xmemrchr((uchar_t *)prefix, '/', y - prefix);
   1208 	if (sep != prefix)
   1209 		*sep = '\0';
   1210 	else /* Just '/' */
   1211 		prefix[1] = '\0';
   1212 
   1213 	return prefix;
   1214 }
   1215 
   1216 /*
   1217  * The library function realpath() resolves symlinks.
   1218  * If there's a symlink in file list we want to show the symlink not what it's points to.
   1219  * Resolves ./../~ in filepath
   1220  */
   1221 static char *abspath(const char *filepath, char *cwd, char *buf)
   1222 {
   1223 	const char *path = filepath;
   1224 	bool allocated = FALSE;
   1225 
   1226 	if (!path)
   1227 		return NULL;
   1228 
   1229 	/* when dealing with tilde, we need to be strict.
   1230 	 * otherwise a file named "~" can end up expanding to
   1231 	 * $HOME and causing disaster */
   1232 	if (tilde_is_home_strict(path)) {
   1233 		cwd = home;
   1234 		path += 2; /* advance 2 bytes past the "~/" */
   1235 	} else if ((path[0] != '/') && !cwd) {
   1236 		cwd = getcwd(NULL, 0);
   1237 		if (!cwd)
   1238 			return NULL;
   1239 		allocated = TRUE;
   1240 	}
   1241 
   1242 	size_t dst_size = 0, src_size = xstrlen(path), cwd_size = cwd ? xstrlen(cwd) : 0;
   1243 	size_t len = src_size;
   1244 	const char *src;
   1245 	char *dst;
   1246 	/*
   1247 	 * We need to add 2 chars at the end as relative paths may start with:
   1248 	 * ./ (find .)
   1249 	 * no separator (fd .): this needs an additional char for '/'
   1250 	 */
   1251 	char *resolved_path = buf ? buf : malloc(src_size + cwd_size + 2);
   1252 
   1253 	if (!resolved_path) {
   1254 		if (allocated)
   1255 			free(cwd);
   1256 		return NULL;
   1257 	}
   1258 
   1259 	/* Turn relative paths into absolute */
   1260 	if (path[0] != '/') {
   1261 		if (!cwd) {
   1262 			if (!buf)
   1263 				free(resolved_path);
   1264 			return NULL;
   1265 		}
   1266 		dst_size = xstrsncpy(resolved_path, cwd, cwd_size + 1) - 1;
   1267 		if (allocated)
   1268 			free(cwd);
   1269 	} else
   1270 		resolved_path[0] = '\0';
   1271 
   1272 	src = path;
   1273 	dst = resolved_path + dst_size;
   1274 	for (const char *next = NULL; next != path + src_size;) {
   1275 		next = memchr(src, '/', len);
   1276 		if (!next)
   1277 			next = path + src_size;
   1278 
   1279 		if (next - src == 2 && src[0] == '.' && src[1] == '.') {
   1280 			if (dst - resolved_path) {
   1281 				dst = xmemrchr((uchar_t *)resolved_path, '/', dst - resolved_path);
   1282 				*dst = '\0';
   1283 			}
   1284 		} else if (next - src == 1 && src[0] == '.') {
   1285 			/* NOP */
   1286 		} else if (next - src) {
   1287 			*(dst++) = '/';
   1288 			xstrsncpy(dst, src, next - src + 1);
   1289 			dst += next - src;
   1290 		}
   1291 
   1292 		src = next + 1;
   1293 		len = src_size - (src - path);
   1294 	}
   1295 
   1296 	if (*resolved_path == '\0') {
   1297 		resolved_path[0] = '/';
   1298 		resolved_path[1] = '\0';
   1299 	}
   1300 
   1301 	if (xstrlen(resolved_path) >= PATH_MAX) {
   1302 		if (!buf)
   1303 			free(resolved_path);
   1304 		else
   1305 			buf[0] = '\0';
   1306 		return NULL;
   1307 	}
   1308 
   1309 	return resolved_path;
   1310 }
   1311 
   1312 /* wraps the argument in single quotes so it can be safely fed to shell */
   1313 static bool shell_escape(char *output, size_t outlen, const char *s)
   1314 {
   1315 	size_t n = xstrlen(s), w = 0;
   1316 
   1317 	if (s == output) {
   1318 		DPRINTF_S("s == output");
   1319 		return FALSE;
   1320 	}
   1321 
   1322 	output[w++] = '\''; /* begin single quote */
   1323 	for (size_t r = 0; r < n; ++r) {
   1324 		/* potentially too big: 4 for the single quote case, 2 from
   1325 		 * outside the loop */
   1326 		if (w + 6 >= outlen)
   1327 			return FALSE;
   1328 
   1329 		switch (s[r]) {
   1330 		/* the only thing that has special meaning inside single
   1331 		 * quotes are single quotes themselves. */
   1332 		case '\'':
   1333 			output[w++] = '\''; /* end single quote */
   1334 			output[w++] = '\\'; /* put \' so it's treated as literal single quote */
   1335 			output[w++] = '\'';
   1336 			output[w++] = '\''; /* start single quoting again */
   1337 			break;
   1338 		default:
   1339 			output[w++] = s[r];
   1340 			break;
   1341 		}
   1342 	}
   1343 	output[w++] = '\''; /* end single quote */
   1344 	output[w++] = '\0'; /* nul terminator */
   1345 	return TRUE;
   1346 }
   1347 
   1348 static bool set_tilde_in_path(char *path)
   1349 {
   1350 	if (is_prefix(path, home, homelen)) {
   1351 		home[homelen] = path[homelen - 1];
   1352 		path[homelen - 1] = '~';
   1353 		return TRUE;
   1354 	}
   1355 
   1356 	return FALSE;
   1357 }
   1358 
   1359 static void reset_tilde_in_path(char *path)
   1360 {
   1361 	path[homelen - 1] = home[homelen];
   1362 	home[homelen] = '\0';
   1363 }
   1364 
   1365 #ifndef NOX11
   1366 static void xterm_cfg(char *path)
   1367 {
   1368 	if (cfg.x11 && !g_state.picker) {
   1369 		/* Signal CWD change to terminal */
   1370 		printf("\033]7;file://%s%s\033\\", hostname, path);
   1371 
   1372 		/* Set terminal window title */
   1373 		bool r = set_tilde_in_path(path);
   1374 
   1375 		printf("\033]2;%s\007", r ? &path[homelen - 1] : path);
   1376 		fflush(stdout);
   1377 
   1378 		if (r)
   1379 			reset_tilde_in_path(path);
   1380 	}
   1381 }
   1382 #endif
   1383 
   1384 static bool convert_tilde(const char *path, char *buf)
   1385 {
   1386 	if (tilde_is_home(path)) {
   1387 		ssize_t len = xstrlen(home);
   1388 		ssize_t loclen = xstrlen(path);
   1389 
   1390 		xstrsncpy(buf, home, len + 1);
   1391 		xstrsncpy(buf + len, path + 1, loclen);
   1392 		return true;
   1393 	}
   1394 	return false;
   1395 }
   1396 
   1397 static int create_tmp_file(void)
   1398 {
   1399 	xstrsncpy(g_tmpfpath + tmpfplen - 1, messages[STR_TMPFILE], TMP_LEN_MAX - tmpfplen);
   1400 
   1401 	int fd = mkstemp(g_tmpfpath);
   1402 
   1403 	if (fd == -1) {
   1404 		DPRINTF_S(strerror(errno));
   1405 	}
   1406 
   1407 	return fd;
   1408 }
   1409 
   1410 static void msg(const char *message)
   1411 {
   1412 	dprintf(STDERR_FILENO, "%s\n", message);
   1413 }
   1414 
   1415 #ifdef KEY_RESIZE
   1416 static void handle_key_resize(void)
   1417 {
   1418 	endwin();
   1419 	refresh();
   1420 }
   1421 
   1422 /* Clear the old prompt */
   1423 static void clearoldprompt(void)
   1424 {
   1425 	// clear info line
   1426 	move(xlines - 2, 0);
   1427 	clrtoeol();
   1428 
   1429 	tolastln();
   1430 	clrtoeol();
   1431 	handle_key_resize();
   1432 }
   1433 #endif
   1434 
   1435 /* Messages show up at the bottom */
   1436 static inline void printmsg_nc(const char *msg)
   1437 {
   1438 	tolastln();
   1439 	addstr(msg);
   1440 	clrtoeol();
   1441 }
   1442 
   1443 static void printmsg(const char *msg)
   1444 {
   1445 	attron(COLOR_PAIR(cfg.curctx + 1));
   1446 	printmsg_nc(msg);
   1447 	attroff(COLOR_PAIR(cfg.curctx + 1));
   1448 }
   1449 
   1450 static void printwait(const char *msg, int *presel)
   1451 {
   1452 	printmsg(msg);
   1453 	if (presel) {
   1454 		*presel = MSGWAIT;
   1455 		if (ndents)
   1456 			xstrsncpy(g_ctx[cfg.curctx].c_name, pdents[cur].name, NAME_MAX + 1);
   1457 	}
   1458 }
   1459 
   1460 /* Kill curses and display error before exiting */
   1461 static void printerr(int linenum)
   1462 {
   1463 	exitcurses();
   1464 	perror(xitoa(linenum));
   1465 	if (!g_state.picker && selpath)
   1466 		unlink(selpath);
   1467 	free(pselbuf);
   1468 	exit(1);
   1469 }
   1470 
   1471 static inline bool xconfirm(int c)
   1472 {
   1473 	return (c == 'y' || c == 'Y');
   1474 }
   1475 
   1476 static int get_input(const char *prompt)
   1477 {
   1478 	wint_t ch[1];
   1479 
   1480 	if (prompt)
   1481 		printmsg(prompt);
   1482 	cleartimeout();
   1483 
   1484 	get_wch(ch);
   1485 
   1486 #ifdef KEY_RESIZE
   1487 	while (*ch == KEY_RESIZE) {
   1488 		if (prompt) {
   1489 			clearoldprompt();
   1490 			xlines = LINES;
   1491 			printmsg(prompt);
   1492 		}
   1493 
   1494 		get_wch(ch);
   1495 	}
   1496 #endif
   1497 	settimeout();
   1498 	return (int)*ch;
   1499 }
   1500 
   1501 static bool isselfileempty(void)
   1502 {
   1503 	struct stat sb;
   1504 
   1505 	return (stat(selpath, &sb) == -1) || (!sb.st_size);
   1506 }
   1507 
   1508 static int get_cur_or_sel(void)
   1509 {
   1510 	bool sel = (selbufpos || !isselfileempty());
   1511 
   1512 	/* Check both local buffer and selection file for external selection */
   1513 	if (sel && ndents) {
   1514 		/* If selection is preferred and we have a local selection, return selection.
   1515 		 * Always show the prompt in case of an external selection.
   1516 		 */
   1517 		if (cfg.prefersel && selbufpos)
   1518 			return 's';
   1519 
   1520 		int choice = get_input(messages[MSG_CUR_SEL_OPTS]);
   1521 
   1522 		return ((choice == 'c' || choice == 's') ? choice : 0);
   1523 	}
   1524 
   1525 	if (sel)
   1526 		return 's';
   1527 
   1528 	if (ndents)
   1529 		return 'c';
   1530 
   1531 	return 0;
   1532 }
   1533 
   1534 static void xdelay(useconds_t delay)
   1535 {
   1536 	refresh();
   1537 	usleep(delay);
   1538 }
   1539 
   1540 static char confirm_force(bool selection)
   1541 {
   1542 	char str[64];
   1543 
   1544 	snprintf(str, 64, messages[MSG_FORCE_RM],
   1545 		 g_state.trash ? utils[UTIL_GIO_TRASH] + 4 : utils[UTIL_RM_RF],
   1546 		 (selection ? "selected" : "hovered"));
   1547 
   1548 	int r = get_input(str);
   1549 
   1550 	if (r == ESC)
   1551 		return '\0'; /* cancel */
   1552 	if (r == 'y' || r == 'Y')
   1553 		return 'f'; /* forceful for rm */
   1554 	return (g_state.trash ? '\0' : 'i'); /* interactive for rm */
   1555 }
   1556 
   1557 /* Writes buflen char(s) from buf to a file */
   1558 static void writesel(const char *buf, const size_t buflen)
   1559 {
   1560 	if (!selpath)
   1561 		return;
   1562 
   1563 	int fd = open(selpath, O_CREAT | O_WRONLY | O_TRUNC, S_IWUSR | S_IRUSR);
   1564 
   1565 	if (fd != -1) {
   1566 		if (write(fd, buf, buflen) != (ssize_t)buflen)
   1567 			printwarn(NULL);
   1568 		close(fd);
   1569 	} else
   1570 		printwarn(NULL);
   1571 }
   1572 
   1573 static void appendfpath(const char *path, const size_t len)
   1574 {
   1575 	if ((selbufpos >= selbuflen) || ((len + 3) > (selbuflen - selbufpos))) {
   1576 		selbuflen += PATH_MAX;
   1577 		pselbuf = xrealloc(pselbuf, selbuflen);
   1578 		if (!pselbuf)
   1579 			errexit();
   1580 	}
   1581 
   1582 	selbufpos += xstrsncpy(pselbuf + selbufpos, path, len);
   1583 }
   1584 
   1585 static void selbufrealloc(const size_t alloclen)
   1586 {
   1587 	if ((selbufpos + alloclen) > selbuflen) {
   1588 		selbuflen = ALIGN_UP(selbufpos + alloclen, PATH_MAX);
   1589 		pselbuf = xrealloc(pselbuf, selbuflen);
   1590 		if (!pselbuf)
   1591 			errexit();
   1592 	}
   1593 }
   1594 
   1595 /* Write selected file paths to fd, linefeed separated */
   1596 static size_t seltofile(int fd, uint_t *pcount)
   1597 {
   1598 	uint_t lastpos, count = 0;
   1599 	char *pbuf = pselbuf;
   1600 	size_t pos = 0;
   1601 	ssize_t len, prefixlen = 0, initlen = 0;
   1602 
   1603 	if (pcount)
   1604 		*pcount = 0;
   1605 
   1606 	if (!selbufpos)
   1607 		return 0;
   1608 
   1609 	lastpos = selbufpos - 1;
   1610 
   1611 	if (listpath) {
   1612 		prefixlen = (ssize_t)xstrlen(listroot);
   1613 		initlen = (ssize_t)xstrlen(listpath);
   1614 	}
   1615 
   1616 	while (pos <= lastpos) {
   1617 		DPRINTF_S(pbuf);
   1618 		len = (ssize_t)xstrlen(pbuf);
   1619 
   1620 		if (!listpath || !is_prefix(pbuf, listpath, initlen)) {
   1621 			if (write(fd, pbuf, len) != len)
   1622 				return pos;
   1623 		} else {
   1624 			if (write(fd, listroot, prefixlen) != prefixlen)
   1625 				return pos;
   1626 			if (write(fd, pbuf + initlen, len - initlen) != (len - initlen))
   1627 				return pos;
   1628 		}
   1629 
   1630 		pos += len;
   1631 		if (pos <= lastpos) {
   1632 			if (write(fd, "\n", 1) != 1)
   1633 				return pos;
   1634 			pbuf += len + 1;
   1635 		}
   1636 		++pos;
   1637 		++count;
   1638 	}
   1639 
   1640 	if (pcount)
   1641 		*pcount = count;
   1642 
   1643 	return pos;
   1644 }
   1645 
   1646 /* List selection from selection file (another instance) */
   1647 static bool listselfile(void)
   1648 {
   1649 	if (isselfileempty())
   1650 		return FALSE;
   1651 
   1652 	snprintf(g_buf, CMD_LEN_MAX, "tr \'\\0\' \'\\n\' < %s", selpath);
   1653 	spawn(utils[UTIL_SH_EXEC], g_buf, NULL, NULL, F_CLI | F_CONFIRM);
   1654 
   1655 	return TRUE;
   1656 }
   1657 
   1658 /* Reset selection indicators */
   1659 static void resetselind(void)
   1660 {
   1661 	for (int r = 0; r < ndents; ++r)
   1662 		if (pdents[r].flags & FILE_SELECTED)
   1663 			pdents[r].flags &= ~FILE_SELECTED;
   1664 }
   1665 
   1666 static void startselection(void)
   1667 {
   1668 	if (!g_state.selmode) {
   1669 		g_state.selmode = 1;
   1670 		nselected = 0;
   1671 
   1672 		if (selbufpos) {
   1673 			resetselind();
   1674 			writesel(NULL, 0);
   1675 			selbufpos = 0;
   1676 		}
   1677 	}
   1678 }
   1679 
   1680 static void clearselection(void)
   1681 {
   1682 	nselected = 0;
   1683 	selbufpos = 0;
   1684 	g_state.selmode = 0;
   1685 	writesel(NULL, 0);
   1686 }
   1687 
   1688 static char *findinsel(char *startpos, int len)
   1689 {
   1690 	if (!selbufpos)
   1691 		return FALSE;
   1692 
   1693 	if (!startpos)
   1694 		startpos = pselbuf;
   1695 
   1696 	char *found = startpos;
   1697 	size_t buflen = selbufpos - (startpos - pselbuf);
   1698 
   1699 	while (1) {
   1700 		/* memmem(3): not specified in POSIX.1, but present on a number of other systems. */
   1701 		found = memmem(found, buflen - (found - startpos), g_sel, len);
   1702 		if (!found)
   1703 			return NULL;
   1704 		if (found == startpos || *(found - 1) == '\0')
   1705 			return found;
   1706 		found += len; /* We found g_sel as a substring of a path, move forward */
   1707 		if (found >= startpos + buflen)
   1708 			return NULL;
   1709 	}
   1710 }
   1711 
   1712 static int markcmp(const void *va, const void *vb)
   1713 {
   1714 	const selmark *ma = (selmark*)va;
   1715 	const selmark *mb = (selmark*)vb;
   1716 
   1717 	return ma->startpos - mb->startpos;
   1718 }
   1719 
   1720 /* scanselforpath() must be called before calling this */
   1721 static inline void findmarkentry(size_t len, struct entry *dentp)
   1722 {
   1723 	if (!(dentp->flags & FILE_SCANNED)) {
   1724 		if (findinsel(findselpos, len + xstrsncpy(g_sel + len, dentp->name, dentp->nlen)))
   1725 			dentp->flags |= FILE_SELECTED;
   1726 		dentp->flags |= FILE_SCANNED;
   1727 	}
   1728 }
   1729 
   1730 /*
   1731  * scanselforpath() must be called before calling this
   1732  * pathlen = length of path + 1 (+1 for trailing slash)
   1733  */
   1734 static void invertselbuf(const int pathlen)
   1735 {
   1736 	size_t len, endpos, shrinklen = 0, alloclen = 0;
   1737 	char * const pbuf = g_sel + pathlen;
   1738 	char *found;
   1739 	int i, nmarked = 0, prev = 0;
   1740 	struct entry *dentp;
   1741 	bool scan = FALSE;
   1742 	selmark *marked = malloc(nselected * sizeof(selmark));
   1743 
   1744 	if (!marked) {
   1745 		printwarn(NULL);
   1746 		return;
   1747 	}
   1748 
   1749 	/* First pass: inversion */
   1750 	for (i = 0; i < ndents; ++i) {
   1751 		dentp = &pdents[i];
   1752 
   1753 		if (dentp->flags & FILE_SCANNED) {
   1754 			if (dentp->flags & FILE_SELECTED) {
   1755 				dentp->flags ^= FILE_SELECTED; /* Clear selection status */
   1756 				scan = TRUE;
   1757 			} else {
   1758 				dentp->flags |= FILE_SELECTED;
   1759 				alloclen += pathlen + dentp->nlen;
   1760 			}
   1761 		} else {
   1762 			dentp->flags |= FILE_SCANNED;
   1763 			scan = TRUE;
   1764 		}
   1765 
   1766 		if (scan) {
   1767 			len = pathlen + xstrsncpy(pbuf, dentp->name, NAME_MAX);
   1768 			found = findinsel(findselpos, len);
   1769 			if (found) {
   1770 				if (findselpos == found)
   1771 					findselpos += len;
   1772 
   1773 				if (nmarked && (found
   1774 				    == (marked[nmarked - 1].startpos + marked[nmarked - 1].len)))
   1775 					marked[nmarked - 1].len += len;
   1776 				else {
   1777 					marked[nmarked].startpos = found;
   1778 					marked[nmarked].len = len;
   1779 					++nmarked;
   1780 				}
   1781 
   1782 				--nselected;
   1783 				shrinklen += len; /* buffer size adjustment */
   1784 			} else {
   1785 				dentp->flags |= FILE_SELECTED;
   1786 				alloclen += pathlen + dentp->nlen;
   1787 			}
   1788 			scan = FALSE;
   1789 		}
   1790 	}
   1791 
   1792 	/*
   1793 	 * Files marked for deselection could be found in arbitrary order.
   1794 	 * Sort by appearance in selection buffer.
   1795 	 * With entries sorted we can merge adjacent ones allowing us to
   1796 	 * move them in a single go.
   1797 	 */
   1798 	qsort(marked, nmarked, sizeof(selmark), &markcmp);
   1799 
   1800 	/* Some files might be adjacent. Merge them into a single entry */
   1801 	for (i = 1; i < nmarked; ++i) {
   1802 		if (marked[i].startpos == marked[prev].startpos + marked[prev].len)
   1803 			marked[prev].len += marked[i].len;
   1804 		else {
   1805 			++prev;
   1806 			marked[prev].startpos = marked[i].startpos;
   1807 			marked[prev].len = marked[i].len;
   1808 		}
   1809 	}
   1810 
   1811 	/*
   1812 	 * Number of entries is increased by encountering a non-adjacent entry
   1813 	 * After we finish the loop we should increment it once more.
   1814 	 */
   1815 
   1816 	if (nmarked) /* Make sure there is something to deselect */
   1817 		nmarked = prev + 1;
   1818 
   1819 	/* Using merged entries remove unselected chunks from selection buffer */
   1820 	for (i = 0; i < nmarked; ++i) {
   1821 		/*
   1822 		 * found: points to where the current block starts
   1823 		 *        variable is recycled from previous for readability
   1824 		 * endpos: points to where the the next block starts
   1825 		 *         area between the end of current block (found + len)
   1826 		 *         and endpos is selected entries. This is what we are
   1827 		 *         moving back.
   1828 		 */
   1829 		found = marked[i].startpos;
   1830 		endpos = (i + 1 == nmarked ? selbufpos : marked[i + 1].startpos - pselbuf);
   1831 		len = marked[i].len;
   1832 
   1833 		/* Move back only selected entries. No selected memory is moved twice */
   1834 		memmove(found, found + len, endpos - (found + len - pselbuf));
   1835 	}
   1836 
   1837 	free(marked);
   1838 
   1839 	/* Buffer size adjustment */
   1840 	selbufpos -= shrinklen;
   1841 
   1842 	selbufrealloc(alloclen);
   1843 
   1844 	/* Second pass: append newly selected to buffer */
   1845 	for (i = 0; i < ndents; ++i) {
   1846 		if (pdents[i].flags & FILE_SELECTED) {
   1847 			len = pathlen + xstrsncpy(pbuf, pdents[i].name, NAME_MAX);
   1848 			appendfpath(g_sel, len);
   1849 			++nselected;
   1850 		}
   1851 	}
   1852 
   1853 	nselected ? writesel(pselbuf, selbufpos - 1) : clearselection();
   1854 }
   1855 
   1856 /*
   1857  * scanselforpath() must be called before calling this
   1858  * pathlen = length of path + 1 (+1 for trailing slash)
   1859  */
   1860 static void addtoselbuf(const int pathlen, int startid, int endid)
   1861 {
   1862 	int i;
   1863 	size_t len, alloclen = 0;
   1864 	struct entry *dentp;
   1865 	char *found;
   1866 	char * const pbuf = g_sel + pathlen;
   1867 
   1868 	/* Remember current selection buffer position */
   1869 	for (i = startid; i <= endid; ++i) {
   1870 		dentp = &pdents[i];
   1871 
   1872 		if (findselpos) {
   1873 			len = pathlen + xstrsncpy(pbuf, dentp->name, NAME_MAX);
   1874 			found = findinsel(findselpos, len);
   1875 			if (found) {
   1876 				dentp->flags |= (FILE_SCANNED | FILE_SELECTED);
   1877 				if (found == findselpos) {
   1878 					findselpos += len;
   1879 					if (findselpos == (pselbuf + selbufpos))
   1880 						findselpos = NULL;
   1881 				}
   1882 			} else
   1883 				alloclen += pathlen + dentp->nlen;
   1884 		} else
   1885 			alloclen += pathlen + dentp->nlen;
   1886 	}
   1887 
   1888 	selbufrealloc(alloclen);
   1889 
   1890 	for (i = startid; i <= endid; ++i) {
   1891 		if (!(pdents[i].flags & FILE_SELECTED)) {
   1892 			len = pathlen + xstrsncpy(pbuf, pdents[i].name, NAME_MAX);
   1893 			appendfpath(g_sel, len);
   1894 			++nselected;
   1895 			pdents[i].flags |= (FILE_SCANNED | FILE_SELECTED);
   1896 		}
   1897 	}
   1898 
   1899 	writesel(pselbuf, selbufpos - 1); /* Truncate NULL from end */
   1900 }
   1901 
   1902 /* Removes g_sel from selbuf */
   1903 static void rmfromselbuf(size_t len)
   1904 {
   1905 	char *found = findinsel(findselpos, len);
   1906 	if (!found)
   1907 		return;
   1908 
   1909 	memmove(found, found + len, selbufpos - (found + len - pselbuf));
   1910 	selbufpos -= len;
   1911 
   1912 	nselected ? writesel(pselbuf, selbufpos - 1) : clearselection();
   1913 }
   1914 
   1915 static int scanselforpath(const char *path, bool getsize)
   1916 {
   1917 	if (!path[1]) { /* path should always be at least two bytes (including NULL) */
   1918 		g_sel[0] = '/';
   1919 		findselpos = pselbuf;
   1920 		return 1; /* Length of '/' is 1 */
   1921 	}
   1922 
   1923 	size_t off = xstrsncpy(g_sel, path, PATH_MAX);
   1924 
   1925 	g_sel[off - 1] = '/';
   1926 	/*
   1927 	 * We set findselpos only here. Directories can be listed in arbitrary order.
   1928 	 * This is the best best we can do for remembering position.
   1929 	 */
   1930 	findselpos = findinsel(NULL, off);
   1931 
   1932 	if (getsize)
   1933 		return off;
   1934 	return (findselpos ? off : 0);
   1935 }
   1936 
   1937 /* Finish selection procedure before an operation */
   1938 static void endselection(bool endselmode)
   1939 {
   1940 	int fd;
   1941 	ssize_t count;
   1942 	char buf[sizeof(patterns[P_REPLACE]) + PATH_MAX + (TMP_LEN_MAX << 1)];
   1943 
   1944 	if (endselmode && g_state.selmode)
   1945 		g_state.selmode = 0;
   1946 
   1947 	/* The code below is only for listing mode */
   1948 	if (!listpath || !selbufpos)
   1949 		return;
   1950 
   1951 	fd = create_tmp_file();
   1952 	if (fd == -1) {
   1953 		DPRINTF_S("couldn't create tmp file");
   1954 		return;
   1955 	}
   1956 
   1957 	seltofile(fd, NULL);
   1958 	if (close(fd)) {
   1959 		DPRINTF_S(strerror(errno));
   1960 		printwarn(NULL);
   1961 		return;
   1962 	}
   1963 
   1964 	snprintf(buf, sizeof(buf), patterns[P_REPLACE], listpath, listroot, g_tmpfpath);
   1965 	spawn(utils[UTIL_SH_EXEC], buf, NULL, NULL, F_CLI);
   1966 
   1967 	fd = open(g_tmpfpath, O_RDONLY);
   1968 	if (fd == -1) {
   1969 		DPRINTF_S(strerror(errno));
   1970 		printwarn(NULL);
   1971 		if (unlink(g_tmpfpath)) {
   1972 			DPRINTF_S(strerror(errno));
   1973 			printwarn(NULL);
   1974 		}
   1975 		return;
   1976 	}
   1977 
   1978 	count = read(fd, pselbuf, selbuflen);
   1979 	if (count < 0) {
   1980 		DPRINTF_S(strerror(errno));
   1981 		printwarn(NULL);
   1982 		if (close(fd) || unlink(g_tmpfpath)) {
   1983 			DPRINTF_S(strerror(errno));
   1984 		}
   1985 		return;
   1986 	}
   1987 
   1988 	if (close(fd) || unlink(g_tmpfpath)) {
   1989 		DPRINTF_S(strerror(errno));
   1990 		printwarn(NULL);
   1991 		return;
   1992 	}
   1993 
   1994 	selbufpos = count;
   1995 	pselbuf[--count] = '\0';
   1996 	for (--count; count > 0; --count)
   1997 		if (pselbuf[count] == '\n' && pselbuf[count+1] == '/')
   1998 			pselbuf[count] = '\0';
   1999 
   2000 	writesel(pselbuf, selbufpos - 1);
   2001 }
   2002 
   2003 /* Returns: 1 - success, 0 - none selected, -1 - other failure */
   2004 static int editselection(void)
   2005 {
   2006 	int ret = -1;
   2007 	int fd, lines = 0;
   2008 	ssize_t count;
   2009 	struct stat sb;
   2010 	time_t mtime;
   2011 
   2012 	if (!selbufpos) /* External selection is only editable at source */
   2013 		return listselfile();
   2014 
   2015 	fd = create_tmp_file();
   2016 	if (fd == -1) {
   2017 		DPRINTF_S("couldn't create tmp file");
   2018 		return -1;
   2019 	}
   2020 
   2021 	seltofile(fd, NULL);
   2022 	if (close(fd)) {
   2023 		DPRINTF_S(strerror(errno));
   2024 		return -1;
   2025 	}
   2026 
   2027 	/* Save the last modification time */
   2028 	if (stat(g_tmpfpath, &sb)) {
   2029 		DPRINTF_S(strerror(errno));
   2030 		unlink(g_tmpfpath);
   2031 		return -1;
   2032 	}
   2033 	mtime = sb.st_mtime;
   2034 
   2035 	spawn((cfg.waitedit ? enveditor : editor), g_tmpfpath, NULL, NULL, F_CLI);
   2036 
   2037 	fd = open(g_tmpfpath, O_RDONLY);
   2038 	if (fd == -1) {
   2039 		DPRINTF_S(strerror(errno));
   2040 		unlink(g_tmpfpath);
   2041 		return -1;
   2042 	}
   2043 
   2044 	fstat(fd, &sb);
   2045 
   2046 	if (mtime == sb.st_mtime) {
   2047 		DPRINTF_S("selection is not modified");
   2048 		unlink(g_tmpfpath);
   2049 		return 1;
   2050 	}
   2051 
   2052 	if (sb.st_size > selbufpos) {
   2053 		DPRINTF_S("edited buffer larger than previous");
   2054 		unlink(g_tmpfpath);
   2055 		goto emptyedit;
   2056 	}
   2057 
   2058 	count = read(fd, pselbuf, selbuflen);
   2059 	if (count < 0) {
   2060 		DPRINTF_S(strerror(errno));
   2061 		printwarn(NULL);
   2062 		if (close(fd) || unlink(g_tmpfpath)) {
   2063 			DPRINTF_S(strerror(errno));
   2064 			printwarn(NULL);
   2065 		}
   2066 		goto emptyedit;
   2067 	}
   2068 
   2069 	if (close(fd) || unlink(g_tmpfpath)) {
   2070 		DPRINTF_S(strerror(errno));
   2071 		printwarn(NULL);
   2072 		goto emptyedit;
   2073 	}
   2074 
   2075 	if (!count) {
   2076 		ret = 1;
   2077 		goto emptyedit;
   2078 	}
   2079 
   2080 	resetselind();
   2081 	selbufpos = count;
   2082 	/* The last character should be '\n' */
   2083 	pselbuf[--count] = '\0';
   2084 	for (--count; count > 0; --count) {
   2085 		/* Replace every '\n' that separates two paths */
   2086 		if (pselbuf[count] == '\n' && pselbuf[count + 1] == '/') {
   2087 			++lines;
   2088 			pselbuf[count] = '\0';
   2089 		}
   2090 	}
   2091 
   2092 	/* Add a line for the last file */
   2093 	++lines;
   2094 
   2095 	if (lines > nselected) {
   2096 		DPRINTF_S("files added to selection");
   2097 		goto emptyedit;
   2098 	}
   2099 
   2100 	nselected = lines;
   2101 	writesel(pselbuf, selbufpos - 1);
   2102 
   2103 	return 1;
   2104 
   2105 emptyedit:
   2106 	resetselind();
   2107 	clearselection();
   2108 	return ret;
   2109 }
   2110 
   2111 static bool selsafe(void)
   2112 {
   2113 	/* Fail if selection file path not generated */
   2114 	if (!selpath) {
   2115 		printmsg(messages[MSG_SEL_MISSING]);
   2116 		return FALSE;
   2117 	}
   2118 
   2119 	/* Fail if selection file path isn't accessible */
   2120 	if (access(selpath, R_OK | W_OK) == -1) {
   2121 		errno == ENOENT ? printmsg(messages[MSG_0_SELECTED]) : printwarn(NULL);
   2122 		return FALSE;
   2123 	}
   2124 
   2125 	return TRUE;
   2126 }
   2127 
   2128 static void export_file_list(void)
   2129 {
   2130 	if (!ndents)
   2131 		return;
   2132 
   2133 	struct entry *pdent = pdents;
   2134 	int fd = create_tmp_file();
   2135 
   2136 	if (fd == -1) {
   2137 		DPRINTF_S(strerror(errno));
   2138 		return;
   2139 	}
   2140 
   2141 	for (int r = 0; r < ndents; ++pdent, ++r) {
   2142 		if (write(fd, pdent->name, pdent->nlen - 1) != (pdent->nlen - 1))
   2143 			break;
   2144 
   2145 		if ((r != ndents - 1) && (write(fd, "\n", 1) != 1))
   2146 			break;
   2147 	}
   2148 
   2149 	if (close(fd)) {
   2150 		DPRINTF_S(strerror(errno));
   2151 	}
   2152 
   2153 	spawn(editor, g_tmpfpath, NULL, NULL, F_CLI);
   2154 
   2155 	if (xconfirm(get_input(messages[MSG_RM_TMP])))
   2156 		unlink(g_tmpfpath);
   2157 }
   2158 
   2159 static bool init_fcolors(void)
   2160 {
   2161 	char *f_colors = getenv(env_cfg[NNN_FCOLORS]);
   2162 
   2163 	if (!f_colors || !*f_colors)
   2164 		f_colors = gcolors;
   2165 
   2166 	for (uchar_t id = C_BLK; *f_colors && id <= C_UND; ++id) {
   2167 		fcolors[id] = xchartohex(*f_colors) << 4;
   2168 		if (*++f_colors) {
   2169 			fcolors[id] += xchartohex(*f_colors);
   2170 			if (fcolors[id])
   2171 				init_pair(id, fcolors[id], -1);
   2172 		} else
   2173 			return FALSE;
   2174 		++f_colors;
   2175 	}
   2176 
   2177 	return TRUE;
   2178 }
   2179 
   2180 /* Initialize curses mode */
   2181 static bool initcurses(void *oldmask)
   2182 {
   2183 #ifdef NOMOUSE
   2184 	(void) oldmask;
   2185 #endif
   2186 
   2187 	if (g_state.picker) {
   2188 		if (!newterm(NULL, stderr, stdin)) {
   2189 			msg("newterm!");
   2190 			return FALSE;
   2191 		}
   2192 	} else if (!initscr()) {
   2193 		msg("initscr!");
   2194 		DPRINTF_S(getenv("TERM"));
   2195 		return FALSE;
   2196 	}
   2197 
   2198 	cbreak();
   2199 	noecho();
   2200 	nonl();
   2201 	//intrflush(stdscr, FALSE);
   2202 	keypad(stdscr, TRUE);
   2203 #ifndef NOMOUSE
   2204 #if NCURSES_MOUSE_VERSION <= 1
   2205 	mousemask(BUTTON1_PRESSED | BUTTON1_DOUBLE_CLICKED | BUTTON2_PRESSED | BUTTON3_PRESSED,
   2206 		  (mmask_t *)oldmask);
   2207 #else
   2208 	mousemask(BUTTON1_PRESSED | BUTTON2_PRESSED | BUTTON3_PRESSED | BUTTON4_PRESSED
   2209 		  | BUTTON5_PRESSED, (mmask_t *)oldmask);
   2210 #endif
   2211 	mouseinterval(0);
   2212 #endif
   2213 	curs_set(FALSE); /* Hide cursor */
   2214 
   2215 	char *colors = getenv(env_cfg[NNN_COLORS]);
   2216 
   2217 	if (colors || !getenv("NO_COLOR")) {
   2218 		uint_t *pcode;
   2219 		bool ext = FALSE;
   2220 
   2221 		start_color();
   2222 		use_default_colors();
   2223 
   2224 		/* Initialize file colors */
   2225 		if (COLORS >= COLOR_256) {
   2226 			if (!(g_state.oldcolor || init_fcolors())) {
   2227 				exitcurses();
   2228 				msg(env_cfg[NNN_FCOLORS]);
   2229 				return FALSE;
   2230 			}
   2231 		} else
   2232 			g_state.oldcolor = 1;
   2233 
   2234 		DPRINTF_D(COLORS);
   2235 		DPRINTF_D(COLOR_PAIRS);
   2236 
   2237 		if (colors && *colors == '#') {
   2238 			char *sep = strchr(colors, ';');
   2239 
   2240 			if (!g_state.oldcolor && COLORS >= COLOR_256) {
   2241 				++colors;
   2242 				ext = TRUE;
   2243 
   2244 				/*
   2245 				 * If fallback colors are specified, set the separator
   2246 				 * to NULL so we don't interpret separator and fallback
   2247 				 * if fewer than CTX_MAX xterm 256 colors are specified.
   2248 				 */
   2249 				if (sep)
   2250 					*sep = '\0';
   2251 			} else {
   2252 				colors = sep; /* Detect if 8 colors fallback is appended */
   2253 				if (colors)
   2254 					++colors;
   2255 			}
   2256 		}
   2257 
   2258 		/* Get and set the context colors */
   2259 		for (uchar_t i = 0; i < CTX_MAX; ++i) {
   2260 			pcode = &g_ctx[i].color;
   2261 
   2262 			if (colors && *colors) {
   2263 				if (ext) {
   2264 					*pcode = xchartohex(*colors) << 4;
   2265 					if (*++colors)
   2266 						fcolors[i + 1] = *pcode += xchartohex(*colors);
   2267 					else { /* Each color code must be 2 hex symbols */
   2268 						exitcurses();
   2269 						msg(env_cfg[NNN_COLORS]);
   2270 						return FALSE;
   2271 					}
   2272 				} else
   2273 					*pcode = (*colors < '0' || *colors > '7') ? 4 : *colors - '0';
   2274 				++colors;
   2275 			} else
   2276 				*pcode = 4;
   2277 
   2278 			init_pair(i + 1, *pcode, -1);
   2279 		}
   2280 	}
   2281 #ifdef ICONS_ENABLED
   2282 	if (!g_state.oldcolor) {
   2283 		for (uint_t i = 0; i < ELEMENTS(init_colors); ++i)
   2284 			init_pair(C_UND + 1 + init_colors[i], init_colors[i], -1);
   2285 	}
   2286 #endif
   2287 
   2288 	settimeout(); /* One second */
   2289 	set_escdelay(25);
   2290 	return TRUE;
   2291 }
   2292 
   2293 /* No NULL check here as spawn() guards against it */
   2294 static char *parseargs(char *cmd, char **argv, int *pindex)
   2295 {
   2296 	int count = 0;
   2297 	size_t len = xstrlen(cmd) + 1;
   2298 	char *line = (char *)malloc(len);
   2299 
   2300 	if (!line) {
   2301 		DPRINTF_S("malloc()!");
   2302 		return NULL;
   2303 	}
   2304 
   2305 	xstrsncpy(line, cmd, len);
   2306 	argv[count++] = line;
   2307 	cmd = line;
   2308 
   2309 	while (*line) { // NOLINT
   2310 		if (ISBLANK(*line)) {
   2311 			*line++ = '\0';
   2312 
   2313 			if (!*line) // NOLINT
   2314 				break;
   2315 
   2316 			argv[count++] = line;
   2317 			if (count == EXEC_ARGS_MAX) {
   2318 				count = -1;
   2319 				break;
   2320 			}
   2321 		}
   2322 
   2323 		++line;
   2324 	}
   2325 
   2326 	if (count == -1 || count > (EXEC_ARGS_MAX - 4)) { /* 3 args and last NULL */
   2327 		free(cmd);
   2328 		cmd = NULL;
   2329 		DPRINTF_S("NULL or too many args");
   2330 	}
   2331 
   2332 	*pindex = count;
   2333 	return cmd;
   2334 }
   2335 
   2336 static void enable_signals(void)
   2337 {
   2338 	struct sigaction dfl_act = {.sa_handler = SIG_DFL};
   2339 
   2340 	sigaction(SIGHUP, &dfl_act, NULL);
   2341 	sigaction(SIGINT, &dfl_act, NULL);
   2342 	sigaction(SIGQUIT, &dfl_act, NULL);
   2343 	sigaction(SIGTSTP, &dfl_act, NULL);
   2344 	sigaction(SIGWINCH, &dfl_act, NULL);
   2345 }
   2346 
   2347 static pid_t xfork(uchar_t flag)
   2348 {
   2349 	pid_t p = fork();
   2350 
   2351 	if (p > 0) {
   2352 		/* the parent ignores the interrupt, quit and hangup signals */
   2353 		sigaction(SIGHUP, &(struct sigaction){.sa_handler = SIG_IGN}, &oldsighup);
   2354 		sigaction(SIGTSTP, &(struct sigaction){.sa_handler = SIG_DFL}, &oldsigtstp);
   2355 		sigaction(SIGWINCH, &(struct sigaction){.sa_handler = SIG_IGN}, &oldsigwinch);
   2356 	} else if (p == 0) {
   2357 		/* We create a grandchild to detach */
   2358 		if (flag & F_NOWAIT) {
   2359 			p = fork();
   2360 
   2361 			if (p > 0)
   2362 				_exit(EXIT_SUCCESS);
   2363 			else if (p == 0) {
   2364 				enable_signals();
   2365 				setsid();
   2366 				return p;
   2367 			}
   2368 
   2369 			perror("fork");
   2370 			_exit(EXIT_FAILURE);
   2371 		}
   2372 
   2373 		/* So they can be used to stop the child */
   2374 		enable_signals();
   2375 	}
   2376 
   2377 	/* This is the parent waiting for the child to create grandchild */
   2378 	if (flag & F_NOWAIT)
   2379 		waitpid(p, NULL, 0);
   2380 
   2381 	if (p == -1)
   2382 		perror("fork");
   2383 	return p;
   2384 }
   2385 
   2386 static int join(pid_t p, uchar_t flag)
   2387 {
   2388 	int status = 0xFFFF;
   2389 
   2390 	if (!(flag & F_NOWAIT)) {
   2391 		/* wait for the child to exit */
   2392 		do {
   2393 		} while (waitpid(p, &status, 0) == -1);
   2394 
   2395 		if (WIFEXITED(status)) {
   2396 			status = WEXITSTATUS(status);
   2397 			DPRINTF_D(status);
   2398 		}
   2399 	}
   2400 
   2401 	/* restore parent's signal handling */
   2402 	sigaction(SIGHUP, &oldsighup, NULL);
   2403 	sigaction(SIGTSTP, &oldsigtstp, NULL);
   2404 	sigaction(SIGWINCH, &oldsigwinch, NULL);
   2405 
   2406 	return status;
   2407 }
   2408 
   2409 /*
   2410  * Spawns a child process. Behaviour can be controlled using flag.
   2411  * Limited to 3 arguments to a program, flag works on bit set.
   2412  */
   2413 static int spawn(char *file, char *arg1, char *arg2, char *arg3, ushort_t flag)
   2414 {
   2415 	pid_t pid;
   2416 	int status = 0, retstatus = 0xFFFF;
   2417 	char *argv[EXEC_ARGS_MAX] = {0};
   2418 	char *cmd = NULL;
   2419 
   2420 	if (!file || !*file)
   2421 		return retstatus;
   2422 
   2423 	/* Swap args if the first arg is NULL and the other 2 aren't */
   2424 	if (!arg1 && arg2) {
   2425 		arg1 = arg2;
   2426 		if (arg3) {
   2427 			arg2 = arg3;
   2428 			arg3 = NULL;
   2429 		} else
   2430 			arg2 = NULL;
   2431 	}
   2432 
   2433 	if (flag & F_MULTI) {
   2434 		cmd = parseargs(file, argv, &status);
   2435 		if (!cmd)
   2436 			return -1;
   2437 	} else
   2438 		argv[status++] = file;
   2439 
   2440 	argv[status] = arg1;
   2441 	argv[++status] = arg2;
   2442 	argv[++status] = arg3;
   2443 
   2444 	if (flag & F_NORMAL)
   2445 		exitcurses();
   2446 
   2447 	pid = xfork(flag);
   2448 	if (pid == 0) {
   2449 		/* Suppress stdout and stderr */
   2450 		if (flag & F_NOTRACE) {
   2451 			int fd = open("/dev/null", O_WRONLY, 0200);
   2452 
   2453 			if (flag & F_NOSTDIN)
   2454 				dup2(fd, STDIN_FILENO);
   2455 			dup2(fd, STDOUT_FILENO);
   2456 			dup2(fd, STDERR_FILENO);
   2457 			close(fd);
   2458 		} else if (flag & F_TTY) {
   2459 			/* If stdout has been redirected to a non-tty, force output to tty */
   2460 			if (!isatty(STDOUT_FILENO)) {
   2461 				int fd = open(ctermid(NULL), O_WRONLY, 0200);
   2462 				dup2(fd, STDOUT_FILENO);
   2463 				close(fd);
   2464 			}
   2465 		}
   2466 
   2467 		execvp(*argv, argv);
   2468 		_exit(EXIT_SUCCESS);
   2469 	} else {
   2470 		retstatus = join(pid, flag);
   2471 		DPRINTF_D(pid);
   2472 
   2473 		if ((flag & F_CONFIRM) || ((flag & F_CHKRTN) && retstatus)) {
   2474 			status = write(STDOUT_FILENO, messages[MSG_ENTER], xstrlen(messages[MSG_ENTER]));
   2475 			(void)status;
   2476 			while ((read(STDIN_FILENO, &status, 1) > 0) && (status != '\n'));
   2477 		}
   2478 
   2479 		if (flag & F_NORMAL)
   2480 			refresh();
   2481 
   2482 		free(cmd);
   2483 	}
   2484 
   2485 	return retstatus;
   2486 }
   2487 
   2488 /* Get program name from env var, else return fallback program */
   2489 static char *xgetenv(const char * const name, char *fallback)
   2490 {
   2491 	char *value = getenv(name);
   2492 
   2493 	return value && value[0] ? value : fallback;
   2494 }
   2495 
   2496 /* Checks if an env variable is set to 1 */
   2497 static inline uint_t xgetenv_val(const char *name)
   2498 {
   2499 	char *str = getenv(name);
   2500 
   2501 	if (str && str[0])
   2502 		return atoi(str);
   2503 
   2504 	return 0;
   2505 }
   2506 
   2507 /* Check if a dir exists, IS a dir, and is readable */
   2508 static bool xdiraccess(const char *path)
   2509 {
   2510 	DIR *dirp = opendir(path);
   2511 
   2512 	if (!dirp) {
   2513 		printwarn(NULL);
   2514 		return FALSE;
   2515 	}
   2516 
   2517 	closedir(dirp);
   2518 	return TRUE;
   2519 }
   2520 
   2521 static bool plugscript(const char *plugin, uchar_t flags)
   2522 {
   2523 	mkpath(plgpath, plugin, g_buf);
   2524 	if (!access(g_buf, X_OK)) {
   2525 		spawn(g_buf, NULL, NULL, NULL, flags);
   2526 		return TRUE;
   2527 	}
   2528 
   2529 	return FALSE;
   2530 }
   2531 
   2532 static void opstr(char *buf, char *op)
   2533 {
   2534 	snprintf(buf, CMD_LEN_MAX, "xargs -0 sh -c '%s \"$0\" \"$@\" . < /dev/tty' < %s", op, selpath);
   2535 }
   2536 
   2537 static bool rmmulstr(char *buf)
   2538 {
   2539 	char r = confirm_force(TRUE);
   2540 	if (!r)
   2541 		return FALSE;
   2542 
   2543 	if (!g_state.trash)
   2544 		snprintf(buf, CMD_LEN_MAX, "xargs -0 sh -c 'rm -%cr \"$0\" \"$@\" < /dev/tty' < %s",
   2545 			 r, selpath);
   2546 	else
   2547 		snprintf(buf, CMD_LEN_MAX, "xargs -0 %s < %s",
   2548 			 utils[(g_state.trash == 1) ? UTIL_TRASH_CLI : UTIL_GIO_TRASH], selpath);
   2549 
   2550 	return TRUE;
   2551 }
   2552 
   2553 /* Returns TRUE if file is removed, else FALSE */
   2554 static bool xrm(char * const fpath)
   2555 {
   2556 	char r = confirm_force(FALSE);
   2557 	if (!r)
   2558 		return FALSE;
   2559 
   2560 	if (!g_state.trash) {
   2561 		char rm_opts[] = "-ir";
   2562 
   2563 		rm_opts[1] = r;
   2564 		spawn("rm", rm_opts, fpath, NULL, F_NORMAL | F_CHKRTN);
   2565 	} else
   2566 		spawn(utils[(g_state.trash == 1) ? UTIL_TRASH_CLI : UTIL_GIO_TRASH],
   2567 		      fpath, NULL, NULL, F_NORMAL | F_MULTI);
   2568 
   2569 	return (access(fpath, F_OK) == -1); /* File is removed */
   2570 }
   2571 
   2572 static void xrmfromsel(char *path, char *fpath)
   2573 {
   2574 #ifndef NOX11
   2575 	bool selected = TRUE;
   2576 #endif
   2577 
   2578 	if ((pdents[cur].flags & DIR_OR_DIRLNK) && scanselforpath(fpath, FALSE))
   2579 		clearselection();
   2580 	else if (pdents[cur].flags & FILE_SELECTED) {
   2581 		--nselected;
   2582 		rmfromselbuf(mkpath(path, pdents[cur].name, g_sel));
   2583 	}
   2584 #ifndef NOX11
   2585 	else
   2586 		selected = FALSE;
   2587 
   2588 	if (selected && cfg.x11)
   2589 		plugscript(utils[UTIL_CBCP], F_NOWAIT | F_NOTRACE);
   2590 #endif
   2591 }
   2592 
   2593 static uint_t lines_in_file(int fd, char *buf, size_t buflen)
   2594 {
   2595 	ssize_t len;
   2596 	uint_t count = 0;
   2597 
   2598 	while ((len = read(fd, buf, buflen)) > 0)
   2599 		while (len)
   2600 			count += (buf[--len] == '\n');
   2601 
   2602 	/* For all use cases 0 linecount is considered as error */
   2603 	return ((len < 0) ? 0 : count);
   2604 }
   2605 
   2606 static bool cpmv_rename(int choice, const char *path)
   2607 {
   2608 	int fd;
   2609 	uint_t count = 0, lines = 0;
   2610 	bool ret = FALSE;
   2611 	char *cmd = (choice == 'c' ? cp : mv);
   2612 	char buf[sizeof(patterns[P_CPMVRNM]) + (MAX(sizeof(cp), sizeof(mv))) + (PATH_MAX << 1)];
   2613 
   2614 	fd = create_tmp_file();
   2615 	if (fd == -1)
   2616 		return ret;
   2617 
   2618 	/* selsafe() returned TRUE for this to be called */
   2619 	if (!selbufpos) {
   2620 		snprintf(buf, sizeof(buf), "tr '\\0' '\\n' < %s > %s", selpath, g_tmpfpath);
   2621 		spawn(utils[UTIL_SH_EXEC], buf, NULL, NULL, F_CLI);
   2622 
   2623 		count = lines_in_file(fd, buf, sizeof(buf));
   2624 		if (!count)
   2625 			goto finish;
   2626 	} else
   2627 		seltofile(fd, &count);
   2628 
   2629 	close(fd);
   2630 
   2631 	snprintf(buf, sizeof(buf), patterns[P_CPMVFMT], g_tmpfpath);
   2632 	spawn(utils[UTIL_SH_EXEC], buf, NULL, NULL, F_CLI);
   2633 
   2634 	spawn((cfg.waitedit ? enveditor : editor), g_tmpfpath, NULL, NULL, F_CLI);
   2635 
   2636 	fd = open(g_tmpfpath, O_RDONLY);
   2637 	if (fd == -1)
   2638 		goto finish;
   2639 
   2640 	lines = lines_in_file(fd, buf, sizeof(buf));
   2641 	DPRINTF_U(count);
   2642 	DPRINTF_U(lines);
   2643 	if (!lines || (2 * count != lines)) {
   2644 		DPRINTF_S("num mismatch");
   2645 		goto finish;
   2646 	}
   2647 
   2648 	snprintf(buf, sizeof(buf), patterns[P_CPMVRNM], path, g_tmpfpath, cmd);
   2649 	if (!spawn(utils[UTIL_SH_EXEC], buf, NULL, NULL, F_CLI | F_CHKRTN))
   2650 		ret = TRUE;
   2651 finish:
   2652 	if (fd >= 0)
   2653 		close(fd);
   2654 
   2655 	return ret;
   2656 }
   2657 
   2658 static bool cpmvrm_selection(enum action sel, char *path)
   2659 {
   2660 	int r;
   2661 
   2662 	if (isselfileempty()) {
   2663 		if (nselected)
   2664 			clearselection();
   2665 		printmsg(messages[MSG_0_SELECTED]);
   2666 		return FALSE;
   2667 	}
   2668 
   2669 	if (!selsafe())
   2670 		return FALSE;
   2671 
   2672 	switch (sel) {
   2673 	case SEL_CP:
   2674 		opstr(g_buf, cp);
   2675 		break;
   2676 	case SEL_MV:
   2677 		opstr(g_buf, mv);
   2678 		break;
   2679 	case SEL_CPMVAS:
   2680 		r = get_input(messages[MSG_CP_MV_AS]);
   2681 		if (r != 'c' && r != 'm') {
   2682 			printmsg(messages[MSG_INVALID_KEY]);
   2683 			return FALSE;
   2684 		}
   2685 
   2686 		if (!cpmv_rename(r, path)) {
   2687 			printmsg(messages[MSG_FAILED]);
   2688 			return FALSE;
   2689 		}
   2690 		break;
   2691 	default: /* SEL_RM */
   2692 		if (!rmmulstr(g_buf)) {
   2693 			printmsg(messages[MSG_CANCEL]);
   2694 			return FALSE;
   2695 		}
   2696 	}
   2697 
   2698 	if (sel != SEL_CPMVAS && spawn(utils[UTIL_SH_EXEC], g_buf, NULL, NULL, F_CLI | F_CHKRTN)) {
   2699 		printmsg(messages[MSG_FAILED]);
   2700 		return FALSE;
   2701 	}
   2702 
   2703 	/* Clear selection */
   2704 	clearselection();
   2705 
   2706 	return TRUE;
   2707 }
   2708 
   2709 #ifndef NOBATCH
   2710 static bool batch_rename(void)
   2711 {
   2712 	int fd1, fd2;
   2713 	uint_t count = 0, lines = 0;
   2714 	bool dir = FALSE, ret = FALSE;
   2715 	char foriginal[TMP_LEN_MAX] = {0};
   2716 	static const char batchrenamecmd[] = "paste -d'\n' %s %s | "SED" 'N; /^\\(.*\\)\\n\\1$/!p;d' | "
   2717 					     "tr '\n' '\\0' | xargs -0 -n2 sh -c 'mv -i \"$0\" \"$@\" <"
   2718 					     " /dev/tty'";
   2719 	char buf[sizeof(batchrenamecmd) + (PATH_MAX << 1)];
   2720 	int i = get_cur_or_sel();
   2721 
   2722 	if (!i)
   2723 		return ret;
   2724 
   2725 	if (i == 'c') { /* Rename entries in current dir */
   2726 		selbufpos = 0;
   2727 		dir = TRUE;
   2728 	}
   2729 
   2730 	fd1 = create_tmp_file();
   2731 	if (fd1 == -1)
   2732 		return ret;
   2733 
   2734 	xstrsncpy(foriginal, g_tmpfpath, xstrlen(g_tmpfpath) + 1);
   2735 
   2736 	fd2 = create_tmp_file();
   2737 	if (fd2 == -1) {
   2738 		unlink(foriginal);
   2739 		close(fd1);
   2740 		return ret;
   2741 	}
   2742 
   2743 	if (dir)
   2744 		for (i = 0; i < ndents; ++i)
   2745 			appendfpath(pdents[i].name, NAME_MAX);
   2746 
   2747 	seltofile(fd1, &count);
   2748 	seltofile(fd2, NULL);
   2749 	close(fd2);
   2750 
   2751 	if (dir) /* Don't retain dir entries in selection */
   2752 		selbufpos = 0;
   2753 
   2754 	spawn((cfg.waitedit ? enveditor : editor), g_tmpfpath, NULL, NULL, F_CLI);
   2755 
   2756 	/* Reopen file descriptor to get updated contents */
   2757 	fd2 = open(g_tmpfpath, O_RDONLY);
   2758 	if (fd2 == -1)
   2759 		goto finish;
   2760 
   2761 	lines = lines_in_file(fd2, buf, sizeof(buf));
   2762 	DPRINTF_U(count);
   2763 	DPRINTF_U(lines);
   2764 	if (!lines || (count != lines)) {
   2765 		DPRINTF_S("cannot delete files");
   2766 		goto finish;
   2767 	}
   2768 
   2769 	snprintf(buf, sizeof(buf), batchrenamecmd, foriginal, g_tmpfpath);
   2770 	spawn(utils[UTIL_SH_EXEC], buf, NULL, NULL, F_CLI);
   2771 	ret = TRUE;
   2772 
   2773 finish:
   2774 	if (fd1 >= 0)
   2775 		close(fd1);
   2776 	unlink(foriginal);
   2777 
   2778 	if (fd2 >= 0)
   2779 		close(fd2);
   2780 	unlink(g_tmpfpath);
   2781 
   2782 	return ret;
   2783 }
   2784 #endif
   2785 
   2786 static char *get_archive_cmd(const char *archive)
   2787 {
   2788 	uchar_t i = 3;
   2789 
   2790 	if (!g_state.usebsdtar && getutil(utils[UTIL_ATOOL]))
   2791 		i = 0;
   2792 	else if (getutil(utils[UTIL_BSDTAR]))
   2793 		i = 1;
   2794 	else if (is_suffix(archive, ".zip"))
   2795 		i = 2;
   2796 	// else tar
   2797 
   2798 	return archive_cmd[i];
   2799 }
   2800 
   2801 static void archive_selection(const char *cmd, const char *archive)
   2802 {
   2803 	char *buf = malloc((xstrlen(patterns[P_ARCHIVE_CMD]) + xstrlen(cmd) + xstrlen(archive)
   2804 	                   + xstrlen(selpath)) * sizeof(char));
   2805 	if (!buf) {
   2806 		DPRINTF_S(strerror(errno));
   2807 		printwarn(NULL);
   2808 		return;
   2809 	}
   2810 
   2811 	snprintf(buf, CMD_LEN_MAX, patterns[P_ARCHIVE_CMD], cmd, archive, selpath);
   2812 	spawn(utils[UTIL_SH_EXEC], buf, NULL, NULL, F_CLI | F_CONFIRM);
   2813 	free(buf);
   2814 }
   2815 
   2816 static void write_lastdir(const char *curpath, const char *outfile)
   2817 {
   2818 	bool tilde = false;
   2819 	if (!outfile)
   2820 		xstrsncpy(cfgpath + xstrlen(cfgpath), "/.lastd", 8);
   2821 	else
   2822 		tilde = convert_tilde(outfile, g_buf);
   2823 
   2824 	int fd = open(outfile
   2825 			? (tilde ? g_buf : outfile)
   2826 			: cfgpath, O_CREAT | O_WRONLY | O_TRUNC, S_IWUSR | S_IRUSR);
   2827 
   2828 	if (fd != -1 && shell_escape(g_buf, sizeof(g_buf), curpath)) {
   2829 		dprintf(fd, "cd %s", g_buf);
   2830 		close(fd);
   2831 	}
   2832 }
   2833 
   2834 /*
   2835  * We assume none of the strings are NULL.
   2836  *
   2837  * Let's have the logic to sort numeric names in numeric order.
   2838  * E.g., the order '1, 10, 2' doesn't make sense to human eyes.
   2839  *
   2840  * If the absolute numeric values are same, we fallback to alphasort.
   2841  */
   2842 static int xstricmp(const char * const s1, const char * const s2)
   2843 {
   2844 	char *p1, *p2;
   2845 
   2846 	long long v1 = strtoll(s1, &p1, 10);
   2847 	long long v2 = strtoll(s2, &p2, 10);
   2848 
   2849 	/* Check if at least 1 string is numeric */
   2850 	if (s1 != p1 || s2 != p2) {
   2851 		/* Handle both pure numeric */
   2852 		if (s1 != p1 && s2 != p2) {
   2853 			if (v2 > v1)
   2854 				return -1;
   2855 
   2856 			if (v1 > v2)
   2857 				return 1;
   2858 		}
   2859 
   2860 		/* Only first string non-numeric */
   2861 		if (s1 == p1)
   2862 			return 1;
   2863 
   2864 		/* Only second string non-numeric */
   2865 		if (s2 == p2)
   2866 			return -1;
   2867 	}
   2868 
   2869 	/* Handle 1. all non-numeric and 2. both same numeric value cases */
   2870 #ifndef NOLC
   2871 	return strcoll(s1, s2);
   2872 #else
   2873 	return strcasecmp(s1, s2);
   2874 #endif
   2875 }
   2876 
   2877 /*
   2878  * Version comparison
   2879  *
   2880  * The code for version compare is a modified version of the GLIBC
   2881  * and uClibc implementation of strverscmp(). The source is here:
   2882  * https://elixir.bootlin.com/uclibc-ng/latest/source/libc/string/strverscmp.c
   2883  */
   2884 
   2885 /*
   2886  * Compare S1 and S2 as strings holding indices/version numbers,
   2887  * returning less than, equal to or greater than zero if S1 is less than,
   2888  * equal to or greater than S2 (for more info, see the texinfo doc).
   2889  *
   2890  * Ignores case.
   2891  */
   2892 static int xstrverscasecmp(const char * const s1, const char * const s2)
   2893 {
   2894 	const uchar_t *p1 = (const uchar_t *)s1;
   2895 	const uchar_t *p2 = (const uchar_t *)s2;
   2896 	int state, diff;
   2897 	uchar_t c1, c2;
   2898 
   2899 	/*
   2900 	 * Symbol(s)    0       [1-9]   others
   2901 	 * Transition   (10) 0  (01) d  (00) x
   2902 	 */
   2903 	static const uint8_t next_state[] = {
   2904 		/* state    x    d    0  */
   2905 		/* S_N */  S_N, S_I, S_Z,
   2906 		/* S_I */  S_N, S_I, S_I,
   2907 		/* S_F */  S_N, S_F, S_F,
   2908 		/* S_Z */  S_N, S_F, S_Z
   2909 	};
   2910 
   2911 	alignas(max_align_t) static const int8_t result_type[] = {
   2912 		/* state   x/x  x/d  x/0  d/x  d/d  d/0  0/x  0/d  0/0  */
   2913 
   2914 		/* S_N */  VCMP, VCMP, VCMP, VCMP, VLEN, VCMP, VCMP, VCMP, VCMP,
   2915 		/* S_I */  VCMP,   -1,   -1,    1, VLEN, VLEN,    1, VLEN, VLEN,
   2916 		/* S_F */  VCMP, VCMP, VCMP, VCMP, VCMP, VCMP, VCMP, VCMP, VCMP,
   2917 		/* S_Z */  VCMP,    1,    1,   -1, VCMP, VCMP,   -1, VCMP, VCMP
   2918 	};
   2919 
   2920 	if (p1 == p2)
   2921 		return 0;
   2922 
   2923 	c1 = TOUPPER(*p1);
   2924 	++p1;
   2925 	c2 = TOUPPER(*p2);
   2926 	++p2;
   2927 
   2928 	/* Hint: '0' is a digit too.  */
   2929 	state = S_N + ((c1 == '0') + (xisdigit(c1) != 0));
   2930 
   2931 	while ((diff = c1 - c2) == 0) {
   2932 		if (c1 == '\0')
   2933 			return diff;
   2934 
   2935 		state = next_state[state];
   2936 		c1 = TOUPPER(*p1);
   2937 		++p1;
   2938 		c2 = TOUPPER(*p2);
   2939 		++p2;
   2940 		state += (c1 == '0') + (xisdigit(c1) != 0);
   2941 	}
   2942 
   2943 	state = result_type[state * 3 + (((c2 == '0') + (xisdigit(c2) != 0)))]; // NOLINT
   2944 
   2945 	switch (state) {
   2946 	case VCMP:
   2947 		return diff;
   2948 	case VLEN:
   2949 		while (xisdigit(*p1++))
   2950 			if (!xisdigit(*p2++))
   2951 				return 1;
   2952 		return xisdigit(*p2) ? -1 : diff;
   2953 	default:
   2954 		return state;
   2955 	}
   2956 }
   2957 
   2958 static int (*namecmpfn)(const char * const s1, const char * const s2) = &xstricmp;
   2959 
   2960 static char * (*fnstrstr)(const char *haystack, const char *needle) = &strcasestr;
   2961 #ifdef PCRE
   2962 static const unsigned char *tables;
   2963 static int pcreflags = PCRE_NO_AUTO_CAPTURE | PCRE_EXTENDED | PCRE_CASELESS | PCRE_UTF8;
   2964 #else
   2965 static int regflags = REG_NOSUB | REG_EXTENDED | REG_ICASE;
   2966 #endif
   2967 
   2968 #ifdef PCRE
   2969 static int setfilter(pcre **pcrex, const char *filter)
   2970 {
   2971 	const char *errstr = NULL;
   2972 	int erroffset = 0;
   2973 
   2974 	*pcrex = pcre_compile(filter, pcreflags, &errstr, &erroffset, tables);
   2975 
   2976 	return errstr ? -1 : 0;
   2977 }
   2978 #else
   2979 static int setfilter(regex_t *regex, const char *filter)
   2980 {
   2981 	return regcomp(regex, filter, regflags);
   2982 }
   2983 #endif
   2984 
   2985 static int visible_re(const fltrexp_t *fltrexp, const char *fname)
   2986 {
   2987 #ifdef PCRE
   2988 	return pcre_exec(fltrexp->pcrex, NULL, fname, xstrlen(fname), 0, 0, NULL, 0) == 0;
   2989 #else
   2990 	return regexec(fltrexp->regex, fname, 0, NULL, 0) == 0;
   2991 #endif
   2992 }
   2993 
   2994 static int visible_str(const fltrexp_t *fltrexp, const char *fname)
   2995 {
   2996 	return fnstrstr(fname, fltrexp->str) != NULL;
   2997 }
   2998 
   2999 static int (*filterfn)(const fltrexp_t *fltr, const char *fname) = &visible_str;
   3000 
   3001 static void clearfilter(void)
   3002 {
   3003 	char * const fltr = g_ctx[cfg.curctx].c_fltr;
   3004 
   3005 	if (fltr[1]) {
   3006 		fltr[REGEX_MAX - 1] = fltr[1];
   3007 		fltr[1] = '\0';
   3008 	}
   3009 }
   3010 
   3011 static int entrycmp(const void *va, const void *vb)
   3012 {
   3013 	const struct entry *pa = (pEntry)va;
   3014 	const struct entry *pb = (pEntry)vb;
   3015 
   3016 	if ((pb->flags & DIR_OR_DIRLNK) != (pa->flags & DIR_OR_DIRLNK)) {
   3017 		if (pb->flags & DIR_OR_DIRLNK)
   3018 			return 1;
   3019 		return -1;
   3020 	}
   3021 
   3022 	/* Sort based on specified order */
   3023 	if (cfg.timeorder) {
   3024 		if (pb->sec > pa->sec)
   3025 			return 1;
   3026 		if (pb->sec < pa->sec)
   3027 			return -1;
   3028 		/* If sec matches, comare nsec */
   3029 		if (pb->nsec > pa->nsec)
   3030 			return 1;
   3031 		if (pb->nsec < pa->nsec)
   3032 			return -1;
   3033 	} else if (cfg.sizeorder) {
   3034 		if (pb->size > pa->size)
   3035 			return 1;
   3036 		if (pb->size < pa->size)
   3037 			return -1;
   3038 	} else if (cfg.blkorder) {
   3039 		if (pb->blocks > pa->blocks)
   3040 			return 1;
   3041 		if (pb->blocks < pa->blocks)
   3042 			return -1;
   3043 	} else if (cfg.extnorder && !(pb->flags & DIR_OR_DIRLNK)) {
   3044 		char *extna = xextension(pa->name, pa->nlen - 1);
   3045 		char *extnb = xextension(pb->name, pb->nlen - 1);
   3046 
   3047 		if (extna || extnb) {
   3048 			if (!extna)
   3049 				return -1;
   3050 
   3051 			if (!extnb)
   3052 				return 1;
   3053 
   3054 			int ret = strcasecmp(extna, extnb);
   3055 
   3056 			if (ret)
   3057 				return ret;
   3058 		}
   3059 	}
   3060 
   3061 	return namecmpfn(pa->name, pb->name);
   3062 }
   3063 
   3064 static int reventrycmp(const void *va, const void *vb)
   3065 {
   3066 	if ((((pEntry)vb)->flags & DIR_OR_DIRLNK)
   3067 	    != (((pEntry)va)->flags & DIR_OR_DIRLNK)) {
   3068 		if (((pEntry)vb)->flags & DIR_OR_DIRLNK)
   3069 			return 1;
   3070 		return -1;
   3071 	}
   3072 
   3073 	return -entrycmp(va, vb);
   3074 }
   3075 
   3076 static int (*entrycmpfn)(const void *va, const void *vb) = &entrycmp;
   3077 
   3078 /* In case of an error, resets *wch to Esc */
   3079 static int handle_alt_key(wint_t *wch)
   3080 {
   3081 	timeout(0);
   3082 
   3083 	int r = get_wch(wch);
   3084 
   3085 	if (r == ERR)
   3086 		*wch = ESC;
   3087 	cleartimeout();
   3088 
   3089 	return r;
   3090 }
   3091 
   3092 static inline int handle_event(void)
   3093 {
   3094 	if (nselected && isselfileempty())
   3095 		clearselection();
   3096 	return CONTROL('L');
   3097 }
   3098 
   3099 /*
   3100  * Returns SEL_* if key is bound and 0 otherwise.
   3101  * Also modifies the run and env pointers (used on SEL_{RUN,RUNARG}).
   3102  * The next keyboard input can be simulated by presel.
   3103  */
   3104 static int nextsel(int presel)
   3105 {
   3106 #ifdef BENCH
   3107 	return SEL_QUIT;
   3108 #endif
   3109 	wint_t c = presel;
   3110 	int i = 0;
   3111 	bool escaped = FALSE;
   3112 
   3113 	if (c == 0 || c == MSGWAIT) {
   3114 try_quit:
   3115 		i = get_wch(&c);
   3116 		//DPRINTF_D(c);
   3117 		//DPRINTF_S(keyname(c));
   3118 
   3119 #ifdef KEY_RESIZE
   3120 		if (c == KEY_RESIZE)
   3121 			handle_key_resize();
   3122 #endif
   3123 
   3124 		/* Handle Alt+key */
   3125 		if (c == ESC) {
   3126 			timeout(0);
   3127 			i = get_wch(&c);
   3128 			if (i != ERR) {
   3129 				if (c == ESC)
   3130 					c = CONTROL('L');
   3131 				else {
   3132 					unget_wch(c);
   3133 					c = ';';
   3134 				}
   3135 				settimeout();
   3136 			} else if (escaped) {
   3137 				settimeout();
   3138 				c = CONTROL('Q');
   3139 			} else {
   3140 #ifndef NOFIFO
   3141 				if (!g_state.fifomode)
   3142 					notify_fifo(TRUE); /* Send hovered path to NNN_FIFO */
   3143 #endif
   3144 				escaped = TRUE;
   3145 				settimeout();
   3146 				goto try_quit;
   3147 			}
   3148 		}
   3149 
   3150 		if (i == ERR && presel == MSGWAIT)
   3151 			c = (cfg.filtermode || filterset()) ? FILTER : CONTROL('L');
   3152 		else if (c == FILTER || c == CONTROL('L'))
   3153 			/* Clear previous filter when manually starting */
   3154 			clearfilter();
   3155 	}
   3156 
   3157 	if (i == ERR) {
   3158 		++idle;
   3159 
   3160 		/*
   3161 		 * Do not check for directory changes in du mode.
   3162 		 * A redraw forces du calculation.
   3163 		 * Check for changes every odd second.
   3164 		 */
   3165 #ifdef LINUX_INOTIFY
   3166 		if (!cfg.blkorder && inotify_wd >= 0 && (idle & 1)) {
   3167 			struct inotify_event *event;
   3168 			char inotify_buf[EVENT_BUF_LEN] = {0};
   3169 
   3170 			i = read(inotify_fd, inotify_buf, EVENT_BUF_LEN);
   3171 			if (i > 0) {
   3172 				for (char *ptr = inotify_buf;
   3173 				     ptr + ((struct inotify_event *)ptr)->len < inotify_buf + i;
   3174 				     ptr += sizeof(struct inotify_event) + event->len) {
   3175 					event = (struct inotify_event *)ptr;
   3176 					DPRINTF_D(event->wd);
   3177 					DPRINTF_D(event->mask);
   3178 					if (!event->wd)
   3179 						break;
   3180 
   3181 					if (event->mask & INOTIFY_MASK) {
   3182 						c = handle_event();
   3183 						break;
   3184 					}
   3185 				}
   3186 				DPRINTF_S("inotify read done");
   3187 			}
   3188 		}
   3189 #elif defined(BSD_KQUEUE)
   3190 		if (!cfg.blkorder && event_fd >= 0 && (idle & 1)) {
   3191 			struct kevent event_data[NUM_EVENT_SLOTS] = {0};
   3192 
   3193 			if (kevent(kq, events_to_monitor, NUM_EVENT_SLOTS,
   3194 				   event_data, NUM_EVENT_FDS, &gtimeout) > 0)
   3195 				c = handle_event();
   3196 		}
   3197 #elif defined(HAIKU_NM)
   3198 		if (!cfg.blkorder && haiku_nm_active && (idle & 1) && haiku_is_update_needed(haiku_hnd))
   3199 			c = handle_event();
   3200 #endif
   3201 	} else
   3202 		idle = 0;
   3203 
   3204 	for (i = 0; i < (int)ELEMENTS(bindings); ++i)
   3205 		if (c == bindings[i].sym)
   3206 			return bindings[i].act;
   3207 
   3208 	return 0;
   3209 }
   3210 
   3211 static int getorderstr(char *sort)
   3212 {
   3213 	int i = 0;
   3214 
   3215 	if (cfg.showhidden)
   3216 		sort[i++] = 'H';
   3217 
   3218 	if (cfg.timeorder)
   3219 		sort[i++] = (cfg.timetype == T_MOD) ? 'M' : ((cfg.timetype == T_ACCESS) ? 'A' : 'C');
   3220 	else if (cfg.sizeorder)
   3221 		sort[i++] = 'S';
   3222 	else if (cfg.extnorder)
   3223 		sort[i++] = 'E';
   3224 
   3225 	if (entrycmpfn == &reventrycmp)
   3226 		sort[i++] = 'R';
   3227 
   3228 	if (namecmpfn == &xstrverscasecmp)
   3229 		sort[i++] = 'V';
   3230 
   3231 	if (i)
   3232 		sort[i] = ' ';
   3233 
   3234 	return i;
   3235 }
   3236 
   3237 static void showfilterinfo(void)
   3238 {
   3239 	int i = 0;
   3240 	char info[REGEX_MAX] = "\0\0\0\0\0";
   3241 
   3242 	i = getorderstr(info);
   3243 
   3244 	if (cfg.fileinfo && ndents && get_output("file", "-b", pdents[cur].name, -1, FALSE))
   3245 		mvaddstr(xlines - 2, 2, g_buf);
   3246 	else {
   3247 		snprintf(info + i, REGEX_MAX - i - 1, "  %s [/], %4s [:]",
   3248 			 (cfg.regex ? "reg" : "str"),
   3249 			 ((fnstrstr == &strcasestr) ? "ic" : "noic"));
   3250 	}
   3251 
   3252 	mvaddstr(xlines - 2, xcols - xstrlen(info), info);
   3253 }
   3254 
   3255 static void showfilter(char *str)
   3256 {
   3257 	attron(COLOR_PAIR(cfg.curctx + 1));
   3258 	showfilterinfo();
   3259 	printmsg(str);
   3260 	// printmsg calls attroff()
   3261 }
   3262 
   3263 static inline void swap_ent(int id1, int id2)
   3264 {
   3265 	struct entry _dent, *pdent1 = &pdents[id1], *pdent2 =  &pdents[id2];
   3266 
   3267 	*(&_dent) = *pdent1;
   3268 	*pdent1 = *pdent2;
   3269 	*pdent2 = *(&_dent);
   3270 }
   3271 
   3272 #ifdef PCRE
   3273 static int fill(const char *fltr, pcre *pcrex)
   3274 #else
   3275 static int fill(const char *fltr, regex_t *re)
   3276 #endif
   3277 {
   3278 #ifdef PCRE
   3279 	fltrexp_t fltrexp = { .pcrex = pcrex, .str = fltr };
   3280 #else
   3281 	fltrexp_t fltrexp = { .regex = re, .str = fltr };
   3282 #endif
   3283 
   3284 	for (int count = 0; count < ndents; ++count) {
   3285 		if (filterfn(&fltrexp, pdents[count].name) == 0) {
   3286 			if (count != --ndents) {
   3287 				swap_ent(count, ndents);
   3288 				--count;
   3289 			}
   3290 
   3291 			continue;
   3292 		}
   3293 	}
   3294 
   3295 	return ndents;
   3296 }
   3297 
   3298 static int matches(const char *fltr)
   3299 {
   3300 #ifdef PCRE
   3301 	pcre *pcrex = NULL;
   3302 
   3303 	/* Search filter */
   3304 	if (cfg.regex && setfilter(&pcrex, fltr))
   3305 		return -1;
   3306 
   3307 	ndents = fill(fltr, pcrex);
   3308 
   3309 	if (cfg.regex)
   3310 		pcre_free(pcrex);
   3311 #else
   3312 	regex_t re;
   3313 
   3314 	/* Search filter */
   3315 	if (cfg.regex && setfilter(&re, fltr))
   3316 		return -1;
   3317 
   3318 	ndents = fill(fltr, &re);
   3319 
   3320 	if (cfg.regex)
   3321 		regfree(&re);
   3322 #endif
   3323 
   3324 	ENTSORT(pdents, ndents, entrycmpfn);
   3325 
   3326 	return ndents;
   3327 }
   3328 
   3329 /*
   3330  * Return the position of the matching entry or 0 otherwise
   3331  * Note there's no NULL check for fname
   3332  */
   3333 static int dentfind(const char *fname, int n)
   3334 {
   3335 	for (int i = 0; i < n; ++i)
   3336 		if (xstrcmp(fname, pdents[i].name) == 0)
   3337 			return i;
   3338 
   3339 	return 0;
   3340 }
   3341 
   3342 static int filterentries(char *path, char *lastname)
   3343 {
   3344 	alignas(max_align_t) wchar_t wln[REGEX_MAX];
   3345 	char *ln = g_ctx[cfg.curctx].c_fltr;
   3346 	wint_t ch[1];
   3347 	int r, total = ndents, len;
   3348 	char *pln = g_ctx[cfg.curctx].c_fltr + 1;
   3349 
   3350 	DPRINTF_S(__func__);
   3351 
   3352 	if (ndents && (ln[0] == FILTER || ln[0] == RFILTER) && *pln) {
   3353 		if (matches(pln) != -1) {
   3354 			move_cursor(dentfind(lastname, ndents), 0);
   3355 			redraw(path);
   3356 		}
   3357 
   3358 		if (!cfg.filtermode) {
   3359 			statusbar(path);
   3360 			return 0;
   3361 		}
   3362 
   3363 		len = mbstowcs(wln, ln, REGEX_MAX);
   3364 	} else {
   3365 		ln[0] = wln[0] = cfg.regex ? RFILTER : FILTER;
   3366 		ln[1] = wln[1] = '\0';
   3367 		len = 1;
   3368 	}
   3369 
   3370 	cleartimeout();
   3371 	curs_set(TRUE);
   3372 	showfilter(ln);
   3373 
   3374 	while ((r = get_wch(ch)) != ERR) {
   3375 		//DPRINTF_D(*ch);
   3376 		//DPRINTF_S(keyname(*ch));
   3377 
   3378 		switch (*ch) {
   3379 #ifdef KEY_RESIZE
   3380 		case 0: // fallthrough
   3381 		case KEY_RESIZE:
   3382 			clearoldprompt();
   3383 			redraw(path);
   3384 			showfilter(ln);
   3385 			continue;
   3386 #endif
   3387 		case KEY_DC: // fallthrough
   3388 		case KEY_BACKSPACE: // fallthrough
   3389 		case '\b': // fallthrough
   3390 		case DEL: /* handle DEL */
   3391 			if (len != 1) {
   3392 				wln[--len] = '\0';
   3393 				wcstombs(ln, wln, REGEX_MAX);
   3394 				ndents = total;
   3395 			} else {
   3396 				*ch = FILTER;
   3397 				goto end;
   3398 			}
   3399 			// fallthrough
   3400 		case CONTROL('L'):
   3401 			if (*ch == CONTROL('L')) {
   3402 				if (wln[1]) {
   3403 					ln[REGEX_MAX - 1] = ln[1];
   3404 					ln[1] = wln[1] = '\0';
   3405 					len = 1;
   3406 					ndents = total;
   3407 				} else if (ln[REGEX_MAX - 1]) { /* Show the previous filter */
   3408 					ln[1] = ln[REGEX_MAX - 1];
   3409 					ln[REGEX_MAX - 1] = '\0';
   3410 					len = mbstowcs(wln, ln, REGEX_MAX);
   3411 				} else
   3412 					goto end;
   3413 			}
   3414 
   3415 			/* Go to the top, we don't know if the hovered file will match the filter */
   3416 			cur = 0;
   3417 
   3418 			if (matches(pln) != -1)
   3419 				redraw(path);
   3420 
   3421 			showfilter(ln);
   3422 			continue;
   3423 #ifndef NOMOUSE
   3424 		case KEY_MOUSE:
   3425 			goto end;
   3426 #endif
   3427 		case ESC:
   3428 			if (handle_alt_key(ch) != ERR) {
   3429 				if (*ch == ESC) /* Handle Alt+Esc */
   3430 					*ch = 'q'; /* Quit context */
   3431 				else {
   3432 					unget_wch(*ch);
   3433 					*ch = ';'; /* Run plugin */
   3434 				}
   3435 			}
   3436 			goto end;
   3437 		}
   3438 
   3439 		if (r != OK) /* Handle Fn keys in main loop */
   3440 			break;
   3441 
   3442 		/* Handle all control chars in main loop */
   3443 		if (*ch < ASCII_MAX && keyname(*ch)[0] == '^' && *ch != '^')
   3444 			goto end;
   3445 
   3446 		if (len == 1) {
   3447 			if (*ch == '?') /* Help and config key, '?' is an invalid regex */
   3448 				goto end;
   3449 
   3450 			if (cfg.filtermode) {
   3451 				switch (*ch) {
   3452 				case '\'': // fallthrough /* Go to first non-dir file */
   3453 				case '+': // fallthrough /* Toggle file selection */
   3454 				case ',': // fallthrough /* Mark CWD */
   3455 				case '-': // fallthrough /* Visit last visited dir */
   3456 				case '.': // fallthrough /* Show hidden files */
   3457 				case ';': // fallthrough /* Run plugin key */
   3458 				case '=': // fallthrough /* Launch app */
   3459 				case '>': // fallthrough /* Export file list */
   3460 				case '@': // fallthrough /* Visit start dir */
   3461 				case ']': // fallthorugh /* Prompt key */
   3462 				case '`': // fallthrough /* Visit / */
   3463 				case '~': /* Go HOME */
   3464 					goto end;
   3465 				}
   3466 			}
   3467 
   3468 			/* Toggle case-sensitivity */
   3469 			if (*ch == CASE) {
   3470 				fnstrstr = (fnstrstr == &strcasestr) ? &strstr : &strcasestr;
   3471 #ifdef PCRE
   3472 				pcreflags ^= PCRE_CASELESS;
   3473 #else
   3474 				regflags ^= REG_ICASE;
   3475 #endif
   3476 				showfilter(ln);
   3477 				continue;
   3478 			}
   3479 
   3480 			/* Toggle string or regex filter */
   3481 			if (*ch == FILTER) {
   3482 				ln[0] = (ln[0] == FILTER) ? RFILTER : FILTER;
   3483 				wln[0] = (uchar_t)ln[0];
   3484 				cfg.regex ^= 1;
   3485 				filterfn = cfg.regex ? &visible_re : &visible_str;
   3486 				showfilter(ln);
   3487 				continue;
   3488 			}
   3489 
   3490 			/* Reset cur in case it's a repeat search */
   3491 			cur = 0;
   3492 		} else if (len == REGEX_MAX - 1)
   3493 			continue;
   3494 
   3495 		wln[len] = (wchar_t)*ch;
   3496 		wln[++len] = '\0';
   3497 		wcstombs(ln, wln, REGEX_MAX);
   3498 
   3499 		/* Forward-filtering optimization:
   3500 		 * - new matches can only be a subset of current matches.
   3501 		 */
   3502 		/* ndents = total; */
   3503 #ifdef MATCHFLTR
   3504 		r = matches(pln);
   3505 		if (r <= 0) {
   3506 			!r ? unget_wch(KEY_BACKSPACE) : showfilter(ln);
   3507 #else
   3508 		if (matches(pln) == -1) {
   3509 			showfilter(ln);
   3510 #endif
   3511 			continue;
   3512 		}
   3513 
   3514 		/* If the only match is a dir, auto-enter and cd into it */
   3515 		if ((ndents == 1) && cfg.autoenter && (pdents[0].flags & DIR_OR_DIRLNK)) {
   3516 			*ch = KEY_ENTER;
   3517 			cur = 0;
   3518 			goto end;
   3519 		}
   3520 
   3521 		/*
   3522 		 * redraw() should be above the auto-enter optimization, for
   3523 		 * the case where there's an issue with dir auto-enter, say,
   3524 		 * due to a permission problem. The transition is _jumpy_ in
   3525 		 * case of such an error. However, we optimize for successful
   3526 		 * cases where the dir has permissions. This skips a redraw().
   3527 		 */
   3528 		redraw(path);
   3529 		showfilter(ln);
   3530 	}
   3531 end:
   3532 
   3533 	/* Save last working filter in-filter */
   3534 	if (ln[1])
   3535 		ln[REGEX_MAX - 1] = ln[1];
   3536 
   3537 	/* Save current */
   3538 	copycurname();
   3539 
   3540 	curs_set(FALSE);
   3541 	settimeout();
   3542 
   3543 	/* Return keys for navigation etc. */
   3544 	return *ch;
   3545 }
   3546 
   3547 /* Show a prompt with input string and return the changes */
   3548 static char *xreadline(const char *prefill, const char *prompt)
   3549 {
   3550 	size_t len, pos;
   3551 	int x, r;
   3552 	const int WCHAR_T_WIDTH = sizeof(wchar_t);
   3553 	wint_t ch[1];
   3554 	wchar_t * const buf = malloc(sizeof(wchar_t) * READLINE_MAX);
   3555 
   3556 	if (!buf)
   3557 		errexit();
   3558 
   3559 	cleartimeout();
   3560 	printmsg(prompt);
   3561 
   3562 	if (prefill) {
   3563 		DPRINTF_S(prefill);
   3564 		len = pos = mbstowcs(buf, prefill, READLINE_MAX);
   3565 	} else
   3566 		len = (size_t)-1;
   3567 
   3568 	if (len == (size_t)-1) {
   3569 		buf[0] = '\0';
   3570 		len = pos = 0;
   3571 	}
   3572 
   3573 	x = getcurx(stdscr);
   3574 	curs_set(TRUE);
   3575 
   3576 	while (1) {
   3577 		buf[len] = ' ';
   3578 		attron(COLOR_PAIR(cfg.curctx + 1));
   3579 		if (pos > (size_t)(xcols - x)) {
   3580 			mvaddnwstr(xlines - 1, x, buf + (pos - (xcols - x) + 1), xcols - x);
   3581 			move(xlines - 1, xcols - 1);
   3582 		} else {
   3583 			mvaddnwstr(xlines - 1, x, buf, len + 1);
   3584 			move(xlines - 1, x + wcswidth(buf, pos));
   3585 		}
   3586 		attroff(COLOR_PAIR(cfg.curctx + 1));
   3587 
   3588 		r = get_wch(ch);
   3589 		if (r == ERR)
   3590 			continue;
   3591 
   3592 		if (r == OK) {
   3593 			switch (*ch) {
   3594 			case KEY_ENTER: // fallthrough
   3595 			case '\n': // fallthrough
   3596 			case '\r':
   3597 				goto END;
   3598 			case CONTROL('D'):
   3599 				if (pos < len)
   3600 					++pos;
   3601 				else if (!(pos || len)) { /* Exit on ^D at empty prompt */
   3602 					len = 0;
   3603 					goto END;
   3604 				} else
   3605 					continue;
   3606 				// fallthrough
   3607 			case DEL: // fallthrough
   3608 			case '\b': /* rhel25 sends '\b' for backspace */
   3609 				if (pos > 0) {
   3610 					memmove(buf + pos - 1, buf + pos,
   3611 						(len - pos) * WCHAR_T_WIDTH);
   3612 					--len, --pos;
   3613 				}
   3614 				continue;
   3615 			case '\t':
   3616 				if (!(len || pos) && ndents)
   3617 					len = pos = mbstowcs(buf, pdents[cur].name, READLINE_MAX);
   3618 				continue;
   3619 			case CONTROL('F'):
   3620 				if (pos < len)
   3621 					++pos;
   3622 				continue;
   3623 			case CONTROL('B'):
   3624 				if (pos > 0)
   3625 					--pos;
   3626 				continue;
   3627 			case CONTROL('W'):
   3628 				printmsg(prompt);
   3629 				do {
   3630 					if (pos == 0)
   3631 						break;
   3632 					memmove(buf + pos - 1, buf + pos,
   3633 						(len - pos) * WCHAR_T_WIDTH);
   3634 					--pos, --len;
   3635 				} while (buf[pos - 1] != ' ' && buf[pos - 1] != '/'); // NOLINT
   3636 				continue;
   3637 			case CONTROL('K'):
   3638 				printmsg(prompt);
   3639 				len = pos;
   3640 				continue;
   3641 			case CONTROL('L'):
   3642 				printmsg(prompt);
   3643 				len = pos = 0;
   3644 				continue;
   3645 			case CONTROL('A'):
   3646 				pos = 0;
   3647 				continue;
   3648 			case CONTROL('E'):
   3649 				pos = len;
   3650 				continue;
   3651 			case CONTROL('U'):
   3652 				printmsg(prompt);
   3653 				memmove(buf, buf + pos, (len - pos) * WCHAR_T_WIDTH);
   3654 				len -= pos;
   3655 				pos = 0;
   3656 				continue;
   3657 			case ESC: /* Exit prompt on Esc, but just filter out Alt+key */
   3658 				if (handle_alt_key(ch) != ERR)
   3659 					continue;
   3660 
   3661 				len = 0;
   3662 				goto END;
   3663 			}
   3664 
   3665 			/* Filter out all other control chars */
   3666 			if (*ch < ASCII_MAX && keyname(*ch)[0] == '^')
   3667 				continue;
   3668 
   3669 			if (pos < READLINE_MAX - 1) {
   3670 				memmove(buf + pos + 1, buf + pos,
   3671 					(len - pos) * WCHAR_T_WIDTH);
   3672 				buf[pos] = *ch;
   3673 				++len, ++pos;
   3674 				continue;
   3675 			}
   3676 		} else {
   3677 			switch (*ch) {
   3678 #ifdef KEY_RESIZE
   3679 			case KEY_RESIZE:
   3680 				clearoldprompt();
   3681 				xlines = LINES;
   3682 				printmsg(prompt);
   3683 				break;
   3684 #endif
   3685 			case KEY_LEFT:
   3686 				if (pos > 0)
   3687 					--pos;
   3688 				break;
   3689 			case KEY_RIGHT:
   3690 				if (pos < len)
   3691 					++pos;
   3692 				break;
   3693 			case KEY_BACKSPACE:
   3694 				if (pos > 0) {
   3695 					memmove(buf + pos - 1, buf + pos,
   3696 						(len - pos) * WCHAR_T_WIDTH);
   3697 					--len, --pos;
   3698 				}
   3699 				break;
   3700 			case KEY_DC:
   3701 				if (pos < len) {
   3702 					memmove(buf + pos, buf + pos + 1,
   3703 						(len - pos - 1) * WCHAR_T_WIDTH);
   3704 					--len;
   3705 				}
   3706 				break;
   3707 			case KEY_END:
   3708 				pos = len;
   3709 				break;
   3710 			case KEY_HOME:
   3711 				pos = 0;
   3712 				break;
   3713 			case KEY_UP: // fallthrough
   3714 			case KEY_DOWN:
   3715 				if (prompt && lastcmd && (xstrcmp(prompt, PROMPT) == 0)) {
   3716 					printmsg(prompt);
   3717 					len = pos = mbstowcs(buf, lastcmd, READLINE_MAX); // fallthrough
   3718 				}
   3719 			default:
   3720 				break;
   3721 			}
   3722 		}
   3723 	}
   3724 
   3725 END:
   3726 	curs_set(FALSE);
   3727 	settimeout();
   3728 	printmsg("");
   3729 
   3730 	buf[len] = '\0';
   3731 
   3732 	pos = wcstombs(g_buf, buf, READLINE_MAX - 1);
   3733 	if (pos >= READLINE_MAX - 1)
   3734 		g_buf[READLINE_MAX - 1] = '\0';
   3735 
   3736 	free(buf);
   3737 	return g_buf;
   3738 }
   3739 
   3740 #ifndef NORL
   3741 /*
   3742  * Caller should check the value of presel to confirm if it needs to wait to show warning
   3743  */
   3744 static char *getreadline(const char *prompt)
   3745 {
   3746 	exitcurses();
   3747 
   3748 	char *input = readline(prompt);
   3749 
   3750 	refresh();
   3751 
   3752 	if (input && input[0]) {
   3753 		add_history(input);
   3754 		xstrsncpy(g_buf, input, CMD_LEN_MAX);
   3755 		free(input);
   3756 		return g_buf;
   3757 	}
   3758 
   3759 	free(input);
   3760 	return NULL;
   3761 }
   3762 #endif
   3763 
   3764 /*
   3765  * Create symbolic/hard link(s) to file(s) in selection list
   3766  * Returns the number of links created, -1 on error
   3767  */
   3768 static int xlink(char *prefix, char *path, char *curfname, char *buf, int type)
   3769 {
   3770 	int count = 0, choice;
   3771 	char *psel = pselbuf, *fname;
   3772 	size_t pos = 0, len, r;
   3773 	int (*link_fn)(const char *, const char *) = NULL;
   3774 	char lnpath[PATH_MAX];
   3775 
   3776 	choice = get_cur_or_sel();
   3777 	if (!choice)
   3778 		return -1;
   3779 
   3780 	if (type == 's') /* symbolic link */
   3781 		link_fn = &symlink;
   3782 	else /* hard link */
   3783 		link_fn = &link;
   3784 
   3785 	if (choice == 'c' || (nselected == 1)) {
   3786 		prefix = abspath(prefix, path, lnpath); /* Generate link path */
   3787 		if (!prefix)
   3788 			return -1;
   3789 
   3790 		if (choice == 'c')
   3791 			mkpath(path, curfname, buf); /* Generate target file path */
   3792 
   3793 		if (!link_fn((choice == 'c') ? buf : pselbuf, lnpath)) {
   3794 			if (choice == 's')
   3795 				clearselection();
   3796 			return 1; /* One link created */
   3797 		}
   3798 		return 0;
   3799 	}
   3800 
   3801 	r = xstrsncpy(buf, prefix, NAME_MAX + 1); /* Copy prefix */
   3802 
   3803 	while (pos < selbufpos) {
   3804 		len = xstrlen(psel);
   3805 		fname = xbasename(psel);
   3806 
   3807 		xstrsncpy(buf + r - 1, fname, NAME_MAX - r); /* Suffix target file name */
   3808 		mkpath(path, buf, lnpath); /* Generate link path */
   3809 
   3810 		if (!link_fn(psel, lnpath))
   3811 			++count;
   3812 
   3813 		pos += len + 1;
   3814 		psel += len + 1;
   3815 	}
   3816 
   3817 	if (count == nselected) /* Clear selection if all links are generated */
   3818 		clearselection();
   3819 	return count;
   3820 }
   3821 
   3822 static bool parsekvpair(kv **arr, char **envcpy, const uchar_t id, uchar_t *items)
   3823 {
   3824 	bool new = TRUE;
   3825 	const uchar_t INCR = 8;
   3826 	uint_t i = 0;
   3827 	kv *kvarr = NULL;
   3828 	char *ptr = getenv(env_cfg[id]);
   3829 
   3830 	if (!ptr || !*ptr)
   3831 		return TRUE;
   3832 
   3833 	*envcpy = xstrdup(ptr);
   3834 	if (!*envcpy) {
   3835 		xerror();
   3836 		return FALSE;
   3837 	}
   3838 
   3839 	ptr = *envcpy;
   3840 
   3841 	while (*ptr && i < 100) {
   3842 		if (new) {
   3843 			if (!(i & (INCR - 1))) {
   3844 				kvarr = xrealloc(kvarr, sizeof(kv) * (i + INCR));
   3845 				*arr = kvarr;
   3846 				if (!kvarr) {
   3847 					xerror();
   3848 					return FALSE;
   3849 				}
   3850 				memset(kvarr + i, 0, sizeof(kv) * INCR);
   3851 			}
   3852 			kvarr[i].key = (uchar_t)*ptr;
   3853 			if (*++ptr != ':' || *++ptr == '\0' || *ptr == ';')
   3854 				return FALSE;
   3855 			kvarr[i].off = ptr - *envcpy;
   3856 			++i;
   3857 
   3858 			new = FALSE;
   3859 		}
   3860 
   3861 		if (*ptr == ';') {
   3862 			*ptr = '\0';
   3863 			new = TRUE;
   3864 		}
   3865 
   3866 		++ptr;
   3867 	}
   3868 
   3869 	*items = i;
   3870 	return (i != 0);
   3871 }
   3872 
   3873 /*
   3874  * Get the value corresponding to a key
   3875  *
   3876  * NULL is returned in case of no match, path resolution failure etc.
   3877  * buf would be modified, so check return value before access
   3878  */
   3879 static char *get_kv_val(kv *kvarr, char *buf, int key, uchar_t max, uchar_t id)
   3880 {
   3881 	char *val;
   3882 
   3883 	if (!kvarr)
   3884 		return NULL;
   3885 
   3886 	for (int r = 0; r < max && kvarr[r].key; ++r) {
   3887 		if (kvarr[r].key == key) {
   3888 			/* Do not allocate new memory for plugin */
   3889 			if (id == NNN_PLUG)
   3890 				return pluginstr + kvarr[r].off;
   3891 
   3892 			val = bmstr + kvarr[r].off;
   3893 			bool tilde = convert_tilde(val, g_buf);
   3894 			return abspath((tilde ? g_buf : val), NULL, buf);
   3895 		}
   3896 	}
   3897 
   3898 	DPRINTF_S("Invalid key");
   3899 	return NULL;
   3900 }
   3901 
   3902 static int get_kv_key(kv *kvarr, char *val, uchar_t max, uchar_t id)
   3903 {
   3904 	if (!kvarr)
   3905 		return -1;
   3906 
   3907 	if (id != NNN_ORDER) /* For now this function supports only order string */
   3908 		return -1;
   3909 
   3910 	for (int r = 0; r < max && kvarr[r].key; ++r) {
   3911 		if (xstrcmp((orderstr + kvarr[r].off), val) == 0)
   3912 			return kvarr[r].key;
   3913 	}
   3914 
   3915 	return -1;
   3916 }
   3917 
   3918 static void resetdircolor(int flags)
   3919 {
   3920 	/* Directories are always shown on top, clear the color when moving to first file */
   3921 	if (g_state.dircolor && !(flags & DIR_OR_DIRLNK)) {
   3922 		attroff(COLOR_PAIR(cfg.curctx + 1) | A_BOLD);
   3923 		g_state.dircolor = 0;
   3924 	}
   3925 }
   3926 
   3927 /*
   3928  * Replace escape characters in a string with '?'
   3929  * Adjust string length to maxcols if > 0;
   3930  * Max supported str length: NAME_MAX;
   3931  */
   3932 #ifdef NOLC
   3933 static char *unescape(const char *str, uint_t maxcols)
   3934 {
   3935 	char * const wbuf = g_buf;
   3936 	char *buf = wbuf;
   3937 
   3938 	xstrsncpy(wbuf, str, maxcols);
   3939 #else
   3940 static wchar_t *unescape(const char *str, uint_t maxcols)
   3941 {
   3942 	wchar_t * const wbuf = (wchar_t *)g_buf;
   3943 	wchar_t *buf = wbuf;
   3944 	size_t len = mbstowcs(wbuf, str, maxcols); /* Convert multi-byte to wide char */
   3945 
   3946 	len = wcswidth(wbuf, len);
   3947 
   3948 	if (len >= maxcols) {
   3949 		size_t lencount = maxcols;
   3950 
   3951 		while (len > maxcols) /* Reduce wide chars one by one till it fits */
   3952 			len = wcswidth(wbuf, --lencount);
   3953 
   3954 		wbuf[lencount] = L'\0';
   3955 	}
   3956 #endif
   3957 
   3958 	while (*buf) {
   3959 		if (*buf <= '\x1f' || *buf == '\x7f')
   3960 			*buf = '\?';
   3961 
   3962 		++buf;
   3963 	}
   3964 
   3965 	return wbuf;
   3966 }
   3967 
   3968 static off_t get_size(off_t size, off_t *pval, int comp)
   3969 {
   3970 	off_t rem = *pval;
   3971 	off_t quo = rem / 10;
   3972 
   3973 	if ((rem - (quo * 10)) >= 5) {
   3974 		rem = quo + 1;
   3975 		if (rem == comp) {
   3976 			++size;
   3977 			rem = 0;
   3978 		}
   3979 	} else
   3980 		rem = quo;
   3981 
   3982 	*pval = rem;
   3983 	return size;
   3984 }
   3985 
   3986 static char *coolsize(off_t size)
   3987 {
   3988 	const char * const U = "BKMGTPEZY";
   3989 	static char size_buf[12]; /* Buffer to hold human readable size */
   3990 	off_t rem = 0;
   3991 	size_t ret;
   3992 	int i = 0;
   3993 
   3994 	while (size >= 1024) {
   3995 		rem = size & (0x3FF); /* 1024 - 1 = 0x3FF */
   3996 		size >>= 10;
   3997 		++i;
   3998 	}
   3999 
   4000 	if (i == 1) {
   4001 		rem = (rem * 1000) >> 10;
   4002 		rem /= 10;
   4003 		size = get_size(size, &rem, 10);
   4004 	} else if (i == 2) {
   4005 		rem = (rem * 1000) >> 10;
   4006 		size = get_size(size, &rem, 100);
   4007 	} else if (i > 2) {
   4008 		rem = (rem * 10000) >> 10;
   4009 		size = get_size(size, &rem, 1000);
   4010 	}
   4011 
   4012 	if (i > 0 && i < 6 && rem) {
   4013 		ret = xstrsncpy(size_buf, xitoa(size), 12);
   4014 		size_buf[ret - 1] = '.';
   4015 
   4016 		char *frac = xitoa(rem);
   4017 		size_t toprint = i > 3 ? 3 : i;
   4018 		size_t len = xstrlen(frac);
   4019 
   4020 		if (len < toprint) {
   4021 			size_buf[ret] = size_buf[ret + 1] = size_buf[ret + 2] = '0';
   4022 			xstrsncpy(size_buf + ret + (toprint - len), frac, len + 1);
   4023 		} else
   4024 			xstrsncpy(size_buf + ret, frac, toprint + 1);
   4025 
   4026 		ret += toprint;
   4027 	} else {
   4028 		ret = xstrsncpy(size_buf, size ? xitoa(size) : "0", 12);
   4029 		--ret;
   4030 	}
   4031 
   4032 	size_buf[ret] = U[i];
   4033 	size_buf[ret + 1] = '\0';
   4034 
   4035 	return size_buf;
   4036 }
   4037 
   4038 /* Convert a mode field into "ls -l" type perms field. */
   4039 static char *get_lsperms(mode_t mode)
   4040 {
   4041 	static const char * const rwx[] = {"---", "--x", "-w-", "-wx", "r--", "r-x", "rw-", "rwx"};
   4042 	static char bits[11] = {'\0'};
   4043 
   4044 	switch (mode & S_IFMT) {
   4045 	case S_IFREG:
   4046 		bits[0] = '-';
   4047 		break;
   4048 	case S_IFDIR:
   4049 		bits[0] = 'd';
   4050 		break;
   4051 	case S_IFLNK:
   4052 		bits[0] = 'l';
   4053 		break;
   4054 	case S_IFSOCK:
   4055 		bits[0] = 's';
   4056 		break;
   4057 	case S_IFIFO:
   4058 		bits[0] = 'p';
   4059 		break;
   4060 	case S_IFBLK:
   4061 		bits[0] = 'b';
   4062 		break;
   4063 	case S_IFCHR:
   4064 		bits[0] = 'c';
   4065 		break;
   4066 	default:
   4067 		bits[0] = '?';
   4068 		break;
   4069 	}
   4070 
   4071 	xstrsncpy(&bits[1], rwx[(mode >> 6) & 7], 4);
   4072 	xstrsncpy(&bits[4], rwx[(mode >> 3) & 7], 4);
   4073 	xstrsncpy(&bits[7], rwx[(mode & 7)], 4);
   4074 
   4075 	if (mode & S_ISUID)
   4076 		bits[3] = (mode & 0100) ? 's' : 'S';  /* user executable */
   4077 	if (mode & S_ISGID)
   4078 		bits[6] = (mode & 0010) ? 's' : 'l';  /* group executable */
   4079 	if (mode & S_ISVTX)
   4080 		bits[9] = (mode & 0001) ? 't' : 'T';  /* others executable */
   4081 
   4082 	return bits;
   4083 }
   4084 
   4085 #ifdef ICONS_ENABLED
   4086 static struct icon get_icon(const struct entry *ent)
   4087 {
   4088 	for (size_t i = 0; i < ELEMENTS(icons_name); ++i)
   4089 		if (strcasecmp(ent->name, icons_name[i].match) == 0)
   4090 			return (struct icon){ icons_name[i].icon, icons_name[i].color };
   4091 
   4092 	if (ent->flags & DIR_OR_DIRLNK)
   4093 		return dir_icon;
   4094 
   4095 	char *tmp = xextension(ent->name, ent->nlen);
   4096 
   4097 	if (tmp) {
   4098 		uint16_t z, k, h = icon_ext_hash(++tmp); /* ++tmp to skip '.' */
   4099 		for (k = 0; k < ICONS_PROBE_MAX; ++k) {
   4100 			z = (h + k) % ELEMENTS(icons_ext);
   4101 			if (strcasecmp(tmp, icons_ext[z].match) == 0)
   4102 				return (struct icon){ icons_ext_uniq[icons_ext[z].idx], icons_ext[z].color };
   4103 		}
   4104 	}
   4105 
   4106 	/* If there's no match and the file is executable, icon that */
   4107 	if (ent->mode & 0100)
   4108 		return exec_icon;
   4109 	return file_icon;
   4110 }
   4111 
   4112 static void print_icon(const struct entry *ent, const int attrs)
   4113 {
   4114 	const struct icon icon = get_icon(ent);
   4115 	addstr(ICON_PADDING_LEFT);
   4116 	if (icon.color)
   4117 		attron(COLOR_PAIR(C_UND + 1 + icon.color));
   4118 	else if (attrs)
   4119 		attron(attrs);
   4120 	addstr(icon.icon);
   4121 	if (icon.color)
   4122 		attroff(COLOR_PAIR(C_UND + 1 + icon.color));
   4123 	else if (attrs)
   4124 		attroff(attrs);
   4125 	addstr(ICON_PADDING_RIGHT);
   4126 }
   4127 #endif
   4128 
   4129 static void print_time(const time_t *timep, const uchar_t flags)
   4130 {
   4131 	struct tm t;
   4132 
   4133 	/* Highlight timestamp for entries 5 minutes young */
   4134 	if (flags & FILE_YOUNG)
   4135 		attron(A_REVERSE);
   4136 
   4137 	localtime_r(timep, &t);
   4138 	printw("%s-%02d-%02d %02d:%02d",
   4139 		xitoa(t.tm_year + 1900), t.tm_mon + 1, t.tm_mday, t.tm_hour, t.tm_min);
   4140 
   4141 	if (flags & FILE_YOUNG)
   4142 		attroff(A_REVERSE);
   4143 }
   4144 
   4145 static char get_detail_ind(const mode_t mode)
   4146 {
   4147 	switch (mode & S_IFMT) {
   4148 	case S_IFDIR:  // fallthrough
   4149 	case S_IFREG:  return ' ';
   4150 	case S_IFLNK:  return '@';
   4151 	case S_IFSOCK: return '=';
   4152 	case S_IFIFO:  return '|';
   4153 	case S_IFBLK:  return 'b';
   4154 	case S_IFCHR:  return 'c';
   4155 	}
   4156 	return '?';
   4157 }
   4158 
   4159 /* Note: attribute and indicator values must be initialized to 0 */
   4160 static uchar_t get_color_pair_name_ind(const struct entry *ent, char *pind, int *pattr)
   4161 {
   4162 	switch (ent->mode & S_IFMT) {
   4163 	case S_IFREG:
   4164 		if (!ent->size) {
   4165 			if (ent->mode & 0100)
   4166 				*pind = '*';
   4167 			return C_UND;
   4168 		}
   4169 		if (ent->flags & HARD_LINK) {
   4170 			if (ent->mode & 0100)
   4171 				*pind = '*';
   4172 			return C_HRD;
   4173 		}
   4174 		if (ent->mode & 0100) {
   4175 			*pind = '*';
   4176 			return C_EXE;
   4177 		}
   4178 		return C_FIL;
   4179 	case S_IFDIR:
   4180 		*pind = '/';
   4181 		if (g_state.oldcolor)
   4182 			return C_DIR;
   4183 		*pattr |= A_BOLD;
   4184 		return g_state.dirctx ? cfg.curctx + 1 : C_DIR;
   4185 	case S_IFLNK:
   4186 		if (ent->flags & DIR_OR_DIRLNK) {
   4187 			*pind = '/';
   4188 			*pattr |= g_state.oldcolor ? A_DIM : A_BOLD;
   4189 		} else {
   4190 			*pind = '@';
   4191 			if (g_state.oldcolor)
   4192 				*pattr |= A_DIM;
   4193 		}
   4194 		if (!g_state.oldcolor || cfg.showdetail)
   4195 			return (ent->flags & SYM_ORPHAN) ? C_ORP : C_LNK;
   4196 		return 0;
   4197 	case S_IFSOCK:
   4198 		*pind = '=';
   4199 		return C_SOC;
   4200 	case S_IFIFO:
   4201 		*pind = '|';
   4202 		return C_PIP;
   4203 	case S_IFBLK:
   4204 		return C_BLK;
   4205 	case S_IFCHR:
   4206 		return C_CHR;
   4207 	}
   4208 
   4209 	*pind = '?';
   4210 	return C_UND;
   4211 }
   4212 
   4213 static void printent(const struct entry *ent, uint_t namecols, bool sel)
   4214 {
   4215 	char ind = '\0';
   4216 	int attrs;
   4217 
   4218 	if (cfg.showdetail) {
   4219 		int type = ent->mode & S_IFMT;
   4220 		char perms[6] = {' ', ' ', (char)('0' + ((ent->mode >> 6) & 7)),
   4221 				(char)('0' + ((ent->mode >> 3) & 7)),
   4222 				(char)('0' + (ent->mode & 7)), '\0'};
   4223 
   4224 		addch(' ');
   4225 		attrs = g_state.oldcolor ? (resetdircolor(ent->flags), A_DIM)
   4226 					 : (fcolors[C_MIS] ? COLOR_PAIR(C_MIS) : 0);
   4227 		if (attrs)
   4228 			attron(attrs);
   4229 
   4230 		/* Print details */
   4231 		print_time(&ent->sec, ent->flags);
   4232 
   4233 		printw("%s%9s ", perms, (type == S_IFREG || type == S_IFDIR)
   4234 			? coolsize(cfg.blkorder ? (blkcnt_t)ent->blocks << blk_shift : ent->size)
   4235 			: (type = (uchar_t)get_detail_ind(ent->mode), (char *)&type));
   4236 
   4237 		if (attrs)
   4238 			attroff(attrs);
   4239 	}
   4240 
   4241 	attrs = 0;
   4242 
   4243 	uchar_t color_pair = get_color_pair_name_ind(ent, &ind, &attrs);
   4244 
   4245 	addch((ent->flags & FILE_SELECTED) ? '+' | A_REVERSE | A_BOLD : ' ');
   4246 
   4247 	if (g_state.oldcolor)
   4248 		resetdircolor(ent->flags);
   4249 	else {
   4250 		if (ent->flags & FILE_MISSING)
   4251 			color_pair = C_MIS;
   4252 		if (color_pair && fcolors[color_pair])
   4253 			attrs |= COLOR_PAIR(color_pair);
   4254 #ifdef ICONS_ENABLED
   4255 		print_icon(ent, attrs);
   4256 #endif
   4257 	}
   4258 
   4259 	if (sel)
   4260 		attrs |= A_REVERSE;
   4261 	if (attrs)
   4262 		attron(attrs);
   4263 	if (!ind)
   4264 		++namecols;
   4265 
   4266 #ifndef NOLC
   4267 	addwstr(unescape(ent->name, namecols));
   4268 #else
   4269 	addstr(unescape(ent->name, MIN(namecols, ent->nlen) + 1));
   4270 #endif
   4271 
   4272 	if (attrs)
   4273 		attroff(attrs);
   4274 	if (ind)
   4275 		addch(ind);
   4276 }
   4277 
   4278 static void savecurctx(char *path, char *curname, int nextctx)
   4279 {
   4280 	settings tmpcfg = cfg;
   4281 	context *ctxr = &g_ctx[nextctx];
   4282 
   4283 	/* Save current context */
   4284 	if (curname)
   4285 		xstrsncpy(g_ctx[tmpcfg.curctx].c_name, curname, NAME_MAX + 1);
   4286 	else
   4287 		g_ctx[tmpcfg.curctx].c_name[0] = '\0';
   4288 
   4289 	g_ctx[tmpcfg.curctx].c_cfg = tmpcfg;
   4290 
   4291 	if (ctxr->c_cfg.ctxactive) { /* Switch to saved context */
   4292 		tmpcfg = ctxr->c_cfg;
   4293 		/* Skip ordering an open context */
   4294 		if (order) {
   4295 			cfgsort[CTX_MAX] = cfgsort[nextctx];
   4296 			cfgsort[nextctx] = '0';
   4297 		}
   4298 	} else { /* Set up a new context from current context */
   4299 		ctxr->c_cfg.ctxactive = 1;
   4300 		xstrsncpy(ctxr->c_path, path, PATH_MAX);
   4301 		ctxr->c_last[0] = ctxr->c_name[0] = ctxr->c_fltr[0] = ctxr->c_fltr[1] = '\0';
   4302 		ctxr->c_cfg = tmpcfg;
   4303 		/* If already in an ordered dir, clear ordering for the new context and let it order */
   4304 		if (cfgsort[cfg.curctx] == 'z')
   4305 			cfgsort[nextctx] = 'z';
   4306 	}
   4307 
   4308 	tmpcfg.curctx = nextctx;
   4309 	cfg = tmpcfg;
   4310 }
   4311 
   4312 #ifndef NOSSN
   4313 static void save_session(const char *sname, int *presel)
   4314 {
   4315 	int fd, i;
   4316 	session_header_t header = {0};
   4317 	bool status = FALSE;
   4318 	char ssnpath[PATH_MAX];
   4319 	char spath[PATH_MAX];
   4320 
   4321 	header.ver = SESSIONS_VERSION;
   4322 
   4323 	for (i = 0; i < CTX_MAX; ++i) {
   4324 		if (g_ctx[i].c_cfg.ctxactive) {
   4325 			if (cfg.curctx == i && ndents)
   4326 				/* Update current file name, arrows don't update it */
   4327 				xstrsncpy(g_ctx[i].c_name, pdents[cur].name, NAME_MAX + 1);
   4328 			header.pathln[i] = MIN(xstrlen(g_ctx[i].c_path), PATH_MAX) + 1;
   4329 			header.lastln[i] = MIN(xstrlen(g_ctx[i].c_last), PATH_MAX) + 1;
   4330 			header.nameln[i] = MIN(xstrlen(g_ctx[i].c_name), NAME_MAX) + 1;
   4331 			header.fltrln[i] = REGEX_MAX;
   4332 		}
   4333 	}
   4334 
   4335 	mkpath(cfgpath, toks[TOK_SSN], ssnpath);
   4336 	mkpath(ssnpath, sname, spath);
   4337 
   4338 	fd = open(spath, O_CREAT | O_WRONLY | O_TRUNC, S_IWUSR | S_IRUSR);
   4339 	if (fd == -1) {
   4340 		printwait(messages[MSG_SEL_MISSING], presel);
   4341 		return;
   4342 	}
   4343 
   4344 	if ((write(fd, &header, sizeof(header)) != (ssize_t)sizeof(header))
   4345 		|| (write(fd, &cfg, sizeof(cfg)) != (ssize_t)sizeof(cfg)))
   4346 		goto END;
   4347 
   4348 	for (i = 0; i < CTX_MAX; ++i)
   4349 		if ((write(fd, &g_ctx[i].c_cfg, sizeof(settings)) != (ssize_t)sizeof(settings))
   4350 			|| (write(fd, &g_ctx[i].color, sizeof(uint_t)) != (ssize_t)sizeof(uint_t))
   4351 			|| (header.nameln[i] > 0
   4352 			    && write(fd, g_ctx[i].c_name, header.nameln[i]) != (ssize_t)header.nameln[i])
   4353 			|| (header.lastln[i] > 0
   4354 			    && write(fd, g_ctx[i].c_last, header.lastln[i]) != (ssize_t)header.lastln[i])
   4355 			|| (header.fltrln[i] > 0
   4356 			    && write(fd, g_ctx[i].c_fltr, header.fltrln[i]) != (ssize_t)header.fltrln[i])
   4357 			|| (header.pathln[i] > 0
   4358 			    && write(fd, g_ctx[i].c_path, header.pathln[i]) != (ssize_t)header.pathln[i]))
   4359 			goto END;
   4360 
   4361 	status = TRUE;
   4362 
   4363 END:
   4364 	close(fd);
   4365 
   4366 	if (!status)
   4367 		printwait(messages[MSG_FAILED], presel);
   4368 }
   4369 
   4370 static bool load_session(const char *sname, char **path, char **lastdir, char **lastname, bool restore)
   4371 {
   4372 	int fd, i = 0;
   4373 	session_header_t header;
   4374 	bool has_loaded_dynamically = !(sname || restore);
   4375 	bool status = (sname && g_state.picker); /* Picker mode with session program option */
   4376 	char ssnpath[PATH_MAX];
   4377 	char spath[PATH_MAX];
   4378 
   4379 	mkpath(cfgpath, toks[TOK_SSN], ssnpath);
   4380 
   4381 	if (!restore) {
   4382 		sname = sname ? sname : xreadline(NULL, messages[MSG_SSN_NAME]);
   4383 		if (!sname[0])
   4384 			return FALSE;
   4385 
   4386 		mkpath(ssnpath, sname, spath);
   4387 
   4388 		/* If user is explicitly loading the "last session", skip auto-save */
   4389 		if ((sname[0] == '@') && !sname[1])
   4390 			has_loaded_dynamically = FALSE;
   4391 	} else
   4392 		mkpath(ssnpath, "@", spath);
   4393 
   4394 	if (has_loaded_dynamically)
   4395 		save_session("@", NULL);
   4396 
   4397 	fd = open(spath, O_RDONLY, S_IWUSR | S_IRUSR);
   4398 	if (fd == -1) {
   4399 		if (!status) {
   4400 			printmsg(messages[MSG_SEL_MISSING]);
   4401 			xdelay(XDELAY_INTERVAL_MS);
   4402 		}
   4403 		return FALSE;
   4404 	}
   4405 
   4406 	status = FALSE;
   4407 
   4408 	if ((read(fd, &header, sizeof(header)) != (ssize_t)sizeof(header))
   4409 		|| (header.ver != SESSIONS_VERSION)
   4410 		|| (read(fd, &cfg, sizeof(cfg)) != (ssize_t)sizeof(cfg)))
   4411 		goto END;
   4412 
   4413 	g_ctx[cfg.curctx].c_name[0] = g_ctx[cfg.curctx].c_last[0]
   4414 		= g_ctx[cfg.curctx].c_fltr[0] = g_ctx[cfg.curctx].c_fltr[1] = '\0';
   4415 
   4416 	for (; i < CTX_MAX; ++i)
   4417 		if ((read(fd, &g_ctx[i].c_cfg, sizeof(settings)) != (ssize_t)sizeof(settings))
   4418 			|| (read(fd, &g_ctx[i].color, sizeof(uint_t)) != (ssize_t)sizeof(uint_t))
   4419 			|| (header.nameln[i] > 0
   4420 			    && read(fd, g_ctx[i].c_name, header.nameln[i]) != (ssize_t)header.nameln[i])
   4421 			|| (header.lastln[i] > 0
   4422 			    && read(fd, g_ctx[i].c_last, header.lastln[i]) != (ssize_t)header.lastln[i])
   4423 			|| (header.fltrln[i] > 0
   4424 			    && read(fd, g_ctx[i].c_fltr, header.fltrln[i]) != (ssize_t)header.fltrln[i])
   4425 			|| (header.pathln[i] > 0
   4426 			    && read(fd, g_ctx[i].c_path, header.pathln[i]) != (ssize_t)header.pathln[i]))
   4427 			goto END;
   4428 
   4429 	*path = g_ctx[cfg.curctx].c_path;
   4430 	*lastdir = g_ctx[cfg.curctx].c_last;
   4431 	*lastname = g_ctx[cfg.curctx].c_name;
   4432 	set_sort_flags('\0'); /* Set correct sort options */
   4433 	status = TRUE;
   4434 
   4435 END:
   4436 	close(fd);
   4437 
   4438 	if (!status) {
   4439 		printmsg(messages[MSG_FAILED]);
   4440 		xdelay(XDELAY_INTERVAL_MS);
   4441 	} else if (restore)
   4442 		unlink(spath);
   4443 
   4444 	return status;
   4445 }
   4446 #endif
   4447 
   4448 static uchar_t get_free_ctx(void)
   4449 {
   4450 	uchar_t r = cfg.curctx;
   4451 
   4452 	do
   4453 		r = (r + 1) & ~CTX_MAX;
   4454 	while (g_ctx[r].c_cfg.ctxactive && (r != cfg.curctx));
   4455 
   4456 	return r;
   4457 }
   4458 
   4459 /* ctx is absolute: 1 to 4, + for smart context */
   4460 static void set_smart_ctx(int ctx, char *nextpath, char **path, char *file, char **lastname, char **lastdir)
   4461 {
   4462 	if (ctx == '+') /* Get smart context */
   4463 		ctx = (int)(get_free_ctx() + 1);
   4464 
   4465 	if (ctx == 0 || ctx == cfg.curctx + 1) { /* Same context */
   4466 		clearfilter();
   4467 		xstrsncpy(*lastdir, *path, PATH_MAX);
   4468 		xstrsncpy(*path, nextpath, PATH_MAX);
   4469 	} else { /* New context */
   4470 		--ctx;
   4471 		/* Deactivate the new context and build from scratch */
   4472 		g_ctx[ctx].c_cfg.ctxactive = 0;
   4473 		DPRINTF_S(nextpath);
   4474 		savecurctx(nextpath, file, ctx);
   4475 		*path = g_ctx[ctx].c_path;
   4476 		*lastdir = g_ctx[ctx].c_last;
   4477 		*lastname = g_ctx[ctx].c_name;
   4478 	}
   4479 }
   4480 
   4481 /*
   4482  * This function does one of the following depending on the values of `fdout` and `page`:
   4483  *  1) fdout == -1 && !page: Write up to CMD_LEN_MAX bytes of command output into g_buf
   4484  *  2) fdout == -1 && page: Create a temp file, write full command output into it and show in pager.
   4485  *  3) fdout != -1 && !page: Write full command output into the provided file.
   4486  *  4) fdout != -1 && page: Don't use! Returns FALSE.
   4487  *
   4488  * g_buf is modified only in case 1.
   4489  * g_tmpfpath is modified only in case 2.
   4490  */
   4491 static bool get_output(char *file, char *arg1, char *arg2, int fdout, bool page)
   4492 {
   4493 	pid_t pid;
   4494 	int pipefd[2];
   4495 	int index = 0, flags;
   4496 	bool ret = FALSE;
   4497 	bool have_file = fdout != -1;
   4498 	int cmd_in_fd = -1;
   4499 	int cmd_out_fd = -1;
   4500 	ssize_t len;
   4501 
   4502 	/*
   4503 	 * In this case the logic of the function dictates that we should write the output of the command
   4504 	 * to `fd` and show it in the pager. But since we didn't open the file descriptor we have no right
   4505 	 * to close it, the caller must do it. We don't even know the path to pass to the pager and
   4506 	 * it's a real hassle to get it. In general this just invites problems so we are blocking it.
   4507 	 */
   4508 	if (have_file && page) {
   4509 		DPRINTF_S("invalid get_ouptput() call");
   4510 		return FALSE;
   4511 	}
   4512 
   4513 	/* Setup file descriptors for child command */
   4514 	if (!have_file && page) {
   4515 		// Case 2
   4516 		fdout = create_tmp_file();
   4517 		if (fdout == -1)
   4518 			return FALSE;
   4519 
   4520 		cmd_in_fd = STDIN_FILENO;
   4521 		cmd_out_fd = fdout;
   4522 	} else if (have_file) {
   4523 		// Case 3
   4524 		cmd_in_fd = STDIN_FILENO;
   4525 		cmd_out_fd = fdout;
   4526 	} else {
   4527 		// Case 1
   4528 		if (pipe(pipefd) == -1)
   4529 			errexit();
   4530 
   4531 		for (index = 0; index < 2; ++index) {
   4532 			/* Get previous flags */
   4533 			flags = fcntl(pipefd[index], F_GETFL, 0);
   4534 
   4535 			/* Set bit for non-blocking flag */
   4536 			flags |= O_NONBLOCK;
   4537 
   4538 			/* Change flags on fd */
   4539 			fcntl(pipefd[index], F_SETFL, flags);
   4540 		}
   4541 
   4542 		cmd_in_fd = pipefd[0];
   4543 		cmd_out_fd = pipefd[1];
   4544 	}
   4545 
   4546 	pid = fork();
   4547 	if (pid == 0) {
   4548 		/* In child */
   4549 		close(cmd_in_fd);
   4550 		dup2(cmd_out_fd, STDOUT_FILENO);
   4551 		dup2(cmd_out_fd, STDERR_FILENO);
   4552 		close(cmd_out_fd);
   4553 
   4554 		spawn(file, arg1, arg2, NULL, F_MULTI);
   4555 		_exit(EXIT_SUCCESS);
   4556 	}
   4557 
   4558 	/* In parent */
   4559 	waitpid(pid, NULL, 0);
   4560 
   4561 	/* Do what each case should do */
   4562 	if (!have_file && page) {
   4563 		// Case 2
   4564 		close(fdout);
   4565 
   4566 		spawn(pager, g_tmpfpath, NULL, NULL, F_CLI | F_TTY);
   4567 
   4568 		unlink(g_tmpfpath);
   4569 		return TRUE;
   4570 	}
   4571 
   4572 	if (have_file)
   4573 		// Case 3
   4574 		return TRUE;
   4575 
   4576 	// Case 1
   4577 	len = read(pipefd[0], g_buf, CMD_LEN_MAX - 1);
   4578 	if (len > 0)
   4579 		ret = TRUE;
   4580 
   4581 	close(pipefd[0]);
   4582 	close(pipefd[1]);
   4583 	return ret;
   4584 }
   4585 
   4586 /*
   4587  * Follows the stat(1) output closely
   4588  */
   4589 static bool show_stats(char *fpath)
   4590 {
   4591 	static char * const cmds[] = {
   4592 #ifdef FILE_MIME_OPTS
   4593 		("file " FILE_MIME_OPTS),
   4594 #endif
   4595 		"file -b",
   4596 #if defined(__FreeBSD__) || defined(__OpenBSD__) || defined(__NetBSD__) || defined(__APPLE__)
   4597 		"stat -x",
   4598 #else
   4599 		"stat",
   4600 #endif
   4601 	};
   4602 
   4603 	size_t r = ELEMENTS(cmds);
   4604 	int fd = create_tmp_file();
   4605 	if (fd == -1)
   4606 		return FALSE;
   4607 
   4608 	while (r)
   4609 		get_output(cmds[--r], fpath, NULL, fd, FALSE);
   4610 
   4611 	close(fd);
   4612 
   4613 	spawn(pager, g_tmpfpath, NULL, NULL, F_CLI | F_TTY);
   4614 	unlink(g_tmpfpath);
   4615 	return TRUE;
   4616 }
   4617 
   4618 static bool xchmod(const char *fpath, mode_t *mode)
   4619 {
   4620 	/* (Un)set (S_IXUSR | S_IXGRP | S_IXOTH) */
   4621 	(0100 & *mode) ? (*mode &= ~0111) : (*mode |= 0111);
   4622 
   4623 	return (chmod(fpath, *mode) == 0);
   4624 }
   4625 
   4626 static size_t get_fs_info(const char *path, uchar_t type)
   4627 {
   4628 	struct statvfs svb;
   4629 
   4630 	if (statvfs(path, &svb) == -1)
   4631 		return 0;
   4632 
   4633 	if (type == VFS_AVAIL)
   4634 		return (size_t)svb.f_bavail << ffs((int)(svb.f_frsize >> 1));
   4635 
   4636 	if (type == VFS_USED)
   4637 		return ((size_t)svb.f_blocks - (size_t)svb.f_bfree) << ffs((int)(svb.f_frsize >> 1));
   4638 
   4639 	return (size_t)svb.f_blocks << ffs((int)(svb.f_frsize >> 1)); /* VFS_SIZE */
   4640 }
   4641 
   4642 /* Create non-existent parents and a file or dir */
   4643 static bool xmktree(char *path, bool dir)
   4644 {
   4645 	char *p = path;
   4646 	char *slash = path;
   4647 
   4648 	if (!p || !*p)
   4649 		return FALSE;
   4650 
   4651 	/* Skip the first '/' */
   4652 	++p;
   4653 
   4654 	while (*p != '\0') {
   4655 		if (*p == '/') {
   4656 			slash = p;
   4657 			*p = '\0';
   4658 		} else {
   4659 			++p;
   4660 			continue;
   4661 		}
   4662 
   4663 		/* Create folder from path to '\0' inserted at p */
   4664 		if (mkdir(path, 0777) == -1 && errno != EEXIST) {
   4665 #ifdef __HAIKU__
   4666 			// XDG_CONFIG_HOME contains a directory
   4667 			// that is read-only, but the full path
   4668 			// is writeable.
   4669 			// Try to continue and see what happens.
   4670 			// TODO: Find a more robust solution.
   4671 			if (errno == B_READ_ONLY_DEVICE)
   4672 				goto next;
   4673 #endif
   4674 			DPRINTF_S("mkdir1!");
   4675 			DPRINTF_S(strerror(errno));
   4676 			*slash = '/';
   4677 			return FALSE;
   4678 		}
   4679 
   4680 #ifdef __HAIKU__
   4681 next:
   4682 #endif
   4683 		/* Restore path */
   4684 		*slash = '/';
   4685 		++p;
   4686 	}
   4687 
   4688 	if (dir) {
   4689 		if (mkdir(path, 0777) == -1 && errno != EEXIST) {
   4690 			DPRINTF_S("mkdir2!");
   4691 			DPRINTF_S(strerror(errno));
   4692 			return FALSE;
   4693 		}
   4694 	} else {
   4695 		int fd = open(path, O_CREAT | O_TRUNC, S_IWUSR | S_IRUSR); /* Forced create mode for files */
   4696 
   4697 		if (fd == -1 && errno != EEXIST) {
   4698 			DPRINTF_S("open!");
   4699 			DPRINTF_S(strerror(errno));
   4700 			return FALSE;
   4701 		}
   4702 
   4703 		close(fd);
   4704 	}
   4705 
   4706 	return TRUE;
   4707 }
   4708 
   4709 /* List or extract archive */
   4710 static bool handle_archive(char *fpath /* in-out param */, char op)
   4711 {
   4712 	char arg[] = "-tvf"; /* options for tar/bsdtar to list files */
   4713 	char *util, *outdir = NULL;
   4714 	bool x_to = FALSE;
   4715 	bool is_atool = (!g_state.usebsdtar && getutil(utils[UTIL_ATOOL]));
   4716 
   4717 	if (op == 'x') {
   4718 		outdir = xreadline(is_atool ? "." : xbasename(fpath), messages[MSG_NEW_PATH]);
   4719 		if (!outdir || !*outdir) { /* Cancelled */
   4720 			printwait(messages[MSG_CANCEL], NULL);
   4721 			return FALSE;
   4722 		}
   4723 		/* Do not create smart context for current dir */
   4724 		if (!(*outdir == '.' && outdir[1] == '\0')) {
   4725 			if (!xmktree(outdir, TRUE) || (chdir(outdir) == -1)) {
   4726 				printwarn(NULL);
   4727 				return FALSE;
   4728 			}
   4729 			/* Copy the new dir path to open it in smart context */
   4730 			outdir = getcwd(NULL, 0);
   4731 			x_to = TRUE;
   4732 		}
   4733 	}
   4734 
   4735 	if (is_atool) {
   4736 		util = utils[UTIL_ATOOL];
   4737 		arg[1] = op;
   4738 		arg[2] = '\0';
   4739 	} else if (getutil(utils[UTIL_BSDTAR])) {
   4740 		util = utils[UTIL_BSDTAR];
   4741 		if (op == 'x')
   4742 			arg[1] = op;
   4743 	} else if (is_suffix(fpath, ".zip")) {
   4744 		util = utils[UTIL_UNZIP];
   4745 		arg[1] = (op == 'l') ? 'v' /* verbose listing */ : '\0';
   4746 		arg[2] = '\0';
   4747 	} else {
   4748 		util = utils[UTIL_TAR];
   4749 		if (op == 'x')
   4750 			arg[1] = op;
   4751 	}
   4752 
   4753 	if (op == 'x') /* extract */
   4754 		spawn(util, arg, fpath, NULL, F_NORMAL | F_MULTI);
   4755 	else /* list */
   4756 		get_output(util, arg, fpath, -1, TRUE);
   4757 
   4758 	if (x_to) {
   4759 		if (chdir(xdirname(fpath)) == -1) {
   4760 			printwarn(NULL);
   4761 			free(outdir);
   4762 			return FALSE;
   4763 		}
   4764 		xstrsncpy(fpath, outdir, PATH_MAX);
   4765 		free(outdir);
   4766 	} else if (op == 'x')
   4767 		fpath[0] = '\0';
   4768 
   4769 	return TRUE;
   4770 }
   4771 
   4772 static char *visit_parent(char *path, char *newpath, int *presel)
   4773 {
   4774 	char *dir;
   4775 
   4776 	/* There is no going back */
   4777 	if (istopdir(path)) {
   4778 		/* Continue in type-to-nav mode, if enabled */
   4779 		if (cfg.filtermode && presel)
   4780 			*presel = FILTER;
   4781 		return NULL;
   4782 	}
   4783 
   4784 	/* Use a copy as xdirname() may change the string passed */
   4785 	if (newpath)
   4786 		xstrsncpy(newpath, path, PATH_MAX);
   4787 	else
   4788 		newpath = path;
   4789 
   4790 	dir = xdirname(newpath);
   4791 	if (chdir(dir) == -1) {
   4792 		printwarn(presel);
   4793 		return NULL;
   4794 	}
   4795 
   4796 	return dir;
   4797 }
   4798 
   4799 static void valid_parent(char *path, char *lastname)
   4800 {
   4801 	/* Save history */
   4802 	xstrsncpy(lastname, xbasename(path), NAME_MAX + 1);
   4803 
   4804 	while (!istopdir(path))
   4805 		if (visit_parent(path, NULL, NULL))
   4806 			break;
   4807 
   4808 	printwarn(NULL);
   4809 	xdelay(XDELAY_INTERVAL_MS);
   4810 }
   4811 
   4812 static bool archive_mount(char *newpath)
   4813 {
   4814 	char *dir, *cmd = xgetenv("NNN_ARCHMNT", utils[UTIL_ARCHMNT]);
   4815 	char *name = pdents[cur].name;
   4816 	size_t len = pdents[cur].nlen;
   4817 	char mntpath[PATH_MAX];
   4818 
   4819 	if (!getutil(cmd)) {
   4820 		printmsg("install utility");
   4821 		return FALSE;
   4822 	}
   4823 
   4824 	dir = xstrdup(name);
   4825 	if (!dir) {
   4826 		printmsg(messages[MSG_FAILED]);
   4827 		return FALSE;
   4828 	}
   4829 
   4830 	while (len > 1)
   4831 		if (dir[--len] == '.') {
   4832 			dir[len] = '\0';
   4833 			break;
   4834 		}
   4835 
   4836 	DPRINTF_S(dir);
   4837 
   4838 	/* Create the mount point */
   4839 	mkpath(cfgpath, toks[TOK_MNT], mntpath);
   4840 	mkpath(mntpath, dir, newpath);
   4841 	free(dir);
   4842 
   4843 	if (!xmktree(newpath, TRUE)) {
   4844 		printwarn(NULL);
   4845 		return FALSE;
   4846 	}
   4847 
   4848 	/* Mount archive */
   4849 	DPRINTF_S(name);
   4850 	DPRINTF_S(newpath);
   4851 	if (spawn(cmd, name, newpath, NULL, F_NORMAL)) {
   4852 		printmsg(messages[MSG_FAILED]);
   4853 		return FALSE;
   4854 	}
   4855 
   4856 	return TRUE;
   4857 }
   4858 
   4859 static bool remote_mount(char *newpath)
   4860 {
   4861 	uchar_t flag = F_CLI;
   4862 	int opt;
   4863 	char *tmp, *env;
   4864 	bool r = getutil(utils[UTIL_RCLONE]), s = getutil(utils[UTIL_SSHFS]);
   4865 	char mntpath[PATH_MAX];
   4866 
   4867 	if (!(r || s)) {
   4868 		printmsg("install sshfs/rclone");
   4869 		return FALSE;
   4870 	}
   4871 
   4872 	if (r && s)
   4873 		opt = get_input(messages[MSG_REMOTE_OPTS]);
   4874 	else
   4875 		opt = (!s) ? 'r' : 's';
   4876 
   4877 	if (opt == 's')
   4878 		env = xgetenv("NNN_SSHFS", utils[UTIL_SSHFS]);
   4879 	else if (opt == 'r') {
   4880 		flag |= F_NOWAIT | F_NOTRACE;
   4881 		env = xgetenv("NNN_RCLONE", "rclone mount");
   4882 	} else {
   4883 		printmsg(messages[MSG_INVALID_KEY]);
   4884 		return FALSE;
   4885 	}
   4886 
   4887 	tmp = xreadline(NULL, "host[:dir] > ");
   4888 	if (!tmp[0]) {
   4889 		printmsg(messages[MSG_CANCEL]);
   4890 		return FALSE;
   4891 	}
   4892 
   4893 	char *div = strchr(tmp, ':');
   4894 
   4895 	if (div)
   4896 		*div = '\0';
   4897 
   4898 	/* Create the mount point */
   4899 	mkpath(cfgpath, toks[TOK_MNT], mntpath);
   4900 	mkpath(mntpath, tmp, newpath);
   4901 	if (!xmktree(newpath, TRUE)) {
   4902 		printwarn(NULL);
   4903 		return FALSE;
   4904 	}
   4905 
   4906 	if (!div) { /* Convert "host" to "host:" */
   4907 		size_t len = xstrlen(tmp);
   4908 
   4909 		tmp[len] = ':';
   4910 		tmp[len + 1] = '\0';
   4911 	} else
   4912 		*div = ':';
   4913 
   4914 	/* Connect to remote */
   4915 	if (opt == 's') {
   4916 		if (spawn(env, tmp, newpath, NULL, flag)) {
   4917 			printmsg(messages[MSG_FAILED]);
   4918 			return FALSE;
   4919 		}
   4920 	} else {
   4921 		spawn(env, tmp, newpath, NULL, flag);
   4922 		printmsg(messages[MSG_RCLONE_DELAY]);
   4923 		xdelay(XDELAY_INTERVAL_MS << 2); /* Set 4 times the usual delay */
   4924 	}
   4925 
   4926 	return TRUE;
   4927 }
   4928 
   4929 /*
   4930  * Unmounts if the directory represented by name is a mount point.
   4931  * Otherwise, asks for hostname
   4932  * Returns TRUE if directory needs to be refreshed *.
   4933  */
   4934 static bool unmount(char *name, char *newpath, int *presel, char *currentpath)
   4935 {
   4936 #if defined(__APPLE__) || defined(__FreeBSD__)
   4937 	static char cmd[] = "umount";
   4938 #else
   4939 	static char cmd[] = "fusermount3"; /* Arch Linux utility */
   4940 	static bool found = FALSE;
   4941 #endif
   4942 	char *tmp = name;
   4943 	struct stat sb, psb;
   4944 	bool child = FALSE;
   4945 	bool parent = FALSE;
   4946 	bool hovered = FALSE;
   4947 	char mntpath[PATH_MAX];
   4948 
   4949 #if !defined(__APPLE__) && !defined(__FreeBSD__)
   4950 	/* On Ubuntu it's fusermount */
   4951 	if (!found && !getutil(cmd)) {
   4952 		cmd[10] = '\0';
   4953 		found = TRUE;
   4954 	}
   4955 #endif
   4956 
   4957 	mkpath(cfgpath, toks[TOK_MNT], mntpath);
   4958 
   4959 	if (tmp && strcmp(mntpath, currentpath) == 0) {
   4960 		mkpath(mntpath, tmp, newpath);
   4961 		child = lstat(newpath, &sb) != -1;
   4962 		parent = lstat(xdirname(newpath), &psb) != -1;
   4963 		if (!child && !parent) {
   4964 			*presel = MSGWAIT;
   4965 			return FALSE;
   4966 		}
   4967 	}
   4968 
   4969 	if (!tmp || !child || !S_ISDIR(sb.st_mode) || (child && parent && sb.st_dev == psb.st_dev)) {
   4970 		tmp = xreadline(NULL, messages[MSG_HOSTNAME]);
   4971 		if (!tmp[0])
   4972 			return FALSE;
   4973 		if (name && (tmp[0] == '-') && (tmp[1] == '\0')) {
   4974 			mkpath(currentpath, name, newpath);
   4975 			hovered = TRUE;
   4976 		}
   4977 	}
   4978 
   4979 	if (!hovered)
   4980 		mkpath(mntpath, tmp, newpath);
   4981 
   4982 	if (!xdiraccess(newpath)) {
   4983 		*presel = MSGWAIT;
   4984 		return FALSE;
   4985 	}
   4986 
   4987 #if defined(__APPLE__) || defined(__FreeBSD__)
   4988 	if (spawn(cmd, newpath, NULL, NULL, F_NORMAL)) {
   4989 #else
   4990 	if (spawn(cmd, "-qu", newpath, NULL, F_NORMAL)) {
   4991 #endif
   4992 		if (!xconfirm(get_input(messages[MSG_LAZY])))
   4993 			return FALSE;
   4994 
   4995 #ifdef __APPLE__
   4996 		if (spawn(cmd, "-l", newpath, NULL, F_NORMAL)) {
   4997 #elif defined(__FreeBSD__)
   4998 		if (spawn(cmd, "-f", newpath, NULL, F_NORMAL)) {
   4999 #else
   5000 		if (spawn(cmd, "-quz", newpath, NULL, F_NORMAL)) {
   5001 #endif
   5002 			printwait(messages[MSG_FAILED], presel);
   5003 			return FALSE;
   5004 		}
   5005 	}
   5006 
   5007 	if (rmdir(newpath) == -1) {
   5008 		printwarn(presel);
   5009 		return FALSE;
   5010 	}
   5011 
   5012 	return TRUE;
   5013 }
   5014 
   5015 static void lock_terminal(void)
   5016 {
   5017 	spawn(xgetenv("NNN_LOCKER", utils[UTIL_LOCKER]), NULL, NULL, NULL, F_CLI);
   5018 }
   5019 
   5020 static void printkv(kv *kvarr, int fd, uchar_t max, uchar_t id)
   5021 {
   5022 	char *val = (id == NNN_BMS) ? bmstr : pluginstr;
   5023 
   5024 	for (uchar_t i = 0; i < max && kvarr[i].key; ++i)
   5025 		dprintf(fd, " %c: %s\n", (char)kvarr[i].key, val + kvarr[i].off);
   5026 }
   5027 
   5028 static void printkeys(kv *kvarr, char *buf, uchar_t max)
   5029 {
   5030 	uchar_t i = 0;
   5031 
   5032 	for (; i < max && kvarr[i].key; ++i) {
   5033 		buf[i << 1] = ' ';
   5034 		buf[(i << 1) + 1] = kvarr[i].key;
   5035 	}
   5036 
   5037 	buf[i << 1] = '\0';
   5038 }
   5039 
   5040 static size_t handle_bookmark(const char *bmark, char *newpath)
   5041 {
   5042 	int fd = '\r';
   5043 	size_t r;
   5044 
   5045 	if (maxbm || bmark) {
   5046 		r = xstrsncpy(g_buf, messages[MSG_KEYS], CMD_LEN_MAX);
   5047 
   5048 		if (bmark) { /* There is a marked directory */
   5049 			g_buf[--r] = ' ';
   5050 			g_buf[++r] = ',';
   5051 			g_buf[++r] = '\0';
   5052 			++r;
   5053 		}
   5054 		printkeys(bookmark, g_buf + r - 1, maxbm);
   5055 		printmsg(g_buf);
   5056 		fd = get_input(NULL);
   5057 	}
   5058 
   5059 	r = FALSE;
   5060 	if (fd == ',') /* Visit marked directory */
   5061 		bmark ? xstrsncpy(newpath, bmark, PATH_MAX) : (r = MSG_NOT_SET);
   5062 	else if (fd == '\r') { /* Visit bookmarks directory */
   5063 		mkpath(cfgpath, toks[TOK_BM], newpath);
   5064 		g_state.selbm = 1;
   5065 	} else if (!get_kv_val(bookmark, newpath, fd, maxbm, NNN_BMS))
   5066 		r = MSG_INVALID_KEY;
   5067 
   5068 	if (!r && chdir(newpath) == -1) {
   5069 		r = MSG_ACCESS;
   5070 		if (g_state.selbm)
   5071 			g_state.selbm = 0;
   5072 	}
   5073 
   5074 	return r;
   5075 }
   5076 
   5077 static void add_bookmark(char *path, char *newpath, int *presel)
   5078 {
   5079 	char *dir = xbasename(path);
   5080 
   5081 	dir = xreadline(dir[0] ? dir : NULL, messages[MSG_BM_NAME]);
   5082 	if (dir && *dir) {
   5083 		size_t r = mkpath(cfgpath, toks[TOK_BM], newpath);
   5084 
   5085 		newpath[r - 1] = '/';
   5086 		xstrsncpy(newpath + r, dir, PATH_MAX - r);
   5087 		printwait((symlink(path, newpath) == -1) ? strerror(errno) : newpath, presel);
   5088 	} else
   5089 		printwait(messages[MSG_CANCEL], presel);
   5090 }
   5091 
   5092 /*
   5093  * The help string tokens (each line) start with a HEX value which indicates
   5094  * the number of spaces to print before the particular token. In the middle,
   5095  * %NN can be used to insert a run of spaces, e.g %10 will print 10 spaces.
   5096  * %NN MUST be 2 characters long, e.g %05 for 5 spaces.
   5097  *
   5098  * This method was chosen instead of a flat string because the number of bytes
   5099  * in help was increasing the binary size by around a hundred bytes. This would
   5100  * only have increased as we keep adding new options.
   5101  */
   5102 static void show_help(const char *path)
   5103 {
   5104 	static const char helpstr[] = {
   5105 	"2|V\\_\n"
   5106 	"2/. \\\\\n"
   5107 	"1(;^; ||\n"
   5108 	"3/___3\n"
   5109 	"2(___n))\n"
   5110 	"0\n"
   5111 	"1NAVIGATION\n"
   5112 	       "9Up k  Up%16PgUp ^U  Page up\n"
   5113 	       "9Dn j  Down%14PgDn ^D  Page down\n"
   5114 	       "9Lt h  Parent%12~ ` @ -  ~, /, start, prev\n"
   5115 	   "5Ret Rt l  Open%20'  First file/match\n"
   5116 	       "9g ^A  Top%21J  Jump to entry/offset\n"
   5117 	       "9G ^E  End%20^J  Toggle auto-advance on open\n"
   5118 	      "8B (,)  Book(mark)%11b ^/  Select bookmark\n"
   5119 		"a1-4  Context%11(Sh)Tab  Cycle/new context\n"
   5120 	    "62Esc ^Q  Quit%19^y  Next young\n"
   5121 		 "b^G  QuitCD%18Q  Pick/err, quit\n"
   5122 		  "cq  Quit context\n"
   5123 	"0\n"
   5124 	"1FILTER & PROMPT\n"
   5125 		  "c/  Filter%17^N  Toggle type-to-nav\n"
   5126 		"aEsc  Exit prompt%12^L  Toggle last filter\n"
   5127 		  "c.  Toggle hidden%05Alt+Esc  Unfilter, quit context\n"
   5128 	"0\n"
   5129 	"1FILES\n"
   5130 	       "9o ^O  Open with%15n  Create new/link\n"
   5131 	       "9f ^F  File stats%14d  Detail mode toggle\n"
   5132 		 "b^R  Rename/dup%14r  Batch rename\n"
   5133 		  "cz  Archive%17e  Edit file\n"
   5134 		  "c*  Toggle exe%14>  Export list\n"
   5135 	    "6Space +  (Un)select%12m-m  Select range/clear\n"
   5136 	          "ca  Select all%14A  Invert sel\n"
   5137 	       "9p ^P  Copy here%12w ^W  Cp/mv sel as\n"
   5138 	       "9v ^V  Move here%15E  Edit sel list\n"
   5139 	       "9x ^X  Delete%18S  Listed sel size\n"
   5140 		"aEsc  Send to FIFO\n"
   5141 	"0\n"
   5142 	"1MISC\n"
   5143 	      "8Alt ;  Select plugin%11=  Launch app\n"
   5144 	       "9! ^]  Shell%19]  Cmd prompt\n"
   5145 		  "cc  Connect remote%10u  Unmount remote/archive\n"
   5146 	       "9t ^T  Sort toggles%12s  Manage session\n"
   5147 		  "cT  Set time type%110  Lock\n"
   5148 		 "b^L  Redraw%18?  Help, conf\n"
   5149 	};
   5150 
   5151 	int fd = create_tmp_file();
   5152 	if (fd == -1)
   5153 		return;
   5154 
   5155 	char *prog = xgetenv(env_cfg[NNN_HELP], NULL);
   5156 	if (prog)
   5157 		get_output(prog, NULL, NULL, fd, FALSE);
   5158 
   5159 	bool hex = true;
   5160 	char *w = g_buf;
   5161 	const char *end = helpstr + (sizeof helpstr - 1);
   5162 	for (const char *s = helpstr; s < end; ++s) {
   5163 		if (hex) {
   5164 			for (int k = 0, n = xchartohex(*s); k < n; ++k) *w++ = ' ';
   5165 		} else if (*s == '%') {
   5166 			int n = ((s[1] - '0') * 10) + (s[2] - '0');
   5167 			for (int k = 0; k < n; ++k) *w++ = ' ';
   5168 			s += 2;
   5169 		} else {
   5170 			*w++ = *s;
   5171 		}
   5172 		hex = *s == '\n';
   5173 	}
   5174 	if (write(fd, g_buf, w - g_buf)) {} // silence warning
   5175 
   5176 	dprintf(fd, "\nLOCATIONS\n");
   5177 	for (uchar_t i = 0; i < CTX_MAX; ++i)
   5178 		if (g_ctx[i].c_cfg.ctxactive)
   5179 			dprintf(fd, " %u: %s\n", i + 1, g_ctx[i].c_path);
   5180 
   5181 	dprintf(fd, "\nVOLUME: avail:%s ", coolsize(get_fs_info(path, VFS_AVAIL)));
   5182 	dprintf(fd, "used:%s ", coolsize(get_fs_info(path, VFS_USED)));
   5183 	dprintf(fd, "size:%s\n\n", coolsize(get_fs_info(path, VFS_SIZE)));
   5184 
   5185 	if (bookmark) {
   5186 		dprintf(fd, "BOOKMARKS\n");
   5187 		printkv(bookmark, fd, maxbm, NNN_BMS);
   5188 		dprintf(fd, "\n");
   5189 	}
   5190 
   5191 	if (plug) {
   5192 		dprintf(fd, "PLUGIN KEYS\n");
   5193 		printkv(plug, fd, maxplug, NNN_PLUG);
   5194 		dprintf(fd, "\n");
   5195 	}
   5196 
   5197 	for (uchar_t i = NNN_OPENER; i <= NNN_TRASH; ++i) {
   5198 		char *s = getenv(env_cfg[i]);
   5199 		if (s)
   5200 			dprintf(fd, "%s: %s\n", env_cfg[i], s);
   5201 	}
   5202 
   5203 	if (selpath)
   5204 		dprintf(fd, "SELECTION FILE: %s\n", selpath);
   5205 
   5206 	dprintf(fd, "\nv%s\n%s\n", VERSION, GENERAL_INFO);
   5207 	close(fd);
   5208 
   5209 	spawn(pager, g_tmpfpath, NULL, NULL, F_CLI | F_TTY);
   5210 	unlink(g_tmpfpath);
   5211 }
   5212 
   5213 static void setexports(void)
   5214 {
   5215 	char dvar[] = "d0";
   5216 	char fvar[] = "f0";
   5217 
   5218 	if (ndents) {
   5219 		setenv(envs[ENV_NCUR], pdents[cur].name, 1);
   5220 		xstrsncpy(g_ctx[cfg.curctx].c_name, pdents[cur].name, NAME_MAX + 1);
   5221 	} else if (g_ctx[cfg.curctx].c_name[0])
   5222 		g_ctx[cfg.curctx].c_name[0] = '\0';
   5223 
   5224 	for (uchar_t i = 0; i < CTX_MAX; ++i) {
   5225 		if (g_ctx[i].c_cfg.ctxactive) {
   5226 			dvar[1] = fvar[1] = '1' + i;
   5227 			setenv(dvar, g_ctx[i].c_path, 1);
   5228 
   5229 			if (g_ctx[i].c_name[0]) {
   5230 				mkpath(g_ctx[i].c_path, g_ctx[i].c_name, g_buf);
   5231 				setenv(fvar, g_buf, 1);
   5232 			}
   5233 		}
   5234 	}
   5235 	setenv("NNN_INCLUDE_HIDDEN", xitoa(cfg.showhidden), 1);
   5236 	setenv("NNN_PREFER_SELECTION", xitoa(cfg.prefersel), 1);
   5237 }
   5238 
   5239 static void run_cmd_as_plugin(const char *file, uchar_t flags)
   5240 {
   5241 	size_t len;
   5242 
   5243 	xstrsncpy(g_buf, file, PATH_MAX);
   5244 
   5245 	len = xstrlen(g_buf);
   5246 	if (len > 1 && g_buf[len - 1] == '*') {
   5247 		flags &= ~F_CONFIRM; /* Skip user confirmation */
   5248 		g_buf[len - 1] = '\0'; /* Get rid of trailing no confirmation symbol */
   5249 		--len;
   5250 	}
   5251 
   5252 	if (flags & F_PAGE)
   5253 		get_output(utils[UTIL_SH_EXEC], g_buf, NULL, -1, TRUE);
   5254 	else
   5255 		spawn(utils[UTIL_SH_EXEC], g_buf, NULL, NULL, flags);
   5256 }
   5257 
   5258 static bool plctrl_init(void)
   5259 {
   5260 	size_t len;
   5261 
   5262 	/* g_tmpfpath is used to generate tmp file names */
   5263 	g_tmpfpath[tmpfplen - 1] = '\0';
   5264 	len = xstrsncpy(g_pipepath, g_tmpfpath, TMP_LEN_MAX);
   5265 	g_pipepath[len - 1] = '/';
   5266 	len = xstrsncpy(g_pipepath + len, "nnn-pipe.", TMP_LEN_MAX - len) + len;
   5267 	xstrsncpy(g_pipepath + len - 1, xitoa(getpid()), TMP_LEN_MAX - len);
   5268 	setenv(env_cfg[NNN_PIPE], g_pipepath, TRUE);
   5269 
   5270 	return EXIT_SUCCESS;
   5271 }
   5272 
   5273 static void rmlistpath(void)
   5274 {
   5275 	if (listpath) {
   5276 		DPRINTF_S(__func__);
   5277 		DPRINTF_S(listpath);
   5278 		spawn(utils[UTIL_RM_RF], listpath, NULL, NULL, F_NOTRACE | F_MULTI);
   5279 		/* Do not free if program was started in list mode */
   5280 		if (listpath != initpath)
   5281 			free(listpath);
   5282 		listpath = NULL;
   5283 	}
   5284 }
   5285 
   5286 static ssize_t read_nointr(int fd, void *buf, size_t count)
   5287 {
   5288 	ssize_t len;
   5289 
   5290 	do
   5291 		len = read(fd, buf, count);
   5292 	while (len == -1 && errno == EINTR);
   5293 
   5294 	return len;
   5295 }
   5296 
   5297 static char *readpipe(int fd, char *ctxnum, char **path)
   5298 {
   5299 	char ctx, *nextpath = NULL;
   5300 
   5301 	if (read_nointr(fd, g_buf, 1) != 1)
   5302 		return NULL;
   5303 
   5304 	if (g_buf[0] == '-') { /* Clear selection on '-' */
   5305 		clearselection();
   5306 		if (read_nointr(fd, g_buf, 1) != 1)
   5307 			return NULL;
   5308 	}
   5309 
   5310 	if (g_buf[0] == '+')
   5311 		ctx = (char)(get_free_ctx() + 1);
   5312 	else if (g_buf[0] < '0')
   5313 		return NULL;
   5314 	else {
   5315 		ctx = g_buf[0] - '0';
   5316 		if (ctx > CTX_MAX)
   5317 			return NULL;
   5318 	}
   5319 
   5320 	if (read_nointr(fd, g_buf, 1) != 1)
   5321 		return NULL;
   5322 
   5323 	char op = g_buf[0];
   5324 
   5325 	if (op == 'c') {
   5326 		ssize_t len = read_nointr(fd, g_buf, PATH_MAX);
   5327 
   5328 		if (len <= 0)
   5329 			return NULL;
   5330 
   5331 		g_buf[len] = '\0'; /* Terminate the path read */
   5332 		if (g_buf[0] == '/') {
   5333 			nextpath = g_buf;
   5334 			len = xstrlen(g_buf);
   5335 			while (--len && (g_buf[len] == '/')) /* Trim all trailing '/' */
   5336 				g_buf[len] = '\0';
   5337 		}
   5338 	} else if (op == 'l') {
   5339 		rmlistpath(); /* Remove last list mode path, if any */
   5340 		nextpath = load_input(fd, *path);
   5341 	} else if (op == 'p') {
   5342 		free(selpath);
   5343 		selpath = NULL;
   5344 		clearselection();
   5345 		g_state.picker = 0;
   5346 		g_state.picked = 1;
   5347 	}
   5348 
   5349 	*ctxnum = ctx;
   5350 
   5351 	return nextpath;
   5352 }
   5353 
   5354 static bool run_plugin(char **path, const char *file, char *runfile, char **lastname, char **lastdir)
   5355 {
   5356 	pid_t p;
   5357 	char ctx = 0;
   5358 	uchar_t flags = 0;
   5359 	bool cmd_as_plugin = FALSE;
   5360 	char *nextpath;
   5361 
   5362 	if (!g_state.pluginit) {
   5363 		plctrl_init();
   5364 		g_state.pluginit = 1;
   5365 	}
   5366 
   5367 	setexports();
   5368 
   5369 	/* Check for run-cmd-as-plugin mode */
   5370 	if (*file == '!') {
   5371 		flags = F_MULTI | F_CONFIRM;
   5372 		++file;
   5373 
   5374 		if (*file == '|') { /* Check if output should be paged */
   5375 			flags |= F_PAGE;
   5376 			++file;
   5377 		} else if (*file == '&') { /* Check if GUI flags are to be used */
   5378 			flags = F_MULTI | F_NOTRACE | F_NOWAIT;
   5379 			++file;
   5380 		}
   5381 
   5382 		if (!*file)
   5383 			return FALSE;
   5384 
   5385 		if ((flags & F_NOTRACE) || (flags & F_PAGE)) {
   5386 			run_cmd_as_plugin(file, flags);
   5387 			return TRUE;
   5388 		}
   5389 
   5390 		cmd_as_plugin = TRUE;
   5391 	}
   5392 
   5393 	if (mkfifo(g_pipepath, 0600) != 0)
   5394 		return FALSE;
   5395 
   5396 	exitcurses();
   5397 
   5398 	p = fork();
   5399 
   5400 	if (!p) { // In child
   5401 		int wfd = open(g_pipepath, O_WRONLY | O_CLOEXEC);
   5402 
   5403 		if (wfd == -1)
   5404 			_exit(EXIT_FAILURE);
   5405 
   5406 		if (!cmd_as_plugin) {
   5407 			char *sel = NULL;
   5408 			char std[2] = "-";
   5409 
   5410 			/* Generate absolute path to plugin */
   5411 			mkpath(plgpath, file, g_buf);
   5412 
   5413 			if (g_state.picker)
   5414 				sel = selpath ? selpath : std;
   5415 
   5416 			if (runfile && runfile[0]) {
   5417 				xstrsncpy(*lastname, runfile, NAME_MAX);
   5418 				spawn(g_buf, *lastname, *path, sel, 0);
   5419 			} else
   5420 				spawn(g_buf, NULL, *path, sel, 0);
   5421 		} else
   5422 			run_cmd_as_plugin(file, flags);
   5423 
   5424 		close(wfd);
   5425 		_exit(EXIT_SUCCESS);
   5426 	}
   5427 
   5428 	int rfd;
   5429 
   5430 	do
   5431 		rfd = open(g_pipepath, O_RDONLY);
   5432 	while (rfd == -1 && errno == EINTR);
   5433 
   5434 	nextpath = readpipe(rfd, &ctx, path);
   5435 	if (nextpath)
   5436 		set_smart_ctx(ctx, nextpath, path, runfile, lastname, lastdir);
   5437 
   5438 	close(rfd);
   5439 
   5440 	/* wait for the child to finish. no zombies allowed */
   5441 	waitpid(p, NULL, 0);
   5442 
   5443 	refresh();
   5444 
   5445 	unlink(g_pipepath);
   5446 
   5447 	return TRUE;
   5448 }
   5449 
   5450 static bool launch_app(char *newpath)
   5451 {
   5452 	int r = F_NORMAL;
   5453 	char *tmp = newpath;
   5454 
   5455 	mkpath(plgpath, utils[UTIL_LAUNCH], newpath);
   5456 
   5457 	if (!getutil(utils[UTIL_FZF]) || access(newpath, X_OK) < 0) {
   5458 		tmp = xreadline(NULL, messages[MSG_APP_NAME]);
   5459 		r = F_NOWAIT | F_NOTRACE | F_MULTI;
   5460 	}
   5461 
   5462 	if (tmp && *tmp) // NOLINT
   5463 		spawn(tmp, (r == F_NORMAL) ? "0" : NULL, NULL, NULL, r);
   5464 
   5465 	return FALSE;
   5466 }
   5467 
   5468 /* Returns TRUE if at least one command was run */
   5469 static bool prompt_run(void)
   5470 {
   5471 	bool ret = FALSE;
   5472 	char *cmdline, *next;
   5473 	int cnt_j, cnt_J, cmd_ret;
   5474 	size_t len;
   5475 
   5476 	const char *xargs_j = "xargs -0 -I{} %s < %s";
   5477 	const char *xargs_J = "xargs -0 %s < %s";
   5478 	char cmd[CMD_LEN_MAX + 32]; // 32 for xargs format strings
   5479 
   5480 	while (1) {
   5481 #ifndef NORL
   5482 		if (g_state.picker) {
   5483 #endif
   5484 			cmdline = xreadline(NULL, PROMPT);
   5485 #ifndef NORL
   5486 		} else
   5487 			cmdline = getreadline("\n"PROMPT);
   5488 #endif
   5489 		// Check for an empty command
   5490 		if (!cmdline || !cmdline[0])
   5491 			break;
   5492 
   5493 		free(lastcmd);
   5494 		lastcmd = xstrdup(cmdline);
   5495 		ret = TRUE;
   5496 
   5497 		len = xstrlen(cmdline);
   5498 
   5499 		cnt_j = 0;
   5500 		next = cmdline;
   5501 		while ((next = strstr(next, "%j"))) {
   5502 			++cnt_j;
   5503 
   5504 			// replace %j with {} for xargs later
   5505 			next[0] = '{';
   5506 			next[1] = '}';
   5507 
   5508 			++next;
   5509 		}
   5510 
   5511 		cnt_J = 0;
   5512 		next = cmdline;
   5513 		while ((next = strstr(next, "%J"))) {
   5514 			++cnt_J;
   5515 
   5516 			// %J should be the last thing in the command
   5517 			if (next == cmdline + len - 2) {
   5518 				cmdline[len - 2] = '\0';
   5519 			}
   5520 
   5521 			++next;
   5522 		}
   5523 
   5524 		// We can't handle both %j and %J in a single command
   5525 		if (cnt_j && cnt_J)
   5526 			break;
   5527 
   5528 		if (cnt_j)
   5529 			snprintf(cmd, CMD_LEN_MAX + 32, xargs_j, cmdline, selpath);
   5530 		else if (cnt_J)
   5531 			snprintf(cmd, CMD_LEN_MAX + 32, xargs_J, cmdline, selpath);
   5532 
   5533 		cmd_ret = spawn(shell, "-c", (cnt_j || cnt_J) ? cmd : cmdline, NULL, F_CLI | F_CONFIRM);
   5534 		if ((cnt_j || cnt_J) && cmd_ret == 0)
   5535 			clearselection();
   5536 	}
   5537 
   5538 	return ret;
   5539 }
   5540 
   5541 static bool handle_cmd(enum action sel, char *newpath)
   5542 {
   5543 	endselection(FALSE);
   5544 
   5545 	if (sel == SEL_LAUNCH)
   5546 		return launch_app(newpath);
   5547 
   5548 	setexports();
   5549 
   5550 	if (sel == SEL_PROMPT)
   5551 		return prompt_run();
   5552 
   5553 	/* Set nnn nesting level */
   5554 	char *tmp = getenv(env_cfg[NNNLVL]);
   5555 	int r = tmp ? atoi(tmp) : 0;
   5556 
   5557 	setenv(env_cfg[NNNLVL], xitoa(r + 1), 1);
   5558 	spawn(shell, NULL, NULL, NULL, F_CLI);
   5559 	setenv(env_cfg[NNNLVL], xitoa(r), 1);
   5560 	return TRUE;
   5561 }
   5562 
   5563 static void dentfree(void)
   5564 {
   5565 	free(pnamebuf);
   5566 	free(pdents);
   5567 	free(mark);
   5568 
   5569 	/* Thread data cleanup */
   5570 	free(core_blocks);
   5571 	free(core_data);
   5572 	free(core_files);
   5573 }
   5574 
   5575 static void *du_thread(void *p_data)
   5576 {
   5577 	thread_data *pdata = (thread_data *)p_data;
   5578 	char *path[2] = {pdata->path, NULL};
   5579 	ullong_t tfiles = 0;
   5580 	blkcnt_t tblocks = 0;
   5581 	struct stat *sb;
   5582 	FTS *tree = fts_open(path, FTS_PHYSICAL | FTS_XDEV | FTS_NOCHDIR, 0);
   5583 	FTSENT *node;
   5584 
   5585 	while ((node = fts_read(tree))) {
   5586 		if (node->fts_info & FTS_D) {
   5587 			if (g_state.interrupt)
   5588 				break;
   5589 			continue;
   5590 		}
   5591 
   5592 		sb = node->fts_statp;
   5593 
   5594 		if (cfg.apparentsz) {
   5595 			if (sb->st_size && DU_TEST)
   5596 				tblocks += sb->st_size;
   5597 		} else if (sb->st_blocks && DU_TEST)
   5598 			tblocks += sb->st_blocks;
   5599 
   5600 		++tfiles;
   5601 	}
   5602 
   5603 	fts_close(tree);
   5604 
   5605 	if (pdata->entnum >= 0)
   5606 		pdents[pdata->entnum].blocks = tblocks;
   5607 
   5608 	if (!pdata->mntpoint) {
   5609 		core_blocks[pdata->core] += tblocks;
   5610 		core_files[pdata->core] += tfiles;
   5611 	} else
   5612 		core_files[pdata->core] += 1;
   5613 
   5614 	pthread_mutex_lock(&running_mutex);
   5615 	threadbmp |= (1 << pdata->core);
   5616 	--active_threads;
   5617 	pthread_mutex_unlock(&running_mutex);
   5618 
   5619 	return NULL;
   5620 }
   5621 
   5622 static void dirwalk(char *path, int entnum, bool mountpoint)
   5623 {
   5624 	/* Loop till any core is free */
   5625 	while (active_threads == NUM_DU_THREADS);
   5626 
   5627 	if (g_state.interrupt)
   5628 		return;
   5629 
   5630 	pthread_mutex_lock(&running_mutex);
   5631 	int core = ffs(threadbmp) - 1;
   5632 
   5633 	threadbmp &= ~(1 << core);
   5634 	++active_threads;
   5635 	pthread_mutex_unlock(&running_mutex);
   5636 
   5637 	xstrsncpy(core_data[core].path, path, PATH_MAX);
   5638 	core_data[core].entnum = entnum;
   5639 	core_data[core].core = (ushort_t)core;
   5640 	core_data[core].mntpoint = mountpoint;
   5641 
   5642 	pthread_t tid = 0;
   5643 
   5644 	pthread_create(&tid, NULL, du_thread, (void *)&(core_data[core]));
   5645 
   5646 	tolastln();
   5647 	addstr(xbasename(path));
   5648 	addstr(" [^C aborts]\n");
   5649 	refresh();
   5650 }
   5651 
   5652 static bool prep_threads(void)
   5653 {
   5654 	if (!g_state.duinit) {
   5655 		/* drop MSB 1s */
   5656 		threadbmp >>= (32 - NUM_DU_THREADS);
   5657 
   5658 		if (!core_blocks)
   5659 			core_blocks = calloc(NUM_DU_THREADS, sizeof(blkcnt_t));
   5660 		if (!core_data)
   5661 			core_data = calloc(NUM_DU_THREADS, sizeof(thread_data));
   5662 		if (!core_files)
   5663 			core_files = calloc(NUM_DU_THREADS, sizeof(ullong_t));
   5664 
   5665 		if (!core_blocks || !core_data || !core_files) {
   5666 			printwarn(NULL);
   5667 			return FALSE;
   5668 		}
   5669 #ifndef __APPLE__
   5670 		/* Increase current open file descriptor limit */
   5671 		max_openfds();
   5672 #endif
   5673 		g_state.duinit = TRUE;
   5674 	} else {
   5675 		memset(core_blocks, 0, NUM_DU_THREADS * sizeof(blkcnt_t));
   5676 		memset(core_data, 0, NUM_DU_THREADS * sizeof(thread_data));
   5677 		memset(core_files, 0, NUM_DU_THREADS * sizeof(ullong_t));
   5678 	}
   5679 	return TRUE;
   5680 }
   5681 
   5682 /* Skip self and parent */
   5683 static inline bool selforparent(const char *path)
   5684 {
   5685 	return path[0] == '.' && (path[1] == '\0' || (path[1] == '.' && path[2] == '\0'));
   5686 }
   5687 
   5688 static int dentfill(char *path, struct entry **ppdents)
   5689 {
   5690 	uchar_t entflags = 0;
   5691 	int flags = 0;
   5692 	struct dirent *dp;
   5693 	char *namep, *pnb, *buf;
   5694 	struct entry *dentp;
   5695 	size_t off = 0, namebuflen = NAMEBUF_INCR;
   5696 	struct stat sb_path, sb;
   5697 	DIR *dirp = opendir(path);
   5698 
   5699 	ndents = 0;
   5700 	gtimesecs = time(NULL);
   5701 
   5702 	DPRINTF_S(__func__);
   5703 
   5704 	if (!dirp)
   5705 		return 0;
   5706 
   5707 	int fd = dirfd(dirp);
   5708 
   5709 	if (cfg.blkorder) {
   5710 		num_files = 0;
   5711 		dir_blocks = 0;
   5712 		buf = g_buf;
   5713 
   5714 		if (fstatat(fd, path, &sb_path, 0) == -1)
   5715 			goto exit;
   5716 
   5717 		if (!ihashbmp) {
   5718 			ihashbmp = calloc(1, HASH_OCTETS << 3);
   5719 			if (!ihashbmp)
   5720 				goto exit;
   5721 		} else
   5722 			memset(ihashbmp, 0, HASH_OCTETS << 3);
   5723 
   5724 		if (!prep_threads())
   5725 			goto exit;
   5726 
   5727 		attron(COLOR_PAIR(cfg.curctx + 1));
   5728 	}
   5729 
   5730 #if _POSIX_C_SOURCE >= 200112L
   5731 	posix_fadvise(fd, 0, 0, POSIX_FADV_SEQUENTIAL);
   5732 #endif
   5733 
   5734 	dp = readdir(dirp);
   5735 	if (!dp)
   5736 		goto exit;
   5737 
   5738 #if defined(__sun) || defined(__HAIKU__)
   5739 	flags = AT_SYMLINK_NOFOLLOW; /* no d_type */
   5740 #else
   5741 	if (cfg.blkorder || dp->d_type == DT_UNKNOWN) {
   5742 		/*
   5743 		 * Optimization added for filesystems which support dirent.d_type
   5744 		 * see readdir(3)
   5745 		 * Known drawbacks:
   5746 		 * - the symlink size is set to 0
   5747 		 * - the modification time of the symlink is set to that of the target file
   5748 		 */
   5749 		flags = AT_SYMLINK_NOFOLLOW;
   5750 	}
   5751 #endif
   5752 
   5753 	do {
   5754 		namep = dp->d_name;
   5755 
   5756 		if (selforparent(namep))
   5757 			continue;
   5758 
   5759 		if (!cfg.showhidden && namep[0] == '.') {
   5760 			if (!cfg.blkorder)
   5761 				continue;
   5762 
   5763 			if (fstatat(fd, namep, &sb, AT_SYMLINK_NOFOLLOW) == -1)
   5764 				continue;
   5765 
   5766 			if (S_ISDIR(sb.st_mode)) {
   5767 				if (sb_path.st_dev == sb.st_dev) { // NOLINT
   5768 					mkpath(path, namep, buf); // NOLINT
   5769 					dirwalk(buf, -1, FALSE);
   5770 
   5771 					if (g_state.interrupt)
   5772 						goto exit;
   5773 				}
   5774 			} else {
   5775 				/* Do not recount hard links */
   5776 				if (sb.st_nlink <= 1 || test_set_bit((uint_t)sb.st_ino))
   5777 					dir_blocks += (cfg.apparentsz ? sb.st_size : sb.st_blocks);
   5778 				++num_files;
   5779 			}
   5780 
   5781 			continue;
   5782 		}
   5783 
   5784 		if (fstatat(fd, namep, &sb, flags) == -1) {
   5785 			if (flags || (fstatat(fd, namep, &sb, AT_SYMLINK_NOFOLLOW) == -1)) {
   5786 				/* Missing file */
   5787 				DPRINTF_U(flags);
   5788 				if (!flags) {
   5789 					DPRINTF_S(namep);
   5790 					DPRINTF_S(strerror(errno));
   5791 				}
   5792 
   5793 				entflags = FILE_MISSING;
   5794 				memset(&sb, 0, sizeof(struct stat));
   5795 			} else /* Orphaned symlink */
   5796 				entflags = SYM_ORPHAN;
   5797 		}
   5798 
   5799 		if (ndents == total_dents) {
   5800 			if (cfg.blkorder)
   5801 				while (active_threads);
   5802 
   5803 			total_dents += ENTRY_INCR;
   5804 			*ppdents = xrealloc(*ppdents, total_dents * sizeof(**ppdents));
   5805 			if (!*ppdents) {
   5806 				free(pnamebuf);
   5807 				closedir(dirp);
   5808 				errexit();
   5809 			}
   5810 			DPRINTF_P(*ppdents);
   5811 		}
   5812 
   5813 		/* If not enough bytes left to copy a file name of length NAME_MAX, re-allocate */
   5814 		if (namebuflen - off < NAME_MAX + 1) {
   5815 			namebuflen += NAMEBUF_INCR;
   5816 
   5817 			pnb = pnamebuf;
   5818 			pnamebuf = (char *)xrealloc(pnamebuf, namebuflen);
   5819 			if (!pnamebuf) {
   5820 				free(*ppdents);
   5821 				closedir(dirp);
   5822 				errexit();
   5823 			}
   5824 			DPRINTF_P(pnamebuf);
   5825 
   5826 			/* realloc() may result in memory move, we must re-adjust if that happens */
   5827 			if (pnb != pnamebuf) {
   5828 				dentp = *ppdents;
   5829 				dentp->name = pnamebuf;
   5830 
   5831 				for (int count = 1; count < ndents; ++dentp, ++count)
   5832 					/* Current file name starts at last file name start + length */
   5833 					(dentp + 1)->name = (char *)((size_t)dentp->name + dentp->nlen);
   5834 			}
   5835 		}
   5836 
   5837 		dentp = *ppdents + ndents;
   5838 
   5839 		/* Selection file name */
   5840 		dentp->name = (char *)((size_t)pnamebuf + off);
   5841 		dentp->nlen = xstrsncpy(dentp->name, namep, NAME_MAX + 1);
   5842 		off += dentp->nlen;
   5843 
   5844 		/* Copy other fields */
   5845 		if (cfg.timetype == T_MOD) {
   5846 			dentp->sec = sb.st_mtime;
   5847 #ifdef __APPLE__
   5848 			dentp->nsec = (uint_t)sb.st_mtimespec.tv_nsec;
   5849 #else
   5850 			dentp->nsec = (uint_t)sb.st_mtim.tv_nsec;
   5851 #endif
   5852 		} else if (cfg.timetype == T_ACCESS) {
   5853 			dentp->sec = sb.st_atime;
   5854 #ifdef __APPLE__
   5855 			dentp->nsec = (uint_t)sb.st_atimespec.tv_nsec;
   5856 #else
   5857 			dentp->nsec = (uint_t)sb.st_atim.tv_nsec;
   5858 #endif
   5859 		} else {
   5860 			dentp->sec = sb.st_ctime;
   5861 #ifdef __APPLE__
   5862 			dentp->nsec = (uint_t)sb.st_ctimespec.tv_nsec;
   5863 #else
   5864 			dentp->nsec = (uint_t)sb.st_ctim.tv_nsec;
   5865 #endif
   5866 		}
   5867 
   5868 		if ((gtimesecs - sb.st_mtime <= 300) || (gtimesecs - sb.st_ctime <= 300))
   5869 			entflags |= FILE_YOUNG;
   5870 
   5871 #if !(defined(__sun) || defined(__HAIKU__))
   5872 		if (!flags && dp->d_type == DT_LNK) {
   5873 			 /* Do not add sizes for links */
   5874 			dentp->mode = (sb.st_mode & ~S_IFMT) | S_IFLNK;
   5875 			dentp->size = listpath ? sb.st_size : 0;
   5876 		} else {
   5877 			dentp->mode = sb.st_mode;
   5878 			dentp->size = sb.st_size;
   5879 		}
   5880 #else
   5881 		dentp->mode = sb.st_mode;
   5882 		dentp->size = sb.st_size;
   5883 #endif
   5884 
   5885 #ifndef NOUG
   5886 		dentp->uid = sb.st_uid;
   5887 		dentp->gid = sb.st_gid;
   5888 #endif
   5889 
   5890 		dentp->flags = S_ISDIR(sb.st_mode) ? 0 : ((sb.st_nlink > 1) ? HARD_LINK : 0);
   5891 		if (entflags) {
   5892 			dentp->flags |= entflags;
   5893 			entflags = 0;
   5894 		}
   5895 
   5896 		if (cfg.blkorder) {
   5897 			if (S_ISDIR(sb.st_mode)) {
   5898 				mkpath(path, namep, buf); // NOLINT
   5899 
   5900 				/* Need to show the disk usage of this dir */
   5901 				dirwalk(buf, ndents, (sb_path.st_dev != sb.st_dev)); // NOLINT
   5902 
   5903 				if (g_state.interrupt)
   5904 					goto exit;
   5905 			} else {
   5906 				dentp->blocks = (cfg.apparentsz ? sb.st_size : sb.st_blocks);
   5907 				/* Do not recount hard links */
   5908 				if (sb.st_nlink <= 1 || test_set_bit((uint_t)sb.st_ino))
   5909 					dir_blocks += dentp->blocks;
   5910 				++num_files;
   5911 			}
   5912 		}
   5913 
   5914 		if (flags) {
   5915 			/* Flag if this is a dir or symlink to a dir */
   5916 			if (S_ISLNK(sb.st_mode)) {
   5917 				sb.st_mode = 0;
   5918 				fstatat(fd, namep, &sb, 0);
   5919 			}
   5920 
   5921 			if (S_ISDIR(sb.st_mode))
   5922 				dentp->flags |= DIR_OR_DIRLNK;
   5923 #if !(defined(__sun) || defined(__HAIKU__)) /* no d_type */
   5924 		} else if (dp->d_type == DT_DIR || ((dp->d_type == DT_LNK
   5925 			   || dp->d_type == DT_UNKNOWN) && S_ISDIR(sb.st_mode))) {
   5926 			dentp->flags |= DIR_OR_DIRLNK;
   5927 #endif
   5928 		}
   5929 
   5930 		++ndents;
   5931 	} while ((dp = readdir(dirp)));
   5932 
   5933 exit:
   5934 	if (g_state.duinit && cfg.blkorder) {
   5935 		while (active_threads);
   5936 
   5937 		attroff(COLOR_PAIR(cfg.curctx + 1));
   5938 		for (int i = 0; i < NUM_DU_THREADS; ++i) {
   5939 			num_files += core_files[i];
   5940 			dir_blocks += core_blocks[i];
   5941 		}
   5942 	}
   5943 
   5944 	/* Should never be null */
   5945 	if (closedir(dirp) == -1)
   5946 		errexit();
   5947 
   5948 	return ndents;
   5949 }
   5950 
   5951 static void populate(char *path, char *lastname)
   5952 {
   5953 #ifdef DEBUG
   5954 	struct timespec ts1, ts2;
   5955 
   5956 	clock_gettime(CLOCK_REALTIME, &ts1); /* Use CLOCK_MONOTONIC on FreeBSD */
   5957 #endif
   5958 
   5959 	ndents = dentfill(path, &pdents);
   5960 	if (!ndents)
   5961 		return;
   5962 
   5963 #ifndef NOSORT
   5964 	ENTSORT(pdents, ndents, entrycmpfn);
   5965 #endif
   5966 
   5967 #ifdef DEBUG
   5968 	clock_gettime(CLOCK_REALTIME, &ts2);
   5969 	DPRINTF_U(ts2.tv_nsec - ts1.tv_nsec);
   5970 #endif
   5971 
   5972 	/* Find cur from history */
   5973 	/* No NULL check for lastname, always points to an array */
   5974 	move_cursor(*lastname ? dentfind(lastname, ndents) : 0, 0);
   5975 
   5976 	// Force full redraw
   5977 	last_curscroll = -1;
   5978 }
   5979 
   5980 #ifndef NOFIFO
   5981 static void notify_fifo(bool force)
   5982 {
   5983 	if (!fifopath)
   5984 		return;
   5985 
   5986 	if (fifofd == -1) {
   5987 		fifofd = open(fifopath, O_WRONLY|O_NONBLOCK|O_CLOEXEC);
   5988 		if (fifofd == -1) {
   5989 			if (errno != ENXIO)
   5990 				/* Unexpected error, the FIFO file might have been removed */
   5991 				/* We give up FIFO notification */
   5992 				fifopath = NULL;
   5993 			return;
   5994 		}
   5995 	}
   5996 
   5997 	static struct entry lastentry;
   5998 
   5999 	if (!force && !memcmp(&lastentry, &pdents[cur], sizeof(struct entry))) // NOLINT
   6000 		return;
   6001 
   6002 	lastentry = pdents[cur];
   6003 
   6004 	char path[PATH_MAX];
   6005 	size_t len = mkpath(g_ctx[cfg.curctx].c_path, ndents ? pdents[cur].name : "", path);
   6006 
   6007 	path[len - 1] = '\n';
   6008 
   6009 	ssize_t ret = write(fifofd, path, len);
   6010 
   6011 	if (ret != (ssize_t)len && !(ret == -1 && (errno == EAGAIN || errno == EPIPE))) {
   6012 		DPRINTF_S(strerror(errno));
   6013 	}
   6014 }
   6015 
   6016 static void send_to_explorer(int *presel)
   6017 {
   6018 	if (nselected) {
   6019 		int fd = open(fifopath, O_WRONLY|O_NONBLOCK|O_CLOEXEC, 0600);
   6020 		if ((fd == -1) || (seltofile(fd, NULL) != (size_t)(selbufpos)))
   6021 			printwarn(presel);
   6022 		else {
   6023 			resetselind();
   6024 			clearselection();
   6025 		}
   6026 		if (fd > 1)
   6027 			close(fd);
   6028 	} else
   6029 		notify_fifo(TRUE); /* Send opened path to NNN_FIFO */
   6030 }
   6031 #endif
   6032 
   6033 static void move_cursor(int target, int ignore_scrolloff)
   6034 {
   6035 	int onscreen = xlines - 4; /* Leave top 2 and bottom 2 lines */
   6036 
   6037 	target = MAX(0, MIN(ndents - 1, target));
   6038 	last_curscroll = curscroll;
   6039 	last = cur;
   6040 	cur = target;
   6041 
   6042 	if (!ignore_scrolloff) {
   6043 		int delta = target - last;
   6044 		int scrolloff = MIN(SCROLLOFF, onscreen >> 1);
   6045 
   6046 		/*
   6047 		 * When ignore_scrolloff is 1, the cursor can jump into the scrolloff
   6048 		 * margin area, but when ignore_scrolloff is 0, act like a boa
   6049 		 * constrictor and squeeze the cursor towards the middle region of the
   6050 		 * screen by allowing it to move inward and disallowing it to move
   6051 		 * outward (deeper into the scrolloff margin area).
   6052 		 */
   6053 		if (((cur < (curscroll + scrolloff)) && delta < 0)
   6054 		    || ((cur > (curscroll + onscreen - scrolloff - 1)) && delta > 0))
   6055 			curscroll += delta;
   6056 	}
   6057 	curscroll = MIN(curscroll, MIN(cur, ndents - onscreen));
   6058 	curscroll = MAX(curscroll, MAX(cur - (onscreen - 1), 0));
   6059 
   6060 #ifndef NOFIFO
   6061 	if (!g_state.fifomode)
   6062 		notify_fifo(FALSE); /* Send hovered path to NNN_FIFO */
   6063 #endif
   6064 }
   6065 
   6066 static void handle_screen_move(enum action sel)
   6067 {
   6068 	int onscreen;
   6069 
   6070 	switch (sel) {
   6071 	case SEL_NEXT:
   6072 		if (cfg.rollover || (cur != ndents - 1))
   6073 			move_cursor((cur + 1) % ndents, 0);
   6074 		break;
   6075 	case SEL_PREV:
   6076 		if (cfg.rollover || cur)
   6077 			move_cursor((cur + ndents - 1) % ndents, 0);
   6078 		break;
   6079 	case SEL_PGDN:
   6080 		onscreen = xlines - 4;
   6081 		move_cursor(curscroll + (onscreen - 1), 1);
   6082 		curscroll += onscreen - 1;
   6083 		break;
   6084 	case SEL_CTRL_D:
   6085 		onscreen = xlines - 4;
   6086 		move_cursor(curscroll + (onscreen - 1), 1);
   6087 		curscroll += onscreen >> 1;
   6088 		break;
   6089 	case SEL_PGUP:
   6090 		onscreen = xlines - 4;
   6091 		move_cursor(curscroll, 1);
   6092 		curscroll -= onscreen - 1;
   6093 		break;
   6094 	case SEL_CTRL_U:
   6095 		onscreen = xlines - 4;
   6096 		move_cursor(curscroll, 1);
   6097 		curscroll -= onscreen >> 1;
   6098 		break;
   6099 	case SEL_JUMP:
   6100 	{
   6101 		char *input = xreadline(NULL, "jump (+n/-n/n): ");
   6102 
   6103 		if (!input || !*input)
   6104 			break;
   6105 		if (input[0] == '-') {
   6106 			cur -= atoi(input + 1);
   6107 			if (cur < 0)
   6108 				cur = 0;
   6109 		} else if (input[0] == '+') {
   6110 			cur += atoi(input + 1);
   6111 			if (cur >= ndents)
   6112 				cur = ndents - 1;
   6113 		} else {
   6114 			int index = atoi(input);
   6115 
   6116 			if ((index < 1) || (index > ndents))
   6117 				break;
   6118 			cur = index - 1;
   6119 		}
   6120 		onscreen = xlines - 4;
   6121 		move_cursor(cur, 1);
   6122 		curscroll -= onscreen >> 1;
   6123 		break;
   6124 	}
   6125 	case SEL_HOME:
   6126 		move_cursor(0, 1);
   6127 		break;
   6128 	case SEL_END:
   6129 		move_cursor(ndents - 1, 1);
   6130 		break;
   6131 	case SEL_YOUNG:
   6132 	{
   6133 		for (int r = cur;;) {
   6134 			if (++r >= ndents)
   6135 				r = 0;
   6136 			if (r == cur)
   6137 				break;
   6138 			if (pdents[r].flags & FILE_YOUNG) {
   6139 				move_cursor(r, 0);
   6140 				break;
   6141 			}
   6142 		}
   6143 		break;
   6144 	}
   6145 	default: /* case SEL_FIRST */
   6146 	{
   6147 		int c = get_input(messages[MSG_FIRST]);
   6148 
   6149 		if (!c)
   6150 			break;
   6151 
   6152 		c = TOUPPER(c);
   6153 
   6154 		int r = (c == TOUPPER(*pdents[cur].name)) ? (cur + 1) : 0;
   6155 
   6156 		for (; r < ndents; ++r) {
   6157 			if (((c == '\'') && !(pdents[r].flags & DIR_OR_DIRLNK))
   6158 			    || (c == TOUPPER(*pdents[r].name))) {
   6159 				move_cursor((r) % ndents, 0);
   6160 				break;
   6161 			}
   6162 		}
   6163 		break;
   6164 	}
   6165 	}
   6166 }
   6167 
   6168 static void handle_openwith(const char *path, const char *name, char *newpath, char *tmp)
   6169 {
   6170 	/* Confirm if app is CLI or GUI */
   6171 	int r = get_input(messages[MSG_CLI_MODE]);
   6172 
   6173 	r = (r == 'c' ? F_CLI :
   6174 	     ((r == 'g' || r == '\r') ? (F_NOWAIT | F_NOTRACE | F_MULTI) : 0));
   6175 	if (r) {
   6176 		mkpath(path, name, newpath);
   6177 		spawn(tmp, newpath, NULL, NULL, r);
   6178 	}
   6179 }
   6180 
   6181 static void copynextname(char *lastname)
   6182 {
   6183 	if (cur) {
   6184 		cur += (cur != (ndents - 1)) ? 1 : -1;
   6185 		copycurname();
   6186 	} else
   6187 		lastname[0] = '\0';
   6188 }
   6189 
   6190 static int handle_context_switch(enum action sel)
   6191 {
   6192 	int r = -1;
   6193 
   6194 	switch (sel) {
   6195 	case SEL_CYCLE: // fallthrough
   6196 	case SEL_CYCLER:
   6197 		/* visit next and previous contexts */
   6198 		r = cfg.curctx;
   6199 		if (sel == SEL_CYCLE)
   6200 			do
   6201 				r = (r + 1) & ~CTX_MAX;
   6202 			while (!g_ctx[r].c_cfg.ctxactive);
   6203 		else {
   6204 			do /* Attempt to create a new context */
   6205 				r = (r + 1) & ~CTX_MAX;
   6206 			while (g_ctx[r].c_cfg.ctxactive && (r != cfg.curctx));
   6207 
   6208 			if (r == cfg.curctx) /* If all contexts are active, reverse cycle */
   6209 				do
   6210 					r = (r + (CTX_MAX - 1)) & (CTX_MAX - 1);
   6211 				while (!g_ctx[r].c_cfg.ctxactive);
   6212 		} // fallthrough
   6213 	default: /* SEL_CTXN */
   6214 		if (sel >= SEL_CTX1) /* CYCLE keys are lesser in value */
   6215 			r = sel - SEL_CTX1; /* Save the next context id */
   6216 
   6217 		if (cfg.curctx == r) {
   6218 			if (sel == SEL_CYCLE)
   6219 				(r == CTX_MAX - 1) ? (r = 0) : ++r;
   6220 			else if (sel == SEL_CYCLER)
   6221 				(r == 0) ? (r = CTX_MAX - 1) : --r;
   6222 			else
   6223 				return -1;
   6224 		}
   6225 	}
   6226 
   6227 	return r;
   6228 }
   6229 
   6230 static int set_sort_flags(int r)
   6231 {
   6232 	bool session = (r == '\0');
   6233 	bool reverse = FALSE;
   6234 
   6235 	if (ISUPPER_(r) && (r != 'R') && (r != 'C')) {
   6236 		reverse = TRUE;
   6237 		r = TOLOWER(r);
   6238 	}
   6239 
   6240 	/* Set the correct input in case of a session load */
   6241 	if (session) {
   6242 		if (cfg.apparentsz) {
   6243 			cfg.apparentsz = 0;
   6244 			r = 'a';
   6245 		} else if (cfg.blkorder) {
   6246 			cfg.blkorder = 0;
   6247 			r = 'd';
   6248 		}
   6249 
   6250 		if (cfg.version)
   6251 			namecmpfn = &xstrverscasecmp;
   6252 
   6253 		if (cfg.reverse)
   6254 			entrycmpfn = &reventrycmp;
   6255 	} else if (r == CONTROL('T')) {
   6256 		/* Cycling order: clear -> size -> time -> clear */
   6257 		if (cfg.timeorder)
   6258 			r = 's';
   6259 		else if (cfg.sizeorder)
   6260 			r = 'c';
   6261 		else
   6262 			r = 't';
   6263 	}
   6264 
   6265 	switch (r) {
   6266 	case 'a': /* Apparent du */
   6267 		cfg.apparentsz ^= 1;
   6268 		if (cfg.apparentsz) {
   6269 			cfg.blkorder = 1;
   6270 			blk_shift = 0;
   6271 		} else
   6272 			cfg.blkorder = 0;
   6273 		// fallthrough
   6274 	case 'd': /* Disk usage */
   6275 		if (r == 'd') {
   6276 			if (!cfg.apparentsz)
   6277 				cfg.blkorder ^= 1;
   6278 			cfg.apparentsz = 0;
   6279 			blk_shift = ffs(S_BLKSIZE) - 1;
   6280 		}
   6281 
   6282 		if (cfg.blkorder)
   6283 			cfg.showdetail = 1;
   6284 		cfg.timeorder = 0;
   6285 		cfg.sizeorder = 0;
   6286 		cfg.extnorder = 0;
   6287 		if (!session) {
   6288 			cfg.reverse = 0;
   6289 			entrycmpfn = &entrycmp;
   6290 		}
   6291 		endselection(TRUE); /* We are going to reload dir */
   6292 		break;
   6293 	case 'c':
   6294 		cfg.timeorder = 0;
   6295 		cfg.sizeorder = 0;
   6296 		cfg.apparentsz = 0;
   6297 		cfg.blkorder = 0;
   6298 		cfg.extnorder = 0;
   6299 		cfg.reverse = 0;
   6300 		cfg.version = 0;
   6301 		entrycmpfn = &entrycmp;
   6302 		namecmpfn = &xstricmp;
   6303 		break;
   6304 	case 'e': /* File extension */
   6305 		cfg.extnorder ^= 1;
   6306 		cfg.sizeorder = 0;
   6307 		cfg.timeorder = 0;
   6308 		cfg.apparentsz = 0;
   6309 		cfg.blkorder = 0;
   6310 		cfg.reverse = 0;
   6311 		entrycmpfn = &entrycmp;
   6312 		break;
   6313 	case 'r': /* Reverse sort */
   6314 		cfg.reverse ^= 1;
   6315 		entrycmpfn = cfg.reverse ? &reventrycmp : &entrycmp;
   6316 		break;
   6317 	case 's': /* File size */
   6318 		cfg.sizeorder ^= 1;
   6319 		cfg.timeorder = 0;
   6320 		cfg.apparentsz = 0;
   6321 		cfg.blkorder = 0;
   6322 		cfg.extnorder = 0;
   6323 		cfg.reverse = 0;
   6324 		entrycmpfn = &entrycmp;
   6325 		break;
   6326 	case 't': /* Time */
   6327 		cfg.timeorder ^= 1;
   6328 		cfg.sizeorder = 0;
   6329 		cfg.apparentsz = 0;
   6330 		cfg.blkorder = 0;
   6331 		cfg.extnorder = 0;
   6332 		cfg.reverse = 0;
   6333 		entrycmpfn = &entrycmp;
   6334 		break;
   6335 	case 'v': /* Version */
   6336 		cfg.version ^= 1;
   6337 		namecmpfn = cfg.version ? &xstrverscasecmp : &xstricmp;
   6338 		cfg.timeorder = 0;
   6339 		cfg.sizeorder = 0;
   6340 		cfg.apparentsz = 0;
   6341 		cfg.blkorder = 0;
   6342 		cfg.extnorder = 0;
   6343 		break;
   6344 	default:
   6345 		return 0;
   6346 	}
   6347 
   6348 	if (reverse) {
   6349 		cfg.reverse = 1;
   6350 		entrycmpfn = &reventrycmp;
   6351 	}
   6352 
   6353 	cfgsort[cfg.curctx] = (uchar_t)r;
   6354 
   6355 	return r;
   6356 }
   6357 
   6358 static bool set_time_type(int *presel)
   6359 {
   6360 	bool ret = FALSE;
   6361 	char buf[] = "'a'ccess / 'c'hange / 'm'od [ ]";
   6362 
   6363 	buf[sizeof(buf) - 3] = cfg.timetype == T_MOD ? 'm' : (cfg.timetype == T_ACCESS ? 'a' : 'c');
   6364 
   6365 	int r = get_input(buf);
   6366 
   6367 	if (r == 'a' || r == 'c' || r == 'm') {
   6368 		r = (r == 'm') ? T_MOD : ((r == 'a') ? T_ACCESS : T_CHANGE);
   6369 		if (cfg.timetype != r) {
   6370 			cfg.timetype = r;
   6371 
   6372 			if (cfg.filtermode || g_ctx[cfg.curctx].c_fltr[1])
   6373 				*presel = FILTER;
   6374 
   6375 			ret = TRUE;
   6376 		} else
   6377 			r = MSG_NOCHANGE;
   6378 	} else
   6379 		r = MSG_INVALID_KEY;
   6380 
   6381 	if (!ret)
   6382 		printwait(messages[r], presel);
   6383 
   6384 	return ret;
   6385 }
   6386 
   6387 static void statusbar(char *path)
   6388 {
   6389 	int i = 0, len = 0;
   6390 	char *ptr;
   6391 	pEntry pent = &pdents[cur];
   6392 
   6393 	if (!ndents) {
   6394 		printmsg("0/0");
   6395 		return;
   6396 	}
   6397 
   6398 	/* Get the file extension for regular files */
   6399 	if (S_ISREG(pent->mode)) {
   6400 		i = (int)(pent->nlen - 1);
   6401 		ptr = xextension(pent->name, i);
   6402 		if (ptr)
   6403 			len = i - (ptr - pent->name);
   6404 		if (!ptr || len > 5 || len < 2)
   6405 			ptr = "\b";
   6406 	} else
   6407 		ptr = "\b";
   6408 
   6409 	attron(COLOR_PAIR(cfg.curctx + 1));
   6410 
   6411 	if (cfg.fileinfo && get_output("file", "-b", pdents[cur].name, -1, FALSE))
   6412 		mvaddstr(xlines - 2, 2, g_buf);
   6413 
   6414 	tolastln();
   6415 
   6416 	printw("%d/%s ", cur + 1, xitoa(ndents));
   6417 
   6418 	if (g_state.selmode || nselected) {
   6419 		attron(A_REVERSE);
   6420 		addch(' ');
   6421 		if (g_state.rangesel)
   6422 			addch('*');
   6423 		else if (g_state.selmode)
   6424 			addch('+');
   6425 		if (nselected)
   6426 			addstr(xitoa(nselected));
   6427 		addch(' ');
   6428 		attroff(A_REVERSE);
   6429 		addch(' ');
   6430 	}
   6431 
   6432 	if (cfg.blkorder) { /* du mode */
   6433 		char buf[24];
   6434 
   6435 		xstrsncpy(buf, coolsize(dir_blocks << blk_shift), 12);
   6436 
   6437 		printw("%cu:%s avail:%s files:%llu %lluB %s\n",
   6438 		       (cfg.apparentsz ? 'a' : 'd'), buf, coolsize(get_fs_info(path, VFS_AVAIL)),
   6439 		       num_files, (ullong_t)pent->blocks << blk_shift, ptr);
   6440 	} else { /* light or detail mode */
   6441 		char sort[] = "\0\0\0\0\0";
   6442 
   6443 		if (getorderstr(sort))
   6444 			addstr(sort);
   6445 
   6446 		/* Timestamp */
   6447 		print_time(&pent->sec, pent->flags);
   6448 
   6449 		addch(' ');
   6450 		addstr(get_lsperms(pent->mode));
   6451 		addch(' ');
   6452 #ifndef NOUG
   6453 		if (g_state.uidgid) {
   6454 			addstr(getpwname(pent->uid));
   6455 			addch(':');
   6456 			addstr(getgrname(pent->gid));
   6457 			addch(' ');
   6458 		}
   6459 #endif
   6460 		if (S_ISLNK(pent->mode)) {
   6461 			if (!cfg.fileinfo) {
   6462 				i = readlink(pent->name, g_buf, PATH_MAX);
   6463 				addstr(coolsize(i >= 0 ? i : pent->size)); /* Show symlink size */
   6464 				if (i > 1) { /* Show symlink target */
   6465 					int y;
   6466 
   6467 					addstr(" ->");
   6468 					getyx(stdscr, len, y);
   6469 					i = MIN(i, xcols - y);
   6470 					g_buf[i] = '\0';
   6471 					addstr(g_buf);
   6472 				}
   6473 			}
   6474 		} else {
   6475 			addstr(coolsize(pent->size));
   6476 			addch(' ');
   6477 			addstr(ptr);
   6478 			if (pent->flags & HARD_LINK) {
   6479 				struct stat sb;
   6480 
   6481 				if (stat(pent->name, &sb) != -1) {
   6482 					addch(' ');
   6483 					addstr(xitoa((int)sb.st_nlink)); /* Show number of links */
   6484 					addch('-');
   6485 					addstr(xitoa((int)sb.st_ino)); /* Show inode number */
   6486 				}
   6487 			}
   6488 		}
   6489 		clrtoeol();
   6490 	}
   6491 
   6492 	attroff(COLOR_PAIR(cfg.curctx + 1));
   6493 	/* Place HW cursor on current for Braille systems */
   6494 	tocursor();
   6495 }
   6496 
   6497 static inline void markhovered(void)
   6498 {
   6499 	if (cfg.showdetail && ndents) { /* Bold forward arrowhead */
   6500 		tocursor();
   6501 		addch('>' | A_BOLD);
   6502 	}
   6503 }
   6504 
   6505 static int adjust_cols(int n)
   6506 {
   6507 	/* Calculate the number of cols available to print entry name */
   6508 #ifdef ICONS_ENABLED
   6509 	n -= (g_state.oldcolor ? 0 : ICON_SIZE + ICON_PADDING_LEFT_LEN + ICON_PADDING_RIGHT_LEN);
   6510 #endif
   6511 	if (cfg.showdetail) {
   6512 		/* Fallback to light mode if less than 35 columns */
   6513 		if (n < 36)
   6514 			cfg.showdetail ^= 1;
   6515 		else /* 2 more accounted for below */
   6516 			n -= 32;
   6517 	}
   6518 
   6519 	/* 2 columns for preceding space and indicator */
   6520 	return (n - 2);
   6521 }
   6522 
   6523 static void draw_line(int ncols)
   6524 {
   6525 	bool dir = FALSE;
   6526 
   6527 	ncols = adjust_cols(ncols);
   6528 
   6529 	if (g_state.oldcolor && (pdents[last].flags & DIR_OR_DIRLNK)) {
   6530 		attron(COLOR_PAIR(cfg.curctx + 1) | A_BOLD);
   6531 		dir = TRUE;
   6532 	}
   6533 
   6534 	move(2 + last - curscroll, 0);
   6535 	macos_icons_hack();
   6536 	printent(&pdents[last], ncols, FALSE);
   6537 
   6538 	if (g_state.oldcolor && (pdents[cur].flags & DIR_OR_DIRLNK)) {
   6539 		if (!dir)  {/* First file is not a directory */
   6540 			attron(COLOR_PAIR(cfg.curctx + 1) | A_BOLD);
   6541 			dir = TRUE;
   6542 		}
   6543 	} else if (dir) { /* Second file is not a directory */
   6544 		attroff(COLOR_PAIR(cfg.curctx + 1) | A_BOLD);
   6545 		dir = FALSE;
   6546 	}
   6547 
   6548 	move(2 + cur - curscroll, 0);
   6549 	macos_icons_hack();
   6550 	printent(&pdents[cur], ncols, TRUE);
   6551 
   6552 	/* Must reset e.g. no files in dir */
   6553 	if (dir)
   6554 		attroff(COLOR_PAIR(cfg.curctx + 1) | A_BOLD);
   6555 
   6556 	markhovered();
   6557 }
   6558 
   6559 static void redraw(char *path)
   6560 {
   6561 	getmaxyx(stdscr, xlines, xcols);
   6562 
   6563 	int ncols = (xcols <= PATH_MAX) ? xcols : PATH_MAX;
   6564 	int onscreen = xlines - 4;
   6565 	int i, j = 1;
   6566 
   6567 	// Fast redraw
   6568 	if (g_state.move) {
   6569 		g_state.move = 0;
   6570 
   6571 		if (ndents && (last_curscroll == curscroll))
   6572 			return draw_line(ncols);
   6573 	}
   6574 
   6575 	DPRINTF_S(__func__);
   6576 
   6577 	/* Clear screen */
   6578 	erase();
   6579 
   6580 	/* Enforce scroll/cursor invariants */
   6581 	move_cursor(cur, 1);
   6582 
   6583 	/* Fail redraw if < than 10 columns, context info prints 10 chars */
   6584 	if (ncols <= MIN_DISPLAY_COL) {
   6585 		printmsg(messages[MSG_FEW_COLUMNS]);
   6586 		return;
   6587 	}
   6588 
   6589 	//DPRINTF_D(cur);
   6590 	DPRINTF_S(path);
   6591 
   6592 	for (i = 0; i < CTX_MAX; ++i) { /* 8 chars printed for contexts - "1 2 3 4 " */
   6593 		if (!g_ctx[i].c_cfg.ctxactive)
   6594 			addch(i + '1');
   6595 		else
   6596 			addch((i + '1') | (COLOR_PAIR(i + 1) | A_BOLD
   6597 				/* active: underline, current: reverse */
   6598 				| ((cfg.curctx != i) ? A_UNDERLINE : A_REVERSE)));
   6599 
   6600 		addch(' ');
   6601 	}
   6602 
   6603 	attron(A_UNDERLINE | COLOR_PAIR(cfg.curctx + 1));
   6604 
   6605 	/* Print path */
   6606 	bool in_home = set_tilde_in_path(path);
   6607 	char *ptr = in_home ? &path[homelen - 1] : path;
   6608 
   6609 	i = (int)xstrlen(ptr);
   6610 	if ((i + MIN_DISPLAY_COL) <= ncols)
   6611 		addnstr(ptr, ncols - MIN_DISPLAY_COL);
   6612 	else {
   6613 		char *base = xmemrchr((uchar_t *)ptr, '/', i);
   6614 
   6615 		if (in_home) {
   6616 			addch(*ptr);
   6617 			++ptr;
   6618 			i = 1;
   6619 		} else
   6620 			i = 0;
   6621 
   6622 		if (ptr && (base != ptr)) {
   6623 			while (ptr < base) {
   6624 				if (*ptr == '/') {
   6625 					i += 2; /* 2 characters added */
   6626 					if (ncols < i + MIN_DISPLAY_COL) {
   6627 						base = NULL; /* Can't print more characters */
   6628 						break;
   6629 					}
   6630 
   6631 					addch(*ptr);
   6632 					addch(*(++ptr));
   6633 				}
   6634 				++ptr;
   6635 			}
   6636 		}
   6637 
   6638 		if (base)
   6639 			addnstr(base, ncols - (MIN_DISPLAY_COL + i));
   6640 	}
   6641 
   6642 	if (in_home)
   6643 		reset_tilde_in_path(path);
   6644 
   6645 	attroff(A_UNDERLINE | COLOR_PAIR(cfg.curctx + 1));
   6646 
   6647 	/* Go to first entry */
   6648 	if (curscroll > 0) {
   6649 		move(1, 0);
   6650 #ifdef ICONS_ENABLED
   6651 		addstr(ICON_ARROW_UP);
   6652 #else
   6653 		addch('^');
   6654 #endif
   6655 	}
   6656 
   6657 	if (g_state.oldcolor) {
   6658 		attron(COLOR_PAIR(cfg.curctx + 1) | A_BOLD);
   6659 		g_state.dircolor = 1;
   6660 	}
   6661 
   6662 	onscreen = MIN(onscreen + curscroll, ndents);
   6663 
   6664 	ncols = adjust_cols(ncols);
   6665 
   6666 	int len = scanselforpath(path, FALSE);
   6667 
   6668 	/* Print listing */
   6669 	for (i = curscroll; i < onscreen; ++i) {
   6670 		move(++j, 0);
   6671 
   6672 		if (len)
   6673 			findmarkentry(len, &pdents[i]);
   6674 
   6675 		printent(&pdents[i], ncols, i == cur);
   6676 	}
   6677 
   6678 	/* Must reset e.g. no files in dir */
   6679 	if (g_state.dircolor) {
   6680 		attroff(COLOR_PAIR(cfg.curctx + 1) | A_BOLD);
   6681 		g_state.dircolor = 0;
   6682 	}
   6683 
   6684 	/* Go to last entry */
   6685 	if (onscreen < ndents) {
   6686 		move(xlines - 2, 0);
   6687 #ifdef ICONS_ENABLED
   6688 		addstr(ICON_ARROW_DOWN);
   6689 #else
   6690 		addch('v');
   6691 #endif
   6692 	}
   6693 
   6694 	markhovered();
   6695 }
   6696 
   6697 static bool cdprep(char *lastdir, char *lastname, char *path, char *newpath)
   6698 {
   6699 	if (lastname)
   6700 		lastname[0] =  '\0';
   6701 
   6702 	/* Save last working directory */
   6703 	xstrsncpy(lastdir, path, PATH_MAX);
   6704 
   6705 	/* Save the newly opted dir in path */
   6706 	xstrsncpy(path, newpath, PATH_MAX);
   6707 	DPRINTF_S(path);
   6708 
   6709 	clearfilter();
   6710 	return cfg.filtermode;
   6711 }
   6712 
   6713 static void showselsize(const char *path)
   6714 {
   6715 	off_t sz = 0;
   6716 	int len = scanselforpath(path, FALSE);
   6717 
   6718 	for (int r = 0, selcount = nselected; (r < ndents) && selcount; ++r)
   6719 		if (findinsel(findselpos, len + xstrsncpy(g_sel + len, pdents[r].name, pdents[r].nlen))) {
   6720 			sz += cfg.blkorder ? pdents[r].blocks : pdents[r].size;
   6721 			--selcount;
   6722 		}
   6723 
   6724 	printmsg(coolsize(cfg.blkorder ? sz << blk_shift : sz));
   6725 }
   6726 
   6727 static bool browse(char *ipath, const char *session, int pkey)
   6728 {
   6729 	alignas(max_align_t) char newpath[PATH_MAX];
   6730 	alignas(max_align_t) char runfile[NAME_MAX + 1];
   6731 	char *path, *lastdir, *lastname, *dir, *tmp;
   6732 	pEntry pent;
   6733 	enum action sel;
   6734 	struct stat sb;
   6735 	int r = -1, presel, selstartid = 0, selendid = 0;
   6736 	const uchar_t opener_flags = (cfg.cliopener ? F_CLI : (F_NOTRACE | F_NOSTDIN | F_NOWAIT));
   6737 	bool watch = FALSE, cd = TRUE;
   6738 	ino_t inode = 0;
   6739 
   6740 #ifndef NOMOUSE
   6741 	MEVENT event = {0};
   6742 	struct timespec mousetimings[2] = {{.tv_sec = 0, .tv_nsec = 0}, {.tv_sec = 0, .tv_nsec = 0}};
   6743 	int mousedent[2] = {-1, -1};
   6744 	bool currentmouse = 1, rightclicksel = 0;
   6745 #endif
   6746 
   6747 	atexit(dentfree);
   6748 
   6749 	getmaxyx(stdscr, xlines, xcols);
   6750 
   6751 #ifndef NOSSN
   6752 	/* set-up first context */
   6753 	if (!session || !load_session(session, &path, &lastdir, &lastname, FALSE)) {
   6754 #else
   6755 		(void)session;
   6756 #endif
   6757 		g_ctx[0].c_last[0] = '\0';
   6758 		lastdir = g_ctx[0].c_last; /* last visited directory */
   6759 
   6760 		if (g_state.initfile) {
   6761 			xstrsncpy(g_ctx[0].c_name, xbasename(ipath), sizeof(g_ctx[0].c_name));
   6762 			xdirname(ipath);
   6763 		} else
   6764 			g_ctx[0].c_name[0] = '\0';
   6765 
   6766 		lastname = g_ctx[0].c_name; /* last visited file name */
   6767 
   6768 		xstrsncpy(g_ctx[0].c_path, ipath, PATH_MAX);
   6769 		/* If the initial path is a file, retain a way to return to start dir */
   6770 		if (g_state.initfile) {
   6771 			free(initpath);
   6772 			initpath = ipath = getcwd(NULL, 0);
   6773 		}
   6774 		path = g_ctx[0].c_path; /* current directory */
   6775 
   6776 		g_ctx[0].c_fltr[0] = g_ctx[0].c_fltr[1] = '\0';
   6777 		g_ctx[0].c_cfg = cfg; /* current configuration */
   6778 #ifndef NOSSN
   6779 	}
   6780 #endif
   6781 
   6782 	newpath[0] = runfile[0] = '\0';
   6783 
   6784 	presel = pkey ? ((pkey == CREATE_NEW_KEY) ? 'n' : ';') : ((cfg.filtermode
   6785 			|| (session && (g_ctx[cfg.curctx].c_fltr[0] == FILTER
   6786 				|| g_ctx[cfg.curctx].c_fltr[0] == RFILTER)
   6787 				&& g_ctx[cfg.curctx].c_fltr[1])) ? FILTER : 0);
   6788 
   6789 	pdents = xrealloc(pdents, total_dents * sizeof(struct entry));
   6790 	if (!pdents)
   6791 		errexit();
   6792 
   6793 	/* Allocate buffer to hold names */
   6794 	pnamebuf = (char *)xrealloc(pnamebuf, NAMEBUF_INCR);
   6795 	if (!pnamebuf)
   6796 		errexit();
   6797 
   6798 	/* The following call is added to handle a broken window at start */
   6799 	if (presel == FILTER)
   6800 		handle_key_resize();
   6801 
   6802 begin:
   6803 	/*
   6804 	 * Can fail when permissions change while browsing.
   6805 	 * It's assumed that path IS a directory when we are here.
   6806 	 */
   6807 	if (chdir(path) == -1) {
   6808 		DPRINTF_S("directory inaccessible");
   6809 		valid_parent(path, lastname);
   6810 		setdirwatch();
   6811 	}
   6812 
   6813 #ifndef NOX11
   6814 	xterm_cfg(path);
   6815 #endif
   6816 
   6817 #ifdef LINUX_INOTIFY
   6818 	if ((presel == FILTER || watch) && inotify_wd >= 0) {
   6819 		inotify_rm_watch(inotify_fd, inotify_wd);
   6820 		inotify_wd = -1;
   6821 		watch = FALSE;
   6822 	}
   6823 #elif defined(BSD_KQUEUE)
   6824 	if ((presel == FILTER || watch) && event_fd >= 0) {
   6825 		close(event_fd);
   6826 		event_fd = -1;
   6827 		watch = FALSE;
   6828 	}
   6829 #elif defined(HAIKU_NM)
   6830 	if ((presel == FILTER || watch) && haiku_hnd != NULL) {
   6831 		haiku_stop_watch(haiku_hnd);
   6832 		haiku_nm_active = FALSE;
   6833 		watch = FALSE;
   6834 	}
   6835 #endif
   6836 
   6837 	if (order && cd) {
   6838 		if (cfgsort[cfg.curctx] != '0') {
   6839 			if (cfgsort[cfg.curctx] == 'z')
   6840 				set_sort_flags('c');
   6841 			if ((!cfgsort[cfg.curctx] || (cfgsort[cfg.curctx] == 'c'))
   6842 			    && ((r = get_kv_key(order, path, maxorder, NNN_ORDER)) > 0)) { // NOLINT
   6843 				set_sort_flags(r);
   6844 				cfgsort[cfg.curctx] = 'z';
   6845 			}
   6846 		} else
   6847 			cfgsort[cfg.curctx] = cfgsort[CTX_MAX];
   6848 	}
   6849 	cd = TRUE;
   6850 
   6851 	populate(path, lastname);
   6852 	if (g_state.interrupt) {
   6853 		g_state.interrupt = cfg.apparentsz = cfg.blkorder = 0;
   6854 		blk_shift = BLK_SHIFT_512;
   6855 		presel = CONTROL('L');
   6856 	}
   6857 
   6858 #ifdef LINUX_INOTIFY
   6859 	if (presel != FILTER && inotify_wd == -1)
   6860 		inotify_wd = inotify_add_watch(inotify_fd, path, INOTIFY_MASK);
   6861 #elif defined(BSD_KQUEUE)
   6862 	if (presel != FILTER && event_fd == -1) {
   6863 #if defined(O_EVTONLY)
   6864 		event_fd = open(path, O_EVTONLY);
   6865 #else
   6866 		event_fd = open(path, O_RDONLY);
   6867 #endif
   6868 		if (event_fd >= 0)
   6869 			EV_SET(&events_to_monitor[0], event_fd, EVFILT_VNODE,
   6870 			       EV_ADD | EV_CLEAR, KQUEUE_FFLAGS, 0, path);
   6871 	}
   6872 #elif defined(HAIKU_NM)
   6873 	haiku_nm_active = haiku_watch_dir(haiku_hnd, path) == EXIT_SUCCESS;
   6874 #endif
   6875 
   6876 	while (1) {
   6877 		/* Do not do a double redraw in filterentries */
   6878 		if ((presel != FILTER) || !filterset()) {
   6879 			redraw(path);
   6880 			statusbar(path);
   6881 		}
   6882 
   6883 nochange:
   6884 		/* Exit if parent has exited */
   6885 		if (getppid() == 1)
   6886 			_exit(EXIT_FAILURE);
   6887 
   6888 		/* If CWD is deleted or moved or perms changed, find an accessible parent */
   6889 		if (chdir(path) == -1)
   6890 			goto begin;
   6891 
   6892 		/* If STDIN is no longer a tty (closed) we should exit */
   6893 		if (!isatty(STDIN_FILENO) && !g_state.picker)
   6894 			return EXIT_FAILURE;
   6895 
   6896 		sel = nextsel(presel);
   6897 		if (presel)
   6898 			presel = 0;
   6899 
   6900 		switch (sel) {
   6901 #ifndef NOMOUSE
   6902 		case SEL_CLICK:
   6903 			if (getmouse(&event) != OK)
   6904 				goto nochange;
   6905 
   6906 			/* Handle clicking on a context at the top */
   6907 			if (event.bstate == BUTTON1_PRESSED && event.y == 0) {
   6908 				/* Get context from: "[1 2 3 4]..." */
   6909 				r = event.x >> 1;
   6910 
   6911 				/* If clicked after contexts, go to parent */
   6912 				if (r >= CTX_MAX)
   6913 					sel = SEL_BACK;
   6914 				else if (r >= 0 && r != cfg.curctx) {
   6915 					savecurctx(path, ndents ? pdents[cur].name : NULL, r);
   6916 
   6917 					/* Reset the pointers */
   6918 					path = g_ctx[r].c_path;
   6919 					lastdir = g_ctx[r].c_last;
   6920 					lastname = g_ctx[r].c_name;
   6921 
   6922 					setdirwatch();
   6923 					goto begin;
   6924 				}
   6925 			}
   6926 #endif
   6927 			// fallthrough
   6928 		case SEL_BACK:
   6929 #ifndef NOMOUSE
   6930 			if (sel == SEL_BACK) {
   6931 #endif
   6932 				dir = visit_parent(path, newpath, &presel);
   6933 				if (!dir)
   6934 					goto nochange;
   6935 
   6936 				/* Save history */
   6937 				xstrsncpy(lastname, xbasename(path), NAME_MAX + 1);
   6938 
   6939 				cdprep(lastdir, NULL, path, dir) ? (presel = FILTER) : (watch = TRUE);
   6940 				goto begin;
   6941 #ifndef NOMOUSE
   6942 			}
   6943 #endif
   6944 
   6945 #ifndef NOMOUSE
   6946 			/* Middle click action */
   6947 			if (event.bstate == BUTTON2_PRESSED) {
   6948 				presel = middle_click_key;
   6949 				goto nochange;
   6950 			}
   6951 #if NCURSES_MOUSE_VERSION > 1
   6952 			/* Scroll up */
   6953 			if (event.bstate == BUTTON4_PRESSED && ndents && (cfg.rollover || cur)) {
   6954 				move_cursor((!cfg.rollover && cur < scroll_lines
   6955 						? 0 : (cur + ndents - scroll_lines) % ndents), 0);
   6956 				break;
   6957 			}
   6958 
   6959 			/* Scroll down */
   6960 			if (event.bstate == BUTTON5_PRESSED && ndents
   6961 			    && (cfg.rollover || (cur != ndents - 1))) {
   6962 				move_cursor((!cfg.rollover && cur >= ndents - scroll_lines)
   6963 						? (ndents - 1) : ((cur + scroll_lines) % ndents), 0);
   6964 				break;
   6965 			}
   6966 #endif
   6967 
   6968 			/* Toggle filter mode on left click on last 2 lines */
   6969 			if (event.y >= xlines - 2 && event.bstate == BUTTON1_PRESSED) {
   6970 				clearfilter();
   6971 				cfg.filtermode ^= 1;
   6972 				if (cfg.filtermode) {
   6973 					presel = FILTER;
   6974 					goto nochange;
   6975 				}
   6976 
   6977 				/* Start watching the directory */
   6978 				watch = TRUE;
   6979 				copycurname();
   6980 				cd = FALSE;
   6981 				goto begin;
   6982 			}
   6983 
   6984 			/* Handle clicking on a file */
   6985 			if (event.y >= 2 && event.y <= ndents + 1 &&
   6986 					(event.bstate == BUTTON1_PRESSED ||
   6987 					 event.bstate == BUTTON3_PRESSED)) {
   6988 				r = curscroll + (event.y - 2);
   6989 				if (r != cur)
   6990 					move_cursor(r, 1);
   6991 #ifndef NOFIFO
   6992 				else if ((event.bstate == BUTTON1_PRESSED) && !g_state.fifomode)
   6993 					notify_fifo(TRUE); /* Send clicked path to NNN_FIFO */
   6994 #endif
   6995 				/* Handle right click selection */
   6996 				if (event.bstate == BUTTON3_PRESSED) {
   6997 					rightclicksel = 1;
   6998 					presel = SELECT;
   6999 					goto nochange;
   7000 				}
   7001 
   7002 				currentmouse ^= 1;
   7003 				clock_gettime(
   7004 #if defined(CLOCK_MONOTONIC_RAW)
   7005 				    CLOCK_MONOTONIC_RAW,
   7006 #elif defined(CLOCK_MONOTONIC)
   7007 				    CLOCK_MONOTONIC,
   7008 #else
   7009 				    CLOCK_REALTIME,
   7010 #endif
   7011 				    &mousetimings[currentmouse]);
   7012 				mousedent[currentmouse] = cur;
   7013 
   7014 				/* Single click just selects, double click falls through to SEL_OPEN */
   7015 				if ((mousedent[0] != mousedent[1]) ||
   7016 				  (((_ABSSUB(mousetimings[0].tv_sec, mousetimings[1].tv_sec) << 30)
   7017 				  + (_ABSSUB(mousetimings[0].tv_nsec, mousetimings[1].tv_nsec)))
   7018 					> DBLCLK_INTERVAL_NS))
   7019 					break;
   7020 				/* Double click */
   7021 				mousetimings[currentmouse].tv_sec = 0;
   7022 				mousedent[currentmouse] = -1;
   7023 				sel = SEL_OPEN;
   7024 			} else {
   7025 				if (cfg.filtermode || filterset())
   7026 					presel = FILTER;
   7027 				copycurname();
   7028 				goto nochange;
   7029 			}
   7030 #endif
   7031 			// fallthrough
   7032 		case SEL_NAV_IN: // fallthrough
   7033 		case SEL_OPEN:
   7034 			/* Cannot descend in empty directories */
   7035 			if (!ndents) {
   7036 				cd = FALSE;
   7037 				g_state.selbm = g_state.runplugin = 0;
   7038 				goto begin;
   7039 			}
   7040 
   7041 			pent = &pdents[cur];
   7042 			if (!g_state.selbm || !(S_ISLNK(pent->mode) &&
   7043 			                        realpath(pent->name, newpath) &&
   7044 			                        xstrsncpy(path, lastdir, PATH_MAX)))
   7045 				mkpath(path, pent->name, newpath);
   7046 			g_state.selbm = 0;
   7047 			DPRINTF_S(newpath);
   7048 
   7049 			/* Visit directory */
   7050 			if (pent->flags & DIR_OR_DIRLNK) {
   7051 				if (chdir(newpath) == -1) {
   7052 					printwarn(&presel);
   7053 					goto nochange;
   7054 				}
   7055 
   7056 				cdprep(lastdir, lastname, path, newpath) ? (presel = FILTER) : (watch = TRUE);
   7057 				goto begin;
   7058 			}
   7059 
   7060 			/* Cannot use stale data in entry, file may be missing by now */
   7061 			if (stat(newpath, &sb) == -1) {
   7062 				printwarn(&presel);
   7063 				goto nochange;
   7064 			}
   7065 			DPRINTF_U(sb.st_mode);
   7066 
   7067 			/* Do not open non-regular files */
   7068 			if (!S_ISREG(sb.st_mode)) {
   7069 				printwait(messages[MSG_UNSUPPORTED], &presel);
   7070 				goto nochange;
   7071 			}
   7072 
   7073 			/* Handle plugin selection mode */
   7074 			if (g_state.runplugin) {
   7075 				g_state.runplugin = 0;
   7076 				/* Must be in plugin dir and same context to select plugin */
   7077 				if ((g_state.runctx == cfg.curctx) && !strcmp(path, plgpath)) {
   7078 					endselection(FALSE);
   7079 					/* Copy path so we can return back to earlier dir */
   7080 					xstrsncpy(path, lastdir, PATH_MAX);
   7081 					clearfilter();
   7082 
   7083 					if (chdir(path) == -1
   7084 					    || !run_plugin(&path, pent->name, runfile, &lastname, &lastdir)) {
   7085 						DPRINTF_S("plugin failed!");
   7086 					}
   7087 
   7088 					if (g_state.picked)
   7089 						return EXIT_SUCCESS;
   7090 
   7091 					if (runfile[0]) {
   7092 						xstrsncpy(lastname, runfile, NAME_MAX + 1);
   7093 						runfile[0] = '\0';
   7094 					}
   7095 					setdirwatch();
   7096 					goto begin;
   7097 				}
   7098 			}
   7099 
   7100 #ifndef NOFIFO
   7101 			if (g_state.fifomode && (sel == SEL_OPEN)) {
   7102 				send_to_explorer(&presel); /* Write selection to explorer fifo */
   7103 				break;
   7104 			}
   7105 #endif
   7106 			/* If opened as vim plugin and Enter/^M pressed, pick */
   7107 			if (g_state.picker && (sel == SEL_OPEN)) {
   7108 				if (nselected == 0) /* Pick if none selected */
   7109 					appendfpath(newpath, mkpath(path, pent->name, newpath));
   7110 				return EXIT_SUCCESS;
   7111 			}
   7112 
   7113 			if (sel == SEL_NAV_IN) {
   7114 				/* If in listing dir, go to target on `l` or Right on symlink */
   7115 				if (listpath && S_ISLNK(pent->mode)
   7116 				    && is_prefix(path, listpath, xstrlen(listpath))) {
   7117 					if (!realpath(pent->name, newpath)) {
   7118 						printwarn(&presel);
   7119 						goto nochange;
   7120 					}
   7121 
   7122 					xdirname(newpath);
   7123 
   7124 					if (chdir(newpath) == -1) {
   7125 						printwarn(&presel);
   7126 						goto nochange;
   7127 					}
   7128 
   7129 					cdprep(lastdir, NULL, path, newpath)
   7130 					       ? (presel = FILTER) : (watch = TRUE);
   7131 					xstrsncpy(lastname, pent->name, NAME_MAX + 1);
   7132 					goto begin;
   7133 				}
   7134 
   7135 				/* Open file disabled on right arrow or `l` */
   7136 				if (cfg.nonavopen)
   7137 					goto nochange;
   7138 			}
   7139 
   7140 			if (!sb.st_size) {
   7141 				printwait(messages[MSG_EMPTY_FILE], &presel);
   7142 				goto nochange;
   7143 			}
   7144 
   7145 			if (cfg.useeditor
   7146 #ifdef FILE_MIME_OPTS
   7147 			    && get_output("file", FILE_MIME_OPTS, newpath, -1, FALSE)
   7148 			    && is_prefix(g_buf, "text/", 5)
   7149 #else
   7150 			    /* no MIME option; guess from description instead */
   7151 			    && get_output("file", "-bL", newpath, -1, FALSE)
   7152 			    && strstr(g_buf, "text")
   7153 #endif
   7154 			) {
   7155 				spawn(editor, newpath, NULL, NULL, F_CLI);
   7156 				if (cfg.filtermode) {
   7157 					presel = FILTER;
   7158 					clearfilter();
   7159 				}
   7160 				continue;
   7161 			}
   7162 
   7163 			/* Get the extension for regex match */
   7164 			tmp = xextension(pent->name, pent->nlen - 1);
   7165 #ifdef PCRE
   7166 			if (tmp && !pcre_exec(archive_pcre, NULL, tmp,
   7167 					      pent->nlen - (tmp - pent->name) - 1, 0, 0, NULL, 0)) {
   7168 #else
   7169 			if (tmp && !regexec(&archive_re, tmp, 0, NULL, 0)) {
   7170 #endif
   7171 				r = get_input(messages[MSG_ARCHIVE_OPTS]);
   7172 				if (r == '\r')
   7173 					r = 'l';
   7174 				if (r == 'l' || r == 'x') {
   7175 					mkpath(path, pent->name, newpath);
   7176 					if (!handle_archive(newpath, r)) {
   7177 						presel = MSGWAIT;
   7178 						goto nochange;
   7179 					}
   7180 					if (r == 'l') {
   7181 						statusbar(path);
   7182 						goto nochange;
   7183 					}
   7184 				}
   7185 
   7186 				if ((r == 'm') && !archive_mount(newpath)) {
   7187 					presel = MSGWAIT;
   7188 					goto nochange;
   7189 				}
   7190 
   7191 				if (r == 'x' || r == 'm') {
   7192 					if (newpath[0])
   7193 						set_smart_ctx('+', newpath, &path,
   7194 							      ndents ? pdents[cur].name : NULL,
   7195 							      &lastname, &lastdir);
   7196 					else
   7197 						copycurname();
   7198 					clearfilter();
   7199 					goto begin;
   7200 				}
   7201 
   7202 				if (r != 'o') {
   7203 					printwait(messages[MSG_INVALID_KEY], &presel);
   7204 					goto nochange;
   7205 				}
   7206 			}
   7207 
   7208 			/* Invoke desktop opener as last resort */
   7209 			spawn(opener, newpath, NULL, NULL, opener_flags);
   7210 
   7211 			/* Move cursor to the next entry if not the last entry */
   7212 			if (g_state.autonext && cur != ndents - 1)
   7213 				move_cursor((cur + 1) % ndents, 0);
   7214 			if (cfg.filtermode) {
   7215 				presel = FILTER;
   7216 				clearfilter();
   7217 			}
   7218 			continue;
   7219 		case SEL_NEXT: // fallthrough
   7220 		case SEL_PREV: // fallthrough
   7221 		case SEL_PGDN: // fallthrough
   7222 		case SEL_CTRL_D: // fallthrough
   7223 		case SEL_PGUP: // fallthrough
   7224 		case SEL_CTRL_U: // fallthrough
   7225 		case SEL_HOME: // fallthrough
   7226 		case SEL_END: // fallthrough
   7227 		case SEL_FIRST: // fallthrough
   7228 		case SEL_JUMP: // fallthrough
   7229 		case SEL_YOUNG:
   7230 			if (ndents) {
   7231 				g_state.move = 1;
   7232 				handle_screen_move(sel);
   7233 			}
   7234 			break;
   7235 		case SEL_CDHOME: // fallthrough
   7236 		case SEL_CDBEGIN: // fallthrough
   7237 		case SEL_CDLAST: // fallthrough
   7238 		case SEL_CDROOT:
   7239 			dir = (sel == SEL_CDHOME) ? home
   7240 				: ((sel == SEL_CDBEGIN) ? ipath
   7241 				: ((sel == SEL_CDLAST) ? lastdir
   7242 				: "/" /* SEL_CDROOT */));
   7243 
   7244 			if (!dir || !*dir) {
   7245 				printwait(messages[MSG_NOT_SET], &presel);
   7246 				goto nochange;
   7247 			}
   7248 
   7249 			g_state.selbm = 0;
   7250 			if (strcmp(path, dir) == 0) {
   7251 				if (dir == ipath) {
   7252 					if (cfg.filtermode)
   7253 						presel = FILTER;
   7254 					goto nochange;
   7255 				}
   7256 				dir = lastdir; /* Go to last dir on home/root key repeat */
   7257 			}
   7258 
   7259 			if (chdir(dir) == -1) {
   7260 				presel = MSGWAIT;
   7261 				goto nochange;
   7262 			}
   7263 
   7264 			/* SEL_CDLAST: dir pointing to lastdir */
   7265 			xstrsncpy(newpath, dir, PATH_MAX); // fallthrough
   7266 		case SEL_BMOPEN:
   7267 			if (sel == SEL_BMOPEN) {
   7268 				r = (int)handle_bookmark(mark, newpath);
   7269 				if (r) {
   7270 					printwait(messages[r], &presel);
   7271 					goto nochange;
   7272 				}
   7273 
   7274 				if (g_state.selbm == 1) /* Allow filtering in bookmarks directory */
   7275 					presel = FILTER;
   7276 				if (strcmp(path, newpath) == 0)
   7277 					break;
   7278 			}
   7279 
   7280 			/* In list mode, retain the last file name to highlight it, if possible */
   7281 			cdprep(lastdir, listpath && sel == SEL_CDLAST ? NULL : lastname, path, newpath)
   7282 			       ? (presel = FILTER) : (watch = TRUE);
   7283 			goto begin;
   7284 		case SEL_REMOTE:
   7285 			if ((sel == SEL_REMOTE) && !remote_mount(newpath)) {
   7286 				presel = MSGWAIT;
   7287 				goto nochange;
   7288 			}
   7289 
   7290 			set_smart_ctx('+', newpath, &path,
   7291 				      ndents ? pdents[cur].name : NULL, &lastname, &lastdir);
   7292 			clearfilter();
   7293 			goto begin;
   7294 		case SEL_CYCLE: // fallthrough
   7295 		case SEL_CYCLER: // fallthrough
   7296 		case SEL_CTX1: // fallthrough
   7297 		case SEL_CTX2: // fallthrough
   7298 		case SEL_CTX3: // fallthrough
   7299 		case SEL_CTX4:
   7300 #ifdef CTX8
   7301 		case SEL_CTX5:
   7302 		case SEL_CTX6:
   7303 		case SEL_CTX7:
   7304 		case SEL_CTX8:
   7305 #endif
   7306 			r = handle_context_switch(sel);
   7307 			if (r < 0)
   7308 				continue;
   7309 			savecurctx(path, ndents ? pdents[cur].name : NULL, r);
   7310 
   7311 			/* Reset the pointers */
   7312 			path = g_ctx[r].c_path;
   7313 			lastdir = g_ctx[r].c_last;
   7314 			lastname = g_ctx[r].c_name;
   7315 			tmp = g_ctx[r].c_fltr;
   7316 
   7317 			if (cfg.filtermode || ((tmp[0] == FILTER || tmp[0] == RFILTER) && tmp[1]))
   7318 				presel = FILTER;
   7319 			else
   7320 				watch = TRUE;
   7321 
   7322 			goto begin;
   7323 		case SEL_MARK:
   7324 			free(mark);
   7325 			mark = xstrdup(path);
   7326 			printwait(mark, &presel);
   7327 			goto nochange;
   7328 		case SEL_BMARK:
   7329 			add_bookmark(path, newpath, &presel);
   7330 			goto nochange;
   7331 		case SEL_FLTR:
   7332 			/* Unwatch dir if we are still in a filtered view */
   7333 #ifdef LINUX_INOTIFY
   7334 			if (inotify_wd >= 0) {
   7335 				inotify_rm_watch(inotify_fd, inotify_wd);
   7336 				inotify_wd = -1;
   7337 			}
   7338 #elif defined(BSD_KQUEUE)
   7339 			if (event_fd >= 0) {
   7340 				close(event_fd);
   7341 				event_fd = -1;
   7342 			}
   7343 #elif defined(HAIKU_NM)
   7344 			if (haiku_nm_active) {
   7345 				haiku_stop_watch(haiku_hnd);
   7346 				haiku_nm_active = FALSE;
   7347 			}
   7348 #endif
   7349 			presel = filterentries(path, lastname);
   7350 			if (presel == ESC) {
   7351 				presel = 0;
   7352 				break;
   7353 			}
   7354 			if (presel == FILTER) { /* Refresh dir and filter again */
   7355 				cd = FALSE;
   7356 				goto begin;
   7357 			}
   7358 			goto nochange;
   7359 		case SEL_MFLTR: // fallthrough
   7360 		case SEL_HIDDEN: // fallthrough
   7361 		case SEL_DETAIL: // fallthrough
   7362 		case SEL_SORT:
   7363 			switch (sel) {
   7364 			case SEL_MFLTR:
   7365 				cfg.filtermode ^= 1;
   7366 				if (cfg.filtermode) {
   7367 					presel = FILTER;
   7368 					clearfilter();
   7369 					goto nochange;
   7370 				}
   7371 
   7372 				watch = TRUE; // fallthrough
   7373 			case SEL_HIDDEN:
   7374 				if (sel == SEL_HIDDEN) {
   7375 					cfg.showhidden ^= 1;
   7376 					if (cfg.filtermode)
   7377 						presel = FILTER;
   7378 					clearfilter();
   7379 				}
   7380 				copycurname();
   7381 				cd = FALSE;
   7382 				goto begin;
   7383 			case SEL_DETAIL:
   7384 				cfg.showdetail ^= 1;
   7385 				cfg.blkorder = 0;
   7386 				continue;
   7387 			default: /* SEL_SORT */
   7388 				r = set_sort_flags(get_input(messages[MSG_ORDER]));
   7389 				if (!r) {
   7390 					printwait(messages[MSG_INVALID_KEY], &presel);
   7391 					goto nochange;
   7392 				}
   7393 			}
   7394 
   7395 			if (cfg.filtermode || filterset())
   7396 				presel = FILTER;
   7397 
   7398 			if (ndents) {
   7399 				copycurname();
   7400 
   7401 				if (r == 'd' || r == 'a') {
   7402 					presel = 0;
   7403 					goto begin;
   7404 				}
   7405 
   7406 				ENTSORT(pdents, ndents, entrycmpfn);
   7407 				move_cursor(ndents ? dentfind(lastname, ndents) : 0, 0);
   7408 			}
   7409 			continue;
   7410 		case SEL_STATS: // fallthrough
   7411 		case SEL_CHMODX:
   7412 			if (ndents) {
   7413 				tmp = (listpath && xstrcmp(path, listpath) == 0) ? listroot : path;
   7414 				mkpath(tmp, pdents[cur].name, newpath);
   7415 
   7416 				if ((sel == SEL_STATS && !show_stats(newpath))
   7417 				    || (lstat(newpath, &sb) == -1)
   7418 				    || (sel == SEL_CHMODX && !xchmod(newpath, &sb.st_mode))) {
   7419 					printwarn(&presel);
   7420 					goto nochange;
   7421 				}
   7422 
   7423 				if (sel == SEL_CHMODX)
   7424 					pdents[cur].mode = sb.st_mode;
   7425 			}
   7426 			break;
   7427 		case SEL_REDRAW: // fallthrough
   7428 		case SEL_RENAMEMUL: // fallthrough
   7429 		case SEL_HELP: // fallthrough
   7430 		case SEL_AUTONEXT: // fallthrough
   7431 		case SEL_EDIT: // fallthrough
   7432 		case SEL_LOCK:
   7433 		{
   7434 			bool refresh = FALSE;
   7435 
   7436 			if (ndents)
   7437 				mkpath(path, pdents[cur].name, newpath);
   7438 			else if (sel == SEL_EDIT) /* Avoid trying to edit a non-existing file */
   7439 				goto nochange;
   7440 
   7441 			switch (sel) {
   7442 			case SEL_REDRAW:
   7443 				refresh = TRUE;
   7444 				break;
   7445 			case SEL_RENAMEMUL:
   7446 				endselection(TRUE);
   7447 				setenv("NNN_INCLUDE_HIDDEN", xitoa(cfg.showhidden), 1);
   7448 				setenv("NNN_PREFER_SELECTION", xitoa(cfg.prefersel), 1);
   7449 				setenv("NNN_LIST", listpath ? listroot : "", 1);
   7450 
   7451 				if (!(getutil(utils[UTIL_BASH])
   7452 				      && plugscript(utils[UTIL_NMV], F_CLI))
   7453 #ifndef NOBATCH
   7454 				    && !batch_rename()
   7455 #endif
   7456 				) {
   7457 					printwait(messages[MSG_FAILED], &presel);
   7458 					goto nochange;
   7459 				}
   7460 				clearselection();
   7461 				refresh = TRUE;
   7462 				break;
   7463 			case SEL_HELP:
   7464 				show_help(path); // fallthrough
   7465 			case SEL_AUTONEXT:
   7466 				if (sel == SEL_AUTONEXT)
   7467 					g_state.autonext ^= 1;
   7468 				if (cfg.filtermode)
   7469 					presel = FILTER;
   7470 				copycurname();
   7471 				goto nochange;
   7472 			case SEL_EDIT:
   7473 				if (!(g_state.picker || g_state.fifomode))
   7474 					spawn(editor, newpath, NULL, NULL, F_CLI);
   7475 				continue;
   7476 			default: /* SEL_LOCK */
   7477 				lock_terminal();
   7478 				break;
   7479 			}
   7480 
   7481 			/* In case of successful operation, reload contents */
   7482 
   7483 			/* Continue in type-to-nav mode, if enabled */
   7484 			if ((cfg.filtermode || filterset()) && !refresh) {
   7485 				presel = FILTER;
   7486 				goto nochange;
   7487 			}
   7488 
   7489 			/* Save current */
   7490 			copycurname();
   7491 			/* Repopulate as directory content may have changed */
   7492 			cd = FALSE;
   7493 			goto begin;
   7494 		}
   7495 		case SEL_SEL:
   7496 			if (!ndents)
   7497 				goto nochange;
   7498 
   7499 			startselection();
   7500 			if (g_state.rangesel)
   7501 				g_state.rangesel = 0;
   7502 
   7503 			/* Toggle selection status */
   7504 			pdents[cur].flags ^= FILE_SELECTED;
   7505 
   7506 			if (pdents[cur].flags & FILE_SELECTED) {
   7507 				++nselected;
   7508 				appendfpath(newpath, mkpath(path, pdents[cur].name, newpath));
   7509 				writesel(pselbuf, selbufpos - 1); /* Truncate NULL from end */
   7510 			} else {
   7511 				--nselected;
   7512 				rmfromselbuf(mkpath(path, pdents[cur].name, g_sel));
   7513 			}
   7514 
   7515 #ifndef NOX11
   7516 			if (cfg.x11)
   7517 				plugscript(utils[UTIL_CBCP], F_NOWAIT | F_NOTRACE);
   7518 #endif
   7519 #ifndef NOMOUSE
   7520 			if (rightclicksel)
   7521 				rightclicksel = 0;
   7522 			else
   7523 #endif
   7524 				/* move cursor to the next entry if this is not the last entry */
   7525 				if (!g_state.stayonsel && (cur != ndents - 1))
   7526 					move_cursor((cur + 1) % ndents, 0);
   7527 			break;
   7528 		case SEL_SELMUL:
   7529 			if (!ndents)
   7530 				goto nochange;
   7531 
   7532 			startselection();
   7533 			g_state.rangesel ^= 1;
   7534 
   7535 			if (stat(path, &sb) == -1) {
   7536 				printwarn(&presel);
   7537 				goto nochange;
   7538 			}
   7539 
   7540 			if (g_state.rangesel) { /* Range selection started */
   7541 				inode = sb.st_ino;
   7542 				selstartid = cur;
   7543 				continue;
   7544 			}
   7545 
   7546 			if (inode != sb.st_ino) {
   7547 				printwait(messages[MSG_DIR_CHANGED], &presel);
   7548 				goto nochange;
   7549 			}
   7550 
   7551 			if (cur < selstartid) {
   7552 				selendid = selstartid;
   7553 				selstartid = cur;
   7554 			} else
   7555 				selendid = cur;
   7556 
   7557 			/* Clear selection on repeat on same file */
   7558 			if (selstartid == selendid) {
   7559 				resetselind();
   7560 				clearselection();
   7561 				break;
   7562 			} // fallthrough
   7563 		case SEL_SELALL: // fallthrough
   7564 		case SEL_SELINV:
   7565 			if (sel == SEL_SELALL || sel == SEL_SELINV) {
   7566 				if (!ndents)
   7567 					goto nochange;
   7568 
   7569 				startselection();
   7570 				if (g_state.rangesel)
   7571 					g_state.rangesel = 0;
   7572 
   7573 				selstartid = 0;
   7574 				selendid = ndents - 1;
   7575 			}
   7576 
   7577 			if ((nselected > LARGESEL) || (nselected && (ndents > LARGESEL))) {
   7578 				printmsg("processing...");
   7579 				refresh();
   7580 			}
   7581 
   7582 			r = scanselforpath(path, TRUE); /* Get path length suffixed by '/' */
   7583 			((sel == SEL_SELINV) && findselpos)
   7584 				? invertselbuf(r) : addtoselbuf(r, selstartid, selendid);
   7585 
   7586 #ifndef NOX11
   7587 			if (cfg.x11)
   7588 				plugscript(utils[UTIL_CBCP], F_NOWAIT | F_NOTRACE);
   7589 #endif
   7590 			continue;
   7591 		case SEL_SELEDIT:
   7592 			r = editselection();
   7593 			if (r <= 0) {
   7594 				r = !r ? MSG_0_SELECTED : MSG_FAILED;
   7595 				printwait(messages[r], &presel);
   7596 			} else {
   7597 #ifndef NOX11
   7598 				if (cfg.x11)
   7599 					plugscript(utils[UTIL_CBCP], F_NOWAIT | F_NOTRACE);
   7600 #endif
   7601 				cfg.filtermode ?  presel = FILTER : statusbar(path);
   7602 			}
   7603 			goto nochange;
   7604 		case SEL_CP: // fallthrough
   7605 		case SEL_MV: // fallthrough
   7606 		case SEL_CPMVAS: // fallthrough
   7607 		case SEL_RM:
   7608 		{
   7609 			if (sel == SEL_RM) {
   7610 				r = get_cur_or_sel();
   7611 				if (!r) {
   7612 					statusbar(path);
   7613 					goto nochange;
   7614 				}
   7615 
   7616 				if (r == 'c') {
   7617 					tmp = (listpath && xstrcmp(path, listpath) == 0)
   7618 					      ? listroot : path;
   7619 					mkpath(tmp, pdents[cur].name, newpath);
   7620 					if (!xrm(newpath))
   7621 						continue;
   7622 
   7623 					xrmfromsel(tmp, newpath);
   7624 
   7625 					copynextname(lastname);
   7626 
   7627 					if (cfg.filtermode || filterset())
   7628 						presel = FILTER;
   7629 					cd = FALSE;
   7630 					goto begin;
   7631 				}
   7632 			}
   7633 
   7634 			(nselected == 1 && (sel == SEL_CP || sel == SEL_MV))
   7635 				? mkpath(path, xbasename(pselbuf), newpath)
   7636 				: (newpath[0] = '\0');
   7637 
   7638 			endselection(TRUE);
   7639 
   7640 			if (!cpmvrm_selection(sel, path)) {
   7641 				presel = MSGWAIT;
   7642 				goto nochange;
   7643 			}
   7644 
   7645 			if (cfg.filtermode)
   7646 				presel = FILTER;
   7647 			clearfilter();
   7648 
   7649 #ifndef NOX11
   7650 			/* Show notification on operation complete */
   7651 			if (cfg.x11)
   7652 				plugscript(utils[UTIL_NTFY], F_NOWAIT | F_NOTRACE);
   7653 #endif
   7654 
   7655 			if (newpath[0] && !access(newpath, F_OK))
   7656 				xstrsncpy(lastname, xbasename(newpath), NAME_MAX+1);
   7657 			else
   7658 				copycurname();
   7659 			cd = FALSE;
   7660 			goto begin;
   7661 		}
   7662 		case SEL_ARCHIVE: // fallthrough
   7663 		case SEL_OPENWITH: // fallthrough
   7664 		case SEL_NEW: // fallthrough
   7665 		case SEL_RENAME:
   7666 		{
   7667 			int ret = 'n';
   7668 			size_t len;
   7669 
   7670 			if (!ndents && (sel == SEL_OPENWITH || sel == SEL_RENAME))
   7671 				break;
   7672 
   7673 			if (sel != SEL_OPENWITH)
   7674 				endselection(TRUE);
   7675 
   7676 			switch (sel) {
   7677 			case SEL_ARCHIVE:
   7678 				r = get_cur_or_sel();
   7679 				if (!r) {
   7680 					statusbar(path);
   7681 					goto nochange;
   7682 				}
   7683 
   7684 				if (r == 's') {
   7685 					if (!selsafe()) {
   7686 						presel = MSGWAIT;
   7687 						goto nochange;
   7688 					}
   7689 
   7690 					tmp = NULL;
   7691 				} else
   7692 					tmp = pdents[cur].name;
   7693 
   7694 				tmp = xreadline(tmp, messages[MSG_ARCHIVE_NAME]);
   7695 				break;
   7696 			case SEL_OPENWITH:
   7697 #ifndef NORL
   7698 				if (g_state.picker) {
   7699 #endif
   7700 					tmp = xreadline(NULL, messages[MSG_OPEN_WITH]);
   7701 #ifndef NORL
   7702 				} else
   7703 					tmp = getreadline(messages[MSG_OPEN_WITH]);
   7704 #endif
   7705 				break;
   7706 			case SEL_NEW:
   7707 				if (!pkey) {
   7708 					r = get_input(messages[MSG_NEW_OPTS]);
   7709 					if (r == '\r')
   7710 						r = 'f';
   7711 					tmp = NULL;
   7712 				} else {
   7713 					r = 'f';
   7714 					tmp = g_ctx[0].c_name;
   7715 					pkey = '\0';
   7716 				}
   7717 
   7718 				if (r == 'f' || r == 'd')
   7719 					tmp = xreadline(tmp, messages[MSG_NEW_PATH]);
   7720 				else if (r == 's' || r == 'h')
   7721 					tmp = xreadline((nselected == 1 && cfg.prefersel) ? xbasename(pselbuf) : NULL,
   7722 						messages[nselected <= 1 ? MSG_NEW_PATH : MSG_LINK_PREFIX]);
   7723 				else
   7724 					tmp = NULL;
   7725 				break;
   7726 			default: /* SEL_RENAME */
   7727 				tmp = xreadline(pdents[cur].name, "");
   7728 				break;
   7729 			}
   7730 
   7731 			if (!tmp || !*tmp || is_bad_len_or_dir(tmp))
   7732 				break;
   7733 
   7734 			switch (sel) {
   7735 			case SEL_ARCHIVE:
   7736 				if (r == 'c' && strcmp(tmp, pdents[cur].name) == 0)
   7737 					continue; /* Cannot overwrite the hovered file */
   7738 
   7739 				tmp = abspath(tmp, NULL, newpath);
   7740 				if (!tmp)
   7741 					continue;
   7742 				if (access(tmp, F_OK) == 0) {
   7743 					if (!xconfirm(get_input(messages[MSG_OVERWRITE]))) {
   7744 						statusbar(path);
   7745 						goto nochange;
   7746 					}
   7747 				}
   7748 
   7749 				(r == 's') ? archive_selection(get_archive_cmd(tmp), tmp)
   7750 					   : spawn(get_archive_cmd(tmp), tmp, pdents[cur].name,
   7751 						   NULL, F_CLI | F_CONFIRM);
   7752 
   7753 				if (tmp && (access(tmp, F_OK) == 0)) { /* File created */
   7754 					if (r == 's')
   7755 						clearselection(); /* Archive operation complete */
   7756 
   7757 					/* Check if any entry is created in the current directory */
   7758 					tmp = get_cwd_entry(path, tmp, &len);
   7759 					if (tmp) {
   7760 						xstrsncpy(lastname, tmp, len + 1);
   7761 						clearfilter(); /* Archive name may not match */
   7762 					} if (cfg.filtermode)
   7763 						presel = FILTER;
   7764 					cd = FALSE;
   7765 					goto begin;
   7766 				}
   7767 				continue;
   7768 			case SEL_OPENWITH:
   7769 				handle_openwith(path, pdents[cur].name, newpath, tmp);
   7770 
   7771 				cfg.filtermode ?  presel = FILTER : statusbar(path);
   7772 				copycurname();
   7773 				goto nochange;
   7774 			case SEL_RENAME:
   7775 				r = 0;
   7776 				/* Skip renaming to same name */
   7777 				if (strcmp(tmp, pdents[cur].name) == 0) {
   7778 					tmp = xreadline(pdents[cur].name, messages[MSG_COPY_NAME]);
   7779 					if (!tmp || !tmp[0] || is_bad_len_or_dir(tmp)
   7780 					    || !strcmp(tmp, pdents[cur].name)) {
   7781 						cfg.filtermode ?  presel = FILTER : statusbar(path);
   7782 						copycurname();
   7783 						goto nochange;
   7784 					}
   7785 					ret = 'd';
   7786 				}
   7787 				break;
   7788 			default: /* SEL_NEW */
   7789 				break;
   7790 			}
   7791 
   7792 			if (!(r == 's' || r == 'h')) {
   7793 				tmp = abspath(tmp, NULL, newpath);
   7794 				if (!tmp) {
   7795 					printwarn(&presel);
   7796 					goto nochange;
   7797 				}
   7798 			}
   7799 
   7800 			/* Check if another file with same name exists */
   7801 			if (lstat(tmp, &sb) == 0) {
   7802 				if ((sel == SEL_RENAME) || ((r == 'f') && (S_ISREG(sb.st_mode)))) {
   7803 					/* Overwrite file with same name? */
   7804 					if (!xconfirm(get_input(messages[MSG_OVERWRITE])))
   7805 						break;
   7806 				} else {
   7807 					/* Do nothing for SEL_NEW if a non-regular entry exists */
   7808 					printwait(messages[MSG_EXISTS], &presel);
   7809 					goto nochange;
   7810 				}
   7811 			}
   7812 
   7813 			if (sel == SEL_RENAME) {
   7814 				/* Rename the file */
   7815 				if (ret == 'd')
   7816 					spawn("cp -rp", pdents[cur].name, tmp, NULL, F_SILENT);
   7817 				else if (rename(pdents[cur].name, tmp) != 0) {
   7818 					printwarn(&presel);
   7819 					goto nochange;
   7820 				}
   7821 
   7822 				/* Check if any entry is created in the current directory */
   7823 				tmp = get_cwd_entry(path, tmp, &len);
   7824 				if (tmp)
   7825 					xstrsncpy(lastname, tmp, len + 1);
   7826 				/* Directory must be reloeaded for rename case */
   7827 			} else { /* SEL_NEW */
   7828 				presel = 0;
   7829 
   7830 				/* Check if it's a dir or file */
   7831 				if (r == 'f' || r == 'd') {
   7832 					ret = xmktree(tmp, r == 'f' ? FALSE : TRUE);
   7833 				} else if (r == 's' || r == 'h') {
   7834 					if (nselected > 1 && tmp[0] == '@' && tmp[1] == '\0')
   7835 						tmp[0] = '\0';
   7836 					ret = xlink(tmp, path, (ndents ? pdents[cur].name : NULL), newpath, r);
   7837 				}
   7838 
   7839 				if (!ret)
   7840 					printwarn(&presel);
   7841 
   7842 				if (ret <= 0)
   7843 					goto nochange;
   7844 
   7845 				if (r == 'f' || r == 'd') {
   7846 					tmp = get_cwd_entry(path, tmp, &len);
   7847 					if (tmp)
   7848 						xstrsncpy(lastname, tmp, len + 1);
   7849 					else
   7850 						continue; /* No change in directory */
   7851 				} else if (ndents) {
   7852 					if (cfg.filtermode)
   7853 						presel = FILTER;
   7854 					copycurname();
   7855 				}
   7856 			}
   7857 			clearfilter();
   7858 
   7859 			cd = FALSE;
   7860 			goto begin;
   7861 		}
   7862 		case SEL_PLUGIN:
   7863 			/* Check if directory is accessible */
   7864 			if (!xdiraccess(plgpath)) {
   7865 				printwarn(&presel);
   7866 				goto nochange;
   7867 			}
   7868 
   7869 			if (!pkey) {
   7870 				r = xstrsncpy(g_buf, messages[MSG_KEYS], CMD_LEN_MAX);
   7871 				printkeys(plug, g_buf + r - 1, maxplug);
   7872 				printmsg(g_buf);
   7873 				r = get_input(NULL);
   7874 			} else {
   7875 				r = pkey;
   7876 				pkey = '\0';
   7877 			}
   7878 
   7879 			if (r != '\r') {
   7880 				endselection(FALSE);
   7881 				tmp = get_kv_val(plug, NULL, r, maxplug, NNN_PLUG);
   7882 				if (!tmp) {
   7883 					printwait(messages[MSG_INVALID_KEY], &presel);
   7884 					goto nochange;
   7885 				}
   7886 
   7887 				if (tmp[0] == '-' && tmp[1]) {
   7888 					++tmp;
   7889 					r = FALSE; /* Do not refresh dir after completion */
   7890 				} else
   7891 					r = TRUE;
   7892 
   7893 				if (!run_plugin(&path, tmp, (ndents ? pdents[cur].name : NULL),
   7894 							 &lastname, &lastdir)) {
   7895 					printwait(messages[MSG_FAILED], &presel);
   7896 					goto nochange;
   7897 				}
   7898 
   7899 				if (g_state.picked)
   7900 					return EXIT_SUCCESS;
   7901 
   7902 				copycurname();
   7903 
   7904 				if (!r) {
   7905 					cfg.filtermode ? presel = FILTER : statusbar(path);
   7906 					goto nochange;
   7907 				}
   7908 			} else { /* 'Return/Enter' enters the plugin directory */
   7909 				g_state.runplugin ^= 1;
   7910 				if (!g_state.runplugin) {
   7911 					/*
   7912 					 * If toggled, and still in the plugin dir,
   7913 					 * switch to original directory
   7914 					 */
   7915 					if (strcmp(path, plgpath) == 0) {
   7916 						xstrsncpy(path, lastdir, PATH_MAX);
   7917 						xstrsncpy(lastname, runfile, NAME_MAX + 1);
   7918 						runfile[0] = '\0';
   7919 						setdirwatch();
   7920 						goto begin;
   7921 					}
   7922 
   7923 					/* Otherwise, initiate choosing plugin again */
   7924 					g_state.runplugin = 1;
   7925 				}
   7926 
   7927 				xstrsncpy(lastdir, path, PATH_MAX);
   7928 				xstrsncpy(path, plgpath, PATH_MAX);
   7929 				if (ndents)
   7930 					xstrsncpy(runfile, pdents[cur].name, NAME_MAX);
   7931 				g_state.runctx = cfg.curctx;
   7932 				lastname[0] = '\0';
   7933 				clearfilter();
   7934 			}
   7935 			setdirwatch();
   7936 			if (g_state.runplugin == 1) /* Allow filtering in plugins directory */
   7937 				presel = FILTER;
   7938 			goto begin;
   7939 		case SEL_SELSIZE:
   7940 			showselsize(path);
   7941 			goto nochange;
   7942 		case SEL_SHELL: // fallthrough
   7943 		case SEL_LAUNCH: // fallthrough
   7944 		case SEL_PROMPT:
   7945 			r = handle_cmd(sel, newpath);
   7946 
   7947 			/* Continue in type-to-nav mode, if enabled */
   7948 			if (cfg.filtermode)
   7949 				presel = FILTER;
   7950 
   7951 			/* Save current */
   7952 			copycurname();
   7953 
   7954 			if (!r)
   7955 				goto nochange;
   7956 
   7957 			/* Repopulate as directory content may have changed */
   7958 			cd = FALSE;
   7959 			goto begin;
   7960 		case SEL_UMOUNT:
   7961 			presel = MSG_ZERO;
   7962 			if (!unmount((ndents ? pdents[cur].name : NULL), newpath, &presel, path)) {
   7963 				if (presel == MSG_ZERO)
   7964 					statusbar(path);
   7965 				goto nochange;
   7966 			}
   7967 
   7968 			/* Dir removed, go to next entry */
   7969 			copynextname(lastname);
   7970 			cd = FALSE;
   7971 			goto begin;
   7972 #ifndef NOSSN
   7973 		case SEL_SESSIONS:
   7974 			r = get_input(messages[MSG_SSN_OPTS]);
   7975 
   7976 			if (r == 's') {
   7977 				tmp = xreadline(NULL, messages[MSG_SSN_NAME]);
   7978 				if (tmp && *tmp)
   7979 					save_session(tmp, &presel);
   7980 			} else if (r == 'l' || r == 'r') {
   7981 				if (load_session(NULL, &path, &lastdir, &lastname, r == 'r')) {
   7982 					setdirwatch();
   7983 					goto begin;
   7984 				}
   7985 			}
   7986 
   7987 			statusbar(path);
   7988 			goto nochange;
   7989 #endif
   7990 		case SEL_EXPORT:
   7991 			export_file_list();
   7992 			cfg.filtermode ?  presel = FILTER : statusbar(path);
   7993 			goto nochange;
   7994 		case SEL_TIMETYPE:
   7995 			if (!set_time_type(&presel))
   7996 				goto nochange;
   7997 			cd = FALSE;
   7998 			goto begin;
   7999 		case SEL_QUITCTX: // fallthrough
   8000 		case SEL_QUITCD: // fallthrough
   8001 		case SEL_QUIT:
   8002 		case SEL_QUITERR:
   8003 			if (sel == SEL_QUITCTX) {
   8004 				int ctx = cfg.curctx;
   8005 
   8006 				for (r = (ctx - 1) & (CTX_MAX - 1);
   8007 				     (r != ctx) && !g_ctx[r].c_cfg.ctxactive;
   8008 				     r = ((r - 1) & (CTX_MAX - 1))) {
   8009 				};
   8010 
   8011 				if (r != ctx) {
   8012 					g_ctx[ctx].c_cfg.ctxactive = 0;
   8013 
   8014 					/* Switch to next active context */
   8015 					path = g_ctx[r].c_path;
   8016 					lastdir = g_ctx[r].c_last;
   8017 					lastname = g_ctx[r].c_name;
   8018 
   8019 					cfg = g_ctx[r].c_cfg;
   8020 
   8021 					cfg.curctx = r;
   8022 					setdirwatch();
   8023 					goto begin;
   8024 				}
   8025 			} else if (!g_state.forcequit) {
   8026 				for (r = 0; r < CTX_MAX; ++r)
   8027 					if (r != cfg.curctx && g_ctx[r].c_cfg.ctxactive) {
   8028 						r = get_input(messages[MSG_QUIT_ALL]);
   8029 						break;
   8030 					}
   8031 
   8032 				if (!(r == CTX_MAX || xconfirm(r)))
   8033 					break; // fallthrough
   8034 			}
   8035 
   8036 			/* CD on Quit */
   8037 			tmp = getenv("NNN_TMPFILE");
   8038 			if ((sel == SEL_QUITCD) || tmp) {
   8039 				write_lastdir(path, tmp);
   8040 				/* ^G is a way to quit picker mode without picking anything */
   8041 				if ((sel == SEL_QUITCD) && g_state.picker)
   8042 					selbufpos = 0;
   8043 			}
   8044 
   8045 			if (sel != SEL_QUITERR)
   8046 				return EXIT_SUCCESS;
   8047 
   8048 			if (selbufpos && !g_state.picker) {
   8049 				/* Pick files to stdout and exit */
   8050 				g_state.picker = 1;
   8051 				free(selpath);
   8052 				selpath = NULL;
   8053 				return EXIT_SUCCESS;
   8054 			}
   8055 
   8056 			return EXIT_FAILURE;
   8057 		default:
   8058 			if (xlines != LINES || xcols != COLS)
   8059 				continue;
   8060 
   8061 			if (idletimeout && idle == idletimeout) {
   8062 				lock_terminal(); /* Locker */
   8063 				idle = 0;
   8064 			}
   8065 
   8066 			copycurname();
   8067 			goto nochange;
   8068 		} /* switch (sel) */
   8069 	}
   8070 }
   8071 
   8072 static char *make_tmp_tree(char **paths, ssize_t entries, const char *prefix)
   8073 {
   8074 	/* tmpdir holds the full path */
   8075 	/* tmp holds the path without the tmp dir prefix */
   8076 	int err;
   8077 	struct stat sb;
   8078 	char *slash, *tmp;
   8079 	ssize_t len = xstrlen(prefix);
   8080 	char *tmpdir = malloc(PATH_MAX);
   8081 
   8082 	if (!tmpdir) {
   8083 		DPRINTF_S(strerror(errno));
   8084 		return NULL;
   8085 	}
   8086 
   8087 	tmp = tmpdir + tmpfplen - 1;
   8088 	xstrsncpy(tmpdir, g_tmpfpath, tmpfplen);
   8089 	xstrsncpy(tmp, "/nnnXXXXXX", 11);
   8090 
   8091 	/* Points right after the base tmp dir */
   8092 	tmp += 10;
   8093 
   8094 	/* handle the case where files are directly under / */
   8095 	if (!prefix[1] && (prefix[0] == '/'))
   8096 		len = 0;
   8097 
   8098 	if (!mkdtemp(tmpdir)) {
   8099 		free(tmpdir);
   8100 
   8101 		DPRINTF_S(strerror(errno));
   8102 		return NULL;
   8103 	}
   8104 
   8105 	listpath = tmpdir;
   8106 
   8107 	for (ssize_t i = 0; i < entries; ++i) {
   8108 		if (!paths[i])
   8109 			continue;
   8110 
   8111 		err = stat(paths[i], &sb);
   8112 		if (err && errno == ENOENT)
   8113 			continue;
   8114 
   8115 		/* Don't copy the common prefix */
   8116 		xstrsncpy(tmp, paths[i] + len, xstrlen(paths[i]) - len + 1);
   8117 
   8118 		/* Get the dir containing the path */
   8119 		slash = xmemrchr((uchar_t *)tmp, '/', xstrlen(paths[i]) - len);
   8120 		if (slash)
   8121 			*slash = '\0';
   8122 
   8123 		if (access(tmpdir, F_OK)) /* Create directory if it doesn't exist */
   8124 			xmktree(tmpdir, TRUE);
   8125 
   8126 		if (slash)
   8127 			*slash = '/';
   8128 
   8129 		if (symlink(paths[i], tmpdir)) {
   8130 			DPRINTF_S(paths[i]);
   8131 			DPRINTF_S(strerror(errno));
   8132 		}
   8133 	}
   8134 
   8135 	/* Get the dir in which to start */
   8136 	*tmp = '\0';
   8137 	return tmpdir;
   8138 }
   8139 
   8140 static char *load_input(int fd, const char *path)
   8141 {
   8142 	size_t i, chunk_count = 1, chunk = 512UL * 1024 /* 512 KiB chunk size */, entries = 0;
   8143 	char *input = malloc(sizeof(char) * chunk), *tmpdir = NULL;
   8144 	char cwd[PATH_MAX], *next;
   8145 	size_t offsets[LIST_FILES_MAX];
   8146 	char **paths = NULL;
   8147 	ssize_t input_read, total_read = 0, off = 0;
   8148 	int msgnum = 0;
   8149 
   8150 	if (!input) {
   8151 		DPRINTF_S(strerror(errno));
   8152 		return NULL;
   8153 	}
   8154 
   8155 	if (!path) {
   8156 		if (!getcwd(cwd, PATH_MAX)) {
   8157 			free(input);
   8158 			return NULL;
   8159 		}
   8160 	} else
   8161 		xstrsncpy(cwd, path, PATH_MAX);
   8162 
   8163 	while (chunk_count < LIST_INPUT_MAX / chunk && !msgnum) {
   8164 		input_read = read(fd, input + total_read, chunk);
   8165 		if (input_read < 0) {
   8166 			if (errno == EINTR)
   8167 				continue;
   8168 
   8169 			DPRINTF_S(strerror(errno));
   8170 			goto malloc_1;
   8171 		}
   8172 
   8173 		if (input_read == 0)
   8174 			break;
   8175 
   8176 		total_read += input_read;
   8177 
   8178 		while (off < total_read) {
   8179 			next = memchr(input + off, '\0', total_read - off);
   8180 			if (!next)
   8181 				break;
   8182 			++next;
   8183 
   8184 			if (next - input == off + 1) {
   8185 				off = next - input;
   8186 				continue;
   8187 			}
   8188 
   8189 			if (entries == LIST_FILES_MAX) {
   8190 				msgnum = MSG_FILE_LIMIT;
   8191 				break;
   8192 			}
   8193 
   8194 			offsets[entries++] = off;
   8195 			off = next - input;
   8196 		}
   8197 
   8198 		/* We don't need to allocate another chunk */
   8199 		if (chunk_count > (total_read + chunk - 1) / chunk)
   8200 			continue;
   8201 
   8202 		/* We can never need more than one additional chunk */
   8203 		++chunk_count;
   8204 		if (chunk_count > LIST_INPUT_MAX / chunk) {
   8205 			msgnum = MSG_SIZE_LIMIT;
   8206 			break;
   8207 		}
   8208 
   8209 		input = xrealloc(input, chunk_count * chunk);
   8210 		if (!input)
   8211 			goto malloc_1;
   8212 	}
   8213 
   8214 	/* We close fd outside this function. Any extra data is left to the kernel to handle */
   8215 
   8216 	if (off != total_read) {
   8217 		if (entries == LIST_FILES_MAX)
   8218 			msgnum = MSG_FILE_LIMIT;
   8219 		else
   8220 			offsets[entries++] = off;
   8221 	}
   8222 
   8223 	DPRINTF_D(entries);
   8224 	DPRINTF_D(total_read);
   8225 	DPRINTF_D(chunk_count);
   8226 
   8227 	if (!entries) {
   8228 		msgnum = MSG_0_ENTRIES;
   8229 		goto malloc_1;
   8230 	}
   8231 
   8232 	input[total_read] = '\0';
   8233 
   8234 	paths = malloc(entries * sizeof(char *));
   8235 	if (!paths)
   8236 		goto malloc_1;
   8237 
   8238 	for (i = 0; i < entries; ++i)
   8239 		paths[i] = input + offsets[i];
   8240 
   8241 	listroot = malloc(sizeof(char) * PATH_MAX);
   8242 	if (!listroot)
   8243 		goto malloc_1;
   8244 	listroot[0] = '\0';
   8245 
   8246 	DPRINTF_S(paths[0]);
   8247 
   8248 	for (i = 0; i < entries; ++i) {
   8249 		if (paths[i][0] == '\n' || selforparent(paths[i])) {
   8250 			paths[i] = NULL;
   8251 			continue;
   8252 		}
   8253 
   8254 		paths[i] = abspath(paths[i], cwd, NULL);
   8255 		if (!paths[i]) {
   8256 			entries = i; // free from the previous entry
   8257 			goto malloc_2;
   8258 		}
   8259 
   8260 		DPRINTF_S(paths[i]);
   8261 
   8262 		xstrsncpy(g_buf, paths[i], PATH_MAX);
   8263 		if (!common_prefix(xdirname(g_buf), listroot)) {
   8264 			entries = i + 1; // free from the current entry
   8265 			goto malloc_2;
   8266 		}
   8267 
   8268 		DPRINTF_S(listroot);
   8269 	}
   8270 
   8271 	DPRINTF_S(listroot);
   8272 
   8273 	if (listroot[0])
   8274 		tmpdir = make_tmp_tree(paths, entries, listroot);
   8275 
   8276 malloc_2:
   8277 	for (i = 0; i < entries; ++i)
   8278 		free(paths[i]);
   8279 malloc_1:
   8280 	if (msgnum) { /* Check if we are past init stage and show msg */
   8281 		if (home) {
   8282 			printmsg(messages[msgnum]);
   8283 			xdelay(XDELAY_INTERVAL_MS << 2);
   8284 		} else {
   8285 			msg(messages[msgnum]);
   8286 			usleep(XDELAY_INTERVAL_MS << 2);
   8287 		}
   8288 	}
   8289 
   8290 	free(input);
   8291 	free(paths);
   8292 	return tmpdir;
   8293 }
   8294 
   8295 static void check_key_collision(void)
   8296 {
   8297 	wint_t key;
   8298 	bool bitmap[KEY_MAX] = {FALSE};
   8299 
   8300 	for (ullong_t i = 0; i < ELEMENTS(bindings); ++i) {
   8301 		key = bindings[i].sym;
   8302 
   8303 		if (bitmap[key])
   8304 			dprintf(STDERR_FILENO, "key collision! [%s]\n", keyname(key));
   8305 		else
   8306 			bitmap[key] = TRUE;
   8307 	}
   8308 }
   8309 
   8310 static void usage(void)
   8311 {
   8312 	dprintf(STDOUT_FILENO,
   8313 		"%s: nnn [OPTIONS] [PATH]\n\n"
   8314 		"The unorthodox terminal file manager.\n\n"
   8315 		"positional args:\n"
   8316 		"  PATH   start dir/file [default: .]\n\n"
   8317 		"optional args:\n"
   8318 #ifndef NOFIFO
   8319 		" -a      auto NNN_FIFO\n"
   8320 #endif
   8321 		" -A      no dir auto-enter during filter\n"
   8322 		" -b key  open bookmark key (trumps -s/S)\n"
   8323 		" -B      use bsdtar for archives\n"
   8324 		" -c      cli-only NNN_OPENER (trumps -e)\n"
   8325 		" -C      8-color scheme\n"
   8326 		" -d      detail mode\n"
   8327 		" -D      dirs in context color\n"
   8328 		" -e      text in $VISUAL/$EDITOR/vi\n"
   8329 		" -E      internal edits in EDITOR\n"
   8330 #ifndef NORL
   8331 		" -f      use readline history file\n"
   8332 #endif
   8333 #ifndef NOFIFO
   8334 		" -F val  fifo mode [0:preview 1:explore]\n"
   8335 #endif
   8336 		" -g      regex filters\n"
   8337 		" -H      show hidden files\n"
   8338 		" -i      show current file info\n"
   8339 		" -J      no auto-advance on selection\n"
   8340 		" -K      detect key collision and exit\n"
   8341 		" -l val  set scroll lines\n"
   8342 		" -n      type-to-nav mode\n"
   8343 		" -o      open files only on Enter\n"
   8344 		" -p file selection file [-:stdout]\n"
   8345 		" -P key  run plugin key\n"
   8346 		" -Q      no quit confirmation\n"
   8347 		" -r      use advcpmv patched cp, mv\n"
   8348 		" -R      no rollover at edges\n"
   8349 #ifndef NOSSN
   8350 		" -s name load session by name\n"
   8351 		" -S      persistent session\n"
   8352 #endif
   8353 		" -t secs timeout to lock\n"
   8354 		" -T key  sort order [a/d/e/r/s/t/v]\n"
   8355 		" -u      use selection (no prompt)\n"
   8356 #ifndef NOUG
   8357 		" -U      show user and group\n"
   8358 #endif
   8359 		" -V      show version\n"
   8360 #ifndef NOX11
   8361 		" -x      notis, selection sync, xterm title\n"
   8362 #endif
   8363 		" -h      show help\n\n"
   8364 		"v%s\n%s\n", __func__, VERSION, GENERAL_INFO);
   8365 }
   8366 
   8367 static bool setup_config(void)
   8368 {
   8369 	size_t r, len;
   8370 	char *xdgcfg = getenv("XDG_CONFIG_HOME");
   8371 	bool xdg = FALSE;
   8372 
   8373 	/* Set up configuration file paths */
   8374 	if (xdgcfg && xdgcfg[0]) {
   8375 		DPRINTF_S(xdgcfg);
   8376 		if (tilde_is_home(xdgcfg)) {
   8377 			r = xstrsncpy(g_buf, home, PATH_MAX);
   8378 			xstrsncpy(g_buf + r - 1, xdgcfg + 1, PATH_MAX);
   8379 			xdgcfg = g_buf;
   8380 			DPRINTF_S(xdgcfg);
   8381 		}
   8382 
   8383 		if (!xdiraccess(xdgcfg)) {
   8384 			xerror();
   8385 			return FALSE;
   8386 		}
   8387 
   8388 		len = xstrlen(xdgcfg) + xstrlen("/nnn/bookmarks") + 1;
   8389 		xdg = TRUE;
   8390 	}
   8391 
   8392 	if (!xdg)
   8393 		len = xstrlen(home) + xstrlen("/.config/nnn/bookmarks") + 1;
   8394 
   8395 	cfgpath = (char *)malloc(len);
   8396 	plgpath = (char *)malloc(len);
   8397 	if (!cfgpath || !plgpath) {
   8398 		xerror();
   8399 		return FALSE;
   8400 	}
   8401 
   8402 	if (xdg) {
   8403 		xstrsncpy(cfgpath, xdgcfg, len);
   8404 		r = len - xstrlen("/nnn/bookmarks");
   8405 	} else {
   8406 		r = xstrsncpy(cfgpath, home, len);
   8407 
   8408 		/* Create ~/.config */
   8409 		xstrsncpy(cfgpath + r - 1, "/.config", len - r);
   8410 		DPRINTF_S(cfgpath);
   8411 		r += 8; /* length of "/.config" */
   8412 	}
   8413 
   8414 	/* Create ~/.config/nnn */
   8415 	xstrsncpy(cfgpath + r - 1, "/nnn", len - r);
   8416 	DPRINTF_S(cfgpath);
   8417 
   8418 	/* Create bookmarks, sessions, mounts and plugins directories */
   8419 	for (r = 0; r < ELEMENTS(toks); ++r) {
   8420 		mkpath(cfgpath, toks[r], plgpath);
   8421 		/* The dirs are created on first run, check if they already exist */
   8422 		if (access(plgpath, F_OK) && !xmktree(plgpath, TRUE)) {
   8423 			DPRINTF_S(toks[r]);
   8424 			xerror();
   8425 			return FALSE;
   8426 		}
   8427 	}
   8428 
   8429 	/* Set selection file path */
   8430 	if (!g_state.picker) {
   8431 		char *env_sel = xgetenv(env_cfg[NNN_SEL], NULL);
   8432 
   8433 		selpath = env_sel ? xstrdup(env_sel)
   8434 				  : (char *)malloc(len + 3); /* Length of "/.config/nnn/.selection" */
   8435 
   8436 		if (!selpath) {
   8437 			xerror();
   8438 			return FALSE;
   8439 		}
   8440 
   8441 		if (!env_sel) {
   8442 			r = xstrsncpy(selpath, cfgpath, len + 3);
   8443 			xstrsncpy(selpath + r - 1, "/.selection", 12);
   8444 			DPRINTF_S(selpath);
   8445 		}
   8446 	}
   8447 
   8448 	return TRUE;
   8449 }
   8450 
   8451 static bool set_tmp_path(void)
   8452 {
   8453 	char *tmp = "/tmp";
   8454 	char *path = xdiraccess(tmp) ? tmp : getenv("TMPDIR");
   8455 
   8456 	if (!path) {
   8457 		msg("set TMPDIR");
   8458 		return FALSE;
   8459 	}
   8460 
   8461 	tmpfplen = (uchar_t)xstrsncpy(g_tmpfpath, path, TMP_LEN_MAX);
   8462 	DPRINTF_S(g_tmpfpath);
   8463 	DPRINTF_U(tmpfplen);
   8464 
   8465 	return TRUE;
   8466 }
   8467 
   8468 static void cleanup(void)
   8469 {
   8470 #ifndef NOX11
   8471 	if (cfg.x11 && !g_state.picker) {
   8472 		printf("\033[23;0t"); /* reset terminal window title */
   8473 		fflush(stdout);
   8474 	}
   8475 #endif
   8476 	free(selpath);
   8477 	free(plgpath);
   8478 	free(cfgpath);
   8479 	free(initpath);
   8480 	free(bmstr);
   8481 	free(pluginstr);
   8482 	free(listroot);
   8483 	free(ihashbmp);
   8484 	free(bookmark);
   8485 	free(plug);
   8486 	free(lastcmd);
   8487 #ifndef NOFIFO
   8488 	if (g_state.autofifo)
   8489 		unlink(fifopath);
   8490 #endif
   8491 	if (g_state.pluginit)
   8492 		unlink(g_pipepath);
   8493 #ifdef DEBUG
   8494 	disabledbg();
   8495 #endif
   8496 }
   8497 
   8498 int main(int argc, char *argv[])
   8499 {
   8500 	char *arg = NULL;
   8501 	char *session = NULL;
   8502 	int fd, opt, sort = 0, pkey = '\0'; /* Plugin key */
   8503 #ifndef NOMOUSE
   8504 	mmask_t mask;
   8505 	char *middle_click_env = xgetenv(env_cfg[NNN_MCLICK], "\0");
   8506 
   8507 	middle_click_key = (middle_click_env[0] == '^' && middle_click_env[1])
   8508 			    ? CONTROL(middle_click_env[1])
   8509 			    : (uchar_t)middle_click_env[0];
   8510 #endif
   8511 
   8512 	const char * const env_opts = xgetenv(env_cfg[NNN_OPTS], NULL);
   8513 	int env_opts_id = env_opts ? (int)xstrlen(env_opts) : -1;
   8514 #ifndef NORL
   8515 	bool rlhist = FALSE;
   8516 #endif
   8517 
   8518 	while ((opt = (env_opts_id > 0
   8519 		       ? env_opts[--env_opts_id]
   8520 		       : getopt(argc, argv, "aAb:BcCdDeEfF:gHiJKl:nop:P:QrRs:St:T:uUVxh"))) != -1) {
   8521 		switch (opt) {
   8522 #ifndef NOFIFO
   8523 		case 'a':
   8524 			g_state.autofifo = 1;
   8525 			break;
   8526 #endif
   8527 		case 'A':
   8528 			cfg.autoenter = 0;
   8529 			break;
   8530 		case 'b':
   8531 			if (env_opts_id < 0)
   8532 				arg = optarg;
   8533 			break;
   8534 		case 'B':
   8535 			g_state.usebsdtar = 1;
   8536 			break;
   8537 		case 'c':
   8538 			cfg.cliopener = 1;
   8539 			break;
   8540 		case 'C':
   8541 			g_state.oldcolor = 1;
   8542 			break;
   8543 		case 'd':
   8544 			cfg.showdetail = 1;
   8545 			break;
   8546 		case 'D':
   8547 			g_state.dirctx = 1;
   8548 			break;
   8549 		case 'e':
   8550 			cfg.useeditor = 1;
   8551 			break;
   8552 		case 'E':
   8553 			cfg.waitedit = 1;
   8554 			break;
   8555 		case 'f':
   8556 #ifndef NORL
   8557 			rlhist = TRUE;
   8558 #endif
   8559 			break;
   8560 #ifndef NOFIFO
   8561 		case 'F':
   8562 			if (env_opts_id < 0) {
   8563 				fd = atoi(optarg);
   8564 				if ((fd < 0) || (fd > 1))
   8565 					return EXIT_FAILURE;
   8566 				g_state.fifomode = fd;
   8567 			}
   8568 			break;
   8569 #endif
   8570 		case 'g':
   8571 			cfg.regex = 1;
   8572 			filterfn = &visible_re;
   8573 			break;
   8574 		case 'H':
   8575 			cfg.showhidden = 1;
   8576 			break;
   8577 		case 'i':
   8578 			cfg.fileinfo = 1;
   8579 			break;
   8580 		case 'J':
   8581 			g_state.stayonsel = 1;
   8582 			break;
   8583 		case 'K':
   8584 			check_key_collision();
   8585 			return EXIT_SUCCESS;
   8586 		case 'l':
   8587 			if (env_opts_id < 0)
   8588 				scroll_lines = atoi(optarg);
   8589 			break;
   8590 		case 'n':
   8591 			cfg.filtermode = 1;
   8592 			break;
   8593 		case 'o':
   8594 			cfg.nonavopen = 1;
   8595 			break;
   8596 		case 'p':
   8597 			if (env_opts_id >= 0)
   8598 				break;
   8599 
   8600 			g_state.picker = 1;
   8601 			if (!(optarg[0] == '-' && optarg[1] == '\0')) {
   8602 				fd = open(optarg, O_WRONLY | O_CREAT, 0600);
   8603 				if (fd == -1) {
   8604 					xerror();
   8605 					return EXIT_FAILURE;
   8606 				}
   8607 
   8608 				close(fd);
   8609 				selpath = abspath(optarg, NULL, NULL);
   8610 				unlink(selpath);
   8611 			}
   8612 			break;
   8613 		case 'P':
   8614 			if (env_opts_id < 0 && !optarg[1])
   8615 				pkey = (uchar_t)optarg[0];
   8616 			break;
   8617 		case 'Q':
   8618 			g_state.forcequit = 1;
   8619 			break;
   8620 		case 'r':
   8621 #ifdef __linux__
   8622 			memcpy(cp, PROGRESS_CP, sizeof PROGRESS_CP);
   8623 			memcpy(mv, PROGRESS_MV, sizeof PROGRESS_MV);
   8624 #endif
   8625 			break;
   8626 		case 'R':
   8627 			cfg.rollover = 0;
   8628 			break;
   8629 #ifndef NOSSN
   8630 		case 's':
   8631 			if (env_opts_id < 0)
   8632 				session = optarg;
   8633 			break;
   8634 		case 'S':
   8635 			g_state.prstssn = 1;
   8636 			if (!session) /* Support named persistent sessions */
   8637 				session = "@";
   8638 			break;
   8639 #endif
   8640 		case 't':
   8641 			if (env_opts_id < 0)
   8642 				idletimeout = atoi(optarg);
   8643 			break;
   8644 		case 'T':
   8645 			if (env_opts_id < 0)
   8646 				sort = (uchar_t)optarg[0];
   8647 			break;
   8648 		case 'u':
   8649 			cfg.prefersel = 1;
   8650 			break;
   8651 		case 'U':
   8652 			g_state.uidgid = 1;
   8653 			break;
   8654 		case 'V':
   8655 			dprintf(STDOUT_FILENO, "%s\n", VERSION);
   8656 			return EXIT_SUCCESS;
   8657 		case 'x':
   8658 			cfg.x11 = 1;
   8659 			break;
   8660 		case 'h':
   8661 			usage();
   8662 			return EXIT_SUCCESS;
   8663 		default:
   8664 			usage();
   8665 			return EXIT_FAILURE;
   8666 		}
   8667 		if (env_opts_id == 0)
   8668 			env_opts_id = -1;
   8669 	}
   8670 
   8671 #ifdef DEBUG
   8672 	enabledbg();
   8673 	DPRINTF_S(VERSION);
   8674 #endif
   8675 
   8676 	/* Prefix for temporary files */
   8677 	if (!set_tmp_path())
   8678 		return EXIT_FAILURE;
   8679 
   8680 	atexit(cleanup);
   8681 
   8682 	/* Check if we are in path list mode */
   8683 	if (!isatty(STDIN_FILENO)) {
   8684 		/* This is the same as listpath */
   8685 		initpath = load_input(STDIN_FILENO, NULL);
   8686 		if (!initpath)
   8687 			return EXIT_FAILURE;
   8688 
   8689 		/* We return to tty */
   8690 		if (!isatty(STDOUT_FILENO)) {
   8691 			fd = open(ctermid(NULL), O_RDONLY, 0400);
   8692 			dup2(fd, STDIN_FILENO);
   8693 			close(fd);
   8694 		} else
   8695 			dup2(STDOUT_FILENO, STDIN_FILENO);
   8696 
   8697 		if (session)
   8698 			session = NULL;
   8699 	}
   8700 
   8701 	home = getenv("HOME");
   8702 	if (!home) {
   8703 		msg("set HOME");
   8704 		return EXIT_FAILURE;
   8705 	}
   8706 	DPRINTF_S(home);
   8707 	homelen = (uchar_t)xstrlen(home);
   8708 
   8709 	if (!setup_config())
   8710 		return EXIT_FAILURE;
   8711 
   8712 	/* Get custom opener, if set */
   8713 	opener = xgetenv(env_cfg[NNN_OPENER], utils[UTIL_OPENER]);
   8714 	DPRINTF_S(opener);
   8715 
   8716 	/* Parse bookmarks string */
   8717 	if (!parsekvpair(&bookmark, &bmstr, NNN_BMS, &maxbm)) {
   8718 		msg(env_cfg[NNN_BMS]);
   8719 		return EXIT_FAILURE;
   8720 	}
   8721 
   8722 	/* Parse plugins string */
   8723 	if (!parsekvpair(&plug, &pluginstr, NNN_PLUG, &maxplug)) {
   8724 		msg(env_cfg[NNN_PLUG]);
   8725 		return EXIT_FAILURE;
   8726 	}
   8727 
   8728 	/* Parse order string */
   8729 	if (!parsekvpair(&order, &orderstr, NNN_ORDER, &maxorder)) {
   8730 		msg(env_cfg[NNN_ORDER]);
   8731 		return EXIT_FAILURE;
   8732 	}
   8733 
   8734 	if (!initpath) {
   8735 		if (arg) { /* Open a bookmark directly */
   8736 			if (!arg[1]) /* Bookmarks keys are single char */
   8737 				initpath = get_kv_val(bookmark, NULL, *arg, maxbm, NNN_BMS);
   8738 
   8739 			if (!initpath) {
   8740 				msg(messages[MSG_INVALID_KEY]);
   8741 				return EXIT_FAILURE;
   8742 			}
   8743 
   8744 			if (session)
   8745 				session = NULL;
   8746 		} else if (argc == optind) {
   8747 			/* Start in the current directory */
   8748 			char *startpath = getenv("PWD");
   8749 
   8750 			initpath = (startpath && *startpath) ? xstrdup(startpath) : getcwd(NULL, 0);
   8751 			if (!initpath)
   8752 				initpath = "/";
   8753 		} else { /* Open a file */
   8754 			arg = argv[optind];
   8755 			DPRINTF_S(arg);
   8756 			size_t len = xstrlen(arg);
   8757 
   8758 			if (len > 7 && is_prefix(arg, "file://", 7)) {
   8759 				arg = arg + 7;
   8760 				len -= 7;
   8761 			}
   8762 			initpath = abspath(arg, NULL, NULL);
   8763 			DPRINTF_S(initpath);
   8764 			if (!initpath) {
   8765 				xerror();
   8766 				return EXIT_FAILURE;
   8767 			}
   8768 
   8769 			/* If the file is hidden, enable hidden option */
   8770 			if (*xbasename(initpath) == '.')
   8771 				cfg.showhidden = 1;
   8772 
   8773 			/*
   8774 			 * If nnn is set as the file manager, applications may try to open
   8775 			 * files by invoking nnn. In that case pass the file path to the
   8776 			 * desktop opener and exit.
   8777 			 */
   8778 			struct stat sb;
   8779 
   8780 			if (stat(initpath, &sb) == -1) {
   8781 				bool dir = (arg[len - 1] == '/');
   8782 
   8783 				if (!dir) {
   8784 					arg = xbasename(initpath);
   8785 					initpath = xdirname(initpath);
   8786 
   8787 					pkey = CREATE_NEW_KEY; /* Override plugin key */
   8788 					g_state.initfile = 1;
   8789 				}
   8790 				if (dir || (arg != initpath)) { /* We have a directory */
   8791 					if (!xdiraccess(initpath) && !xmktree(initpath, TRUE)) {
   8792 						xerror(); /* Fail if directory cannot be created */
   8793 						return EXIT_FAILURE;
   8794 					}
   8795 					if (!dir) /* Restore the complete path */
   8796 						*--arg = '/';
   8797 				}
   8798 			} else if (!S_ISDIR(sb.st_mode))
   8799 				g_state.initfile = 1;
   8800 
   8801 			if (session)
   8802 				session = NULL;
   8803 		}
   8804 	}
   8805 
   8806 	/* Set archive handling (enveditor used as tmp var) */
   8807 	enveditor = getenv(env_cfg[NNN_ARCHIVE]);
   8808 #ifdef PCRE
   8809 	if (setfilter(&archive_pcre, (enveditor ? enveditor : patterns[P_ARCHIVE]))) {
   8810 #else
   8811 	if (setfilter(&archive_re, (enveditor ? enveditor : patterns[P_ARCHIVE]))) {
   8812 #endif
   8813 		msg(messages[MSG_INVALID_REG]);
   8814 		return EXIT_FAILURE;
   8815 	}
   8816 
   8817 	/* An all-CLI opener overrides option -e) */
   8818 	if (cfg.cliopener)
   8819 		cfg.useeditor = 0;
   8820 
   8821 	/* Get VISUAL/EDITOR */
   8822 	enveditor = xgetenv(envs[ENV_EDITOR], utils[UTIL_VI]);
   8823 	editor = xgetenv(envs[ENV_VISUAL], enveditor);
   8824 	DPRINTF_S(getenv(envs[ENV_VISUAL]));
   8825 	DPRINTF_S(getenv(envs[ENV_EDITOR]));
   8826 	DPRINTF_S(editor);
   8827 
   8828 	/* Get PAGER */
   8829 	pager = xgetenv(envs[ENV_PAGER], utils[UTIL_LESS]);
   8830 	DPRINTF_S(pager);
   8831 
   8832 	/* Get SHELL */
   8833 	shell = xgetenv(envs[ENV_SHELL], utils[UTIL_SH]);
   8834 	DPRINTF_S(shell);
   8835 
   8836 	DPRINTF_S(getenv("PWD"));
   8837 
   8838 #ifndef NOFIFO
   8839 	/* Create fifo */
   8840 	if (g_state.autofifo) {
   8841 		g_tmpfpath[tmpfplen - 1] = '\0';
   8842 
   8843 		size_t r = mkpath(g_tmpfpath, "nnn-fifo.", g_buf);
   8844 
   8845 		xstrsncpy(g_buf + r - 1, xitoa(getpid()), PATH_MAX - r);
   8846 		setenv("NNN_FIFO", g_buf, TRUE);
   8847 	}
   8848 
   8849 	fifopath = xgetenv("NNN_FIFO", NULL);
   8850 	if (fifopath) {
   8851 		if (mkfifo(fifopath, 0600) != 0 && !(errno == EEXIST && access(fifopath, W_OK) == 0)) {
   8852 			xerror();
   8853 			return EXIT_FAILURE;
   8854 		}
   8855 
   8856 		sigaction(SIGPIPE, &(struct sigaction){.sa_handler = SIG_IGN}, NULL);
   8857 	}
   8858 #endif
   8859 
   8860 #ifdef LINUX_INOTIFY
   8861 	/* Initialize inotify */
   8862 	inotify_fd = inotify_init1(IN_NONBLOCK | IN_CLOEXEC);
   8863 	if (inotify_fd < 0) {
   8864 		xerror();
   8865 		return EXIT_FAILURE;
   8866 	}
   8867 #elif defined(BSD_KQUEUE)
   8868 	kq = kqueue();
   8869 	if (kq < 0) {
   8870 		xerror();
   8871 		return EXIT_FAILURE;
   8872 	}
   8873 #elif defined(HAIKU_NM)
   8874 	haiku_hnd = haiku_init_nm();
   8875 	if (!haiku_hnd) {
   8876 		xerror();
   8877 		return EXIT_FAILURE;
   8878 	}
   8879 #endif
   8880 
   8881 	/* Configure trash preference */
   8882 	opt = xgetenv_val(env_cfg[NNN_TRASH]);
   8883 	if (opt && opt <= 2)
   8884 		g_state.trash = opt;
   8885 
   8886 	/* Ignore/handle certain signals */
   8887 	struct sigaction act = {.sa_handler = sigint_handler};
   8888 
   8889 	if (sigaction(SIGINT, &act, NULL) < 0) {
   8890 		xerror();
   8891 		return EXIT_FAILURE;
   8892 	}
   8893 
   8894 	act.sa_handler = clean_exit_sighandler;
   8895 
   8896 	if (sigaction(SIGTERM, &act, NULL) < 0 || sigaction(SIGHUP, &act, NULL) < 0) {
   8897 		xerror();
   8898 		return EXIT_FAILURE;
   8899 	}
   8900 
   8901 	act.sa_handler = SIG_IGN;
   8902 
   8903 	if (sigaction(SIGQUIT, &act, NULL) < 0) {
   8904 		xerror();
   8905 		return EXIT_FAILURE;
   8906 	}
   8907 
   8908 #ifndef NOLC
   8909 	/* Set locale */
   8910 	setlocale(LC_ALL, "");
   8911 #ifdef PCRE
   8912 	tables = pcre_maketables();
   8913 #endif
   8914 #endif
   8915 
   8916 #ifndef NORL
   8917 #if RL_READLINE_VERSION >= 0x0603
   8918 	/* readline would overwrite the WINCH signal hook */
   8919 	rl_change_environment = 0;
   8920 #endif
   8921 	/* Bind TAB to cycling */
   8922 	rl_variable_bind("completion-ignore-case", "on");
   8923 #ifdef __linux__
   8924 	rl_bind_key('\t', rl_menu_complete);
   8925 #else
   8926 	rl_bind_key('\t', rl_complete);
   8927 #endif
   8928 	if (rlhist) {
   8929 		mkpath(cfgpath, ".history", g_buf);
   8930 		read_history(g_buf);
   8931 	}
   8932 #endif
   8933 
   8934 #ifndef NOX11
   8935 	if (cfg.x11 && !g_state.picker) {
   8936 		/* Save terminal window title */
   8937 		printf("\033[22;0t");
   8938 		fflush(stdout);
   8939 		gethostname(hostname, sizeof(hostname));
   8940 		hostname[sizeof(hostname) - 1] = '\0';
   8941 	}
   8942 #endif
   8943 
   8944 #ifndef NOMOUSE
   8945 	if (!initcurses(&mask))
   8946 #else
   8947 	if (!initcurses(NULL))
   8948 #endif
   8949 		return EXIT_FAILURE;
   8950 
   8951 	if (sort)
   8952 		set_sort_flags(sort);
   8953 
   8954 	opt = browse(initpath, session, pkey);
   8955 
   8956 #ifndef NOSSN
   8957 	if (session && g_state.prstssn)
   8958 		save_session(session, NULL);
   8959 #endif
   8960 
   8961 #ifndef NOMOUSE
   8962 	mousemask(mask, NULL);
   8963 #endif
   8964 
   8965 	exitcurses();
   8966 
   8967 #ifndef NORL
   8968 	if (rlhist) {
   8969 		mkpath(cfgpath, ".history", g_buf);
   8970 		write_history(g_buf);
   8971 	}
   8972 #endif
   8973 
   8974 	if (g_state.picker) {
   8975 		if (selbufpos) {
   8976 			fd = selpath ? open(selpath, O_WRONLY | O_CREAT | O_TRUNC, 0600) : STDOUT_FILENO;
   8977 			if ((fd == -1) || (seltofile(fd, NULL) != (size_t)(selbufpos)))
   8978 				xerror();
   8979 
   8980 			if (fd > 1)
   8981 				close(fd);
   8982 		}
   8983 	} else if (selpath)
   8984 		unlink(selpath);
   8985 
   8986 	/* Remove tmp dir in list mode */
   8987 	rmlistpath();
   8988 
   8989 	/* Free the regex */
   8990 #ifdef PCRE
   8991 	pcre_free(archive_pcre);
   8992 #else
   8993 	regfree(&archive_re);
   8994 #endif
   8995 
   8996 	/* Free the selection buffer */
   8997 	free(pselbuf);
   8998 
   8999 #ifdef LINUX_INOTIFY
   9000 	/* Shutdown inotify */
   9001 	if (inotify_wd >= 0)
   9002 		inotify_rm_watch(inotify_fd, inotify_wd);
   9003 	close(inotify_fd);
   9004 #elif defined(BSD_KQUEUE)
   9005 	if (event_fd >= 0)
   9006 		close(event_fd);
   9007 	close(kq);
   9008 #elif defined(HAIKU_NM)
   9009 	haiku_close_nm(haiku_hnd);
   9010 #endif
   9011 
   9012 #ifndef NOFIFO
   9013 	if (!g_state.fifomode)
   9014 		notify_fifo(FALSE);
   9015 	if (fifofd != -1)
   9016 		close(fifofd);
   9017 #endif
   9018 
   9019 	return opt;
   9020 }