Initial revision
[external/binutils.git] / readline / funmap.c
1 /* funmap.c -- attach names to functions. */
2
3 /* Copyright (C) 1988,1989 Free Software Foundation, Inc.
4
5    This file is part of GNU Readline, a library for reading lines
6    of text with interactive input and history editing.
7
8    Readline is free software; you can redistribute it and/or modify it
9    under the terms of the GNU General Public License as published by the
10    Free Software Foundation; either version 1, or (at your option) any
11    later version.
12
13    Readline is distributed in the hope that it will be useful, but
14    WITHOUT ANY WARRANTY; without even the implied warranty of
15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
16    General Public License for more details.
17
18    You should have received a copy of the GNU General Public License
19    along with Readline; see the file COPYING.  If not, write to the Free
20    Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */
21
22 #define STATIC_MALLOC
23 #ifndef STATIC_MALLOC
24 extern char *xmalloc (), *xrealloc ();
25 #else
26 static char *xmalloc (), *xrealloc ();
27 #endif
28
29 #ifndef FILE
30 #include <stdio.h>
31 #endif /* FILE */
32
33 #include "readline.h"
34
35 FUNMAP **funmap = (FUNMAP **)NULL;
36 static int funmap_size = 0;
37 static int funmap_entry = 0;
38
39 static FUNMAP default_funmap[] = {
40   { "beginning-of-line", rl_beg_of_line },
41   { "backward-char", rl_backward },
42   { "delete-char", rl_delete },
43   { "end-of-line", rl_end_of_line },
44   { "forward-char", rl_forward },
45   { "accept-line", rl_newline },
46   { "kill-line", rl_kill_line },
47   { "clear-screen", rl_clear_screen },
48   { "next-history", rl_get_next_history },
49   { "previous-history", rl_get_previous_history },
50   { "quoted-insert", rl_quoted_insert },
51   { "reverse-search-history", rl_reverse_search_history },
52   { "forward-search-history", rl_forward_search_history },
53   { "transpose-chars", rl_transpose_chars },
54   { "unix-line-discard", rl_unix_line_discard },
55   { "unix-word-rubout", rl_unix_word_rubout },
56   { "yank", rl_yank },
57   { "yank-pop", rl_yank_pop },
58   { "yank-nth-arg", rl_yank_nth_arg },
59   { "backward-delete-char", rl_rubout },
60   { "backward-word", rl_backward_word },
61   { "kill-word", rl_kill_word },
62   { "forward-word", rl_forward_word },
63   { "tab-insert", rl_tab_insert },
64   { "backward-kill-word", rl_backward_kill_word },
65   { "backward-kill-line", rl_backward_kill_line },
66   { "transpose-words", rl_transpose_words },
67   { "digit-argument", rl_digit_argument },
68   { "complete", rl_complete },
69   { "possible-completions", rl_possible_completions },
70   { "do-lowercase-version", rl_do_lowercase_version },
71   { "digit-argument", rl_digit_argument },
72   { "universal-argument", rl_universal_argument },
73   { "abort", rl_abort },
74   { "undo", rl_undo_command },
75   { "upcase-word", rl_upcase_word },
76   { "downcase-word", rl_downcase_word },
77   { "capitalize-word", rl_capitalize_word },
78   { "revert-line", rl_revert_line },
79   { "beginning-of-history", rl_beginning_of_history },
80   { "end-of-history", rl_end_of_history },
81   { "self-insert", rl_insert },
82   { "start-kbd-macro", rl_start_kbd_macro },
83   { "end-kbd-macro", rl_end_kbd_macro },
84   { "re-read-init-file", rl_re_read_init_file },
85 #ifdef VI_MODE
86   { "vi-movement-mode", rl_vi_movement_mode },
87   { "vi-insertion-mode", rl_vi_insertion_mode },
88   { "vi-arg-digit", rl_vi_arg_digit },
89   { "vi-prev-word", rl_vi_prev_word },
90   { "vi-next-word", rl_vi_next_word },
91   { "vi-char-search", rl_vi_char_search },
92   { "vi-editing-mode", rl_vi_editing_mode },
93   { "vi-eof-maybe", rl_vi_eof_maybe },
94   { "vi-append-mode", rl_vi_append_mode },
95   { "vi-put", rl_vi_put },
96   { "vi-append-eol", rl_vi_append_eol },
97   { "vi-insert-beg", rl_vi_insert_beg },
98   { "vi-delete", rl_vi_delete },
99   { "vi-comment", rl_vi_comment },
100   { "vi-first-print", rl_vi_first_print },
101   { "vi-fword", rl_vi_fword },
102   { "vi-fWord", rl_vi_fWord },
103   { "vi-bword", rl_vi_bword },
104   { "vi-bWord", rl_vi_bWord },
105   { "vi-eword", rl_vi_eword },
106   { "vi-eWord", rl_vi_eWord },
107   { "vi-end-word", rl_vi_end_word },
108   { "vi-change-case", rl_vi_change_case },
109   { "vi-match", rl_vi_match },
110   { "vi-bracktype", rl_vi_bracktype },
111   { "vi-change-char", rl_vi_change_char },
112   { "vi-yank-arg", rl_vi_yank_arg },
113   { "vi-search", rl_vi_search },
114   { "vi-search-again", rl_vi_search_again },
115   { "vi-dosearch", rl_vi_dosearch },
116   { "vi-subst", rl_vi_subst },
117   { "vi-overstrike", rl_vi_overstrike },
118   { "vi-overstrike-delete", rl_vi_overstrike_delete },
119   { "vi-replace, ", rl_vi_replace },
120   { "vi-column", rl_vi_column },
121   { "vi-delete-to", rl_vi_delete_to },
122   { "vi-change-to", rl_vi_change_to },
123   { "vi-yank-to", rl_vi_yank_to },
124   { "vi-complete", rl_vi_complete },
125 #endif /* VI_MODE */
126
127  {(char *)NULL, (Function *)NULL }
128 };
129
130 rl_add_funmap_entry (name, function)
131      char *name;
132      Function *function;
133 {
134   if (funmap_entry + 2 >= funmap_size)
135     if (!funmap)
136       funmap = (FUNMAP **)xmalloc ((funmap_size = 80) * sizeof (FUNMAP *));
137     else
138       funmap =
139         (FUNMAP **)xrealloc (funmap, (funmap_size += 80) * sizeof (FUNMAP *));
140   
141   funmap[funmap_entry] = (FUNMAP *)xmalloc (sizeof (FUNMAP));
142   funmap[funmap_entry]->name = name;
143   funmap[funmap_entry]->function = function;
144
145   funmap[++funmap_entry] = (FUNMAP *)NULL;
146 }
147
148 static int funmap_initialized = 0;
149
150 /* Make the funmap contain all of the default entries. */
151 rl_initialize_funmap ()
152 {
153   register int i;
154
155   if (funmap_initialized)
156     return;
157
158   for (i = 0; default_funmap[i].name; i++)
159     rl_add_funmap_entry (default_funmap[i].name, default_funmap[i].function);
160
161   funmap_initialized = 1;
162 }
163
164 /* Things that mean `Control'. */
165 char *possible_control_prefixes[] = {
166   "Control-", "C-", "CTRL-", (char *)NULL
167 };
168
169 char *possible_meta_prefixes[] = {
170   "Meta", "M-", (char *)NULL
171 };
172
173 #ifdef STATIC_MALLOC
174 \f
175 /* **************************************************************** */
176 /*                                                                  */
177 /*                      xmalloc and xrealloc ()                     */
178 /*                                                                  */
179 /* **************************************************************** */
180
181 static void memory_error_and_abort ();
182
183 static char *
184 xmalloc (bytes)
185      int bytes;
186 {
187   char *temp = (char *)malloc (bytes);
188
189   if (!temp)
190     memory_error_and_abort ();
191   return (temp);
192 }
193
194 static char *
195 xrealloc (pointer, bytes)
196      char *pointer;
197      int bytes;
198 {
199   char *temp = (char *)realloc (pointer, bytes);
200
201   if (!temp)
202     memory_error_and_abort ();
203   return (temp);
204 }
205
206 static void
207 memory_error_and_abort ()
208 {
209   fprintf (stderr, "history: Out of virtual memory!\n");
210   abort ();
211 }
212 #endif /* STATIC_MALLOC */