libbb/lineedit.c

   1 /* vi: set sw=4 ts=4: */
   2 /*
   3  * Termios command line History and Editing.
   4  *
   5  * Copyright (c) 1986-2003 may safely be consumed by a BSD or GPL license.
   6  * Written by:   Vladimir Oleynik <dzo@simtreas.ru>
   7  *
   8  * Used ideas:
   9  *      Adam Rogoyski    <rogoyski@cs.utexas.edu>
  10  *      Dave Cinege      <dcinege@psychosis.com>
  11  *      Jakub Jelinek (c) 1995
  12  *      Erik Andersen    <andersen@codepoet.org> (Majorly adjusted for busybox)
  13  *
  14  * This code is 'as is' with no warranty.
  15  */
  16
  17 /*
  18  * Usage and known bugs:
  19  * Terminal key codes are not extensive, more needs to be added.
  20  * This version was created on Debian GNU/Linux 2.x.
  21  * Delete, Backspace, Home, End, and the arrow keys were tested
  22  * to work in an Xterm and console. Ctrl-A also works as Home.
  23  * Ctrl-E also works as End.
  24  *
  25  * The following readline-like commands are not implemented:
  26  * ESC-b -- Move back one word
  27  * ESC-f -- Move forward one word
  28  * ESC-d -- Delete forward one word
  29  * CTL-t -- Transpose two characters
  30  *
  31  * lineedit does not know that the terminal escape sequences do not
  32  * take up space on the screen. The redisplay code assumes, unless
  33  * told otherwise, that each character in the prompt is a printable
  34  * character that takes up one character position on the screen.
  35  * You need to tell lineedit that some sequences of characters
  36  * in the prompt take up no screen space. Compatibly with readline,
  37  * use the \[ escape to begin a sequence of non-printing characters,
  38  * and the \] escape to signal the end of such a sequence. Example:
  39  *
  40  * PS1='\[\033[01;32m\]\u@\h\[\033[01;34m\] \w \$\[\033[00m\] '
  41  */
  42 #include "libbb.h"
  43 #include "unicode.h"
  44
  45 /* FIXME: obsolete CONFIG item? */
  46 #define ENABLE_FEATURE_NONPRINTABLE_INVERSE_PUT 0
  47
  48 #ifdef TEST
  49 # define ENABLE_FEATURE_EDITING 0
  50 # define ENABLE_FEATURE_TAB_COMPLETION 0
  51 # define ENABLE_FEATURE_USERNAME_COMPLETION 0
  52 # define ENABLE_FEATURE_NONPRINTABLE_INVERSE_PUT 0
  53 #endif
  54
  55
  56 /* Entire file (except TESTing part) sits inside this #if */
  57 #if ENABLE_FEATURE_EDITING
  58
  59
  60 #define ENABLE_FEATURE_GETUSERNAME_AND_HOMEDIR \
  61         (ENABLE_FEATURE_USERNAME_COMPLETION || ENABLE_FEATURE_EDITING_FANCY_PROMPT)
  62 #define IF_FEATURE_GETUSERNAME_AND_HOMEDIR(...)
  63 #if ENABLE_FEATURE_GETUSERNAME_AND_HOMEDIR
  64 #undef IF_FEATURE_GETUSERNAME_AND_HOMEDIR
  65 #define IF_FEATURE_GETUSERNAME_AND_HOMEDIR(...) __VA_ARGS__
  66 #endif
  67
  68
  69 #undef CHAR_T
  70 #if ENABLE_FEATURE_ASSUME_UNICODE
  71 # define BB_NUL L'\0'
  72 # define CHAR_T wchar_t
  73 static bool BB_isspace(CHAR_T c) { return ((unsigned)c < 256 && isspace(c)); }
  74 static bool BB_isalnum(CHAR_T c) { return ((unsigned)c < 256 && isalnum(c)); }
  75 static bool BB_ispunct(CHAR_T c) { return ((unsigned)c < 256 && ispunct(c)); }
  76 # undef isspace
  77 # undef isalnum
  78 # undef ispunct
  79 # undef isprint
  80 # define isspace isspace_must_not_be_used
  81 # define isalnum isalnum_must_not_be_used
  82 # define ispunct ispunct_must_not_be_used
  83 # define isprint isprint_must_not_be_used
  84 #else
  85 # define BB_NUL '\0'
  86 # define CHAR_T char
  87 # define BB_isspace(c) isspace(c)
  88 # define BB_isalnum(c) isalnum(c)
  89 # define BB_ispunct(c) ispunct(c)
  90 #endif
  91
  92
  93 enum {
  94         /* We use int16_t for positions, need to limit line len */
  95         MAX_LINELEN = CONFIG_FEATURE_EDITING_MAX_LEN < 0x7ff0
  96                       ? CONFIG_FEATURE_EDITING_MAX_LEN
  97                       : 0x7ff0
  98 };
  99
 100 #if ENABLE_FEATURE_GETUSERNAME_AND_HOMEDIR
 101 static const char null_str[] ALIGN1 = "";
 102 #endif
 103
 104 /* We try to minimize both static and stack usage. */
 105 struct lineedit_statics {
 106         line_input_t *state;
 107
 108         volatile unsigned cmdedit_termw; /* = 80; */ /* actual terminal width */
 109         sighandler_t previous_SIGWINCH_handler;
 110
 111         unsigned cmdedit_x;        /* real x (col) terminal position */
 112         unsigned cmdedit_y;        /* pseudoreal y (row) terminal position */
 113         unsigned cmdedit_prmt_len; /* length of prompt (without colors etc) */
 114
 115         unsigned cursor;
 116         int command_len; /* must be signed */
 117         /* signed maxsize: we want x in "if (x > S.maxsize)"
 118          * to _not_ be promoted to unsigned */
 119         int maxsize;
 120         CHAR_T *command_ps;
 121
 122         const char *cmdedit_prompt;
 123 #if ENABLE_FEATURE_EDITING_FANCY_PROMPT
 124         int num_ok_lines; /* = 1; */
 125 #endif
 126
 127 #if ENABLE_FEATURE_GETUSERNAME_AND_HOMEDIR
 128         char *user_buf;
 129         char *home_pwd_buf; /* = (char*)null_str; */
 130 #endif
 131
 132 #if ENABLE_FEATURE_TAB_COMPLETION
 133         char **matches;
 134         unsigned num_matches;
 135 #endif
 136
 137 #if ENABLE_FEATURE_EDITING_VI
 138 #define DELBUFSIZ 128
 139         CHAR_T *delptr;
 140         smallint newdelflag;     /* whether delbuf should be reused yet */
 141         CHAR_T delbuf[DELBUFSIZ];  /* a place to store deleted characters */
 142 #endif
 143
 144         /* Formerly these were big buffers on stack: */
 145 #if ENABLE_FEATURE_TAB_COMPLETION
 146         char exe_n_cwd_tab_completion__dirbuf[MAX_LINELEN];
 147         char input_tab__matchBuf[MAX_LINELEN];
 148         int16_t find_match__int_buf[MAX_LINELEN + 1]; /* need to have 9 bits at least */
 149         int16_t find_match__pos_buf[MAX_LINELEN + 1];
 150 #endif
 151 };
 152
 153 /* See lineedit_ptr_hack.c */
 154 extern struct lineedit_statics *const lineedit_ptr_to_statics;
 155
 156 #define S (*lineedit_ptr_to_statics)
 157 #define state            (S.state           )
 158 #define cmdedit_termw    (S.cmdedit_termw   )
 159 #define previous_SIGWINCH_handler (S.previous_SIGWINCH_handler)
 160 #define cmdedit_x        (S.cmdedit_x       )
 161 #define cmdedit_y        (S.cmdedit_y       )
 162 #define cmdedit_prmt_len (S.cmdedit_prmt_len)
 163 #define cursor           (S.cursor          )
 164 #define command_len      (S.command_len     )
 165 #define command_ps       (S.command_ps      )
 166 #define cmdedit_prompt   (S.cmdedit_prompt  )
 167 #define num_ok_lines     (S.num_ok_lines    )
 168 #define user_buf         (S.user_buf        )
 169 #define home_pwd_buf     (S.home_pwd_buf    )
 170 #define matches          (S.matches         )
 171 #define num_matches      (S.num_matches     )
 172 #define delptr           (S.delptr          )
 173 #define newdelflag       (S.newdelflag      )
 174 #define delbuf           (S.delbuf          )
 175
 176 #define INIT_S() do { \
 177         (*(struct lineedit_statics**)&lineedit_ptr_to_statics) = xzalloc(sizeof(S)); \
 178         barrier(); \
 179         cmdedit_termw = 80; \
 180         IF_FEATURE_EDITING_FANCY_PROMPT(num_ok_lines = 1;) \
 181         IF_FEATURE_GETUSERNAME_AND_HOMEDIR(home_pwd_buf = (char*)null_str;) \
 182 } while (0)
 183 static void deinit_S(void)
 184 {
 185 #if ENABLE_FEATURE_EDITING_FANCY_PROMPT
 186         /* This one is allocated only if FANCY_PROMPT is on
 187          * (otherwise it points to verbatim prompt (NOT malloced) */
 188         free((char*)cmdedit_prompt);
 189 #endif
 190 #if ENABLE_FEATURE_GETUSERNAME_AND_HOMEDIR
 191         free(user_buf);
 192         if (home_pwd_buf != null_str)
 193                 free(home_pwd_buf);
 194 #endif
 195         free(lineedit_ptr_to_statics);
 196 }
 197 #define DEINIT_S() deinit_S()
 198
 199
 200 #if ENABLE_FEATURE_ASSUME_UNICODE
 201 static size_t load_string(const char *src, int maxsize)
 202 {
 203         ssize_t len = mbstowcs(command_ps, src, maxsize - 1);
 204         if (len < 0)
 205                 len = 0;
 206         command_ps[len] = L'\0';
 207         return len;
 208 }
 209 static size_t save_string(char *dst, int maxsize)
 210 {
 211         ssize_t len = wcstombs(dst, command_ps, maxsize - 1);
 212         if (len < 0)
 213                 len = 0;
 214         dst[len] = '\0';
 215         return len;
 216 }
 217 /* I thought just fputwc(c, stdout) would work. But no... */
 218 static void BB_PUTCHAR(wchar_t c)
 219 {
 220         char buf[MB_CUR_MAX + 1];
 221         mbstate_t mbst = { 0 };
 222         ssize_t len = wcrtomb(buf, c, &mbst);
 223
 224         if (len > 0) {
 225                 buf[len] = '\0';
 226                 fputs(buf, stdout);
 227         }
 228 }
 229 #else
 230 static size_t load_string(const char *src, int maxsize)
 231 {
 232         safe_strncpy(command_ps, src, maxsize);
 233         return strlen(command_ps);
 234 }
 235 # if ENABLE_FEATURE_TAB_COMPLETION
 236 static void save_string(char *dst, int maxsize)
 237 {
 238         safe_strncpy(dst, command_ps, maxsize);
 239 }
 240 # endif
 241 # define BB_PUTCHAR(c) bb_putchar(c)
 242 #endif
 243
 244
 245 /* Put 'command_ps[cursor]', cursor++.
 246  * Advance cursor on screen. If we reached right margin, scroll text up
 247  * and remove terminal margin effect by printing 'next_char' */
 248 #define HACK_FOR_WRONG_WIDTH 1
 249 #if HACK_FOR_WRONG_WIDTH
 250 static void cmdedit_set_out_char(void)
 251 #define cmdedit_set_out_char(next_char) cmdedit_set_out_char()
 252 #else
 253 static void cmdedit_set_out_char(int next_char)
 254 #endif
 255 {
 256         CHAR_T c = command_ps[cursor];
 257
 258         if (c == BB_NUL) {
 259                 /* erase character after end of input string */
 260                 c = ' ';
 261         }
 262 #if ENABLE_FEATURE_NONPRINTABLE_INVERSE_PUT
 263         /* Display non-printable characters in reverse */
 264         if (!BB_isprint(c)) {
 265                 if (c >= 128)
 266                         c -= 128;
 267                 if (c < ' ')
 268                         c += '@';
 269                 if (c == 127)
 270                         c = '?';
 271                 printf("\033[7m%c\033[0m", c);
 272         } else
 273 #endif
 274         {
 275                 BB_PUTCHAR(c);
 276         }
 277         if (++cmdedit_x >= cmdedit_termw) {
 278                 /* terminal is scrolled down */
 279                 cmdedit_y++;
 280                 cmdedit_x = 0;
 281 #if HACK_FOR_WRONG_WIDTH
 282                 /* This works better if our idea of term width is wrong
 283                  * and it is actually wider (often happens on serial lines).
 284                  * Printing CR,LF *forces* cursor to next line.
 285                  * OTOH if terminal width is correct AND terminal does NOT
 286                  * have automargin (IOW: it is moving cursor to next line
 287                  * by itself (which is wrong for VT-10x terminals)),
 288                  * this will break things: there will be one extra empty line */
 289                 puts("\r"); /* + implicit '\n' */
 290 #else
 291                 /* Works ok only if cmdedit_termw is correct */
 292                 /* destroy "(auto)margin" */
 293                 bb_putchar(next_char);
 294                 bb_putchar('\b');
 295 #endif
 296         }
 297 // Huh? What if command_ps[cursor] == BB_NUL (we are at the end already?)
 298         cursor++;
 299 }
 300
 301 /* Move to end of line (by printing all chars till the end) */
 302 static void input_end(void)
 303 {
 304         while (cursor < command_len)
 305                 cmdedit_set_out_char(' ');
 306 }
 307
 308 /* Go to the next line */
 309 static void goto_new_line(void)
 310 {
 311         input_end();
 312         if (cmdedit_x)
 313                 bb_putchar('\n');
 314 }
 315
 316
 317 static void out1str(const char *s)
 318 {
 319         if (s)
 320                 fputs(s, stdout);
 321 }
 322
 323 static void beep(void)
 324 {
 325         bb_putchar('\007');
 326 }
 327
 328 /* Move back one character */
 329 /* (optimized for slow terminals) */
 330 static void input_backward(unsigned num)
 331 {
 332         int count_y;
 333
 334         if (num > cursor)
 335                 num = cursor;
 336         if (!num)
 337                 return;
 338         cursor -= num;
 339
 340         if (cmdedit_x >= num) {
 341                 cmdedit_x -= num;
 342                 if (num <= 4) {
 343                         /* This is longer by 5 bytes on x86.
 344                          * Also gets miscompiled for ARM users
 345                          * (busybox.net/bugs/view.php?id=2274).
 346                          * printf(("\b\b\b\b" + 4) - num);
 347                          * return;
 348                          */
 349                         do {
 350                                 bb_putchar('\b');
 351                         } while (--num);
 352                         return;
 353                 }
 354                 printf("\033[%uD", num);
 355                 return;
 356         }
 357
 358         /* Need to go one or more lines up */
 359         num -= cmdedit_x;
 360         {
 361                 unsigned w = cmdedit_termw; /* volatile var */
 362                 count_y = 1 + (num / w);
 363                 cmdedit_y -= count_y;
 364                 cmdedit_x = w * count_y - num;
 365         }
 366         /* go to 1st column; go up; go to correct column */
 367         printf("\r" "\033[%dA" "\033[%dC", count_y, cmdedit_x);
 368 }
 369
 370 static void put_prompt(void)
 371 {
 372         out1str(cmdedit_prompt);
 373         fflush(NULL);
 374         if (ENABLE_FEATURE_EDITING_ASK_TERMINAL) {
 375                 /* Ask terminal where is the cursor now.
 376                  * lineedit_read_key handles response and corrects
 377                  * our idea of current cursor position.
 378                  * Testcase: run "echo -n long_line_long_line_long_line",
 379                  * then type in a long, wrapping command and try to
 380                  * delete it using backspace key.
 381                  * Note: we print it _after_ prompt, because
 382                  * prompt may contain CR. Example: PS1='\[\r\n\]\w '
 383                  */
 384                 /* Problem: if there is buffered input on stdin,
 385                  * the response will be delivered later,
 386                  * possibly to an unsuspecting application.
 387                  * Testcase: "sleep 1; busybox ash" + press and hold [Enter].
 388                  * Result:
 389                  * ~/srcdevel/bbox/fix/busybox.t4 #
 390                  * ~/srcdevel/bbox/fix/busybox.t4 #
 391                  * ^[[59;34~/srcdevel/bbox/fix/busybox.t4 #  <-- garbage
 392                  * ~/srcdevel/bbox/fix/busybox.t4 #
 393                  *
 394                  * Checking for input with poll only makes the race narrower,
 395                  * I still can trigger it. Strace:
 396                  *
 397                  * write(1, "~/srcdevel/bbox/fix/busybox.t4 # ", 33) = 33
 398                  * poll([{fd=0, events=POLLIN}], 1, 0) = 0 (Timeout)  <-- no input exists
 399                  * write(1, "\33[6n", 4) = 4  <-- send the ESC sequence, quick!
 400                  * poll([{fd=0, events=POLLIN}], 1, 4294967295) = 1 ([{fd=0, revents=POLLIN}])
 401                  * read(0, "\n", 1)      = 1  <-- oh crap, user's input got in first
 402                  */
 403                 struct pollfd pfd;
 404
 405                 pfd.fd = STDIN_FILENO;
 406                 pfd.events = POLLIN;
 407                 if (safe_poll(&pfd, 1, 0) == 0) {
 408                         out1str("\033" "[6n");
 409                         fflush(NULL); /* make terminal see it ASAP! */
 410                 }
 411         }
 412         cursor = 0;
 413         {
 414                 unsigned w = cmdedit_termw; /* volatile var */
 415                 cmdedit_y = cmdedit_prmt_len / w; /* new quasireal y */
 416                 cmdedit_x = cmdedit_prmt_len % w;
 417         }
 418 }
 419
 420 /* draw prompt, editor line, and clear tail */
 421 static void redraw(int y, int back_cursor)
 422 {
 423         if (y > 0)  /* up to start y */
 424                 printf("\033[%uA", y);
 425         bb_putchar('\r');
 426         put_prompt();
 427         input_end();      /* rewrite */
 428         printf("\033[J"); /* erase after cursor */
 429         input_backward(back_cursor);
 430 }
 431
 432 /* Delete the char in front of the cursor, optionally saving it
 433  * for later putback */
 434 #if !ENABLE_FEATURE_EDITING_VI
 435 static void input_delete(void)
 436 #define input_delete(save) input_delete()
 437 #else
 438 static void input_delete(int save)
 439 #endif
 440 {
 441         int j = cursor;
 442
 443         if (j == (int)command_len)
 444                 return;
 445
 446 #if ENABLE_FEATURE_EDITING_VI
 447         if (save) {
 448                 if (newdelflag) {
 449                         delptr = delbuf;
 450                         newdelflag = 0;
 451                 }
 452                 if ((delptr - delbuf) < DELBUFSIZ)
 453                         *delptr++ = command_ps[j];
 454         }
 455 #endif
 456
 457         memmove(command_ps + j, command_ps + j + 1,
 458                         /* (command_len + 1 [because of NUL]) - (j + 1)
 459                          * simplified into (command_len - j) */
 460                         (command_len - j) * sizeof(command_ps[0]));
 461         command_len--;
 462         input_end();                    /* rewrite new line */
 463         cmdedit_set_out_char(' ');      /* erase char */
 464         input_backward(cursor - j);     /* back to old pos cursor */
 465 }
 466
 467 #if ENABLE_FEATURE_EDITING_VI
 468 static void put(void)
 469 {
 470         int ocursor;
 471         int j = delptr - delbuf;
 472
 473         if (j == 0)
 474                 return;
 475         ocursor = cursor;
 476         /* open hole and then fill it */
 477         memmove(command_ps + cursor + j, command_ps + cursor,
 478                         (command_len - cursor + 1) * sizeof(command_ps[0]));
 479         memcpy(command_ps + cursor, delbuf, j * sizeof(command_ps[0]));
 480         command_len += j;
 481         input_end();                    /* rewrite new line */
 482         input_backward(cursor - ocursor - j + 1); /* at end of new text */
 483 }
 484 #endif
 485
 486 /* Delete the char in back of the cursor */
 487 static void input_backspace(void)
 488 {
 489         if (cursor > 0) {
 490                 input_backward(1);
 491                 input_delete(0);
 492         }
 493 }
 494
 495 /* Move forward one character */
 496 static void input_forward(void)
 497 {
 498         if (cursor < command_len)
 499                 cmdedit_set_out_char(command_ps[cursor + 1]);
 500 }
 501
 502 #if ENABLE_FEATURE_TAB_COMPLETION
 503
 504 static void free_tab_completion_data(void)
 505 {
 506         if (matches) {
 507                 while (num_matches)
 508                         free(matches[--num_matches]);
 509                 free(matches);
 510                 matches = NULL;
 511         }
 512 }
 513
 514 static void add_match(char *matched)
 515 {
 516         matches = xrealloc_vector(matches, 4, num_matches);
 517         matches[num_matches] = matched;
 518         num_matches++;
 519 }
 520
 521 #if ENABLE_FEATURE_USERNAME_COMPLETION
 522 static void username_tab_completion(char *ud, char *with_shash_flg)
 523 {
 524         struct passwd *entry;
 525         int userlen;
 526
 527         ud++;                           /* ~user/... to user/... */
 528         userlen = strlen(ud);
 529
 530         if (with_shash_flg) {           /* "~/..." or "~user/..." */
 531                 char *sav_ud = ud - 1;
 532                 char *home = NULL;
 533
 534                 if (*ud == '/') {       /* "~/..."     */
 535                         home = home_pwd_buf;
 536                 } else {
 537                         /* "~user/..." */
 538                         char *temp;
 539                         temp = strchr(ud, '/');
 540                         *temp = '\0';           /* ~user\0 */
 541                         entry = getpwnam(ud);
 542                         *temp = '/';            /* restore ~user/... */
 543                         ud = temp;
 544                         if (entry)
 545                                 home = entry->pw_dir;
 546                 }
 547                 if (home) {
 548                         if ((userlen + strlen(home) + 1) < MAX_LINELEN) {
 549                                 /* /home/user/... */
 550                                 sprintf(sav_ud, "%s%s", home, ud);
 551                         }
 552                 }
 553         } else {
 554                 /* "~[^/]*" */
 555                 /* Using _r function to avoid pulling in static buffers */
 556                 char line_buff[256];
 557                 struct passwd pwd;
 558                 struct passwd *result;
 559
 560                 setpwent();
 561                 while (!getpwent_r(&pwd, line_buff, sizeof(line_buff), &result)) {
 562                         /* Null usernames should result in all users as possible completions. */
 563                         if (/*!userlen || */ strncmp(ud, pwd.pw_name, userlen) == 0) {
 564                                 add_match(xasprintf("~%s/", pwd.pw_name));
 565                         }
 566                 }
 567                 endpwent();
 568         }
 569 }
 570 #endif  /* FEATURE_COMMAND_USERNAME_COMPLETION */
 571
 572 enum {
 573         FIND_EXE_ONLY = 0,
 574         FIND_DIR_ONLY = 1,
 575         FIND_FILE_ONLY = 2,
 576 };
 577
 578 static int path_parse(char ***p, int flags)
 579 {
 580         int npth;
 581         const char *pth;
 582         char *tmp;
 583         char **res;
 584
 585         /* if not setenv PATH variable, to search cur dir "." */
 586         if (flags != FIND_EXE_ONLY)
 587                 return 1;
 588
 589         if (state->flags & WITH_PATH_LOOKUP)
 590                 pth = state->path_lookup;
 591         else
 592                 pth = getenv("PATH");
 593         /* PATH=<empty> or PATH=:<empty> */
 594         if (!pth || !pth[0] || LONE_CHAR(pth, ':'))
 595                 return 1;
 596
 597         tmp = (char*)pth;
 598         npth = 1; /* path component count */
 599         while (1) {
 600                 tmp = strchr(tmp, ':');
 601                 if (!tmp)
 602                         break;
 603                 if (*++tmp == '\0')
 604                         break;  /* :<empty> */
 605                 npth++;
 606         }
 607
 608         res = xmalloc(npth * sizeof(char*));
 609         res[0] = tmp = xstrdup(pth);
 610         npth = 1;
 611         while (1) {
 612                 tmp = strchr(tmp, ':');
 613                 if (!tmp)
 614                         break;
 615                 *tmp++ = '\0'; /* ':' -> '\0' */
 616                 if (*tmp == '\0')
 617                         break; /* :<empty> */
 618                 res[npth++] = tmp;
 619         }
 620         *p = res;
 621         return npth;
 622 }
 623
 624 static void exe_n_cwd_tab_completion(char *command, int type)
 625 {
 626         DIR *dir;
 627         struct dirent *next;
 628         struct stat st;
 629         char *path1[1];
 630         char **paths = path1;
 631         int npaths;
 632         int i;
 633         char *found;
 634         char *pfind = strrchr(command, '/');
 635 /*      char dirbuf[MAX_LINELEN]; */
 636 #define dirbuf (S.exe_n_cwd_tab_completion__dirbuf)
 637
 638         npaths = 1;
 639         path1[0] = (char*)".";
 640
 641         if (pfind == NULL) {
 642                 /* no dir, if flags==EXE_ONLY - get paths, else "." */
 643                 npaths = path_parse(&paths, type);
 644                 pfind = command;
 645         } else {
 646                 /* dirbuf = ".../.../.../" */
 647                 safe_strncpy(dirbuf, command, (pfind - command) + 2);
 648 #if ENABLE_FEATURE_USERNAME_COMPLETION
 649                 if (dirbuf[0] == '~')   /* ~/... or ~user/... */
 650                         username_tab_completion(dirbuf, dirbuf);
 651 #endif
 652                 paths[0] = dirbuf;
 653                 /* point to 'l' in "..../last_component" */
 654                 pfind++;
 655         }
 656
 657         for (i = 0; i < npaths; i++) {
 658                 dir = opendir(paths[i]);
 659                 if (!dir)
 660                         continue; /* don't print an error */
 661
 662                 while ((next = readdir(dir)) != NULL) {
 663                         int len1;
 664                         const char *str_found = next->d_name;
 665
 666                         /* matched? */
 667                         if (strncmp(str_found, pfind, strlen(pfind)))
 668                                 continue;
 669                         /* not see .name without .match */
 670                         if (*str_found == '.' && *pfind == '\0') {
 671                                 if (NOT_LONE_CHAR(paths[i], '/') || str_found[1])
 672                                         continue;
 673                                 str_found = ""; /* only "/" */
 674                         }
 675                         found = concat_path_file(paths[i], str_found);
 676                         /* hmm, remove in progress? */
 677                         /* NB: stat() first so that we see is it a directory;
 678                          * but if that fails, use lstat() so that
 679                          * we still match dangling links */
 680                         if (stat(found, &st) && lstat(found, &st))
 681                                 goto cont;
 682                         /* find with dirs? */
 683                         if (paths[i] != dirbuf)
 684                                 strcpy(found, next->d_name); /* only name */
 685
 686                         len1 = strlen(found);
 687                         found = xrealloc(found, len1 + 2);
 688                         found[len1] = '\0';
 689                         found[len1+1] = '\0';
 690
 691                         if (S_ISDIR(st.st_mode)) {
 692                                 /* name is a directory */
 693                                 if (found[len1-1] != '/') {
 694                                         found[len1] = '/';
 695                                 }
 696                         } else {
 697                                 /* not put found file if search only dirs for cd */
 698                                 if (type == FIND_DIR_ONLY)
 699                                         goto cont;
 700                         }
 701                         /* Add it to the list */
 702                         add_match(found);
 703                         continue;
 704  cont:
 705                         free(found);
 706                 }
 707                 closedir(dir);
 708         }
 709         if (paths != path1) {
 710                 free(paths[0]); /* allocated memory is only in first member */
 711                 free(paths);
 712         }
 713 #undef dirbuf
 714 }
 715
 716 /* QUOT is used on elements of int_buf[], which are bytes,
 717  * not Unicode chars. Therefore it works correctly even in Unicode mode.
 718  */
 719 #define QUOT (UCHAR_MAX+1)
 720
 721 #define int_buf (S.find_match__int_buf)
 722 #define pos_buf (S.find_match__pos_buf)
 723 /* is must be <= in */
 724 static void collapse_pos(int is, int in)
 725 {
 726         memmove(int_buf+is, int_buf+in, (MAX_LINELEN+1-in)*sizeof(int_buf[0]));
 727         memmove(pos_buf+is, pos_buf+in, (MAX_LINELEN+1-in)*sizeof(pos_buf[0]));
 728 }
 729 static NOINLINE int find_match(char *matchBuf, int *len_with_quotes)
 730 {
 731         int i, j;
 732         int command_mode;
 733         int c, c2;
 734 /*      Were local, but it uses too much stack */
 735 /*      int16_t int_buf[MAX_LINELEN + 1]; */
 736 /*      int16_t pos_buf[MAX_LINELEN + 1]; */
 737
 738         /* set to integer dimension characters and own positions */
 739         for (i = 0;; i++) {
 740                 int_buf[i] = (unsigned char)matchBuf[i];
 741                 if (int_buf[i] == 0) {
 742                         pos_buf[i] = -1; /* end-fo-line indicator */
 743                         break;
 744                 }
 745                 pos_buf[i] = i;
 746         }
 747
 748         /* mask \+symbol and convert '\t' to ' ' */
 749         for (i = j = 0; matchBuf[i]; i++, j++)
 750                 if (matchBuf[i] == '\\') {
 751                         collapse_pos(j, j + 1);
 752                         int_buf[j] |= QUOT;
 753                         i++;
 754 #if ENABLE_FEATURE_NONPRINTABLE_INVERSE_PUT
 755                         if (matchBuf[i] == '\t')  /* algorithm equivalent */
 756                                 int_buf[j] = ' ' | QUOT;
 757 #endif
 758                 }
 759 #if ENABLE_FEATURE_NONPRINTABLE_INVERSE_PUT
 760                 else if (matchBuf[i] == '\t')
 761                         int_buf[j] = ' ';
 762 #endif
 763
 764         /* mask "symbols" or 'symbols' */
 765         c2 = 0;
 766         for (i = 0; int_buf[i]; i++) {
 767                 c = int_buf[i];
 768                 if (c == '\'' || c == '"') {
 769                         if (c2 == 0)
 770                                 c2 = c;
 771                         else {
 772                                 if (c == c2)
 773                                         c2 = 0;
 774                                 else
 775                                         int_buf[i] |= QUOT;
 776                         }
 777                 } else if (c2 != 0 && c != '$')
 778                         int_buf[i] |= QUOT;
 779         }
 780
 781         /* skip commands with arguments if line has commands delimiters */
 782         /* ';' ';;' '&' '|' '&&' '||' but `>&' `<&' `>|' */
 783         for (i = 0; int_buf[i]; i++) {
 784                 c = int_buf[i];
 785                 c2 = int_buf[i + 1];
 786                 j = i ? int_buf[i - 1] : -1;
 787                 command_mode = 0;
 788                 if (c == ';' || c == '&' || c == '|') {
 789                         command_mode = 1 + (c == c2);
 790                         if (c == '&') {
 791                                 if (j == '>' || j == '<')
 792                                         command_mode = 0;
 793                         } else if (c == '|' && j == '>')
 794                                 command_mode = 0;
 795                 }
 796                 if (command_mode) {
 797                         collapse_pos(0, i + command_mode);
 798                         i = -1;  /* hack incremet */
 799                 }
 800         }
 801         /* collapse `command...` */
 802         for (i = 0; int_buf[i]; i++) {
 803                 if (int_buf[i] == '`') {
 804                         for (j = i + 1; int_buf[j]; j++)
 805                                 if (int_buf[j] == '`') {
 806                                         collapse_pos(i, j + 1);
 807                                         j = 0;
 808                                         break;
 809                                 }
 810                         if (j) {
 811                                 /* not found closing ` - command mode, collapse all previous */
 812                                 collapse_pos(0, i + 1);
 813                                 break;
 814                         } else
 815                                 i--;  /* hack incremet */
 816                 }
 817         }
 818
 819         /* collapse (command...(command...)...) or {command...{command...}...} */
 820         c = 0;  /* "recursive" level */
 821         c2 = 0;
 822         for (i = 0; int_buf[i]; i++) {
 823                 if (int_buf[i] == '(' || int_buf[i] == '{') {
 824                         if (int_buf[i] == '(')
 825                                 c++;
 826                         else
 827                                 c2++;
 828                         collapse_pos(0, i + 1);
 829                         i = -1;  /* hack incremet */
 830                 }
 831         }
 832         for (i = 0; pos_buf[i] >= 0 && (c > 0 || c2 > 0); i++) {
 833                 if ((int_buf[i] == ')' && c > 0) || (int_buf[i] == '}' && c2 > 0)) {
 834                         if (int_buf[i] == ')')
 835                                 c--;
 836                         else
 837                                 c2--;
 838                         collapse_pos(0, i + 1);
 839                         i = -1;  /* hack incremet */
 840                 }
 841         }
 842
 843         /* skip first not quote space */
 844         for (i = 0; int_buf[i]; i++)
 845                 if (int_buf[i] != ' ')
 846                         break;
 847         if (i)
 848                 collapse_pos(0, i);
 849
 850         /* set find mode for completion */
 851         command_mode = FIND_EXE_ONLY;
 852         for (i = 0; int_buf[i]; i++) {
 853                 if (int_buf[i] == ' ' || int_buf[i] == '<' || int_buf[i] == '>') {
 854                         if (int_buf[i] == ' ' && command_mode == FIND_EXE_ONLY
 855                          && matchBuf[pos_buf[0]] == 'c'
 856                          && matchBuf[pos_buf[1]] == 'd'
 857                         ) {
 858                                 command_mode = FIND_DIR_ONLY;
 859                         } else {
 860                                 command_mode = FIND_FILE_ONLY;
 861                                 break;
 862                         }
 863                 }
 864         }
 865         for (i = 0; int_buf[i]; i++)
 866                 /* "strlen" */;
 867         /* find last word */
 868         for (--i; i >= 0; i--) {
 869                 c = int_buf[i];
 870                 if (c == ' ' || c == '<' || c == '>' || c == '|' || c == '&') {
 871                         collapse_pos(0, i + 1);
 872                         break;
 873                 }
 874         }
 875         /* skip first not quoted '\'' or '"' */
 876         for (i = 0; int_buf[i] == '\'' || int_buf[i] == '"'; i++)
 877                 /*skip*/;
 878         /* collapse quote or unquote // or /~ */
 879         while ((int_buf[i] & ~QUOT) == '/'
 880          && ((int_buf[i+1] & ~QUOT) == '/' || (int_buf[i+1] & ~QUOT) == '~')
 881         ) {
 882                 i++;
 883         }
 884
 885         /* set only match and destroy quotes */
 886         j = 0;
 887         for (c = 0; pos_buf[i] >= 0; i++) {
 888                 matchBuf[c++] = matchBuf[pos_buf[i]];
 889                 j = pos_buf[i] + 1;
 890         }
 891         matchBuf[c] = '\0';
 892         /* old length matchBuf with quotes symbols */
 893         *len_with_quotes = j ? j - pos_buf[0] : 0;
 894
 895         return command_mode;
 896 }
 897 #undef int_buf
 898 #undef pos_buf
 899
 900 /*
 901  * display by column (original idea from ls applet,
 902  * very optimized by me :)
 903  */
 904 static void showfiles(void)
 905 {
 906         int ncols, row;
 907         int column_width = 0;
 908         int nfiles = num_matches;
 909         int nrows = nfiles;
 910         int l;
 911
 912         /* find the longest file name - use that as the column width */
 913         for (row = 0; row < nrows; row++) {
 914                 l = bb_mbstrlen(matches[row]);
 915                 if (column_width < l)
 916                         column_width = l;
 917         }
 918         column_width += 2;              /* min space for columns */
 919         ncols = cmdedit_termw / column_width;
 920
 921         if (ncols > 1) {
 922                 nrows /= ncols;
 923                 if (nfiles % ncols)
 924                         nrows++;        /* round up fractionals */
 925         } else {
 926                 ncols = 1;
 927         }
 928         for (row = 0; row < nrows; row++) {
 929                 int n = row;
 930                 int nc;
 931
 932                 for (nc = 1; nc < ncols && n+nrows < nfiles; n += nrows, nc++) {
 933                         printf("%s%-*s", matches[n],
 934                                 (int)(column_width - bb_mbstrlen(matches[n])), ""
 935                         );
 936                 }
 937                 puts(matches[n]);
 938         }
 939 }
 940
 941 static char *add_quote_for_spec_chars(char *found)
 942 {
 943         int l = 0;
 944         char *s = xzalloc((strlen(found) + 1) * 2);
 945
 946         while (*found) {
 947                 if (strchr(" `\"#$%^&*()=+{}[]:;'|\\<>", *found))
 948                         s[l++] = '\\';
 949                 s[l++] = *found++;
 950         }
 951         /* s[l] = '\0'; - already is */
 952         return s;
 953 }
 954
 955 /* Do TAB completion */
 956 static void input_tab(smallint *lastWasTab)
 957 {
 958         if (!(state->flags & TAB_COMPLETION))
 959                 return;
 960
 961         if (!*lastWasTab) {
 962                 char *tmp, *tmp1;
 963                 size_t len_found;
 964 /*              char matchBuf[MAX_LINELEN]; */
 965 #define matchBuf (S.input_tab__matchBuf)
 966                 int find_type;
 967                 int recalc_pos;
 968 #if ENABLE_FEATURE_ASSUME_UNICODE
 969                 /* cursor pos in command converted to multibyte form */
 970                 int cursor_mb;
 971 #endif
 972
 973                 *lastWasTab = TRUE;             /* flop trigger */
 974
 975                 /* Make a local copy of the string --
 976                  * up to the position of the cursor */
 977                 save_string(matchBuf, cursor + 1);
 978 #if ENABLE_FEATURE_ASSUME_UNICODE
 979                 cursor_mb = strlen(matchBuf);
 980 #endif
 981                 tmp = matchBuf;
 982
 983                 find_type = find_match(matchBuf, &recalc_pos);
 984
 985                 /* Free up any memory already allocated */
 986                 free_tab_completion_data();
 987
 988 #if ENABLE_FEATURE_USERNAME_COMPLETION
 989                 /* If the word starts with `~' and there is no slash in the word,
 990                  * then try completing this word as a username. */
 991                 if (state->flags & USERNAME_COMPLETION)
 992                         if (matchBuf[0] == '~' && strchr(matchBuf, '/') == NULL)
 993                                 username_tab_completion(matchBuf, NULL);
 994 #endif
 995                 /* Try to match any executable in our path and everything
 996                  * in the current working directory */
 997                 if (!matches)
 998                         exe_n_cwd_tab_completion(matchBuf, find_type);
 999                 /* Sort, then remove any duplicates found */
1000                 if (matches) {
1001                         unsigned i;
1002                         int n = 0;
1003                         qsort_string_vector(matches, num_matches);
1004                         for (i = 0; i < num_matches - 1; ++i) {
1005                                 if (matches[i] && matches[i+1]) { /* paranoia */
1006                                         if (strcmp(matches[i], matches[i+1]) == 0) {
1007                                                 free(matches[i]);
1008                                                 matches[i] = NULL; /* paranoia */
1009                                         } else {
1010                                                 matches[n++] = matches[i];
1011                                         }
1012                                 }
1013                         }
1014                         matches[n] = matches[i];
1015                         num_matches = n + 1;
1016                 }
1017                 /* Did we find exactly one match? */
1018                 if (!matches || num_matches > 1) { /* no */
1019                         beep();
1020                         if (!matches)
1021                                 return;         /* not found */
1022                         /* find minimal match */
1023                         tmp1 = xstrdup(matches[0]);
1024                         for (tmp = tmp1; *tmp; tmp++) {
1025                                 for (len_found = 1; len_found < num_matches; len_found++) {
1026                                         if (matches[len_found][tmp - tmp1] != *tmp) {
1027                                                 *tmp = '\0';
1028                                                 break;
1029                                         }
1030                                 }
1031                         }
1032                         if (*tmp1 == '\0') {        /* have unique */
1033                                 free(tmp1);
1034                                 return;
1035                         }
1036                         tmp = add_quote_for_spec_chars(tmp1);
1037                         free(tmp1);
1038                 } else {                        /* one match */
1039                         tmp = add_quote_for_spec_chars(matches[0]);
1040                         /* for next completion current found */
1041                         *lastWasTab = FALSE;
1042
1043                         len_found = strlen(tmp);
1044                         if (tmp[len_found-1] != '/') {
1045                                 tmp[len_found] = ' ';
1046                                 tmp[len_found+1] = '\0';
1047                         }
1048                 }
1049
1050                 len_found = strlen(tmp);
1051 #if !ENABLE_FEATURE_ASSUME_UNICODE
1052                 /* have space to place the match? */
1053                 /* The result consists of three parts with these lengths: */
1054                 /* (cursor - recalc_pos) + len_found + (command_len - cursor) */
1055                 /* it simplifies into: */
1056                 if ((int)(len_found + command_len - recalc_pos) < S.maxsize) {
1057                         /* save tail */
1058                         strcpy(matchBuf, command_ps + cursor);
1059                         /* add match and tail */
1060                         sprintf(&command_ps[cursor - recalc_pos], "%s%s", tmp, matchBuf);
1061                         command_len = strlen(command_ps);
1062                         /* new pos */
1063                         recalc_pos = cursor - recalc_pos + len_found;
1064                         /* write out the matched command */
1065                         redraw(cmdedit_y, command_len - recalc_pos);
1066                 }
1067 #else
1068                 {
1069                         char command[MAX_LINELEN];
1070                         int len = save_string(command, sizeof(command));
1071                         /* have space to place the match? */
1072                         /* (cursor_mb - recalc_pos) + len_found + (len - cursor_mb) */
1073                         if ((int)(len_found + len - recalc_pos) < MAX_LINELEN) {
1074                                 /* save tail */
1075                                 strcpy(matchBuf, command + cursor_mb);
1076                                 /* where do we want to have cursor after all? */
1077                                 strcpy(&command[cursor_mb - recalc_pos], tmp);
1078                                 len = load_string(command, S.maxsize);
1079                                 /* add match and tail */
1080                                 sprintf(&command[cursor_mb - recalc_pos], "%s%s", tmp, matchBuf);
1081                                 command_len = load_string(command, S.maxsize);
1082                                 /* write out the matched command */
1083                                 redraw(cmdedit_y, command_len - len);
1084                         }
1085                 }
1086 #endif
1087                 free(tmp);
1088 #undef matchBuf
1089         } else {
1090                 /* Ok -- the last char was a TAB.  Since they
1091                  * just hit TAB again, print a list of all the
1092                  * available choices... */
1093                 if (matches && num_matches > 0) {
1094                         /* changed by goto_new_line() */
1095                         int sav_cursor = cursor;
1096
1097                         /* Go to the next line */
1098                         goto_new_line();
1099                         showfiles();
1100                         redraw(0, command_len - sav_cursor);
1101                 }
1102         }
1103 }
1104
1105 #endif  /* FEATURE_COMMAND_TAB_COMPLETION */
1106
1107
1108 line_input_t* FAST_FUNC new_line_input_t(int flags)
1109 {
1110         line_input_t *n = xzalloc(sizeof(*n));
1111         n->flags = flags;
1112         return n;
1113 }
1114
1115
1116 #if MAX_HISTORY > 0
1117
1118 static void save_command_ps_at_cur_history(void)
1119 {
1120         if (command_ps[0] != BB_NUL) {
1121                 int cur = state->cur_history;
1122                 free(state->history[cur]);
1123
1124 # if ENABLE_FEATURE_ASSUME_UNICODE
1125                 {
1126                         char tbuf[MAX_LINELEN];
1127                         save_string(tbuf, sizeof(tbuf));
1128                         state->history[cur] = xstrdup(tbuf);
1129                 }
1130 # else
1131                 state->history[cur] = xstrdup(command_ps);
1132 # endif
1133         }
1134 }
1135
1136 /* state->flags is already checked to be nonzero */
1137 static int get_previous_history(void)
1138 {
1139         if ((state->flags & DO_HISTORY) && state->cur_history) {
1140                 save_command_ps_at_cur_history();
1141                 state->cur_history--;
1142                 return 1;
1143         }
1144         beep();
1145         return 0;
1146 }
1147
1148 static int get_next_history(void)
1149 {
1150         if (state->flags & DO_HISTORY) {
1151                 if (state->cur_history < state->cnt_history) {
1152                         save_command_ps_at_cur_history(); /* save the current history line */
1153                         return ++state->cur_history;
1154                 }
1155         }
1156         beep();
1157         return 0;
1158 }
1159
1160 # if ENABLE_FEATURE_EDITING_SAVEHISTORY
1161 /* We try to ensure that concurrent additions to the history
1162  * do not overwrite each other.
1163  * Otherwise shell users get unhappy.
1164  *
1165  * History file is trimmed lazily, when it grows several times longer
1166  * than configured MAX_HISTORY lines.
1167  */
1168
1169 static void free_line_input_t(line_input_t *n)
1170 {
1171         int i = n->cnt_history;
1172         while (i > 0)
1173                 free(n->history[--i]);
1174         free(n);
1175 }
1176
1177 /* state->flags is already checked to be nonzero */
1178 static void load_history(line_input_t *st_parm)
1179 {
1180         char *temp_h[MAX_HISTORY];
1181         char *line;
1182         FILE *fp;
1183         unsigned idx, i, line_len;
1184
1185         /* NB: do not trash old history if file can't be opened */
1186
1187         fp = fopen_for_read(st_parm->hist_file);
1188         if (fp) {
1189                 /* clean up old history */
1190                 for (idx = st_parm->cnt_history; idx > 0;) {
1191                         idx--;
1192                         free(st_parm->history[idx]);
1193                         st_parm->history[idx] = NULL;
1194                 }
1195
1196                 /* fill temp_h[], retaining only last MAX_HISTORY lines */
1197                 memset(temp_h, 0, sizeof(temp_h));
1198                 st_parm->cnt_history_in_file = idx = 0;
1199                 while ((line = xmalloc_fgetline(fp)) != NULL) {
1200                         if (line[0] == '\0') {
1201                                 free(line);
1202                                 continue;
1203                         }
1204                         free(temp_h[idx]);
1205                         temp_h[idx] = line;
1206                         st_parm->cnt_history_in_file++;
1207                         idx++;
1208                         if (idx == MAX_HISTORY)
1209                                 idx = 0;
1210                 }
1211                 fclose(fp);
1212
1213                 /* find first non-NULL temp_h[], if any */
1214                 if (st_parm->cnt_history_in_file) {
1215                         while (temp_h[idx] == NULL) {
1216                                 idx++;
1217                                 if (idx == MAX_HISTORY)
1218                                         idx = 0;
1219                         }
1220                 }
1221
1222                 /* copy temp_h[] to st_parm->history[] */
1223                 for (i = 0; i < MAX_HISTORY;) {
1224                         line = temp_h[idx];
1225                         if (!line)
1226                                 break;
1227                         idx++;
1228                         if (idx == MAX_HISTORY)
1229                                 idx = 0;
1230                         line_len = strlen(line);
1231                         if (line_len >= MAX_LINELEN)
1232                                 line[MAX_LINELEN-1] = '\0';
1233                         st_parm->history[i++] = line;
1234                 }
1235                 st_parm->cnt_history = i;
1236         }
1237 }
1238
1239 /* state->flags is already checked to be nonzero */
1240 static void save_history(char *str)
1241 {
1242         int fd;
1243         int len, len2;
1244
1245         fd = open(state->hist_file, O_WRONLY | O_CREAT | O_APPEND, 0666);
1246         if (fd < 0)
1247                 return;
1248         xlseek(fd, 0, SEEK_END); /* paranoia */
1249         len = strlen(str);
1250         str[len] = '\n'; /* we (try to) do atomic write */
1251         len2 = full_write(fd, str, len + 1);
1252         str[len] = '\0';
1253         close(fd);
1254         if (len2 != len + 1)
1255                 return; /* "wtf?" */
1256
1257         /* did we write so much that history file needs trimming? */
1258         state->cnt_history_in_file++;
1259         if (state->cnt_history_in_file > MAX_HISTORY * 4) {
1260                 FILE *fp;
1261                 char *new_name;
1262                 line_input_t *st_temp;
1263                 int i;
1264
1265                 /* we may have concurrently written entries from others.
1266                  * load them */
1267                 st_temp = new_line_input_t(state->flags);
1268                 st_temp->hist_file = state->hist_file;
1269                 load_history(st_temp);
1270
1271                 /* write out temp file and replace hist_file atomically */
1272                 new_name = xasprintf("%s.%u.new", state->hist_file, (int) getpid());
1273                 fp = fopen_for_write(new_name);
1274                 if (fp) {
1275                         for (i = 0; i < st_temp->cnt_history; i++)
1276                                 fprintf(fp, "%s\n", st_temp->history[i]);
1277                         fclose(fp);
1278                         if (rename(new_name, state->hist_file) == 0)
1279                                 state->cnt_history_in_file = st_temp->cnt_history;
1280                 }
1281                 free(new_name);
1282                 free_line_input_t(st_temp);
1283         }
1284 }
1285 # else
1286 #  define load_history(a) ((void)0)
1287 #  define save_history(a) ((void)0)
1288 # endif /* FEATURE_COMMAND_SAVEHISTORY */
1289
1290 static void remember_in_history(char *str)
1291 {
1292         int i;
1293
1294         if (!(state->flags & DO_HISTORY))
1295                 return;
1296         if (str[0] == '\0')
1297                 return;
1298         i = state->cnt_history;
1299         /* Don't save dupes */
1300         if (i && strcmp(state->history[i-1], str) == 0)
1301                 return;
1302
1303         free(state->history[MAX_HISTORY]); /* redundant, paranoia */
1304         state->history[MAX_HISTORY] = NULL; /* redundant, paranoia */
1305
1306         /* If history[] is full, remove the oldest command */
1307         /* we need to keep history[MAX_HISTORY] empty, hence >=, not > */
1308         if (i >= MAX_HISTORY) {
1309                 free(state->history[0]);
1310                 for (i = 0; i < MAX_HISTORY-1; i++)
1311                         state->history[i] = state->history[i+1];
1312                 /* i == MAX_HISTORY-1 */
1313         }
1314         /* i <= MAX_HISTORY-1 */
1315         state->history[i++] = xstrdup(str);
1316         /* i <= MAX_HISTORY */
1317         state->cur_history = i;
1318         state->cnt_history = i;
1319 # if MAX_HISTORY > 0 && ENABLE_FEATURE_EDITING_SAVEHISTORY
1320         if ((state->flags & SAVE_HISTORY) && state->hist_file)
1321                 save_history(str);
1322 # endif
1323         IF_FEATURE_EDITING_FANCY_PROMPT(num_ok_lines++;)
1324 }
1325
1326 #else /* MAX_HISTORY == 0 */
1327 # define remember_in_history(a) ((void)0)
1328 #endif /* MAX_HISTORY */
1329
1330
1331 #if ENABLE_FEATURE_EDITING_VI
1332 /*
1333  * vi mode implemented 2005 by Paul Fox <pgf@foxharp.boston.ma.us>
1334  */
1335 static void
1336 vi_Word_motion(int eat)
1337 {
1338         CHAR_T *command = command_ps;
1339
1340         while (cursor < command_len && !BB_isspace(command[cursor]))
1341                 input_forward();
1342         if (eat) while (cursor < command_len && BB_isspace(command[cursor]))
1343                 input_forward();
1344 }
1345
1346 static void
1347 vi_word_motion(int eat)
1348 {
1349         CHAR_T *command = command_ps;
1350
1351         if (BB_isalnum(command[cursor]) || command[cursor] == '_') {
1352                 while (cursor < command_len
1353                  && (BB_isalnum(command[cursor+1]) || command[cursor+1] == '_')
1354                 ) {
1355                         input_forward();
1356                 }
1357         } else if (BB_ispunct(command[cursor])) {
1358                 while (cursor < command_len && BB_ispunct(command[cursor+1]))
1359                         input_forward();
1360         }
1361
1362         if (cursor < command_len)
1363                 input_forward();
1364
1365         if (eat) {
1366                 while (cursor < command_len && BB_isspace(command[cursor]))
1367                         input_forward();
1368         }
1369 }
1370
1371 static void
1372 vi_End_motion(void)
1373 {
1374         CHAR_T *command = command_ps;
1375
1376         input_forward();
1377         while (cursor < command_len && BB_isspace(command[cursor]))
1378                 input_forward();
1379         while (cursor < command_len-1 && !BB_isspace(command[cursor+1]))
1380                 input_forward();
1381 }
1382
1383 static void
1384 vi_end_motion(void)
1385 {
1386         CHAR_T *command = command_ps;
1387
1388         if (cursor >= command_len-1)
1389                 return;
1390         input_forward();
1391         while (cursor < command_len-1 && BB_isspace(command[cursor]))
1392                 input_forward();
1393         if (cursor >= command_len-1)
1394                 return;
1395         if (BB_isalnum(command[cursor]) || command[cursor] == '_') {
1396                 while (cursor < command_len-1
1397                  && (BB_isalnum(command[cursor+1]) || command[cursor+1] == '_')
1398                 ) {
1399                         input_forward();
1400                 }
1401         } else if (BB_ispunct(command[cursor])) {
1402                 while (cursor < command_len-1 && BB_ispunct(command[cursor+1]))
1403                         input_forward();
1404         }
1405 }
1406
1407 static void
1408 vi_Back_motion(void)
1409 {
1410         CHAR_T *command = command_ps;
1411
1412         while (cursor > 0 && BB_isspace(command[cursor-1]))
1413                 input_backward(1);
1414         while (cursor > 0 && !BB_isspace(command[cursor-1]))
1415                 input_backward(1);
1416 }
1417
1418 static void
1419 vi_back_motion(void)
1420 {
1421         CHAR_T *command = command_ps;
1422
1423         if (cursor <= 0)
1424                 return;
1425         input_backward(1);
1426         while (cursor > 0 && BB_isspace(command[cursor]))
1427                 input_backward(1);
1428         if (cursor <= 0)
1429                 return;
1430         if (BB_isalnum(command[cursor]) || command[cursor] == '_') {
1431                 while (cursor > 0
1432                  && (BB_isalnum(command[cursor-1]) || command[cursor-1] == '_')
1433                 ) {
1434                         input_backward(1);
1435                 }
1436         } else if (BB_ispunct(command[cursor])) {
1437                 while (cursor > 0 && BB_ispunct(command[cursor-1]))
1438                         input_backward(1);
1439         }
1440 }
1441 #endif
1442
1443 /* Modelled after bash 4.0 behavior of Ctrl-<arrow> */
1444 static void ctrl_left(void)
1445 {
1446         CHAR_T *command = command_ps;
1447
1448         while (1) {
1449                 CHAR_T c;
1450
1451                 input_backward(1);
1452                 if (cursor == 0)
1453                         break;
1454                 c = command[cursor];
1455                 if (c != ' ' && !BB_ispunct(c)) {
1456                         /* we reached a "word" delimited by spaces/punct.
1457                          * go to its beginning */
1458                         while (1) {
1459                                 c = command[cursor - 1];
1460                                 if (c == ' ' || BB_ispunct(c))
1461                                         break;
1462                                 input_backward(1);
1463                                 if (cursor == 0)
1464                                         break;
1465                         }
1466                         break;
1467                 }
1468         }
1469 }
1470 static void ctrl_right(void)
1471 {
1472         CHAR_T *command = command_ps;
1473
1474         while (1) {
1475                 CHAR_T c;
1476
1477                 c = command[cursor];
1478                 if (c == BB_NUL)
1479                         break;
1480                 if (c != ' ' && !BB_ispunct(c)) {
1481                         /* we reached a "word" delimited by spaces/punct.
1482                          * go to its end + 1 */
1483                         while (1) {
1484                                 input_forward();
1485                                 c = command[cursor];
1486                                 if (c == BB_NUL || c == ' ' || BB_ispunct(c))
1487                                         break;
1488                         }
1489                         break;
1490                 }
1491                 input_forward();
1492         }
1493 }
1494
1495
1496 /*
1497  * read_line_input and its helpers
1498  */
1499
1500 #if !ENABLE_FEATURE_EDITING_FANCY_PROMPT
1501 static void parse_and_put_prompt(const char *prmt_ptr)
1502 {
1503         cmdedit_prompt = prmt_ptr;
1504         cmdedit_prmt_len = strlen(prmt_ptr);
1505         put_prompt();
1506 }
1507 #else
1508 static void parse_and_put_prompt(const char *prmt_ptr)
1509 {
1510         int prmt_len = 0;
1511         size_t cur_prmt_len = 0;
1512         char flg_not_length = '[';
1513         char *prmt_mem_ptr = xzalloc(1);
1514         char *cwd_buf = xrealloc_getcwd_or_warn(NULL);
1515         char cbuf[2];
1516         char c;
1517         char *pbuf;
1518
1519         cmdedit_prmt_len = 0;
1520
1521         if (!cwd_buf) {
1522                 cwd_buf = (char *)bb_msg_unknown;
1523         }
1524
1525         cbuf[1] = '\0'; /* never changes */
1526
1527         while (*prmt_ptr) {
1528                 char *free_me = NULL;
1529
1530                 pbuf = cbuf;
1531                 c = *prmt_ptr++;
1532                 if (c == '\\') {
1533                         const char *cp = prmt_ptr;
1534                         int l;
1535
1536                         c = bb_process_escape_sequence(&prmt_ptr);
1537                         if (prmt_ptr == cp) {
1538                                 if (*cp == '\0')
1539                                         break;
1540                                 c = *prmt_ptr++;
1541
1542                                 switch (c) {
1543 # if ENABLE_FEATURE_GETUSERNAME_AND_HOMEDIR
1544                                 case 'u':
1545                                         pbuf = user_buf ? user_buf : (char*)"";
1546                                         break;
1547 # endif
1548                                 case 'h':
1549                                         pbuf = free_me = safe_gethostname();
1550                                         *strchrnul(pbuf, '.') = '\0';
1551                                         break;
1552                                 case '$':
1553                                         c = (geteuid() == 0 ? '#' : '$');
1554                                         break;
1555 # if ENABLE_FEATURE_GETUSERNAME_AND_HOMEDIR
1556                                 case 'w':
1557                                         /* /home/user[/something] -> ~[/something] */
1558                                         pbuf = cwd_buf;
1559                                         l = strlen(home_pwd_buf);
1560                                         if (l != 0
1561                                          && strncmp(home_pwd_buf, cwd_buf, l) == 0
1562                                          && (cwd_buf[l]=='/' || cwd_buf[l]=='\0')
1563                                          && strlen(cwd_buf + l) < PATH_MAX
1564                                         ) {
1565                                                 pbuf = free_me = xasprintf("~%s", cwd_buf + l);
1566                                         }
1567                                         break;
1568 # endif
1569                                 case 'W':
1570                                         pbuf = cwd_buf;
1571                                         cp = strrchr(pbuf, '/');
1572                                         if (cp != NULL && cp != pbuf)
1573                                                 pbuf += (cp-pbuf) + 1;
1574                                         break;
1575                                 case '!':
1576                                         pbuf = free_me = xasprintf("%d", num_ok_lines);
1577                                         break;
1578                                 case 'e': case 'E':     /* \e \E = \033 */
1579                                         c = '\033';
1580                                         break;
1581                                 case 'x': case 'X': {
1582                                         char buf2[4];
1583                                         for (l = 0; l < 3;) {
1584                                                 unsigned h;
1585                                                 buf2[l++] = *prmt_ptr;
1586                                                 buf2[l] = '\0';
1587                                                 h = strtoul(buf2, &pbuf, 16);
1588                                                 if (h > UCHAR_MAX || (pbuf - buf2) < l) {
1589                                                         buf2[--l] = '\0';
1590                                                         break;
1591                                                 }
1592                                                 prmt_ptr++;
1593                                         }
1594                                         c = (char)strtoul(buf2, NULL, 16);
1595                                         if (c == 0)
1596                                                 c = '?';
1597                                         pbuf = cbuf;
1598                                         break;
1599                                 }
1600                                 case '[': case ']':
1601                                         if (c == flg_not_length) {
1602                                                 flg_not_length = (flg_not_length == '[' ? ']' : '[');
1603                                                 continue;
1604                                         }
1605                                         break;
1606                                 } /* switch */
1607                         } /* if */
1608                 } /* if */
1609                 cbuf[0] = c;
1610                 cur_prmt_len = strlen(pbuf);
1611                 prmt_len += cur_prmt_len;
1612                 if (flg_not_length != ']')
1613                         cmdedit_prmt_len += cur_prmt_len;
1614                 prmt_mem_ptr = strcat(xrealloc(prmt_mem_ptr, prmt_len+1), pbuf);
1615                 free(free_me);
1616         } /* while */
1617
1618         if (cwd_buf != (char *)bb_msg_unknown)
1619                 free(cwd_buf);
1620         cmdedit_prompt = prmt_mem_ptr;
1621         put_prompt();
1622 }
1623 #endif
1624
1625 static void cmdedit_setwidth(unsigned w, int redraw_flg)
1626 {
1627         cmdedit_termw = w;
1628         if (redraw_flg) {
1629                 /* new y for current cursor */
1630                 int new_y = (cursor + cmdedit_prmt_len) / w;
1631                 /* redraw */
1632                 redraw((new_y >= cmdedit_y ? new_y : cmdedit_y), command_len - cursor);
1633                 fflush(NULL);
1634         }
1635 }
1636
1637 static void win_changed(int nsig)
1638 {
1639         unsigned width;
1640         get_terminal_width_height(0, &width, NULL);
1641         cmdedit_setwidth(width, nsig /* - just a yes/no flag */);
1642         if (nsig == SIGWINCH)
1643                 signal(SIGWINCH, win_changed); /* rearm ourself */
1644 }
1645
1646 static int lineedit_read_key(char *read_key_buffer)
1647 {
1648         int64_t ic;
1649         struct pollfd pfd;
1650         int delay = -1;
1651 #if ENABLE_FEATURE_ASSUME_UNICODE
1652         char unicode_buf[MB_CUR_MAX + 1];
1653         int unicode_idx = 0;
1654 #endif
1655
1656         pfd.fd = STDIN_FILENO;
1657         pfd.events = POLLIN;
1658         do {
1659  poll_again:
1660                 if (read_key_buffer[0] == 0) {
1661                         /* Wait for input. Can't just call read_key,
1662                          * it returns at once if stdin
1663                          * is in non-blocking mode. */
1664                         safe_poll(&pfd, 1, delay);
1665                 }
1666                 /* Note: read_key sets errno to 0 on success: */
1667                 ic = read_key(STDIN_FILENO, read_key_buffer);
1668
1669                 if (ENABLE_FEATURE_EDITING_ASK_TERMINAL
1670                  && cursor == 0 /* otherwise it may be bogus */
1671                  && (int32_t)ic == KEYCODE_CURSOR_POS
1672                 ) {
1673                         int col = ((ic >> 32) & 0x7fff) - 1;
1674                         if (col > cmdedit_prmt_len) {
1675                                 cmdedit_x += (col - cmdedit_prmt_len);
1676                                 while (cmdedit_x >= cmdedit_termw) {
1677                                         cmdedit_x -= cmdedit_termw;
1678                                         cmdedit_y++;
1679                                 }
1680                         }
1681                         goto poll_again;
1682                 }
1683
1684 #if ENABLE_FEATURE_ASSUME_UNICODE
1685                 {
1686                         wchar_t wc;
1687
1688                         if ((int32_t)ic < 0) /* KEYCODE_xxx */
1689                                 return ic;
1690                         unicode_buf[unicode_idx++] = ic;
1691                         unicode_buf[unicode_idx] = '\0';
1692                         if (mbstowcs(&wc, unicode_buf, 1) != 1 && unicode_idx < MB_CUR_MAX) {
1693                                 delay = 50;
1694                                 goto poll_again;
1695                         }
1696                         ic = wc;
1697                 }
1698 #endif
1699         } while (errno == EAGAIN);
1700
1701         return ic;
1702 }
1703
1704 /* leave out the "vi-mode"-only case labels if vi editing isn't
1705  * configured. */
1706 #define vi_case(caselabel) IF_FEATURE_EDITING_VI(case caselabel)
1707
1708 /* convert uppercase ascii to equivalent control char, for readability */
1709 #undef CTRL
1710 #define CTRL(a) ((a) & ~0x40)
1711
1712 /* maxsize must be >= 2.
1713  * Returns:
1714  * -1 on read errors or EOF, or on bare Ctrl-D,
1715  * 0  on ctrl-C (the line entered is still returned in 'command'),
1716  * >0 length of input string, including terminating '\n'
1717  */
1718 int FAST_FUNC read_line_input(const char *prompt, char *command, int maxsize, line_input_t *st)
1719 {
1720         int len;
1721 #if ENABLE_FEATURE_TAB_COMPLETION
1722         smallint lastWasTab = FALSE;
1723 #endif
1724         smallint break_out = 0;
1725 #if ENABLE_FEATURE_EDITING_VI
1726         smallint vi_cmdmode = 0;
1727 #endif
1728         struct termios initial_settings;
1729         struct termios new_settings;
1730         char read_key_buffer[KEYCODE_BUFFER_SIZE];
1731
1732         INIT_S();
1733
1734         if (tcgetattr(STDIN_FILENO, &initial_settings) < 0
1735          || !(initial_settings.c_lflag & ECHO)
1736         ) {
1737                 /* Happens when e.g. stty -echo was run before */
1738                 parse_and_put_prompt(prompt);
1739                 /* fflush(stdout); - done by parse_and_put_prompt */
1740                 if (fgets(command, maxsize, stdin) == NULL)
1741                         len = -1; /* EOF or error */
1742                 else
1743                         len = strlen(command);
1744                 DEINIT_S();
1745                 return len;
1746         }
1747
1748         check_unicode_in_env();
1749
1750 // FIXME: audit & improve this
1751         if (maxsize > MAX_LINELEN)
1752                 maxsize = MAX_LINELEN;
1753         S.maxsize = maxsize;
1754
1755         /* With null flags, no other fields are ever used */
1756         state = st ? st : (line_input_t*) &const_int_0;
1757 #if MAX_HISTORY > 0
1758 # if ENABLE_FEATURE_EDITING_SAVEHISTORY
1759         if ((state->flags & SAVE_HISTORY) && state->hist_file)
1760                 if (state->cnt_history == 0)
1761                         load_history(state);
1762 # endif
1763         if (state->flags & DO_HISTORY)
1764                 state->cur_history = state->cnt_history;
1765 #endif
1766
1767         /* prepare before init handlers */
1768         cmdedit_y = 0;  /* quasireal y, not true if line > xt*yt */
1769         command_len = 0;
1770 #if ENABLE_FEATURE_ASSUME_UNICODE
1771         command_ps = xzalloc(maxsize * sizeof(command_ps[0]));
1772 #else
1773         command_ps = command;
1774         command[0] = '\0';
1775 #endif
1776 #define command command_must_not_be_used
1777
1778         new_settings = initial_settings;
1779         new_settings.c_lflag &= ~ICANON;        /* unbuffered input */
1780         /* Turn off echoing and CTRL-C, so we can trap it */
1781         new_settings.c_lflag &= ~(ECHO | ECHONL | ISIG);
1782         /* Hmm, in linux c_cc[] is not parsed if ICANON is off */
1783         new_settings.c_cc[VMIN] = 1;
1784         new_settings.c_cc[VTIME] = 0;
1785         /* Turn off CTRL-C, so we can trap it */
1786 #ifndef _POSIX_VDISABLE
1787 # define _POSIX_VDISABLE '\0'
1788 #endif
1789         new_settings.c_cc[VINTR] = _POSIX_VDISABLE;
1790         tcsetattr_stdin_TCSANOW(&new_settings);
1791
1792         /* Now initialize things */
1793         previous_SIGWINCH_handler = signal(SIGWINCH, win_changed);
1794         win_changed(0); /* do initial resizing */
1795 #if ENABLE_FEATURE_GETUSERNAME_AND_HOMEDIR
1796         {
1797                 struct passwd *entry;
1798
1799                 entry = getpwuid(geteuid());
1800                 if (entry) {
1801                         user_buf = xstrdup(entry->pw_name);
1802                         home_pwd_buf = xstrdup(entry->pw_dir);
1803                 }
1804         }
1805 #endif
1806
1807 #if 0
1808         for (i = 0; i <= MAX_HISTORY; i++)
1809                 bb_error_msg("history[%d]:'%s'", i, state->history[i]);
1810         bb_error_msg("cur_history:%d cnt_history:%d", state->cur_history, state->cnt_history);
1811 #endif
1812
1813         /* Print out the command prompt */
1814         parse_and_put_prompt(prompt);
1815
1816         read_key_buffer[0] = 0;
1817         while (1) {
1818                 /*
1819                  * The emacs and vi modes share much of the code in the big
1820                  * command loop.  Commands entered when in vi's command mode
1821                  * (aka "escape mode") get an extra bit added to distinguish
1822                  * them - this keeps them from being self-inserted. This
1823                  * clutters the big switch a bit, but keeps all the code
1824                  * in one place.
1825                  */
1826                 enum {
1827                         VI_CMDMODE_BIT = 0x40000000,
1828                         /* 0x80000000 bit flags KEYCODE_xxx */
1829                 };
1830                 int32_t ic, ic_raw;
1831
1832                 fflush(NULL);
1833                 ic = ic_raw = lineedit_read_key(read_key_buffer);
1834
1835 #if ENABLE_FEATURE_EDITING_VI
1836                 newdelflag = 1;
1837                 if (vi_cmdmode) {
1838                         /* btw, since KEYCODE_xxx are all < 0, this doesn't
1839                          * change ic if it contains one of them: */
1840                         ic |= VI_CMDMODE_BIT;
1841                 }
1842 #endif
1843
1844                 switch (ic) {
1845                 case '\n':
1846                 case '\r':
1847                 vi_case('\n'|VI_CMDMODE_BIT:)
1848                 vi_case('\r'|VI_CMDMODE_BIT:)
1849                         /* Enter */
1850                         goto_new_line();
1851                         break_out = 1;
1852                         break;
1853                 case CTRL('A'):
1854                 vi_case('0'|VI_CMDMODE_BIT:)
1855                         /* Control-a -- Beginning of line */
1856                         input_backward(cursor);
1857                         break;
1858                 case CTRL('B'):
1859                 vi_case('h'|VI_CMDMODE_BIT:)
1860                 vi_case('\b'|VI_CMDMODE_BIT:)
1861                 vi_case('\x7f'|VI_CMDMODE_BIT:) /* DEL */
1862                         /* Control-b -- Move back one character */
1863                         input_backward(1);
1864                         break;
1865                 case CTRL('E'):
1866                 vi_case('$'|VI_CMDMODE_BIT:)
1867                         /* Control-e -- End of line */
1868                         input_end();
1869                         break;
1870                 case CTRL('F'):
1871                 vi_case('l'|VI_CMDMODE_BIT:)
1872                 vi_case(' '|VI_CMDMODE_BIT:)
1873                         /* Control-f -- Move forward one character */
1874                         input_forward();
1875                         break;
1876                 case '\b':
1877                 case '\x7f': /* DEL */
1878                         /* Control-h and DEL */
1879                         input_backspace();
1880                         break;
1881 #if ENABLE_FEATURE_TAB_COMPLETION
1882                 case '\t':
1883                         input_tab(&lastWasTab);
1884                         break;
1885 #endif
1886                 case CTRL('K'):
1887                         /* Control-k -- clear to end of line */
1888                         command_ps[cursor] = BB_NUL;
1889                         command_len = cursor;
1890                         printf("\033[J");
1891                         break;
1892                 case CTRL('L'):
1893                 vi_case(CTRL('L')|VI_CMDMODE_BIT:)
1894                         /* Control-l -- clear screen */
1895                         printf("\033[H");
1896                         redraw(0, command_len - cursor);
1897                         break;
1898 #if MAX_HISTORY > 0
1899                 case CTRL('N'):
1900                 vi_case(CTRL('N')|VI_CMDMODE_BIT:)
1901                 vi_case('j'|VI_CMDMODE_BIT:)
1902                         /* Control-n -- Get next command in history */
1903                         if (get_next_history())
1904                                 goto rewrite_line;
1905                         break;
1906                 case CTRL('P'):
1907                 vi_case(CTRL('P')|VI_CMDMODE_BIT:)
1908                 vi_case('k'|VI_CMDMODE_BIT:)
1909                         /* Control-p -- Get previous command from history */
1910                         if (get_previous_history())
1911                                 goto rewrite_line;
1912                         break;
1913 #endif
1914                 case CTRL('U'):
1915                 vi_case(CTRL('U')|VI_CMDMODE_BIT:)
1916                         /* Control-U -- Clear line before cursor */
1917                         if (cursor) {
1918                                 command_len -= cursor;
1919                                 memmove(command_ps, command_ps + cursor,
1920                                         (command_len + 1) * sizeof(command_ps[0]));
1921                                 redraw(cmdedit_y, command_len);
1922                         }
1923                         break;
1924                 case CTRL('W'):
1925                 vi_case(CTRL('W')|VI_CMDMODE_BIT:)
1926                         /* Control-W -- Remove the last word */
1927                         while (cursor > 0 && BB_isspace(command_ps[cursor-1]))
1928                                 input_backspace();
1929                         while (cursor > 0 && !BB_isspace(command_ps[cursor-1]))
1930                                 input_backspace();
1931                         break;
1932
1933 #if ENABLE_FEATURE_EDITING_VI
1934                 case 'i'|VI_CMDMODE_BIT:
1935                         vi_cmdmode = 0;
1936                         break;
1937                 case 'I'|VI_CMDMODE_BIT:
1938                         input_backward(cursor);
1939                         vi_cmdmode = 0;
1940                         break;
1941                 case 'a'|VI_CMDMODE_BIT:
1942                         input_forward();
1943                         vi_cmdmode = 0;
1944                         break;
1945                 case 'A'|VI_CMDMODE_BIT:
1946                         input_end();
1947                         vi_cmdmode = 0;
1948                         break;
1949                 case 'x'|VI_CMDMODE_BIT:
1950                         input_delete(1);
1951                         break;
1952                 case 'X'|VI_CMDMODE_BIT:
1953                         if (cursor > 0) {
1954                                 input_backward(1);
1955                                 input_delete(1);
1956                         }
1957                         break;
1958                 case 'W'|VI_CMDMODE_BIT:
1959                         vi_Word_motion(1);
1960                         break;
1961                 case 'w'|VI_CMDMODE_BIT:
1962                         vi_word_motion(1);
1963                         break;
1964                 case 'E'|VI_CMDMODE_BIT:
1965                         vi_End_motion();
1966                         break;
1967                 case 'e'|VI_CMDMODE_BIT:
1968                         vi_end_motion();
1969                         break;
1970                 case 'B'|VI_CMDMODE_BIT:
1971                         vi_Back_motion();
1972                         break;
1973                 case 'b'|VI_CMDMODE_BIT:
1974                         vi_back_motion();
1975                         break;
1976                 case 'C'|VI_CMDMODE_BIT:
1977                         vi_cmdmode = 0;
1978                         /* fall through */
1979                 case 'D'|VI_CMDMODE_BIT:
1980                         goto clear_to_eol;
1981
1982                 case 'c'|VI_CMDMODE_BIT:
1983                         vi_cmdmode = 0;
1984                         /* fall through */
1985                 case 'd'|VI_CMDMODE_BIT: {
1986                         int nc, sc;
1987
1988                         ic = lineedit_read_key(read_key_buffer);
1989                         if (errno) /* error */
1990                                 goto prepare_to_die;
1991                         if (ic == ic_raw) { /* "cc", "dd" */
1992                                 input_backward(cursor);
1993                                 goto clear_to_eol;
1994                                 break;
1995                         }
1996
1997                         sc = cursor;
1998                         switch (ic) {
1999                         case 'w':
2000                         case 'W':
2001                         case 'e':
2002                         case 'E':
2003                                 switch (ic) {
2004                                 case 'w':   /* "dw", "cw" */
2005                                         vi_word_motion(vi_cmdmode);
2006                                         break;
2007                                 case 'W':   /* 'dW', 'cW' */
2008                                         vi_Word_motion(vi_cmdmode);
2009                                         break;
2010                                 case 'e':   /* 'de', 'ce' */
2011                                         vi_end_motion();
2012                                         input_forward();
2013                                         break;
2014                                 case 'E':   /* 'dE', 'cE' */
2015                                         vi_End_motion();
2016                                         input_forward();
2017                                         break;
2018                                 }
2019                                 nc = cursor;
2020                                 input_backward(cursor - sc);
2021                                 while (nc-- > cursor)
2022                                         input_delete(1);
2023                                 break;
2024                         case 'b':  /* "db", "cb" */
2025                         case 'B':  /* implemented as B */
2026                                 if (ic == 'b')
2027                                         vi_back_motion();
2028                                 else
2029                                         vi_Back_motion();
2030                                 while (sc-- > cursor)
2031                                         input_delete(1);
2032                                 break;
2033                         case ' ':  /* "d ", "c " */
2034                                 input_delete(1);
2035                                 break;
2036                         case '$':  /* "d$", "c$" */
2037  clear_to_eol:
2038                                 while (cursor < command_len)
2039                                         input_delete(1);
2040                                 break;
2041                         }
2042                         break;
2043                 }
2044                 case 'p'|VI_CMDMODE_BIT:
2045                         input_forward();
2046                         /* fallthrough */
2047                 case 'P'|VI_CMDMODE_BIT:
2048                         put();
2049                         break;
2050                 case 'r'|VI_CMDMODE_BIT:
2051 //FIXME: unicode case?
2052                         ic = lineedit_read_key(read_key_buffer);
2053                         if (errno) /* error */
2054                                 goto prepare_to_die;
2055                         if (ic < ' ' || ic > 255) {
2056                                 beep();
2057                         } else {
2058                                 command_ps[cursor] = ic;
2059                                 bb_putchar(ic);
2060                                 bb_putchar('\b');
2061                         }
2062                         break;
2063                 case '\x1b': /* ESC */
2064                         if (state->flags & VI_MODE) {
2065                                 /* insert mode --> command mode */
2066                                 vi_cmdmode = 1;
2067                                 input_backward(1);
2068                         }
2069                         break;
2070 #endif /* FEATURE_COMMAND_EDITING_VI */
2071
2072 #if MAX_HISTORY > 0
2073                 case KEYCODE_UP:
2074                         if (get_previous_history())
2075                                 goto rewrite_line;
2076                         beep();
2077                         break;
2078                 case KEYCODE_DOWN:
2079                         if (!get_next_history())
2080                                 break;
2081  rewrite_line:
2082                         /* Rewrite the line with the selected history item */
2083                         /* change command */
2084                         command_len = load_string(state->history[state->cur_history] ?
2085                                         state->history[state->cur_history] : "", maxsize);
2086                         /* redraw and go to eol (bol, in vi) */
2087                         redraw(cmdedit_y, (state->flags & VI_MODE) ? 9999 : 0);
2088                         break;
2089 #endif
2090                 case KEYCODE_RIGHT:
2091                         input_forward();
2092                         break;
2093                 case KEYCODE_LEFT:
2094                         input_backward(1);
2095                         break;
2096                 case KEYCODE_CTRL_LEFT:
2097                         ctrl_left();
2098                         break;
2099                 case KEYCODE_CTRL_RIGHT:
2100                         ctrl_right();
2101                         break;
2102                 case KEYCODE_DELETE:
2103                         input_delete(0);
2104                         break;
2105                 case KEYCODE_HOME:
2106                         input_backward(cursor);
2107                         break;
2108                 case KEYCODE_END:
2109                         input_end();
2110                         break;
2111
2112                 default:
2113                         if (initial_settings.c_cc[VINTR] != 0
2114                          && ic_raw == initial_settings.c_cc[VINTR]
2115                         ) {
2116                                 /* Ctrl-C (usually) - stop gathering input */
2117                                 goto_new_line();
2118                                 command_len = 0;
2119                                 break_out = -1; /* "do not append '\n'" */
2120                                 break;
2121                         }
2122                         if (initial_settings.c_cc[VEOF] != 0
2123                          && ic_raw == initial_settings.c_cc[VEOF]
2124                         ) {
2125                                 /* Ctrl-D (usually) - delete one character,
2126                                  * or exit if len=0 and no chars to delete */
2127                                 if (command_len == 0) {
2128                                         errno = 0;
2129 #if ENABLE_FEATURE_EDITING_VI
2130  prepare_to_die:
2131 #endif
2132                                         break_out = command_len = -1;
2133                                         break;
2134                                 }
2135                                 input_delete(0);
2136                                 break;
2137                         }
2138 //                      /* Control-V -- force insert of next char */
2139 //                      if (c == CTRL('V')) {
2140 //                              if (safe_read(STDIN_FILENO, &c, 1) < 1)
2141 //                                      goto prepare_to_die;
2142 //                              if (c == 0) {
2143 //                                      beep();
2144 //                                      break;
2145 //                              }
2146 //                      }
2147                         if (ic < ' '
2148                          || (!ENABLE_FEATURE_ASSUME_UNICODE && ic >= 256)
2149                          || (ENABLE_FEATURE_ASSUME_UNICODE && ic >= VI_CMDMODE_BIT)
2150                         ) {
2151                                 /* If VI_CMDMODE_BIT is set, ic is >= 256
2152                                  * and vi mode ignores unexpected chars.
2153                                  * Otherwise, we are here if ic is a
2154                                  * control char or an unhandled ESC sequence,
2155                                  * which is also ignored.
2156                                  */
2157                                 break;
2158                         }
2159                         if ((int)command_len >= (maxsize - 2)) {
2160                                 /* Not enough space for the char and EOL */
2161                                 break;
2162                         }
2163
2164                         command_len++;
2165                         if (cursor == (command_len - 1)) {
2166                                 /* We are at the end, append */
2167                                 command_ps[cursor] = ic;
2168                                 command_ps[cursor + 1] = BB_NUL;
2169                                 cmdedit_set_out_char(' ');
2170                         } else {
2171                                 /* In the middle, insert */
2172                                 int sc = cursor;
2173
2174                                 memmove(command_ps + sc + 1, command_ps + sc,
2175                                         (command_len - sc) * sizeof(command_ps[0]));
2176                                 command_ps[sc] = ic;
2177                                 sc++;
2178                                 /* rewrite from cursor */
2179                                 input_end();
2180                                 /* to prev x pos + 1 */
2181                                 input_backward(cursor - sc);
2182                         }
2183                         break;
2184                 } /* switch (ic) */
2185
2186                 if (break_out)
2187                         break;
2188
2189 #if ENABLE_FEATURE_TAB_COMPLETION
2190                 if (ic_raw != '\t')
2191                         lastWasTab = FALSE;
2192 #endif
2193         } /* while (1) */
2194
2195 /* Stop bug catching using "command_must_not_be_used" trick */
2196 #undef command
2197
2198 #if ENABLE_FEATURE_ASSUME_UNICODE
2199         command[0] = '\0';
2200         if (command_len > 0)
2201                 command_len = save_string(command, maxsize - 1);
2202         free(command_ps);
2203 #endif
2204
2205         if (command_len > 0)
2206                 remember_in_history(command);
2207
2208         if (break_out > 0) {
2209                 command[command_len++] = '\n';
2210                 command[command_len] = '\0';
2211         }
2212
2213 #if ENABLE_FEATURE_TAB_COMPLETION
2214         free_tab_completion_data();
2215 #endif
2216
2217         /* restore initial_settings */
2218         tcsetattr_stdin_TCSANOW(&initial_settings);
2219         /* restore SIGWINCH handler */
2220         signal(SIGWINCH, previous_SIGWINCH_handler);
2221         fflush(NULL);
2222
2223         len = command_len;
2224         DEINIT_S();
2225
2226         return len; /* can't return command_len, DEINIT_S() destroys it */
2227 }
2228
2229 #else
2230
2231 #undef read_line_input
2232 int FAST_FUNC read_line_input(const char* prompt, char* command, int maxsize)
2233 {
2234         fputs(prompt, stdout);
2235         fflush(NULL);
2236         fgets(command, maxsize, stdin);
2237         return strlen(command);
2238 }
2239
2240 #endif  /* FEATURE_EDITING */
2241
2242
2243 /*
2244  * Testing
2245  */
2246
2247 #ifdef TEST
2248
2249 #include <locale.h>
2250
2251 const char *applet_name = "debug stuff usage";
2252
2253 int main(int argc, char **argv)
2254 {
2255         char buff[MAX_LINELEN];
2256         char *prompt =
2257 #if ENABLE_FEATURE_EDITING_FANCY_PROMPT
2258                 "\\[\\033[32;1m\\]\\u@\\[\\x1b[33;1m\\]\\h:"
2259                 "\\[\\033[34;1m\\]\\w\\[\\033[35;1m\\] "
2260                 "\\!\\[\\e[36;1m\\]\\$ \\[\\E[0m\\]";
2261 #else
2262                 "% ";
2263 #endif
2264
2265 #if ENABLE_FEATURE_NONPRINTABLE_INVERSE_PUT
2266         setlocale(LC_ALL, "");
2267 #endif
2268         while (1) {
2269                 int l;
2270                 l = read_line_input(prompt, buff);
2271                 if (l <= 0 || buff[l-1] != '\n')
2272                         break;
2273                 buff[l-1] = 0;
2274                 printf("*** read_line_input() returned line =%s=\n", buff);
2275         }
2276         printf("*** read_line_input() detect ^D\n");
2277         return 0;
2278 }
2279
2280 #endif  /* TEST */