src/nnn.c

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