inwstr.c revision 1.2 
1/*   $NetBSD: inwstr.c,v 1.2 2007/05/28 15:01:56 blymn 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: inwstr.c,v 1.2 2007/05/28 15:01:56 blymn Exp $");
40#endif						  /* not lint */
41
42#include "curses.h"
43#include "curses_private.h"
44
45/*
46 * inwstr, innwstr --
47 *	Return a string of wide characters at cursor position from stdscr.
48 */
49__warn_references(inwstr,
50	"warning: this program uses inwstr(), which is unsafe.")
51int
52inwstr(wchar_t *wstr)
53{
54#ifndef HAVE_WCHAR
55	return ERR;
56#else
57	return winwstr(stdscr, wstr);
58#endif /* HAVE_WCHAR */
59}
60
61int
62innwstr(wchar_t *wstr, int n)
63{
64#ifndef HAVE_WCHAR
65	return ERR;
66#else
67	return winnwstr(stdscr, wstr, n);
68#endif /* HAVE_WCHAR */
69}
70
71/*
72 * mvinwstr, mvinnwstr --
73 *  Return a string of wide characters at position (y, x) from stdscr.
74 */
75__warn_references(mvinwstr,
76	"warning: this program uses mvinwstr(), which is unsafe.")
77int
78mvinwstr(int y, int x, wchar_t *wstr)
79{
80#ifndef HAVE_WCHAR
81	return ERR;
82#else
83	return mvwinwstr(stdscr, y, x, wstr);
84#endif /* HAVE_WCHAR */
85}
86
87int
88mvinnwstr(int y, int x, wchar_t *wstr, int n)
89{
90#ifndef HAVE_WCHAR
91	return ERR;
92#else
93	return mvwinnwstr(stdscr, y, x, wstr, n);
94#endif /* HAVE_WCHAR */
95}
96
97/*
98 * mvwinwstr, mvwinnwstr --
99 *  Return an array wide characters at position (y, x) from the given window.
100 */
101__warn_references(mvwinwstr,
102	"warning: this program uses mvwinwstr(), which is unsafe.")
103int
104mvwinwstr(WINDOW *win, int y, int x, wchar_t *wstr)
105{
106#ifndef HAVE_WCHAR
107	return ERR;
108#else
109	if (wmove(win, y, x) == ERR)
110		return ERR;
111
112	return winwstr(win, wstr);
113#endif /* HAVE_WCHAR */
114}
115
116int
117mvwinnwstr(WINDOW *win, int y, int x, wchar_t *wstr, int n)
118{
119#ifndef HAVE_WCHAR
120	return ERR;
121#else
122	if (wmove(win, y, x) == ERR)
123		return ERR;
124
125	return winnwstr(win, wstr, n);
126#endif /* HAVE_WCHAR */
127}
128
129/*
130 * winwstr, winnwstr --
131 *	Return a string of wide characters at cursor position.
132 */
133__warn_references(winwstr,
134	"warning: this program uses winwstr(), which is unsafe.")
135int
136winwstr(WINDOW *win, wchar_t *wstr)
137{
138#ifndef HAVE_WCHAR
139	return ERR;
140#else
141
142	return winnwstr(win, wstr, -1);
143#endif /* HAVE_WCHAR */
144}
145
146/*
147 * - winnwstr() returns the number of characters copied only of if it is
148 *   called with n >= 0 (ie, as in_wchnstr(), mvin_wchnstr(), mvwin_wchnstr()
149 *   or win_wchnstr()).  If N < 0, it returns `OK'.
150 * - SUSv2/xcurses doesn't document whether the trailing NUL is included
151 *   in the length count or not.  For safety's sake it _is_ included.
152 * - This implementation does not (yet) support multi-byte characters
153 *   strings.
154 */
155int
156winnwstr(WINDOW *win, wchar_t *wstr, int n)
157{
158#ifndef HAVE_WCHAR
159	return ERR;
160#else
161	__LDATA	*start;
162	int x, cw, cnt;
163	wchar_t *wcp;
164
165	if (wstr == NULL)
166		return ERR;
167
168	start = &win->lines[win->cury]->line[win->curx];
169	x = win->curx;
170	cw = WCOL( *start );
171	if (cw < 0) {
172		start += cw;
173		x += cw;
174	}
175    cnt = 0;
176	wcp = wstr;
177	/* (n - 1) to leave room for the trailing 0 element */
178	while ((x < win->maxx) && ((n < 0) || ((n > 1) && (cnt < n - 1)))) {
179		cw = WCOL( *start );
180		*wcp = start->ch;
181		wcp++;
182		cnt++;
183		x += cw;
184		if ( x < win->maxx )
185			start += cw;
186	}
187	*wcp = L'\0';
188
189	if (n < 0)
190		return OK;
191	else
192		return cnt;
193#endif /* HAVE_WCHAR */
194}
195