vlib: unix cli - log cli commands one per line
[vpp.git] / src / vlib / unix / cli.c
index 3df9a98..6e566d1 100644 (file)
@@ -47,7 +47,6 @@
 
 #include <vlib/vlib.h>
 #include <vlib/unix/unix.h>
-#include <vppinfra/timer.h>
 
 #include <ctype.h>
 #include <fcntl.h>
@@ -60,6 +59,8 @@
 #include <sys/types.h>
 #include <unistd.h>
 #include <limits.h>
+#include <netinet/tcp.h>
+#include <math.h>
 
 /** ANSI escape code. */
 #define ESC "\x1b"
@@ -226,6 +227,20 @@ typedef struct
 
   /** Process node identifier */
   u32 process_node_index;
+
+  /** The current direction of cursor travel.
+   *  This is important since when advancing left-to-right, at the
+   *  right hand edge of the console the terminal typically defers
+   *  wrapping the cursor to the next line until a character is
+   *  actually displayed.
+   *  This messes up our heuristic for whether to use ANSI to return
+   *  the cursor to the end of the line and instead we have to
+   *  nudge the cursor to the next line.
+   *  A Value of @c 0 means we're advancing left-to-right; @c 1 means
+   *  the opposite.
+   */
+  u8 cursor_direction;
+
 } unix_cli_file_t;
 
 /** Resets the pager buffer and other data.
@@ -278,6 +293,7 @@ typedef enum
   UNIX_CLI_PARSE_ACTION_WORDRIGHT,     /**< Jump cursor to start of right word */
   UNIX_CLI_PARSE_ACTION_ERASELINELEFT, /**< Erase line to left of cursor */
   UNIX_CLI_PARSE_ACTION_ERASELINERIGHT,        /**< Erase line to right & including cursor */
+  UNIX_CLI_PARSE_ACTION_ERASEWORDLEFT, /**< Erase word left */
   UNIX_CLI_PARSE_ACTION_CLEAR,         /**< Clear the terminal */
   UNIX_CLI_PARSE_ACTION_REVSEARCH,     /**< Search backwards in command history */
   UNIX_CLI_PARSE_ACTION_FWDSEARCH,     /**< Search forwards in command history */
@@ -344,6 +360,7 @@ static unix_cli_parse_actions_t unix_cli_parse_strings[] = {
   _(CTL ('D'), UNIX_CLI_PARSE_ACTION_ERASERIGHT),
   _(CTL ('U'), UNIX_CLI_PARSE_ACTION_ERASELINELEFT),
   _(CTL ('K'), UNIX_CLI_PARSE_ACTION_ERASELINERIGHT),
+  _(CTL ('W'), UNIX_CLI_PARSE_ACTION_ERASEWORDLEFT),
   _(CTL ('Y'), UNIX_CLI_PARSE_ACTION_YANK),
   _(CTL ('L'), UNIX_CLI_PARSE_ACTION_CLEAR),
   _(ESC "b", UNIX_CLI_PARSE_ACTION_WORDLEFT),  /* Alt-B */
@@ -436,6 +453,21 @@ typedef enum
   UNIX_CLI_PROCESS_EVENT_QUIT,       /**< A CLI session wants to close. */
 } unix_cli_process_event_type_t;
 
+/** CLI session telnet negotiation timer events. */
+typedef enum
+{
+  UNIX_CLI_NEW_SESSION_EVENT_ADD, /**< Add a CLI session to the new session list */
+} unix_cli_timeout_event_type_t;
+
+/** Each new session is stored on a list with a deadline after which
+ * a prompt is issued, in case the session TELNET negotiation fails to
+ * complete. */
+typedef struct
+{
+  uword cf_index; /**< Session index of the new session. */
+  f64 deadline;          /**< Deadline after which the new session must have a prompt. */
+} unix_cli_new_session_t;
+
 /** CLI global state. */
 typedef struct
 {
@@ -453,6 +485,12 @@ typedef struct
 
   /** File pool index of current input. */
   u32 current_input_file_index;
+
+  /** New session process node identifier */
+  u32 new_session_process_node_index;
+
+  /** List of new sessions */
+  unix_cli_new_session_t *new_sessions;
 } unix_cli_main_t;
 
 /** CLI global state */
@@ -566,7 +604,7 @@ unix_cli_del_pending_output (clib_file_t * uf,
  * @param str The buffer in which to search for the value.
  * @param len The depth into the buffer to search.
  *
- * @return The index of the first occurence of \c chr. If \c chr is not
+ * @return The index of the first occurrence of \c chr. If \c chr is not
  *          found then \c len instead.
  */
 always_inline word
@@ -681,6 +719,69 @@ unix_vlib_cli_output_cooked (unix_cli_file_t * cf,
          start = end;
        }
     }
+
+  /* Use the last character to determine the last direction of the cursor. */
+  if (buffer_bytes > 0)
+    cf->cursor_direction = (buffer[buffer_bytes - 1] == (u8) '\b');
+}
+
+/** @brief Moves the terminal cursor one character to the left, with
+ * special handling when it reaches the left edge of the terminal window.
+ *
+ * Ordinarily we can simply send a '\b' to move the cursor left, however
+ * most terminals will not reverse-wrap to the end of the previous line
+ * if the cursor is in the left-most column. To counter this we must
+ * check the cursor position + prompt length modulo terminal width and
+ * if available use some other means, such as ANSI terminal escape
+ * sequences, to move the cursor.
+ *
+ * @param cf Unix CLI session of the desired stream to write to.
+ * @param uf The Unix file structure of the desired stream to write to.
+ */
+static void
+unix_vlib_cli_output_cursor_left (unix_cli_file_t * cf, clib_file_t * uf)
+{
+  unix_cli_main_t *cm = &unix_cli_main;
+  static u8 *ansi = 0;         /* assumes no reentry */
+  u32 position;
+
+  if (!cf->is_interactive || !cf->ansi_capable || !cf->width)
+    {
+      /* No special handling for dumb terminals */
+      unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b", 1);
+      return;
+    }
+
+  position = ((u32) vec_len (cm->cli_prompt) + cf->cursor) % cf->width;
+
+  if (position != 0)
+    {
+      /* No special handling required if we're not at the left edge */
+      unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b", 1);
+      return;
+    }
+
+  if (!cf->cursor_direction)
+    {
+      /* Special handling for when we are at the left edge but
+       * the cursor was going left-to-right, but in this situation
+       * xterm-like terminals actually hide the cursor off the right
+       * edge. A \b here seems to jump one char too many, so let's
+       * force the cursor onto the next line instead.
+       */
+      if (cf->cursor < vec_len (cf->current_command))
+       unix_vlib_cli_output_cooked (cf, uf, &cf->current_command[cf->cursor],
+                                    1);
+      else
+       unix_vlib_cli_output_cooked (cf, uf, (u8 *) " ", 1);
+      unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\r", 1);
+    }
+
+  /* Relocate the cursor at the right hand edge one line above */
+  ansi = format (ansi, CSI "A" CSI "%dC", cf->width - 1);
+  unix_vlib_cli_output_cooked (cf, uf, ansi, vec_len (ansi));
+  vec_reset_length (ansi);     /* keep the vec around for next time */
+  cf->cursor_direction = 1;    /* going backwards now */
 }
 
 /** @brief Output the CLI prompt */
@@ -821,7 +922,7 @@ unix_cli_pager_redraw (unix_cli_file_t * cf, clib_file_t * uf)
  *
  * If instead @c line is @c NULL then @c len_or_index is taken to mean the
  * index of an existing line in the pager buffer; this simply means that the
- * input line does not need to be cloned since we alreayd have it. This is
+ * input line does not need to be cloned since we already have it. This is
  * typical if we are reindexing the pager buffer.
  *
  * @param cf           The CLI session whose pager we are adding to.
@@ -1162,25 +1263,109 @@ unix_cli_file_welcome (unix_cli_main_t * cm, unix_cli_file_t * cf)
 
 }
 
-/** @brief A failsafe triggered on a timer to ensure we send the prompt
- * to telnet sessions that fail to negotiate the terminal type. */
-static void
-unix_cli_file_welcome_timer (any arg, f64 delay)
+/**
+ * @brief A failsafe manager that ensures CLI sessions issue an initial
+ * prompt if TELNET negotiation fails.
+ */
+static uword
+unix_cli_new_session_process (vlib_main_t * vm, vlib_node_runtime_t * rt,
+                             vlib_frame_t * f)
 {
   unix_cli_main_t *cm = &unix_cli_main;
-  unix_cli_file_t *cf;
-  (void) delay;
+  uword event_type, *event_data = 0;
+  f64 wait = 10.0;
 
-  /* Check the connection didn't close already */
-  if (pool_is_free_index (cm->cli_file_pool, (uword) arg))
-    return;
+  while (1)
+    {
+      if (vec_len (cm->new_sessions) > 0)
+       wait = vlib_process_wait_for_event_or_clock (vm, wait);
+      else
+       vlib_process_wait_for_event (vm);
+
+      event_type = vlib_process_get_events (vm, &event_data);
 
-  cf = pool_elt_at_index (cm->cli_file_pool, (uword) arg);
+      switch (event_type)
+       {
+       case ~0:                /* no events => timeout */
+         break;
 
-  if (!cf->started)
-    unix_cli_file_welcome (cm, cf);
+       case UNIX_CLI_NEW_SESSION_EVENT_ADD:
+         {
+           /* Add an identifier to the new session list */
+           unix_cli_new_session_t ns;
+
+           ns.cf_index = event_data[0];
+           ns.deadline = vlib_time_now (vm) + 1.0;
+
+           vec_add1 (cm->new_sessions, ns);
+
+           if (wait > 0.1)
+             wait = 0.1;       /* force a re-evaluation soon, but not too soon */
+         }
+         break;
+
+       default:
+         clib_warning ("BUG: unknown event type 0x%wx", event_type);
+         break;
+       }
+
+      vec_reset_length (event_data);
+
+      if (vlib_process_suspend_time_is_zero (wait))
+       {
+         /* Scan the list looking for expired deadlines.
+          * Emit needed prompts and remove from the list.
+          * While scanning, look for the nearest new deadline
+          * for the next iteration.
+          * Since the list is ordered with newest sessions first
+          * we can make assumptions about expired sessions being
+          * contiguous at the beginning and the next deadline is the
+          * next entry on the list, if any.
+          */
+         f64 now = vlib_time_now (vm);
+         unix_cli_new_session_t *nsp;
+         word index = 0;
+
+         wait = INFINITY;
+
+         vec_foreach (nsp, cm->new_sessions)
+         {
+           if (vlib_process_suspend_time_is_zero (nsp->deadline - now))
+             {
+               /* Deadline reached */
+               unix_cli_file_t *cf;
+
+               /* Mark the highwater */
+               index++;
+
+               /* Check the connection didn't close already */
+               if (pool_is_free_index (cm->cli_file_pool, nsp->cf_index))
+                 continue;
+
+               cf = pool_elt_at_index (cm->cli_file_pool, nsp->cf_index);
+
+               if (!cf->started)
+                 unix_cli_file_welcome (cm, cf);
+             }
+           else
+             {
+               wait = nsp->deadline - now;
+               break;
+             }
+         }
+
+         if (index)
+           {
+             /* We have sessions to remove */
+             vec_delete (cm->new_sessions, index, 0);
+           }
+       }
+    }
+
+  return 0;
 }
 
+
 /** @brief A mostly no-op Telnet state machine.
  * Process Telnet command bytes in a way that ensures we're mostly
  * transparent to the Telnet protocol. That is, it's mostly a no-op.
@@ -1217,7 +1402,7 @@ unix_cli_process_telnet (unix_main_t * um,
     case DO:
     case DONT:
       /* Expect 3 bytes */
-      if (vec_len (input_vector) < 3)
+      if (len < 3)
        return -1;              /* want more bytes */
 
       consume = 2;
@@ -1359,16 +1544,20 @@ unix_cli_line_process_one (unix_cli_main_t * cm,
       if (cf->search_mode == 0)
        {
          /* Erase the current command (if any) */
-         for (j = 0; j < (vec_len (cf->current_command)); j++)
-           unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b \b", 3);
+         for (; cf->cursor > 0; cf->cursor--)
+           {
+             unix_vlib_cli_output_cursor_left (cf, uf);
+             unix_vlib_cli_output_cooked (cf, uf, (u8 *) " ", 1);
+             unix_vlib_cli_output_cursor_left (cf, uf);
+           }
 
          vec_reset_length (cf->search_key);
          vec_reset_length (cf->current_command);
+
          if (action == UNIX_CLI_PARSE_ACTION_REVSEARCH)
            cf->search_mode = -1;
          else
            cf->search_mode = 1;
-         cf->cursor = 0;
        }
       else
        {
@@ -1385,27 +1574,29 @@ unix_cli_line_process_one (unix_cli_main_t * cm,
     case UNIX_CLI_PARSE_ACTION_ERASELINELEFT:
       /* Erase the command from the cursor to the start */
 
-      /* Shimmy forwards to the new end of line position */
+      j = cf->cursor;
+      /* Shimmy backwards to the new end of line position */
       delta = vec_len (cf->current_command) - cf->cursor;
-      for (j = cf->cursor; j > delta; j--)
-       unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b", 1);
+      for (; cf->cursor > delta; cf->cursor--)
+       unix_vlib_cli_output_cursor_left (cf, uf);
       /* Zap from here to the end of what is currently displayed */
-      for (; j < (vec_len (cf->current_command)); j++)
+      for (; cf->cursor < vec_len (cf->current_command); cf->cursor++)
        unix_vlib_cli_output_cooked (cf, uf, (u8 *) " ", 1);
       /* Get back to the start of the line */
-      for (j = 0; j < (vec_len (cf->current_command)); j++)
-       unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b", 1);
+      for (; cf->cursor > 0; cf->cursor--)
+       unix_vlib_cli_output_cursor_left (cf, uf);
 
-      j = vec_len (cf->current_command) - cf->cursor;
-      memmove (cf->current_command, cf->current_command + cf->cursor, j);
-      _vec_len (cf->current_command) = j;
+      /* Delete the desired text from the command */
+      memmove (cf->current_command, cf->current_command + j, delta);
+      _vec_len (cf->current_command) = delta;
 
       /* Print the new contents */
-      unix_vlib_cli_output_cooked (cf, uf, cf->current_command, j);
+      unix_vlib_cli_output_cooked (cf, uf, cf->current_command, delta);
+      cf->cursor = delta;      /* for backspace tracking */
+
       /* Shimmy back to the start */
-      for (j = 0; j < (vec_len (cf->current_command)); j++)
-       unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b", 1);
-      cf->cursor = 0;
+      for (; cf->cursor > 0; cf->cursor--)
+       unix_vlib_cli_output_cursor_left (cf, uf);
 
       cf->search_mode = 0;
       break;
@@ -1413,12 +1604,13 @@ unix_cli_line_process_one (unix_cli_main_t * cm,
     case UNIX_CLI_PARSE_ACTION_ERASELINERIGHT:
       /* Erase the command from the cursor to the end */
 
+      j = cf->cursor;
       /* Zap from cursor to end of what is currently displayed */
-      for (j = cf->cursor; j < (vec_len (cf->current_command)); j++)
+      for (; cf->cursor < (vec_len (cf->current_command)); cf->cursor++)
        unix_vlib_cli_output_cooked (cf, uf, (u8 *) " ", 1);
       /* Get back to where we were */
-      for (j = cf->cursor; j < (vec_len (cf->current_command)); j++)
-       unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b", 1);
+      for (; cf->cursor > j; cf->cursor--)
+       unix_vlib_cli_output_cursor_left (cf, uf);
 
       /* Truncate the line at the cursor */
       _vec_len (cf->current_command) = cf->cursor;
@@ -1426,10 +1618,55 @@ unix_cli_line_process_one (unix_cli_main_t * cm,
       cf->search_mode = 0;
       break;
 
+    case UNIX_CLI_PARSE_ACTION_ERASEWORDLEFT:
+      /* calculate num of caracter to be erased */
+      delta = 0;
+      while (cf->cursor > delta
+            && cf->current_command[cf->cursor - delta - 1] == ' ')
+       delta++;
+      while (cf->cursor > delta
+            && cf->current_command[cf->cursor - delta - 1] != ' ')
+       delta++;
+
+      if (vec_len (cf->current_command))
+       {
+         if (cf->cursor > 0)
+           {
+             /* move cursor left delta times */
+             for (j = delta; j > 0; j--, cf->cursor--)
+               unix_vlib_cli_output_cursor_left (cf, uf);
+             save = cf->current_command + cf->cursor;
+
+             /* redraw remainder of line */
+             memmove (cf->current_command + cf->cursor,
+                      cf->current_command + cf->cursor + delta,
+                      _vec_len (cf->current_command) - cf->cursor - delta);
+             unix_vlib_cli_output_cooked (cf, uf,
+                                          cf->current_command + cf->cursor,
+                                          _vec_len (cf->current_command) -
+                                          cf->cursor);
+             cf->cursor += _vec_len (cf->current_command) - cf->cursor;
+
+             /* print delta amount of blank spaces,
+              * then finally fix the cursor position */
+             for (j = delta; j > 0; j--, cf->cursor--)
+               unix_vlib_cli_output_cursor_left (cf, uf);
+             for (j = delta; j > 0; j--, cf->cursor++)
+               unix_vlib_cli_output_cooked (cf, uf, (u8 *) " ", 1);
+             for (; (cf->current_command + cf->cursor) > save; cf->cursor--)
+               unix_vlib_cli_output_cursor_left (cf, uf);
+             _vec_len (cf->current_command) -= delta;
+           }
+       }
+      cf->search_mode = 0;
+      cf->excursion = 0;
+      vec_reset_length (cf->search_key);
+      break;
+
     case UNIX_CLI_PARSE_ACTION_LEFT:
       if (cf->cursor > 0)
        {
-         unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b", 1);
+         unix_vlib_cli_output_cursor_left (cf, uf);
          cf->cursor--;
        }
 
@@ -1454,10 +1691,14 @@ unix_cli_line_process_one (unix_cli_main_t * cm,
        break;
       cf->search_mode = 0;
       /* Erase the command */
-      for (j = cf->cursor; j < (vec_len (cf->current_command)); j++)
+      for (; cf->cursor < vec_len (cf->current_command); cf->cursor++)
        unix_vlib_cli_output_cooked (cf, uf, (u8 *) " ", 1);
-      for (j = 0; j < (vec_len (cf->current_command)); j++)
-       unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b \b", 3);
+      for (; cf->cursor > 0; cf->cursor--)
+       {
+         unix_vlib_cli_output_cursor_left (cf, uf);
+         unix_vlib_cli_output_cooked (cf, uf, (u8 *) " ", 1);
+         unix_vlib_cli_output_cursor_left (cf, uf);
+       }
       vec_reset_length (cf->current_command);
       if (vec_len (cf->command_history))
        {
@@ -1501,11 +1742,8 @@ unix_cli_line_process_one (unix_cli_main_t * cm,
     case UNIX_CLI_PARSE_ACTION_HOME:
       if (vec_len (cf->current_command) && cf->cursor > 0)
        {
-         while (cf->cursor)
-           {
-             unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b", 1);
-             cf->cursor--;
-           }
+         for (; cf->cursor > 0; cf->cursor--)
+           unix_vlib_cli_output_cursor_left (cf, uf);
        }
 
       cf->search_mode = 0;
@@ -1528,25 +1766,22 @@ unix_cli_line_process_one (unix_cli_main_t * cm,
     case UNIX_CLI_PARSE_ACTION_WORDLEFT:
       if (vec_len (cf->current_command) && cf->cursor > 0)
        {
-         j = cf->cursor;
-
-         unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b", 1);
-         j--;
+         unix_vlib_cli_output_cursor_left (cf, uf);
+         cf->cursor--;
 
-         while (j && isspace (cf->current_command[j]))
+         while (cf->cursor && isspace (cf->current_command[cf->cursor]))
            {
-             unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b", 1);
-             j--;
+             unix_vlib_cli_output_cursor_left (cf, uf);
+             cf->cursor--;
            }
-         while (j && !isspace (cf->current_command[j]))
+         while (cf->cursor && !isspace (cf->current_command[cf->cursor]))
            {
-             if (isspace (cf->current_command[j - 1]))
+             if (isspace (cf->current_command[cf->cursor - 1]))
                break;
-             unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b", 1);
-             j--;
+             unix_vlib_cli_output_cursor_left (cf, uf);
+             cf->cursor--;
            }
 
-         cf->cursor = j;
        }
 
       cf->search_mode = 0;
@@ -1577,9 +1812,13 @@ unix_cli_line_process_one (unix_cli_main_t * cm,
        {
          if (cf->cursor == vec_len (cf->current_command))
            {
-             unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b \b", 3);
-             _vec_len (cf->current_command)--;
+             unix_vlib_cli_output_cursor_left (cf, uf);
              cf->cursor--;
+             unix_vlib_cli_output_cooked (cf, uf, (u8 *) " ", 1);
+             cf->cursor++;
+             unix_vlib_cli_output_cursor_left (cf, uf);
+             cf->cursor--;
+             _vec_len (cf->current_command)--;
            }
          else if (cf->cursor > 0)
            {
@@ -1588,16 +1827,25 @@ unix_cli_line_process_one (unix_cli_main_t * cm,
              memmove (cf->current_command + cf->cursor - 1,
                       cf->current_command + cf->cursor, j);
              _vec_len (cf->current_command)--;
-             cf->cursor--;
+
              /* redraw the rest of the line */
-             unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b", 1);
+             unix_vlib_cli_output_cursor_left (cf, uf);
+             cf->cursor--;
              unix_vlib_cli_output_cooked (cf, uf,
                                           cf->current_command + cf->cursor,
                                           j);
-             unix_vlib_cli_output_cooked (cf, uf, (u8 *) " \b\b", 3);
+             cf->cursor += j;
+             /* erase last char */
+             unix_vlib_cli_output_cooked (cf, uf, (u8 *) " ", 1);
+             cf->cursor++;
+
              /* and shift the terminal cursor back where it should be */
+             j += 2;           /* account for old string length and offset position */
              while (--j)
-               unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b", 1);
+               {
+                 unix_vlib_cli_output_cursor_left (cf, uf);
+                 cf->cursor--;
+               }
            }
        }
       cf->search_mode = 0;
@@ -1619,13 +1867,21 @@ unix_cli_line_process_one (unix_cli_main_t * cm,
              unix_vlib_cli_output_cooked (cf, uf,
                                           cf->current_command + cf->cursor,
                                           j);
-             unix_vlib_cli_output_cooked (cf, uf, (u8 *) " \b", 2);
+             cf->cursor += j;
+             unix_vlib_cli_output_cooked (cf, uf, (u8 *) " ", 1);
+             cf->cursor++;
+             unix_vlib_cli_output_cursor_left (cf, uf);
+             cf->cursor--;
              /* and shift the terminal cursor back where it should be */
              if (j)
                {
-                 unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b", 1);
+                 unix_vlib_cli_output_cursor_left (cf, uf);
+                 cf->cursor--;
                  while (--j)
-                   unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b", 1);
+                   {
+                     unix_vlib_cli_output_cursor_left (cf, uf);
+                     cf->cursor--;
+                   }
                }
            }
        }
@@ -1657,11 +1913,13 @@ unix_cli_line_process_one (unix_cli_main_t * cm,
 
       unix_vlib_cli_output_raw (cf, uf,
                                cm->cli_prompt, vec_len (cm->cli_prompt));
-      unix_vlib_cli_output_raw (cf, uf,
-                               cf->current_command,
-                               vec_len (cf->current_command));
-      for (j = cf->cursor; j < vec_len (cf->current_command); j++)
-       unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b", 1);
+      unix_vlib_cli_output_cooked (cf, uf,
+                                  cf->current_command,
+                                  vec_len (cf->current_command));
+      j = cf->cursor;
+      cf->cursor = vec_len (cf->current_command);
+      for (; cf->cursor > j; cf->cursor--)
+       unix_vlib_cli_output_cursor_left (cf, uf);
 
       break;
 
@@ -1688,14 +1946,15 @@ unix_cli_line_process_one (unix_cli_main_t * cm,
        vlib_cli_get_possible_completions (cf->current_command);
       if (vec_len (possible_commands) == 1)
        {
-         u32 j = cf->cursor;
          u8 *completed = possible_commands[0];
+         j = cf->cursor;
 
          /* find the last word of current_command */
          while (j >= 1 && !isspace (cf->current_command[j - 1]))
            {
+             unix_vlib_cli_output_cursor_left (cf, uf);
+             cf->cursor--;
              j--;
-             unix_vlib_cli_output_raw (cf, uf, (u8 *) "\b", 1);
            }
          _vec_len (cf->current_command) = j;
 
@@ -1703,13 +1962,14 @@ unix_cli_line_process_one (unix_cli_main_t * cm,
          vec_append (cf->current_command, completed);
 
          /* echo to the terminal */
-         unix_vlib_cli_output_raw (cf, uf, completed, vec_len (completed));
+         unix_vlib_cli_output_cooked (cf, uf, completed,
+                                      vec_len (completed));
 
          /* add one trailing space if needed */
          if (vec_len (save) == 0)
            {
              vec_add1 (cf->current_command, ' ');
-             unix_vlib_cli_output_raw (cf, uf, (u8 *) " ", 1);
+             unix_vlib_cli_output_cooked (cf, uf, (u8 *) " ", 1);
            }
 
          cf->cursor = vec_len (cf->current_command);
@@ -1719,18 +1979,14 @@ unix_cli_line_process_one (unix_cli_main_t * cm,
        {
          u8 **possible_command;
          uword max_command_len = 0, min_command_len = ~0;
-         u32 i, j;
+         u32 i;
 
          vec_foreach (possible_command, possible_commands)
          {
            if (vec_len (*possible_command) > max_command_len)
-             {
-               max_command_len = vec_len (*possible_command);
-             }
+             max_command_len = vec_len (*possible_command);
            if (vec_len (*possible_command) < min_command_len)
-             {
-               min_command_len = vec_len (*possible_command);
-             }
+             min_command_len = vec_len (*possible_command);
          }
 
          unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\n", 1);
@@ -1743,12 +1999,12 @@ unix_cli_line_process_one (unix_cli_main_t * cm,
                unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\n", 1);
                i = 0;
              }
-           unix_vlib_cli_output_raw (cf, uf, *possible_command,
-                                     vec_len (*possible_command));
+           unix_vlib_cli_output_cooked (cf, uf, *possible_command,
+                                        vec_len (*possible_command));
            for (j = vec_len (*possible_command); j < max_command_len + 2;
                 j++)
              {
-               unix_vlib_cli_output_raw (cf, uf, (u8 *) " ", 1);
+               unix_vlib_cli_output_cooked (cf, uf, (u8 *) " ", 1);
              }
            i += max_command_len + 2;
          }
@@ -1757,8 +2013,8 @@ unix_cli_line_process_one (unix_cli_main_t * cm,
 
          /* rewrite prompt */
          unix_cli_cli_prompt (cf, uf);
-         unix_vlib_cli_output_raw (cf, uf, cf->current_command,
-                                   vec_len (cf->current_command));
+         unix_vlib_cli_output_cooked (cf, uf, cf->current_command,
+                                      vec_len (cf->current_command));
 
          /* count length of last word */
          j = cf->cursor;
@@ -1774,6 +2030,7 @@ unix_cli_line_process_one (unix_cli_main_t * cm,
            {
              u8 common = '\0';
              int stop = 0;
+
              vec_foreach (possible_command, possible_commands)
              {
                if (common == '\0')
@@ -1786,11 +2043,12 @@ unix_cli_line_process_one (unix_cli_main_t * cm,
                    break;
                  }
              }
+
              if (!stop)
                {
                  vec_add1 (cf->current_command, common);
                  cf->cursor++;
-                 unix_vlib_cli_output_raw (cf, uf, (u8 *) & common, 1);
+                 unix_vlib_cli_output_cooked (cf, uf, (u8 *) & common, 1);
                }
              else
                {
@@ -1806,11 +2064,10 @@ unix_cli_line_process_one (unix_cli_main_t * cm,
       if (vec_len (save) > 0)
        {
          /* restore remaining input if tab was hit in the middle of a line */
-         unix_vlib_cli_output_raw (cf, uf, save, vec_len (save));
-         for (j = 0; j < vec_len (save); j++)
-           {
-             unix_vlib_cli_output_raw (cf, uf, (u8 *) "\b", 1);
-           }
+         unix_vlib_cli_output_cooked (cf, uf, save, vec_len (save));
+         cf->cursor += vec_len (save);
+         for (j = 0; j < vec_len (save); j++, cf->cursor--)
+           unix_vlib_cli_output_cursor_left (cf, uf);
          vec_append (cf->current_command, save);
          vec_free (save);
        }
@@ -1832,7 +2089,7 @@ unix_cli_line_process_one (unix_cli_main_t * cm,
     case UNIX_CLI_PARSE_ACTION_PAGER_NEXT:
     case UNIX_CLI_PARSE_ACTION_PAGER_PGDN:
       /* show next page of the buffer */
-      if (cf->height + cf->pager_start < vec_len (cf->pager_index))
+      if (cf->height + cf->pager_start <= vec_len (cf->pager_index))
        {
          u8 *line = NULL;
          unix_cli_pager_index_t *pi = NULL;
@@ -1863,7 +2120,7 @@ unix_cli_line_process_one (unix_cli_main_t * cm,
     case UNIX_CLI_PARSE_ACTION_PAGER_DN:
     case UNIX_CLI_PARSE_ACTION_PAGER_CRLF:
       /* display the next line of the buffer */
-      if (cf->pager_start < vec_len (cf->pager_index) - (cf->height - 1))
+      if (cf->height + cf->pager_start <= vec_len (cf->pager_index))
        {
          u8 *line;
          unix_cli_pager_index_t *pi;
@@ -2062,7 +2319,7 @@ unix_cli_line_process_one (unix_cli_main_t * cm,
        {
          /* no-op for now */
        }
-      else if (cf->has_history && cf->search_mode && isprint (input))
+      else if (cf->has_history && cf->search_mode != 0 && isprint (input))
        {
          int k, limit, offset;
          u8 *item;
@@ -2097,8 +2354,12 @@ unix_cli_line_process_one (unix_cli_main_t * cm,
              goto next;
 
            found_at_offset:
-             for (j = 0; j < vec_len (cf->current_command); j++)
-               unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b \b", 3);
+             for (; cf->cursor > 0; cf->cursor--)
+               {
+                 unix_vlib_cli_output_cursor_left (cf, uf);
+                 unix_vlib_cli_output_cooked (cf, uf, (u8 *) " ", 1);
+                 unix_vlib_cli_output_cursor_left (cf, uf);
+               }
 
              vec_validate (cf->current_command, vec_len (item) - 1);
              clib_memcpy (cf->current_command, item, vec_len (item));
@@ -2129,7 +2390,7 @@ unix_cli_line_process_one (unix_cli_main_t * cm,
              cf->cursor++;
 
              /* Echo the character back to the client */
-             unix_vlib_cli_output_raw (cf, uf, &input, 1);
+             unix_vlib_cli_output_cooked (cf, uf, &input, 1);
            }
          else
            {
@@ -2141,12 +2402,14 @@ unix_cli_line_process_one (unix_cli_main_t * cm,
              cf->current_command[cf->cursor] = input;
              /* Redraw the line */
              j++;
-             unix_vlib_cli_output_raw (cf, uf,
-                                       cf->current_command + cf->cursor, j);
+             unix_vlib_cli_output_cooked (cf, uf,
+                                          cf->current_command + cf->cursor,
+                                          j);
+             cf->cursor += j;
+             j--;
              /* Put terminal cursor back */
-             while (--j)
-               unix_vlib_cli_output_raw (cf, uf, (u8 *) "\b", 1);
-             cf->cursor++;
+             for (; j > 0; j--, cf->cursor--)
+               unix_vlib_cli_output_cursor_left (cf, uf);
            }
        }
       else
@@ -2294,6 +2557,8 @@ more:
                   format_timeval, 0 /* current bat-time */ ,
                   0 /* current bat-format */ ,
                   cli_file_index, cf->current_command);
+      if (cf->current_command[vec_len (cf->current_command) - 1] != '\n')
+       lv = format (lv, "\n");
       int rv __attribute__ ((unused)) = write (um->log_fd, lv, vec_len (lv));
     }
 
@@ -2379,6 +2644,10 @@ unix_cli_kill (unix_cli_main_t * cm, uword cli_file_index)
   clib_file_t *uf;
   int i;
 
+  /* Validate cli_file_index */
+  if (pool_is_free_index (cm->cli_file_pool, cli_file_index))
+    return;
+
   cf = pool_elt_at_index (cm->cli_file_pool, cli_file_index);
   uf = pool_elt_at_index (fm->file_pool, cf->clib_file_index);
 
@@ -2556,7 +2825,7 @@ unix_cli_file_add (unix_cli_main_t * cm, char *name, int fd)
   unix_cli_file_t *cf;
   clib_file_t template = { 0 };
   vlib_main_t *vm = um->vlib_main;
-  vlib_node_t *n;
+  vlib_node_t *n = 0;
   u8 *file_desc = 0;
 
   file_desc = format (0, "%s", name);
@@ -2566,11 +2835,27 @@ unix_cli_file_add (unix_cli_main_t * cm, char *name, int fd)
   if (vec_len (cm->unused_cli_process_node_indices) > 0)
     {
       uword l = vec_len (cm->unused_cli_process_node_indices);
+      int i;
+      vlib_main_t *this_vlib_main;
+      u8 *old_name = 0;
 
-      /* Find node and give it new name. */
-      n = vlib_get_node (vm, cm->unused_cli_process_node_indices[l - 1]);
-      vec_free (n->name);
-      n->name = (u8 *) name;
+      /*
+       * Nodes are bulk-copied, so node name pointers are shared.
+       * Find the cli node in all graph replicas, and give all of them
+       * the same new name.
+       * Then, throw away the old shared name-vector.
+       */
+      for (i = 0; i < vec_len (vlib_mains); i++)
+       {
+         this_vlib_main = vlib_mains[i];
+         if (this_vlib_main == 0)
+           continue;
+         n = vlib_get_node (this_vlib_main,
+                            cm->unused_cli_process_node_indices[l - 1]);
+         old_name = n->name;
+         n->name = (u8 *) name;
+       }
+      vec_free (old_name);
 
       vlib_node_set_state (vm, n->index, VLIB_NODE_STATE_POLLING);
 
@@ -2581,18 +2866,23 @@ unix_cli_file_add (unix_cli_main_t * cm, char *name, int fd)
       static vlib_node_registration_t r = {
        .function = unix_cli_process,
        .type = VLIB_NODE_TYPE_PROCESS,
-       .process_log2_n_stack_bytes = 16,
+       .process_log2_n_stack_bytes = 18,
       };
 
       r.name = name;
+
+      vlib_worker_thread_barrier_sync (vm);
+
       vlib_register_node (vm, &r);
       vec_free (name);
 
       n = vlib_get_node (vm, r.index);
+      vlib_worker_thread_node_runtime_update ();
+      vlib_worker_thread_barrier_release (vm);
     }
 
   pool_get (cm->cli_file_pool, cf);
-  memset (cf, 0, sizeof (*cf));
+  clib_memset (cf, 0, sizeof (*cf));
 
   template.read_function = unix_cli_read_ready;
   template.write_function = unix_cli_write_ready;
@@ -2628,11 +2918,17 @@ unix_cli_listen_read_ready (clib_file_t * uf)
   clib_error_t *error;
   unix_cli_file_t *cf;
   u32 cf_index;
+  int one;
 
   error = clib_socket_accept (s, &client);
   if (error)
     return error;
 
+  /* Disable Nagle, ignore any errors doing so eg on PF_LOCAL socket */
+  one = 1;
+  (void) setsockopt (client.fd, IPPROTO_TCP, TCP_NODELAY,
+                    (void *) &one, sizeof (one));
+
   client_name = (char *) format (0, "%U%c", format_sockaddr, &client.peer, 0);
 
   cf_index = unix_cli_file_add (cm, client_name, client.fd);
@@ -2690,9 +2986,22 @@ unix_cli_listen_read_ready (clib_file_t * uf)
       unix_vlib_cli_output_raw (cf, uf, charmode_option,
                                ARRAY_LEN (charmode_option));
 
-      /* In case the client doesn't negotiate terminal type, use
-       * a timer to kick off the initial prompt. */
-      timer_call (unix_cli_file_welcome_timer, cf_index, 1);
+      if (cm->new_session_process_node_index == ~0)
+       {
+         /* Create thw new session deadline process */
+         cm->new_session_process_node_index =
+           vlib_process_create (um->vlib_main, "unix-cli-new-session",
+                                unix_cli_new_session_process,
+                                16 /* log2_n_stack_bytes */ );
+       }
+
+      /* In case the client doesn't negotiate terminal type, register
+       * our session with a process that will emit the prompt if
+       * a deadline passes */
+      vlib_process_signal_event (um->vlib_main,
+                                cm->new_session_process_node_index,
+                                UNIX_CLI_NEW_SESSION_EVENT_ADD, cf_index);
+
     }
 
   return error;
@@ -2776,15 +3085,17 @@ unix_cli_config (vlib_main_t * vm, unformat_input_t * input)
       if (isatty (STDIN_FILENO) && um->cli_line_mode == 0)
        {
          /* Capture terminal resize events */
-         memset (&sa, 0, sizeof (sa));
+         clib_memset (&sa, 0, sizeof (sa));
          sa.sa_handler = unix_cli_resize_interrupt;
          if (sigaction (SIGWINCH, &sa, 0) < 0)
            clib_panic ("sigaction");
 
          /* Retrieve the current terminal size */
-         ioctl (STDIN_FILENO, TIOCGWINSZ, &ws);
-         cf->width = ws.ws_col;
-         cf->height = ws.ws_row;
+         if (ioctl (STDIN_FILENO, TIOCGWINSZ, &ws) == 0)
+           {
+             cf->width = ws.ws_col;
+             cf->height = ws.ws_row;
+           }
 
          if (cf->width == 0 || cf->height == 0)
            {
@@ -2817,8 +3128,12 @@ unix_cli_config (vlib_main_t * vm, unformat_input_t * input)
          tio = um->tio_stdin;
          /* echo off, canonical mode off, ext'd input processing off */
          tio.c_lflag &= ~(ECHO | ICANON | IEXTEN);
+         /* disable XON/XOFF, so ^S invokes the history search */
+         tio.c_iflag &= ~(IXON | IXOFF);
          tio.c_cc[VMIN] = 1;   /* 1 byte at a time */
          tio.c_cc[VTIME] = 0;  /* no timer */
+         tio.c_cc[VSTOP] = _POSIX_VDISABLE;    /* not ^S */
+         tio.c_cc[VSTART] = _POSIX_VDISABLE;   /* not ^Q */
          tcsetattr (STDIN_FILENO, TCSAFLUSH, &tio);
 
          /* See if we can do ANSI/VT100 output */
@@ -2856,7 +3171,7 @@ unix_cli_config (vlib_main_t * vm, unformat_input_t * input)
          while (i && tmp[--i] != '/')
            ;
 
-         tmp[i] = 0;
+         tmp[i] = '\0';
 
          if (i)
            vlib_unix_recursive_mkdir ((char *) tmp);
@@ -3017,7 +3332,7 @@ unix_cli_exec (vlib_main_t * vm,
   unformat_free (&sub_input);
 
 done:
-  if (fd > 0)
+  if (fd >= 0)
     close (fd);
   vec_free (file_name);
 
@@ -3289,7 +3604,6 @@ unix_cli_show_cli_sessions (vlib_main_t * vm,
                            unformat_input_t * input,
                            vlib_cli_command_t * cmd)
 {
-  //unix_main_t *um = &unix_main;
   unix_cli_main_t *cm = &unix_cli_main;
   clib_file_main_t *fm = &file_main;
   unix_cli_file_t *cf;
@@ -3458,14 +3772,21 @@ unix_cli_set_terminal_history (vlib_main_t * vm,
          goto done;
        }
 
-      /* If we reduced history size, or turned it off, purge the history */
-      limit = cf->has_history ? cf->history_limit : 0;
+    }
 
-      while (cf->command_history && vec_len (cf->command_history) >= limit)
-       {
-         vec_free (cf->command_history[0]);
-         vec_delete (cf->command_history, 1, 0);
-       }
+  /* If we reduced history size, or turned it off, purge the history */
+  limit = cf->has_history ? cf->history_limit : 0;
+  if (limit < vec_len (cf->command_history))
+    {
+      u32 i;
+
+      /* How many items to remove from the start of history */
+      limit = vec_len (cf->command_history) - limit;
+
+      for (i = 0; i < limit; i++)
+       vec_free (cf->command_history[i]);
+
+      vec_delete (cf->command_history, limit, 0);
     }
 
 done:
@@ -3530,9 +3851,55 @@ VLIB_CLI_COMMAND (cli_unix_cli_set_terminal_ansi, static) = {
 };
 /* *INDENT-ON* */
 
+
+#define MAX_CLI_WAIT 86400
+/** CLI command to wait <sec> seconds. Useful for exec script. */
+static clib_error_t *
+unix_wait_cmd (vlib_main_t * vm,
+              unformat_input_t * input, vlib_cli_command_t * cmd)
+{
+  unformat_input_t _line_input, *line_input = &_line_input;
+  f64 sec = 1.0;
+
+  if (!unformat_user (input, unformat_line_input, line_input))
+    return 0;
+
+  while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
+    {
+      if (unformat (line_input, "%f", &sec))
+       ;
+      else
+       return clib_error_return (0, "unknown parameter: `%U`",
+                                 format_unformat_error, input);
+    }
+
+  if (sec <= 0 || sec > MAX_CLI_WAIT || floor (sec * 1000) / 1000 != sec)
+    return clib_error_return (0,
+                             "<sec> must be a positive value and less than 86400 (one day) with no more than msec precision.");
+
+  vlib_process_wait_for_event_or_clock (vm, sec);
+  vlib_cli_output (vm, "waited %.3f sec.", sec);
+
+  unformat_free (line_input);
+  return 0;
+}
+/* *INDENT-OFF* */
+VLIB_CLI_COMMAND (cli_unix_wait_cmd, static) = {
+  .path = "wait",
+  .short_help = "wait <sec>",
+  .function = unix_wait_cmd,
+};
+/* *INDENT-ON* */
+
 static clib_error_t *
 unix_cli_init (vlib_main_t * vm)
 {
+  unix_cli_main_t *cm = &unix_cli_main;
+
+  /* Breadcrumb to indicate the new session process
+   * has not been started */
+  cm->new_session_process_node_index = ~0;
+
   return 0;
 }