ncurses 5.5
[ncurses.git] / ncurses / widechar / lib_wacs.c
1 /****************************************************************************
2  * Copyright (c) 2002 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: Thomas Dickey 2002                                              *
31  ****************************************************************************/
32
33 #include <curses.priv.h>
34 #include <term.h>
35
36 MODULE_ID("$Id: lib_wacs.c,v 1.6 2002/12/21 12:30:19 tom Exp $")
37
38 NCURSES_EXPORT_VAR(cchar_t) * _nc_wacs = 0;
39
40 NCURSES_EXPORT(void)
41 _nc_init_wacs(void)
42 {
43     /* *INDENT-OFF* */
44     static const struct {
45         int     map;
46         int     value[2];
47     } table[] = {
48         /* VT100 symbols */
49         { 'l',  { '+',  0x250c }},      /* upper left corner */
50         { 'm',  { '+',  0x2514 }},      /* lower left corner */
51         { 'k',  { '+',  0x2510 }},      /* upper right corner */
52         { 'j',  { '+',  0x2518 }},      /* lower right corner */
53         { 't',  { '+',  0x251c }},      /* tee pointing left */
54         { 'u',  { '+',  0x2524 }},      /* tee pointing right */
55         { 'v',  { '+',  0x2534 }},      /* tee pointing up */
56         { 'w',  { '+',  0x252c }},      /* tee pointing down */
57         { 'q',  { '-',  0x2500 }},      /* horizontal line */
58         { 'x',  { '|',  0x2502 }},      /* vertical line */
59         { 'n',  { '+',  0x253c }},      /* large plus or crossover */
60         { 'o',  { '~',  0x23ba }},      /* scan line 1 */
61         { 's',  { '_',  0x23bd }},      /* scan line 9 */
62         { '`',  { '+',  0x25c6 }},      /* diamond */
63         { 'a',  { ':',  0x2592 }},      /* checker board (stipple) */
64         { 'f',  { '\'', 0x00b0 }},      /* degree symbol */
65         { 'g',  { '#',  0x00b1 }},      /* plus/minus */
66         { '~',  { 'o',  0x00b7 }},      /* bullet */
67         /* Teletype 5410v1 symbols */
68         { ',',  { '<',  0x2190 }},      /* arrow pointing left */
69         { '+',  { '>',  0x2192 }},      /* arrow pointing right */
70         { '.',  { 'v',  0x2193 }},      /* arrow pointing down */
71         { '-',  { '^',  0x2191 }},      /* arrow pointing up */
72         { 'h',  { '#',  0x2592 }},      /* board of squares */
73         { 'i',  { '#',  0x2603 }},      /* lantern symbol */
74         { '0',  { '#',  0x25ae }},      /* solid square block */
75         /* these defaults were invented for ncurses */
76         { 'p',  { '-',  0x23bb }},      /* scan line 3 */
77         { 'r',  { '-',  0x23bc }},      /* scan line 7 */
78         { 'y',  { '<',  0x2264 }},      /* less-than-or-equal-to */
79         { 'z',  { '>',  0x2265 }},      /* greater-than-or-equal-to */
80         { '{',  { '*',  0x03c0 }},      /* greek pi */
81         { '|',  { '!',  0x2260 }},      /* not-equal */
82         { '}',  { 'f',  0x00a3 }},      /* pound-sterling symbol */
83     };
84     /* *INDENT-ON* */
85
86     unsigned n, m;
87     int active = _nc_unicode_locale();
88
89     /*
90      * If we're running in a UTF-8 locale, will use the Unicode equivalents
91      * rather than the terminfo information.  Actually the terminfo should
92      * be the rule, but there are people who are offended by the notion that
93      * a Unicode-capable terminal would have something resembling a mode.
94      * So the smacs/rmacs may be disabled -- sometime.
95      */
96     T(("initializing WIDE-ACS map (Unicode is%s active)",
97        active ? "" : " not"));
98
99     _nc_wacs = typeCalloc(cchar_t, ACS_LEN);
100     for (n = 0; n < SIZEOF(table); ++n) {
101         m = table[n].map;
102         if (active) {
103             SetChar(_nc_wacs[m], table[n].value[active], A_NORMAL);
104         } else if (acs_map[m] & A_ALTCHARSET) {
105             SetChar(_nc_wacs[m], m, A_ALTCHARSET);
106         } else {
107             SetChar(_nc_wacs[m], table[n].value[0], A_NORMAL);
108         }
109         T(("#%d, SetChar(%c, %#04x) = %s",
110            n, m,
111            table[n].value[active],
112            _tracecchar_t(&_nc_wacs[m])));
113     }
114 }