1 /****************************************************************************
2  * Copyright (c) 2001-2004,2005 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 **	lib_cchar.c
31 **
32 **	The routines setcchar() and getcchar().
33 **
34 */
35 
36 #include <curses.priv.h>
37 
38 MODULE_ID("$Id: lib_cchar.c,v 1.11 2005/01/29 21:29:16 tom Exp $")
39 
40 /*
41  * The SuSv2 description leaves some room for interpretation.  We'll assume wch
42  * points to a string which is L'\0' terminated, contains at least one
43  * character with strictly positive width, which must be the first, and
44  * contains no characters of negative width.
45  */
NCURSES_EXPORT(int)46 NCURSES_EXPORT(int)
47 setcchar(cchar_t *wcval,
48 	 const wchar_t *wch,
49 	 const attr_t attrs,
50 	 short color_pair,
51 	 const void *opts)
52 {
53     int i;
54     int len;
55     int code = OK;
56 
57     TR(TRACE_CCALLS, (T_CALLED("setcchar(%p,%s,%ld,%d,%p)"),
58 		      wcval, _nc_viswbuf(wch), attrs, color_pair, opts));
59 
60     len = wcslen(wch);
61     if (opts != NULL
62 	|| (len > 1 && wcwidth(wch[0]) < 0)) {
63 	code = ERR;
64     } else {
65 	if (len > CCHARW_MAX)
66 	    len = CCHARW_MAX;
67 
68 	/*
69 	 * If we have a following spacing-character, stop at that point.  We
70 	 * are only interested in adding non-spacing characters.
71 	 */
72 	for (i = 1; i < len; ++i) {
73 	    if (wcwidth(wch[i]) != 0) {
74 		len = i;
75 		break;
76 	    }
77 	}
78 
79 	memset(wcval, 0, sizeof(*wcval));
80 
81 	if (len != 0) {
82 	    SetAttr(*wcval, attrs | COLOR_PAIR(color_pair));
83 	    SetPair(CHDEREF(wcval), color_pair);
84 	    memcpy(&wcval->chars, wch, len * sizeof(wchar_t));
85 	    TR(TRACE_CCALLS, ("copy %d wchars, first is %s", len,
86 			      _tracecchar_t(wcval)));
87 	}
88     }
89 
90     TR(TRACE_CCALLS, (T_RETURN("%d"), code));
91     return (code);
92 }
93 
94 NCURSES_EXPORT(int)
getcchar(const cchar_t * wcval,wchar_t * wch,attr_t * attrs,short * color_pair,void * opts)95 getcchar(const cchar_t *wcval,
96 	 wchar_t *wch,
97 	 attr_t *attrs,
98 	 short *color_pair,
99 	 void *opts)
100 {
101     wchar_t *wp;
102     int len;
103     int code = ERR;
104 
105     TR(TRACE_CCALLS, (T_CALLED("getcchar(%p,%p,%p,%p,%p)"),
106 		      wcval, wch, attrs, color_pair, opts));
107 
108     if (opts == NULL) {
109 	len = (wp = wmemchr(wcval->chars, L'\0', CCHARW_MAX))
110 	    ? wp - wcval->chars
111 	    : CCHARW_MAX;
112 
113 	if (wch == NULL) {
114 	    code = len;
115 	} else if (attrs == 0 || color_pair == 0) {
116 	    code = ERR;
117 	} else if (len >= 0) {
118 	    *attrs = AttrOf(*wcval) & A_ATTRIBUTES;
119 	    *color_pair = GetPair(*wcval);
120 	    wmemcpy(wch, wcval->chars, (unsigned) len);
121 	    wch[len] = L'\0';
122 	    code = OK;
123 	}
124     }
125 
126     TR(TRACE_CCALLS, (T_RETURN("%d"), code));
127     return (code);
128 }
129