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