diff options
Diffstat (limited to 'contrib/texinfo/info/terminal.c')
| -rw-r--r-- | contrib/texinfo/info/terminal.c | 270 |
1 files changed, 113 insertions, 157 deletions
diff --git a/contrib/texinfo/info/terminal.c b/contrib/texinfo/info/terminal.c index f0e43bebfae79..fcf5137089d0c 100644 --- a/contrib/texinfo/info/terminal.c +++ b/contrib/texinfo/info/terminal.c @@ -1,8 +1,12 @@ -/* terminal.c -- How to handle the physical terminal for Info. - $Id: terminal.c,v 1.9 1998/02/22 00:05:15 karl Exp $ +/* terminal.c -- How to handle the physical terminal for Info. */ - Copyright (C) 1988, 89, 90, 91, 92, 93, 96, 97, 98 - Free Software Foundation, Inc. +/* This file is part of GNU Info, a program for reading online documentation + stored in Info format. + + This file has appeared in prior works by the Free Software Foundation; + thus it carries copyright dates from 1988 through 1993. + + Copyright (C) 1988, 89, 90, 91, 92, 93, 96 Free Software Foundation, Inc. This program is free software; you can redistribute it and/or modify it under the terms of the GNU General Public License as published by @@ -20,33 +24,20 @@ Written by Brian Fox (bfox@ai.mit.edu). */ -#include "info.h" +#include <stdio.h> +#include <stdlib.h> +#include <sys/types.h> #include "terminal.h" #include "termdep.h" -#include <sys/types.h> -#include <signal.h> +extern void *xmalloc (), *xrealloc (); /* The Unix termcap interface code. */ -#ifdef HAVE_NCURSES_TERMCAP_H -#include <ncurses/termcap.h> -#else -#ifdef HAVE_TERMCAP_H -#include <termcap.h> -#else -/* On Solaris2, sys/types.h #includes sys/reg.h, which #defines PC. - Unfortunately, PC is a global variable used by the termcap library. */ -#undef PC -/* Termcap requires these variables, whether we access them or not. */ -char *BC, *UP; -char PC; /* Pad character */ -short ospeed; /* Terminal output baud rate */ extern int tgetnum (), tgetflag (), tgetent (); extern char *tgetstr (), *tgoto (); +extern char *getenv (); extern void tputs (); -#endif /* not HAVE_TERMCAP_H */ -#endif /* not HAVE_NCURSES_TERMCAP_H */ /* Function "hooks". If you make one of these point to a function, that function is called when appropriate instead of its namesake. Your @@ -70,11 +61,20 @@ VFunction *terminal_write_chars_hook = (VFunction *)NULL; VFunction *terminal_scroll_terminal_hook = (VFunction *)NULL; /* **************************************************************** */ -/* */ -/* Terminal and Termcap */ -/* */ +/* */ +/* Terminal and Termcap */ +/* */ /* **************************************************************** */ +/* On Solaris2, sys/types.h #includes sys/reg.h, which #defines PC. + Unfortunately, PC is a global variable used by the termcap library. */ +#undef PC + +/* TERMCAP requires these variables, whether we access them or not. */ +char PC; +char *BC, *UP; +short ospeed; + /* A buffer which holds onto the current terminal description, and a pointer used to float within it. */ static char *term_buffer = (char *)NULL; @@ -85,8 +85,6 @@ static char *term_goto, *term_clreol, *term_cr, *term_clrpag; static char *term_begin_use, *term_end_use; static char *term_AL, *term_DL, *term_al, *term_dl; -static char *term_keypad_on, *term_keypad_off; - /* How to go up a line. */ static char *term_up; @@ -111,15 +109,17 @@ static char *term_invbeg; /* The string to turn off inverse mode, if this term has one. */ static char *term_invend; -/* Although I can't find any documentation that says this is supposed to - return its argument, all the code I've looked at (termutils, less) - does so, so fine. */ -static int +/* The string to turn on keypad transmit mode, if this term has one. */ +static char *term_ks; + +/* The string to turn off keypad transmit mode, if this term has one. */ +static char *term_ke; + +static void output_character_function (c) int c; { putc (c, stdout); - return c; } /* Macro to send STRING to the terminal. */ @@ -129,65 +129,29 @@ output_character_function (c) tputs (string, 1, output_character_function); \ } while (0) -/* Tell the terminal that we will be doing cursor addressable motion. */ +/* Tell the terminal that we will be doing cursor addressable motion. */ static void terminal_begin_using_terminal () { - RETSIGTYPE (*sigsave) (); - - if (term_keypad_on) - send_to_terminal (term_keypad_on); - - if (!term_begin_use || !*term_begin_use) - return; - -#ifdef SIGWINCH - sigsave = signal (SIGWINCH, SIG_IGN); -#endif - send_to_terminal (term_begin_use); - /* Without this fflush and sleep, running info in a shelltool or - cmdtool (TERM=sun-cmd) with scrollbars loses -- the scrollbars are - not restored properly. - From: strube@physik3.gwdg.de (Hans Werner Strube). */ - fflush (stdout); - sleep (1); - -#ifdef SIGWINCH - signal (SIGWINCH, sigsave); -#endif + if (term_ks) + send_to_terminal(term_ks); } -/* Tell the terminal that we will not be doing any more cursor - addressable motion. */ +/* Tell the terminal that we will not be doing any more cursor addressable + motion. */ static void terminal_end_using_terminal () { - RETSIGTYPE (*sigsave) (); - - if (term_keypad_off) - send_to_terminal (term_keypad_off); - - if (!term_end_use || !*term_end_use) - return; - -#ifdef SIGWINCH - sigsave = signal (SIGWINCH, SIG_IGN); -#endif - + if (term_ke) + send_to_terminal(term_ke); send_to_terminal (term_end_use); - fflush (stdout); - sleep (1); - -#ifdef SIGWINCH - signal (SIGWINCH, sigsave); -#endif } /* **************************************************************** */ -/* */ -/* Necessary Terminal Functions */ -/* */ +/* */ +/* Necessary Terminal Functions */ +/* */ /* **************************************************************** */ /* The functions and variables on this page implement the user visible @@ -216,8 +180,11 @@ char *term_ku = (char *)NULL; char *term_kd = (char *)NULL; char *term_kr = (char *)NULL; char *term_kl = (char *)NULL; -char *term_kP = (char *)NULL; /* page-up */ -char *term_kN = (char *)NULL; /* page-down */ +char *term_kP = (char *)NULL; +char *term_kN = (char *)NULL; +char *term_kh = (char *)NULL; +char *term_kH = (char *)NULL; + /* Move the cursor to the terminal location of X and Y. */ void @@ -229,7 +196,7 @@ terminal_goto_xy (x, y) else { if (term_goto) - tputs (tgoto (term_goto, x, y), 1, output_character_function); + tputs (tgoto (term_goto, x, y), 1, output_character_function); } } @@ -257,7 +224,7 @@ terminal_write_chars (string, nchars) else { if (nchars) - fwrite (string, 1, nchars, stdout); + fwrite (string, 1, nchars, stdout); } } @@ -343,9 +310,9 @@ terminal_ring_bell () else { if (terminal_has_visible_bell_p && terminal_use_visible_bell_p) - send_to_terminal (visible_bell); + send_to_terminal (visible_bell); else - send_to_terminal (audible_bell); + send_to_terminal (audible_bell); } } @@ -367,7 +334,7 @@ terminal_delete_lines (start, count) else { while (count--) - tputs (term_dl, lines, output_character_function); + tputs (term_dl, lines, output_character_function); } fflush (stdout); @@ -392,7 +359,7 @@ terminal_insert_lines (start, count) else { while (count--) - tputs (term_al, lines, output_character_function); + tputs (term_al, lines, output_character_function); } fflush (stdout); @@ -418,22 +385,22 @@ terminal_scroll_terminal (start, end, amount) else { /* If we are scrolling down, delete AMOUNT lines at END. Then insert - AMOUNT lines at START. */ + AMOUNT lines at START. */ if (amount > 0) - { - terminal_delete_lines (end, amount); - terminal_insert_lines (start, amount); - } + { + terminal_delete_lines (end, amount); + terminal_insert_lines (start, amount); + } /* If we are scrolling up, delete AMOUNT lines before START. This - actually does the upwards scroll. Then, insert AMOUNT lines - after the already scrolled region (i.e., END - AMOUNT). */ + actually does the upwards scroll. Then, insert AMOUNT lines + after the already scrolled region (i.e., END - AMOUNT). */ if (amount < 0) - { - int abs_amount = -amount; - terminal_delete_lines (start - abs_amount, abs_amount); - terminal_insert_lines (end - abs_amount, abs_amount); - } + { + int abs_amount = -amount; + terminal_delete_lines (start - abs_amount, abs_amount); + terminal_insert_lines (end - abs_amount, abs_amount); + } } } @@ -463,55 +430,55 @@ terminal_get_screen_size () #if defined (TIOCGWINSZ) { - struct winsize window_size; + struct winsize window_size; - if (ioctl (fileno (stdout), TIOCGWINSZ, &window_size) == 0) - { - screenwidth = (int) window_size.ws_col; - screenheight = (int) window_size.ws_row; - } + if (ioctl (fileno (stdout), TIOCGWINSZ, &window_size) == 0) + { + screenwidth = (int) window_size.ws_col; + screenheight = (int) window_size.ws_row; + } } -#endif /* TIOCGWINSZ */ +#endif /* TIOCGWINSZ */ /* Environment variable COLUMNS overrides setting of "co". */ if (screenwidth <= 0) - { - char *sw = getenv ("COLUMNS"); + { + char *sw = getenv ("COLUMNS"); - if (sw) - screenwidth = atoi (sw); + if (sw) + screenwidth = atoi (sw); - if (screenwidth <= 0) - screenwidth = tgetnum ("co"); - } + if (screenwidth <= 0) + screenwidth = tgetnum ("co"); + } /* Environment variable LINES overrides setting of "li". */ if (screenheight <= 0) - { - char *sh = getenv ("LINES"); + { + char *sh = getenv ("LINES"); - if (sh) - screenheight = atoi (sh); + if (sh) + screenheight = atoi (sh); - if (screenheight <= 0) - screenheight = tgetnum ("li"); - } + if (screenheight <= 0) + screenheight = tgetnum ("li"); + } /* If all else fails, default to 80x24 terminal. */ if (screenwidth <= 0) - screenwidth = 80; + screenwidth = 80; if (screenheight <= 0) - screenheight = 24; + screenheight = 24; } } -/* Initialize the terminal which is known as TERMINAL_NAME. If this - terminal doesn't have cursor addressability, `terminal_is_dumb_p' - becomes nonzero. The variables SCREENHEIGHT and SCREENWIDTH are set - to the dimensions that this terminal actually has. The variable - TERMINAL_HAS_META_P becomes nonzero if this terminal supports a Meta - key. Finally, the terminal screen is cleared. */ +/* Initialize the terminal which is known as TERMINAL_NAME. If this terminal + doesn't have cursor addressability, TERMINAL_IS_DUMB_P becomes non-zero. + The variables SCREENHEIGHT and SCREENWIDTH are set to the dimensions that + this terminal actually has. The variable TERMINAL_HAS_META_P becomes non- + zero if this terminal supports a Meta key. Finally, the terminal screen is + cleared. */ void terminal_initialize_terminal (terminal_name) char *terminal_name; @@ -549,7 +516,7 @@ terminal_initialize_terminal (terminal_name) term_cr = "\r"; term_up = term_dn = audible_bell = visible_bell = (char *)NULL; term_ku = term_kd = term_kl = term_kr = (char *)NULL; - term_kP = term_kN = (char *)NULL; + term_kP = term_kN = term_kh = term_kH = (char *)NULL; return; } @@ -567,7 +534,7 @@ terminal_initialize_terminal (terminal_name) } #else ospeed = B9600; -#endif /* !TIOCGETP */ +#endif /* !TIOCGETP */ term_cr = tgetstr ("cr", &buffer); term_clreol = tgetstr ("ce", &buffer); @@ -603,9 +570,6 @@ terminal_initialize_terminal (terminal_name) term_begin_use = tgetstr ("ti", &buffer); term_end_use = tgetstr ("te", &buffer); - term_keypad_on = tgetstr ("ks", &buffer); - term_keypad_off = tgetstr ("ke", &buffer); - /* Check to see if this terminal has a meta key. */ terminal_has_meta_p = (tgetflag ("km") || tgetflag ("MT")); if (terminal_has_meta_p) @@ -619,24 +583,31 @@ terminal_initialize_terminal (terminal_name) term_mo = (char *)NULL; } - /* Attempt to find the arrow keys. */ + /* Attempt to find the arrow keys. */ term_ku = tgetstr ("ku", &buffer); term_kd = tgetstr ("kd", &buffer); term_kr = tgetstr ("kr", &buffer); term_kl = tgetstr ("kl", &buffer); - term_kP = tgetstr ("kP", &buffer); term_kN = tgetstr ("kN", &buffer); + term_kh = tgetstr ("kh", &buffer); + term_kH = tgetstr ("kH", &buffer); + + /* Enable keypad and cursor keys if ks defined */ + term_ks = tgetstr ("ks", &buffer); + term_ke = tgetstr ("ke", &buffer); /* If this terminal is not cursor addressable, then it is really dumb. */ if (!term_goto) terminal_is_dumb_p = 1; + + terminal_begin_using_terminal (); } /* **************************************************************** */ -/* */ -/* How to Read Characters From the Terminal */ -/* */ +/* */ +/* How to Read Characters From the Terminal */ +/* */ /* **************************************************************** */ #if defined (TIOCGETC) @@ -677,8 +648,6 @@ terminal_prep_terminal () return; } - terminal_begin_using_terminal (); - tty = fileno (stdin); #if defined (HAVE_TERMIOS_H) @@ -693,14 +662,7 @@ terminal_prep_terminal () #if defined (HAVE_TERMIOS_H) || defined (HAVE_TERMIO_H) ttybuff.c_iflag &= (~ISTRIP & ~INLCR & ~IGNCR & ~ICRNL & ~IXON); -/* These output flags are not part of POSIX, so only use them if they - are defined. */ -#ifdef ONLCR - ttybuff.c_oflag &= ~ONLCR ; -#endif -#ifdef OCRNL - ttybuff.c_oflag &= ~OCRNL; -#endif + ttybuff.c_oflag &= (~ONLCR); ttybuff.c_lflag &= (~ICANON & ~ECHO); ttybuff.c_cc[VMIN] = 1; @@ -711,12 +673,7 @@ terminal_prep_terminal () if (ttybuff.c_cc[VQUIT] == '\177') ttybuff.c_cc[VQUIT] = -1; - -#ifdef VLNEXT - if (ttybuff.c_cc[VLNEXT] == '\026') - ttybuff.c_cc[VLNEXT] = -1; -#endif /* VLNEXT */ -#endif /* TERMIOS or TERMIO */ +#endif #if defined (HAVE_TERMIOS_H) tcsetattr (tty, TCSANOW, &ttybuff); @@ -780,9 +737,9 @@ terminal_prep_terminal () temp = original_ltchars; /* Make the interrupt keys go away. Just enough to make people happy. */ - temp.t_lnextc = -1; /* C-v. */ - temp.t_dsuspc = -1; /* C-y. */ - temp.t_flushc = -1; /* C-o. */ + temp.t_lnextc = -1; /* C-v. */ + temp.t_dsuspc = -1; /* C-y. */ + temp.t_flushc = -1; /* C-o. */ ioctl (tty, TIOCSLTC, &temp); } # endif /* TIOCGLTC */ @@ -834,4 +791,3 @@ terminal_unprep_terminal () #endif /* !HAVE_TERMIOS_H */ terminal_end_using_terminal (); } - |