|
0
|
1 /* Interface from Emacs to terminfo.
|
|
|
2 Copyright (C) 1985, 1986, 1993 Free Software Foundation, Inc.
|
|
|
3
|
|
|
4 This file is part of XEmacs.
|
|
|
5
|
|
|
6 XEmacs is free software; you can redistribute it and/or modify it
|
|
|
7 under the terms of the GNU General Public License as published by the
|
|
|
8 Free Software Foundation; either version 2, or (at your option) any
|
|
|
9 later version.
|
|
|
10
|
|
|
11 XEmacs is distributed in the hope that it will be useful, but WITHOUT
|
|
|
12 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
|
|
|
13 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
|
|
|
14 for more details.
|
|
|
15
|
|
|
16 You should have received a copy of the GNU General Public License
|
|
|
17 along with XEmacs; see the file COPYING. If not, write to
|
|
|
18 the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
|
|
|
19 Boston, MA 02111-1307, USA. */
|
|
|
20
|
|
|
21 /* Synched up with: FSF 19.30. */
|
|
|
22
|
|
|
23 #include <config.h>
|
|
|
24
|
|
|
25 #include <string.h>
|
|
|
26
|
|
|
27 /* Define these variables that serve as global parameters to termcap,
|
|
|
28 so that we do not need to conditionalize the places in Emacs
|
|
|
29 that set them. */
|
|
|
30
|
|
|
31 char *UP, *BC, PC;
|
|
|
32
|
|
|
33 /* Every little bit of this God-damned file has caused all manner
|
|
|
34 of headaches due to inconsistent and incorrect header files
|
|
|
35 on one system or other, and we don't currently need anything here,
|
|
|
36 so just comment the whole damn lot out!!! */
|
|
|
37
|
|
|
38 #ifndef HAVE_TERMIOS
|
|
|
39
|
|
|
40 #ifdef AIX
|
|
|
41 #include <termio.h>
|
|
|
42 #endif /* AIX */
|
|
|
43
|
|
|
44 /* Interface to curses/terminfo library.
|
|
|
45 Turns out that all of the terminfo-level routines look
|
|
|
46 like their termcap counterparts except for tparm, which replaces
|
|
|
47 tgoto. Not only is the calling sequence different, but the string
|
|
|
48 format is different too.
|
|
|
49 */
|
|
|
50
|
|
|
51 #ifdef HAVE_NCURSES_CURSES_H
|
|
|
52 #include <ncurses/curses.h>
|
|
|
53 #else
|
|
|
54 #include <curses.h>
|
|
|
55 #endif
|
|
|
56 #if !(defined (__GNUC__) && defined (SOLARIS2))
|
|
|
57 /* Sun, in their infinite lameness, supplies (possibly) broken headers
|
|
|
58 even under Solaris. GCC feels it necessary to correct things by
|
|
|
59 supplying its own headers. Unfortunately, if you build GCC under
|
|
|
60 one version of Solaris and then upgrade your Solaris, you may get
|
|
|
61 screwed because Sun in their continuing lameness changes curses.h
|
|
|
62 in such a way that the "fixed" GCC headers are now broken. (GCC
|
|
|
63 is equally lame in that it supplies "fixed" headers for curses.h
|
|
|
64 but not term.h.) However, it seems to work to just not include
|
|
|
65 term.h under Solaris, so we try that. KLUDGE! */
|
|
|
66 #ifdef HAVE_NCURSES_TERM_H
|
|
|
67 #include <ncurses/term.h>
|
|
|
68 #else
|
|
|
69 #include <term.h>
|
|
|
70 #endif
|
|
|
71 #endif
|
|
|
72
|
|
|
73 extern void *xmalloc (int size);
|
|
|
74
|
|
|
75 #if 0 /* If this isn't declared somewhere, too bad */
|
|
|
76 extern char * tparm (CONST char *string, int arg1, int arg2, int arg3,
|
|
|
77 int arg4, int arg5, int arg6, int arg7, int arg8,
|
|
|
78 int arg9);
|
|
|
79 #endif
|
|
|
80 /* XEmacs: renamed this function because just tparam() conflicts with
|
|
|
81 ncurses (We don't use this function anyway!) */
|
|
|
82 char *
|
|
|
83 emacs_tparam (CONST char *string, char *outstring, int len, int arg1,
|
|
|
84 int arg2, int arg3, int arg4, int arg5, int arg6, int arg7,
|
|
|
85 int arg8, int arg9)
|
|
|
86 {
|
|
|
87 char *temp;
|
|
|
88
|
|
|
89 temp = (char *) tparm (string, arg1, arg2, arg3, arg4, arg5, arg6, arg7,
|
|
|
90 arg8, arg9);
|
|
|
91 if (outstring == 0)
|
|
|
92 outstring = ((char *) (xmalloc ((strlen (temp)) + 1)));
|
|
|
93 strcpy (outstring, temp);
|
|
|
94 return outstring;
|
|
|
95 }
|
|
|
96
|
|
|
97 #endif /* not HAVE_TERMIOS */
|
