xref: /onnv-gate/usr/src/lib/libcurses/screen/wgetwstr.c (revision 0:68f95e015346)
1*0Sstevel@tonic-gate /*
2*0Sstevel@tonic-gate  * CDDL HEADER START
3*0Sstevel@tonic-gate  *
4*0Sstevel@tonic-gate  * The contents of this file are subject to the terms of the
5*0Sstevel@tonic-gate  * Common Development and Distribution License, Version 1.0 only
6*0Sstevel@tonic-gate  * (the "License").  You may not use this file except in compliance
7*0Sstevel@tonic-gate  * with the License.
8*0Sstevel@tonic-gate  *
9*0Sstevel@tonic-gate  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10*0Sstevel@tonic-gate  * or http://www.opensolaris.org/os/licensing.
11*0Sstevel@tonic-gate  * See the License for the specific language governing permissions
12*0Sstevel@tonic-gate  * and limitations under the License.
13*0Sstevel@tonic-gate  *
14*0Sstevel@tonic-gate  * When distributing Covered Code, include this CDDL HEADER in each
15*0Sstevel@tonic-gate  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16*0Sstevel@tonic-gate  * If applicable, add the following below this CDDL HEADER, with the
17*0Sstevel@tonic-gate  * fields enclosed by brackets "[]" replaced with your own identifying
18*0Sstevel@tonic-gate  * information: Portions Copyright [yyyy] [name of copyright owner]
19*0Sstevel@tonic-gate  *
20*0Sstevel@tonic-gate  * CDDL HEADER END
21*0Sstevel@tonic-gate  */
22*0Sstevel@tonic-gate /*  Copyright (c) 1988 AT&T */
23*0Sstevel@tonic-gate /*    All Rights Reserved   */
24*0Sstevel@tonic-gate 
25*0Sstevel@tonic-gate 
26*0Sstevel@tonic-gate /*
27*0Sstevel@tonic-gate  *      Copyright (c) 1997, by Sun Microsystems, Inc.
28*0Sstevel@tonic-gate  *      All rights reserved.
29*0Sstevel@tonic-gate  */
30*0Sstevel@tonic-gate 
31*0Sstevel@tonic-gate #pragma ident	"%Z%%M%	%I%	%E% SMI"
32*0Sstevel@tonic-gate 
33*0Sstevel@tonic-gate /*LINTLIBRARY*/
34*0Sstevel@tonic-gate 
35*0Sstevel@tonic-gate #include	<sys/types.h>
36*0Sstevel@tonic-gate #include	"curses_inc.h"
37*0Sstevel@tonic-gate 
38*0Sstevel@tonic-gate #define		LENGTH	256
39*0Sstevel@tonic-gate 
40*0Sstevel@tonic-gate /* This routine gets a string starting at (_cury, _curx) */
41*0Sstevel@tonic-gate int
wgetwstr(WINDOW * win,wchar_t * str)42*0Sstevel@tonic-gate wgetwstr(WINDOW *win, wchar_t *str)
43*0Sstevel@tonic-gate {
44*0Sstevel@tonic-gate 	return ((wgetnwstr(win, str, LENGTH) == ERR) ? ERR : OK);
45*0Sstevel@tonic-gate }
46*0Sstevel@tonic-gate 
47*0Sstevel@tonic-gate int
wgetnwstr(WINDOW * win,wchar_t * str,int n)48*0Sstevel@tonic-gate wgetnwstr(WINDOW *win, wchar_t *str, int n)
49*0Sstevel@tonic-gate {
50*0Sstevel@tonic-gate 	int	cpos = 0, ch;
51*0Sstevel@tonic-gate 	wchar_t	*cp = str;
52*0Sstevel@tonic-gate 	int	i = 0;
53*0Sstevel@tonic-gate 	int	total = 0;
54*0Sstevel@tonic-gate 	char	myerase, mykill;
55*0Sstevel@tonic-gate 	char	rownum[LENGTH], colnum[LENGTH], length[LENGTH];
56*0Sstevel@tonic-gate 	int	doecho = SP->fl_echoit;
57*0Sstevel@tonic-gate 	int	savecb = cur_term->_fl_rawmode;
58*0Sstevel@tonic-gate 	bool	savsync, savimmed, savleave;
59*0Sstevel@tonic-gate 
60*0Sstevel@tonic-gate #ifdef	DEBUG
61*0Sstevel@tonic-gate 	if (outf)
62*0Sstevel@tonic-gate 		fprintf(outf, "doecho %d, savecb %d\n", doecho, savecb);
63*0Sstevel@tonic-gate #endif	/* DEBUG */
64*0Sstevel@tonic-gate 
65*0Sstevel@tonic-gate 	myerase = erasechar();
66*0Sstevel@tonic-gate 	mykill = killchar();
67*0Sstevel@tonic-gate 	if (!savecb)
68*0Sstevel@tonic-gate 		(void) cbreak();
69*0Sstevel@tonic-gate 
70*0Sstevel@tonic-gate 	if (doecho) {
71*0Sstevel@tonic-gate 		SP->fl_echoit = FALSE;
72*0Sstevel@tonic-gate 		savsync = win->_sync;
73*0Sstevel@tonic-gate 		savimmed = win->_immed;
74*0Sstevel@tonic-gate 		savleave = win->_leave;
75*0Sstevel@tonic-gate 		win->_immed = win->_sync = win->_leave = FALSE;
76*0Sstevel@tonic-gate 		(void) wrefresh(win);
77*0Sstevel@tonic-gate 		if (n > LENGTH)
78*0Sstevel@tonic-gate 			n = LENGTH;
79*0Sstevel@tonic-gate 	}
80*0Sstevel@tonic-gate 	n--;
81*0Sstevel@tonic-gate 
82*0Sstevel@tonic-gate 	while (cpos < n) {
83*0Sstevel@tonic-gate 		if (doecho) {
84*0Sstevel@tonic-gate 			rownum[cpos] = win->_cury;
85*0Sstevel@tonic-gate 			colnum[cpos] = win->_curx;
86*0Sstevel@tonic-gate 		}
87*0Sstevel@tonic-gate 
88*0Sstevel@tonic-gate 		ch = wgetwch(win);
89*0Sstevel@tonic-gate 		if ((ch == ERR) || (ch == '\n') || (ch == '\r') ||
90*0Sstevel@tonic-gate 		    (ch == KEY_ENTER))
91*0Sstevel@tonic-gate 			break;
92*0Sstevel@tonic-gate 		if ((ch == myerase) || (ch == KEY_LEFT) ||
93*0Sstevel@tonic-gate 		    (ch == KEY_BACKSPACE) || (ch == mykill)) {
94*0Sstevel@tonic-gate 			if (cpos > 0) {
95*0Sstevel@tonic-gate 				if (ch == mykill) {
96*0Sstevel@tonic-gate 					i = total;
97*0Sstevel@tonic-gate 					total = cpos = 0;
98*0Sstevel@tonic-gate 					cp = str;
99*0Sstevel@tonic-gate 				} else {
100*0Sstevel@tonic-gate 					cp--;
101*0Sstevel@tonic-gate 					cpos--;
102*0Sstevel@tonic-gate 					if (doecho)
103*0Sstevel@tonic-gate 						total -= (i = length[cpos]);
104*0Sstevel@tonic-gate 				}
105*0Sstevel@tonic-gate 				if (doecho) {
106*0Sstevel@tonic-gate 					(void) wmove(win, rownum[cpos],
107*0Sstevel@tonic-gate 					    colnum[cpos]);
108*0Sstevel@tonic-gate 					/* Add the correct amount of blanks. */
109*0Sstevel@tonic-gate 					for (; i > 0; i--)
110*0Sstevel@tonic-gate 						(void) waddch(win, ' ');
111*0Sstevel@tonic-gate 					/* Move back after the blanks */
112*0Sstevel@tonic-gate 					/* are put in. */
113*0Sstevel@tonic-gate 					(void) wmove(win, rownum[cpos],
114*0Sstevel@tonic-gate 					    colnum[cpos]);
115*0Sstevel@tonic-gate 					/* Update total. */
116*0Sstevel@tonic-gate 					(void) wrefresh(win);
117*0Sstevel@tonic-gate 				}
118*0Sstevel@tonic-gate 			} else
119*0Sstevel@tonic-gate 				if (doecho)
120*0Sstevel@tonic-gate 					(void) beep();
121*0Sstevel@tonic-gate 		} else
122*0Sstevel@tonic-gate 			if ((KEY_MIN <= ch) && (ch <= KEY_MAX))
123*0Sstevel@tonic-gate 				(void) beep();
124*0Sstevel@tonic-gate 			else {
125*0Sstevel@tonic-gate 				*cp++ = ch;
126*0Sstevel@tonic-gate 				if (doecho) {
127*0Sstevel@tonic-gate 					/* Add the length of the */
128*0Sstevel@tonic-gate 					/* character to total. */
129*0Sstevel@tonic-gate 					if ((ch & EUCMASK) != P00)
130*0Sstevel@tonic-gate 						length[cpos] = wcscrw(ch);
131*0Sstevel@tonic-gate 					else if (ch >= ' ')
132*0Sstevel@tonic-gate 						length[cpos] = 1;
133*0Sstevel@tonic-gate 					else if (ch == '\t')
134*0Sstevel@tonic-gate 						length[cpos] = TABSIZE -
135*0Sstevel@tonic-gate 						    (colnum[cpos] % TABSIZE);
136*0Sstevel@tonic-gate 					else
137*0Sstevel@tonic-gate 						length[cpos] = 2;
138*0Sstevel@tonic-gate 					total += length[cpos];
139*0Sstevel@tonic-gate 					(void) wechowchar(win, (chtype) ch);
140*0Sstevel@tonic-gate 				}
141*0Sstevel@tonic-gate 				cpos++;
142*0Sstevel@tonic-gate 			}
143*0Sstevel@tonic-gate 	}
144*0Sstevel@tonic-gate 
145*0Sstevel@tonic-gate 	*cp = '\0';
146*0Sstevel@tonic-gate 
147*0Sstevel@tonic-gate 	if (!savecb)
148*0Sstevel@tonic-gate 		(void) nocbreak();
149*0Sstevel@tonic-gate 	/*
150*0Sstevel@tonic-gate 	 * The following code is equivalent to waddch(win, '\n')
151*0Sstevel@tonic-gate 	 * except that it does not do a wclrtoeol.
152*0Sstevel@tonic-gate 	 */
153*0Sstevel@tonic-gate 	if (doecho) {
154*0Sstevel@tonic-gate 		SP->fl_echoit = TRUE;
155*0Sstevel@tonic-gate 		win->_curx = 0;
156*0Sstevel@tonic-gate 		if (win->_cury + 1 > win->_bmarg)
157*0Sstevel@tonic-gate 			(void) wscrl(win, 1);
158*0Sstevel@tonic-gate 		else
159*0Sstevel@tonic-gate 			win->_cury++;
160*0Sstevel@tonic-gate 
161*0Sstevel@tonic-gate 		win->_sync = savsync;
162*0Sstevel@tonic-gate 		win->_immed = savimmed;
163*0Sstevel@tonic-gate 		win->_leave = savleave;
164*0Sstevel@tonic-gate 		(void) wrefresh(win);
165*0Sstevel@tonic-gate 	}
166*0Sstevel@tonic-gate 	return (ch);
167*0Sstevel@tonic-gate }
168