readline/readline/examples/histexamp.c

   1 /* histexamp.c - history library example program. */
   2
   3 /* Copyright (C) 1987-2009 Free Software Foundation, Inc.
   4
   5    This file is part of the GNU Readline Library (Readline), a library for
   6    reading lines of text with interactive input and history editing.
   7
   8    Readline is free software: you can redistribute it and/or modify
   9    it under the terms of the GNU General Public License as published by
  10    the Free Software Foundation, either version 3 of the License, or
  11    (at your option) any later version.
  12
  13    Readline is distributed in the hope that it will be useful,
  14    but WITHOUT ANY WARRANTY; without even the implied warranty of
  15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16    GNU General Public License for more details.
  17
  18    You should have received a copy of the GNU General Public License
  19    along with Readline.  If not, see <http://www.gnu.org/licenses/>.
  20 */
  21
  22 #include <stdio.h>
  23
  24 #ifdef READLINE_LIBRARY
  25 #  include "history.h"
  26 #else
  27 #  include <readline/history.h>
  28 #endif
  29
  30 #include <unistd.h>
  31 #include <stdlib.h>
  32 #include <string.h>
  33
  34 int
  35 main (argc, argv)
  36      int argc;
  37      char **argv;
  38 {
  39   char line[1024], *t;
  40   int len, done;
  41
  42   line[0] = 0;
  43   done = 0;
  44
  45   using_history ();
  46   while (!done)
  47     {
  48       printf ("history$ ");
  49       fflush (stdout);
  50       t = fgets (line, sizeof (line) - 1, stdin);
  51       if (t && *t)
  52         {
  53           len = strlen (t);
  54           if (t[len - 1] == '\n')
  55             t[len - 1] = '\0';
  56         }
  57
  58       if (!t)
  59         strcpy (line, "quit");
  60
  61       if (line[0])
  62         {
  63           char *expansion;
  64           int result;
  65
  66           using_history ();
  67
  68           result = history_expand (line, &expansion);
  69           if (result)
  70             fprintf (stderr, "%s\n", expansion);
  71
  72           if (result < 0 || result == 2)
  73             {
  74               free (expansion);
  75               continue;
  76             }
  77
  78           add_history (expansion);
  79           strncpy (line, expansion, sizeof (line) - 1);
  80           free (expansion);
  81         }
  82
  83       if (strcmp (line, "quit") == 0)
  84         done = 1;
  85       else if (strcmp (line, "save") == 0)
  86         write_history ("history_file");
  87       else if (strcmp (line, "read") == 0)
  88         read_history ("history_file");
  89       else if (strcmp (line, "list") == 0)
  90         {
  91           register HIST_ENTRY **the_list;
  92           register int i;
  93           time_t tt;
  94           char timestr[128];
  95
  96           the_list = history_list ();
  97           if (the_list)
  98             for (i = 0; the_list[i]; i++)
  99               {
 100                 tt = history_get_time (the_list[i]);
 101                 if (tt)
 102                   strftime (timestr, sizeof (timestr), "%a %R", localtime(&tt));
 103                 else
 104                   strcpy (timestr, "??");
 105                 printf ("%d: %s: %s\n", i + history_base, timestr, the_list[i]->line);
 106               }
 107         }
 108       else if (strncmp (line, "delete", 6) == 0)
 109         {
 110           int which;
 111           if ((sscanf (line + 6, "%d", &which)) == 1)
 112             {
 113               HIST_ENTRY *entry = remove_history (which);
 114               if (!entry)
 115                 fprintf (stderr, "No such entry %d\n", which);
 116               else
 117                 {
 118                   free (entry->line);
 119                   free (entry);
 120                 }
 121             }
 122           else
 123             {
 124               fprintf (stderr, "non-numeric arg given to `delete'\n");
 125             }
 126         }
 127     }
 128 }