xref: /netbsd-src/sbin/wsconsctl/keyboard.c (revision d9c815ad06e3ed18065f6b782ac7c925f760faab)
1 /*	$NetBSD: keyboard.c,v 1.12 2021/09/22 14:15:29 mlelstv Exp $ */
2 
3 /*-
4  * Copyright (c) 1998, 2004 The NetBSD Foundation, Inc.
5  * All rights reserved.
6  *
7  * This code is derived from software contributed to The NetBSD Foundation
8  * by Juergen Hannken-Illjes.
9  *
10  * Redistribution and use in source and binary forms, with or without
11  * modification, are permitted provided that the following conditions
12  * are met:
13  * 1. Redistributions of source code must retain the above copyright
14  *    notice, this list of conditions and the following disclaimer.
15  * 2. Redistributions in binary form must reproduce the above copyright
16  *    notice, this list of conditions and the following disclaimer in the
17  *    documentation and/or other materials provided with the distribution.
18  *
19  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29  * POSSIBILITY OF SUCH DAMAGE.
30  */
31 
32 #include <sys/ioctl.h>
33 #include <sys/time.h>
34 
35 #include <dev/wscons/wsksymdef.h>
36 #include <dev/wscons/wsconsio.h>
37 
38 #include <err.h>
39 #include <errno.h>
40 #include <stdlib.h>
41 #include <string.h>
42 
43 #include "wsconsctl.h"
44 
45 static int kbtype;
46 static int keyclick;
47 static struct wskbd_bell_data bell;
48 static struct wskbd_bell_data dfbell;
49 static struct wscons_keymap mapdata[KS_NUMKEYCODES];
50 struct wskbd_map_data kbmap = /* used in map_parse.y and in util.c */
51     { KS_NUMKEYCODES, mapdata };
52 static struct wscons_keymap oldmapdata[KS_NUMKEYCODES];
53 static struct wskbd_map_data oldkbmap =
54     { KS_NUMKEYCODES, oldmapdata };
55 static struct wskbd_keyrepeat_data repeat;
56 static struct wskbd_keyrepeat_data dfrepeat;
57 static struct wskbd_scroll_data scroll;
58 static int ledstate;
59 static kbd_t kbdencoding;
60 static int havescroll = 1;
61 static int kbmode;
62 
63 struct field keyboard_field_tab[] = {
64     { "type",			&kbtype,	FMT_KBDTYPE,	FLG_RDONLY },
65     { "mode",			&kbmode,	FMT_UINT,	FLG_MODIFY },
66     { "bell.pitch",		&bell.pitch,	FMT_UINT,	FLG_MODIFY },
67     { "bell.period",		&bell.period,	FMT_UINT,	FLG_MODIFY },
68     { "bell.volume",		&bell.volume,	FMT_UINT,	FLG_MODIFY },
69     { "bell.pitch.default",	&dfbell.pitch,	FMT_UINT,	FLG_MODIFY },
70     { "bell.period.default",	&dfbell.period,	FMT_UINT,	FLG_MODIFY },
71     { "bell.volume.default",	&dfbell.volume,	FMT_UINT,	FLG_MODIFY },
72     { "map",			&kbmap,		FMT_KBMAP,	FLG_MODIFY |
73     								FLG_NOAUTO },
74     { "repeat.del1",		&repeat.del1,	FMT_UINT,	FLG_MODIFY },
75     { "repeat.deln",		&repeat.delN,	FMT_UINT,	FLG_MODIFY },
76     { "repeat.del1.default",	&dfrepeat.del1,	FMT_UINT,	FLG_MODIFY },
77     { "repeat.deln.default",	&dfrepeat.delN,	FMT_UINT,	FLG_MODIFY },
78     { "ledstate",		&ledstate,	FMT_UINT,	0 },
79     { "encoding",		&kbdencoding,	FMT_KBDENC,	FLG_MODIFY },
80     { "keyclick",		&keyclick,	FMT_UINT,	FLG_MODIFY },
81     { "scroll.mode",		&scroll.mode,	FMT_UINT,	FLG_MODIFY },
82     { "scroll.modifier",	&scroll.modifier, FMT_UINT,	FLG_MODIFY },
83 };
84 
85 int keyboard_field_tab_len = sizeof(keyboard_field_tab) /
86 	sizeof(keyboard_field_tab[0]);
87 
88 static void
diff_kmap(struct wskbd_map_data * omap,struct wskbd_map_data * nmap)89 diff_kmap(struct wskbd_map_data *omap, struct wskbd_map_data *nmap)
90 {
91 	unsigned int u;
92 	struct wscons_keymap *op, *np;
93 
94 	for (u = 0; u < nmap->maplen; u++) {
95 		op = omap->map + u;
96 		np = nmap->map + u;
97 		if (op->command == np->command &&
98 		    op->group1[0] == np->group1[0] &&
99 		    op->group1[1] == np->group1[1] &&
100 		    op->group2[0] == np->group2[0] &&
101 		    op->group2[1] == np->group2[1]) {
102 			np->command = KS_voidSymbol;
103 			np->group1[0] = KS_voidSymbol;
104 			np->group1[1] = KS_voidSymbol;
105 			np->group2[0] = KS_voidSymbol;
106 			np->group2[1] = KS_voidSymbol;
107 		}
108 	}
109 }
110 
111 void
keyboard_get_values(int fd)112 keyboard_get_values(int fd)
113 {
114 
115 	if (field_by_value(&kbtype)->flags & FLG_GET)
116 		if (ioctl(fd, WSKBDIO_GTYPE, &kbtype) < 0)
117 			err(EXIT_FAILURE, "WSKBDIO_GTYPE");
118 
119 	if (field_by_value(&kbmode)->flags & FLG_GET) {
120 		ioctl(fd, WSKBDIO_GETMODE, &kbmode);
121 		/* Optional; don't complain. */
122 	}
123 
124 	bell.which = 0;
125 	if (field_by_value(&bell.pitch)->flags & FLG_GET)
126 		bell.which |= WSKBD_BELL_DOPITCH;
127 	if (field_by_value(&bell.period)->flags & FLG_GET)
128 		bell.which |= WSKBD_BELL_DOPERIOD;
129 	if (field_by_value(&bell.volume)->flags & FLG_GET)
130 		bell.which |= WSKBD_BELL_DOVOLUME;
131 	if (bell.which != 0 && ioctl(fd, WSKBDIO_GETBELL, &bell) < 0)
132 		err(EXIT_FAILURE, "WSKBDIO_GETBELL");
133 
134 	dfbell.which = 0;
135 	if (field_by_value(&dfbell.pitch)->flags & FLG_GET)
136 		dfbell.which |= WSKBD_BELL_DOPITCH;
137 	if (field_by_value(&dfbell.period)->flags & FLG_GET)
138 		dfbell.which |= WSKBD_BELL_DOPERIOD;
139 	if (field_by_value(&dfbell.volume)->flags & FLG_GET)
140 		dfbell.which |= WSKBD_BELL_DOVOLUME;
141 	if (dfbell.which != 0 &&
142 	    ioctl(fd, WSKBDIO_GETDEFAULTBELL, &dfbell) < 0)
143 		err(EXIT_FAILURE, "WSKBDIO_GETDEFAULTBELL");
144 
145 	if (field_by_value(&kbmap)->flags & FLG_GET) {
146 		kbmap.maplen = KS_NUMKEYCODES;
147 		if (ioctl(fd, WSKBDIO_GETMAP, &kbmap) < 0)
148 			err(EXIT_FAILURE, "WSKBDIO_GETMAP");
149 		memcpy(oldmapdata, mapdata, sizeof(oldmapdata));
150 	}
151 
152 	repeat.which = 0;
153 	if (field_by_value(&repeat.del1)->flags & FLG_GET)
154 		repeat.which |= WSKBD_KEYREPEAT_DODEL1;
155 	if (field_by_value(&repeat.delN)->flags & FLG_GET)
156 		repeat.which |= WSKBD_KEYREPEAT_DODELN;
157 	if (repeat.which != 0 &&
158 	    ioctl(fd, WSKBDIO_GETKEYREPEAT, &repeat) < 0)
159 		err(EXIT_FAILURE, "WSKBDIO_GETKEYREPEAT");
160 
161 	dfrepeat.which = 0;
162 	if (field_by_value(&dfrepeat.del1)->flags & FLG_GET)
163 		dfrepeat.which |= WSKBD_KEYREPEAT_DODEL1;
164 	if (field_by_value(&dfrepeat.delN)->flags & FLG_GET)
165 		dfrepeat.which |= WSKBD_KEYREPEAT_DODELN;
166 	if (dfrepeat.which != 0 &&
167 	    ioctl(fd, WSKBDIO_GETKEYREPEAT, &dfrepeat) < 0)
168 		err(EXIT_FAILURE, "WSKBDIO_GETKEYREPEAT");
169 
170 	if (field_by_value(&ledstate)->flags & FLG_GET)
171 		if (ioctl(fd, WSKBDIO_GETLEDS, &ledstate) < 0)
172 			err(EXIT_FAILURE, "WSKBDIO_GETLEDS");
173 
174 	if (field_by_value(&kbdencoding)->flags & FLG_GET)
175 		if (ioctl(fd, WSKBDIO_GETENCODING, &kbdencoding) < 0)
176 			err(EXIT_FAILURE, "WSKBDIO_GETENCODING");
177 
178 	if (field_by_value(&keyclick)->flags & FLG_GET) {
179 		ioctl(fd, WSKBDIO_GETKEYCLICK, &keyclick);
180 		/* Optional; don't complain. */
181 	}
182 
183 	scroll.which = 0;
184 	if (field_by_value(&scroll.mode)->flags & FLG_GET)
185 		scroll.which |= WSKBD_SCROLL_DOMODE;
186 	if (field_by_value(&scroll.modifier)->flags & FLG_GET)
187 		scroll.which |= WSKBD_SCROLL_DOMODIFIER;
188 	if (scroll.which != 0) {
189 		if (ioctl(fd, WSKBDIO_GETSCROLL, &scroll) == -1) {
190 			if (errno != ENODEV)
191 				err(EXIT_FAILURE, "WSKBDIO_GETSCROLL");
192 			else
193 				havescroll = 0;
194 		}
195 	}
196 }
197 
198 void
keyboard_put_values(int fd)199 keyboard_put_values(int fd)
200 {
201 
202 	if (field_by_value(&kbmode)->flags & FLG_SET) {
203 		if (ioctl(fd, WSKBDIO_SETMODE, &kbmode) < 0)
204 			err(EXIT_FAILURE, "WSKBDIO_SETMODE");
205 		pr_field(field_by_value(&kbmode), " -> ");
206 	}
207 
208 	bell.which = 0;
209 	if (field_by_value(&bell.pitch)->flags & FLG_SET)
210 		bell.which |= WSKBD_BELL_DOPITCH;
211 	if (field_by_value(&bell.period)->flags & FLG_SET)
212 		bell.which |= WSKBD_BELL_DOPERIOD;
213 	if (field_by_value(&bell.volume)->flags & FLG_SET)
214 		bell.which |= WSKBD_BELL_DOVOLUME;
215 	if (bell.which != 0 && ioctl(fd, WSKBDIO_SETBELL, &bell) < 0)
216 		err(EXIT_FAILURE, "WSKBDIO_SETBELL");
217 	if (bell.which & WSKBD_BELL_DOPITCH)
218 		pr_field(field_by_value(&bell.pitch), " -> ");
219 	if (bell.which & WSKBD_BELL_DOPERIOD)
220 		pr_field(field_by_value(&bell.period), " -> ");
221 	if (bell.which & WSKBD_BELL_DOVOLUME)
222 		pr_field(field_by_value(&bell.volume), " -> ");
223 
224 	dfbell.which = 0;
225 	if (field_by_value(&dfbell.pitch)->flags & FLG_SET)
226 		dfbell.which |= WSKBD_BELL_DOPITCH;
227 	if (field_by_value(&dfbell.period)->flags & FLG_SET)
228 		dfbell.which |= WSKBD_BELL_DOPERIOD;
229 	if (field_by_value(&dfbell.volume)->flags & FLG_SET)
230 		dfbell.which |= WSKBD_BELL_DOVOLUME;
231 	if (dfbell.which != 0 &&
232 	    ioctl(fd, WSKBDIO_SETDEFAULTBELL, &dfbell) < 0)
233 		err(EXIT_FAILURE, "WSKBDIO_SETDEFAULTBELL");
234 	if (dfbell.which & WSKBD_BELL_DOPITCH)
235 		pr_field(field_by_value(&dfbell.pitch), " -> ");
236 	if (dfbell.which & WSKBD_BELL_DOPERIOD)
237 		pr_field(field_by_value(&dfbell.period), " -> ");
238 	if (dfbell.which & WSKBD_BELL_DOVOLUME)
239 		pr_field(field_by_value(&dfbell.volume), " -> ");
240 
241 	if (field_by_value(&kbmap)->flags & FLG_SET) {
242 		if (ioctl(fd, WSKBDIO_SETMAP, &kbmap) < 0)
243 			err(EXIT_FAILURE, "WSKBDIO_SETMAP");
244 		if (field_by_value(&kbmap)->flags & FLG_MODIFIED) {
245 			diff_kmap(&oldkbmap, &kbmap);
246 			pr_field(field_by_value(&kbmap), " +> ");
247 		} else
248 			pr_field(field_by_value(&kbmap), " -> ");
249 	}
250 
251 	repeat.which = 0;
252 	if (field_by_value(&repeat.del1)->flags & FLG_SET)
253 		repeat.which |= WSKBD_KEYREPEAT_DODEL1;
254 	if (field_by_value(&repeat.delN)->flags & FLG_SET)
255 		repeat.which |= WSKBD_KEYREPEAT_DODELN;
256 	if (repeat.which != 0 &&
257 	    ioctl(fd, WSKBDIO_SETKEYREPEAT, &repeat) < 0)
258 		err(EXIT_FAILURE, "WSKBDIO_SETKEYREPEAT");
259 	if (repeat.which & WSKBD_KEYREPEAT_DODEL1)
260 		pr_field(field_by_value(&repeat.del1), " -> ");
261 	if (repeat.which & WSKBD_KEYREPEAT_DODELN)
262 		pr_field(field_by_value(&repeat.delN), " -> ");
263 
264 	dfrepeat.which = 0;
265 	if (field_by_value(&dfrepeat.del1)->flags & FLG_SET)
266 		dfrepeat.which |= WSKBD_KEYREPEAT_DODEL1;
267 	if (field_by_value(&dfrepeat.delN)->flags & FLG_SET)
268 		dfrepeat.which |= WSKBD_KEYREPEAT_DODELN;
269 	if (dfrepeat.which != 0 &&
270 	    ioctl(fd, WSKBDIO_SETDEFAULTKEYREPEAT, &dfrepeat) < 0)
271 		err(EXIT_FAILURE, "WSKBDIO_SETDEFAULTKEYREPEAT");
272 	if (dfrepeat.which &WSKBD_KEYREPEAT_DODEL1)
273 		pr_field(field_by_value(&dfrepeat.del1), " -> ");
274 	if (dfrepeat.which & WSKBD_KEYREPEAT_DODELN)
275 		pr_field(field_by_value(&dfrepeat.delN), " -> ");
276 
277 	if (field_by_value(&ledstate)->flags & FLG_SET) {
278 		if (ioctl(fd, WSKBDIO_SETLEDS, &ledstate) < 0)
279 			err(EXIT_FAILURE, "WSKBDIO_SETLEDS");
280 		pr_field(field_by_value(&ledstate), " -> ");
281 	}
282 
283 	if (field_by_value(&kbdencoding)->flags & FLG_SET) {
284 		if (ioctl(fd, WSKBDIO_SETENCODING, &kbdencoding) < 0)
285 			err(EXIT_FAILURE, "WSKBDIO_SETENCODING");
286 		pr_field(field_by_value(&kbdencoding), " -> ");
287 	}
288 
289 	if (field_by_value(&keyclick)->flags & FLG_SET) {
290 		if (ioctl(fd, WSKBDIO_SETKEYCLICK, &keyclick) < 0)
291 			err(EXIT_FAILURE, "WSKBDIO_SETKEYCLICK");
292 		pr_field(field_by_value(&keyclick), " -> ");
293 	}
294 
295 
296 	if (havescroll == 0)
297 		return;
298 
299 	scroll.which = 0;
300 	if (field_by_value(&scroll.mode)->flags & FLG_SET)
301 		scroll.which |= WSKBD_SCROLL_DOMODE;
302 	if (field_by_value(&scroll.modifier)->flags & FLG_SET)
303 		scroll.which |= WSKBD_SCROLL_DOMODIFIER;
304 
305 	if (scroll.which & WSKBD_SCROLL_DOMODE)
306 		pr_field(field_by_value(&scroll.mode), " -> ");
307 	if (scroll.which & WSKBD_SCROLL_DOMODIFIER)
308 		pr_field(field_by_value(&scroll.modifier), " -> ");
309 	if (scroll.which != 0) {
310 		if (ioctl(fd, WSKBDIO_SETSCROLL, &scroll) == -1) {
311 			if (errno != ENODEV)
312 				err(EXIT_FAILURE, "WSKBDIO_SETSCROLL");
313 			else {
314 				warnx("scrolling is not supported by this "
315 				    "kernel");
316 				havescroll = 0;
317 			}
318 		}
319 	}
320 }
321 
322