lib/readline/funmap.c

   1 /* funmap.c -- attach names to functions. */
   2
   3 /* Copyright (C) 1987-2010 Free Software Foundation, Inc.
   4
   5    This file is part of the GNU Readline Library (Readline), a library
   6    for 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 #define READLINE_LIBRARY
  23
  24 #if defined (HAVE_CONFIG_H)
  25 #  include <config.h>
  26 #endif
  27
  28 #if !defined (BUFSIZ)
  29 #include <stdio.h>
  30 #endif /* BUFSIZ */
  31
  32 #if defined (HAVE_STDLIB_H)
  33 #  include <stdlib.h>
  34 #else
  35 #  include "ansi_stdlib.h"
  36 #endif /* HAVE_STDLIB_H */
  37
  38 #include "rlconf.h"
  39 #include "readline.h"
  40
  41 #include "xmalloc.h"
  42
  43 #ifdef __STDC__
  44 typedef int QSFUNC (const void *, const void *);
  45 #else
  46 typedef int QSFUNC ();
  47 #endif
  48
  49 extern int _rl_qsort_string_compare PARAMS((char **, char **));
  50
  51 FUNMAP **funmap;
  52 static int funmap_size;
  53 static int funmap_entry;
  54
  55 /* After initializing the function map, this is the index of the first
  56    program specific function. */
  57 int funmap_program_specific_entry_start;
  58
  59 static const FUNMAP default_funmap[] = {
  60   { "abort", rl_abort },
  61   { "accept-line", rl_newline },
  62   { "arrow-key-prefix", rl_arrow_keys },
  63   { "backward-byte", rl_backward_byte },
  64   { "backward-char", rl_backward_char },
  65   { "backward-delete-char", rl_rubout },
  66   { "backward-kill-line", rl_backward_kill_line },
  67   { "backward-kill-word", rl_backward_kill_word },
  68   { "backward-word", rl_backward_word },
  69   { "beginning-of-history", rl_beginning_of_history },
  70   { "beginning-of-line", rl_beg_of_line },
  71   { "call-last-kbd-macro", rl_call_last_kbd_macro },
  72   { "capitalize-word", rl_capitalize_word },
  73   { "character-search", rl_char_search },
  74   { "character-search-backward", rl_backward_char_search },
  75   { "clear-screen", rl_clear_screen },
  76   { "complete", rl_complete },
  77   { "copy-backward-word", rl_copy_backward_word },
  78   { "copy-forward-word", rl_copy_forward_word },
  79   { "copy-region-as-kill", rl_copy_region_to_kill },
  80   { "delete-char", rl_delete },
  81   { "delete-char-or-list", rl_delete_or_show_completions },
  82   { "delete-horizontal-space", rl_delete_horizontal_space },
  83   { "digit-argument", rl_digit_argument },
  84   { "do-lowercase-version", rl_do_lowercase_version },
  85   { "downcase-word", rl_downcase_word },
  86   { "dump-functions", rl_dump_functions },
  87   { "dump-macros", rl_dump_macros },
  88   { "dump-variables", rl_dump_variables },
  89   { "emacs-editing-mode", rl_emacs_editing_mode },
  90   { "end-kbd-macro", rl_end_kbd_macro },
  91   { "end-of-history", rl_end_of_history },
  92   { "end-of-line", rl_end_of_line },
  93   { "exchange-point-and-mark", rl_exchange_point_and_mark },
  94   { "forward-backward-delete-char", rl_rubout_or_delete },
  95   { "forward-byte", rl_forward_byte },
  96   { "forward-char", rl_forward_char },
  97   { "forward-search-history", rl_forward_search_history },
  98   { "forward-word", rl_forward_word },
  99   { "history-search-backward", rl_history_search_backward },
 100   { "history-search-forward", rl_history_search_forward },
 101   { "history-substring-search-backward", rl_history_substr_search_backward },
 102   { "history-substring-search-forward", rl_history_substr_search_forward },
 103   { "insert-comment", rl_insert_comment },
 104   { "insert-completions", rl_insert_completions },
 105   { "kill-whole-line", rl_kill_full_line },
 106   { "kill-line", rl_kill_line },
 107   { "kill-region", rl_kill_region },
 108   { "kill-word", rl_kill_word },
 109   { "menu-complete", rl_menu_complete },
 110   { "menu-complete-backward", rl_backward_menu_complete },
 111   { "next-history", rl_get_next_history },
 112   { "non-incremental-forward-search-history", rl_noninc_forward_search },
 113   { "non-incremental-reverse-search-history", rl_noninc_reverse_search },
 114   { "non-incremental-forward-search-history-again", rl_noninc_forward_search_again },
 115   { "non-incremental-reverse-search-history-again", rl_noninc_reverse_search_again },
 116   { "old-menu-complete", rl_old_menu_complete },
 117   { "overwrite-mode", rl_overwrite_mode },
 118 #ifdef __CYGWIN__
 119   { "paste-from-clipboard", rl_paste_from_clipboard },
 120 #endif
 121   { "possible-completions", rl_possible_completions },
 122   { "previous-history", rl_get_previous_history },
 123   { "print-last-kbd-macro", rl_print_last_kbd_macro },
 124   { "quoted-insert", rl_quoted_insert },
 125   { "re-read-init-file", rl_re_read_init_file },
 126   { "redraw-current-line", rl_refresh_line},
 127   { "reverse-search-history", rl_reverse_search_history },
 128   { "revert-line", rl_revert_line },
 129   { "self-insert", rl_insert },
 130   { "set-mark", rl_set_mark },
 131   { "skip-csi-sequence", rl_skip_csi_sequence },
 132   { "start-kbd-macro", rl_start_kbd_macro },
 133   { "tab-insert", rl_tab_insert },
 134   { "tilde-expand", rl_tilde_expand },
 135   { "transpose-chars", rl_transpose_chars },
 136   { "transpose-words", rl_transpose_words },
 137   { "tty-status", rl_tty_status },
 138   { "undo", rl_undo_command },
 139   { "universal-argument", rl_universal_argument },
 140   { "unix-filename-rubout", rl_unix_filename_rubout },
 141   { "unix-line-discard", rl_unix_line_discard },
 142   { "unix-word-rubout", rl_unix_word_rubout },
 143   { "upcase-word", rl_upcase_word },
 144   { "yank", rl_yank },
 145   { "yank-last-arg", rl_yank_last_arg },
 146   { "yank-nth-arg", rl_yank_nth_arg },
 147   { "yank-pop", rl_yank_pop },
 148
 149 #if defined (VI_MODE)
 150   { "vi-append-eol", rl_vi_append_eol },
 151   { "vi-append-mode", rl_vi_append_mode },
 152   { "vi-arg-digit", rl_vi_arg_digit },
 153   { "vi-back-to-indent", rl_vi_back_to_indent },
 154   { "vi-backward-bigword", rl_vi_bWord },
 155   { "vi-backward-word", rl_vi_bword },
 156   { "vi-bWord", rl_vi_bWord },
 157   { "vi-bword", rl_vi_bword },
 158   { "vi-change-case", rl_vi_change_case },
 159   { "vi-change-char", rl_vi_change_char },
 160   { "vi-change-to", rl_vi_change_to },
 161   { "vi-char-search", rl_vi_char_search },
 162   { "vi-column", rl_vi_column },
 163   { "vi-complete", rl_vi_complete },
 164   { "vi-delete", rl_vi_delete },
 165   { "vi-delete-to", rl_vi_delete_to },
 166   { "vi-eWord", rl_vi_eWord },
 167   { "vi-editing-mode", rl_vi_editing_mode },
 168   { "vi-end-bigword", rl_vi_eWord },
 169   { "vi-end-word", rl_vi_end_word },
 170   { "vi-eof-maybe", rl_vi_eof_maybe },
 171   { "vi-eword", rl_vi_eword },
 172   { "vi-fWord", rl_vi_fWord },
 173   { "vi-fetch-history", rl_vi_fetch_history },
 174   { "vi-first-print", rl_vi_first_print },
 175   { "vi-forward-bigword", rl_vi_fWord },
 176   { "vi-forward-word", rl_vi_fword },
 177   { "vi-fword", rl_vi_fword },
 178   { "vi-goto-mark", rl_vi_goto_mark },
 179   { "vi-insert-beg", rl_vi_insert_beg },
 180   { "vi-insertion-mode", rl_vi_insertion_mode },
 181   { "vi-match", rl_vi_match },
 182   { "vi-movement-mode", rl_vi_movement_mode },
 183   { "vi-next-word", rl_vi_next_word },
 184   { "vi-overstrike", rl_vi_overstrike },
 185   { "vi-overstrike-delete", rl_vi_overstrike_delete },
 186   { "vi-prev-word", rl_vi_prev_word },
 187   { "vi-put", rl_vi_put },
 188   { "vi-redo", rl_vi_redo },
 189   { "vi-replace", rl_vi_replace },
 190   { "vi-rubout", rl_vi_rubout },
 191   { "vi-search", rl_vi_search },
 192   { "vi-search-again", rl_vi_search_again },
 193   { "vi-set-mark", rl_vi_set_mark },
 194   { "vi-subst", rl_vi_subst },
 195   { "vi-tilde-expand", rl_vi_tilde_expand },
 196   { "vi-yank-arg", rl_vi_yank_arg },
 197   { "vi-yank-to", rl_vi_yank_to },
 198 #endif /* VI_MODE */
 199
 200  {(char *)NULL, (rl_command_func_t *)NULL }
 201 };
 202
 203 int
 204 rl_add_funmap_entry (name, function)
 205      const char *name;
 206      rl_command_func_t *function;
 207 {
 208   if (funmap_entry + 2 >= funmap_size)
 209     {
 210       funmap_size += 64;
 211       funmap = (FUNMAP **)xrealloc (funmap, funmap_size * sizeof (FUNMAP *));
 212     }
 213
 214   funmap[funmap_entry] = (FUNMAP *)xmalloc (sizeof (FUNMAP));
 215   funmap[funmap_entry]->name = name;
 216   funmap[funmap_entry]->function = function;
 217
 218   funmap[++funmap_entry] = (FUNMAP *)NULL;
 219   return funmap_entry;
 220 }
 221
 222 static int funmap_initialized;
 223
 224 /* Make the funmap contain all of the default entries. */
 225 void
 226 rl_initialize_funmap ()
 227 {
 228   register int i;
 229
 230   if (funmap_initialized)
 231     return;
 232
 233   for (i = 0; default_funmap[i].name; i++)
 234     rl_add_funmap_entry (default_funmap[i].name, default_funmap[i].function);
 235
 236   funmap_initialized = 1;
 237   funmap_program_specific_entry_start = i;
 238 }
 239
 240 /* Produce a NULL terminated array of known function names.  The array
 241    is sorted.  The array itself is allocated, but not the strings inside.
 242    You should free () the array when you done, but not the pointers. */
 243 const char **
 244 rl_funmap_names ()
 245 {
 246   const char **result;
 247   int result_size, result_index;
 248
 249   /* Make sure that the function map has been initialized. */
 250   rl_initialize_funmap ();
 251
 252   for (result_index = result_size = 0, result = (const char **)NULL; funmap[result_index]; result_index++)
 253     {
 254       if (result_index + 2 > result_size)
 255         {
 256           result_size += 20;
 257           result = (const char **)xrealloc (result, result_size * sizeof (char *));
 258         }
 259
 260       result[result_index] = funmap[result_index]->name;
 261       result[result_index + 1] = (char *)NULL;
 262     }
 263
 264   qsort (result, result_index, sizeof (char *), (QSFUNC *)_rl_qsort_string_compare);
 265   return (result);
 266 }