xref: /onnv-gate/usr/src/lib/libcurses/screen/waddnstr.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 /*
23*0Sstevel@tonic-gate  * Copyright 1997 Sun Microsystems, Inc.  All rights reserved.
24*0Sstevel@tonic-gate  * Use is subject to license terms.
25*0Sstevel@tonic-gate  */
26*0Sstevel@tonic-gate 
27*0Sstevel@tonic-gate /*	Copyright (c) 1988 AT&T	*/
28*0Sstevel@tonic-gate /*	  All Rights Reserved	*/
29*0Sstevel@tonic-gate 
30*0Sstevel@tonic-gate /*
31*0Sstevel@tonic-gate  * University Copyright- Copyright (c) 1982, 1986, 1988
32*0Sstevel@tonic-gate  * The Regents of the University of California
33*0Sstevel@tonic-gate  * All Rights Reserved
34*0Sstevel@tonic-gate  *
35*0Sstevel@tonic-gate  * University Acknowledgment- Portions of this document are derived from
36*0Sstevel@tonic-gate  * software developed by the University of California, Berkeley, and its
37*0Sstevel@tonic-gate  * contributors.
38*0Sstevel@tonic-gate  */
39*0Sstevel@tonic-gate 
40*0Sstevel@tonic-gate #pragma ident	"%Z%%M%	%I%	%E% SMI"
41*0Sstevel@tonic-gate 
42*0Sstevel@tonic-gate /*LINTLIBRARY*/
43*0Sstevel@tonic-gate 
44*0Sstevel@tonic-gate #include	<sys/types.h>
45*0Sstevel@tonic-gate #include	"curses_inc.h"
46*0Sstevel@tonic-gate 
47*0Sstevel@tonic-gate /* This routine adds a string starting at (_cury, _curx) */
48*0Sstevel@tonic-gate 
49*0Sstevel@tonic-gate int
waddnstr(WINDOW * win,char * tstr,int i)50*0Sstevel@tonic-gate waddnstr(WINDOW *win, char *tstr, int i)
51*0Sstevel@tonic-gate {
52*0Sstevel@tonic-gate 	chtype	ch;
53*0Sstevel@tonic-gate 	short	maxx_1 = win->_maxx - 1, cury = win->_cury,
54*0Sstevel@tonic-gate 		curx = win->_curx;
55*0Sstevel@tonic-gate 	chtype	**_y = win->_y;
56*0Sstevel@tonic-gate 	bool	savimmed = win->_immed,
57*0Sstevel@tonic-gate 		savsync = win->_sync;
58*0Sstevel@tonic-gate 	int	rv = OK;
59*0Sstevel@tonic-gate 	int	pflag;
60*0Sstevel@tonic-gate 	unsigned	char *str = (unsigned char *)tstr;
61*0Sstevel@tonic-gate 
62*0Sstevel@tonic-gate #ifdef	DEBUG
63*0Sstevel@tonic-gate 	if (outf) {
64*0Sstevel@tonic-gate 		if (win == stdscr)
65*0Sstevel@tonic-gate 			fprintf(outf, "waddnstr(stdscr, ");
66*0Sstevel@tonic-gate 		else
67*0Sstevel@tonic-gate 			fprintf(outf, "waddnstr(%o, ", win);
68*0Sstevel@tonic-gate 		fprintf(outf, "\"%s\")\n", str);
69*0Sstevel@tonic-gate 	}
70*0Sstevel@tonic-gate #endif	/* DEBUG */
71*0Sstevel@tonic-gate 
72*0Sstevel@tonic-gate 	/* throw away any current partial character */
73*0Sstevel@tonic-gate 	win->_nbyte = -1;
74*0Sstevel@tonic-gate 	win->_insmode = FALSE;
75*0Sstevel@tonic-gate 	pflag = 1;
76*0Sstevel@tonic-gate 
77*0Sstevel@tonic-gate 	win->_immed = win->_sync = FALSE;
78*0Sstevel@tonic-gate 
79*0Sstevel@tonic-gate 	if (i < 0)
80*0Sstevel@tonic-gate 		i = MAXINT;
81*0Sstevel@tonic-gate 
82*0Sstevel@tonic-gate 	while (((ch = *str) != 0) && (i-- > 0)) {
83*0Sstevel@tonic-gate 		if (pflag == 1) {
84*0Sstevel@tonic-gate 			if (_scrmax > 1 && (rv = _mbvalid(win)) == ERR)
85*0Sstevel@tonic-gate 				break;
86*0Sstevel@tonic-gate 			curx = win->_curx;
87*0Sstevel@tonic-gate 			cury = win->_cury;
88*0Sstevel@tonic-gate 		}
89*0Sstevel@tonic-gate 		if (_mbtrue && ISMBIT(ch)) {
90*0Sstevel@tonic-gate 			int	m, k, ty;
91*0Sstevel@tonic-gate 			chtype		c;
92*0Sstevel@tonic-gate 			/* make sure we have the whole character */
93*0Sstevel@tonic-gate 			c = RBYTE(ch);
94*0Sstevel@tonic-gate 			ty = TYPE(c);
95*0Sstevel@tonic-gate 			m = cswidth[ty] - (ty == 0 ? 1 : 0);
96*0Sstevel@tonic-gate 			for (k = 1; str[k] != '\0' && k <= m; ++k)
97*0Sstevel@tonic-gate 				if (!ISMBIT(str[k]))
98*0Sstevel@tonic-gate 					break;
99*0Sstevel@tonic-gate 			if (k <= m)
100*0Sstevel@tonic-gate 				break;
101*0Sstevel@tonic-gate 			if (m > i)
102*0Sstevel@tonic-gate 				break;
103*0Sstevel@tonic-gate 			for (k = 0; k <= m; ++k, ++str) {
104*0Sstevel@tonic-gate 				if ((rv = _mbaddch(win, A_NORMAL,
105*0Sstevel@tonic-gate 				    RBYTE(*str))) == ERR)
106*0Sstevel@tonic-gate 					goto done;
107*0Sstevel@tonic-gate 				if (k > 0)
108*0Sstevel@tonic-gate 					i--;
109*0Sstevel@tonic-gate 			}
110*0Sstevel@tonic-gate 			pflag = 1;
111*0Sstevel@tonic-gate 			cury = win->_cury;
112*0Sstevel@tonic-gate 			curx = win->_curx;
113*0Sstevel@tonic-gate 			continue;
114*0Sstevel@tonic-gate 		}
115*0Sstevel@tonic-gate 
116*0Sstevel@tonic-gate 		/* do normal characters while not next to edge */
117*0Sstevel@tonic-gate 		if ((ch >= ' ') && (ch != _CTRL('?')) && (curx < maxx_1)) {
118*0Sstevel@tonic-gate 			if (_scrmax > 1 && ISMBIT(_y[cury][curx]) &&
119*0Sstevel@tonic-gate 			    (rv = _mbclrch(win, cury, curx)) == ERR)
120*0Sstevel@tonic-gate 				break;
121*0Sstevel@tonic-gate 			if (curx < win->_firstch[cury])
122*0Sstevel@tonic-gate 				win->_firstch[cury] = curx;
123*0Sstevel@tonic-gate 			if (curx > win->_lastch[cury])
124*0Sstevel@tonic-gate 				win->_lastch[cury] = curx;
125*0Sstevel@tonic-gate 			ch = _WCHAR(win, ch);
126*0Sstevel@tonic-gate 			_y[cury][curx] = ch;
127*0Sstevel@tonic-gate #ifdef	_VR3_COMPAT_CODE
128*0Sstevel@tonic-gate 			if (_y16update)
129*0Sstevel@tonic-gate 				/* LINTED */
130*0Sstevel@tonic-gate 				win->_y16[cury][curx] = _TO_OCHTYPE(ch);
131*0Sstevel@tonic-gate #endif	/* _VR3_COMPAT_CODE */
132*0Sstevel@tonic-gate 			curx++;
133*0Sstevel@tonic-gate 			pflag = 0;
134*0Sstevel@tonic-gate 		} else {
135*0Sstevel@tonic-gate 			win->_curx = curx;
136*0Sstevel@tonic-gate 			/* found a char that is too tough to handle above */
137*0Sstevel@tonic-gate 			if (waddch(win, ch) == ERR) {
138*0Sstevel@tonic-gate 				rv = ERR;
139*0Sstevel@tonic-gate 				break;
140*0Sstevel@tonic-gate 			}
141*0Sstevel@tonic-gate 			cury = win->_cury;
142*0Sstevel@tonic-gate 			curx = win->_curx;
143*0Sstevel@tonic-gate 			pflag = 1;
144*0Sstevel@tonic-gate 		}
145*0Sstevel@tonic-gate 		str++;
146*0Sstevel@tonic-gate 		win->_curx = curx;
147*0Sstevel@tonic-gate 	}
148*0Sstevel@tonic-gate 
149*0Sstevel@tonic-gate done :
150*0Sstevel@tonic-gate 	win->_curx = curx;
151*0Sstevel@tonic-gate 	win->_flags |= _WINCHANGED;
152*0Sstevel@tonic-gate 	win->_sync = savsync;
153*0Sstevel@tonic-gate 	if (win->_sync)
154*0Sstevel@tonic-gate 		wsyncup(win);
155*0Sstevel@tonic-gate 
156*0Sstevel@tonic-gate 	return ((win->_immed = savimmed) ? wrefresh(win) : rv);
157*0Sstevel@tonic-gate }
158