/*
* CDDL HEADER START
*
* The contents of this file are subject to the terms of the
* Common Development and Distribution License, Version 1.0 only
* (the "License"). You may not use this file except in compliance
* with the License.
*
* You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
* or http://www.opensolaris.org/os/licensing.
* See the License for the specific language governing permissions
* and limitations under the License.
*
* When distributing Covered Code, include this CDDL HEADER in each
* file and include the License file at usr/src/OPENSOLARIS.LICENSE.
* If applicable, add the following below this CDDL HEADER, with the
* fields enclosed by brackets "[]" replaced with your own identifying
* information: Portions Copyright [yyyy] [name of copyright owner]
*
* CDDL HEADER END
*/
/* Copyright (c) 1988 AT&T */
/* All Rights Reserved */
/*
* Copyright (c) 1997, by Sun Microsystems, Inc.
* All rights reserved.
*/
#pragma ident "%Z%%M% %I% %E% SMI"
/*LINTLIBRARY*/
#include <sys/types.h>
#include "curses_inc.h"
#define LENGTH 256
/* This routine gets a string starting at (_cury, _curx) */
int
wgetwstr(WINDOW *win, wchar_t *str)
{
return ((wgetnwstr(win, str, LENGTH) == ERR) ? ERR : OK);
}
int
wgetnwstr(WINDOW *win, wchar_t *str, int n)
{
int cpos = 0, ch;
wchar_t *cp = str;
int i = 0;
int total = 0;
char myerase, mykill;
char rownum[LENGTH], colnum[LENGTH], length[LENGTH];
int doecho = SP->fl_echoit;
int savecb = cur_term->_fl_rawmode;
bool savsync, savimmed, savleave;
#ifdef DEBUG
if (outf)
fprintf(outf, "doecho %d, savecb %d\n", doecho, savecb);
#endif /* DEBUG */
myerase = erasechar();
mykill = killchar();
if (!savecb)
(void) cbreak();
if (doecho) {
SP->fl_echoit = FALSE;
savsync = win->_sync;
savimmed = win->_immed;
savleave = win->_leave;
win->_immed = win->_sync = win->_leave = FALSE;
(void) wrefresh(win);
if (n > LENGTH)
n = LENGTH;
}
n--;
while (cpos < n) {
if (doecho) {
rownum[cpos] = win->_cury;
colnum[cpos] = win->_curx;
}
ch = wgetwch(win);
if ((ch == ERR) || (ch == '\n') || (ch == '\r') ||
(ch == KEY_ENTER))
break;
if ((ch == myerase) || (ch == KEY_LEFT) ||
(ch == KEY_BACKSPACE) || (ch == mykill)) {
if (cpos > 0) {
if (ch == mykill) {
i = total;
total = cpos = 0;
cp = str;
} else {
cp--;
cpos--;
if (doecho)
total -= (i = length[cpos]);
}
if (doecho) {
(void) wmove(win, rownum[cpos],
colnum[cpos]);
/* Add the correct amount of blanks. */
for (; i > 0; i--)
(void) waddch(win, ' ');
/* Move back after the blanks */
/* are put in. */
(void) wmove(win, rownum[cpos],
colnum[cpos]);
/* Update total. */
(void) wrefresh(win);
}
} else
if (doecho)
(void) beep();
} else
if ((KEY_MIN <= ch) && (ch <= KEY_MAX))
(void) beep();
else {
*cp++ = ch;
if (doecho) {
/* Add the length of the */
/* character to total. */
if ((ch & EUCMASK) != P00)
length[cpos] = wcscrw(ch);
else if (ch >= ' ')
length[cpos] = 1;
else if (ch == '\t')
length[cpos] = TABSIZE -
(colnum[cpos] % TABSIZE);
else
length[cpos] = 2;
total += length[cpos];
(void) wechowchar(win, (chtype) ch);
}
cpos++;
}
}
*cp = '\0';
if (!savecb)
(void) nocbreak();
/*
* The following code is equivalent to waddch(win, '\n')
* except that it does not do a wclrtoeol.
*/
if (doecho) {
SP->fl_echoit = TRUE;
win->_curx = 0;
if (win->_cury + 1 > win->_bmarg)
(void) wscrl(win, 1);
else
win->_cury++;
win->_sync = savsync;
win->_immed = savimmed;
win->_leave = savleave;
(void) wrefresh(win);
}
return (ch);
}