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