1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
|
/* This work is copyrighted. See COPYRIGHT.OLD & COPYRIGHT.NEW for *
* details. If they are missing then this copy is in violation of *
* the copyright conditions. */
/*
** lib_getstr.c
**
** The routine wgetstr().
**
*/
#include "curses.priv.h"
#include "unctrl.h"
inline void backspace(WINDOW *win)
{
mvwaddstr(curscr, win->_begy + win->_cury, win->_begx + win->_curx,
"\b \b");
waddstr(win, "\b \b");
fputs("\b \b", SP->_ofp);
fflush(SP->_ofp);
SP->_curscol--;
}
int wgetnstr(WINDOW *win, char *str, int maxlen)
{
bool oldnl, oldecho, oldraw, oldcbreak, oldkeypad;
char erasec;
char killc;
char *oldstr;
int ch;
T(("wgetnstr(%x,%x, %d) called", win, str, maxlen));
oldnl = SP->_nl;
oldecho = SP->_echo;
oldraw = SP->_raw;
oldcbreak = SP->_cbreak;
oldkeypad = win->_use_keypad;
nl();
noecho();
noraw();
cbreak();
keypad(win, FALSE);
erasec = erasechar();
killc = killchar();
oldstr = str;
vidattr(win->_attrs);
if (is_wintouched(win) || (win->_flags & _HASMOVED))
wrefresh(win);
while ((ch = wgetch(win)) != ERR) {
if (ch == '\n' || ch == '\r')
break;
if (ch == erasec || ch == KEY_LEFT || ch == KEY_BACKSPACE) {
if (str > oldstr) {
str--;
backspace(win);
}
} else if (ch == killc) {
while (str > oldstr) {
str--;
backspace(win);
}
} else if (maxlen >= 0 && str - oldstr >= maxlen) {
beep();
} else {
mvwaddstr(curscr, win->_begy + win->_cury,
win->_begx + win->_curx, unctrl(ch));
waddstr(win, unctrl(ch));
if (oldecho == TRUE) {
fputs(unctrl(ch), SP->_ofp);
fflush(SP->_ofp);
}
SP->_curscol++;
*str++ = ch;
}
}
win->_curx = 0;
if (win->_cury < win->_maxy)
win->_cury++;
wrefresh(win);
if (! oldnl)
nonl();
if (oldecho)
echo();
if (oldraw)
raw();
if (! oldcbreak)
nocbreak();
if (oldkeypad)
keypad(win, TRUE);
if (ch == ERR) {
*str = '\0';
return ERR;
}
*str = '\0';
T(("wgetnstr returns %s", oldstr));
return(OK);
}
|