1999-04-16 09:34:55 +08:00
|
|
|
/* keymaps.c -- Functions and keymaps for the GNU Readline library. */
|
|
|
|
|
|
|
|
/* Copyright (C) 1988,1989 Free Software Foundation, Inc.
|
|
|
|
|
|
|
|
This file is part of GNU Readline, a library for reading lines
|
|
|
|
of text with interactive input and history editing.
|
|
|
|
|
|
|
|
Readline is free software; you can redistribute it and/or modify it
|
|
|
|
under the terms of the GNU General Public License as published by the
|
readline:
2000-07-09 Elena Zannoni <ezannoni@kwikemart.cygnus.com>
* Import of readline 4.1.
Locally modified files: Makefile.in, configure.in, configure
(regenerated), config.h.in (regenerated), readline.h, rltty.c,
shell.c signals.c.
Locally added files: acconfig.h, config/*, config.h.bot,
cross-build/*, doc/inc-hit.texinfo.
New files: USAGE, rlprivate.h, rlshell.h, xmalloc.h.
examples:
2000-07-09 Elena Zannoni <ezannoni@kwikemart.cygnus.com>
* Import of readline 4.1.
New files: excallback.c, rlfe.c.
doc:
2000-07-09 Elena Zannoni <ezannoni@kwikemart.cygnus.com>
* Import of readline 4.1.
Regenerated inc-hist.texinfo as copy of hsuser.texinfo, for
inclusion in the gdb manual.
New file: rluserman.texinfo
2000-07-10 01:20:00 +08:00
|
|
|
Free Software Foundation; either version 2, or (at your option) any
|
1999-04-16 09:34:55 +08:00
|
|
|
later version.
|
|
|
|
|
|
|
|
Readline is distributed in the hope that it will be useful, but
|
|
|
|
WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
|
|
General Public License for more details.
|
|
|
|
|
|
|
|
You should have received a copy of the GNU General Public License
|
|
|
|
along with Readline; see the file COPYING. If not, write to the Free
|
readline:
2000-07-09 Elena Zannoni <ezannoni@kwikemart.cygnus.com>
* Import of readline 4.1.
Locally modified files: Makefile.in, configure.in, configure
(regenerated), config.h.in (regenerated), readline.h, rltty.c,
shell.c signals.c.
Locally added files: acconfig.h, config/*, config.h.bot,
cross-build/*, doc/inc-hit.texinfo.
New files: USAGE, rlprivate.h, rlshell.h, xmalloc.h.
examples:
2000-07-09 Elena Zannoni <ezannoni@kwikemart.cygnus.com>
* Import of readline 4.1.
New files: excallback.c, rlfe.c.
doc:
2000-07-09 Elena Zannoni <ezannoni@kwikemart.cygnus.com>
* Import of readline 4.1.
Regenerated inc-hist.texinfo as copy of hsuser.texinfo, for
inclusion in the gdb manual.
New file: rluserman.texinfo
2000-07-10 01:20:00 +08:00
|
|
|
Software Foundation, 59 Temple Place, Suite 330, Boston, MA 02111 USA. */
|
1999-04-16 09:34:55 +08:00
|
|
|
#define READLINE_LIBRARY
|
|
|
|
|
|
|
|
#if defined (HAVE_CONFIG_H)
|
|
|
|
# include <config.h>
|
|
|
|
#endif
|
|
|
|
|
|
|
|
#if defined (HAVE_STDLIB_H)
|
|
|
|
# include <stdlib.h>
|
|
|
|
#else
|
|
|
|
# include "ansi_stdlib.h"
|
|
|
|
#endif /* HAVE_STDLIB_H */
|
|
|
|
|
readline:
2000-07-09 Elena Zannoni <ezannoni@kwikemart.cygnus.com>
* Import of readline 4.1.
Locally modified files: Makefile.in, configure.in, configure
(regenerated), config.h.in (regenerated), readline.h, rltty.c,
shell.c signals.c.
Locally added files: acconfig.h, config/*, config.h.bot,
cross-build/*, doc/inc-hit.texinfo.
New files: USAGE, rlprivate.h, rlshell.h, xmalloc.h.
examples:
2000-07-09 Elena Zannoni <ezannoni@kwikemart.cygnus.com>
* Import of readline 4.1.
New files: excallback.c, rlfe.c.
doc:
2000-07-09 Elena Zannoni <ezannoni@kwikemart.cygnus.com>
* Import of readline 4.1.
Regenerated inc-hist.texinfo as copy of hsuser.texinfo, for
inclusion in the gdb manual.
New file: rluserman.texinfo
2000-07-10 01:20:00 +08:00
|
|
|
#include <stdio.h> /* for FILE * definition for readline.h */
|
|
|
|
|
|
|
|
#include "readline.h"
|
1999-04-16 09:34:55 +08:00
|
|
|
#include "rlconf.h"
|
readline:
2000-07-09 Elena Zannoni <ezannoni@kwikemart.cygnus.com>
* Import of readline 4.1.
Locally modified files: Makefile.in, configure.in, configure
(regenerated), config.h.in (regenerated), readline.h, rltty.c,
shell.c signals.c.
Locally added files: acconfig.h, config/*, config.h.bot,
cross-build/*, doc/inc-hit.texinfo.
New files: USAGE, rlprivate.h, rlshell.h, xmalloc.h.
examples:
2000-07-09 Elena Zannoni <ezannoni@kwikemart.cygnus.com>
* Import of readline 4.1.
New files: excallback.c, rlfe.c.
doc:
2000-07-09 Elena Zannoni <ezannoni@kwikemart.cygnus.com>
* Import of readline 4.1.
Regenerated inc-hist.texinfo as copy of hsuser.texinfo, for
inclusion in the gdb manual.
New file: rluserman.texinfo
2000-07-10 01:20:00 +08:00
|
|
|
|
1999-04-16 09:34:55 +08:00
|
|
|
#include "emacs_keymap.c"
|
|
|
|
|
|
|
|
#if defined (VI_MODE)
|
|
|
|
#include "vi_keymap.c"
|
|
|
|
#endif
|
|
|
|
|
readline:
2000-07-09 Elena Zannoni <ezannoni@kwikemart.cygnus.com>
* Import of readline 4.1.
Locally modified files: Makefile.in, configure.in, configure
(regenerated), config.h.in (regenerated), readline.h, rltty.c,
shell.c signals.c.
Locally added files: acconfig.h, config/*, config.h.bot,
cross-build/*, doc/inc-hit.texinfo.
New files: USAGE, rlprivate.h, rlshell.h, xmalloc.h.
examples:
2000-07-09 Elena Zannoni <ezannoni@kwikemart.cygnus.com>
* Import of readline 4.1.
New files: excallback.c, rlfe.c.
doc:
2000-07-09 Elena Zannoni <ezannoni@kwikemart.cygnus.com>
* Import of readline 4.1.
Regenerated inc-hist.texinfo as copy of hsuser.texinfo, for
inclusion in the gdb manual.
New file: rluserman.texinfo
2000-07-10 01:20:00 +08:00
|
|
|
#include "xmalloc.h"
|
1999-04-16 09:34:55 +08:00
|
|
|
|
|
|
|
/* **************************************************************** */
|
|
|
|
/* */
|
|
|
|
/* Functions for manipulating Keymaps. */
|
|
|
|
/* */
|
|
|
|
/* **************************************************************** */
|
|
|
|
|
|
|
|
|
|
|
|
/* Return a new, empty keymap.
|
|
|
|
Free it with free() when you are done. */
|
|
|
|
Keymap
|
|
|
|
rl_make_bare_keymap ()
|
|
|
|
{
|
|
|
|
register int i;
|
|
|
|
Keymap keymap = (Keymap)xmalloc (KEYMAP_SIZE * sizeof (KEYMAP_ENTRY));
|
|
|
|
|
|
|
|
for (i = 0; i < KEYMAP_SIZE; i++)
|
|
|
|
{
|
|
|
|
keymap[i].type = ISFUNC;
|
Import of readline 4.3.
Non-readline modified files:
src/gdb/ChangeLog src/gdb/defs.h src/gdb/cli/cli-cmds.c
src/gdb/cli/cli-setshow.c src/gdb/tui/ChangeLog
src/gdb/tui/tuiWin.c
In readline directory:
* compat.c, mbutil.c, misc.c, rlmbutil.h, rltypedefs.h,
text.c, doc/history.0, doc/history.3, support/wcwidth.c,
examples/readlinebuf.h, examples/rlcat.c: New files.
* CHANGELOG, CHANGES, INSTALL, MANIFEST, Makefile.in, README,
aclocal.m4, ansi_stdlib.h, bind.c, callback.c, chardefs.h,
complete.c, config.h.in, configure, configure.in, display.c,
emacs_keymap.c, funmap.c, histexpand.c, histfile.c, histlib.h,
history.c, history.h, histsearch.c, input.c, isearch.c,
keymaps.c, keymaps.h, kill.c, macro.c, nls.c, parens.c,
posixdir.h, readline.c, readline.h, rlconf.h, rldefs.h,
rlprivate.h, rlshell.h, rlstdc.h, rltty.c, savestring.c,
search.c, shell.c, signals.c, terminal.c, tilde.c, tilde.h,
undo.c, util.c, vi_keymap.c, vi_mode.c, xmalloc.c, xmalloc.h,
doc/Makefile.in, doc/hist.texinfo, doc/hstech.texinfo,
doc/hsuser.texinfo, doc/manvers.texinfo, doc/readline.3,
doc/rlman.texinfo, doc/rltech.texinfo, doc/rluser.texinfo
doc/rluserman.texinfo, doc/texi2dvi, doc/texi2html,
shlib/Makefile.in, support/install.sh, support/mkdirs,
support/mkdist, support/shlib-install, support/shobj-conf,
examples/Inputrc, examples/Makefile.in, examples/fileman.c,
examples/histexamp.c, examples/manexamp.c, examples/rl.c,
examples/rlfe.c, examples/rltest.c, examples/rlversion.c:
Modified files.
2002-12-09 06:31:39 +08:00
|
|
|
keymap[i].function = (rl_command_func_t *)NULL;
|
1999-04-16 09:34:55 +08:00
|
|
|
}
|
|
|
|
|
2006-05-06 02:26:14 +08:00
|
|
|
#if 0
|
1999-04-16 09:34:55 +08:00
|
|
|
for (i = 'A'; i < ('Z' + 1); i++)
|
|
|
|
{
|
|
|
|
keymap[i].type = ISFUNC;
|
|
|
|
keymap[i].function = rl_do_lowercase_version;
|
|
|
|
}
|
2006-05-06 02:26:14 +08:00
|
|
|
#endif
|
1999-04-16 09:34:55 +08:00
|
|
|
|
|
|
|
return (keymap);
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Return a new keymap which is a copy of MAP. */
|
|
|
|
Keymap
|
|
|
|
rl_copy_keymap (map)
|
|
|
|
Keymap map;
|
|
|
|
{
|
|
|
|
register int i;
|
2006-05-06 02:26:14 +08:00
|
|
|
Keymap temp;
|
1999-04-16 09:34:55 +08:00
|
|
|
|
2006-05-06 02:26:14 +08:00
|
|
|
temp = rl_make_bare_keymap ();
|
1999-04-16 09:34:55 +08:00
|
|
|
for (i = 0; i < KEYMAP_SIZE; i++)
|
|
|
|
{
|
|
|
|
temp[i].type = map[i].type;
|
|
|
|
temp[i].function = map[i].function;
|
|
|
|
}
|
|
|
|
return (temp);
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Return a new keymap with the printing characters bound to rl_insert,
|
|
|
|
the uppercase Meta characters bound to run their lowercase equivalents,
|
|
|
|
and the Meta digits bound to produce numeric arguments. */
|
|
|
|
Keymap
|
|
|
|
rl_make_keymap ()
|
|
|
|
{
|
|
|
|
register int i;
|
|
|
|
Keymap newmap;
|
|
|
|
|
|
|
|
newmap = rl_make_bare_keymap ();
|
|
|
|
|
|
|
|
/* All ASCII printing characters are self-inserting. */
|
|
|
|
for (i = ' '; i < 127; i++)
|
|
|
|
newmap[i].function = rl_insert;
|
|
|
|
|
|
|
|
newmap[TAB].function = rl_insert;
|
|
|
|
newmap[RUBOUT].function = rl_rubout; /* RUBOUT == 127 */
|
|
|
|
newmap[CTRL('H')].function = rl_rubout;
|
|
|
|
|
|
|
|
#if KEYMAP_SIZE > 128
|
2006-05-06 02:26:14 +08:00
|
|
|
/* Printing characters in ISO Latin-1 and some 8-bit character sets. */
|
|
|
|
for (i = 128; i < 256; i++)
|
1999-04-16 09:34:55 +08:00
|
|
|
newmap[i].function = rl_insert;
|
|
|
|
#endif /* KEYMAP_SIZE > 128 */
|
|
|
|
|
|
|
|
return (newmap);
|
|
|
|
}
|
|
|
|
|
|
|
|
/* Free the storage associated with MAP. */
|
|
|
|
void
|
|
|
|
rl_discard_keymap (map)
|
1999-08-03 07:48:02 +08:00
|
|
|
Keymap map;
|
1999-04-16 09:34:55 +08:00
|
|
|
{
|
|
|
|
int i;
|
|
|
|
|
|
|
|
if (!map)
|
|
|
|
return;
|
|
|
|
|
|
|
|
for (i = 0; i < KEYMAP_SIZE; i++)
|
|
|
|
{
|
|
|
|
switch (map[i].type)
|
|
|
|
{
|
|
|
|
case ISFUNC:
|
|
|
|
break;
|
|
|
|
|
|
|
|
case ISKMAP:
|
|
|
|
rl_discard_keymap ((Keymap)map[i].function);
|
|
|
|
break;
|
|
|
|
|
|
|
|
case ISMACR:
|
|
|
|
free ((char *)map[i].function);
|
|
|
|
break;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|