1 /* $NetBSD: cchar.c,v 1.5 2010/12/16 17:42:28 wiz Exp $ */
2
3 /*
4 * Copyright (c) 2005 The NetBSD Foundation Inc.
5 * All rights reserved.
6 *
7 * This code is derived from code donated to the NetBSD Foundation
8 * by Ruibiao Qiu <ruibiao@arl.wustl.edu,ruibiao@gmail.com>.
9 *
10 *
11 * Redistribution and use in source and binary forms, with or without
12 * modification, are permitted provided that the following conditions
13 * are met:
14 * 1. Redistributions of source code must retain the above copyright
15 * notice, this list of conditions and the following disclaimer.
16 * 2. Redistributions in binary form must reproduce the above copyright
17 * notice, this list of conditions and the following disclaimer in the
18 * documentation and/or other materials provided with the distribution.
19 * 3. Neither the name of the NetBSD Foundation nor the names of its
20 * contributors may be used to endorse or promote products derived
21 * from this software without specific prior written permission.
22 *
23 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND
24 * CONTRIBUTORS ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES,
25 * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
26 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
28 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
34 * SUCH DAMAGE.
35 */
36
37 #include <sys/cdefs.h>
38 #ifndef lint
39 __RCSID("$NetBSD: cchar.c,v 1.5 2010/12/16 17:42:28 wiz Exp $");
40 #endif /* not lint */
41
42 #include <string.h>
43
44 #include "curses.h"
45 #include "curses_private.h"
46
47 /*
48 * getcchar --
49 * get a wide-character string and rendition from a cchar_t
50 */
51 int
getcchar(const cchar_t * wcval,wchar_t * wch,attr_t * attrs,short * color_pair,void * opts)52 getcchar(const cchar_t *wcval, wchar_t *wch, attr_t *attrs,
53 short *color_pair, void *opts)
54 {
55 #ifndef HAVE_WCHAR
56 return ERR;
57 #else
58 wchar_t *wp;
59 size_t len;
60
61 if ( opts )
62 return ERR;
63
64 len = (wp = wmemchr(wcval->vals, L'\0', CCHARW_MAX))
65 ? wp - wcval->vals : CCHARW_MAX;
66
67 if (wch == NULL)
68 return (int) len;
69 if (attrs == 0 || color_pair == 0)
70 return ERR;
71 if (len > 0) {
72 *attrs = wcval->attributes;
73 *color_pair = COLOR_PAIR( wcval -> attributes );
74 wmemcpy(wch, wcval->vals, (unsigned) len);
75 wch[len] = L'\0';
76 }
77 return OK;
78 #endif /* HAVE_WCHAR */
79 }
80
81 /*
82 * setcchar --
83 * set cchar_t from a wide-character string and rendition
84 */
85 int
setcchar(cchar_t * wcval,const wchar_t * wch,const attr_t attrs,short color_pair,const void * opts)86 setcchar(cchar_t *wcval, const wchar_t *wch, const attr_t attrs,
87 short color_pair, const void *opts)
88 {
89 #ifndef HAVE_WCHAR
90 return ERR;
91 #else
92 int i;
93 size_t len;
94
95 if (opts || (len = wcslen(wch)) > CCHARW_MAX
96 || (len > 1 && wcwidth(wch[0]) < 0)) {
97 return ERR;
98 }
99
100 /*
101 * If we have a following spacing-character, stop at that point. We
102 * are only interested in adding non-spacing characters.
103 */
104 for (i = 1; i < len; ++i) {
105 if (wcwidth(wch[i]) != 0) {
106 len = i;
107 break;
108 }
109 }
110
111 memset(wcval, 0, sizeof(*wcval));
112 if (len != 0) {
113 wcval -> attributes = attrs | color_pair;
114 wcval -> elements = 1;
115 memcpy(&wcval->vals, wch, len * sizeof(wchar_t));
116 }
117
118 return OK;
119 #endif /* HAVE_WCHAR */
120 }
121
122 void
__cursesi_chtype_to_cchar(chtype in,cchar_t * out)123 __cursesi_chtype_to_cchar(chtype in, cchar_t *out)
124 {
125 unsigned int idx;
126
127 if (in & __ACS_IS_WACS) {
128 idx = in & __CHARTEXT;
129 if (idx < NUM_ACS) {
130 memcpy(out, &_wacs_char[idx], sizeof(cchar_t));
131 out->attributes |= in & __ATTRIBUTES;
132 return;
133 }
134 }
135 out->vals[0] = in & __CHARTEXT;
136 out->attributes = in & __ATTRIBUTES;
137 out->elements = 1;
138 }
139