src/vlib/unix/cli.c

   1 /*
   2  * Copyright (c) 2015 Cisco and/or its affiliates.
   3  * Licensed under the Apache License, Version 2.0 (the "License");
   4  * you may not use this file except in compliance with the License.
   5  * You may obtain a copy of the License at:
   6  *
   7  *     http://www.apache.org/licenses/LICENSE-2.0
   8  *
   9  * Unless required by applicable law or agreed to in writing, software
  10  * distributed under the License is distributed on an "AS IS" BASIS,
  11  * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
  12  * See the License for the specific language governing permissions and
  13  * limitations under the License.
  14  */
  15 /*
  16  * cli.c: Unix stdin/socket CLI.
  17  *
  18  * Copyright (c) 2008 Eliot Dresselhaus
  19  *
  20  * Permission is hereby granted, free of charge, to any person obtaining
  21  * a copy of this software and associated documentation files (the
  22  * "Software"), to deal in the Software without restriction, including
  23  * without limitation the rights to use, copy, modify, merge, publish,
  24  * distribute, sublicense, and/or sell copies of the Software, and to
  25  * permit persons to whom the Software is furnished to do so, subject to
  26  * the following conditions:
  27  *
  28  * The above copyright notice and this permission notice shall be
  29  * included in all copies or substantial portions of the Software.
  30  *
  31  *  THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
  32  *  EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
  33  *  MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
  34  *  NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
  35  *  LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
  36  *  OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
  37  *  WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
  38  */
  39 /**
  40  * @file
  41  * @brief Unix stdin/socket command line interface.
  42  * Provides a command line interface so humans can interact with VPP.
  43  * This is predominantly a debugging and testing mechanism.
  44  */
  45 /*? %%clicmd:group_label Command line session %% ?*/
  46 /*? %%syscfg:group_label Command line session %% ?*/
  47
  48 #include <vlib/vlib.h>
  49 #include <vlib/unix/unix.h>
  50 #include <vppinfra/timer.h>
  51
  52 #include <ctype.h>
  53 #include <fcntl.h>
  54 #include <sys/stat.h>
  55 #include <termios.h>
  56 #include <signal.h>
  57 #include <unistd.h>
  58 #include <arpa/telnet.h>
  59 #include <sys/ioctl.h>
  60 #include <sys/types.h>
  61 #include <unistd.h>
  62
  63 /** ANSI escape code. */
  64 #define ESC "\x1b"
  65
  66 /** ANSI Control Sequence Introducer. */
  67 #define CSI ESC "["
  68
  69 /** ANSI clear screen. */
  70 #define ANSI_CLEAR      CSI "2J" CSI "1;1H"
  71 /** ANSI reset color settings. */
  72 #define ANSI_RESET      CSI "0m"
  73 /** ANSI Start bold text. */
  74 #define ANSI_BOLD       CSI "1m"
  75 /** ANSI Stop bold text. */
  76 #define ANSI_DIM        CSI "2m"
  77 /** ANSI Start dark red text. */
  78 #define ANSI_DRED       ANSI_DIM CSI "31m"
  79 /** ANSI Start bright red text. */
  80 #define ANSI_BRED       ANSI_BOLD CSI "31m"
  81 /** ANSI clear line cursor is on. */
  82 #define ANSI_CLEARLINE  CSI "2K"
  83 /** ANSI scroll screen down one line. */
  84 #define ANSI_SCROLLDN   CSI "1T"
  85 /** ANSI save cursor position. */
  86 #define ANSI_SAVECURSOR CSI "s"
  87 /** ANSI restore cursor position if previously saved. */
  88 #define ANSI_RESTCURSOR CSI "u"
  89
  90 /** Maximum depth into a byte stream from which to compile a Telnet
  91  * protocol message. This is a saftey measure. */
  92 #define UNIX_CLI_MAX_DEPTH_TELNET 24
  93
  94 /** Minimum terminal width we will accept */
  95 #define UNIX_CLI_MIN_TERMINAL_WIDTH 1
  96 /** Maximum terminal width we will accept */
  97 #define UNIX_CLI_MAX_TERMINAL_WIDTH 512
  98 /** Minimum terminal height we will accept */
  99 #define UNIX_CLI_MIN_TERMINAL_HEIGHT 1
 100 /** Maximum terminal height we will accept */
 101 #define UNIX_CLI_MAX_TERMINAL_HEIGHT 512
 102
 103 /** Unix standard in */
 104 #define UNIX_CLI_STDIN_FD 0
 105
 106
 107 /** A CLI banner line. */
 108 typedef struct
 109 {
 110   u8 *line;     /**< The line to print. */
 111   u32 length;   /**< The length of the line without terminating NUL. */
 112 } unix_cli_banner_t;
 113
 114 #define _(a) { .line = (u8 *)(a), .length = sizeof(a) - 1 }
 115 /** Plain welcome banner. */
 116 static unix_cli_banner_t unix_cli_banner[] = {
 117   _("    _______    _        _   _____  ___ \n"),
 118   _(" __/ __/ _ \\  (_)__    | | / / _ \\/ _ \\\n"),
 119   _(" _/ _// // / / / _ \\   | |/ / ___/ ___/\n"),
 120   _(" /_/ /____(_)_/\\___/   |___/_/  /_/    \n"),
 121   _("\n")
 122 };
 123
 124 /** ANSI color welcome banner. */
 125 static unix_cli_banner_t unix_cli_banner_color[] = {
 126   _(ANSI_BRED "    _______    _     " ANSI_RESET "   _   _____  ___ \n"),
 127   _(ANSI_BRED " __/ __/ _ \\  (_)__ " ANSI_RESET "   | | / / _ \\/ _ \\\n"),
 128   _(ANSI_BRED " _/ _// // / / / _ \\" ANSI_RESET "   | |/ / ___/ ___/\n"),
 129   _(ANSI_BRED " /_/ /____(_)_/\\___/" ANSI_RESET "   |___/_/  /_/    \n"),
 130   _("\n")
 131 };
 132
 133 #undef _
 134
 135 /** Pager line index */
 136 typedef struct
 137 {
 138   /** Index into pager_vector */
 139   u32 line;
 140
 141   /** Offset of the string in the line */
 142   u32 offset;
 143
 144   /** Length of the string in the line */
 145   u32 length;
 146 } unix_cli_pager_index_t;
 147
 148
 149 /** Unix CLI session. */
 150 typedef struct
 151 {
 152   /** The file index held by unix.c */
 153   u32 clib_file_index;
 154
 155   /** Vector of output pending write to file descriptor. */
 156   u8 *output_vector;
 157
 158   /** Vector of input saved by Unix input node to be processed by
 159      CLI process. */
 160   u8 *input_vector;
 161
 162   /** This session has command history. */
 163   u8 has_history;
 164   /** Array of vectors of commands in the history. */
 165   u8 **command_history;
 166   /** The command currently pointed at by the history cursor. */
 167   u8 *current_command;
 168   /** How far from the end of the history array the user has browsed. */
 169   i32 excursion;
 170
 171   /** Maximum number of history entries this session will store. */
 172   u32 history_limit;
 173
 174   /** Current command line counter */
 175   u32 command_number;
 176
 177   /** The string being searched for in the history. */
 178   u8 *search_key;
 179   /** If non-zero then the CLI is searching in the history array.
 180    * - @c -1 means search backwards.
 181    * - @c 1 means search forwards.
 182    */
 183   int search_mode;
 184
 185   /** Position of the insert cursor on the current input line */
 186   u32 cursor;
 187
 188   /** Line mode or char mode */
 189   u8 line_mode;
 190
 191   /** Set if the CRLF mode wants CR + LF */
 192   u8 crlf_mode;
 193
 194   /** Can we do ANSI output? */
 195   u8 ansi_capable;
 196
 197   /** Has the session started? */
 198   u8 started;
 199
 200   /** Disable the pager? */
 201   u8 no_pager;
 202
 203   /** Pager buffer */
 204   u8 **pager_vector;
 205
 206   /** Index of line fragments in the pager buffer */
 207   unix_cli_pager_index_t *pager_index;
 208
 209   /** Line number of top of page */
 210   u32 pager_start;
 211
 212   /** Terminal width */
 213   u32 width;
 214
 215   /** Terminal height */
 216   u32 height;
 217
 218   /** Process node identifier */
 219   u32 process_node_index;
 220 } unix_cli_file_t;
 221
 222 /** Resets the pager buffer and other data.
 223  * @param f The CLI session whose pager needs to be reset.
 224  */
 225 always_inline void
 226 unix_cli_pager_reset (unix_cli_file_t * f)
 227 {
 228   u8 **p;
 229
 230   f->pager_start = 0;
 231
 232   vec_free (f->pager_index);
 233   f->pager_index = 0;
 234
 235   vec_foreach (p, f->pager_vector)
 236   {
 237     vec_free (*p);
 238   }
 239   vec_free (f->pager_vector);
 240   f->pager_vector = 0;
 241 }
 242
 243 /** Release storage used by a CLI session.
 244  * @param f The CLI session whose storage needs to be released.
 245  */
 246 always_inline void
 247 unix_cli_file_free (unix_cli_file_t * f)
 248 {
 249   vec_free (f->output_vector);
 250   vec_free (f->input_vector);
 251   unix_cli_pager_reset (f);
 252 }
 253
 254 /** CLI actions */
 255 typedef enum
 256 {
 257   UNIX_CLI_PARSE_ACTION_NOACTION = 0,   /**< No action */
 258   UNIX_CLI_PARSE_ACTION_CRLF,           /**< Carriage return, newline or enter */
 259   UNIX_CLI_PARSE_ACTION_TAB,            /**< Tab key */
 260   UNIX_CLI_PARSE_ACTION_ERASE,          /**< Erase cursor left */
 261   UNIX_CLI_PARSE_ACTION_ERASERIGHT,     /**< Erase cursor right */
 262   UNIX_CLI_PARSE_ACTION_UP,             /**< Up arrow */
 263   UNIX_CLI_PARSE_ACTION_DOWN,           /**< Down arrow */
 264   UNIX_CLI_PARSE_ACTION_LEFT,           /**< Left arrow */
 265   UNIX_CLI_PARSE_ACTION_RIGHT,          /**< Right arrow */
 266   UNIX_CLI_PARSE_ACTION_HOME,           /**< Home key (jump to start of line) */
 267   UNIX_CLI_PARSE_ACTION_END,            /**< End key (jump to end of line) */
 268   UNIX_CLI_PARSE_ACTION_WORDLEFT,       /**< Jump cursor to start of left word */
 269   UNIX_CLI_PARSE_ACTION_WORDRIGHT,      /**< Jump cursor to start of right word */
 270   UNIX_CLI_PARSE_ACTION_ERASELINELEFT,  /**< Erase line to left of cursor */
 271   UNIX_CLI_PARSE_ACTION_ERASELINERIGHT, /**< Erase line to right & including cursor */
 272   UNIX_CLI_PARSE_ACTION_CLEAR,          /**< Clear the terminal */
 273   UNIX_CLI_PARSE_ACTION_REVSEARCH,      /**< Search backwards in command history */
 274   UNIX_CLI_PARSE_ACTION_FWDSEARCH,      /**< Search forwards in command history */
 275   UNIX_CLI_PARSE_ACTION_YANK,           /**< Undo last erase action */
 276   UNIX_CLI_PARSE_ACTION_TELNETIAC,      /**< Telnet control code */
 277
 278   UNIX_CLI_PARSE_ACTION_PAGER_CRLF,     /**< Enter pressed (CR, CRLF, LF, etc) */
 279   UNIX_CLI_PARSE_ACTION_PAGER_QUIT,     /**< Exit the pager session */
 280   UNIX_CLI_PARSE_ACTION_PAGER_NEXT,     /**< Scroll to next page */
 281   UNIX_CLI_PARSE_ACTION_PAGER_DN,       /**< Scroll to next line */
 282   UNIX_CLI_PARSE_ACTION_PAGER_UP,       /**< Scroll to previous line */
 283   UNIX_CLI_PARSE_ACTION_PAGER_TOP,      /**< Scroll to first line */
 284   UNIX_CLI_PARSE_ACTION_PAGER_BOTTOM,   /**< Scroll to last line */
 285   UNIX_CLI_PARSE_ACTION_PAGER_PGDN,     /**< Scroll to next page */
 286   UNIX_CLI_PARSE_ACTION_PAGER_PGUP,     /**< Scroll to previous page */
 287   UNIX_CLI_PARSE_ACTION_PAGER_REDRAW,   /**< Clear and redraw the page on the terminal */
 288   UNIX_CLI_PARSE_ACTION_PAGER_SEARCH,   /**< Search the pager buffer */
 289
 290   UNIX_CLI_PARSE_ACTION_PARTIALMATCH,   /**< Action parser found a partial match */
 291   UNIX_CLI_PARSE_ACTION_NOMATCH         /**< Action parser did not find any match */
 292 } unix_cli_parse_action_t;
 293
 294 /** @brief Mapping of input buffer strings to action values.
 295  * @note This won't work as a hash since we need to be able to do
 296  *       partial matches on the string.
 297  */
 298 typedef struct
 299 {
 300   u8 *input;                        /**< Input string to match. */
 301   u32 len;                          /**< Length of input without final NUL. */
 302   unix_cli_parse_action_t action;   /**< Action to take when matched. */
 303 } unix_cli_parse_actions_t;
 304
 305 /** @brief Given a capital ASCII letter character return a @c NUL terminated
 306  * string with the control code for that letter.
 307  *
 308  * @param c An ASCII character.
 309  * @return A @c NUL terminated string of type @c u8[].
 310  *
 311  * @par Example
 312  *     @c CTL('A') returns <code>{ 0x01, 0x00 }</code> as a @c u8[].
 313  */
 314 #define CTL(c) (u8[]){ (c) - '@', 0 }
 315
 316 #define _(a,b) { .input = (u8 *)(a), .len = sizeof(a) - 1, .action = (b) }
 317 /**
 318  * Patterns to match on a CLI input stream.
 319  * @showinitializer
 320  */
 321 static unix_cli_parse_actions_t unix_cli_parse_strings[] = {
 322   /* Line handling */
 323   _("\r\n", UNIX_CLI_PARSE_ACTION_CRLF),        /* Must be before '\r' */
 324   _("\n", UNIX_CLI_PARSE_ACTION_CRLF),
 325   _("\r\0", UNIX_CLI_PARSE_ACTION_CRLF),        /* Telnet does this */
 326   _("\r", UNIX_CLI_PARSE_ACTION_CRLF),
 327
 328   /* Unix shell control codes */
 329   _(CTL ('B'), UNIX_CLI_PARSE_ACTION_LEFT),
 330   _(CTL ('F'), UNIX_CLI_PARSE_ACTION_RIGHT),
 331   _(CTL ('P'), UNIX_CLI_PARSE_ACTION_UP),
 332   _(CTL ('N'), UNIX_CLI_PARSE_ACTION_DOWN),
 333   _(CTL ('A'), UNIX_CLI_PARSE_ACTION_HOME),
 334   _(CTL ('E'), UNIX_CLI_PARSE_ACTION_END),
 335   _(CTL ('D'), UNIX_CLI_PARSE_ACTION_ERASERIGHT),
 336   _(CTL ('U'), UNIX_CLI_PARSE_ACTION_ERASELINELEFT),
 337   _(CTL ('K'), UNIX_CLI_PARSE_ACTION_ERASELINERIGHT),
 338   _(CTL ('Y'), UNIX_CLI_PARSE_ACTION_YANK),
 339   _(CTL ('L'), UNIX_CLI_PARSE_ACTION_CLEAR),
 340   _(ESC "b", UNIX_CLI_PARSE_ACTION_WORDLEFT),   /* Alt-B */
 341   _(ESC "f", UNIX_CLI_PARSE_ACTION_WORDRIGHT),  /* Alt-F */
 342   _("\b", UNIX_CLI_PARSE_ACTION_ERASE), /* ^H */
 343   _("\x7f", UNIX_CLI_PARSE_ACTION_ERASE),       /* Backspace */
 344   _("\t", UNIX_CLI_PARSE_ACTION_TAB),   /* ^I */
 345
 346   /* VT100 Normal mode - Broadest support */
 347   _(CSI "A", UNIX_CLI_PARSE_ACTION_UP),
 348   _(CSI "B", UNIX_CLI_PARSE_ACTION_DOWN),
 349   _(CSI "C", UNIX_CLI_PARSE_ACTION_RIGHT),
 350   _(CSI "D", UNIX_CLI_PARSE_ACTION_LEFT),
 351   _(CSI "H", UNIX_CLI_PARSE_ACTION_HOME),
 352   _(CSI "F", UNIX_CLI_PARSE_ACTION_END),
 353   _(CSI "3~", UNIX_CLI_PARSE_ACTION_ERASERIGHT),        /* Delete */
 354   _(CSI "1;5D", UNIX_CLI_PARSE_ACTION_WORDLEFT),        /* C-Left */
 355   _(CSI "1;5C", UNIX_CLI_PARSE_ACTION_WORDRIGHT),       /* C-Right */
 356
 357   /* VT100 Application mode - Some Gnome Terminal functions use these */
 358   _(ESC "OA", UNIX_CLI_PARSE_ACTION_UP),
 359   _(ESC "OB", UNIX_CLI_PARSE_ACTION_DOWN),
 360   _(ESC "OC", UNIX_CLI_PARSE_ACTION_RIGHT),
 361   _(ESC "OD", UNIX_CLI_PARSE_ACTION_LEFT),
 362   _(ESC "OH", UNIX_CLI_PARSE_ACTION_HOME),
 363   _(ESC "OF", UNIX_CLI_PARSE_ACTION_END),
 364
 365   /* ANSI X3.41-1974 - sent by Microsoft Telnet and PuTTY */
 366   _(CSI "1~", UNIX_CLI_PARSE_ACTION_HOME),
 367   _(CSI "4~", UNIX_CLI_PARSE_ACTION_END),
 368
 369   /* Emacs-ish history search */
 370   _(CTL ('S'), UNIX_CLI_PARSE_ACTION_FWDSEARCH),
 371   _(CTL ('R'), UNIX_CLI_PARSE_ACTION_REVSEARCH),
 372
 373   /* Other protocol things */
 374   _("\xff", UNIX_CLI_PARSE_ACTION_TELNETIAC),   /* IAC */
 375   _("\0", UNIX_CLI_PARSE_ACTION_NOACTION),      /* NUL */
 376   _(NULL, UNIX_CLI_PARSE_ACTION_NOMATCH)
 377 };
 378
 379 /**
 380  * Patterns to match when a CLI session is in the pager.
 381  * @showinitializer
 382  */
 383 static unix_cli_parse_actions_t unix_cli_parse_pager[] = {
 384   /* Line handling */
 385   _("\r\n", UNIX_CLI_PARSE_ACTION_PAGER_CRLF),  /* Must be before '\r' */
 386   _("\n", UNIX_CLI_PARSE_ACTION_PAGER_CRLF),
 387   _("\r\0", UNIX_CLI_PARSE_ACTION_PAGER_CRLF),  /* Telnet does this */
 388   _("\r", UNIX_CLI_PARSE_ACTION_PAGER_CRLF),
 389
 390   /* Pager commands */
 391   _(" ", UNIX_CLI_PARSE_ACTION_PAGER_NEXT),
 392   _("q", UNIX_CLI_PARSE_ACTION_PAGER_QUIT),
 393   _(CTL ('L'), UNIX_CLI_PARSE_ACTION_PAGER_REDRAW),
 394   _(CTL ('R'), UNIX_CLI_PARSE_ACTION_PAGER_REDRAW),
 395   _("/", UNIX_CLI_PARSE_ACTION_PAGER_SEARCH),
 396
 397   /* VT100 */
 398   _(CSI "A", UNIX_CLI_PARSE_ACTION_PAGER_UP),
 399   _(CSI "B", UNIX_CLI_PARSE_ACTION_PAGER_DN),
 400   _(CSI "H", UNIX_CLI_PARSE_ACTION_PAGER_TOP),
 401   _(CSI "F", UNIX_CLI_PARSE_ACTION_PAGER_BOTTOM),
 402
 403   /* VT100 Application mode */
 404   _(ESC "OA", UNIX_CLI_PARSE_ACTION_PAGER_UP),
 405   _(ESC "OB", UNIX_CLI_PARSE_ACTION_PAGER_DN),
 406   _(ESC "OH", UNIX_CLI_PARSE_ACTION_PAGER_TOP),
 407   _(ESC "OF", UNIX_CLI_PARSE_ACTION_PAGER_BOTTOM),
 408
 409   /* ANSI X3.41-1974 */
 410   _(CSI "1~", UNIX_CLI_PARSE_ACTION_PAGER_TOP),
 411   _(CSI "4~", UNIX_CLI_PARSE_ACTION_PAGER_BOTTOM),
 412   _(CSI "5~", UNIX_CLI_PARSE_ACTION_PAGER_PGUP),
 413   _(CSI "6~", UNIX_CLI_PARSE_ACTION_PAGER_PGDN),
 414
 415   /* Other protocol things */
 416   _("\xff", UNIX_CLI_PARSE_ACTION_TELNETIAC),   /* IAC */
 417   _("\0", UNIX_CLI_PARSE_ACTION_NOACTION),      /* NUL */
 418   _(NULL, UNIX_CLI_PARSE_ACTION_NOMATCH)
 419 };
 420
 421 #undef _
 422
 423 /** CLI session events. */
 424 typedef enum
 425 {
 426   UNIX_CLI_PROCESS_EVENT_READ_READY,  /**< A file descriptor has data to be read. */
 427   UNIX_CLI_PROCESS_EVENT_QUIT,        /**< A CLI session wants to close. */
 428 } unix_cli_process_event_type_t;
 429
 430 /** CLI global state. */
 431 typedef struct
 432 {
 433   /** Prompt string for CLI. */
 434   u8 *cli_prompt;
 435
 436   /** Vec pool of CLI sessions. */
 437   unix_cli_file_t *cli_file_pool;
 438
 439   /** Vec pool of unused session indices. */
 440   u32 *unused_cli_process_node_indices;
 441
 442   /** The session index of the stdin cli */
 443   u32 stdin_cli_file_index;
 444
 445   /** File pool index of current input. */
 446   u32 current_input_file_index;
 447 } unix_cli_main_t;
 448
 449 /** CLI global state */
 450 static unix_cli_main_t unix_cli_main;
 451
 452 /**
 453  * @brief Search for a byte sequence in the action list.
 454  *
 455  * Searches the @ref unix_cli_parse_actions_t list in @a a for a match with
 456  * the bytes in @a input of maximum length @a ilen bytes.
 457  * When a match is made @a *matched indicates how many bytes were matched.
 458  * Returns a value from the enum @ref unix_cli_parse_action_t to indicate
 459  * whether no match was found, a partial match was found or a complete
 460  * match was found and what action, if any, should be taken.
 461  *
 462  * @param[in]  a        Actions list to search within.
 463  * @param[in]  input    String fragment to search for.
 464  * @param[in]  ilen     Length of the string in 'input'.
 465  * @param[out] matched  Pointer to an integer that will contain the number
 466  *                      of bytes matched when a complete match is found.
 467  *
 468  * @return Action from @ref unix_cli_parse_action_t that the string fragment
 469  *         matches.
 470  *         @ref UNIX_CLI_PARSE_ACTION_PARTIALMATCH is returned when the
 471  *         whole input string matches the start of at least one action.
 472  *         @ref UNIX_CLI_PARSE_ACTION_NOMATCH is returned when there is no
 473  *         match at all.
 474  */
 475 static unix_cli_parse_action_t
 476 unix_cli_match_action (unix_cli_parse_actions_t * a,
 477                        u8 * input, u32 ilen, i32 * matched)
 478 {
 479   u8 partial = 0;
 480
 481   while (a->input)
 482     {
 483       if (ilen >= a->len)
 484         {
 485           /* see if the start of the input buffer exactly matches the current
 486            * action string. */
 487           if (memcmp (input, a->input, a->len) == 0)
 488             {
 489               *matched = a->len;
 490               return a->action;
 491             }
 492         }
 493       else
 494         {
 495           /* if the first ilen characters match, flag this as a partial -
 496            * meaning keep collecting bytes in case of a future match */
 497           if (memcmp (input, a->input, ilen) == 0)
 498             partial = 1;
 499         }
 500
 501       /* check next action */
 502       a++;
 503     }
 504
 505   return partial ?
 506     UNIX_CLI_PARSE_ACTION_PARTIALMATCH : UNIX_CLI_PARSE_ACTION_NOMATCH;
 507 }
 508
 509
 510 /** Add bytes to the output vector and then flagg the I/O system that bytes
 511  * are available to be sent.
 512  */
 513 static void
 514 unix_cli_add_pending_output (clib_file_t * uf,
 515                              unix_cli_file_t * cf,
 516                              u8 * buffer, uword buffer_bytes)
 517 {
 518   clib_file_main_t *fm = &file_main;
 519
 520   vec_add (cf->output_vector, buffer, buffer_bytes);
 521   if (vec_len (cf->output_vector) > 0)
 522     {
 523       int skip_update = 0 != (uf->flags & UNIX_FILE_DATA_AVAILABLE_TO_WRITE);
 524       uf->flags |= UNIX_FILE_DATA_AVAILABLE_TO_WRITE;
 525       if (!skip_update)
 526         fm->file_update (uf, UNIX_FILE_UPDATE_MODIFY);
 527     }
 528 }
 529
 530 /** Delete all bytes from the output vector and flag the I/O system
 531  * that no more bytes are available to be sent.
 532  */
 533 static void
 534 unix_cli_del_pending_output (clib_file_t * uf,
 535                              unix_cli_file_t * cf, uword n_bytes)
 536 {
 537   clib_file_main_t *fm = &file_main;
 538
 539   vec_delete (cf->output_vector, n_bytes, 0);
 540   if (vec_len (cf->output_vector) <= 0)
 541     {
 542       int skip_update = 0 == (uf->flags & UNIX_FILE_DATA_AVAILABLE_TO_WRITE);
 543       uf->flags &= ~UNIX_FILE_DATA_AVAILABLE_TO_WRITE;
 544       if (!skip_update)
 545         fm->file_update (uf, UNIX_FILE_UPDATE_MODIFY);
 546     }
 547 }
 548
 549 /** @brief A bit like strchr with a buffer length limit.
 550  * Search a buffer for the first instance of a character up to the limit of
 551  * the buffer length. If found then return the position of that character.
 552  *
 553  * The key departure from strchr is that if the character is not found then
 554  * return the buffer length.
 555  *
 556  * @param chr The byte value to search for.
 557  * @param str The buffer in which to search for the value.
 558  * @param len The depth into the buffer to search.
 559  *
 560  * @return The index of the first occurence of \c chr. If \c chr is not
 561  *          found then \c len instead.
 562  */
 563 always_inline word
 564 unix_vlib_findchr (u8 chr, u8 * str, word len)
 565 {
 566   word i = 0;
 567   for (i = 0; i < len; i++, str++)
 568     {
 569       if (*str == chr)
 570         return i;
 571     }
 572   return len;
 573 }
 574
 575 /** @brief Send a buffer to the CLI stream if possible, enqueue it otherwise.
 576  * Attempts to write given buffer to the file descriptor of the given
 577  * Unix CLI session. If that session already has data in the output buffer
 578  * or if the write attempt tells us to try again later then the given buffer
 579  * is appended to the pending output buffer instead.
 580  *
 581  * This is typically called only from \c unix_vlib_cli_output_cooked since
 582  * that is where CRLF handling occurs or from places where we explicitly do
 583  * not want cooked handling.
 584  *
 585  * @param cf Unix CLI session of the desired stream to write to.
 586  * @param uf The Unix file structure of the desired stream to write to.
 587  * @param buffer Pointer to the buffer that needs to be written.
 588  * @param buffer_bytes The number of bytes from \c buffer to write.
 589  */
 590 static void
 591 unix_vlib_cli_output_raw (unix_cli_file_t * cf,
 592                           clib_file_t * uf, u8 * buffer, uword buffer_bytes)
 593 {
 594   int n = 0;
 595
 596   if (vec_len (cf->output_vector) == 0)
 597     n = write (uf->file_descriptor, buffer, buffer_bytes);
 598
 599   if (n < 0 && errno != EAGAIN)
 600     {
 601       clib_unix_warning ("write");
 602     }
 603   else if ((word) n < (word) buffer_bytes)
 604     {
 605       /* We got EAGAIN or we already have stuff in the buffer;
 606        * queue up whatever didn't get sent for later. */
 607       if (n < 0)
 608         n = 0;
 609       unix_cli_add_pending_output (uf, cf, buffer + n, buffer_bytes - n);
 610     }
 611 }
 612
 613 /** @brief Process a buffer for CRLF handling before outputting it to the CLI.
 614  *
 615  * @param cf Unix CLI session of the desired stream to write to.
 616  * @param uf The Unix file structure of the desired stream to write to.
 617  * @param buffer Pointer to the buffer that needs to be written.
 618  * @param buffer_bytes The number of bytes from \c buffer to write.
 619  */
 620 static void
 621 unix_vlib_cli_output_cooked (unix_cli_file_t * cf,
 622                              clib_file_t * uf,
 623                              u8 * buffer, uword buffer_bytes)
 624 {
 625   word end = 0, start = 0;
 626
 627   while (end < buffer_bytes)
 628     {
 629       if (cf->crlf_mode)
 630         {
 631           /* iterate the line on \n's so we can insert a \r before it */
 632           end = unix_vlib_findchr ('\n',
 633                                    buffer + start,
 634                                    buffer_bytes - start) + start;
 635         }
 636       else
 637         {
 638           /* otherwise just send the whole buffer */
 639           end = buffer_bytes;
 640         }
 641
 642       unix_vlib_cli_output_raw (cf, uf, buffer + start, end - start);
 643
 644       if (cf->crlf_mode)
 645         {
 646           if (end < buffer_bytes)
 647             {
 648               unix_vlib_cli_output_raw (cf, uf, (u8 *) "\r\n", 2);
 649               end++;            /* skip the \n that we already sent */
 650             }
 651           start = end;
 652         }
 653     }
 654 }
 655
 656 /** @brief Output the CLI prompt */
 657 static void
 658 unix_cli_cli_prompt (unix_cli_file_t * cf, clib_file_t * uf)
 659 {
 660   unix_cli_main_t *cm = &unix_cli_main;
 661
 662   unix_vlib_cli_output_raw (cf, uf, cm->cli_prompt, vec_len (cm->cli_prompt));
 663 }
 664
 665 /** @brief Output a pager prompt and show number of buffered lines */
 666 static void
 667 unix_cli_pager_prompt (unix_cli_file_t * cf, clib_file_t * uf)
 668 {
 669   u8 *prompt;
 670   u32 h;
 671
 672   h = cf->pager_start + (cf->height - 1);
 673   if (h > vec_len (cf->pager_index))
 674     h = vec_len (cf->pager_index);
 675
 676   prompt = format (0, "\r%s-- more -- (%d-%d/%d)%s",
 677                    cf->ansi_capable ? ANSI_BOLD : "",
 678                    cf->pager_start + 1,
 679                    h,
 680                    vec_len (cf->pager_index),
 681                    cf->ansi_capable ? ANSI_RESET : "");
 682
 683   unix_vlib_cli_output_cooked (cf, uf, prompt, vec_len (prompt));
 684
 685   vec_free (prompt);
 686 }
 687
 688 /** @brief Output a pager "skipping" message */
 689 static void
 690 unix_cli_pager_message (unix_cli_file_t * cf, clib_file_t * uf,
 691                         char *message, char *postfix)
 692 {
 693   u8 *prompt;
 694
 695   prompt = format (0, "\r%s-- %s --%s%s",
 696                    cf->ansi_capable ? ANSI_BOLD : "",
 697                    message, cf->ansi_capable ? ANSI_RESET : "", postfix);
 698
 699   unix_vlib_cli_output_cooked (cf, uf, prompt, vec_len (prompt));
 700
 701   vec_free (prompt);
 702 }
 703
 704 /** @brief Erase the printed pager prompt */
 705 static void
 706 unix_cli_pager_prompt_erase (unix_cli_file_t * cf, clib_file_t * uf)
 707 {
 708   if (cf->ansi_capable)
 709     {
 710       unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\r", 1);
 711       unix_vlib_cli_output_cooked (cf, uf,
 712                                    (u8 *) ANSI_CLEARLINE,
 713                                    sizeof (ANSI_CLEARLINE) - 1);
 714     }
 715   else
 716     {
 717       int i;
 718
 719       unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\r", 1);
 720       for (i = 0; i < cf->width - 1; i++)
 721         unix_vlib_cli_output_cooked (cf, uf, (u8 *) " ", 1);
 722       unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\r", 1);
 723     }
 724 }
 725
 726 /** @brief Uses an ANSI escape sequence to move the cursor */
 727 static void
 728 unix_cli_ansi_cursor (unix_cli_file_t * cf, clib_file_t * uf, u16 x, u16 y)
 729 {
 730   u8 *str;
 731
 732   str = format (0, "%s%d;%dH", CSI, y, x);
 733
 734   unix_vlib_cli_output_cooked (cf, uf, str, vec_len (str));
 735
 736   vec_free (str);
 737 }
 738
 739 /** Redraw the currently displayed page of text.
 740  * @param cf CLI session to redraw the pager buffer of.
 741  * @param uf Unix file of the CLI session.
 742  */
 743 static void
 744 unix_cli_pager_redraw (unix_cli_file_t * cf, clib_file_t * uf)
 745 {
 746   unix_cli_pager_index_t *pi = NULL;
 747   u8 *line = NULL;
 748   word i;
 749
 750   /* No active pager? Do nothing. */
 751   if (!vec_len (cf->pager_index))
 752     return;
 753
 754   if (cf->ansi_capable)
 755     {
 756       /* If we have ANSI, send the clear screen sequence */
 757       unix_vlib_cli_output_cooked (cf, uf,
 758                                    (u8 *) ANSI_CLEAR,
 759                                    sizeof (ANSI_CLEAR) - 1);
 760     }
 761   else
 762     {
 763       /* Otherwise make sure we're on a blank line */
 764       unix_cli_pager_prompt_erase (cf, uf);
 765     }
 766
 767   /* (Re-)send the current page of content */
 768   for (i = 0; i < cf->height - 1 &&
 769        i + cf->pager_start < vec_len (cf->pager_index); i++)
 770     {
 771       pi = &cf->pager_index[cf->pager_start + i];
 772       line = cf->pager_vector[pi->line] + pi->offset;
 773
 774       unix_vlib_cli_output_cooked (cf, uf, line, pi->length);
 775     }
 776   /* if the last line didn't end in newline, add a newline */
 777   if (pi && line[pi->length - 1] != '\n')
 778     unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\n", 1);
 779
 780   unix_cli_pager_prompt (cf, uf);
 781 }
 782
 783 /** @brief Process and add a line to the pager index.
 784  * In normal operation this function will take the given character string
 785  * found in @c line and with length @c len_or_index and iterates the over the
 786  * contents, adding each line of text discovered within it to the
 787  * pager index. Lines are identified by newlines ("<code>\\n</code>") and by
 788  * strings longer than the width of the terminal.
 789  *
 790  * If instead @c line is @c NULL then @c len_or_index is taken to mean the
 791  * index of an existing line in the pager buffer; this simply means that the
 792  * input line does not need to be cloned since we alreayd have it. This is
 793  * typical if we are reindexing the pager buffer.
 794  *
 795  * @param cf           The CLI session whose pager we are adding to.
 796  * @param line         The string of text to be indexed into the pager buffer.
 797  *                     If @c line is @c NULL then the mode of operation
 798  *                     changes slightly; see the description above.
 799  * @param len_or_index If @c line is a pointer to a string then this parameter
 800  *                     indicates the length of that string; Otherwise this
 801  *                     value provides the index in the pager buffer of an
 802  *                     existing string to be indexed.
 803  */
 804 static void
 805 unix_cli_pager_add_line (unix_cli_file_t * cf, u8 * line, word len_or_index)
 806 {
 807   u8 *p;
 808   word i, j, k;
 809   word line_index, len;
 810   u32 width = cf->width;
 811   unix_cli_pager_index_t *pi;
 812
 813   if (line == NULL)
 814     {
 815       /* Use a line already in the pager buffer */
 816       line_index = len_or_index;
 817       p = cf->pager_vector[line_index];
 818       len = vec_len (p);
 819     }
 820   else
 821     {
 822       len = len_or_index;
 823       /* Add a copy of the raw string to the pager buffer */
 824       p = vec_new (u8, len);
 825       clib_memcpy (p, line, len);
 826
 827       /* store in pager buffer */
 828       line_index = vec_len (cf->pager_vector);
 829       vec_add1 (cf->pager_vector, p);
 830     }
 831
 832   i = 0;
 833   while (i < len)
 834     {
 835       /* Find the next line, or run to terminal width, or run to EOL */
 836       int l = len - i;
 837       j = unix_vlib_findchr ((u8) '\n', p, l < width ? l : width);
 838
 839       if (j < l && p[j] == '\n')        /* incl \n */
 840         j++;
 841
 842       /* Add the line to the index */
 843       k = vec_len (cf->pager_index);
 844       vec_validate (cf->pager_index, k);
 845       pi = &cf->pager_index[k];
 846
 847       pi->line = line_index;
 848       pi->offset = i;
 849       pi->length = j;
 850
 851       i += j;
 852       p += j;
 853     }
 854 }
 855
 856 /** @brief Reindex entire pager buffer.
 857  * Resets the current pager index and then re-adds the lines in the pager
 858  * buffer to the index.
 859  *
 860  * Additionally this function attempts to retain the current page start
 861  * line offset by searching for the same top-of-screen line in the new index.
 862  *
 863  * @param cf The CLI session whose pager buffer should be reindexed.
 864  */
 865 static void
 866 unix_cli_pager_reindex (unix_cli_file_t * cf)
 867 {
 868   word i, old_line, old_offset;
 869   unix_cli_pager_index_t *pi;
 870
 871   /* If there is nothing in the pager buffer then make sure the index
 872    * is empty and move on.
 873    */
 874   if (cf->pager_vector == 0)
 875     {
 876       vec_reset_length (cf->pager_index);
 877       return;
 878     }
 879
 880   /* Retain a pointer to the current page start line so we can
 881    * find it later
 882    */
 883   pi = &cf->pager_index[cf->pager_start];
 884   old_line = pi->line;
 885   old_offset = pi->offset;
 886
 887   /* Re-add the buffered lines to the index */
 888   vec_reset_length (cf->pager_index);
 889   vec_foreach_index (i, cf->pager_vector)
 890   {
 891     unix_cli_pager_add_line (cf, NULL, i);
 892   }
 893
 894   /* Attempt to re-locate the previously stored page start line */
 895   vec_foreach_index (i, cf->pager_index)
 896   {
 897     pi = &cf->pager_index[i];
 898
 899     if (pi->line == old_line &&
 900         (pi->offset <= old_offset || pi->offset + pi->length > old_offset))
 901       {
 902         /* Found it! */
 903         cf->pager_start = i;
 904         break;
 905       }
 906   }
 907
 908   /* In case the start line was not found (rare), ensure the pager start
 909    * index is within bounds
 910    */
 911   if (cf->pager_start >= vec_len (cf->pager_index))
 912     {
 913       if (!cf->height || vec_len (cf->pager_index) < (cf->height - 1))
 914         cf->pager_start = 0;
 915       else
 916         cf->pager_start = vec_len (cf->pager_index) - (cf->height - 1);
 917     }
 918 }
 919
 920 /** VLIB CLI output function.
 921  *
 922  * If the terminal has a pager configured then this function takes care
 923  * of collating output into the pager buffer; ensuring only the first page
 924  * is displayed and any lines in excess of the first page are buffered.
 925  *
 926  * If the maximum number of index lines in the buffer is exceeded then the
 927  * pager is cancelled and the contents of the current buffer are sent to the
 928  * terminal.
 929  *
 930  * If there is no pager configured then the output is sent directly to the
 931  * terminal.
 932  *
 933  * @param cli_file_index Index of the CLI session where this output is
 934  *                       directed.
 935  * @param buffer         String of printabe bytes to be output.
 936  * @param buffer_bytes   The number of bytes in @c buffer to be output.
 937  */
 938 static void
 939 unix_vlib_cli_output (uword cli_file_index, u8 * buffer, uword buffer_bytes)
 940 {
 941   unix_main_t *um = &unix_main;
 942   clib_file_main_t *fm = &file_main;
 943   unix_cli_main_t *cm = &unix_cli_main;
 944   unix_cli_file_t *cf;
 945   clib_file_t *uf;
 946
 947   cf = pool_elt_at_index (cm->cli_file_pool, cli_file_index);
 948   uf = pool_elt_at_index (fm->file_pool, cf->clib_file_index);
 949
 950   if (cf->no_pager || um->cli_pager_buffer_limit == 0 || cf->height == 0)
 951     {
 952       unix_vlib_cli_output_cooked (cf, uf, buffer, buffer_bytes);
 953     }
 954   else
 955     {
 956       word row = vec_len (cf->pager_index);
 957       u8 *line;
 958       unix_cli_pager_index_t *pi;
 959
 960       /* Index and add the output lines to the pager buffer. */
 961       unix_cli_pager_add_line (cf, buffer, buffer_bytes);
 962
 963       /* Now iterate what was added to display the lines.
 964        * If we reach the bottom of the page, display a prompt.
 965        */
 966       while (row < vec_len (cf->pager_index))
 967         {
 968           if (row < cf->height - 1)
 969             {
 970               /* output this line */
 971               pi = &cf->pager_index[row];
 972               line = cf->pager_vector[pi->line] + pi->offset;
 973               unix_vlib_cli_output_cooked (cf, uf, line, pi->length);
 974
 975               /* if the last line didn't end in newline, and we're at the
 976                * bottom of the page, add a newline */
 977               if (line[pi->length - 1] != '\n' && row == cf->height - 2)
 978                 unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\n", 1);
 979             }
 980           else
 981             {
 982               /* Display the pager prompt every 10 lines */
 983               if (!(row % 10))
 984                 unix_cli_pager_prompt (cf, uf);
 985             }
 986           row++;
 987         }
 988
 989       /* Check if we went over the pager buffer limit */
 990       if (vec_len (cf->pager_index) > um->cli_pager_buffer_limit)
 991         {
 992           /* Stop using the pager for the remainder of this CLI command */
 993           cf->no_pager = 2;
 994
 995           /* If we likely printed the prompt, erase it */
 996           if (vec_len (cf->pager_index) > cf->height - 1)
 997             unix_cli_pager_prompt_erase (cf, uf);
 998
 999           /* Dump out the contents of the buffer */
1000           for (row = cf->pager_start + (cf->height - 1);
1001                row < vec_len (cf->pager_index); row++)
1002             {
1003               pi = &cf->pager_index[row];
1004               line = cf->pager_vector[pi->line] + pi->offset;
1005               unix_vlib_cli_output_cooked (cf, uf, line, pi->length);
1006             }
1007
1008           unix_cli_pager_reset (cf);
1009         }
1010     }
1011 }
1012
1013 /** Identify whether a terminal type is ANSI capable.
1014  *
1015  * Compares the string given in @c term with a list of terminal types known
1016  * to support ANSI escape sequences.
1017  *
1018  * This list contains, for example, @c xterm, @c screen and @c ansi.
1019  *
1020  * @param term A string with a terminal type in it.
1021  * @param len The length of the string in @c term.
1022  *
1023  * @return @c 1 if the terminal type is recognized as supporting ANSI
1024  *         terminal sequences; @c 0 otherwise.
1025  */
1026 static u8
1027 unix_cli_terminal_type (u8 * term, uword len)
1028 {
1029   /* This may later be better done as a hash of some sort. */
1030 #define _(a) do { \
1031     if (strncasecmp(a, (char *)term, (size_t)len) == 0) return 1; \
1032   } while(0)
1033
1034   _("xterm");
1035   _("xterm-color");
1036   _("xterm-256color");          /* iTerm on Mac */
1037   _("screen");
1038   _("screen-256color");         /* Screen and tmux */
1039   _("ansi");                    /* Microsoft Telnet */
1040 #undef _
1041
1042   return 0;
1043 }
1044
1045 /** @brief Emit initial welcome banner and prompt on a connection. */
1046 static void
1047 unix_cli_file_welcome (unix_cli_main_t * cm, unix_cli_file_t * cf)
1048 {
1049   unix_main_t *um = &unix_main;
1050   clib_file_main_t *fm = &file_main;
1051   clib_file_t *uf = pool_elt_at_index (fm->file_pool, cf->clib_file_index);
1052   unix_cli_banner_t *banner;
1053   int i, len;
1054
1055   /*
1056    * Put the first bytes directly into the buffer so that further output is
1057    * queued until everything is ready. (oterwise initial prompt can appear
1058    * mid way through VPP initialization)
1059    */
1060   unix_cli_add_pending_output (uf, cf, (u8 *) "\r", 1);
1061
1062   if (!um->cli_no_banner)
1063     {
1064       if (cf->ansi_capable)
1065         {
1066           banner = unix_cli_banner_color;
1067           len = ARRAY_LEN (unix_cli_banner_color);
1068         }
1069       else
1070         {
1071           banner = unix_cli_banner;
1072           len = ARRAY_LEN (unix_cli_banner);
1073         }
1074
1075       for (i = 0; i < len; i++)
1076         {
1077           unix_vlib_cli_output_cooked (cf, uf,
1078                                        banner[i].line, banner[i].length);
1079         }
1080     }
1081
1082   /* Prompt. */
1083   unix_cli_cli_prompt (cf, uf);
1084
1085   cf->started = 1;
1086 }
1087
1088 /** @brief A failsafe triggered on a timer to ensure we send the prompt
1089  * to telnet sessions that fail to negotiate the terminal type. */
1090 static void
1091 unix_cli_file_welcome_timer (any arg, f64 delay)
1092 {
1093   unix_cli_main_t *cm = &unix_cli_main;
1094   unix_cli_file_t *cf;
1095   (void) delay;
1096
1097   /* Check the connection didn't close already */
1098   if (pool_is_free_index (cm->cli_file_pool, (uword) arg))
1099     return;
1100
1101   cf = pool_elt_at_index (cm->cli_file_pool, (uword) arg);
1102
1103   if (!cf->started)
1104     unix_cli_file_welcome (cm, cf);
1105 }
1106
1107 /** @brief A mostly no-op Telnet state machine.
1108  * Process Telnet command bytes in a way that ensures we're mostly
1109  * transparent to the Telnet protocol. That is, it's mostly a no-op.
1110  *
1111  * @return -1 if we need more bytes, otherwise a positive integer number of
1112  *          bytes to consume from the input_vector, not including the initial
1113  *          IAC byte.
1114  */
1115 static i32
1116 unix_cli_process_telnet (unix_main_t * um,
1117                          unix_cli_file_t * cf,
1118                          clib_file_t * uf, u8 * input_vector, uword len)
1119 {
1120   /* Input_vector starts at IAC byte.
1121    * See if we have a complete message; if not, return -1 so we wait for more.
1122    * if we have a complete message, consume those bytes from the vector.
1123    */
1124   i32 consume = 0;
1125
1126   if (len == 1)
1127     return -1;                  /* want more bytes */
1128
1129   switch (input_vector[1])
1130     {
1131     case IAC:
1132       /* two IAC's in a row means to pass through 0xff.
1133        * since that makes no sense here, just consume it.
1134        */
1135       consume = 1;
1136       break;
1137
1138     case WILL:
1139     case WONT:
1140     case DO:
1141     case DONT:
1142       /* Expect 3 bytes */
1143       if (vec_len (input_vector) < 3)
1144         return -1;              /* want more bytes */
1145
1146       consume = 2;
1147       break;
1148
1149     case SB:
1150       {
1151         /* Sub option - search ahead for IAC SE to end it */
1152         i32 i;
1153         for (i = 3; i < len && i < UNIX_CLI_MAX_DEPTH_TELNET; i++)
1154           {
1155             if (input_vector[i - 1] == IAC && input_vector[i] == SE)
1156               {
1157                 /* We have a complete message; see if we care about it */
1158                 switch (input_vector[2])
1159                   {
1160                   case TELOPT_TTYPE:
1161                     if (input_vector[3] != 0)
1162                       break;
1163                     /* See if the terminal type is ANSI capable */
1164                     cf->ansi_capable =
1165                       unix_cli_terminal_type (input_vector + 4, i - 5);
1166                     /* If session not started, we can release the pause */
1167                     if (!cf->started)
1168                       /* Send the welcome banner and initial prompt */
1169                       unix_cli_file_welcome (&unix_cli_main, cf);
1170                     break;
1171
1172                   case TELOPT_NAWS:
1173                     /* Window size */
1174                     if (i != 8) /* check message is correct size */
1175                       break;
1176
1177                     cf->width =
1178                       clib_net_to_host_u16 (*((u16 *) (input_vector + 3)));
1179                     if (cf->width > UNIX_CLI_MAX_TERMINAL_WIDTH)
1180                       cf->width = UNIX_CLI_MAX_TERMINAL_WIDTH;
1181                     if (cf->width < UNIX_CLI_MIN_TERMINAL_WIDTH)
1182                       cf->width = UNIX_CLI_MIN_TERMINAL_WIDTH;
1183
1184                     cf->height =
1185                       clib_net_to_host_u16 (*((u16 *) (input_vector + 5)));
1186                     if (cf->height > UNIX_CLI_MAX_TERMINAL_HEIGHT)
1187                       cf->height = UNIX_CLI_MAX_TERMINAL_HEIGHT;
1188                     if (cf->height < UNIX_CLI_MIN_TERMINAL_HEIGHT)
1189                       cf->height = UNIX_CLI_MIN_TERMINAL_HEIGHT;
1190
1191                     /* reindex pager buffer */
1192                     unix_cli_pager_reindex (cf);
1193                     /* redraw page */
1194                     unix_cli_pager_redraw (cf, uf);
1195                     break;
1196
1197                   default:
1198                     break;
1199                   }
1200                 /* Consume it all */
1201                 consume = i;
1202                 break;
1203               }
1204           }
1205
1206         if (i == UNIX_CLI_MAX_DEPTH_TELNET)
1207           consume = 1;          /* hit max search depth, advance one byte */
1208
1209         if (consume == 0)
1210           return -1;            /* want more bytes */
1211
1212         break;
1213       }
1214
1215     case GA:
1216     case EL:
1217     case EC:
1218     case AO:
1219     case IP:
1220     case BREAK:
1221     case DM:
1222     case NOP:
1223     case SE:
1224     case EOR:
1225     case ABORT:
1226     case SUSP:
1227     case xEOF:
1228       /* Simple one-byte messages */
1229       consume = 1;
1230       break;
1231
1232     case AYT:
1233       /* Are You There - trigger a visible response */
1234       consume = 1;
1235       unix_vlib_cli_output_cooked (cf, uf, (u8 *) "fd.io VPP\n", 10);
1236       break;
1237
1238     default:
1239       /* Unknown command! Eat the IAC byte */
1240       break;
1241     }
1242
1243   return consume;
1244 }
1245
1246 /** @brief Process actionable input.
1247  * Based on the \c action process the input; this typically involves
1248  * searching the command history or editing the current command line.
1249  */
1250 static int
1251 unix_cli_line_process_one (unix_cli_main_t * cm,
1252                            unix_main_t * um,
1253                            unix_cli_file_t * cf,
1254                            clib_file_t * uf,
1255                            u8 input, unix_cli_parse_action_t action)
1256 {
1257   u8 *prev;
1258   u8 *save = 0;
1259   u8 **possible_commands;
1260   int j, delta;
1261
1262   switch (action)
1263     {
1264     case UNIX_CLI_PARSE_ACTION_NOACTION:
1265       break;
1266
1267     case UNIX_CLI_PARSE_ACTION_REVSEARCH:
1268     case UNIX_CLI_PARSE_ACTION_FWDSEARCH:
1269       if (!cf->has_history || !cf->history_limit)
1270         break;
1271       if (cf->search_mode == 0)
1272         {
1273           /* Erase the current command (if any) */
1274           for (j = 0; j < (vec_len (cf->current_command)); j++)
1275             unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b \b", 3);
1276
1277           vec_reset_length (cf->search_key);
1278           vec_reset_length (cf->current_command);
1279           if (action == UNIX_CLI_PARSE_ACTION_REVSEARCH)
1280             cf->search_mode = -1;
1281           else
1282             cf->search_mode = 1;
1283           cf->cursor = 0;
1284         }
1285       else
1286         {
1287           if (action == UNIX_CLI_PARSE_ACTION_REVSEARCH)
1288             cf->search_mode = -1;
1289           else
1290             cf->search_mode = 1;
1291
1292           cf->excursion += cf->search_mode;
1293           goto search_again;
1294         }
1295       break;
1296
1297     case UNIX_CLI_PARSE_ACTION_ERASELINELEFT:
1298       /* Erase the command from the cursor to the start */
1299
1300       /* Shimmy forwards to the new end of line position */
1301       delta = vec_len (cf->current_command) - cf->cursor;
1302       for (j = cf->cursor; j > delta; j--)
1303         unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b", 1);
1304       /* Zap from here to the end of what is currently displayed */
1305       for (; j < (vec_len (cf->current_command)); j++)
1306         unix_vlib_cli_output_cooked (cf, uf, (u8 *) " ", 1);
1307       /* Get back to the start of the line */
1308       for (j = 0; j < (vec_len (cf->current_command)); j++)
1309         unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b", 1);
1310
1311       j = vec_len (cf->current_command) - cf->cursor;
1312       memmove (cf->current_command, cf->current_command + cf->cursor, j);
1313       _vec_len (cf->current_command) = j;
1314
1315       /* Print the new contents */
1316       unix_vlib_cli_output_cooked (cf, uf, cf->current_command, j);
1317       /* Shimmy back to the start */
1318       for (j = 0; j < (vec_len (cf->current_command)); j++)
1319         unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b", 1);
1320       cf->cursor = 0;
1321
1322       cf->search_mode = 0;
1323       break;
1324
1325     case UNIX_CLI_PARSE_ACTION_ERASELINERIGHT:
1326       /* Erase the command from the cursor to the end */
1327
1328       /* Zap from cursor to end of what is currently displayed */
1329       for (j = cf->cursor; j < (vec_len (cf->current_command)); j++)
1330         unix_vlib_cli_output_cooked (cf, uf, (u8 *) " ", 1);
1331       /* Get back to where we were */
1332       for (j = cf->cursor; j < (vec_len (cf->current_command)); j++)
1333         unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b", 1);
1334
1335       /* Truncate the line at the cursor */
1336       _vec_len (cf->current_command) = cf->cursor;
1337
1338       cf->search_mode = 0;
1339       break;
1340
1341     case UNIX_CLI_PARSE_ACTION_LEFT:
1342       if (cf->cursor > 0)
1343         {
1344           unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b", 1);
1345           cf->cursor--;
1346         }
1347
1348       cf->search_mode = 0;
1349       break;
1350
1351     case UNIX_CLI_PARSE_ACTION_RIGHT:
1352       if (cf->cursor < vec_len (cf->current_command))
1353         {
1354           /* have to emit the character under the cursor */
1355           unix_vlib_cli_output_cooked (cf, uf,
1356                                        cf->current_command + cf->cursor, 1);
1357           cf->cursor++;
1358         }
1359
1360       cf->search_mode = 0;
1361       break;
1362
1363     case UNIX_CLI_PARSE_ACTION_UP:
1364     case UNIX_CLI_PARSE_ACTION_DOWN:
1365       if (!cf->has_history || !cf->history_limit)
1366         break;
1367       cf->search_mode = 0;
1368       /* Erase the command */
1369       for (j = cf->cursor; j < (vec_len (cf->current_command)); j++)
1370         unix_vlib_cli_output_cooked (cf, uf, (u8 *) " ", 1);
1371       for (j = 0; j < (vec_len (cf->current_command)); j++)
1372         unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b \b", 3);
1373       vec_reset_length (cf->current_command);
1374       if (vec_len (cf->command_history))
1375         {
1376           if (action == UNIX_CLI_PARSE_ACTION_UP)
1377             delta = -1;
1378           else
1379             delta = 1;
1380
1381           cf->excursion += delta;
1382
1383           if (cf->excursion == vec_len (cf->command_history))
1384             {
1385               /* down-arrowed to last entry - want a blank line */
1386               _vec_len (cf->current_command) = 0;
1387             }
1388           else if (cf->excursion < 0)
1389             {
1390               /* up-arrowed over the start to the end, want a blank line */
1391               cf->excursion = vec_len (cf->command_history);
1392               _vec_len (cf->current_command) = 0;
1393             }
1394           else
1395             {
1396               if (cf->excursion > (i32) vec_len (cf->command_history) - 1)
1397                 /* down-arrowed past end - wrap to start */
1398                 cf->excursion = 0;
1399
1400               /* Print the command at the current position */
1401               prev = cf->command_history[cf->excursion];
1402               vec_validate (cf->current_command, vec_len (prev) - 1);
1403
1404               clib_memcpy (cf->current_command, prev, vec_len (prev));
1405               _vec_len (cf->current_command) = vec_len (prev);
1406               unix_vlib_cli_output_cooked (cf, uf, cf->current_command,
1407                                            vec_len (cf->current_command));
1408             }
1409           cf->cursor = vec_len (cf->current_command);
1410
1411           break;
1412         }
1413       break;
1414
1415     case UNIX_CLI_PARSE_ACTION_HOME:
1416       if (vec_len (cf->current_command) && cf->cursor > 0)
1417         {
1418           while (cf->cursor)
1419             {
1420               unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b", 1);
1421               cf->cursor--;
1422             }
1423         }
1424
1425       cf->search_mode = 0;
1426       break;
1427
1428     case UNIX_CLI_PARSE_ACTION_END:
1429       if (vec_len (cf->current_command) &&
1430           cf->cursor < vec_len (cf->current_command))
1431         {
1432           unix_vlib_cli_output_cooked (cf, uf,
1433                                        cf->current_command + cf->cursor,
1434                                        vec_len (cf->current_command) -
1435                                        cf->cursor);
1436           cf->cursor = vec_len (cf->current_command);
1437         }
1438
1439       cf->search_mode = 0;
1440       break;
1441
1442     case UNIX_CLI_PARSE_ACTION_WORDLEFT:
1443       if (vec_len (cf->current_command) && cf->cursor > 0)
1444         {
1445           j = cf->cursor;
1446
1447           unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b", 1);
1448           j--;
1449
1450           while (j && isspace (cf->current_command[j]))
1451             {
1452               unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b", 1);
1453               j--;
1454             }
1455           while (j && !isspace (cf->current_command[j]))
1456             {
1457               if (isspace (cf->current_command[j - 1]))
1458                 break;
1459               unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b", 1);
1460               j--;
1461             }
1462
1463           cf->cursor = j;
1464         }
1465
1466       cf->search_mode = 0;
1467       break;
1468
1469     case UNIX_CLI_PARSE_ACTION_WORDRIGHT:
1470       if (vec_len (cf->current_command) &&
1471           cf->cursor < vec_len (cf->current_command))
1472         {
1473           int e = vec_len (cf->current_command);
1474           j = cf->cursor;
1475           while (j < e && !isspace (cf->current_command[j]))
1476             j++;
1477           while (j < e && isspace (cf->current_command[j]))
1478             j++;
1479           unix_vlib_cli_output_cooked (cf, uf,
1480                                        cf->current_command + cf->cursor,
1481                                        j - cf->cursor);
1482           cf->cursor = j;
1483         }
1484
1485       cf->search_mode = 0;
1486       break;
1487
1488
1489     case UNIX_CLI_PARSE_ACTION_ERASE:
1490       if (vec_len (cf->current_command))
1491         {
1492           if (cf->cursor == vec_len (cf->current_command))
1493             {
1494               unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b \b", 3);
1495               _vec_len (cf->current_command)--;
1496               cf->cursor--;
1497             }
1498           else if (cf->cursor > 0)
1499             {
1500               /* shift everything at & to the right of the cursor left by 1 */
1501               j = vec_len (cf->current_command) - cf->cursor;
1502               memmove (cf->current_command + cf->cursor - 1,
1503                        cf->current_command + cf->cursor, j);
1504               _vec_len (cf->current_command)--;
1505               cf->cursor--;
1506               /* redraw the rest of the line */
1507               unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b", 1);
1508               unix_vlib_cli_output_cooked (cf, uf,
1509                                            cf->current_command + cf->cursor,
1510                                            j);
1511               unix_vlib_cli_output_cooked (cf, uf, (u8 *) " \b\b", 3);
1512               /* and shift the terminal cursor back where it should be */
1513               while (--j)
1514                 unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b", 1);
1515             }
1516         }
1517       cf->search_mode = 0;
1518       cf->excursion = 0;
1519       vec_reset_length (cf->search_key);
1520       break;
1521
1522     case UNIX_CLI_PARSE_ACTION_ERASERIGHT:
1523       if (vec_len (cf->current_command))
1524         {
1525           if (cf->cursor < vec_len (cf->current_command))
1526             {
1527               /* shift everything to the right of the cursor left by 1 */
1528               j = vec_len (cf->current_command) - cf->cursor - 1;
1529               memmove (cf->current_command + cf->cursor,
1530                        cf->current_command + cf->cursor + 1, j);
1531               _vec_len (cf->current_command)--;
1532               /* redraw the rest of the line */
1533               unix_vlib_cli_output_cooked (cf, uf,
1534                                            cf->current_command + cf->cursor,
1535                                            j);
1536               unix_vlib_cli_output_cooked (cf, uf, (u8 *) " \b", 2);
1537               /* and shift the terminal cursor back where it should be */
1538               if (j)
1539                 {
1540                   unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b", 1);
1541                   while (--j)
1542                     unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b", 1);
1543                 }
1544             }
1545         }
1546       else if (input == 'D' - '@')
1547         {
1548           /* ^D with no command entered = quit */
1549           unix_vlib_cli_output_cooked (cf, uf, (u8 *) "quit\n", 5);
1550           vlib_process_signal_event (um->vlib_main,
1551                                      vlib_current_process (um->vlib_main),
1552                                      UNIX_CLI_PROCESS_EVENT_QUIT,
1553                                      cf - cm->cli_file_pool);
1554         }
1555       cf->search_mode = 0;
1556       cf->excursion = 0;
1557       vec_reset_length (cf->search_key);
1558       break;
1559
1560     case UNIX_CLI_PARSE_ACTION_CLEAR:
1561       /* If we're in ANSI mode, clear the screen.
1562        * Then redraw the prompt and any existing command input, then put
1563        * the cursor back where it was in that line.
1564        */
1565       if (cf->ansi_capable)
1566         unix_vlib_cli_output_cooked (cf, uf,
1567                                      (u8 *) ANSI_CLEAR,
1568                                      sizeof (ANSI_CLEAR) - 1);
1569       else
1570         unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\n", 1);
1571
1572       unix_vlib_cli_output_raw (cf, uf,
1573                                 cm->cli_prompt, vec_len (cm->cli_prompt));
1574       unix_vlib_cli_output_raw (cf, uf,
1575                                 cf->current_command,
1576                                 vec_len (cf->current_command));
1577       for (j = cf->cursor; j < vec_len (cf->current_command); j++)
1578         unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b", 1);
1579
1580       break;
1581
1582     case UNIX_CLI_PARSE_ACTION_TAB:
1583       if (cf->cursor < vec_len (cf->current_command))
1584         {
1585           /* if we are in the middle of a line, complete only if
1586            * the cursor points to whitespace */
1587           if (isspace (cf->current_command[cf->cursor]))
1588             {
1589               /* save and clear any input that is after the cursor */
1590               vec_resize (save, vec_len (cf->current_command) - cf->cursor);
1591               clib_memcpy (save, cf->current_command + cf->cursor,
1592                            vec_len (cf->current_command) - cf->cursor);
1593               _vec_len (cf->current_command) = cf->cursor;
1594             }
1595           else
1596             {
1597               unix_vlib_cli_output_raw (cf, uf, (u8 *) "\a", 1);
1598               break;
1599             }
1600         }
1601       possible_commands =
1602         vlib_cli_get_possible_completions (cf->current_command);
1603       if (vec_len (possible_commands) == 1)
1604         {
1605           u32 j = cf->cursor;
1606           u8 *completed = possible_commands[0];
1607
1608           /* find the last word of current_command */
1609           while (j >= 1 && !isspace (cf->current_command[j - 1]))
1610             {
1611               j--;
1612               unix_vlib_cli_output_raw (cf, uf, (u8 *) "\b", 1);
1613             }
1614           _vec_len (cf->current_command) = j;
1615
1616           /* replace it with the newly expanded command */
1617           vec_append (cf->current_command, completed);
1618
1619           /* echo to the terminal */
1620           unix_vlib_cli_output_raw (cf, uf, completed, vec_len (completed));
1621
1622           /* add one trailing space if needed */
1623           if (vec_len (save) == 0)
1624             {
1625               vec_add1 (cf->current_command, ' ');
1626               unix_vlib_cli_output_raw (cf, uf, (u8 *) " ", 1);
1627             }
1628
1629           cf->cursor = vec_len (cf->current_command);
1630
1631         }
1632       else if (vec_len (possible_commands) >= 2)
1633         {
1634           u8 **possible_command;
1635           uword max_command_len = 0, min_command_len = ~0;
1636           u32 i, j;
1637
1638           vec_foreach (possible_command, possible_commands)
1639           {
1640             if (vec_len (*possible_command) > max_command_len)
1641               {
1642                 max_command_len = vec_len (*possible_command);
1643               }
1644             if (vec_len (*possible_command) < min_command_len)
1645               {
1646                 min_command_len = vec_len (*possible_command);
1647               }
1648           }
1649
1650           unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\n", 1);
1651
1652           i = 0;
1653           vec_foreach (possible_command, possible_commands)
1654           {
1655             if (i + max_command_len >= cf->width)
1656               {
1657                 unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\n", 1);
1658                 i = 0;
1659               }
1660             unix_vlib_cli_output_raw (cf, uf, *possible_command,
1661                                       vec_len (*possible_command));
1662             for (j = vec_len (*possible_command); j < max_command_len + 2;
1663                  j++)
1664               {
1665                 unix_vlib_cli_output_raw (cf, uf, (u8 *) " ", 1);
1666               }
1667             i += max_command_len + 2;
1668           }
1669
1670           unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\n", 1);
1671
1672           /* rewrite prompt */
1673           unix_cli_cli_prompt (cf, uf);
1674           unix_vlib_cli_output_raw (cf, uf, cf->current_command,
1675                                     vec_len (cf->current_command));
1676
1677           /* count length of last word */
1678           j = cf->cursor;
1679           i = 0;
1680           while (j >= 1 && !isspace (cf->current_command[j - 1]))
1681             {
1682               j--;
1683               i++;
1684             }
1685
1686           /* determine smallest common command */
1687           for (; i < min_command_len; i++)
1688             {
1689               u8 common = '\0';
1690               int stop = 0;
1691               vec_foreach (possible_command, possible_commands)
1692               {
1693                 if (common == '\0')
1694                   {
1695                     common = (*possible_command)[i];
1696                   }
1697                 else if (common != (*possible_command)[i])
1698                   {
1699                     stop = 1;
1700                     break;
1701                   }
1702               }
1703               if (!stop)
1704                 {
1705                   vec_add1 (cf->current_command, common);
1706                   cf->cursor++;
1707                   unix_vlib_cli_output_raw (cf, uf, (u8 *) & common, 1);
1708                 }
1709               else
1710                 {
1711                   break;
1712                 }
1713             }
1714         }
1715       else
1716         {
1717           unix_vlib_cli_output_raw (cf, uf, (u8 *) "\a", 1);
1718         }
1719
1720       if (vec_len (save) > 0)
1721         {
1722           /* restore remaining input if tab was hit in the middle of a line */
1723           unix_vlib_cli_output_raw (cf, uf, save, vec_len (save));
1724           for (j = 0; j < vec_len (save); j++)
1725             {
1726               unix_vlib_cli_output_raw (cf, uf, (u8 *) "\b", 1);
1727             }
1728           vec_append (cf->current_command, save);
1729           vec_free (save);
1730         }
1731       vec_free (possible_commands);
1732
1733       break;
1734     case UNIX_CLI_PARSE_ACTION_YANK:
1735       /* TODO */
1736       break;
1737
1738
1739     case UNIX_CLI_PARSE_ACTION_PAGER_QUIT:
1740     pager_quit:
1741       unix_cli_pager_prompt_erase (cf, uf);
1742       unix_cli_pager_reset (cf);
1743       unix_cli_cli_prompt (cf, uf);
1744       break;
1745
1746     case UNIX_CLI_PARSE_ACTION_PAGER_NEXT:
1747     case UNIX_CLI_PARSE_ACTION_PAGER_PGDN:
1748       /* show next page of the buffer */
1749       if (cf->height + cf->pager_start < vec_len (cf->pager_index))
1750         {
1751           u8 *line = NULL;
1752           unix_cli_pager_index_t *pi = NULL;
1753
1754           int m = cf->pager_start + (cf->height - 1);
1755           unix_cli_pager_prompt_erase (cf, uf);
1756           for (j = m;
1757                j < vec_len (cf->pager_index) && cf->pager_start < m;
1758                j++, cf->pager_start++)
1759             {
1760               pi = &cf->pager_index[j];
1761               line = cf->pager_vector[pi->line] + pi->offset;
1762               unix_vlib_cli_output_cooked (cf, uf, line, pi->length);
1763             }
1764           /* if the last line didn't end in newline, add a newline */
1765           if (pi && line[pi->length - 1] != '\n')
1766             unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\n", 1);
1767           unix_cli_pager_prompt (cf, uf);
1768         }
1769       else
1770         {
1771           if (action == UNIX_CLI_PARSE_ACTION_PAGER_NEXT)
1772             /* no more in buffer, exit, but only if it was <space> */
1773             goto pager_quit;
1774         }
1775       break;
1776
1777     case UNIX_CLI_PARSE_ACTION_PAGER_DN:
1778     case UNIX_CLI_PARSE_ACTION_PAGER_CRLF:
1779       /* display the next line of the buffer */
1780       if (cf->pager_start < vec_len (cf->pager_index) - (cf->height - 1))
1781         {
1782           u8 *line;
1783           unix_cli_pager_index_t *pi;
1784
1785           unix_cli_pager_prompt_erase (cf, uf);
1786           pi = &cf->pager_index[cf->pager_start + (cf->height - 1)];
1787           line = cf->pager_vector[pi->line] + pi->offset;
1788           unix_vlib_cli_output_cooked (cf, uf, line, pi->length);
1789           cf->pager_start++;
1790           /* if the last line didn't end in newline, add a newline */
1791           if (line[pi->length - 1] != '\n')
1792             unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\n", 1);
1793           unix_cli_pager_prompt (cf, uf);
1794         }
1795       else
1796         {
1797           if (action == UNIX_CLI_PARSE_ACTION_PAGER_CRLF)
1798             /* no more in buffer, exit, but only if it was <enter> */
1799             goto pager_quit;
1800         }
1801
1802       break;
1803
1804     case UNIX_CLI_PARSE_ACTION_PAGER_UP:
1805       /* scroll the page back one line */
1806       if (cf->pager_start > 0)
1807         {
1808           u8 *line = NULL;
1809           unix_cli_pager_index_t *pi = NULL;
1810
1811           cf->pager_start--;
1812           if (cf->ansi_capable)
1813             {
1814               pi = &cf->pager_index[cf->pager_start];
1815               line = cf->pager_vector[pi->line] + pi->offset;
1816               unix_cli_pager_prompt_erase (cf, uf);
1817               unix_vlib_cli_output_cooked (cf, uf, (u8 *) ANSI_SCROLLDN,
1818                                            sizeof (ANSI_SCROLLDN) - 1);
1819               unix_vlib_cli_output_cooked (cf, uf, (u8 *) ANSI_SAVECURSOR,
1820                                            sizeof (ANSI_SAVECURSOR) - 1);
1821               unix_cli_ansi_cursor (cf, uf, 1, 1);
1822               unix_vlib_cli_output_cooked (cf, uf, (u8 *) ANSI_CLEARLINE,
1823                                            sizeof (ANSI_CLEARLINE) - 1);
1824               unix_vlib_cli_output_cooked (cf, uf, line, pi->length);
1825               unix_vlib_cli_output_cooked (cf, uf, (u8 *) ANSI_RESTCURSOR,
1826                                            sizeof (ANSI_RESTCURSOR) - 1);
1827               unix_cli_pager_prompt_erase (cf, uf);
1828               unix_cli_pager_prompt (cf, uf);
1829             }
1830           else
1831             {
1832               int m = cf->pager_start + (cf->height - 1);
1833               unix_cli_pager_prompt_erase (cf, uf);
1834               for (j = cf->pager_start;
1835                    j < vec_len (cf->pager_index) && j < m; j++)
1836                 {
1837                   pi = &cf->pager_index[j];
1838                   line = cf->pager_vector[pi->line] + pi->offset;
1839                   unix_vlib_cli_output_cooked (cf, uf, line, pi->length);
1840                 }
1841               /* if the last line didn't end in newline, add a newline */
1842               if (pi && line[pi->length - 1] != '\n')
1843                 unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\n", 1);
1844               unix_cli_pager_prompt (cf, uf);
1845             }
1846         }
1847       break;
1848
1849     case UNIX_CLI_PARSE_ACTION_PAGER_TOP:
1850       /* back to the first page of the buffer */
1851       if (cf->pager_start > 0)
1852         {
1853           u8 *line = NULL;
1854           unix_cli_pager_index_t *pi = NULL;
1855
1856           cf->pager_start = 0;
1857           int m = cf->pager_start + (cf->height - 1);
1858           unix_cli_pager_prompt_erase (cf, uf);
1859           for (j = cf->pager_start; j < vec_len (cf->pager_index) && j < m;
1860                j++)
1861             {
1862               pi = &cf->pager_index[j];
1863               line = cf->pager_vector[pi->line] + pi->offset;
1864               unix_vlib_cli_output_cooked (cf, uf, line, pi->length);
1865             }
1866           /* if the last line didn't end in newline, add a newline */
1867           if (pi && line[pi->length - 1] != '\n')
1868             unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\n", 1);
1869           unix_cli_pager_prompt (cf, uf);
1870         }
1871       break;
1872
1873     case UNIX_CLI_PARSE_ACTION_PAGER_BOTTOM:
1874       /* skip to the last page of the buffer */
1875       if (cf->pager_start < vec_len (cf->pager_index) - (cf->height - 1))
1876         {
1877           u8 *line = NULL;
1878           unix_cli_pager_index_t *pi = NULL;
1879
1880           cf->pager_start = vec_len (cf->pager_index) - (cf->height - 1);
1881           unix_cli_pager_prompt_erase (cf, uf);
1882           unix_cli_pager_message (cf, uf, "skipping", "\n");
1883           for (j = cf->pager_start; j < vec_len (cf->pager_index); j++)
1884             {
1885               pi = &cf->pager_index[j];
1886               line = cf->pager_vector[pi->line] + pi->offset;
1887               unix_vlib_cli_output_cooked (cf, uf, line, pi->length);
1888             }
1889           /* if the last line didn't end in newline, add a newline */
1890           if (pi && line[pi->length - 1] != '\n')
1891             unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\n", 1);
1892           unix_cli_pager_prompt (cf, uf);
1893         }
1894       break;
1895
1896     case UNIX_CLI_PARSE_ACTION_PAGER_PGUP:
1897       /* wander back one page in the buffer */
1898       if (cf->pager_start > 0)
1899         {
1900           u8 *line = NULL;
1901           unix_cli_pager_index_t *pi = NULL;
1902           int m;
1903
1904           if (cf->pager_start >= cf->height)
1905             cf->pager_start -= cf->height - 1;
1906           else
1907             cf->pager_start = 0;
1908           m = cf->pager_start + cf->height - 1;
1909           unix_cli_pager_prompt_erase (cf, uf);
1910           for (j = cf->pager_start; j < vec_len (cf->pager_index) && j < m;
1911                j++)
1912             {
1913               pi = &cf->pager_index[j];
1914               line = cf->pager_vector[pi->line] + pi->offset;
1915               unix_vlib_cli_output_cooked (cf, uf, line, pi->length);
1916             }
1917           /* if the last line didn't end in newline, add a newline */
1918           if (pi && line[pi->length - 1] != '\n')
1919             unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\n", 1);
1920           unix_cli_pager_prompt (cf, uf);
1921         }
1922       break;
1923
1924     case UNIX_CLI_PARSE_ACTION_PAGER_REDRAW:
1925       /* Redraw the current pager screen */
1926       unix_cli_pager_redraw (cf, uf);
1927       break;
1928
1929     case UNIX_CLI_PARSE_ACTION_PAGER_SEARCH:
1930       /* search forwards in the buffer */
1931       break;
1932
1933
1934     case UNIX_CLI_PARSE_ACTION_CRLF:
1935     crlf:
1936       unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\n", 1);
1937
1938       if (cf->has_history && cf->history_limit)
1939         {
1940           if (cf->command_history
1941               && vec_len (cf->command_history) >= cf->history_limit)
1942             {
1943               vec_free (cf->command_history[0]);
1944               vec_delete (cf->command_history, 1, 0);
1945             }
1946           /* Don't add blank lines to the cmd history */
1947           if (vec_len (cf->current_command))
1948             {
1949               /* Don't duplicate the previous command */
1950               j = vec_len (cf->command_history);
1951               if (j == 0 ||
1952                   (vec_len (cf->current_command) !=
1953                    vec_len (cf->command_history[j - 1])
1954                    || memcmp (cf->current_command, cf->command_history[j - 1],
1955                               vec_len (cf->current_command)) != 0))
1956                 {
1957                   /* copy the command to the history */
1958                   u8 *c = 0;
1959                   vec_append (c, cf->current_command);
1960                   vec_add1 (cf->command_history, c);
1961                   cf->command_number++;
1962                 }
1963             }
1964           cf->excursion = vec_len (cf->command_history);
1965         }
1966
1967       cf->search_mode = 0;
1968       vec_reset_length (cf->search_key);
1969       cf->cursor = 0;
1970
1971       return 0;
1972
1973     case UNIX_CLI_PARSE_ACTION_PARTIALMATCH:
1974     case UNIX_CLI_PARSE_ACTION_NOMATCH:
1975       if (vec_len (cf->pager_index))
1976         {
1977           /* no-op for now */
1978         }
1979       else if (cf->has_history && cf->search_mode && isprint (input))
1980         {
1981           int k, limit, offset;
1982           u8 *item;
1983
1984           vec_add1 (cf->search_key, input);
1985
1986         search_again:
1987           for (j = 0; j < vec_len (cf->command_history); j++)
1988             {
1989               if (cf->excursion > (i32) vec_len (cf->command_history) - 1)
1990                 cf->excursion = 0;
1991               else if (cf->excursion < 0)
1992                 cf->excursion = vec_len (cf->command_history) - 1;
1993
1994               item = cf->command_history[cf->excursion];
1995
1996               limit = (vec_len (cf->search_key) > vec_len (item)) ?
1997                 vec_len (item) : vec_len (cf->search_key);
1998
1999               for (offset = 0; offset <= vec_len (item) - limit; offset++)
2000                 {
2001                   for (k = 0; k < limit; k++)
2002                     {
2003                       if (item[k + offset] != cf->search_key[k])
2004                         goto next_offset;
2005                     }
2006                   goto found_at_offset;
2007
2008                 next_offset:
2009                   ;
2010                 }
2011               goto next;
2012
2013             found_at_offset:
2014               for (j = 0; j < vec_len (cf->current_command); j++)
2015                 unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\b \b", 3);
2016
2017               vec_validate (cf->current_command, vec_len (item) - 1);
2018               clib_memcpy (cf->current_command, item, vec_len (item));
2019               _vec_len (cf->current_command) = vec_len (item);
2020
2021               unix_vlib_cli_output_cooked (cf, uf, cf->current_command,
2022                                            vec_len (cf->current_command));
2023               cf->cursor = vec_len (cf->current_command);
2024               goto found;
2025
2026             next:
2027               cf->excursion += cf->search_mode;
2028             }
2029
2030           unix_vlib_cli_output_cooked (cf, uf, (u8 *) "\nNo match...", 12);
2031           vec_reset_length (cf->search_key);
2032           vec_reset_length (cf->current_command);
2033           cf->search_mode = 0;
2034           cf->cursor = 0;
2035           goto crlf;
2036         }
2037       else if (isprint (input)) /* skip any errant control codes */
2038         {
2039           if (cf->cursor == vec_len (cf->current_command))
2040             {
2041               /* Append to end */
2042               vec_add1 (cf->current_command, input);
2043               cf->cursor++;
2044
2045               /* Echo the character back to the client */
2046               unix_vlib_cli_output_raw (cf, uf, &input, 1);
2047             }
2048           else
2049             {
2050               /* Insert at cursor: resize +1 byte, move everything over */
2051               j = vec_len (cf->current_command) - cf->cursor;
2052               vec_add1 (cf->current_command, (u8) 'A');
2053               memmove (cf->current_command + cf->cursor + 1,
2054                        cf->current_command + cf->cursor, j);
2055               cf->current_command[cf->cursor] = input;
2056               /* Redraw the line */
2057               j++;
2058               unix_vlib_cli_output_raw (cf, uf,
2059                                         cf->current_command + cf->cursor, j);
2060               /* Put terminal cursor back */
2061               while (--j)
2062                 unix_vlib_cli_output_raw (cf, uf, (u8 *) "\b", 1);
2063               cf->cursor++;
2064             }
2065         }
2066       else
2067         {
2068           /* no-op - not printable or otherwise not actionable */
2069         }
2070
2071     found:
2072
2073       break;
2074
2075     case UNIX_CLI_PARSE_ACTION_TELNETIAC:
2076       break;
2077     }
2078   return 1;
2079 }
2080
2081 /** @brief Process input bytes on a stream to provide line editing and
2082  * command history in the CLI. */
2083 static int
2084 unix_cli_line_edit (unix_cli_main_t * cm, unix_main_t * um,
2085                     clib_file_main_t * fm, unix_cli_file_t * cf)
2086 {
2087   clib_file_t *uf = pool_elt_at_index (fm->file_pool, cf->clib_file_index);
2088   int i;
2089
2090   for (i = 0; i < vec_len (cf->input_vector); i++)
2091     {
2092       unix_cli_parse_action_t action;
2093       i32 matched = 0;
2094       unix_cli_parse_actions_t *a;
2095
2096       /* If we're in the pager mode, search the pager actions */
2097       a =
2098         vec_len (cf->pager_index) ? unix_cli_parse_pager :
2099         unix_cli_parse_strings;
2100
2101       /* See if the input buffer is some sort of control code */
2102       action = unix_cli_match_action (a, &cf->input_vector[i],
2103                                       vec_len (cf->input_vector) - i,
2104                                       &matched);
2105
2106       switch (action)
2107         {
2108         case UNIX_CLI_PARSE_ACTION_PARTIALMATCH:
2109           if (i)
2110             {
2111               /* There was a partial match which means we need more bytes
2112                * than the input buffer currently has.
2113                * Since the bytes before here have been processed, shift
2114                * the remaining contents to the start of the input buffer.
2115                */
2116               vec_delete (cf->input_vector, i, 0);
2117             }
2118           return 1;             /* wait for more */
2119
2120         case UNIX_CLI_PARSE_ACTION_TELNETIAC:
2121           /* process telnet options */
2122           matched = unix_cli_process_telnet (um, cf, uf,
2123                                              cf->input_vector + i,
2124                                              vec_len (cf->input_vector) - i);
2125           if (matched < 0)
2126             {
2127               if (i)
2128                 {
2129                   /* There was a partial match which means we need more bytes
2130                    * than the input buffer currently has.
2131                    * Since the bytes before here have been processed, shift
2132                    * the remaining contents to the start of the input buffer.
2133                    */
2134                   vec_delete (cf->input_vector, i, 0);
2135                 }
2136               return 1;         /* wait for more */
2137             }
2138           break;
2139
2140         default:
2141           /* process the action */
2142           if (!unix_cli_line_process_one (cm, um, cf, uf,
2143                                           cf->input_vector[i], action))
2144             {
2145               /* CRLF found. Consume the bytes from the input_vector */
2146               vec_delete (cf->input_vector, i + matched, 0);
2147               /* And tell our caller to execute cf->input_command */
2148               return 0;
2149             }
2150         }
2151
2152       i += matched;
2153     }
2154
2155   vec_reset_length (cf->input_vector);
2156   return 1;
2157 }
2158
2159 /** @brief Process input to a CLI session. */
2160 static void
2161 unix_cli_process_input (unix_cli_main_t * cm, uword cli_file_index)
2162 {
2163   unix_main_t *um = &unix_main;
2164   clib_file_main_t *fm = &file_main;
2165   clib_file_t *uf;
2166   unix_cli_file_t *cf = pool_elt_at_index (cm->cli_file_pool, cli_file_index);
2167   unformat_input_t input;
2168   int vlib_parse_eval (u8 *);
2169
2170 more:
2171   /* Try vlibplex first.  Someday... */
2172   if (0 && vlib_parse_eval (cf->input_vector) == 0)
2173     goto done;
2174
2175   if (cf->line_mode)
2176     {
2177       /* just treat whatever we got as a complete line of input */
2178       cf->current_command = cf->input_vector;
2179     }
2180   else
2181     {
2182       /* Line edit, echo, etc. */
2183       if (unix_cli_line_edit (cm, um, fm, cf))
2184         /* want more input */
2185         return;
2186     }
2187
2188   if (um->log_fd)
2189     {
2190       static u8 *lv;
2191       vec_reset_length (lv);
2192       lv = format (lv, "%U[%d]: %v",
2193                    format_timeval, 0 /* current bat-time */ ,
2194                    0 /* current bat-format */ ,
2195                    cli_file_index, cf->input_vector);
2196       {
2197         int rv __attribute__ ((unused)) =
2198           write (um->log_fd, lv, vec_len (lv));
2199       }
2200     }
2201
2202   /* Copy our input command to a new string */
2203   unformat_init_vector (&input, cf->current_command);
2204
2205   /* Remove leading white space from input. */
2206   (void) unformat (&input, "");
2207
2208   cm->current_input_file_index = cli_file_index;
2209   cf->pager_start = 0;          /* start a new pager session */
2210
2211   if (unformat_check_input (&input) != UNFORMAT_END_OF_INPUT)
2212     vlib_cli_input (um->vlib_main, &input, unix_vlib_cli_output,
2213                     cli_file_index);
2214
2215   /* Zero buffer since otherwise unformat_free will call vec_free on it. */
2216   input.buffer = 0;
2217
2218   unformat_free (&input);
2219
2220   /* Re-fetch pointer since pool may have moved. */
2221   cf = pool_elt_at_index (cm->cli_file_pool, cli_file_index);
2222   uf = pool_elt_at_index (fm->file_pool, cf->clib_file_index);
2223
2224 done:
2225   /* reset vector; we'll re-use it later  */
2226   if (cf->line_mode)
2227     vec_reset_length (cf->input_vector);
2228   else
2229     vec_reset_length (cf->current_command);
2230
2231   if (cf->no_pager == 2)
2232     {
2233       /* Pager was programmatically disabled */
2234       unix_cli_pager_message (cf, uf, "pager buffer overflowed", "\n");
2235       cf->no_pager = um->cli_no_pager;
2236     }
2237
2238   if (vec_len (cf->pager_index) == 0
2239       || vec_len (cf->pager_index) < cf->height)
2240     {
2241       /* There was no need for the pager */
2242       unix_cli_pager_reset (cf);
2243
2244       /* Prompt. */
2245       unix_cli_cli_prompt (cf, uf);
2246     }
2247   else
2248     {
2249       /* Display the pager prompt */
2250       unix_cli_pager_prompt (cf, uf);
2251     }
2252
2253   /* Any residual data in the input vector? */
2254   if (vec_len (cf->input_vector))
2255     goto more;
2256 }
2257
2258 /** Destroy a CLI session.
2259  * @note If we destroy the @c stdin session this additionally signals
2260  *       the shutdown of VPP.
2261  */
2262 static void
2263 unix_cli_kill (unix_cli_main_t * cm, uword cli_file_index)
2264 {
2265   unix_main_t *um = &unix_main;
2266   clib_file_main_t *fm = &file_main;
2267   unix_cli_file_t *cf;
2268   clib_file_t *uf;
2269   int i;
2270
2271   cf = pool_elt_at_index (cm->cli_file_pool, cli_file_index);
2272   uf = pool_elt_at_index (fm->file_pool, cf->clib_file_index);
2273
2274   /* Quit/EOF on stdin means quit program. */
2275   if (uf->file_descriptor == UNIX_CLI_STDIN_FD)
2276     clib_longjmp (&um->vlib_main->main_loop_exit, VLIB_MAIN_LOOP_EXIT_CLI);
2277
2278   vec_free (cf->current_command);
2279   vec_free (cf->search_key);
2280
2281   for (i = 0; i < vec_len (cf->command_history); i++)
2282     vec_free (cf->command_history[i]);
2283
2284   vec_free (cf->command_history);
2285
2286   clib_file_del (fm, uf);
2287
2288   unix_cli_file_free (cf);
2289   pool_put (cm->cli_file_pool, cf);
2290 }
2291
2292 /** Handle system events. */
2293 static uword
2294 unix_cli_process (vlib_main_t * vm,
2295                   vlib_node_runtime_t * rt, vlib_frame_t * f)
2296 {
2297   unix_cli_main_t *cm = &unix_cli_main;
2298   uword i, *data = 0;
2299
2300   while (1)
2301     {
2302       unix_cli_process_event_type_t event_type;
2303       vlib_process_wait_for_event (vm);
2304       event_type = vlib_process_get_events (vm, &data);
2305
2306       switch (event_type)
2307         {
2308         case UNIX_CLI_PROCESS_EVENT_READ_READY:
2309           for (i = 0; i < vec_len (data); i++)
2310             unix_cli_process_input (cm, data[i]);
2311           break;
2312
2313         case UNIX_CLI_PROCESS_EVENT_QUIT:
2314           /* Kill this process. */
2315           for (i = 0; i < vec_len (data); i++)
2316             unix_cli_kill (cm, data[i]);
2317           goto done;
2318         }
2319
2320       if (data)
2321         _vec_len (data) = 0;
2322     }
2323
2324 done:
2325   vec_free (data);
2326
2327   vlib_node_set_state (vm, rt->node_index, VLIB_NODE_STATE_DISABLED);
2328
2329   /* Add node index so we can re-use this process later. */
2330   vec_add1 (cm->unused_cli_process_node_indices, rt->node_index);
2331
2332   return 0;
2333 }
2334
2335 /** Called when a CLI session file descriptor can be written to without
2336  * blocking. */
2337 static clib_error_t *
2338 unix_cli_write_ready (clib_file_t * uf)
2339 {
2340   unix_cli_main_t *cm = &unix_cli_main;
2341   unix_cli_file_t *cf;
2342   int n;
2343
2344   cf = pool_elt_at_index (cm->cli_file_pool, uf->private_data);
2345
2346   /* Flush output vector. */
2347   n = write (uf->file_descriptor,
2348              cf->output_vector, vec_len (cf->output_vector));
2349
2350   if (n < 0 && errno != EAGAIN)
2351     return clib_error_return_unix (0, "write");
2352
2353   else if (n > 0)
2354     unix_cli_del_pending_output (uf, cf, n);
2355
2356   return /* no error */ 0;
2357 }
2358
2359 /** Called when a CLI session file descriptor has data to be read. */
2360 static clib_error_t *
2361 unix_cli_read_ready (clib_file_t * uf)
2362 {
2363   unix_main_t *um = &unix_main;
2364   unix_cli_main_t *cm = &unix_cli_main;
2365   unix_cli_file_t *cf;
2366   uword l;
2367   int n, n_read, n_try;
2368
2369   cf = pool_elt_at_index (cm->cli_file_pool, uf->private_data);
2370
2371   n = n_try = 4096;
2372   while (n == n_try)
2373     {
2374       l = vec_len (cf->input_vector);
2375       vec_resize (cf->input_vector, l + n_try);
2376
2377       n = read (uf->file_descriptor, cf->input_vector + l, n_try);
2378
2379       /* Error? */
2380       if (n < 0 && errno != EAGAIN)
2381         return clib_error_return_unix (0, "read");
2382
2383       n_read = n < 0 ? 0 : n;
2384       _vec_len (cf->input_vector) = l + n_read;
2385     }
2386
2387   if (!(n < 0))
2388     vlib_process_signal_event (um->vlib_main,
2389                                cf->process_node_index,
2390                                (n_read == 0
2391                                 ? UNIX_CLI_PROCESS_EVENT_QUIT
2392                                 : UNIX_CLI_PROCESS_EVENT_READ_READY),
2393                                /* event data */ uf->private_data);
2394
2395   return /* no error */ 0;
2396 }
2397
2398 /** Store a new CLI session.
2399  * @param name The name of the session.
2400  * @param fd   The file descriptor for the session I/O.
2401  * @return The session ID.
2402  */
2403 static u32
2404 unix_cli_file_add (unix_cli_main_t * cm, char *name, int fd)
2405 {
2406   unix_main_t *um = &unix_main;
2407   clib_file_main_t *fm = &file_main;
2408   unix_cli_file_t *cf;
2409   clib_file_t template = { 0 };
2410   vlib_main_t *vm = um->vlib_main;
2411   vlib_node_t *n;
2412
2413   name = (char *) format (0, "unix-cli-%s", name);
2414
2415   if (vec_len (cm->unused_cli_process_node_indices) > 0)
2416     {
2417       uword l = vec_len (cm->unused_cli_process_node_indices);
2418
2419       /* Find node and give it new name. */
2420       n = vlib_get_node (vm, cm->unused_cli_process_node_indices[l - 1]);
2421       vec_free (n->name);
2422       n->name = (u8 *) name;
2423
2424       vlib_node_set_state (vm, n->index, VLIB_NODE_STATE_POLLING);
2425
2426       _vec_len (cm->unused_cli_process_node_indices) = l - 1;
2427     }
2428   else
2429     {
2430       static vlib_node_registration_t r = {
2431         .function = unix_cli_process,
2432         .type = VLIB_NODE_TYPE_PROCESS,
2433         .process_log2_n_stack_bytes = 16,
2434       };
2435
2436       r.name = name;
2437       vlib_register_node (vm, &r);
2438       vec_free (name);
2439
2440       n = vlib_get_node (vm, r.index);
2441     }
2442
2443   pool_get (cm->cli_file_pool, cf);
2444   memset (cf, 0, sizeof (*cf));
2445
2446   template.read_function = unix_cli_read_ready;
2447   template.write_function = unix_cli_write_ready;
2448   template.file_descriptor = fd;
2449   template.private_data = cf - cm->cli_file_pool;
2450
2451   cf->process_node_index = n->index;
2452   cf->clib_file_index = clib_file_add (fm, &template);
2453   cf->output_vector = 0;
2454   cf->input_vector = 0;
2455
2456   vlib_start_process (vm, n->runtime_index);
2457
2458   vlib_process_t *p = vlib_get_process_from_node (vm, n);
2459   p->output_function = unix_vlib_cli_output;
2460   p->output_function_arg = cf - cm->cli_file_pool;
2461
2462   return cf - cm->cli_file_pool;
2463 }
2464
2465 /** Telnet listening socket has a new connection. */
2466 static clib_error_t *
2467 unix_cli_listen_read_ready (clib_file_t * uf)
2468 {
2469   unix_main_t *um = &unix_main;
2470   clib_file_main_t *fm = &file_main;
2471   unix_cli_main_t *cm = &unix_cli_main;
2472   clib_socket_t *s = &um->cli_listen_socket;
2473   clib_socket_t client;
2474   char *client_name;
2475   clib_error_t *error;
2476   unix_cli_file_t *cf;
2477   u32 cf_index;
2478
2479   error = clib_socket_accept (s, &client);
2480   if (error)
2481     return error;
2482
2483   client_name = (char *) format (0, "%U%c", format_sockaddr, &client.peer, 0);
2484
2485   cf_index = unix_cli_file_add (cm, client_name, client.fd);
2486   cf = pool_elt_at_index (cm->cli_file_pool, cf_index);
2487
2488   /* No longer need CLIB version of socket. */
2489   clib_socket_free (&client);
2490
2491   vec_free (client_name);
2492
2493   /* if we're supposed to run telnet session in character mode (default) */
2494   if (um->cli_line_mode == 0)
2495     {
2496       /*
2497        * Set telnet client character mode, echo on, suppress "go-ahead".
2498        * Technically these should be negotiated, but this works.
2499        */
2500       u8 charmode_option[] = {
2501         IAC, WONT, TELOPT_LINEMODE,     /* server will do char-by-char */
2502         IAC, DONT, TELOPT_LINEMODE,     /* client should do char-by-char */
2503         IAC, WILL, TELOPT_SGA,  /* server willl supress GA */
2504         IAC, DO, TELOPT_SGA,    /* client should supress Go Ahead */
2505         IAC, WILL, TELOPT_ECHO, /* server will do echo */
2506         IAC, DONT, TELOPT_ECHO, /* client should not echo */
2507         IAC, DO, TELOPT_TTYPE,  /* client should tell us its term type */
2508         IAC, SB, TELOPT_TTYPE, 1, IAC, SE,      /* now tell me ttype */
2509         IAC, DO, TELOPT_NAWS,   /* client should tell us its window sz */
2510         IAC, SB, TELOPT_NAWS, 1, IAC, SE,       /* now tell me window size */
2511       };
2512
2513       /* Enable history on this CLI */
2514       cf->history_limit = um->cli_history_limit;
2515       cf->has_history = cf->history_limit != 0;
2516
2517       /* Make sure this session is in line mode */
2518       cf->line_mode = 0;
2519
2520       /* We need CRLF */
2521       cf->crlf_mode = 1;
2522
2523       /* Setup the pager */
2524       cf->no_pager = um->cli_no_pager;
2525
2526       uf = pool_elt_at_index (fm->file_pool, cf->clib_file_index);
2527
2528       /* Send the telnet options */
2529       unix_vlib_cli_output_raw (cf, uf, charmode_option,
2530                                 ARRAY_LEN (charmode_option));
2531
2532       /* In case the client doesn't negotiate terminal type, use
2533        * a timer to kick off the initial prompt. */
2534       timer_call (unix_cli_file_welcome_timer, cf_index, 1);
2535     }
2536
2537   return error;
2538 }
2539
2540 /** The system terminal has informed us that the window size
2541  * has changed.
2542  */
2543 static void
2544 unix_cli_resize_interrupt (int signum)
2545 {
2546   clib_file_main_t *fm = &file_main;
2547   unix_cli_main_t *cm = &unix_cli_main;
2548   unix_cli_file_t *cf = pool_elt_at_index (cm->cli_file_pool,
2549                                            cm->stdin_cli_file_index);
2550   clib_file_t *uf = pool_elt_at_index (fm->file_pool, cf->clib_file_index);
2551   struct winsize ws;
2552   (void) signum;
2553
2554   /* Terminal resized, fetch the new size */
2555   if (ioctl (UNIX_CLI_STDIN_FD, TIOCGWINSZ, &ws) < 0)
2556     {
2557       /* "Should never happen..." */
2558       clib_unix_warning ("TIOCGWINSZ");
2559       /* We can't trust ws.XXX... */
2560       return;
2561     }
2562
2563   cf->width = ws.ws_col;
2564   if (cf->width > UNIX_CLI_MAX_TERMINAL_WIDTH)
2565     cf->width = UNIX_CLI_MAX_TERMINAL_WIDTH;
2566   if (cf->width < UNIX_CLI_MIN_TERMINAL_WIDTH)
2567     cf->width = UNIX_CLI_MIN_TERMINAL_WIDTH;
2568
2569   cf->height = ws.ws_row;
2570   if (cf->height > UNIX_CLI_MAX_TERMINAL_HEIGHT)
2571     cf->height = UNIX_CLI_MAX_TERMINAL_HEIGHT;
2572   if (cf->height < UNIX_CLI_MIN_TERMINAL_HEIGHT)
2573     cf->height = UNIX_CLI_MIN_TERMINAL_HEIGHT;
2574
2575   /* Reindex the pager buffer */
2576   unix_cli_pager_reindex (cf);
2577
2578   /* Redraw the page */
2579   unix_cli_pager_redraw (cf, uf);
2580 }
2581
2582 /** Handle configuration directives in the @em unix section. */
2583 static clib_error_t *
2584 unix_cli_config (vlib_main_t * vm, unformat_input_t * input)
2585 {
2586   unix_main_t *um = &unix_main;
2587   clib_file_main_t *fm = &file_main;
2588   unix_cli_main_t *cm = &unix_cli_main;
2589   int flags;
2590   clib_error_t *error = 0;
2591   unix_cli_file_t *cf;
2592   u32 cf_index;
2593   struct termios tio;
2594   struct sigaction sa;
2595   struct winsize ws;
2596   u8 *term;
2597
2598   /* We depend on unix flags being set. */
2599   if ((error = vlib_call_config_function (vm, unix_config)))
2600     return error;
2601
2602   if (um->flags & UNIX_FLAG_INTERACTIVE)
2603     {
2604       /* Set stdin to be non-blocking. */
2605       if ((flags = fcntl (UNIX_CLI_STDIN_FD, F_GETFL, 0)) < 0)
2606         flags = 0;
2607       (void) fcntl (UNIX_CLI_STDIN_FD, F_SETFL, flags | O_NONBLOCK);
2608
2609       cf_index = unix_cli_file_add (cm, "stdin", UNIX_CLI_STDIN_FD);
2610       cf = pool_elt_at_index (cm->cli_file_pool, cf_index);
2611       cm->stdin_cli_file_index = cf_index;
2612
2613       /* If stdin is a tty and we are using chacracter mode, enable
2614        * history on the CLI and set the tty line discipline accordingly. */
2615       if (isatty (UNIX_CLI_STDIN_FD) && um->cli_line_mode == 0)
2616         {
2617           /* Capture terminal resize events */
2618           memset (&sa, 0, sizeof (sa));
2619           sa.sa_handler = unix_cli_resize_interrupt;
2620           if (sigaction (SIGWINCH, &sa, 0) < 0)
2621             clib_panic ("sigaction");
2622
2623           /* Retrieve the current terminal size */
2624           ioctl (UNIX_CLI_STDIN_FD, TIOCGWINSZ, &ws);
2625           cf->width = ws.ws_col;
2626           cf->height = ws.ws_row;
2627
2628           if (cf->width == 0 || cf->height == 0)
2629             /* We have a tty, but no size. Stick to line mode. */
2630             goto notty;
2631
2632           /* Setup the history */
2633           cf->history_limit = um->cli_history_limit;
2634           cf->has_history = cf->history_limit != 0;
2635
2636           /* Setup the pager */
2637           cf->no_pager = um->cli_no_pager;
2638
2639           /* We're going to be in char by char mode */
2640           cf->line_mode = 0;
2641
2642           /* Save the original tty state so we can restore it later */
2643           tcgetattr (UNIX_CLI_STDIN_FD, &um->tio_stdin);
2644           um->tio_isset = 1;
2645
2646           /* Tweak the tty settings */
2647           tio = um->tio_stdin;
2648           /* echo off, canonical mode off, ext'd input processing off */
2649           tio.c_lflag &= ~(ECHO | ICANON | IEXTEN);
2650           tio.c_cc[VMIN] = 1;   /* 1 byte at a time */
2651           tio.c_cc[VTIME] = 0;  /* no timer */
2652           tcsetattr (UNIX_CLI_STDIN_FD, TCSAFLUSH, &tio);
2653
2654           /* See if we can do ANSI/VT100 output */
2655           term = (u8 *) getenv ("TERM");
2656           if (term != NULL)
2657             cf->ansi_capable = unix_cli_terminal_type (term,
2658                                                        strlen ((char *)
2659                                                                term));
2660         }
2661       else
2662         {
2663         notty:
2664           /* No tty, so make sure these things are off */
2665           cf->no_pager = 1;
2666           cf->history_limit = 0;
2667           cf->has_history = 0;
2668           cf->line_mode = 1;
2669         }
2670
2671       /* Send banner and initial prompt */
2672       unix_cli_file_welcome (cm, cf);
2673     }
2674
2675   /* If we have socket config, LISTEN, otherwise, don't */
2676   clib_socket_t *s = &um->cli_listen_socket;
2677   if (s->config && s->config[0] != 0)
2678     {
2679       /* CLI listen. */
2680       clib_file_t template = { 0 };
2681
2682       /* mkdir of file socketu, only under /run  */
2683       if (strncmp (s->config, "/run", 4) == 0)
2684         {
2685           u8 *tmp = format (0, "%s", s->config);
2686           int i = vec_len (tmp);
2687           while (i && tmp[--i] != '/')
2688             ;
2689
2690           tmp[i] = 0;
2691
2692           if (i)
2693             vlib_unix_recursive_mkdir ((char *) tmp);
2694           vec_free (tmp);
2695         }
2696
2697       s->flags = CLIB_SOCKET_F_IS_SERVER |      /* listen, don't connect */
2698         CLIB_SOCKET_F_ALLOW_GROUP_WRITE;        /* PF_LOCAL socket only */
2699       error = clib_socket_init (s);
2700
2701       if (error)
2702         return error;
2703
2704       template.read_function = unix_cli_listen_read_ready;
2705       template.file_descriptor = s->fd;
2706
2707       clib_file_add (fm, &template);
2708     }
2709
2710   /* Set CLI prompt. */
2711   if (!cm->cli_prompt)
2712     cm->cli_prompt = format (0, "VLIB: ");
2713
2714   return 0;
2715 }
2716
2717 /*?
2718  * This module has no configurable parameters.
2719 ?*/
2720 VLIB_CONFIG_FUNCTION (unix_cli_config, "unix-cli");
2721
2722 /** Called when VPP is shutting down, this restores the system
2723  * terminal state if previously saved.
2724  */
2725 static clib_error_t *
2726 unix_cli_exit (vlib_main_t * vm)
2727 {
2728   unix_main_t *um = &unix_main;
2729
2730   /* If stdin is a tty and we saved the tty state, reset the tty state */
2731   if (isatty (UNIX_CLI_STDIN_FD) && um->tio_isset)
2732     tcsetattr (UNIX_CLI_STDIN_FD, TCSAFLUSH, &um->tio_stdin);
2733
2734   return 0;
2735 }
2736
2737 VLIB_MAIN_LOOP_EXIT_FUNCTION (unix_cli_exit);
2738
2739 /** Set the CLI prompt.
2740  * @param prompt The C string to set the prompt to.
2741  * @note This setting is global; it impacts all current
2742  *       and future CLI sessions.
2743  */
2744 void
2745 vlib_unix_cli_set_prompt (char *prompt)
2746 {
2747   char *fmt = (prompt[strlen (prompt) - 1] == ' ') ? "%s" : "%s ";
2748   unix_cli_main_t *cm = &unix_cli_main;
2749   if (cm->cli_prompt)
2750     vec_free (cm->cli_prompt);
2751   cm->cli_prompt = format (0, fmt, prompt);
2752 }
2753
2754 /** CLI command to quit the terminal session.
2755  * @note If this is a stdin session then this will
2756  *       shutdown VPP also.
2757  */
2758 static clib_error_t *
2759 unix_cli_quit (vlib_main_t * vm,
2760                unformat_input_t * input, vlib_cli_command_t * cmd)
2761 {
2762   unix_cli_main_t *cm = &unix_cli_main;
2763
2764   vlib_process_signal_event (vm,
2765                              vlib_current_process (vm),
2766                              UNIX_CLI_PROCESS_EVENT_QUIT,
2767                              cm->current_input_file_index);
2768   return 0;
2769 }
2770
2771 /*?
2772  * Terminates the current CLI session.
2773  *
2774  * If VPP is running in @em interactive mode and this is the console session
2775  * (that is, the session on @c stdin) then this will also terminate VPP.
2776 ?*/
2777 /* *INDENT-OFF* */
2778 VLIB_CLI_COMMAND (unix_cli_quit_command, static) = {
2779   .path = "quit",
2780   .short_help = "Exit CLI",
2781   .function = unix_cli_quit,
2782 };
2783 /* *INDENT-ON* */
2784
2785 /** CLI command to execute a VPP command script. */
2786 static clib_error_t *
2787 unix_cli_exec (vlib_main_t * vm,
2788                unformat_input_t * input, vlib_cli_command_t * cmd)
2789 {
2790   char *file_name;
2791   int fd;
2792   unformat_input_t sub_input;
2793   clib_error_t *error;
2794
2795   file_name = 0;
2796   fd = -1;
2797   error = 0;
2798
2799   if (!unformat (input, "%s", &file_name))
2800     {
2801       error = clib_error_return (0, "expecting file name, got `%U'",
2802                                  format_unformat_error, input);
2803       goto done;
2804     }
2805
2806   fd = open (file_name, O_RDONLY);
2807   if (fd < 0)
2808     {
2809       error = clib_error_return_unix (0, "failed to open `%s'", file_name);
2810       goto done;
2811     }
2812
2813   /* Make sure its a regular file. */
2814   {
2815     struct stat s;
2816
2817     if (fstat (fd, &s) < 0)
2818       {
2819         error = clib_error_return_unix (0, "failed to stat `%s'", file_name);
2820         goto done;
2821       }
2822
2823     if (!(S_ISREG (s.st_mode) || S_ISLNK (s.st_mode)))
2824       {
2825         error = clib_error_return (0, "not a regular file `%s'", file_name);
2826         goto done;
2827       }
2828   }
2829
2830   unformat_init_unix_file (&sub_input, fd);
2831
2832   vlib_cli_input (vm, &sub_input, 0, 0);
2833   unformat_free (&sub_input);
2834
2835 done:
2836   if (fd > 0)
2837     close (fd);
2838   vec_free (file_name);
2839
2840   return error;
2841 }
2842
2843 /*?
2844  * Executes a sequence of CLI commands which are read from a file.
2845  *
2846  * If a command is unrecognised or otherwise invalid then the usual CLI
2847  * feedback will be generated, however execution of subsequent commands
2848  * from the file will continue.
2849 ?*/
2850 /* *INDENT-OFF* */
2851 VLIB_CLI_COMMAND (cli_exec, static) = {
2852   .path = "exec",
2853   .short_help = "Execute commands from file",
2854   .function = unix_cli_exec,
2855   .is_mp_safe = 1,
2856 };
2857 /* *INDENT-ON* */
2858
2859 /** CLI command to show various unix error statistics. */
2860 static clib_error_t *
2861 unix_show_errors (vlib_main_t * vm,
2862                   unformat_input_t * input, vlib_cli_command_t * cmd)
2863 {
2864   unix_main_t *um = &unix_main;
2865   clib_error_t *error = 0;
2866   int i, n_errors_to_show;
2867   unix_error_history_t *unix_errors = 0;
2868
2869   n_errors_to_show = 1 << 30;
2870
2871   if (unformat_check_input (input) != UNFORMAT_END_OF_INPUT)
2872     {
2873       if (!unformat (input, "%d", &n_errors_to_show))
2874         {
2875           error =
2876             clib_error_return (0,
2877                                "expecting integer number of errors to show, got `%U'",
2878                                format_unformat_error, input);
2879           goto done;
2880         }
2881     }
2882
2883   n_errors_to_show =
2884     clib_min (ARRAY_LEN (um->error_history), n_errors_to_show);
2885
2886   i =
2887     um->error_history_index >
2888     0 ? um->error_history_index - 1 : ARRAY_LEN (um->error_history) - 1;
2889
2890   while (n_errors_to_show > 0)
2891     {
2892       unix_error_history_t *eh = um->error_history + i;
2893
2894       if (!eh->error)
2895         break;
2896
2897       vec_add1 (unix_errors, eh[0]);
2898       n_errors_to_show -= 1;
2899       if (i == 0)
2900         i = ARRAY_LEN (um->error_history) - 1;
2901       else
2902         i--;
2903     }
2904
2905   if (vec_len (unix_errors) == 0)
2906     vlib_cli_output (vm, "no Unix errors so far");
2907   else
2908     {
2909       vlib_cli_output (vm, "%Ld total errors seen", um->n_total_errors);
2910       for (i = vec_len (unix_errors) - 1; i >= 0; i--)
2911         {
2912           unix_error_history_t *eh = vec_elt_at_index (unix_errors, i);
2913           vlib_cli_output (vm, "%U: %U",
2914                            format_time_interval, "h:m:s:u", eh->time,
2915                            format_clib_error, eh->error);
2916         }
2917       vlib_cli_output (vm, "%U: time now",
2918                        format_time_interval, "h:m:s:u", vlib_time_now (vm));
2919     }
2920
2921 done:
2922   vec_free (unix_errors);
2923   return error;
2924 }
2925
2926 /* *INDENT-OFF* */
2927 VLIB_CLI_COMMAND (cli_unix_show_errors, static) = {
2928   .path = "show unix-errors",
2929   .short_help = "Show Unix system call error history",
2930   .function = unix_show_errors,
2931 };
2932 /* *INDENT-ON* */
2933
2934 /** CLI command to show session command history. */
2935 static clib_error_t *
2936 unix_cli_show_history (vlib_main_t * vm,
2937                        unformat_input_t * input, vlib_cli_command_t * cmd)
2938 {
2939   unix_cli_main_t *cm = &unix_cli_main;
2940   unix_cli_file_t *cf;
2941   int i, j;
2942
2943   cf = pool_elt_at_index (cm->cli_file_pool, cm->current_input_file_index);
2944
2945   if (cf->has_history && cf->history_limit)
2946     {
2947       i = 1 + cf->command_number - vec_len (cf->command_history);
2948       for (j = 0; j < vec_len (cf->command_history); j++)
2949         vlib_cli_output (vm, "%d  %v\n", i + j, cf->command_history[j]);
2950     }
2951   else
2952     {
2953       vlib_cli_output (vm, "History not enabled.\n");
2954     }
2955
2956   return 0;
2957 }
2958
2959 /*?
2960  * Displays the command history for the current session, if any.
2961 ?*/
2962 /* *INDENT-OFF* */
2963 VLIB_CLI_COMMAND (cli_unix_cli_show_history, static) = {
2964   .path = "history",
2965   .short_help = "Show current session command history",
2966   .function = unix_cli_show_history,
2967 };
2968 /* *INDENT-ON* */
2969
2970 /** CLI command to show terminal status. */
2971 static clib_error_t *
2972 unix_cli_show_terminal (vlib_main_t * vm,
2973                         unformat_input_t * input, vlib_cli_command_t * cmd)
2974 {
2975   unix_main_t *um = &unix_main;
2976   unix_cli_main_t *cm = &unix_cli_main;
2977   unix_cli_file_t *cf;
2978   vlib_node_t *n;
2979
2980   cf = pool_elt_at_index (cm->cli_file_pool, cm->current_input_file_index);
2981   n = vlib_get_node (vm, cf->process_node_index);
2982
2983   vlib_cli_output (vm, "Terminal name:   %v\n", n->name);
2984   vlib_cli_output (vm, "Terminal mode:   %s\n", cf->line_mode ?
2985                    "line-by-line" : "char-by-char");
2986   vlib_cli_output (vm, "Terminal width:  %d\n", cf->width);
2987   vlib_cli_output (vm, "Terminal height: %d\n", cf->height);
2988   vlib_cli_output (vm, "ANSI capable:    %s\n",
2989                    cf->ansi_capable ? "yes" : "no");
2990   vlib_cli_output (vm, "History enabled: %s%s\n",
2991                    cf->has_history ? "yes" : "no", !cf->has_history
2992                    || cf->history_limit ? "" :
2993                    " (disabled by history limit)");
2994   if (cf->has_history)
2995     vlib_cli_output (vm, "History limit:   %d\n", cf->history_limit);
2996   vlib_cli_output (vm, "Pager enabled:   %s%s%s\n",
2997                    cf->no_pager ? "no" : "yes",
2998                    cf->no_pager
2999                    || cf->height ? "" : " (disabled by terminal height)",
3000                    cf->no_pager
3001                    || um->cli_pager_buffer_limit ? "" :
3002                    " (disabled by buffer limit)");
3003   if (!cf->no_pager)
3004     vlib_cli_output (vm, "Pager limit:     %d\n", um->cli_pager_buffer_limit);
3005   vlib_cli_output (vm, "CRLF mode:       %s\n",
3006                    cf->crlf_mode ? "CR+LF" : "LF");
3007
3008   return 0;
3009 }
3010
3011 /*?
3012  * Displays various information about the state of the current terminal
3013  * session.
3014  *
3015  * @cliexpar
3016  * @cliexstart{show terminal}
3017  * Terminal name:   unix-cli-stdin
3018  * Terminal mode:   char-by-char
3019  * Terminal width:  123
3020  * Terminal height: 48
3021  * ANSI capable:    yes
3022  * History enabled: yes
3023  * History limit:   50
3024  * Pager enabled:   yes
3025  * Pager limit:     100000
3026  * CRLF mode:       LF
3027  * @cliexend
3028 ?*/
3029 /* *INDENT-OFF* */
3030 VLIB_CLI_COMMAND (cli_unix_cli_show_terminal, static) = {
3031   .path = "show terminal",
3032   .short_help = "Show current session terminal settings",
3033   .function = unix_cli_show_terminal,
3034 };
3035 /* *INDENT-ON* */
3036
3037 /** CLI command to set terminal pager settings. */
3038 static clib_error_t *
3039 unix_cli_set_terminal_pager (vlib_main_t * vm,
3040                              unformat_input_t * input,
3041                              vlib_cli_command_t * cmd)
3042 {
3043   unix_main_t *um = &unix_main;
3044   unix_cli_main_t *cm = &unix_cli_main;
3045   unix_cli_file_t *cf;
3046   unformat_input_t _line_input, *line_input = &_line_input;
3047   clib_error_t *error = 0;
3048
3049   if (!unformat_user (input, unformat_line_input, line_input))
3050     return 0;
3051
3052   cf = pool_elt_at_index (cm->cli_file_pool, cm->current_input_file_index);
3053
3054   while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
3055     {
3056       if (unformat (line_input, "on"))
3057         cf->no_pager = 0;
3058       else if (unformat (line_input, "off"))
3059         cf->no_pager = 1;
3060       else if (unformat (line_input, "limit %u", &um->cli_pager_buffer_limit))
3061         vlib_cli_output (vm,
3062                          "Pager limit set to %u lines; note, this is global.\n",
3063                          um->cli_pager_buffer_limit);
3064       else
3065         {
3066           error = clib_error_return (0, "unknown parameter: `%U`",
3067                                      format_unformat_error, line_input);
3068           goto done;
3069         }
3070     }
3071
3072 done:
3073   unformat_free (line_input);
3074
3075   return error;
3076 }
3077
3078 /*?
3079  * Enables or disables the terminal pager for this session. Generally
3080  * this defaults to enabled.
3081  *
3082  * Additionally allows the pager buffer size to be set; though note that
3083  * this value is set globally and not per session.
3084 ?*/
3085 /* *INDENT-OFF* */
3086 VLIB_CLI_COMMAND (cli_unix_cli_set_terminal_pager, static) = {
3087   .path = "set terminal pager",
3088   .short_help = "set terminal pager [on|off] [limit <lines>]",
3089   .function = unix_cli_set_terminal_pager,
3090 };
3091 /* *INDENT-ON* */
3092
3093 /** CLI command to set terminal history settings. */
3094 static clib_error_t *
3095 unix_cli_set_terminal_history (vlib_main_t * vm,
3096                                unformat_input_t * input,
3097                                vlib_cli_command_t * cmd)
3098 {
3099   unix_cli_main_t *cm = &unix_cli_main;
3100   unix_cli_file_t *cf;
3101   unformat_input_t _line_input, *line_input = &_line_input;
3102   u32 limit;
3103   clib_error_t *error = 0;
3104
3105   if (!unformat_user (input, unformat_line_input, line_input))
3106     return 0;
3107
3108   cf = pool_elt_at_index (cm->cli_file_pool, cm->current_input_file_index);
3109
3110   while (unformat_check_input (line_input) != UNFORMAT_END_OF_INPUT)
3111     {
3112       if (unformat (line_input, "on"))
3113         cf->has_history = 1;
3114       else if (unformat (line_input, "off"))
3115         cf->has_history = 0;
3116       else if (unformat (line_input, "limit %u", &cf->history_limit))
3117         ;
3118       else
3119         {
3120           error = clib_error_return (0, "unknown parameter: `%U`",
3121                                      format_unformat_error, line_input);
3122           goto done;
3123         }
3124
3125       /* If we reduced history size, or turned it off, purge the history */
3126       limit = cf->has_history ? cf->history_limit : 0;
3127
3128       while (cf->command_history && vec_len (cf->command_history) >= limit)
3129         {
3130           vec_free (cf->command_history[0]);
3131           vec_delete (cf->command_history, 1, 0);
3132         }
3133     }
3134
3135 done:
3136   unformat_free (line_input);
3137
3138   return error;
3139 }
3140
3141 /*?
3142  * Enables or disables the command history function of the current
3143  * terminal. Generally this defaults to enabled.
3144  *
3145  * This command also allows the maximum size of the history buffer for
3146  * this session to be altered.
3147 ?*/
3148 /* *INDENT-OFF* */
3149 VLIB_CLI_COMMAND (cli_unix_cli_set_terminal_history, static) = {
3150   .path = "set terminal history",
3151   .short_help = "set terminal history [on|off] [limit <lines>]",
3152   .function = unix_cli_set_terminal_history,
3153 };
3154 /* *INDENT-ON* */
3155
3156 /** CLI command to set terminal ANSI settings. */
3157 static clib_error_t *
3158 unix_cli_set_terminal_ansi (vlib_main_t * vm,
3159                             unformat_input_t * input,
3160                             vlib_cli_command_t * cmd)
3161 {
3162   unix_cli_main_t *cm = &unix_cli_main;
3163   unix_cli_file_t *cf;
3164
3165   cf = pool_elt_at_index (cm->cli_file_pool, cm->current_input_file_index);
3166
3167   if (unformat (input, "on"))
3168     cf->ansi_capable = 1;
3169   else if (unformat (input, "off"))
3170     cf->ansi_capable = 0;
3171   else
3172     return clib_error_return (0, "unknown parameter: `%U`",
3173                               format_unformat_error, input);
3174
3175   return 0;
3176 }
3177
3178 /*?
3179  * Enables or disables the use of ANSI control sequences by this terminal.
3180  * The default will vary based on terminal detection at the start of the
3181  * session.
3182  *
3183  * ANSI control sequences are used in a small number of places to provide,
3184  * for example, color text output and to control the cursor in the pager.
3185 ?*/
3186 /* *INDENT-OFF* */
3187 VLIB_CLI_COMMAND (cli_unix_cli_set_terminal_ansi, static) = {
3188   .path = "set terminal ansi",
3189   .short_help = "set terminal ansi [on|off]",
3190   .function = unix_cli_set_terminal_ansi,
3191 };
3192 /* *INDENT-ON* */
3193
3194 static clib_error_t *
3195 unix_cli_init (vlib_main_t * vm)
3196 {
3197   return 0;
3198 }
3199
3200 VLIB_INIT_FUNCTION (unix_cli_init);
3201
3202 /*
3203  * fd.io coding-style-patch-verification: ON
3204  *
3205  * Local Variables:
3206  * eval: (c-set-style "gnu")
3207  * End:
3208  */