xref: /openbsd/lib/libcurses/widechar/lib_cchar.c (revision 09467b48)
1 /* $OpenBSD: lib_cchar.c,v 1.1 2010/09/06 17:26:17 nicm Exp $ */
2 
3 /****************************************************************************
4  * Copyright (c) 2001-2005,2007 Free Software Foundation, Inc.              *
5  *                                                                          *
6  * Permission is hereby granted, free of charge, to any person obtaining a  *
7  * copy of this software and associated documentation files (the            *
8  * "Software"), to deal in the Software without restriction, including      *
9  * without limitation the rights to use, copy, modify, merge, publish,      *
10  * distribute, distribute with modifications, sublicense, and/or sell       *
11  * copies of the Software, and to permit persons to whom the Software is    *
12  * furnished to do so, subject to the following conditions:                 *
13  *                                                                          *
14  * The above copyright notice and this permission notice shall be included  *
15  * in all copies or substantial portions of the Software.                   *
16  *                                                                          *
17  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS  *
18  * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF               *
19  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.   *
20  * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM,   *
21  * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR    *
22  * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR    *
23  * THE USE OR OTHER DEALINGS IN THE SOFTWARE.                               *
24  *                                                                          *
25  * Except as contained in this notice, the name(s) of the above copyright   *
26  * holders shall not be used in advertising or otherwise to promote the     *
27  * sale, use or other dealings in this Software without prior written       *
28  * authorization.                                                           *
29  ****************************************************************************/
30 
31 /*
32 **	lib_cchar.c
33 **
34 **	The routines setcchar() and getcchar().
35 **
36 */
37 
38 #include <curses.priv.h>
39 
40 MODULE_ID("$Id: lib_cchar.c,v 1.1 2010/09/06 17:26:17 nicm Exp $")
41 
42 /*
43  * The SuSv2 description leaves some room for interpretation.  We'll assume wch
44  * points to a string which is L'\0' terminated, contains at least one
45  * character with strictly positive width, which must be the first, and
46  * contains no characters of negative width.
47  */
48 NCURSES_EXPORT(int)
49 setcchar(cchar_t *wcval,
50 	 const wchar_t *wch,
51 	 const attr_t attrs,
52 	 short color_pair,
53 	 const void *opts)
54 {
55     int i;
56     int len;
57     int code = OK;
58 
59     TR(TRACE_CCALLS, (T_CALLED("setcchar(%p,%s,%lu,%d,%p)"),
60 		      wcval, _nc_viswbuf(wch),
61 		      (unsigned long) attrs, color_pair, opts));
62 
63     len = wcslen(wch);
64     if (opts != NULL
65 	|| (len > 1 && wcwidth(wch[0]) < 0)) {
66 	code = ERR;
67     } else {
68 	if (len > CCHARW_MAX)
69 	    len = CCHARW_MAX;
70 
71 	/*
72 	 * If we have a following spacing-character, stop at that point.  We
73 	 * are only interested in adding non-spacing characters.
74 	 */
75 	for (i = 1; i < len; ++i) {
76 	    if (wcwidth(wch[i]) != 0) {
77 		len = i;
78 		break;
79 	    }
80 	}
81 
82 	memset(wcval, 0, sizeof(*wcval));
83 
84 	if (len != 0) {
85 	    SetAttr(*wcval, attrs | COLOR_PAIR(color_pair));
86 	    SetPair(CHDEREF(wcval), color_pair);
87 	    memcpy(&wcval->chars, wch, len * sizeof(wchar_t));
88 	    TR(TRACE_CCALLS, ("copy %d wchars, first is %s", len,
89 			      _tracecchar_t(wcval)));
90 	}
91     }
92 
93     TR(TRACE_CCALLS, (T_RETURN("%d"), code));
94     return (code);
95 }
96 
97 NCURSES_EXPORT(int)
98 getcchar(const cchar_t *wcval,
99 	 wchar_t *wch,
100 	 attr_t *attrs,
101 	 short *color_pair,
102 	 void *opts)
103 {
104     wchar_t *wp;
105     int len;
106     int code = ERR;
107 
108     TR(TRACE_CCALLS, (T_CALLED("getcchar(%p,%p,%p,%p,%p)"),
109 		      wcval, wch, attrs, color_pair, opts));
110 
111     if (opts == NULL) {
112 	len = (wp = wmemchr(wcval->chars, L'\0', CCHARW_MAX))
113 	    ? wp - wcval->chars
114 	    : CCHARW_MAX;
115 
116 	if (wch == NULL) {
117 	    code = len;
118 	} else if (attrs == 0 || color_pair == 0) {
119 	    code = ERR;
120 	} else if (len >= 0) {
121 	    *attrs = AttrOf(*wcval) & A_ATTRIBUTES;
122 	    *color_pair = GetPair(*wcval);
123 	    wmemcpy(wch, wcval->chars, (unsigned) len);
124 	    wch[len] = L'\0';
125 	    code = OK;
126 	}
127     }
128 
129     TR(TRACE_CCALLS, (T_RETURN("%d"), code));
130     return (code);
131 }
132