151 lines
3.6 KiB
C
151 lines
3.6 KiB
C
/* 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
|
|
Free Software Foundation; either version 1, or (at your option) any
|
|
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
|
|
Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */
|
|
#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 */
|
|
|
|
#include "rlconf.h"
|
|
#include "keymaps.h"
|
|
#include "emacs_keymap.c"
|
|
|
|
#if defined (VI_MODE)
|
|
#include "vi_keymap.c"
|
|
#endif
|
|
|
|
extern int rl_do_lowercase_version ();
|
|
extern int rl_rubout (), rl_insert ();
|
|
|
|
extern char *xmalloc (), *xrealloc ();
|
|
|
|
/* **************************************************************** */
|
|
/* */
|
|
/* 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;
|
|
keymap[i].function = (Function *)NULL;
|
|
}
|
|
|
|
for (i = 'A'; i < ('Z' + 1); i++)
|
|
{
|
|
keymap[i].type = ISFUNC;
|
|
keymap[i].function = rl_do_lowercase_version;
|
|
}
|
|
|
|
return (keymap);
|
|
}
|
|
|
|
/* Return a new keymap which is a copy of MAP. */
|
|
Keymap
|
|
rl_copy_keymap (map)
|
|
Keymap map;
|
|
{
|
|
register int i;
|
|
Keymap temp = rl_make_bare_keymap ();
|
|
|
|
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
|
|
/* Printing characters in some 8-bit character sets. */
|
|
for (i = 128; i < 160; i++)
|
|
newmap[i].function = rl_insert;
|
|
|
|
/* ISO Latin-1 printing characters should self-insert. */
|
|
for (i = 160; i < 256; i++)
|
|
newmap[i].function = rl_insert;
|
|
#endif /* KEYMAP_SIZE > 128 */
|
|
|
|
return (newmap);
|
|
}
|
|
|
|
/* Free the storage associated with MAP. */
|
|
void
|
|
rl_discard_keymap (map)
|
|
Keymap (map);
|
|
{
|
|
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;
|
|
}
|
|
}
|
|
}
|