1 /* $NetBSD: inwstr.c,v 1.3 2009/07/22 16:57:15 roy 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.3 2009/07/22 16:57:15 roy 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.") 51 int 52 inwstr(wchar_t *wstr) 53 { 54 #ifndef HAVE_WCHAR 55 return ERR; 56 #else 57 return winwstr(stdscr, wstr); 58 #endif /* HAVE_WCHAR */ 59 } 60 61 int 62 innwstr(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.") 77 int 78 mvinwstr(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 87 int 88 mvinnwstr(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.") 103 int 104 mvwinwstr(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 116 int 117 mvwinnwstr(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.") 135 int 136 winwstr(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 */ 155 int 156 winnwstr(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->alines[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