1 /*
2 * CDDL HEADER START
3 *
4 * The contents of this file are subject to the terms of the
5 * Common Development and Distribution License, Version 1.0 only
6 * (the "License"). You may not use this file except in compliance
7 * with the License.
8 *
9 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10 * or http://www.opensolaris.org/os/licensing.
11 * See the License for the specific language governing permissions
12 * and limitations under the License.
13 *
14 * When distributing Covered Code, include this CDDL HEADER in each
15 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16 * If applicable, add the following below this CDDL HEADER, with the
17 * fields enclosed by brackets "[]" replaced with your own identifying
18 * information: Portions Copyright [yyyy] [name of copyright owner]
19 *
20 * CDDL HEADER END
21 */
22 /*
23 * Copyright 1997 Sun Microsystems, Inc. All rights reserved.
24 * Use is subject to license terms.
25 */
26
27 /* Copyright (c) 1988 AT&T */
28 /* All Rights Reserved */
29
30 /*
31 * University Copyright- Copyright (c) 1982, 1986, 1988
32 * The Regents of the University of California
33 * All Rights Reserved
34 *
35 * University Acknowledgment- Portions of this document are derived from
36 * software developed by the University of California, Berkeley, and its
37 * contributors.
38 */
39
40 #pragma ident "%Z%%M% %I% %E% SMI"
41
42 /*LINTLIBRARY*/
43
44 #include <sys/types.h>
45 #include "curses_inc.h"
46
47 /* This routine adds a string starting at (_cury, _curx) */
48
49 int
waddnstr(WINDOW * win,char * tstr,int i)50 waddnstr(WINDOW *win, char *tstr, int i)
51 {
52 chtype ch;
53 short maxx_1 = win->_maxx - 1, cury = win->_cury,
54 curx = win->_curx;
55 chtype **_y = win->_y;
56 bool savimmed = win->_immed,
57 savsync = win->_sync;
58 int rv = OK;
59 int pflag;
60 unsigned char *str = (unsigned char *)tstr;
61
62 #ifdef DEBUG
63 if (outf) {
64 if (win == stdscr)
65 fprintf(outf, "waddnstr(stdscr, ");
66 else
67 fprintf(outf, "waddnstr(%o, ", win);
68 fprintf(outf, "\"%s\")\n", str);
69 }
70 #endif /* DEBUG */
71
72 /* throw away any current partial character */
73 win->_nbyte = -1;
74 win->_insmode = FALSE;
75 pflag = 1;
76
77 win->_immed = win->_sync = FALSE;
78
79 if (i < 0)
80 i = MAXINT;
81
82 while (((ch = *str) != 0) && (i-- > 0)) {
83 if (pflag == 1) {
84 if (_scrmax > 1 && (rv = _mbvalid(win)) == ERR)
85 break;
86 curx = win->_curx;
87 cury = win->_cury;
88 }
89 if (_mbtrue && ISMBIT(ch)) {
90 int m, k, ty;
91 chtype c;
92 /* make sure we have the whole character */
93 c = RBYTE(ch);
94 ty = TYPE(c);
95 m = cswidth[ty] - (ty == 0 ? 1 : 0);
96 for (k = 1; str[k] != '\0' && k <= m; ++k)
97 if (!ISMBIT(str[k]))
98 break;
99 if (k <= m)
100 break;
101 if (m > i)
102 break;
103 for (k = 0; k <= m; ++k, ++str) {
104 if ((rv = _mbaddch(win, A_NORMAL,
105 RBYTE(*str))) == ERR)
106 goto done;
107 if (k > 0)
108 i--;
109 }
110 pflag = 1;
111 cury = win->_cury;
112 curx = win->_curx;
113 continue;
114 }
115
116 /* do normal characters while not next to edge */
117 if ((ch >= ' ') && (ch != _CTRL('?')) && (curx < maxx_1)) {
118 if (_scrmax > 1 && ISMBIT(_y[cury][curx]) &&
119 (rv = _mbclrch(win, cury, curx)) == ERR)
120 break;
121 if (curx < win->_firstch[cury])
122 win->_firstch[cury] = curx;
123 if (curx > win->_lastch[cury])
124 win->_lastch[cury] = curx;
125 ch = _WCHAR(win, ch);
126 _y[cury][curx] = ch;
127 #ifdef _VR3_COMPAT_CODE
128 if (_y16update)
129 /* LINTED */
130 win->_y16[cury][curx] = _TO_OCHTYPE(ch);
131 #endif /* _VR3_COMPAT_CODE */
132 curx++;
133 pflag = 0;
134 } else {
135 win->_curx = curx;
136 /* found a char that is too tough to handle above */
137 if (waddch(win, ch) == ERR) {
138 rv = ERR;
139 break;
140 }
141 cury = win->_cury;
142 curx = win->_curx;
143 pflag = 1;
144 }
145 str++;
146 win->_curx = curx;
147 }
148
149 done :
150 win->_curx = curx;
151 win->_flags |= _WINCHANGED;
152 win->_sync = savsync;
153 if (win->_sync)
154 wsyncup(win);
155
156 return ((win->_immed = savimmed) ? wrefresh(win) : rv);
157 }
158