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