1 /****************************************************************************
2 * Copyright (c) 2001-2016,2017 Free Software Foundation, Inc. *
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: *
12 * The above copyright notice and this permission notice shall be included *
13 * in all copies or substantial portions of the Software. *
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. *
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 *
27 ****************************************************************************/
32 ** The routines setcchar() and getcchar().
36 #include <curses.priv.h>
38 MODULE_ID("$Id: lib_cchar.c,v 1.31 2017/03/31 11:14:26 tom Exp $")
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.
47 setcchar(cchar_t *wcval,
50 NCURSES_PAIRS_T pair_arg,
54 int color_pair = pair_arg;
57 TR(TRACE_CCALLS, (T_CALLED("setcchar(%p,%s,%lu,%d,%p)"),
58 (void *) wcval, _nc_viswbuf(wch),
59 (unsigned long) attrs, color_pair, opts));
61 set_extended_pair(opts, color_pair);
63 || ((len = (unsigned) wcslen(wch)) > 1 && wcwidth(wch[0]) < 0)
73 * If we have a following spacing-character, stop at that point. We
74 * are only interested in adding non-spacing characters.
76 for (i = 1; i < len; ++i) {
77 if (wcwidth(wch[i]) != 0) {
83 memset(wcval, 0, sizeof(*wcval));
86 SetAttr(*wcval, attrs);
87 SetPair(CHDEREF(wcval), color_pair);
88 memcpy(&wcval->chars, wch, len * sizeof(wchar_t));
89 TR(TRACE_CCALLS, ("copy %d wchars, first is %s", len,
90 _tracecchar_t(wcval)));
94 TR(TRACE_CCALLS, (T_RETURN("%d"), code));
99 getcchar(const cchar_t *wcval,
102 NCURSES_PAIRS_T *pair_arg,
108 TR(TRACE_CCALLS, (T_CALLED("getcchar(%p,%p,%p,%p,%p)"),
109 (const void *) wcval,
115 if (opts == NULL && wcval != NULL) {
119 len = ((wp = wmemchr(wcval->chars, L'\0', (size_t) CCHARW_MAX))
120 ? (int) (wp - wcval->chars)
125 * If the value is a null, set the length to 1.
126 * If the value is not a null, return the length plus 1 for null.
128 code = (len < CCHARW_MAX) ? (len + 1) : CCHARW_MAX;
129 } else if (attrs == 0 || pair_arg == 0) {
131 } else if (len >= 0) {
132 *attrs = AttrOf(*wcval) & A_ATTRIBUTES;
133 color_pair = GetPair(*wcval);
134 get_extended_pair(opts, color_pair);
135 *pair_arg = limit_PAIRS(color_pair);
136 wmemcpy(wch, wcval->chars, (size_t) len);
143 TR(TRACE_CCALLS, (T_RETURN("%d"), code));