Deleted Added
sdiff udiff text old ( 47574 ) new ( 58314 )
full compact
1/* $FreeBSD: head/contrib/libreadline/terminal.c 58314 2000-03-19 22:00:57Z ache $ */
2/* terminal.c -- controlling the terminal with termcap. */
3
4/* Copyright (C) 1996 Free Software Foundation, Inc.
5
6 This file is part of the GNU Readline Library, a library for
7 reading lines of text with interactive input and history editing.
8
9 The GNU Readline Library is free software; you can redistribute it
10 and/or modify it under the terms of the GNU General Public License
10 as published by the Free Software Foundation; either version 1, or
11 as published by the Free Software Foundation; either version 2, or
12 (at your option) any later version.
13
14 The GNU Readline Library is distributed in the hope that it will be
15 useful, but WITHOUT ANY WARRANTY; without even the implied warranty
16 of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
17 GNU General Public License for more details.
18
19 The GNU General Public License is often shipped with GNU software, and
20 is generally kept in a file called COPYING or LICENSE. If you do not
21 have a copy of the license, write to the Free Software Foundation,
21 675 Mass Ave, Cambridge, MA 02139, USA. */
22 59 Temple Place, Suite 330, Boston, MA 02111 USA. */
23#define READLINE_LIBRARY
24
25#if defined (HAVE_CONFIG_H)
26# include <config.h>
27#endif
28
29#include <sys/types.h>
30#include "posixstat.h"

--- 11 unchanged lines hidden (view full) ---

42#else
43# include "ansi_stdlib.h"
44#endif /* HAVE_STDLIB_H */
45
46#if defined (HAVE_LOCALE_H)
47# include <locale.h>
48#endif
49
49#include <signal.h>
50#include <stdio.h>
51#include <setjmp.h>
51
52/* System-specific feature definitions and include files. */
53#include "rldefs.h"
54
55#if defined (GWINSZ_IN_SYS_IOCTL) && !defined (TIOCGWINSZ)
56# include <sys/ioctl.h>
57#endif /* GWINSZ_IN_SYS_IOCTL && !TIOCGWINSZ */
58
59#include "rltty.h"
60#include "tcap.h"
61
62/* Some standard library routines. */
63#include "readline.h"
64#include "history.h"
65
67/* Variables and functions imported from readline.c */
68extern FILE *_rl_in_stream, *_rl_out_stream;
69extern int readline_echoing_p;
70extern int _rl_bell_preference;
71extern Keymap _rl_keymap;
66#include "rlprivate.h"
67#include "rlshell.h"
68
73/* Functions imported from bind.c */
74extern void _rl_bind_if_unbound ();
75
76/* Functions imported from shell.c */
77extern void set_lines_and_columns ();
78extern char *get_env_value ();
79
69/* **************************************************************** */
70/* */
71/* Terminal and Termcap */
72/* */
73/* **************************************************************** */
74
75static char *term_buffer = (char *)NULL;
76static char *term_string_buffer = (char *)NULL;

--- 56 unchanged lines hidden (view full) ---

133int screenwidth, screenheight, screenchars;
134
135/* Non-zero means the user wants to enable the keypad. */
136int _rl_enable_keypad;
137
138/* Non-zero means the user wants to enable a meta key. */
139int _rl_enable_meta = 1;
140
141#if defined (__EMX__)
142static void
143_emx_get_screensize (swp, shp)
144 int *swp, *shp;
145{
146 int sz[2];
147
148 _scrsize (sz);
149
150 if (swp)
151 *swp = sz[0];
152 if (shp)
153 *shp = sz[1];
154}
155#endif
156
157/* Get readline's idea of the screen size. TTY is a file descriptor open
158 to the terminal. If IGNORE_ENV is true, we do not pay attention to the
159 values of $LINES and $COLUMNS. The tests for TERM_STRING_BUFFER being
160 non-null serve to check whether or not we have initialized termcap. */
161void
162_rl_get_screen_size (tty, ignore_env)
163 int tty, ignore_env;
164{
165 char *ss;
166#if defined (TIOCGWINSZ)
167 struct winsize window_size;
168#endif /* TIOCGWINSZ */
164#if defined (__EMX__)
165 int sz[2];
166#endif
169
170#if defined (TIOCGWINSZ)
171 if (ioctl (tty, TIOCGWINSZ, &window_size) == 0)
172 {
173 screenwidth = (int) window_size.ws_col;
174 screenheight = (int) window_size.ws_row;
175 }
176#endif /* TIOCGWINSZ */
177
178#if defined (__EMX__)
177 _scrsize (sz);
178 screenwidth = sz[0];
179 screenheight = sz[1];
179 _emx_get_screensize (&screenwidth, &screenheight);
180#endif
181
182 /* Environment variable COLUMNS overrides setting of "co" if IGNORE_ENV
183 is unset. */
184 if (screenwidth <= 0)
185 {
186 if (ignore_env == 0 && (ss = get_env_value ("COLUMNS")))
187 screenwidth = atoi (ss);
188
189#if !defined (__DJGPP__)
190 if (screenwidth <= 0 && term_string_buffer)
191 screenwidth = tgetnum ("co");
192#endif
193 }
194
195 /* Environment variable LINES overrides setting of "li" if IGNORE_ENV
196 is unset. */
197 if (screenheight <= 0)
198 {
199 if (ignore_env == 0 && (ss = get_env_value ("LINES")))
200 screenheight = atoi (ss);
201
202#if !defined (__DJGPP__)
203 if (screenheight <= 0 && term_string_buffer)
204 screenheight = tgetnum ("li");
205#endif
206 }
207
208 /* If all else fails, default to 80x24 terminal. */
209 if (screenwidth <= 1)
210 screenwidth = 80;
211
212 if (screenheight <= 0)
213 screenheight = 24;
214
215 /* If we're being compiled as part of bash, set the environment
216 variables $LINES and $COLUMNS to new values. Otherwise, just
217 do a pair of putenv () or setenv () calls. */
218 set_lines_and_columns (screenheight, screenwidth);
219
216 if (!_rl_term_autowrap)
220 if (_rl_term_autowrap == 0)
221 screenwidth--;
222
223 screenchars = screenwidth * screenheight;
224}
225
226void
227_rl_set_screen_size (rows, cols)
228 int rows, cols;

--- 21 unchanged lines hidden (view full) ---

250 char *tc_var;
251 char **tc_value;
252};
253
254/* This should be kept sorted, just in case we decide to change the
255 search algorithm to something smarter. */
256static struct _tc_string tc_strings[] =
257{
254 "DC", &term_DC,
255 "IC", &term_IC,
256 "ce", &term_clreol,
257 "cl", &term_clrpag,
258 "cr", &term_cr,
259 "dc", &term_dc,
260 "ei", &term_ei,
261 "ic", &term_ic,
262 "im", &term_im,
263 "kd", &term_kd,
264 "kh", &term_kh, /* home */
265 "@7", &term_kH, /* end */
266 "kl", &term_kl,
267 "kr", &term_kr,
268 "ku", &term_ku,
269 "ks", &term_ks,
270 "ke", &term_ke,
271 "le", &term_backspace,
272 "mm", &term_mm,
273 "mo", &term_mo,
258 { "DC", &term_DC },
259 { "IC", &term_IC },
260 { "ce", &term_clreol },
261 { "cl", &term_clrpag },
262 { "cr", &term_cr },
263 { "dc", &term_dc },
264 { "ei", &term_ei },
265 { "ic", &term_ic },
266 { "im", &term_im },
267 { "kd", &term_kd },
268 { "kh", &term_kh }, /* home */
269 { "@7", &term_kH }, /* end */
270 { "kl", &term_kl },
271 { "kr", &term_kr },
272 { "ku", &term_ku },
273 { "ks", &term_ks },
274 { "ke", &term_ke },
275 { "le", &term_backspace },
276 { "mm", &term_mm },
277 { "mo", &term_mo },
278#if defined (HACK_TERMCAP_MOTION)
275 "nd", &term_forward_char,
279 { "nd", &term_forward_char },
280#endif
277 "pc", &term_pc,
278 "up", &term_up,
279 "vb", &visible_bell,
281 { "pc", &term_pc },
282 { "up", &term_up },
283 { "vb", &visible_bell },
284};
285
286#define NUM_TC_STRINGS (sizeof (tc_strings) / sizeof (struct _tc_string))
287
288/* Read the desired terminal capability strings into BP. The capabilities
289 are described in the TC_STRINGS table. */
290static void
291get_term_capabilities (bp)
292 char **bp;
293{
294#if !defined (__DJGPP__) /* XXX - doesn't DJGPP have a termcap library? */
295 register int i;
296
297 for (i = 0; i < NUM_TC_STRINGS; i++)
298 *(tc_strings[i].tc_value) = tgetstr (tc_strings[i].tc_var, bp);
299#endif
300 tcap_initialized = 1;
301}
302
303#define CUSTOM_REDISPLAY_FUNC() (rl_redisplay_function != rl_redisplay)
304#define CUSTOM_INPUT_FUNC() (rl_getc_function != rl_getc)
305
306int
307_rl_init_terminal_io (terminal_name)
308 char *terminal_name;
309{
301#if defined (__GO32__)
302 screenwidth = ScreenCols ();
303 screenheight = ScreenRows ();
304 screenchars = screenwidth * screenheight;
305 term_cr = "\r";
306 term_im = term_ei = term_ic = term_IC = (char *)NULL;
307 term_up = term_dc = term_DC = visible_bell = (char *)NULL;
308
309 /* Does the __GO32__ have a meta key? I don't know. */
310 term_has_meta = 0;
311 term_mm = term_mo = (char *)NULL;
312
313 /* It probably has arrow keys, but I don't know what they are. */
314 term_ku = term_kd = term_kr = term_kl = (char *)NULL;
315
316#if defined (HACK_TERMCAP_MOTION)
317 term_forward_char = (char *)NULL;
318#endif /* HACK_TERMCAP_MOTION */
319 terminal_can_insert = _rl_term_autowrap = 0;
320 return;
321#else /* !__GO32__ */
322
310 char *term, *buffer;
324 int tty;
311 int tty, tgetent_ret;
312 Keymap xkeymap;
313
314 term = terminal_name ? terminal_name : get_env_value ("TERM");
315 term_clrpag = term_cr = term_clreol = (char *)NULL;
316 tty = rl_instream ? fileno (rl_instream) : 0;
317 screenwidth = screenheight = 0;
318
329 if (term_string_buffer == 0)
330 term_string_buffer = xmalloc (2032);
319 if (term == 0)
320 term = "dumb";
321
332 if (term_buffer == 0)
333 term_buffer = xmalloc (4080);
322 /* I've separated this out for later work on not calling tgetent at all
323 if the calling application has supplied a custom redisplay function,
324 (and possibly if the application has supplied a custom input function). */
325 if (CUSTOM_REDISPLAY_FUNC())
326 {
327 tgetent_ret = -1;
328 }
329 else
330 {
331 if (term_string_buffer == 0)
332 term_string_buffer = xmalloc(2032);
333
335 buffer = term_string_buffer;
334 if (term_buffer == 0)
335 term_buffer = xmalloc(4080);
336
337 term_clrpag = term_cr = term_clreol = (char *)NULL;
337 buffer = term_string_buffer;
338
339 if (term == 0)
340 term = "dumb";
339 tgetent_ret = tgetent (term_buffer, term);
340 }
341
342 if (tgetent (term_buffer, term) <= 0)
342 if (tgetent_ret <= 0)
343 {
344 FREE (term_string_buffer);
345 FREE (term_buffer);
346 buffer = term_buffer = term_string_buffer = (char *)NULL;
347
348 dumb_term = 1;
345 screenwidth = 79;
346 screenheight = 24;
347 screenchars = 79 * 24;
349 _rl_term_autowrap = 0; /* used by _rl_get_screen_size */
350
351#if defined (__EMX__)
352 _emx_get_screensize (&screenwidth, &screenheight);
353 screenwidth--;
354#else /* !__EMX__ */
355 _rl_get_screen_size (tty, 0);
356#endif /* !__EMX__ */
357
358 /* Defaults. */
359 if (screenwidth <= 0 || screenheight <= 0)
360 {
361 screenwidth = 79;
362 screenheight = 24;
363 }
364
365 /* Everything below here is used by the redisplay code (tputs). */
366 screenchars = screenwidth * screenheight;
367 term_cr = "\r";
368 term_im = term_ei = term_ic = term_IC = (char *)NULL;
369 term_up = term_dc = term_DC = visible_bell = (char *)NULL;
370 term_ku = term_kd = term_kl = term_kr = (char *)NULL;
371 term_mm = term_mo = (char *)NULL;
372#if defined (HACK_TERMCAP_MOTION)
373 term_forward_char = (char *)NULL;
374#endif
355 terminal_can_insert = 0;
375 terminal_can_insert = term_has_meta = 0;
376
377 /* Reasonable defaults for tgoto(). Readline currently only uses
378 tgoto if term_IC or term_DC is defined, but just in case we
379 change that later... */
380 PC = '\0';
381 BC = term_backspace = "\b";
382 UP = term_up;
383
384 return 0;
385 }
386
387 get_term_capabilities (&buffer);
388
389 /* Set up the variables that the termcap library expects the application
390 to provide. */
391 PC = term_pc ? *term_pc : 0;
392 BC = term_backspace;
393 UP = term_up;
394
395 if (!term_cr)
396 term_cr = "\r";
397
370 tty = rl_instream ? fileno (rl_instream) : 0;
371
372 screenwidth = screenheight = 0;
373
398 _rl_term_autowrap = tgetflag ("am") && tgetflag ("xn");
399
400 _rl_get_screen_size (tty, 0);
401
402 /* "An application program can assume that the terminal can do
403 character insertion if *any one of* the capabilities `IC',
404 `im', `ic' or `ip' is provided." But we can't do anything if
405 only `ip' is provided, so... */

--- 26 unchanged lines hidden (view full) ---

432 _rl_bind_if_unbound (term_kl, rl_backward);
433
434 _rl_bind_if_unbound (term_kh, rl_beg_of_line); /* Home */
435 _rl_bind_if_unbound (term_kH, rl_end_of_line); /* End */
436#endif /* VI_MODE */
437
438 _rl_keymap = xkeymap;
439
416#endif /* !__GO32__ */
440 return 0;
441}
442
443char *
444rl_get_termcap (cap)
445 char *cap;
446{
447 register int i;

--- 29 unchanged lines hidden (view full) ---

477#else /* !_MINIX */
478int
479_rl_output_character_function (c)
480 int c;
481{
482 return putc (c, _rl_out_stream);
483}
484#endif /* !_MINIX */
485
486/* Write COUNT characters from STRING to the output stream. */
487void
488_rl_output_some_chars (string, count)
489 char *string;
490 int count;
491{
492 fwrite (string, 1, count, _rl_out_stream);
493}
494
495/* Move the cursor back. */
496int
497_rl_backspace (count)
498 int count;
499{
500 register int i;
501
478#if !defined (__GO32__)
502 if (term_backspace)
503 for (i = 0; i < count; i++)
504 tputs (term_backspace, 1, _rl_output_character_function);
505 else
483#endif /* !__GO32__ */
506 for (i = 0; i < count; i++)
507 putc ('\b', _rl_out_stream);
508 return 0;
509}
510
511/* Move to the start of the next line. */
512int
513crlf ()

--- 7 unchanged lines hidden (view full) ---

521}
522
523/* Ring the terminal bell. */
524int
525ding ()
526{
527 if (readline_echoing_p)
528 {
507#if !defined (__GO32__)
529 switch (_rl_bell_preference)
530 {
531 case NO_BELL:
532 default:
533 break;
534 case VISIBLE_BELL:
535 if (visible_bell)
536 {
537 tputs (visible_bell, 1, _rl_output_character_function);
538 break;
539 }
540 /* FALLTHROUGH */
541 case AUDIBLE_BELL:
542 fprintf (stderr, "\007");
543 fflush (stderr);
544 break;
545 }
525#else /* __GO32__ */
526 fprintf (stderr, "\007");
527 fflush (stderr);
528#endif /* __GO32__ */
546 return (0);
547 }
548 return (-1);
549}
550
551/* **************************************************************** */
552/* */
553/* Controlling the Meta Key and Keypad */
554/* */
555/* **************************************************************** */
556
557void
558_rl_enable_meta_key ()
559{
560#if !defined (__DJGPP__)
561 if (term_has_meta && term_mm)
562 tputs (term_mm, 1, _rl_output_character_function);
563#endif
564}
565
566void
567_rl_control_keypad (on)
568 int on;
569{
570#if !defined (__DJGPP__)
571 if (on && term_ks)
572 tputs (term_ks, 1, _rl_output_character_function);
573 else if (!on && term_ke)
574 tputs (term_ke, 1, _rl_output_character_function);
575#endif
576}