acs.c revision 1.14 1 /* $NetBSD: acs.c,v 1.14 2007/07/11 18:44:46 jdc Exp $ */
2
3 /*
4 * Copyright (c) 2000 The NetBSD Foundation, Inc.
5 * All rights reserved.
6 *
7 * This code is derived from software contributed to The NetBSD Foundation
8 * by Julian Coleman.
9 *
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
12 * are met:
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 * 3. All advertising materials mentioning features or use of this software
19 * must display the following acknowledgement:
20 * This product includes software developed by the NetBSD
21 * Foundation, Inc. and its contributors.
22 * 4. Neither the name of The NetBSD Foundation nor the names of its
23 * contributors may be used to endorse or promote products derived
24 * from this software without specific prior written permission.
25 *
26 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36 * POSSIBILITY OF SUCH DAMAGE.
37 */
38
39 #include <sys/cdefs.h>
40 #ifndef lint
41 __RCSID("$NetBSD: acs.c,v 1.14 2007/07/11 18:44:46 jdc Exp $");
42 #endif /* not lint */
43
44 #include "curses.h"
45 #include "curses_private.h"
46
47 chtype _acs_char[NUM_ACS];
48 #ifdef HAVE_WCHAR
49 #include <locale.h>
50 #include <string.h>
51
52 cchar_t _wacs_char[ NUM_ACS ];
53 #endif /* HAVE_WCHAR */
54
55 /*
56 * __init_acs --
57 * Fill in the ACS characters. The 'ac' termcap entry is a list of
58 * character pairs - ACS definition then terminal representation.
59 */
60 void
61 __init_acs(SCREEN *screen)
62 {
63 int count;
64 char *aofac; /* Address of 'ac' */
65 unsigned char acs, term;
66
67 /* Default value '+' for all ACS characters */
68 for (count=0; count < NUM_ACS; count++)
69 _acs_char[count]= '+';
70
71 /* Add the SUSv2 defaults (those that are not '+') */
72 ACS_RARROW = '>';
73 ACS_LARROW = '<';
74 ACS_UARROW = '^';
75 ACS_DARROW = 'v';
76 ACS_BLOCK = '#';
77 /* ACS_DIAMOND = '+'; */
78 ACS_CKBOARD = ':';
79 ACS_DEGREE = 39; /* ' */
80 ACS_PLMINUS = '#';
81 ACS_BOARD = '#';
82 ACS_LANTERN = '#';
83 /* ACS_LRCORNER = '+'; */
84 /* ACS_URCORNER = '+'; */
85 /* ACS_ULCORNER = '+'; */
86 /* ACS_LLCORNER = '+'; */
87 /* ACS_PLUS = '+'; */
88 ACS_HLINE = '-';
89 ACS_S1 = '-';
90 ACS_S9 = '_';
91 /* ACS_LTEE = '+'; */
92 /* ACS_RTEE = '+'; */
93 /* ACS_BTEE = '+'; */
94 /* ACS_TTEE = '+'; */
95 ACS_VLINE = '|';
96 ACS_BULLET = 'o';
97 /* Add the extensions defaults */
98 ACS_S3 = '-';
99 ACS_S7 = '-';
100 ACS_LEQUAL = '<';
101 ACS_GEQUAL = '>';
102 ACS_PI = '*';
103 ACS_NEQUAL = '!';
104 ACS_STERLING = 'f';
105
106 if (screen->tc_ac == NULL)
107 goto out;
108
109 aofac = screen->tc_ac;
110
111 while (*aofac != '\0') {
112 if ((acs = *aofac) == '\0')
113 return;
114 if (++aofac == '\0')
115 return;
116 if ((term = *aofac) == '\0')
117 return;
118 /* Only add characters 1 to 127 */
119 if (acs < NUM_ACS)
120 _acs_char[acs] = term | __ALTCHARSET;
121 aofac++;
122 #ifdef DEBUG
123 __CTRACE(__CTRACE_INIT, "__init_acs: %c = %c\n", acs, term);
124 #endif
125 }
126
127 if (screen->tc_eA != NULL)
128 t_puts(screen->cursesi_genbuf, screen->tc_eA, 0,
129 __cputchar_args, screen->outfd);
130
131 out:
132 for (count=0; count < NUM_ACS; count++)
133 screen->acs_char[count]= _acs_char[count];
134 }
135
136 void
137 _cursesi_reset_acs(SCREEN *screen)
138 {
139 int count;
140
141 for (count=0; count < NUM_ACS; count++)
142 _acs_char[count]= screen->acs_char[count];
143 }
144
145 #ifdef HAVE_WCHAR
146 /*
147 * __init_wacs --
148 * Fill in the ACS characters. The 'ac' termcap entry is a list of
149 * character pairs - ACS definition then terminal representation.
150 */
151 void
152 __init_wacs(SCREEN *screen)
153 {
154 int count;
155 char *aofac; /* Address of 'ac' */
156 unsigned char acs, term;
157 char *lstr;
158
159 /* Default value '+' for all ACS characters */
160 for (count=0; count < NUM_ACS; count++) {
161 _wacs_char[ count ].vals[ 0 ] = ( wchar_t )btowc( '+' );
162 _wacs_char[ count ].attributes = 0;
163 _wacs_char[ count ].elements = 1;
164 }
165
166 /* Add the SUSv2 defaults (those that are not '+') */
167 lstr = setlocale( LC_ALL, "" );
168 if ((lstr != NULL) && !strcasestr( lstr, "UTF-8" )) {
169 #ifdef DEBUG
170 __CTRACE(__CTRACE_INIT, "__init_wacs: setting defaults\n" );
171 #endif /* DEBUG */
172 WACS_RARROW = ( wchar_t )btowc( '>' );
173 WACS_LARROW = ( wchar_t )btowc( '<' );
174 WACS_UARROW = ( wchar_t )btowc( '^' );
175 WACS_DARROW = ( wchar_t )btowc( 'v' );
176 WACS_BLOCK = ( wchar_t )btowc( '#' );
177 WACS_CKBOARD = ( wchar_t )btowc( ':' );
178 WACS_DEGREE = ( wchar_t )btowc( 39 ); /* ' */
179 WACS_PLMINUS = ( wchar_t )btowc( '#' );
180 WACS_BOARD = ( wchar_t )btowc( '#' );
181 WACS_LANTERN = ( wchar_t )btowc( '#' );
182 WACS_HLINE = ( wchar_t )btowc( '-' );
183 WACS_S1 = ( wchar_t )btowc( '-' );
184 WACS_S9 = ( wchar_t )btowc( '_' );
185 WACS_VLINE = ( wchar_t )btowc( '|' );
186 WACS_BULLET = ( wchar_t )btowc( 'o' );
187 WACS_S3 = ( wchar_t )btowc( 'p' );
188 WACS_S7 = ( wchar_t )btowc( 'r' );
189 WACS_LEQUAL = ( wchar_t )btowc( 'y' );
190 WACS_GEQUAL = ( wchar_t )btowc( 'z' );
191 WACS_PI = ( wchar_t )btowc( '{' );
192 WACS_NEQUAL = ( wchar_t )btowc( '|' );
193 WACS_STERLING = ( wchar_t )btowc( '}' );
194 } else {
195 /* Unicode defaults */
196 #ifdef DEBUG
197 __CTRACE(__CTRACE_INIT,
198 "__init_wacs: setting Unicode defaults\n" );
199 #endif /* DEBUG */
200 WACS_RARROW = 0x2192;
201 WACS_LARROW = 0x2190;
202 WACS_UARROW = 0x2192;
203 WACS_DARROW = 0x2193;
204 WACS_BLOCK = 0x25ae;
205 WACS_DIAMOND = 0x25c6;
206 WACS_CKBOARD = 0x2592;
207 WACS_DEGREE = 0x00b0;
208 WACS_PLMINUS = 0x00b1;
209 WACS_BOARD = 0x2592;
210 WACS_LANTERN = 0x2603;
211 WACS_LRCORNER = 0x2518;
212 WACS_URCORNER = 0x2510;
213 WACS_ULCORNER = 0x250c;
214 WACS_LLCORNER = 0x2514;
215 WACS_PLUS = 0x253c;
216 WACS_HLINE = 0x2500;
217 WACS_S1 = 0x23ba;
218 WACS_S9 = 0x23bd;
219 WACS_LTEE = 0x251c;
220 WACS_RTEE = 0x2524;
221 WACS_BTEE = 0x2534;
222 WACS_TTEE = 0x252c;
223 WACS_VLINE = 0x2502;
224 WACS_BULLET = 0x00b7;
225 WACS_S3 = 0x23bb;
226 WACS_S7 = 0x23bc;
227 WACS_LEQUAL = 0x2264;
228 WACS_GEQUAL = 0x2265;
229 WACS_PI = 0x03C0;
230 WACS_NEQUAL = 0x2260;
231 WACS_STERLING = 0x00A3;
232 }
233
234 if (screen->tc_ac == NULL) {
235 #ifdef DEBUG
236 __CTRACE(__CTRACE_INIT,
237 "__init_wacs: no alternative characters\n" );
238 #endif /* DEBUG */
239 goto out;
240 }
241
242 aofac = screen->tc_ac;
243
244 while (*aofac != '\0') {
245 if ((acs = *aofac) == '\0')
246 return;
247 if (++aofac == '\0')
248 return;
249 if ((term = *aofac) == '\0')
250 return;
251 /* Only add characters 1 to 127 */
252 if (acs < NUM_ACS) {
253 _wacs_char[acs].vals[ 0 ] = term;
254 _wacs_char[acs].attributes |= WA_ALTCHARSET;
255 }
256 aofac++;
257 #ifdef DEBUG
258 __CTRACE(__CTRACE_INIT, "__init_wacs: %c = %c\n", acs, term);
259 #endif
260 }
261
262 if (screen->tc_eA != NULL)
263 t_puts(screen->cursesi_genbuf, screen->tc_eA, 0,
264 __cputchar_args, screen->outfd);
265
266 out:
267 for (count=0; count < NUM_ACS; count++)
268 memcpy(&screen->wacs_char[count], &_wacs_char[count],
269 sizeof(cchar_t));
270 }
271
272 void
273 _cursesi_reset_wacs(SCREEN *screen)
274 {
275 int count;
276
277 for (count=0; count < NUM_ACS; count++)
278 memcpy( &_wacs_char[count], &screen->wacs_char[count],
279 sizeof( cchar_t ));
280 }
281 #endif /* HAVE_WCHAR */
282