xref: /netbsd-src/usr.bin/systat/keyboard.c (revision bada23909e740596d0a3785a73bd3583a9807fb8)
1 /*	$NetBSD: keyboard.c,v 1.5 1998/07/12 05:59:00 mrg Exp $	*/
2 
3 /*-
4  * Copyright (c) 1980, 1992, 1993
5  *	The Regents of the University of California.  All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  * 3. All advertising materials mentioning features or use of this software
16  *    must display the following acknowledgement:
17  *	This product includes software developed by the University of
18  *	California, Berkeley and its contributors.
19  * 4. Neither the name of the University nor the names of its contributors
20  *    may be used to endorse or promote products derived from this software
21  *    without specific prior written permission.
22  *
23  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
24  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
25  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
26  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
27  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
28  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
29  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
30  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
31  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
32  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
33  * SUCH DAMAGE.
34  */
35 
36 #include <sys/cdefs.h>
37 #ifndef lint
38 #if 0
39 static char sccsid[] = "@(#)keyboard.c	8.1 (Berkeley) 6/6/93";
40 #endif
41 __RCSID("$NetBSD: keyboard.c,v 1.5 1998/07/12 05:59:00 mrg Exp $");
42 #endif /* not lint */
43 
44 #include <sys/types.h>
45 
46 #include <ctype.h>
47 #include <curses.h>
48 #include <signal.h>
49 #include <termios.h>
50 #include <stdlib.h>
51 
52 #include "systat.h"
53 #include "extern.h"
54 
55 int
56 keyboard()
57 {
58 	char ch, *line;
59 	int linesz;
60 	sigset_t set;
61 
62 	sigemptyset(&set);
63 	sigaddset(&set, SIGALRM);
64 
65 	linesz = COLS - 2;		/* XXX does not get updated on SIGWINCH */
66 	line = malloc(linesz);
67 	if (line == NULL) {
68 		error("malloc");
69 		exit(1);
70 	}
71 
72 	for (;;) {
73 		col = 0;
74 		move(CMDLINE, 0);
75 		do {
76 			refresh();
77 			ch = getch() & 0177;
78 			if (ch == 0177 && ferror(stdin)) {
79 				clearerr(stdin);
80 				continue;
81 			}
82 			if (ch >= 'A' && ch <= 'Z')
83 				ch += 'a' - 'A';
84 			if (col == 0) {
85 				if (ch == CTRL('l')) {
86 					sigprocmask(SIG_BLOCK, &set, NULL);
87 					wrefresh(curscr);
88 					sigprocmask(SIG_UNBLOCK, &set, NULL);
89 					continue;
90 				}
91 				if (ch == CTRL('g')) {
92 					sigprocmask(SIG_BLOCK, &set, NULL);
93 					status();
94 					sigprocmask(SIG_UNBLOCK, &set, NULL);
95 					continue;
96 				}
97 				if (ch != ':')
98 					continue;
99 				move(CMDLINE, 0);
100 				clrtoeol();
101 			}
102 			if (ch == erasechar() && col > 0) {
103 				if (col == 1 && line[0] == ':')
104 					continue;
105 				col--;
106 				goto doerase;
107 			}
108 			if (ch == CTRL('w') && col > 0) {
109 				while (--col >= 0 && isspace(line[col]));
110 				col++;
111 				while (--col >= 0 && !isspace(line[col]))
112 					if (col == 0 && line[0] == ':')
113 						break;
114 				col++;
115 				goto doerase;
116 			}
117 			if (ch == killchar() && col > 0) {
118 				if (line[0] == ':')
119 					col = 1;
120 				else
121 					col = 0;
122 		doerase:
123 				move(CMDLINE, col);
124 				clrtoeol();
125 				continue;
126 			}
127 			if (isprint(ch) || ch == ' ') {
128 				if (col < linesz) {
129 					line[col] = ch;
130 					mvaddch(CMDLINE, col, ch);
131 					col++;
132 				}
133 			}
134 		} while (col == 0 || (ch != '\r' && ch != '\n'));
135 		line[col] = '\0';
136 		sigprocmask(SIG_BLOCK, &set, NULL);
137 		command(line + 1);
138 		sigprocmask(SIG_UNBLOCK, &set, NULL);
139 	}
140 	/* NOTREACHED */
141 }
142