freebsd-dev/contrib/libreadline/terminal.c

609 lines
15 KiB
C
Raw Normal View History

2000-03-19 22:00:57 +00:00
/* $FreeBSD$ */
1997-01-04 22:09:20 +00:00
/* terminal.c -- controlling the terminal with termcap. */
/* Copyright (C) 1996 Free Software Foundation, Inc.
This file is part of the GNU Readline Library, a library for
reading lines of text with interactive input and history editing.
The GNU Readline Library is free software; you can redistribute it
and/or modify it under the terms of the GNU General Public License
2000-03-19 22:00:57 +00:00
as published by the Free Software Foundation; either version 2, or
1997-01-04 22:09:20 +00:00
(at your option) any later version.
The GNU Readline Library 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.
The GNU General Public License is often shipped with GNU software, and
is generally kept in a file called COPYING or LICENSE. If you do not
have a copy of the license, write to the Free Software Foundation,
2000-03-19 22:00:57 +00:00
59 Temple Place, Suite 330, Boston, MA 02111 USA. */
1997-01-04 22:09:20 +00:00
#define READLINE_LIBRARY
#if defined (HAVE_CONFIG_H)
# include <config.h>
#endif
#include <sys/types.h>
#include "posixstat.h"
#include <fcntl.h>
#if defined (HAVE_SYS_FILE_H)
# include <sys/file.h>
#endif /* HAVE_SYS_FILE_H */
#if defined (HAVE_UNISTD_H)
# include <unistd.h>
#endif /* HAVE_UNISTD_H */
#if defined (HAVE_STDLIB_H)
# include <stdlib.h>
#else
# include "ansi_stdlib.h"
#endif /* HAVE_STDLIB_H */
#if defined (HAVE_LOCALE_H)
# include <locale.h>
#endif
#include <stdio.h>
/* System-specific feature definitions and include files. */
#include "rldefs.h"
#if defined (GWINSZ_IN_SYS_IOCTL) && !defined (TIOCGWINSZ)
1997-01-04 22:09:20 +00:00
# include <sys/ioctl.h>
#endif /* GWINSZ_IN_SYS_IOCTL && !TIOCGWINSZ */
#include "rltty.h"
#include "tcap.h"
1997-01-04 22:09:20 +00:00
/* Some standard library routines. */
#include "readline.h"
#include "history.h"
2000-03-19 22:00:57 +00:00
#include "rlprivate.h"
#include "rlshell.h"
1997-01-04 22:09:20 +00:00
/* **************************************************************** */
/* */
/* Terminal and Termcap */
/* */
/* **************************************************************** */
static char *term_buffer = (char *)NULL;
static char *term_string_buffer = (char *)NULL;
static int tcap_initialized;
#if !defined (__linux__)
# if defined (__EMX__) || defined (NEED_EXTERN_PC)
extern
# endif /* __EMX__ || NEED_EXTERN_PC */
char PC, *BC, *UP;
1997-01-04 22:09:20 +00:00
#endif /* __linux__ */
/* Some strings to control terminal actions. These are output by tputs (). */
2001-04-11 03:15:56 +00:00
char *_rl_term_clreol;
char *_rl_term_clrpag;
char *_rl_term_cr;
char *_rl_term_backspace;
char *_rl_term_goto;
char *_rl_term_pc;
1997-01-04 22:09:20 +00:00
/* Non-zero if we determine that the terminal can do character insertion. */
2001-04-11 03:15:56 +00:00
int _rl_terminal_can_insert = 0;
1997-01-04 22:09:20 +00:00
/* How to insert characters. */
2001-04-11 03:15:56 +00:00
char *_rl_term_im;
char *_rl_term_ei;
char *_rl_term_ic;
char *_rl_term_ip;
char *_rl_term_IC;
1997-01-04 22:09:20 +00:00
/* How to delete characters. */
2001-04-11 03:15:56 +00:00
char *_rl_term_dc;
char *_rl_term_DC;
1997-01-04 22:09:20 +00:00
#if defined (HACK_TERMCAP_MOTION)
2001-04-11 03:15:56 +00:00
char *_rl_term_forward_char;
1997-01-04 22:09:20 +00:00
#endif /* HACK_TERMCAP_MOTION */
/* How to go up a line. */
2001-04-11 03:15:56 +00:00
char *_rl_term_up;
1997-01-04 22:09:20 +00:00
2001-04-11 03:15:56 +00:00
/* A visible bell; char if the terminal can be made to flash the screen. */
static char *_rl_visible_bell;
1997-01-04 22:09:20 +00:00
/* Non-zero means the terminal can auto-wrap lines. */
int _rl_term_autowrap;
/* Non-zero means that this terminal has a meta key. */
static int term_has_meta;
/* The sequences to write to turn on and off the meta key, if this
2001-04-11 03:15:56 +00:00
terminal has one. */
static char *_rl_term_mm;
static char *_rl_term_mo;
1997-01-04 22:09:20 +00:00
/* The key sequences output by the arrow keys, if this terminal has any. */
2001-04-11 03:15:56 +00:00
static char *_rl_term_ku;
static char *_rl_term_kd;
static char *_rl_term_kr;
static char *_rl_term_kl;
1997-01-04 22:09:20 +00:00
/* How to initialize and reset the arrow keys, if this terminal has any. */
2001-04-11 03:15:56 +00:00
static char *_rl_term_ks;
static char *_rl_term_ke;
1997-01-04 22:09:20 +00:00
/* The key sequences sent by the Home and End keys, if any. */
2001-04-11 03:15:56 +00:00
static char *_rl_term_kh;
static char *_rl_term_kH;
1997-01-04 22:09:20 +00:00
/* Variables that hold the screen dimensions, used by the display code. */
2001-04-11 03:15:56 +00:00
int _rl_screenwidth, _rl_screenheight, _rl_screenchars;
1997-01-04 22:09:20 +00:00
/* Non-zero means the user wants to enable the keypad. */
int _rl_enable_keypad;
/* Non-zero means the user wants to enable a meta key. */
int _rl_enable_meta = 1;
2000-03-19 22:00:57 +00:00
#if defined (__EMX__)
static void
_emx_get_screensize (swp, shp)
int *swp, *shp;
{
int sz[2];
_scrsize (sz);
if (swp)
*swp = sz[0];
if (shp)
*shp = sz[1];
}
#endif
1997-01-04 22:09:20 +00:00
/* Get readline's idea of the screen size. TTY is a file descriptor open
to the terminal. If IGNORE_ENV is true, we do not pay attention to the
values of $LINES and $COLUMNS. The tests for TERM_STRING_BUFFER being
non-null serve to check whether or not we have initialized termcap. */
void
_rl_get_screen_size (tty, ignore_env)
int tty, ignore_env;
{
char *ss;
#if defined (TIOCGWINSZ)
struct winsize window_size;
#endif /* TIOCGWINSZ */
#if defined (TIOCGWINSZ)
if (ioctl (tty, TIOCGWINSZ, &window_size) == 0)
{
2001-04-11 03:15:56 +00:00
_rl_screenwidth = (int) window_size.ws_col;
_rl_screenheight = (int) window_size.ws_row;
1997-01-04 22:09:20 +00:00
}
#endif /* TIOCGWINSZ */
#if defined (__EMX__)
2001-04-11 03:15:56 +00:00
_emx_get_screensize (&_rl_screenwidth, &_rl_screenheight);
#endif
1997-01-04 22:09:20 +00:00
/* Environment variable COLUMNS overrides setting of "co" if IGNORE_ENV
is unset. */
2001-04-11 03:15:56 +00:00
if (_rl_screenwidth <= 0)
1997-01-04 22:09:20 +00:00
{
2001-04-11 03:15:56 +00:00
if (ignore_env == 0 && (ss = sh_get_env_value ("COLUMNS")))
_rl_screenwidth = atoi (ss);
1997-01-04 22:09:20 +00:00
2000-03-19 22:00:57 +00:00
#if !defined (__DJGPP__)
2001-04-11 03:15:56 +00:00
if (_rl_screenwidth <= 0 && term_string_buffer)
_rl_screenwidth = tgetnum ("co");
2000-03-19 22:00:57 +00:00
#endif
1997-01-04 22:09:20 +00:00
}
/* Environment variable LINES overrides setting of "li" if IGNORE_ENV
is unset. */
2001-04-11 03:15:56 +00:00
if (_rl_screenheight <= 0)
1997-01-04 22:09:20 +00:00
{
2001-04-11 03:15:56 +00:00
if (ignore_env == 0 && (ss = sh_get_env_value ("LINES")))
_rl_screenheight = atoi (ss);
1997-01-04 22:09:20 +00:00
2000-03-19 22:00:57 +00:00
#if !defined (__DJGPP__)
2001-04-11 03:15:56 +00:00
if (_rl_screenheight <= 0 && term_string_buffer)
_rl_screenheight = tgetnum ("li");
2000-03-19 22:00:57 +00:00
#endif
1997-01-04 22:09:20 +00:00
}
/* If all else fails, default to 80x24 terminal. */
2001-04-11 03:15:56 +00:00
if (_rl_screenwidth <= 1)
_rl_screenwidth = 80;
1997-01-04 22:09:20 +00:00
2001-04-11 03:15:56 +00:00
if (_rl_screenheight <= 0)
_rl_screenheight = 24;
1997-01-04 22:09:20 +00:00
/* If we're being compiled as part of bash, set the environment
variables $LINES and $COLUMNS to new values. Otherwise, just
do a pair of putenv () or setenv () calls. */
2001-04-11 03:15:56 +00:00
sh_set_lines_and_columns (_rl_screenheight, _rl_screenwidth);
1997-01-04 22:09:20 +00:00
2000-03-19 22:00:57 +00:00
if (_rl_term_autowrap == 0)
2001-04-11 03:15:56 +00:00
_rl_screenwidth--;
1997-01-04 22:09:20 +00:00
2001-04-11 03:15:56 +00:00
_rl_screenchars = _rl_screenwidth * _rl_screenheight;
1997-01-04 22:09:20 +00:00
}
void
_rl_set_screen_size (rows, cols)
int rows, cols;
{
2001-04-11 03:15:56 +00:00
if (rows == 0 || cols == 0)
return;
_rl_screenheight = rows;
_rl_screenwidth = cols;
1997-01-04 22:09:20 +00:00
if (_rl_term_autowrap == 0)
2001-04-11 03:15:56 +00:00
_rl_screenwidth--;
1997-01-04 22:09:20 +00:00
2001-04-11 03:15:56 +00:00
_rl_screenchars = _rl_screenwidth * _rl_screenheight;
}
void
rl_set_screen_size (rows, cols)
int rows, cols;
{
_rl_set_screen_size (rows, cols);
1997-01-04 22:09:20 +00:00
}
2001-04-11 03:15:56 +00:00
void
rl_get_screen_size (rows, cols)
int *rows, *cols;
{
if (rows)
*rows = _rl_screenheight;
if (cols)
*cols = _rl_screenwidth;
}
1999-05-28 01:59:23 +00:00
void
rl_resize_terminal ()
{
if (readline_echoing_p)
{
_rl_get_screen_size (fileno (rl_instream), 1);
_rl_redisplay_after_sigwinch ();
}
}
1997-01-04 22:09:20 +00:00
struct _tc_string {
2001-04-11 03:15:56 +00:00
const char *tc_var;
1997-01-04 22:09:20 +00:00
char **tc_value;
};
/* This should be kept sorted, just in case we decide to change the
search algorithm to something smarter. */
static struct _tc_string tc_strings[] =
{
2001-04-11 03:15:56 +00:00
{ "DC", &_rl_term_DC },
{ "IC", &_rl_term_IC },
{ "ce", &_rl_term_clreol },
{ "cl", &_rl_term_clrpag },
{ "cr", &_rl_term_cr },
{ "dc", &_rl_term_dc },
{ "ei", &_rl_term_ei },
{ "ic", &_rl_term_ic },
{ "im", &_rl_term_im },
{ "kd", &_rl_term_kd },
{ "kh", &_rl_term_kh }, /* home */
{ "@7", &_rl_term_kH }, /* end */
{ "kl", &_rl_term_kl },
{ "kr", &_rl_term_kr },
{ "ku", &_rl_term_ku },
{ "ks", &_rl_term_ks },
{ "ke", &_rl_term_ke },
{ "le", &_rl_term_backspace },
{ "mm", &_rl_term_mm },
{ "mo", &_rl_term_mo },
1997-01-04 22:09:20 +00:00
#if defined (HACK_TERMCAP_MOTION)
2001-04-11 03:15:56 +00:00
{ "nd", &_rl_term_forward_char },
1997-01-04 22:09:20 +00:00
#endif
2001-04-11 03:15:56 +00:00
{ "pc", &_rl_term_pc },
{ "up", &_rl_term_up },
{ "vb", &_rl_visible_bell },
1997-01-04 22:09:20 +00:00
};
#define NUM_TC_STRINGS (sizeof (tc_strings) / sizeof (struct _tc_string))
/* Read the desired terminal capability strings into BP. The capabilities
are described in the TC_STRINGS table. */
static void
get_term_capabilities (bp)
char **bp;
{
2000-03-19 22:00:57 +00:00
#if !defined (__DJGPP__) /* XXX - doesn't DJGPP have a termcap library? */
1997-01-04 22:09:20 +00:00
register int i;
for (i = 0; i < NUM_TC_STRINGS; i++)
*(tc_strings[i].tc_value) = tgetstr (tc_strings[i].tc_var, bp);
2000-03-19 22:00:57 +00:00
#endif
1997-01-04 22:09:20 +00:00
tcap_initialized = 1;
}
2000-03-19 22:00:57 +00:00
#define CUSTOM_REDISPLAY_FUNC() (rl_redisplay_function != rl_redisplay)
#define CUSTOM_INPUT_FUNC() (rl_getc_function != rl_getc)
1997-01-04 22:09:20 +00:00
int
_rl_init_terminal_io (terminal_name)
2001-04-11 03:15:56 +00:00
const char *terminal_name;
1997-01-04 22:09:20 +00:00
{
2001-04-11 03:15:56 +00:00
const char *term;
char *buffer;
2000-03-19 22:00:57 +00:00
int tty, tgetent_ret;
1997-01-04 22:09:20 +00:00
Keymap xkeymap;
2001-04-11 03:15:56 +00:00
term = terminal_name ? terminal_name : sh_get_env_value ("TERM");
_rl_term_clrpag = _rl_term_cr = _rl_term_clreol = (char *)NULL;
2000-03-19 22:00:57 +00:00
tty = rl_instream ? fileno (rl_instream) : 0;
2001-04-11 03:15:56 +00:00
_rl_screenwidth = _rl_screenheight = 0;
1997-01-04 22:09:20 +00:00
2000-03-19 22:00:57 +00:00
if (term == 0)
term = "dumb";
1997-01-04 22:09:20 +00:00
2000-03-19 22:00:57 +00:00
/* I've separated this out for later work on not calling tgetent at all
if the calling application has supplied a custom redisplay function,
(and possibly if the application has supplied a custom input function). */
if (CUSTOM_REDISPLAY_FUNC())
{
tgetent_ret = -1;
}
else
{
if (term_string_buffer == 0)
term_string_buffer = xmalloc(2032);
1997-01-04 22:09:20 +00:00
2000-03-19 22:00:57 +00:00
if (term_buffer == 0)
term_buffer = xmalloc(4080);
1997-01-04 22:09:20 +00:00
2000-03-19 22:00:57 +00:00
buffer = term_string_buffer;
1997-01-04 22:09:20 +00:00
2000-03-19 22:00:57 +00:00
tgetent_ret = tgetent (term_buffer, term);
}
1997-01-04 22:09:20 +00:00
2000-03-19 22:00:57 +00:00
if (tgetent_ret <= 0)
1997-01-04 22:09:20 +00:00
{
2000-03-19 22:00:57 +00:00
FREE (term_string_buffer);
FREE (term_buffer);
buffer = term_buffer = term_string_buffer = (char *)NULL;
_rl_term_autowrap = 0; /* used by _rl_get_screen_size */
#if defined (__EMX__)
2001-04-11 03:15:56 +00:00
_emx_get_screensize (&_rl_screenwidth, &_rl_screenheight);
_rl_screenwidth--;
2000-03-19 22:00:57 +00:00
#else /* !__EMX__ */
_rl_get_screen_size (tty, 0);
#endif /* !__EMX__ */
/* Defaults. */
2001-04-11 03:15:56 +00:00
if (_rl_screenwidth <= 0 || _rl_screenheight <= 0)
2000-03-19 22:00:57 +00:00
{
2001-04-11 03:15:56 +00:00
_rl_screenwidth = 79;
_rl_screenheight = 24;
2000-03-19 22:00:57 +00:00
}
/* Everything below here is used by the redisplay code (tputs). */
2001-04-11 03:15:56 +00:00
_rl_screenchars = _rl_screenwidth * _rl_screenheight;
_rl_term_cr = "\r";
_rl_term_im = _rl_term_ei = _rl_term_ic = _rl_term_IC = (char *)NULL;
_rl_term_up = _rl_term_dc = _rl_term_DC = _rl_visible_bell = (char *)NULL;
_rl_term_ku = _rl_term_kd = _rl_term_kl = _rl_term_kr = (char *)NULL;
_rl_term_mm = _rl_term_mo = (char *)NULL;
1997-01-04 22:09:20 +00:00
#if defined (HACK_TERMCAP_MOTION)
term_forward_char = (char *)NULL;
#endif
2001-04-11 03:15:56 +00:00
_rl_terminal_can_insert = term_has_meta = 0;
2000-03-19 22:00:57 +00:00
/* Reasonable defaults for tgoto(). Readline currently only uses
2001-04-11 03:15:56 +00:00
tgoto if _rl_term_IC or _rl_term_DC is defined, but just in case we
2000-03-19 22:00:57 +00:00
change that later... */
PC = '\0';
2001-04-11 03:15:56 +00:00
BC = _rl_term_backspace = "\b";
UP = _rl_term_up;
2000-03-19 22:00:57 +00:00
1997-01-04 22:09:20 +00:00
return 0;
}
get_term_capabilities (&buffer);
/* Set up the variables that the termcap library expects the application
to provide. */
2001-04-11 03:15:56 +00:00
PC = _rl_term_pc ? *_rl_term_pc : 0;
BC = _rl_term_backspace;
UP = _rl_term_up;
1997-01-04 22:09:20 +00:00
2001-04-11 03:15:56 +00:00
if (!_rl_term_cr)
_rl_term_cr = "\r";
1997-01-04 22:09:20 +00:00
_rl_term_autowrap = tgetflag ("am") && tgetflag ("xn");
_rl_get_screen_size (tty, 0);
/* "An application program can assume that the terminal can do
character insertion if *any one of* the capabilities `IC',
`im', `ic' or `ip' is provided." But we can't do anything if
only `ip' is provided, so... */
2001-04-11 03:15:56 +00:00
_rl_terminal_can_insert = (_rl_term_IC || _rl_term_im || _rl_term_ic);
1997-01-04 22:09:20 +00:00
/* Check to see if this terminal has a meta key and clear the capability
variables if there is none. */
term_has_meta = (tgetflag ("km") || tgetflag ("MT"));
if (!term_has_meta)
2001-04-11 03:15:56 +00:00
_rl_term_mm = _rl_term_mo = (char *)NULL;
1997-01-04 22:09:20 +00:00
/* Attempt to find and bind the arrow keys. Do not override already
bound keys in an overzealous attempt, however. */
xkeymap = _rl_keymap;
_rl_keymap = emacs_standard_keymap;
2001-04-11 03:15:56 +00:00
_rl_bind_if_unbound (_rl_term_ku, rl_get_previous_history);
_rl_bind_if_unbound (_rl_term_kd, rl_get_next_history);
_rl_bind_if_unbound (_rl_term_kr, rl_forward);
_rl_bind_if_unbound (_rl_term_kl, rl_backward);
1997-01-04 22:09:20 +00:00
2001-04-11 03:15:56 +00:00
_rl_bind_if_unbound (_rl_term_kh, rl_beg_of_line); /* Home */
_rl_bind_if_unbound (_rl_term_kH, rl_end_of_line); /* End */
1997-01-04 22:09:20 +00:00
#if defined (VI_MODE)
_rl_keymap = vi_movement_keymap;
2001-04-11 03:15:56 +00:00
_rl_bind_if_unbound (_rl_term_ku, rl_get_previous_history);
_rl_bind_if_unbound (_rl_term_kd, rl_get_next_history);
_rl_bind_if_unbound (_rl_term_kr, rl_forward);
_rl_bind_if_unbound (_rl_term_kl, rl_backward);
1997-01-04 22:09:20 +00:00
2001-04-11 03:15:56 +00:00
_rl_bind_if_unbound (_rl_term_kh, rl_beg_of_line); /* Home */
_rl_bind_if_unbound (_rl_term_kH, rl_end_of_line); /* End */
1997-01-04 22:09:20 +00:00
#endif /* VI_MODE */
_rl_keymap = xkeymap;
return 0;
}
char *
rl_get_termcap (cap)
2001-04-11 03:15:56 +00:00
const char *cap;
1997-01-04 22:09:20 +00:00
{
register int i;
if (tcap_initialized == 0)
return ((char *)NULL);
for (i = 0; i < NUM_TC_STRINGS; i++)
{
if (tc_strings[i].tc_var[0] == cap[0] && strcmp (tc_strings[i].tc_var, cap) == 0)
return *(tc_strings[i].tc_value);
}
return ((char *)NULL);
}
/* Re-initialize the terminal considering that the TERM/TERMCAP variable
has changed. */
int
rl_reset_terminal (terminal_name)
2001-04-11 03:15:56 +00:00
const char *terminal_name;
{
_rl_init_terminal_io (terminal_name);
return 0;
}
1997-01-04 22:09:20 +00:00
/* A function for the use of tputs () */
1998-04-28 06:22:20 +00:00
#ifdef _MINIX
void
_rl_output_character_function (c)
int c;
{
putc (c, _rl_out_stream);
}
#else /* !_MINIX */
1997-01-04 22:09:20 +00:00
int
_rl_output_character_function (c)
int c;
{
return putc (c, _rl_out_stream);
}
1998-04-28 06:22:20 +00:00
#endif /* !_MINIX */
2000-03-19 22:00:57 +00:00
1997-01-04 22:09:20 +00:00
/* Write COUNT characters from STRING to the output stream. */
void
_rl_output_some_chars (string, count)
2001-04-11 03:15:56 +00:00
const char *string;
1997-01-04 22:09:20 +00:00
int count;
{
fwrite (string, 1, count, _rl_out_stream);
}
/* Move the cursor back. */
int
_rl_backspace (count)
int count;
{
register int i;
2001-04-11 03:15:56 +00:00
if (_rl_term_backspace)
1997-01-04 22:09:20 +00:00
for (i = 0; i < count; i++)
2001-04-11 03:15:56 +00:00
tputs (_rl_term_backspace, 1, _rl_output_character_function);
1997-01-04 22:09:20 +00:00
else
for (i = 0; i < count; i++)
putc ('\b', _rl_out_stream);
return 0;
}
/* Move to the start of the next line. */
int
2001-04-11 03:15:56 +00:00
rl_crlf ()
1997-01-04 22:09:20 +00:00
{
#if defined (NEW_TTY_DRIVER)
2001-04-11 03:15:56 +00:00
if (_rl_term_cr)
tputs (_rl_term_cr, 1, _rl_output_character_function);
1997-01-04 22:09:20 +00:00
#endif /* NEW_TTY_DRIVER */
putc ('\n', _rl_out_stream);
return 0;
}
/* Ring the terminal bell. */
int
2001-04-11 03:15:56 +00:00
rl_ding ()
1997-01-04 22:09:20 +00:00
{
if (readline_echoing_p)
{
switch (_rl_bell_preference)
{
case NO_BELL:
default:
break;
case VISIBLE_BELL:
2001-04-11 03:15:56 +00:00
if (_rl_visible_bell)
1997-01-04 22:09:20 +00:00
{
2001-04-11 03:15:56 +00:00
tputs (_rl_visible_bell, 1, _rl_output_character_function);
1997-01-04 22:09:20 +00:00
break;
}
/* FALLTHROUGH */
case AUDIBLE_BELL:
fprintf (stderr, "\007");
fflush (stderr);
break;
}
return (0);
}
return (-1);
}
/* **************************************************************** */
/* */
/* Controlling the Meta Key and Keypad */
/* */
/* **************************************************************** */
void
1997-01-04 22:09:20 +00:00
_rl_enable_meta_key ()
{
2000-03-19 22:00:57 +00:00
#if !defined (__DJGPP__)
2001-04-11 03:15:56 +00:00
if (term_has_meta && _rl_term_mm)
tputs (_rl_term_mm, 1, _rl_output_character_function);
2000-03-19 22:00:57 +00:00
#endif
1997-01-04 22:09:20 +00:00
}
void
_rl_control_keypad (on)
int on;
{
2000-03-19 22:00:57 +00:00
#if !defined (__DJGPP__)
2001-04-11 03:15:56 +00:00
if (on && _rl_term_ks)
tputs (_rl_term_ks, 1, _rl_output_character_function);
else if (!on && _rl_term_ke)
tputs (_rl_term_ke, 1, _rl_output_character_function);
2000-03-19 22:00:57 +00:00
#endif
1997-01-04 22:09:20 +00:00
}