bc618cd5623792ae66d34ca2ea885ec0091d6d53
[ncurses.git] / ncurses / tinfo / lib_ti.c
1 /****************************************************************************
2  * Copyright (c) 1998-2003,2009 Free Software Foundation, Inc.              *
3  *                                                                          *
4  * Permission is hereby granted, free of charge, to any person obtaining a  *
5  * copy of this software and associated documentation files (the            *
6  * "Software"), to deal in the Software without restriction, including      *
7  * without limitation the rights to use, copy, modify, merge, publish,      *
8  * distribute, distribute with modifications, sublicense, and/or sell       *
9  * copies of the Software, and to permit persons to whom the Software is    *
10  * furnished to do so, subject to the following conditions:                 *
11  *                                                                          *
12  * The above copyright notice and this permission notice shall be included  *
13  * in all copies or substantial portions of the Software.                   *
14  *                                                                          *
15  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS  *
16  * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF               *
17  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.   *
18  * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM,   *
19  * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR    *
20  * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR    *
21  * THE USE OR OTHER DEALINGS IN THE SOFTWARE.                               *
22  *                                                                          *
23  * Except as contained in this notice, the name(s) of the above copyright   *
24  * holders shall not be used in advertising or otherwise to promote the     *
25  * sale, use or other dealings in this Software without prior written       *
26  * authorization.                                                           *
27  ****************************************************************************/
28
29 /****************************************************************************
30  *  Author: Zeyd M. Ben-Halim <zmbenhal@netcom.com> 1992,1995               *
31  *     and: Eric S. Raymond <esr@snark.thyrsus.com>                         *
32  *     and: Thomas E. Dickey                        1996-on                 *
33  ****************************************************************************/
34
35 #include <curses.priv.h>
36
37 #include <term_entry.h>
38 #include <tic.h>
39
40 MODULE_ID("$Id: lib_ti.c,v 1.28 2009/10/24 21:56:58 tom Exp $")
41
42 #if 0
43 static bool
44 same_name(const char *a, const char *b)
45 {
46     fprintf(stderr, "compare(%s,%s)\n", a, b);
47     return !strcmp(a, b);
48 }
49 #else
50 #define same_name(a,b) !strcmp(a,b)
51 #endif
52
53 NCURSES_EXPORT(int)
54 NCURSES_SP_NAME(tigetflag) (NCURSES_SP_DCLx NCURSES_CONST char *str)
55 {
56     int result = ABSENT_BOOLEAN;
57     int i, j;
58
59     T((T_CALLED("tigetflag(%p, %s)"), (void *) SP_PARM, str));
60
61     if (HasTInfoTerminal(SP_PARM)) {
62         TERMTYPE *tp = &(TerminalOf(SP_PARM)->type);
63         struct name_table_entry const *entry_ptr;
64
65         entry_ptr = _nc_find_type_entry(str, BOOLEAN, FALSE);
66         if (entry_ptr != 0) {
67             j = entry_ptr->nte_index;
68         }
69 #if NCURSES_XNAMES
70         else {
71             j = -1;
72             for_each_ext_boolean(i, tp) {
73                 const char *capname = ExtBoolname(tp, i, boolnames);
74                 if (same_name(str, capname)) {
75                     j = i;
76                     break;
77                 }
78             }
79         }
80 #endif
81         if (j >= 0) {
82             /* note: setupterm forces invalid booleans to false */
83             result = tp->Booleans[j];
84         }
85     }
86
87     returnCode(result);
88 }
89
90 #if NCURSES_SP_FUNCS
91 NCURSES_EXPORT(int)
92 tigetflag(NCURSES_CONST char *str)
93 {
94     return NCURSES_SP_NAME(tigetflag) (CURRENT_SCREEN, str);
95 }
96 #endif
97
98 NCURSES_EXPORT(int)
99 NCURSES_SP_NAME(tigetnum) (NCURSES_SP_DCLx NCURSES_CONST char *str)
100 {
101     int i, j;
102     int result = CANCELLED_NUMERIC;     /* Solaris returns a -1 on error */
103
104     T((T_CALLED("tigetnum(%p, %s)"), (void *) SP_PARM, str));
105
106     if (HasTInfoTerminal(SP_PARM)) {
107         TERMTYPE *tp = &(TerminalOf(SP_PARM)->type);
108         struct name_table_entry const *entry_ptr;
109
110         entry_ptr = _nc_find_type_entry(str, NUMBER, FALSE);
111         if (entry_ptr != 0) {
112             j = entry_ptr->nte_index;
113         }
114 #if NCURSES_XNAMES
115         else {
116             j = -1;
117             for_each_ext_number(i, tp) {
118                 const char *capname = ExtNumname(tp, i, numnames);
119                 if (same_name(str, capname)) {
120                     j = i;
121                     break;
122                 }
123             }
124         }
125 #endif
126         if (j >= 0) {
127             if (VALID_NUMERIC(tp->Numbers[j]))
128                 result = tp->Numbers[j];
129             else
130                 result = ABSENT_NUMERIC;
131         }
132     }
133
134     returnCode(result);
135 }
136
137 #if NCURSES_SP_FUNCS
138 NCURSES_EXPORT(int)
139 tigetnum(NCURSES_CONST char *str)
140 {
141     return NCURSES_SP_NAME(tigetnum) (CURRENT_SCREEN, str);
142 }
143 #endif
144
145 NCURSES_EXPORT(char *)
146 NCURSES_SP_NAME(tigetstr) (NCURSES_SP_DCLx NCURSES_CONST char *str)
147 {
148     char *result = CANCELLED_STRING;
149     int i, j;
150
151     T((T_CALLED("tigetstr(%p, %s)"), (void *) SP_PARM, str));
152
153     if (HasTInfoTerminal(SP_PARM)) {
154         TERMTYPE *tp = &(TerminalOf(SP_PARM)->type);
155         struct name_table_entry const *entry_ptr;
156
157         entry_ptr = _nc_find_type_entry(str, STRING, FALSE);
158         if (entry_ptr != 0) {
159             j = entry_ptr->nte_index;
160         }
161 #if NCURSES_XNAMES
162         else {
163             j = -1;
164             for_each_ext_string(i, tp) {
165                 const char *capname = ExtStrname(tp, i, strnames);
166                 if (same_name(str, capname)) {
167                     j = i;
168                     break;
169                 }
170             }
171         }
172 #endif
173         if (j >= 0) {
174             /* note: setupterm forces cancelled strings to null */
175             result = tp->Strings[j];
176         }
177     }
178
179     returnPtr(result);
180 }
181
182 #if NCURSES_SP_FUNCS
183 NCURSES_EXPORT(char *)
184 tigetstr(NCURSES_CONST char *str)
185 {
186     return NCURSES_SP_NAME(tigetstr) (CURRENT_SCREEN, str);
187 }
188 #endif