contrib/libreadline/examples/histexamp.c

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