1/*-
2 * Copyright (c) 1980, 1992, 1993
3 *	The Regents of the University of California.  All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 *    notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 *    notice, this list of conditions and the following disclaimer in the
12 *    documentation and/or other materials provided with the distribution.
13 * 4. Neither the name of the University nor the names of its contributors
14 *    may be used to endorse or promote products derived from this software
15 *    without specific prior written permission.
16 *
17 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
20 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
27 * SUCH DAMAGE.
28 */
29
30#include <sys/cdefs.h>
31
32__FBSDID("$FreeBSD$");
33
34#ifdef lint
35static const char sccsid[] = "@(#)keyboard.c	8.1 (Berkeley) 6/6/93";
36#endif
37
38#include <sys/select.h>
39#include <sys/time.h>
40
41#include <errno.h>
42#include <ctype.h>
43#include <stdlib.h>
44#include <termios.h>
45#include <unistd.h>
46
47#include "systat.h"
48#include "extern.h"
49
50static char line[80];
51static int keyboard_dispatch(int ch);
52
53int
54keyboard(void)
55{
56	int ch, n;
57	struct timeval last, intvl, now, tm;
58	fd_set rfds;
59
60	/* Set initial timings */
61	gettimeofday(&last, NULL);
62	intvl.tv_sec = delay / 1000000;
63	intvl.tv_usec = delay % 1000000;
64	for (;;) {
65		col = 0;
66		move(CMDLINE, 0);
67		for (;;) {
68			/* Determine interval to sleep */
69			(void)gettimeofday(&now, NULL);
70			tm.tv_sec = last.tv_sec + intvl.tv_sec - now.tv_sec;
71			tm.tv_usec = last.tv_usec + intvl.tv_usec - now.tv_usec;
72			while (tm.tv_usec < 0) {
73				tm.tv_usec += 1000000;
74				tm.tv_sec--;
75			}
76			while (tm.tv_usec >= 1000000) {
77				tm.tv_usec -= 1000000;
78				tm.tv_sec++;
79			}
80			if (tm.tv_sec < 0) {
81				/* We have to update screen immediately */
82				display();
83				gettimeofday(&last, NULL);
84				continue;
85			}
86
87			/* Prepare select  */
88			FD_ZERO(&rfds);
89			FD_SET(STDIN_FILENO, &rfds);
90			n = select(STDIN_FILENO + 1, &rfds, NULL, NULL, &tm);
91
92			if (n > 0) {
93				/* Read event on stdin */
94				ch = getch();
95
96				if (keyboard_dispatch(ch) == 0) {
97					refresh();
98					continue;
99				}
100
101				line[col] = '\0';
102				command(line + 1);
103				/* Refresh delay */
104				intvl.tv_sec = delay / 1000000;
105				intvl.tv_usec = delay % 1000000;
106				refresh();
107				break;
108			}
109
110			if (n < 0 && errno != EINTR)
111				exit(1);
112
113			/* Timeout or signal. Call display another time */
114			display();
115			gettimeofday(&last, NULL);
116		}
117	}
118}
119
120static int
121keyboard_dispatch(int ch)
122{
123
124	if (ch == ERR) {
125		if (errno == EINTR)
126			return 0;
127		exit(1);
128	}
129	if (ch >= 'A' && ch <= 'Z')
130		ch += 'a' - 'A';
131	if (col == 0) {
132		if (ch == CTRL('l')) {
133			wrefresh(curscr);
134			return 0;
135		}
136		if (ch == CTRL('g')) {
137			status();
138			return 0;
139		}
140		if (ch != ':')
141			return 0;
142		move(CMDLINE, 0);
143		clrtoeol();
144	}
145	if (ch == erasechar() && col > 0) {
146		if (col == 1 && line[0] == ':')
147			return 0;
148		col--;
149		goto doerase;
150	}
151	if (ch == CTRL('w') && col > 0) {
152		while (--col >= 0 && isspace(line[col]))
153			;
154		col++;
155		while (--col >= 0 && !isspace(line[col]))
156			if (col == 0 && line[0] == ':')
157				return 1;
158		col++;
159		goto doerase;
160	}
161	if (ch == killchar() && col > 0) {
162		col = 0;
163		if (line[0] == ':')
164			col++;
165doerase:
166		move(CMDLINE, col);
167		clrtoeol();
168		return 0;
169	}
170	if (isprint(ch) || ch == ' ') {
171		line[col] = ch;
172		mvaddch(CMDLINE, col, ch);
173		col++;
174	}
175
176	if (col == 0 || (ch != '\r' && ch != '\n'))
177		return 0;
178
179	return 1;
180}
181