Commit | Line | Data |
---|---|---|
d427b66a | 1 | /* Interface from Emacs to terminfo. |
ba318903 | 2 | Copyright (C) 1985-1986, 2001-2014 Free Software Foundation, Inc. |
d427b66a JB |
3 | |
4 | This file is part of GNU Emacs. | |
5 | ||
9ec0b715 | 6 | GNU Emacs is free software: you can redistribute it and/or modify |
d427b66a | 7 | it under the terms of the GNU General Public License as published by |
9ec0b715 GM |
8 | the Free Software Foundation, either version 3 of the License, or |
9 | (at your option) any later version. | |
d427b66a JB |
10 | |
11 | GNU Emacs is distributed in the hope that it will be useful, | |
12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
13 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
14 | GNU General Public License for more details. | |
15 | ||
16 | You should have received a copy of the GNU General Public License | |
9ec0b715 | 17 | along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */ |
d427b66a | 18 | |
d676eef3 | 19 | #include <config.h> |
af8a867c PE |
20 | #include "tparam.h" |
21 | ||
495de6e9 | 22 | #include "lisp.h" |
d676eef3 | 23 | |
d427b66a JB |
24 | /* Define these variables that serve as global parameters to termcap, |
25 | so that we do not need to conditionalize the places in Emacs | |
26 | that set them. */ | |
27 | ||
28 | char *UP, *BC, PC; | |
d676eef3 | 29 | |
d427b66a JB |
30 | /* Interface to curses/terminfo library. |
31 | Turns out that all of the terminfo-level routines look | |
32 | like their termcap counterparts except for tparm, which replaces | |
33 | tgoto. Not only is the calling sequence different, but the string | |
34 | format is different too. | |
35 | */ | |
36 | ||
af8a867c PE |
37 | extern char *tparm (const char *str, ...); |
38 | ||
39 | ||
d427b66a | 40 | char * |
af8a867c PE |
41 | tparam (const char *string, char *outstring, int len, |
42 | int arg1, int arg2, int arg3, int arg4) | |
d427b66a JB |
43 | { |
44 | char *temp; | |
d427b66a | 45 | |
af8a867c PE |
46 | /* Emacs always should pass a null OUTSTRING and zero LEN. */ |
47 | if (outstring || len) | |
1088b922 | 48 | emacs_abort (); |
ab5796a9 | 49 | |
af8a867c PE |
50 | temp = tparm (string, arg1, arg2, arg3, arg4); |
51 | return xstrdup (temp); | |
52 | } |