1 /****************************************************************************
2 * Copyright 2018-2019,2020 Thomas E. Dickey *
3 * Copyright 1998-2014,2017 Free Software Foundation, Inc. *
4 * *
5 * Permission is hereby granted, free of charge, to any person obtaining a *
6 * copy of this software and associated documentation files (the *
7 * "Software"), to deal in the Software without restriction, including *
8 * without limitation the rights to use, copy, modify, merge, publish, *
9 * distribute, distribute with modifications, sublicense, and/or sell *
10 * copies of the Software, and to permit persons to whom the Software is *
11 * furnished to do so, subject to the following conditions: *
12 * *
13 * The above copyright notice and this permission notice shall be included *
14 * in all copies or substantial portions of the Software. *
15 * *
16 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS *
17 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF *
18 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. *
19 * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, *
20 * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR *
21 * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR *
22 * THE USE OR OTHER DEALINGS IN THE SOFTWARE. *
23 * *
24 * Except as contained in this notice, the name(s) of the above copyright *
25 * holders shall not be used in advertising or otherwise to promote the *
26 * sale, use or other dealings in this Software without prior written *
27 * authorization. *
28 ****************************************************************************/
29
30 /****************************************************************************
31 * Author: Zeyd M. Ben-Halim <zmbenhal@netcom.com> 1992,1995 *
32 * and: Eric S. Raymond <esr@snark.thyrsus.com> *
33 * and: Thomas E. Dickey 1996-on *
34 * and: Juergen Pfeifer 2008 *
35 ****************************************************************************/
36
37 #include <curses.priv.h>
38
39 #ifndef CUR
40 #define CUR SP_TERMTYPE
41 #endif
42
43 MODULE_ID("$Id: lib_acs.c,v 1.50 2020/02/02 23:34:34 tom Exp $")
44
45 #if BROKEN_LINKER || USE_REENTRANT
46 #define MyBuffer _nc_prescreen.real_acs_map
NCURSES_EXPORT(chtype *)47 NCURSES_EXPORT(chtype *)
48 NCURSES_PUBLIC_VAR(acs_map) (void)
49 {
50 if (MyBuffer == 0)
51 MyBuffer = typeCalloc(chtype, ACS_LEN);
52 return MyBuffer;
53 }
54 #undef MyBuffer
55 #else
56 NCURSES_EXPORT_VAR (chtype) acs_map[ACS_LEN] =
57 {
58 0
59 };
60 #endif
61
62 #ifdef USE_TERM_DRIVER
63 NCURSES_EXPORT(chtype)
NCURSES_SP_NAME(_nc_acs_char)64 NCURSES_SP_NAME(_nc_acs_char) (NCURSES_SP_DCLx int c)
65 {
66 chtype *map;
67 if (c < 0 || c >= ACS_LEN)
68 return (chtype) 0;
69 map = (SP_PARM != 0) ? SP_PARM->_acs_map :
70 #if BROKEN_LINKER || USE_REENTRANT
71 _nc_prescreen.real_acs_map
72 #else
73 acs_map
74 #endif
75 ;
76 return map[c];
77 }
78 #endif /* USE_TERM_DRIVER */
79
80 NCURSES_EXPORT(void)
NCURSES_SP_NAME(_nc_init_acs)81 NCURSES_SP_NAME(_nc_init_acs) (NCURSES_SP_DCL0)
82 {
83 chtype *fake_map = acs_map;
84 chtype *real_map = SP_PARM != 0 ? SP_PARM->_acs_map : fake_map;
85 int j;
86
87 T(("initializing ACS map"));
88
89 /*
90 * If we're using this from curses (rather than terminfo), we are storing
91 * the mapping information in the SCREEN struct so we can decide how to
92 * render it.
93 */
94 if (real_map != fake_map) {
95 for (j = 1; j < ACS_LEN; ++j) {
96 real_map[j] = 0;
97 fake_map[j] = A_ALTCHARSET | (chtype) j;
98 if (SP_PARM)
99 SP_PARM->_screen_acs_map[j] = FALSE;
100 }
101 } else {
102 for (j = 1; j < ACS_LEN; ++j) {
103 real_map[j] = 0;
104 }
105 }
106
107 /*
108 * Initializations for a UNIX-like multi-terminal environment. Use
109 * ASCII chars and count on the terminfo description to do better.
110 */
111 real_map['l'] = '+'; /* should be upper left corner */
112 real_map['m'] = '+'; /* should be lower left corner */
113 real_map['k'] = '+'; /* should be upper right corner */
114 real_map['j'] = '+'; /* should be lower right corner */
115 real_map['u'] = '+'; /* should be tee pointing left */
116 real_map['t'] = '+'; /* should be tee pointing right */
117 real_map['v'] = '+'; /* should be tee pointing up */
118 real_map['w'] = '+'; /* should be tee pointing down */
119 real_map['q'] = '-'; /* should be horizontal line */
120 real_map['x'] = '|'; /* should be vertical line */
121 real_map['n'] = '+'; /* should be large plus or crossover */
122 real_map['o'] = '~'; /* should be scan line 1 */
123 real_map['s'] = '_'; /* should be scan line 9 */
124 real_map['`'] = '+'; /* should be diamond */
125 real_map['a'] = ':'; /* should be checker board (stipple) */
126 real_map['f'] = '\''; /* should be degree symbol */
127 real_map['g'] = '#'; /* should be plus/minus */
128 real_map['~'] = 'o'; /* should be bullet */
129 real_map[','] = '<'; /* should be arrow pointing left */
130 real_map['+'] = '>'; /* should be arrow pointing right */
131 real_map['.'] = 'v'; /* should be arrow pointing down */
132 real_map['-'] = '^'; /* should be arrow pointing up */
133 real_map['h'] = '#'; /* should be board of squares */
134 real_map['i'] = '#'; /* should be lantern symbol */
135 real_map['0'] = '#'; /* should be solid square block */
136 /* these defaults were invented for ncurses */
137 real_map['p'] = '-'; /* should be scan line 3 */
138 real_map['r'] = '-'; /* should be scan line 7 */
139 real_map['y'] = '<'; /* should be less-than-or-equal-to */
140 real_map['z'] = '>'; /* should be greater-than-or-equal-to */
141 real_map['{'] = '*'; /* should be greek pi */
142 real_map['|'] = '!'; /* should be not-equal */
143 real_map['}'] = 'f'; /* should be pound-sterling symbol */
144 /* thick-line-drawing */
145 real_map['L'] = '+'; /* upper left corner */
146 real_map['M'] = '+'; /* lower left corner */
147 real_map['K'] = '+'; /* upper right corner */
148 real_map['J'] = '+'; /* lower right corner */
149 real_map['T'] = '+'; /* tee pointing left */
150 real_map['U'] = '+'; /* tee pointing right */
151 real_map['V'] = '+'; /* tee pointing up */
152 real_map['W'] = '+'; /* tee pointing down */
153 real_map['Q'] = '-'; /* horizontal line */
154 real_map['X'] = '|'; /* vertical line */
155 real_map['N'] = '+'; /* large plus or crossover */
156 /* double-line-drawing */
157 real_map['C'] = '+'; /* upper left corner */
158 real_map['D'] = '+'; /* lower left corner */
159 real_map['B'] = '+'; /* upper right corner */
160 real_map['A'] = '+'; /* lower right corner */
161 real_map['G'] = '+'; /* tee pointing left */
162 real_map['F'] = '+'; /* tee pointing right */
163 real_map['H'] = '+'; /* tee pointing up */
164 real_map['I'] = '+'; /* tee pointing down */
165 real_map['R'] = '-'; /* horizontal line */
166 real_map['Y'] = '|'; /* vertical line */
167 real_map['E'] = '+'; /* large plus or crossover */
168
169 #ifdef USE_TERM_DRIVER
170 CallDriver_2(SP_PARM, td_initacs, real_map, fake_map);
171 #else
172 if (ena_acs != NULL) {
173 NCURSES_PUTP2("ena_acs", ena_acs);
174 }
175 #if NCURSES_EXT_FUNCS && defined(enter_pc_charset_mode) && defined(exit_pc_charset_mode)
176 /*
177 * Linux console "supports" the "PC ROM" character set by the coincidence
178 * that smpch/rmpch and smacs/rmacs have the same values. ncurses has
179 * no codepage support (see SCO Merge for an example). Outside of the
180 * values defined in acsc, there are no definitions for the "PC ROM"
181 * character set (assumed by some applications to be codepage 437), but we
182 * allow those applications to use those codepoints.
183 *
184 * test/blue.c uses this feature.
185 */
186 #define PCH_KLUDGE(a,b) (a != 0 && b != 0 && !strcmp(a,b))
187 if (PCH_KLUDGE(enter_pc_charset_mode, enter_alt_charset_mode) &&
188 PCH_KLUDGE(exit_pc_charset_mode, exit_alt_charset_mode)) {
189 size_t i;
190 for (i = 1; i < ACS_LEN; ++i) {
191 if (real_map[i] == 0) {
192 real_map[i] = (chtype) i;
193 if (real_map != fake_map) {
194 if (SP != 0)
195 SP->_screen_acs_map[i] = TRUE;
196 }
197 }
198 }
199 }
200 #endif
201
202 if (acs_chars != NULL) {
203 size_t i = 0;
204 size_t length = strlen(acs_chars);
205
206 while (i + 1 < length) {
207 if (acs_chars[i] != 0 && UChar(acs_chars[i]) < ACS_LEN) {
208 real_map[UChar(acs_chars[i])] = UChar(acs_chars[i + 1]) | A_ALTCHARSET;
209 T(("#%d real_map[%s] = %s",
210 (int) i,
211 _tracechar(UChar(acs_chars[i])),
212 _tracechtype(real_map[UChar(acs_chars[i])])));
213 if (SP != 0) {
214 SP->_screen_acs_map[UChar(acs_chars[i])] = TRUE;
215 }
216 }
217 i += 2;
218 }
219 }
220 #ifdef TRACE
221 /* Show the equivalent mapping, noting if it does not match the
222 * given attribute, whether by re-ordering or duplication.
223 */
224 if (USE_TRACEF(TRACE_CALLS)) {
225 size_t n, m;
226 char show[ACS_LEN * 2 + 1];
227 for (n = 1, m = 0; n < ACS_LEN; n++) {
228 if (real_map[n] != 0) {
229 show[m++] = (char) n;
230 show[m++] = (char) ChCharOf(real_map[n]);
231 }
232 }
233 show[m] = 0;
234 if (acs_chars == NULL || strcmp(acs_chars, show))
235 _tracef("%s acs_chars %s",
236 (acs_chars == NULL) ? "NULL" : "READ",
237 _nc_visbuf(acs_chars));
238 _tracef("%s acs_chars %s",
239 (acs_chars == NULL)
240 ? "NULL"
241 : (strcmp(acs_chars, show)
242 ? "DIFF"
243 : "SAME"),
244 _nc_visbuf(show));
245 _nc_unlock_global(tracef);
246 }
247 #endif /* TRACE */
248 #endif
249 }
250
251 #if NCURSES_SP_FUNCS
252 NCURSES_EXPORT(void)
_nc_init_acs(void)253 _nc_init_acs(void)
254 {
255 NCURSES_SP_NAME(_nc_init_acs) (CURRENT_SCREEN);
256 }
257 #endif
258
259 #if !NCURSES_WCWIDTH_GRAPHICS
260 NCURSES_EXPORT(int)
_nc_wacs_width(unsigned ch)261 _nc_wacs_width(unsigned ch)
262 {
263 int result;
264 switch (ch) {
265 case 0x00a3: /* FALLTHRU - ncurses pound-sterling symbol */
266 case 0x00b0: /* FALLTHRU - VT100 degree symbol */
267 case 0x00b1: /* FALLTHRU - VT100 plus/minus */
268 case 0x00b7: /* FALLTHRU - VT100 bullet */
269 case 0x03c0: /* FALLTHRU - ncurses greek pi */
270 case 0x2190: /* FALLTHRU - Teletype arrow pointing left */
271 case 0x2191: /* FALLTHRU - Teletype arrow pointing up */
272 case 0x2192: /* FALLTHRU - Teletype arrow pointing right */
273 case 0x2193: /* FALLTHRU - Teletype arrow pointing down */
274 case 0x2260: /* FALLTHRU - ncurses not-equal */
275 case 0x2264: /* FALLTHRU - ncurses less-than-or-equal-to */
276 case 0x2265: /* FALLTHRU - ncurses greater-than-or-equal-to */
277 case 0x23ba: /* FALLTHRU - VT100 scan line 1 */
278 case 0x23bb: /* FALLTHRU - ncurses scan line 3 */
279 case 0x23bc: /* FALLTHRU - ncurses scan line 7 */
280 case 0x23bd: /* FALLTHRU - VT100 scan line 9 */
281 case 0x2500: /* FALLTHRU - VT100 horizontal line */
282 case 0x2501: /* FALLTHRU - thick horizontal line */
283 case 0x2502: /* FALLTHRU - VT100 vertical line */
284 case 0x2503: /* FALLTHRU - thick vertical line */
285 case 0x250c: /* FALLTHRU - VT100 upper left corner */
286 case 0x250f: /* FALLTHRU - thick upper left corner */
287 case 0x2510: /* FALLTHRU - VT100 upper right corner */
288 case 0x2513: /* FALLTHRU - thick upper right corner */
289 case 0x2514: /* FALLTHRU - VT100 lower left corner */
290 case 0x2517: /* FALLTHRU - thick lower left corner */
291 case 0x2518: /* FALLTHRU - VT100 lower right corner */
292 case 0x251b: /* FALLTHRU - thick lower right corner */
293 case 0x251c: /* FALLTHRU - VT100 tee pointing left */
294 case 0x2523: /* FALLTHRU - thick tee pointing left */
295 case 0x2524: /* FALLTHRU - VT100 tee pointing right */
296 case 0x252b: /* FALLTHRU - thick tee pointing right */
297 case 0x252c: /* FALLTHRU - VT100 tee pointing down */
298 case 0x2533: /* FALLTHRU - thick tee pointing down */
299 case 0x2534: /* FALLTHRU - VT100 tee pointing up */
300 case 0x253b: /* FALLTHRU - thick tee pointing up */
301 case 0x253c: /* FALLTHRU - VT100 large plus or crossover */
302 case 0x254b: /* FALLTHRU - thick large plus or crossover */
303 case 0x2550: /* FALLTHRU - double horizontal line */
304 case 0x2551: /* FALLTHRU - double vertical line */
305 case 0x2554: /* FALLTHRU - double upper left corner */
306 case 0x2557: /* FALLTHRU - double upper right corner */
307 case 0x255a: /* FALLTHRU - double lower left corner */
308 case 0x255d: /* FALLTHRU - double lower right corner */
309 case 0x2560: /* FALLTHRU - double tee pointing right */
310 case 0x2563: /* FALLTHRU - double tee pointing left */
311 case 0x2566: /* FALLTHRU - double tee pointing down */
312 case 0x2569: /* FALLTHRU - double tee pointing up */
313 case 0x256c: /* FALLTHRU - double large plus or crossover */
314 case 0x2592: /* FALLTHRU - VT100 checker board (stipple) */
315 case 0x25ae: /* FALLTHRU - Teletype solid square block */
316 case 0x25c6: /* FALLTHRU - VT100 diamond */
317 case 0x2603: /* FALLTHRU - Teletype lantern symbol */
318 result = 1;
319 break;
320 default:
321 result = wcwidth(ch);
322 break;
323 }
324 return result;
325 }
326 #endif /* !NCURSES_WCWIDTH_GRAPHICS */
327