jim-history.c

   1 #include <stdlib.h>
   2 #include <string.h>
   3 #include <stdio.h>
   4
   5 #include "jim.h"
   6 #include "jimautoconf.h"
   7 #include "jim-subcmd.h"
   8
   9 static int history_cmd_getline(Jim_Interp *interp, int argc, Jim_Obj *const *argv)
  10 {
  11     Jim_Obj *objPtr;
  12     char *line = Jim_HistoryGetline(interp, Jim_String(argv[0]));
  13
  14     /* On EOF returns -1 if varName was specified; otherwise the empty string. */
  15     if (line == NULL) {
  16         if (argc == 2) {
  17             Jim_SetResultInt(interp, -1);
  18         }
  19         return JIM_OK;
  20     }
  21
  22     objPtr = Jim_NewStringObjNoAlloc(interp, line, -1);
  23
  24     /* Returns the length of the string if varName was specified */
  25     if (argc == 2) {
  26         if (Jim_SetVariable(interp, argv[1], objPtr) != JIM_OK) {
  27             Jim_FreeNewObj(interp, objPtr);
  28             return JIM_ERR;
  29         }
  30         Jim_SetResultInt(interp, Jim_Length(objPtr));
  31     }
  32     else {
  33         Jim_SetResult(interp, objPtr);
  34     }
  35     return JIM_OK;
  36 }
  37
  38 static int history_cmd_setcompletion(Jim_Interp *interp, int argc, Jim_Obj *const *argv)
  39 {
  40     Jim_HistorySetCompletion(interp, Jim_Length(argv[0]) ? argv[0] : NULL);
  41     return JIM_OK;
  42 }
  43
  44 static int history_cmd_load(Jim_Interp *interp, int argc, Jim_Obj *const *argv)
  45 {
  46     Jim_HistoryLoad(Jim_String(argv[0]));
  47     return JIM_OK;
  48 }
  49
  50 static int history_cmd_save(Jim_Interp *interp, int argc, Jim_Obj *const *argv)
  51 {
  52     Jim_HistorySave(Jim_String(argv[0]));
  53     return JIM_OK;
  54 }
  55
  56 static int history_cmd_add(Jim_Interp *interp, int argc, Jim_Obj *const *argv)
  57 {
  58     Jim_HistoryAdd(Jim_String(argv[0]));
  59     return JIM_OK;
  60 }
  61
  62 static int history_cmd_show(Jim_Interp *interp, int argc, Jim_Obj *const *argv)
  63 {
  64     Jim_HistoryShow();
  65     return JIM_OK;
  66 }
  67
  68 static const jim_subcmd_type history_command_table[] = {
  69     {   "getline",
  70         "prompt ?varname?",
  71         history_cmd_getline,
  72         1,
  73         2,
  74         /* Description: Reads one line from the user. Similar to gets. */
  75     },
  76     {   "completion",
  77         "command",
  78         history_cmd_setcompletion,
  79         1,
  80         1,
  81         /* Description: Sets an autocompletion callback command, or none if "" */
  82     },
  83     {   "load",
  84         "filename",
  85         history_cmd_load,
  86         1,
  87         1,
  88         /* Description: Loads history from the given file, if possible */
  89     },
  90     {   "save",
  91         "filename",
  92         history_cmd_save,
  93         1,
  94         1,
  95         /* Description: Saves history to the given file */
  96     },
  97     {   "add",
  98         "line",
  99         history_cmd_add,
 100         1,
 101         1,
 102         /* Description: Adds the line to the history ands saves */
 103     },
 104     {   "show",
 105         NULL,
 106         history_cmd_show,
 107         0,
 108         0,
 109         /* Description: Displays the history */
 110     },
 111     { NULL }
 112 };
 113
 114 static int JimHistorySubCmdProc(Jim_Interp *interp, int argc, Jim_Obj *const *argv)
 115 {
 116     return Jim_CallSubCmd(interp, Jim_ParseSubCmd(interp, history_command_table, argc, argv), argc, argv);
 117 }
 118
 119 static void JimHistoryDelProc(Jim_Interp *interp, void *privData)
 120 {
 121     Jim_Free(privData);
 122 }
 123
 124 int Jim_historyInit(Jim_Interp *interp)
 125 {
 126     void **history;
 127     if (Jim_PackageProvide(interp, "history", "1.0", JIM_ERRMSG))
 128         return JIM_ERR;
 129
 130     history = Jim_Alloc(sizeof(*history));
 131     *history = NULL;
 132
 133     Jim_CreateCommand(interp, "history", JimHistorySubCmdProc, history, JimHistoryDelProc);
 134     return JIM_OK;
 135 }