lib_acs.c revision 97049 
1/****************************************************************************
2 * Copyright (c) 1998,1999,2000,2001 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 ****************************************************************************/
33
34#include <curses.priv.h>
35#include <term.h>		/* ena_acs, acs_chars */
36
37MODULE_ID("$Id: lib_acs.c,v 1.21 2001/12/23 00:15:10 tom Exp $")
38
39#if BROKEN_LINKER
40NCURSES_EXPORT_VAR(chtype *)
41_nc_acs_map(void)
42{
43    static chtype *the_map = 0;
44    if (the_map == 0)
45	the_map = typeCalloc(chtype, ACS_LEN);
46    return the_map;
47}
48#else
49NCURSES_EXPORT_VAR(chtype) acs_map[ACS_LEN] =
50{
51    0
52};
53#endif
54
55NCURSES_EXPORT(void)
56_nc_init_acs(void)
57{
58    T(("initializing ACS map"));
59
60    /*
61     * Initializations for a UNIX-like multi-terminal environment.  Use
62     * ASCII chars and count on the terminfo description to do better.
63     */
64    ACS_ULCORNER = '+';		/* should be upper left corner */
65    ACS_LLCORNER = '+';		/* should be lower left corner */
66    ACS_URCORNER = '+';		/* should be upper right corner */
67    ACS_LRCORNER = '+';		/* should be lower right corner */
68    ACS_RTEE = '+';		/* should be tee pointing left */
69    ACS_LTEE = '+';		/* should be tee pointing right */
70    ACS_BTEE = '+';		/* should be tee pointing up */
71    ACS_TTEE = '+';		/* should be tee pointing down */
72    ACS_HLINE = '-';		/* should be horizontal line */
73    ACS_VLINE = '|';		/* should be vertical line */
74    ACS_PLUS = '+';		/* should be large plus or crossover */
75    ACS_S1 = '~';		/* should be scan line 1 */
76    ACS_S9 = '_';		/* should be scan line 9 */
77    ACS_DIAMOND = '+';		/* should be diamond */
78    ACS_CKBOARD = ':';		/* should be checker board (stipple) */
79    ACS_DEGREE = '\'';		/* should be degree symbol */
80    ACS_PLMINUS = '#';		/* should be plus/minus */
81    ACS_BULLET = 'o';		/* should be bullet */
82    ACS_LARROW = '<';		/* should be arrow pointing left */
83    ACS_RARROW = '>';		/* should be arrow pointing right */
84    ACS_DARROW = 'v';		/* should be arrow pointing down */
85    ACS_UARROW = '^';		/* should be arrow pointing up */
86    ACS_BOARD = '#';		/* should be board of squares */
87    ACS_LANTERN = '#';		/* should be lantern symbol */
88    ACS_BLOCK = '#';		/* should be solid square block */
89    /* these defaults were invented for ncurses */
90    ACS_S3 = '-';		/* should be scan line 3 */
91    ACS_S7 = '-';		/* should be scan line 7 */
92    ACS_LEQUAL = '<';		/* should be less-than-or-equal-to */
93    ACS_GEQUAL = '>';		/* should be greater-than-or-equal-to */
94    ACS_PI = '*';		/* should be greek pi */
95    ACS_NEQUAL = '!';		/* should be not-equal */
96    ACS_STERLING = 'f';		/* should be pound-sterling symbol */
97
98    if (ena_acs != NULL) {
99	TPUTS_TRACE("ena_acs");
100	putp(ena_acs);
101    }
102#define ALTCHAR(c)	((chtype)(((unsigned char)(c)) | A_ALTCHARSET))
103
104    if (acs_chars != NULL) {
105	size_t i = 0;
106	size_t length = strlen(acs_chars);
107
108	while (i < length)
109	    switch (acs_chars[i]) {
110	    case 'l':
111	    case 'm':
112	    case 'k':
113	    case 'j':
114	    case 'u':
115	    case 't':
116	    case 'v':
117	    case 'w':
118	    case 'q':
119	    case 'x':
120	    case 'n':
121	    case 'o':
122	    case 's':
123	    case '`':
124	    case 'a':
125	    case 'f':
126	    case 'g':
127	    case '~':
128	    case ',':
129	    case '+':
130	    case '.':
131	    case '-':
132	    case 'h':
133	    case 'i':
134	    case '0':
135	    case 'p':
136	    case 'r':
137	    case 'y':
138	    case 'z':
139	    case '{':
140	    case '|':
141	    case '}':
142		acs_map[(unsigned int) acs_chars[i]] =
143		    ALTCHAR(acs_chars[i + 1]);
144		i++;
145		/* FALLTHRU */
146	    default:
147		i++;
148		break;
149	    }
150    }
151#ifdef TRACE
152    /* Show the equivalent mapping, noting if it does not match the
153     * given attribute, whether by re-ordering or duplication.
154     */
155    if (_nc_tracing & TRACE_CALLS) {
156	size_t n, m;
157	char show[ACS_LEN + 1];
158	for (n = 1, m = 0; n < ACS_LEN; n++) {
159	    if (acs_map[n] != 0) {
160		show[m++] = (char) n;
161		show[m++] = ChCharOf(acs_map[n]);
162	    }
163	}
164	show[m] = 0;
165	_tracef("%s acs_chars %s",
166		(acs_chars == NULL)
167		? "NULL"
168		: (strcmp(acs_chars, show)
169		   ? "DIFF"
170		   : "SAME"),
171		_nc_visbuf(show));
172    }
173#endif /* TRACE */
174}
175