OpenCores
URL https://opencores.org/ocsvn/or1k/or1k/trunk

Subversion Repositories or1k

[/] [or1k/] [tags/] [final_interface/] [gdb-5.0/] [readline/] [terminal.c] - Diff between revs 114 and 1765

Only display areas with differences | Details | Blame | View Log

Rev 114 Rev 1765
/* terminal.c -- controlling the terminal with termcap. */
/* terminal.c -- controlling the terminal with termcap. */
 
 
/* Copyright (C) 1996 Free Software Foundation, Inc.
/* Copyright (C) 1996 Free Software Foundation, Inc.
 
 
   This file is part of the GNU Readline Library, a library for
   This file is part of the GNU Readline Library, a library for
   reading lines of text with interactive input and history editing.
   reading lines of text with interactive input and history editing.
 
 
   The GNU Readline Library is free software; you can redistribute it
   The GNU Readline Library is free software; you can redistribute it
   and/or modify it under the terms of the GNU General Public License
   and/or modify it under the terms of the GNU General Public License
   as published by the Free Software Foundation; either version 1, or
   as published by the Free Software Foundation; either version 1, or
   (at your option) any later version.
   (at your option) any later version.
 
 
   The GNU Readline Library is distributed in the hope that it will be
   The GNU Readline Library is distributed in the hope that it will be
   useful, but WITHOUT ANY WARRANTY; without even the implied warranty
   useful, but WITHOUT ANY WARRANTY; without even the implied warranty
   of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
   GNU General Public License for more details.
   GNU General Public License for more details.
 
 
   The GNU General Public License is often shipped with GNU software, and
   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
   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,
   have a copy of the license, write to the Free Software Foundation,
   675 Mass Ave, Cambridge, MA 02139, USA. */
   675 Mass Ave, Cambridge, MA 02139, USA. */
#define READLINE_LIBRARY
#define READLINE_LIBRARY
 
 
#if defined (HAVE_CONFIG_H)
#if defined (HAVE_CONFIG_H)
#  include <config.h>
#  include <config.h>
#endif
#endif
 
 
#include <sys/types.h>
#include <sys/types.h>
#include "posixstat.h"
#include "posixstat.h"
#include <fcntl.h>
#include <fcntl.h>
#if defined (HAVE_SYS_FILE_H)
#if defined (HAVE_SYS_FILE_H)
#  include <sys/file.h>
#  include <sys/file.h>
#endif /* HAVE_SYS_FILE_H */
#endif /* HAVE_SYS_FILE_H */
 
 
#if defined (HAVE_UNISTD_H)
#if defined (HAVE_UNISTD_H)
#  include <unistd.h>
#  include <unistd.h>
#endif /* HAVE_UNISTD_H */
#endif /* HAVE_UNISTD_H */
 
 
#if defined (HAVE_STDLIB_H)
#if defined (HAVE_STDLIB_H)
#  include <stdlib.h>
#  include <stdlib.h>
#else
#else
#  include "ansi_stdlib.h"
#  include "ansi_stdlib.h"
#endif /* HAVE_STDLIB_H */
#endif /* HAVE_STDLIB_H */
 
 
#if defined (HAVE_LOCALE_H)
#if defined (HAVE_LOCALE_H)
#  include <locale.h>
#  include <locale.h>
#endif
#endif
 
 
#include <signal.h>
#include <signal.h>
#include <stdio.h>
#include <stdio.h>
#include <setjmp.h>
#include <setjmp.h>
 
 
/* System-specific feature definitions and include files. */
/* System-specific feature definitions and include files. */
#include "rldefs.h"
#include "rldefs.h"
 
 
#if defined (GWINSZ_IN_SYS_IOCTL) && !defined (TIOCGWINSZ)
#if defined (GWINSZ_IN_SYS_IOCTL) && !defined (TIOCGWINSZ)
#  include <sys/ioctl.h>
#  include <sys/ioctl.h>
#endif /* GWINSZ_IN_SYS_IOCTL && !TIOCGWINSZ */
#endif /* GWINSZ_IN_SYS_IOCTL && !TIOCGWINSZ */
 
 
#if defined (__GO32__)
#if defined (__GO32__)
#  include <pc.h>
#  include <pc.h>
#endif
#endif
 
 
#include "rltty.h"
#include "rltty.h"
#include "tcap.h"
#include "tcap.h"
 
 
/* Some standard library routines. */
/* Some standard library routines. */
#include "readline.h"
#include "readline.h"
#include "history.h"
#include "history.h"
 
 
/* Variables and functions imported from readline.c */
/* Variables and functions imported from readline.c */
extern FILE *_rl_in_stream, *_rl_out_stream;
extern FILE *_rl_in_stream, *_rl_out_stream;
extern int readline_echoing_p;
extern int readline_echoing_p;
extern int _rl_bell_preference;
extern int _rl_bell_preference;
extern Keymap _rl_keymap;
extern Keymap _rl_keymap;
 
 
/* Functions imported from bind.c */
/* Functions imported from bind.c */
extern void _rl_bind_if_unbound ();
extern void _rl_bind_if_unbound ();
 
 
/* Functions imported from shell.c */
/* Functions imported from shell.c */
extern void set_lines_and_columns ();
extern void set_lines_and_columns ();
extern char *get_env_value ();
extern char *get_env_value ();
 
 
/* Functions imported from display.c */
/* Functions imported from display.c */
extern void _rl_redisplay_after_sigwinch ();
extern void _rl_redisplay_after_sigwinch ();
 
 
/* **************************************************************** */
/* **************************************************************** */
/*                                                                  */
/*                                                                  */
/*                      Terminal and Termcap                        */
/*                      Terminal and Termcap                        */
/*                                                                  */
/*                                                                  */
/* **************************************************************** */
/* **************************************************************** */
 
 
#ifndef __DJGPP__
#ifndef __DJGPP__
static char *term_buffer = (char *)NULL;
static char *term_buffer = (char *)NULL;
static char *term_string_buffer = (char *)NULL;
static char *term_string_buffer = (char *)NULL;
 
 
/* Non-zero means this terminal can't really do anything. */
/* Non-zero means this terminal can't really do anything. */
static int dumb_term;
static int dumb_term;
#endif
#endif
 
 
static int tcap_initialized;
static int tcap_initialized;
 
 
#if !defined (__linux__)
#if !defined (__linux__)
#  if defined (__EMX__) || defined (NEED_EXTERN_PC)
#  if defined (__EMX__) || defined (NEED_EXTERN_PC)
extern
extern
#  endif /* __EMX__ || NEED_EXTERN_PC */
#  endif /* __EMX__ || NEED_EXTERN_PC */
char PC, *BC, *UP;
char PC, *BC, *UP;
#endif /* __linux__ */
#endif /* __linux__ */
 
 
/* Some strings to control terminal actions.  These are output by tputs (). */
/* Some strings to control terminal actions.  These are output by tputs (). */
char *term_goto, *term_clreol, *term_cr, *term_clrpag, *term_backspace;
char *term_goto, *term_clreol, *term_cr, *term_clrpag, *term_backspace;
char *term_pc;
char *term_pc;
 
 
/* Non-zero if we determine that the terminal can do character insertion. */
/* Non-zero if we determine that the terminal can do character insertion. */
int terminal_can_insert = 0;
int terminal_can_insert = 0;
 
 
/* How to insert characters. */
/* How to insert characters. */
char *term_im, *term_ei, *term_ic, *term_ip, *term_IC;
char *term_im, *term_ei, *term_ic, *term_ip, *term_IC;
 
 
/* How to delete characters. */
/* How to delete characters. */
char *term_dc, *term_DC;
char *term_dc, *term_DC;
 
 
#if defined (HACK_TERMCAP_MOTION)
#if defined (HACK_TERMCAP_MOTION)
char *term_forward_char;
char *term_forward_char;
#endif  /* HACK_TERMCAP_MOTION */
#endif  /* HACK_TERMCAP_MOTION */
 
 
/* How to go up a line. */
/* How to go up a line. */
char *term_up;
char *term_up;
 
 
/* A visible bell, if the terminal can be made to flash the screen. */
/* A visible bell, if the terminal can be made to flash the screen. */
static char *visible_bell;
static char *visible_bell;
 
 
/* Non-zero means the terminal can auto-wrap lines. */
/* Non-zero means the terminal can auto-wrap lines. */
int _rl_term_autowrap;
int _rl_term_autowrap;
 
 
/* Non-zero means that this terminal has a meta key. */
/* Non-zero means that this terminal has a meta key. */
static int term_has_meta;
static int term_has_meta;
 
 
/* The sequences to write to turn on and off the meta key, if this
/* The sequences to write to turn on and off the meta key, if this
   terminal    has one. */
   terminal    has one. */
static char *term_mm, *term_mo;
static char *term_mm, *term_mo;
 
 
/* The key sequences output by the arrow keys, if this terminal has any. */
/* The key sequences output by the arrow keys, if this terminal has any. */
static char *term_ku, *term_kd, *term_kr, *term_kl;
static char *term_ku, *term_kd, *term_kr, *term_kl;
 
 
/* How to initialize and reset the arrow keys, if this terminal has any. */
/* How to initialize and reset the arrow keys, if this terminal has any. */
static char *term_ks, *term_ke;
static char *term_ks, *term_ke;
 
 
/* The key sequences sent by the Home and End keys, if any. */
/* The key sequences sent by the Home and End keys, if any. */
static char *term_kh, *term_kH;
static char *term_kh, *term_kH;
 
 
/* Variables that hold the screen dimensions, used by the display code. */
/* Variables that hold the screen dimensions, used by the display code. */
int screenwidth, screenheight, screenchars;
int screenwidth, screenheight, screenchars;
 
 
/* Non-zero means the user wants to enable the keypad. */
/* Non-zero means the user wants to enable the keypad. */
int _rl_enable_keypad;
int _rl_enable_keypad;
 
 
/* Non-zero means the user wants to enable a meta key. */
/* Non-zero means the user wants to enable a meta key. */
int _rl_enable_meta = 1;
int _rl_enable_meta = 1;
 
 
/* Get readline's idea of the screen size.  TTY is a file descriptor open
/* 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
   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
   values of $LINES and $COLUMNS.  The tests for TERM_STRING_BUFFER being
   non-null serve to check whether or not we have initialized termcap. */
   non-null serve to check whether or not we have initialized termcap. */
void
void
_rl_get_screen_size (tty, ignore_env)
_rl_get_screen_size (tty, ignore_env)
     int tty, ignore_env;
     int tty, ignore_env;
{
{
  char *ss;
  char *ss;
#if defined (TIOCGWINSZ)
#if defined (TIOCGWINSZ)
  struct winsize window_size;
  struct winsize window_size;
#endif /* TIOCGWINSZ */
#endif /* TIOCGWINSZ */
#if defined (__EMX__)
#if defined (__EMX__)
  int sz[2];
  int sz[2];
#endif
#endif
 
 
#if defined (TIOCGWINSZ)
#if defined (TIOCGWINSZ)
  if (ioctl (tty, TIOCGWINSZ, &window_size) == 0)
  if (ioctl (tty, TIOCGWINSZ, &window_size) == 0)
    {
    {
      screenwidth = (int) window_size.ws_col;
      screenwidth = (int) window_size.ws_col;
      screenheight = (int) window_size.ws_row;
      screenheight = (int) window_size.ws_row;
    }
    }
#endif /* TIOCGWINSZ */
#endif /* TIOCGWINSZ */
 
 
#if defined (__EMX__)
#if defined (__EMX__)
  _scrsize (sz);
  _scrsize (sz);
  screenwidth = sz[0];
  screenwidth = sz[0];
  screenheight = sz[1];
  screenheight = sz[1];
#endif
#endif
 
 
  /* Environment variable COLUMNS overrides setting of "co" if IGNORE_ENV
  /* Environment variable COLUMNS overrides setting of "co" if IGNORE_ENV
     is unset. */
     is unset. */
  if (screenwidth <= 0)
  if (screenwidth <= 0)
    {
    {
      if (ignore_env == 0 && (ss = get_env_value ("COLUMNS")))
      if (ignore_env == 0 && (ss = get_env_value ("COLUMNS")))
        screenwidth = atoi (ss);
        screenwidth = atoi (ss);
 
 
#if defined(__DJGPP__)
#if defined(__DJGPP__)
      tty = tty;
      tty = tty;
      if (screenwidth <= 0)
      if (screenwidth <= 0)
        screenwidth = ScreenCols ();
        screenwidth = ScreenCols ();
#else
#else
      if (screenwidth <= 0 && term_string_buffer)
      if (screenwidth <= 0 && term_string_buffer)
        screenwidth = tgetnum ("co");
        screenwidth = tgetnum ("co");
#endif
#endif
    }
    }
 
 
  /* Environment variable LINES overrides setting of "li" if IGNORE_ENV
  /* Environment variable LINES overrides setting of "li" if IGNORE_ENV
     is unset. */
     is unset. */
  if (screenheight <= 0)
  if (screenheight <= 0)
    {
    {
      if (ignore_env == 0 && (ss = get_env_value ("LINES")))
      if (ignore_env == 0 && (ss = get_env_value ("LINES")))
        screenheight = atoi (ss);
        screenheight = atoi (ss);
 
 
#if defined(__DJGPP__)
#if defined(__DJGPP__)
      if (screenheight <= 0)
      if (screenheight <= 0)
        screenheight = ScreenRows ();
        screenheight = ScreenRows ();
#else
#else
      if (screenheight <= 0 && term_string_buffer)
      if (screenheight <= 0 && term_string_buffer)
        screenheight = tgetnum ("li");
        screenheight = tgetnum ("li");
#endif
#endif
    }
    }
 
 
  /* If all else fails, default to 80x24 terminal. */
  /* If all else fails, default to 80x24 terminal. */
  if (screenwidth <= 1)
  if (screenwidth <= 1)
    screenwidth = 80;
    screenwidth = 80;
 
 
  if (screenheight <= 0)
  if (screenheight <= 0)
    screenheight = 24;
    screenheight = 24;
 
 
  /* If we're being compiled as part of bash, set the environment
  /* If we're being compiled as part of bash, set the environment
     variables $LINES and $COLUMNS to new values.  Otherwise, just
     variables $LINES and $COLUMNS to new values.  Otherwise, just
     do a pair of putenv () or setenv () calls. */
     do a pair of putenv () or setenv () calls. */
  set_lines_and_columns (screenheight, screenwidth);
  set_lines_and_columns (screenheight, screenwidth);
 
 
  if (!_rl_term_autowrap)
  if (!_rl_term_autowrap)
    screenwidth--;
    screenwidth--;
 
 
  screenchars = screenwidth * screenheight;
  screenchars = screenwidth * screenheight;
}
}
 
 
void
void
_rl_set_screen_size (rows, cols)
_rl_set_screen_size (rows, cols)
     int rows, cols;
     int rows, cols;
{
{
  screenheight = rows;
  screenheight = rows;
  screenwidth = cols;
  screenwidth = cols;
 
 
  if (_rl_term_autowrap == 0)
  if (_rl_term_autowrap == 0)
    screenwidth--;
    screenwidth--;
 
 
  screenchars = screenwidth * screenheight;
  screenchars = screenwidth * screenheight;
}
}
 
 
void
void
rl_resize_terminal ()
rl_resize_terminal ()
{
{
  if (readline_echoing_p)
  if (readline_echoing_p)
    {
    {
      _rl_get_screen_size (fileno (rl_instream), 1);
      _rl_get_screen_size (fileno (rl_instream), 1);
      _rl_redisplay_after_sigwinch ();
      _rl_redisplay_after_sigwinch ();
    }
    }
}
}
 
 
struct _tc_string {
struct _tc_string {
     char *tc_var;
     char *tc_var;
     char **tc_value;
     char **tc_value;
};
};
 
 
/* This should be kept sorted, just in case we decide to change the
/* This should be kept sorted, just in case we decide to change the
   search algorithm to something smarter. */
   search algorithm to something smarter. */
static struct _tc_string tc_strings[] =
static struct _tc_string tc_strings[] =
{
{
  "DC", &term_DC,
  "DC", &term_DC,
  "IC", &term_IC,
  "IC", &term_IC,
  "ce", &term_clreol,
  "ce", &term_clreol,
  "cl", &term_clrpag,
  "cl", &term_clrpag,
  "cr", &term_cr,
  "cr", &term_cr,
  "dc", &term_dc,
  "dc", &term_dc,
  "ei", &term_ei,
  "ei", &term_ei,
  "ic", &term_ic,
  "ic", &term_ic,
  "im", &term_im,
  "im", &term_im,
  "kd", &term_kd,
  "kd", &term_kd,
  "kh", &term_kh,       /* home */
  "kh", &term_kh,       /* home */
  "kH", &term_kH,       /* end */
  "kH", &term_kH,       /* end */
  "kl", &term_kl,
  "kl", &term_kl,
  "kr", &term_kr,
  "kr", &term_kr,
  "ku", &term_ku,
  "ku", &term_ku,
  "ks", &term_ks,
  "ks", &term_ks,
  "ke", &term_ke,
  "ke", &term_ke,
  "le", &term_backspace,
  "le", &term_backspace,
  "mm", &term_mm,
  "mm", &term_mm,
  "mo", &term_mo,
  "mo", &term_mo,
#if defined (HACK_TERMCAP_MOTION)
#if defined (HACK_TERMCAP_MOTION)
  "nd", &term_forward_char,
  "nd", &term_forward_char,
#endif
#endif
  "pc", &term_pc,
  "pc", &term_pc,
  "up", &term_up,
  "up", &term_up,
  "vb", &visible_bell,
  "vb", &visible_bell,
};
};
 
 
#define NUM_TC_STRINGS (sizeof (tc_strings) / sizeof (struct _tc_string))
#define NUM_TC_STRINGS (sizeof (tc_strings) / sizeof (struct _tc_string))
 
 
/* Read the desired terminal capability strings into BP.  The capabilities
/* Read the desired terminal capability strings into BP.  The capabilities
   are described in the TC_STRINGS table. */
   are described in the TC_STRINGS table. */
static void
static void
get_term_capabilities (bp)
get_term_capabilities (bp)
     char **bp;
     char **bp;
{
{
#if defined(__DJGPP__)
#if defined(__DJGPP__)
  bp = bp;
  bp = bp;
#else
#else
  register int i;
  register int i;
 
 
  for (i = 0; i < NUM_TC_STRINGS; i++)
  for (i = 0; i < NUM_TC_STRINGS; i++)
    *(tc_strings[i].tc_value) = tgetstr (tc_strings[i].tc_var, bp);
    *(tc_strings[i].tc_value) = tgetstr (tc_strings[i].tc_var, bp);
#endif
#endif
  tcap_initialized = 1;
  tcap_initialized = 1;
}
}
 
 
int
int
_rl_init_terminal_io (terminal_name)
_rl_init_terminal_io (terminal_name)
     char *terminal_name;
     char *terminal_name;
{
{
#if defined (__GO32__)
#if defined (__GO32__)
  terminal_name = terminal_name;
  terminal_name = terminal_name;
  screenwidth = screenheight = 0;
  screenwidth = screenheight = 0;
  _rl_get_screen_size (rl_instream ? fileno (rl_instream) : 0, 0);
  _rl_get_screen_size (rl_instream ? fileno (rl_instream) : 0, 0);
 
 
  term_cr = "\r";
  term_cr = "\r";
  term_im = term_ei = term_ic = term_IC = (char *)NULL;
  term_im = term_ei = term_ic = term_IC = (char *)NULL;
  term_up = term_dc = term_DC = visible_bell = (char *)NULL;
  term_up = term_dc = term_DC = visible_bell = (char *)NULL;
 
 
  /* Does the __GO32__ have a meta key?  I don't know. */
  /* Does the __GO32__ have a meta key?  I don't know. */
  term_has_meta = 0;
  term_has_meta = 0;
  term_mm = term_mo = (char *)NULL;
  term_mm = term_mo = (char *)NULL;
 
 
  /* It probably has arrow keys, but I don't know what they are. */
  /* It probably has arrow keys, but I don't know what they are. */
  term_ku = term_kd = term_kr = term_kl = (char *)NULL;
  term_ku = term_kd = term_kr = term_kl = (char *)NULL;
 
 
#if defined (HACK_TERMCAP_MOTION)
#if defined (HACK_TERMCAP_MOTION)
  term_forward_char = (char *)NULL;
  term_forward_char = (char *)NULL;
#endif /* HACK_TERMCAP_MOTION */
#endif /* HACK_TERMCAP_MOTION */
  terminal_can_insert = _rl_term_autowrap = 0;
  terminal_can_insert = _rl_term_autowrap = 0;
  return 0;
  return 0;
#else /* !__GO32__ */
#else /* !__GO32__ */
 
 
  char *term, *buffer;
  char *term, *buffer;
  int tty;
  int tty;
  Keymap xkeymap;
  Keymap xkeymap;
 
 
  term = terminal_name ? terminal_name : get_env_value ("TERM");
  term = terminal_name ? terminal_name : get_env_value ("TERM");
 
 
  if (term_string_buffer == 0)
  if (term_string_buffer == 0)
    term_string_buffer = xmalloc (2032);
    term_string_buffer = xmalloc (2032);
 
 
  if (term_buffer == 0)
  if (term_buffer == 0)
    term_buffer = xmalloc (4080);
    term_buffer = xmalloc (4080);
 
 
  buffer = term_string_buffer;
  buffer = term_string_buffer;
 
 
  term_clrpag = term_cr = term_clreol = (char *)NULL;
  term_clrpag = term_cr = term_clreol = (char *)NULL;
 
 
  if (term == 0)
  if (term == 0)
    term = "dumb";
    term = "dumb";
 
 
  if (tgetent (term_buffer, term) <= 0)
  if (tgetent (term_buffer, term) <= 0)
    {
    {
      dumb_term = 1;
      dumb_term = 1;
      screenwidth = 79;
      screenwidth = 79;
      screenheight = 24;
      screenheight = 24;
      screenchars = 79 * 24;
      screenchars = 79 * 24;
      term_cr = "\r";
      term_cr = "\r";
      term_im = term_ei = term_ic = term_IC = (char *)NULL;
      term_im = term_ei = term_ic = term_IC = (char *)NULL;
      term_up = term_dc = term_DC = visible_bell = (char *)NULL;
      term_up = term_dc = term_DC = visible_bell = (char *)NULL;
      term_ku = term_kd = term_kl = term_kr = (char *)NULL;
      term_ku = term_kd = term_kl = term_kr = (char *)NULL;
#if defined (HACK_TERMCAP_MOTION)
#if defined (HACK_TERMCAP_MOTION)
      term_forward_char = (char *)NULL;
      term_forward_char = (char *)NULL;
#endif
#endif
      terminal_can_insert = 0;
      terminal_can_insert = 0;
      return 0;
      return 0;
    }
    }
 
 
  get_term_capabilities (&buffer);
  get_term_capabilities (&buffer);
 
 
  /* Set up the variables that the termcap library expects the application
  /* Set up the variables that the termcap library expects the application
     to provide. */
     to provide. */
  PC = term_pc ? *term_pc : 0;
  PC = term_pc ? *term_pc : 0;
  BC = term_backspace;
  BC = term_backspace;
  UP = term_up;
  UP = term_up;
 
 
  if (!term_cr)
  if (!term_cr)
    term_cr = "\r";
    term_cr = "\r";
 
 
  tty = rl_instream ? fileno (rl_instream) : 0;
  tty = rl_instream ? fileno (rl_instream) : 0;
 
 
  screenwidth = screenheight = 0;
  screenwidth = screenheight = 0;
 
 
  _rl_term_autowrap = tgetflag ("am") && tgetflag ("xn");
  _rl_term_autowrap = tgetflag ("am") && tgetflag ("xn");
 
 
  _rl_get_screen_size (tty, 0);
  _rl_get_screen_size (tty, 0);
 
 
  /* "An application program can assume that the terminal can do
  /* "An application program can assume that the terminal can do
      character insertion if *any one of* the capabilities `IC',
      character insertion if *any one of* the capabilities `IC',
      `im', `ic' or `ip' is provided."  But we can't do anything if
      `im', `ic' or `ip' is provided."  But we can't do anything if
      only `ip' is provided, so... */
      only `ip' is provided, so... */
  terminal_can_insert = (term_IC || term_im || term_ic);
  terminal_can_insert = (term_IC || term_im || term_ic);
 
 
  /* Check to see if this terminal has a meta key and clear the capability
  /* Check to see if this terminal has a meta key and clear the capability
     variables if there is none. */
     variables if there is none. */
  term_has_meta = (tgetflag ("km") || tgetflag ("MT"));
  term_has_meta = (tgetflag ("km") || tgetflag ("MT"));
  if (!term_has_meta)
  if (!term_has_meta)
    term_mm = term_mo = (char *)NULL;
    term_mm = term_mo = (char *)NULL;
 
 
  /* Attempt to find and bind the arrow keys.  Do not override already
  /* Attempt to find and bind the arrow keys.  Do not override already
     bound keys in an overzealous attempt, however. */
     bound keys in an overzealous attempt, however. */
  xkeymap = _rl_keymap;
  xkeymap = _rl_keymap;
 
 
  _rl_keymap = emacs_standard_keymap;
  _rl_keymap = emacs_standard_keymap;
  _rl_bind_if_unbound (term_ku, rl_get_previous_history);
  _rl_bind_if_unbound (term_ku, rl_get_previous_history);
  _rl_bind_if_unbound (term_kd, rl_get_next_history);
  _rl_bind_if_unbound (term_kd, rl_get_next_history);
  _rl_bind_if_unbound (term_kr, rl_forward);
  _rl_bind_if_unbound (term_kr, rl_forward);
  _rl_bind_if_unbound (term_kl, rl_backward);
  _rl_bind_if_unbound (term_kl, rl_backward);
 
 
  _rl_bind_if_unbound (term_kh, rl_beg_of_line);        /* Home */
  _rl_bind_if_unbound (term_kh, rl_beg_of_line);        /* Home */
  _rl_bind_if_unbound (term_kH, rl_end_of_line);        /* End */
  _rl_bind_if_unbound (term_kH, rl_end_of_line);        /* End */
 
 
#if defined (VI_MODE)
#if defined (VI_MODE)
  _rl_keymap = vi_movement_keymap;
  _rl_keymap = vi_movement_keymap;
  _rl_bind_if_unbound (term_ku, rl_get_previous_history);
  _rl_bind_if_unbound (term_ku, rl_get_previous_history);
  _rl_bind_if_unbound (term_kd, rl_get_next_history);
  _rl_bind_if_unbound (term_kd, rl_get_next_history);
  _rl_bind_if_unbound (term_kr, rl_forward);
  _rl_bind_if_unbound (term_kr, rl_forward);
  _rl_bind_if_unbound (term_kl, rl_backward);
  _rl_bind_if_unbound (term_kl, rl_backward);
 
 
  _rl_bind_if_unbound (term_kh, rl_beg_of_line);        /* Home */
  _rl_bind_if_unbound (term_kh, rl_beg_of_line);        /* Home */
  _rl_bind_if_unbound (term_kH, rl_end_of_line);        /* End */
  _rl_bind_if_unbound (term_kH, rl_end_of_line);        /* End */
#endif /* VI_MODE */
#endif /* VI_MODE */
 
 
  _rl_keymap = xkeymap;
  _rl_keymap = xkeymap;
 
 
#endif /* !__GO32__ */
#endif /* !__GO32__ */
  return 0;
  return 0;
}
}
 
 
char *
char *
rl_get_termcap (cap)
rl_get_termcap (cap)
     char *cap;
     char *cap;
{
{
  register int i;
  register int i;
 
 
  if (tcap_initialized == 0)
  if (tcap_initialized == 0)
    return ((char *)NULL);
    return ((char *)NULL);
  for (i = 0; i < NUM_TC_STRINGS; i++)
  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)
      if (tc_strings[i].tc_var[0] == cap[0] && strcmp (tc_strings[i].tc_var, cap) == 0)
        return *(tc_strings[i].tc_value);
        return *(tc_strings[i].tc_value);
    }
    }
  return ((char *)NULL);
  return ((char *)NULL);
}
}
 
 
/* Re-initialize the terminal considering that the TERM/TERMCAP variable
/* Re-initialize the terminal considering that the TERM/TERMCAP variable
   has changed. */
   has changed. */
int
int
rl_reset_terminal (terminal_name)
rl_reset_terminal (terminal_name)
     char *terminal_name;
     char *terminal_name;
{
{
  _rl_init_terminal_io (terminal_name);
  _rl_init_terminal_io (terminal_name);
  return 0;
  return 0;
}
}
 
 
/* A function for the use of tputs () */
/* A function for the use of tputs () */
#ifdef _MINIX
#ifdef _MINIX
void
void
_rl_output_character_function (c)
_rl_output_character_function (c)
     int c;
     int c;
{
{
  putc (c, _rl_out_stream);
  putc (c, _rl_out_stream);
}
}
#else /* !_MINIX */
#else /* !_MINIX */
int
int
_rl_output_character_function (c)
_rl_output_character_function (c)
     int c;
     int c;
{
{
  return putc (c, _rl_out_stream);
  return putc (c, _rl_out_stream);
}
}
#endif /* !_MINIX */
#endif /* !_MINIX */
/* Write COUNT characters from STRING to the output stream. */
/* Write COUNT characters from STRING to the output stream. */
void
void
_rl_output_some_chars (string, count)
_rl_output_some_chars (string, count)
     char *string;
     char *string;
     int count;
     int count;
{
{
  fwrite (string, 1, count, _rl_out_stream);
  fwrite (string, 1, count, _rl_out_stream);
}
}
 
 
/* Move the cursor back. */
/* Move the cursor back. */
int
int
_rl_backspace (count)
_rl_backspace (count)
     int count;
     int count;
{
{
  register int i;
  register int i;
 
 
#if !defined (__GO32__)
#if !defined (__GO32__)
  if (term_backspace)
  if (term_backspace)
    for (i = 0; i < count; i++)
    for (i = 0; i < count; i++)
      tputs (term_backspace, 1, _rl_output_character_function);
      tputs (term_backspace, 1, _rl_output_character_function);
  else
  else
#endif /* !__GO32__ */
#endif /* !__GO32__ */
    for (i = 0; i < count; i++)
    for (i = 0; i < count; i++)
      putc ('\b', _rl_out_stream);
      putc ('\b', _rl_out_stream);
  return 0;
  return 0;
}
}
 
 
/* Move to the start of the next line. */
/* Move to the start of the next line. */
int
int
crlf ()
crlf ()
{
{
#if defined (NEW_TTY_DRIVER)
#if defined (NEW_TTY_DRIVER)
  if (term_cr)
  if (term_cr)
    tputs (term_cr, 1, _rl_output_character_function);
    tputs (term_cr, 1, _rl_output_character_function);
#endif /* NEW_TTY_DRIVER */
#endif /* NEW_TTY_DRIVER */
  putc ('\n', _rl_out_stream);
  putc ('\n', _rl_out_stream);
  return 0;
  return 0;
}
}
 
 
/* Ring the terminal bell. */
/* Ring the terminal bell. */
int
int
ding ()
ding ()
{
{
  if (readline_echoing_p)
  if (readline_echoing_p)
    {
    {
      switch (_rl_bell_preference)
      switch (_rl_bell_preference)
        {
        {
        case NO_BELL:
        case NO_BELL:
        default:
        default:
          break;
          break;
        case VISIBLE_BELL:
        case VISIBLE_BELL:
#if defined (__GO32__)
#if defined (__GO32__)
          ScreenVisualBell ();
          ScreenVisualBell ();
          break;
          break;
#else
#else
          if (visible_bell)
          if (visible_bell)
            {
            {
              tputs (visible_bell, 1, _rl_output_character_function);
              tputs (visible_bell, 1, _rl_output_character_function);
              break;
              break;
            }
            }
#endif
#endif
          /* FALLTHROUGH */
          /* FALLTHROUGH */
        case AUDIBLE_BELL:
        case AUDIBLE_BELL:
          fprintf (stderr, "\007");
          fprintf (stderr, "\007");
          fflush (stderr);
          fflush (stderr);
          break;
          break;
        }
        }
      return (0);
      return (0);
    }
    }
  return (-1);
  return (-1);
}
}
 
 
/* **************************************************************** */
/* **************************************************************** */
/*                                                                  */
/*                                                                  */
/*              Controlling the Meta Key and Keypad                 */
/*              Controlling the Meta Key and Keypad                 */
/*                                                                  */
/*                                                                  */
/* **************************************************************** */
/* **************************************************************** */
 
 
void
void
_rl_enable_meta_key ()
_rl_enable_meta_key ()
{
{
#if !defined(__DJGPP__)
#if !defined(__DJGPP__)
  if (term_has_meta && term_mm)
  if (term_has_meta && term_mm)
    tputs (term_mm, 1, _rl_output_character_function);
    tputs (term_mm, 1, _rl_output_character_function);
#endif
#endif
}
}
 
 
void
void
_rl_control_keypad (on)
_rl_control_keypad (on)
     int on;
     int on;
{
{
#if defined(__DJGPP__)
#if defined(__DJGPP__)
  on = on;
  on = on;
#else
#else
  if (on && term_ks)
  if (on && term_ks)
    tputs (term_ks, 1, _rl_output_character_function);
    tputs (term_ks, 1, _rl_output_character_function);
  else if (!on && term_ke)
  else if (!on && term_ke)
    tputs (term_ke, 1, _rl_output_character_function);
    tputs (term_ke, 1, _rl_output_character_function);
#endif
#endif
}
}
 
 

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.