mkbd.c revision 1.5.2.2 1 1.5.2.2 bouyer /* $NetBSD: mkbd.c,v 1.5.2.2 2001/03/12 13:28:07 bouyer Exp $ */
2 1.5.2.2 bouyer
3 1.5.2.2 bouyer /*-
4 1.5.2.2 bouyer * Copyright (c) 2001 Marcus Comstedt
5 1.5.2.2 bouyer * All rights reserved.
6 1.5.2.2 bouyer *
7 1.5.2.2 bouyer * Redistribution and use in source and binary forms, with or without
8 1.5.2.2 bouyer * modification, are permitted provided that the following conditions
9 1.5.2.2 bouyer * are met:
10 1.5.2.2 bouyer * 1. Redistributions of source code must retain the above copyright
11 1.5.2.2 bouyer * notice, this list of conditions and the following disclaimer.
12 1.5.2.2 bouyer * 2. Redistributions in binary form must reproduce the above copyright
13 1.5.2.2 bouyer * notice, this list of conditions and the following disclaimer in the
14 1.5.2.2 bouyer * documentation and/or other materials provided with the distribution.
15 1.5.2.2 bouyer * 3. All advertising materials mentioning features or use of this software
16 1.5.2.2 bouyer * must display the following acknowledgement:
17 1.5.2.2 bouyer * This product includes software developed by Marcus Comstedt.
18 1.5.2.2 bouyer * 4. Neither the name of The NetBSD Foundation nor the names of its
19 1.5.2.2 bouyer * contributors may be used to endorse or promote products derived
20 1.5.2.2 bouyer * from this software without specific prior written permission.
21 1.5.2.2 bouyer *
22 1.5.2.2 bouyer * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
23 1.5.2.2 bouyer * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
24 1.5.2.2 bouyer * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
25 1.5.2.2 bouyer * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
26 1.5.2.2 bouyer * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
27 1.5.2.2 bouyer * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
28 1.5.2.2 bouyer * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
29 1.5.2.2 bouyer * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
30 1.5.2.2 bouyer * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
31 1.5.2.2 bouyer * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
32 1.5.2.2 bouyer * POSSIBILITY OF SUCH DAMAGE.
33 1.5.2.2 bouyer */
34 1.5.2.2 bouyer
35 1.5.2.2 bouyer #include <sys/param.h>
36 1.5.2.2 bouyer #include <sys/device.h>
37 1.5.2.2 bouyer #include <sys/fcntl.h>
38 1.5.2.2 bouyer #include <sys/poll.h>
39 1.5.2.2 bouyer #include <sys/select.h>
40 1.5.2.2 bouyer #include <sys/proc.h>
41 1.5.2.2 bouyer #include <sys/signalvar.h>
42 1.5.2.2 bouyer #include <sys/systm.h>
43 1.5.2.2 bouyer
44 1.5.2.2 bouyer #include "wskbd.h"
45 1.5.2.2 bouyer
46 1.5.2.2 bouyer #include <dev/wscons/wsconsio.h>
47 1.5.2.2 bouyer #include <dev/wscons/wskbdvar.h>
48 1.5.2.2 bouyer #include <dev/wscons/wsksymdef.h>
49 1.5.2.2 bouyer #include <dev/wscons/wsksymvar.h>
50 1.5.2.2 bouyer
51 1.5.2.2 bouyer #include <machine/cpu.h>
52 1.5.2.2 bouyer #include <machine/bus.h>
53 1.5.2.2 bouyer
54 1.5.2.2 bouyer #include <dreamcast/dev/maple/maple.h>
55 1.5.2.2 bouyer #include <dreamcast/dev/maple/mapleconf.h>
56 1.5.2.2 bouyer #include <dreamcast/dev/maple/mkbdvar.h>
57 1.5.2.2 bouyer #include <dreamcast/dev/maple/mkbdmap.h>
58 1.5.2.2 bouyer
59 1.5.2.2 bouyer
60 1.5.2.2 bouyer /*
61 1.5.2.2 bouyer * Function declarations.
62 1.5.2.2 bouyer */
63 1.5.2.2 bouyer static int mkbdmatch __P((struct device *, struct cfdata *, void *));
64 1.5.2.2 bouyer static void mkbdattach __P((struct device *, struct device *, void *));
65 1.5.2.2 bouyer
66 1.5.2.2 bouyer int mkbd_enable __P((void *, int));
67 1.5.2.2 bouyer void mkbd_set_leds __P((void *, int));
68 1.5.2.2 bouyer int mkbd_ioctl __P((void *, u_long, caddr_t, int, struct proc *));
69 1.5.2.2 bouyer
70 1.5.2.2 bouyer struct wskbd_accessops mkbd_accessops = {
71 1.5.2.2 bouyer mkbd_enable,
72 1.5.2.2 bouyer mkbd_set_leds,
73 1.5.2.2 bouyer mkbd_ioctl,
74 1.5.2.2 bouyer };
75 1.5.2.2 bouyer
76 1.5.2.2 bouyer static void mkbd_intr __P((struct mkbd_softc *, struct mkbd_condition *, int));
77 1.5.2.2 bouyer
78 1.5.2.2 bouyer void mkbd_cngetc __P((void *, u_int *, int *));
79 1.5.2.2 bouyer void mkbd_cnpollc __P((void *, int));
80 1.5.2.2 bouyer int mkbd_cnattach __P((void));
81 1.5.2.2 bouyer
82 1.5.2.2 bouyer struct wskbd_consops mkbd_consops = {
83 1.5.2.2 bouyer mkbd_cngetc,
84 1.5.2.2 bouyer mkbd_cnpollc,
85 1.5.2.2 bouyer };
86 1.5.2.2 bouyer
87 1.5.2.2 bouyer struct wskbd_mapdata mkbd_keymapdata = {
88 1.5.2.2 bouyer mkbd_keydesctab,
89 1.5.2.2 bouyer KB_JP,
90 1.5.2.2 bouyer };
91 1.5.2.2 bouyer
92 1.5.2.2 bouyer static struct mkbd_softc *mkbd_console_softc = NULL;
93 1.5.2.2 bouyer
94 1.5.2.2 bouyer static int mkbd_console_initted = 0;
95 1.5.2.2 bouyer
96 1.5.2.2 bouyer /* Driver definition. */
97 1.5.2.2 bouyer struct cfattach mkbd_ca = {
98 1.5.2.2 bouyer sizeof(struct mkbd_softc), mkbdmatch, mkbdattach
99 1.5.2.2 bouyer };
100 1.5.2.2 bouyer
101 1.5.2.2 bouyer static int
102 1.5.2.2 bouyer mkbdmatch(parent, cf, aux)
103 1.5.2.2 bouyer struct device *parent;
104 1.5.2.2 bouyer struct cfdata *cf;
105 1.5.2.2 bouyer void *aux;
106 1.5.2.2 bouyer {
107 1.5.2.2 bouyer struct maple_attach_args *ma = aux;
108 1.5.2.2 bouyer
109 1.5.2.2 bouyer return (ma->ma_devinfo->di_func & MAPLE_FUNC_KEYBOARD) != 0;
110 1.5.2.2 bouyer }
111 1.5.2.2 bouyer
112 1.5.2.2 bouyer static void
113 1.5.2.2 bouyer mkbdattach(parent, self, aux)
114 1.5.2.2 bouyer struct device *parent, *self;
115 1.5.2.2 bouyer void *aux;
116 1.5.2.2 bouyer {
117 1.5.2.2 bouyer struct mkbd_softc *sc = (struct mkbd_softc *)self;
118 1.5.2.2 bouyer struct maple_attach_args *ma = aux;
119 1.5.2.2 bouyer #if NWSKBD > 0
120 1.5.2.2 bouyer struct wskbddev_attach_args a;
121 1.5.2.2 bouyer #endif
122 1.5.2.2 bouyer u_int32_t kbdtype;
123 1.5.2.2 bouyer
124 1.5.2.2 bouyer sc->sc_parent = parent;
125 1.5.2.2 bouyer sc->sc_port = ma->ma_port;
126 1.5.2.2 bouyer sc->sc_subunit = ma->ma_subunit;
127 1.5.2.2 bouyer
128 1.5.2.2 bouyer kbdtype = maple_get_function_data(ma->ma_devinfo,
129 1.5.2.2 bouyer MAPLE_FUNC_KEYBOARD) >> 24;
130 1.5.2.2 bouyer switch(kbdtype) {
131 1.5.2.2 bouyer case 1:
132 1.5.2.2 bouyer printf(": Japanese keyboard");
133 1.5.2.2 bouyer mkbd_keymapdata.layout = KB_JP;
134 1.5.2.2 bouyer break;
135 1.5.2.2 bouyer case 2:
136 1.5.2.2 bouyer printf(": US keyboard");
137 1.5.2.2 bouyer mkbd_keymapdata.layout = KB_US;
138 1.5.2.2 bouyer break;
139 1.5.2.2 bouyer case 3:
140 1.5.2.2 bouyer printf(": European keyboard");
141 1.5.2.2 bouyer mkbd_keymapdata.layout = KB_UK;
142 1.5.2.2 bouyer break;
143 1.5.2.2 bouyer default:
144 1.5.2.2 bouyer printf(": Unknown keyboard %d", kbdtype);
145 1.5.2.2 bouyer }
146 1.5.2.2 bouyer printf("\n");
147 1.5.2.2 bouyer
148 1.5.2.2 bouyer #if NWSKBD > 0
149 1.5.2.2 bouyer a.console = ((sc->sc_dev.dv_unit == 0) && (mkbd_console_initted == 1))
150 1.5.2.2 bouyer ? 1 : 0;
151 1.5.2.2 bouyer a.keymap = &mkbd_keymapdata;
152 1.5.2.2 bouyer a.accessops = &mkbd_accessops;
153 1.5.2.2 bouyer a.accesscookie = sc;
154 1.5.2.2 bouyer if (a.console)
155 1.5.2.2 bouyer mkbd_console_softc = sc;
156 1.5.2.2 bouyer sc->sc_wskbddev = config_found(self, &a, wskbddevprint);
157 1.5.2.2 bouyer #endif
158 1.5.2.2 bouyer
159 1.5.2.2 bouyer maple_set_condition_callback(parent, sc->sc_port, sc->sc_subunit,
160 1.5.2.2 bouyer MAPLE_FUNC_KEYBOARD,
161 1.5.2.2 bouyer (void (*)(void *, void *, int))mkbd_intr,
162 1.5.2.2 bouyer sc);
163 1.5.2.2 bouyer }
164 1.5.2.2 bouyer
165 1.5.2.2 bouyer
166 1.5.2.2 bouyer
167 1.5.2.2 bouyer int
168 1.5.2.2 bouyer mkbd_enable(v, on)
169 1.5.2.2 bouyer void *v;
170 1.5.2.2 bouyer int on;
171 1.5.2.2 bouyer {
172 1.5.2.2 bouyer
173 1.5.2.2 bouyer return 0;
174 1.5.2.2 bouyer }
175 1.5.2.2 bouyer
176 1.5.2.2 bouyer void
177 1.5.2.2 bouyer mkbd_set_leds(v, on)
178 1.5.2.2 bouyer void *v;
179 1.5.2.2 bouyer int on;
180 1.5.2.2 bouyer {
181 1.5.2.2 bouyer }
182 1.5.2.2 bouyer
183 1.5.2.2 bouyer int
184 1.5.2.2 bouyer mkbd_ioctl(v, cmd, data, flag, p)
185 1.5.2.2 bouyer void *v;
186 1.5.2.2 bouyer u_long cmd;
187 1.5.2.2 bouyer caddr_t data;
188 1.5.2.2 bouyer int flag;
189 1.5.2.2 bouyer struct proc *p;
190 1.5.2.2 bouyer {
191 1.5.2.2 bouyer
192 1.5.2.2 bouyer switch (cmd) {
193 1.5.2.2 bouyer
194 1.5.2.2 bouyer case WSKBDIO_GTYPE:
195 1.5.2.2 bouyer *(int *)data = WSKBD_TYPE_USB; /* XXX */
196 1.5.2.2 bouyer return 0;
197 1.5.2.2 bouyer case WSKBDIO_SETLEDS:
198 1.5.2.2 bouyer return 0;
199 1.5.2.2 bouyer case WSKBDIO_GETLEDS:
200 1.5.2.2 bouyer *(int *)data = 0;
201 1.5.2.2 bouyer return 0;
202 1.5.2.2 bouyer case WSKBDIO_BELL:
203 1.5.2.2 bouyer case WSKBDIO_COMPLEXBELL:
204 1.5.2.2 bouyer return 0;
205 1.5.2.2 bouyer }
206 1.5.2.2 bouyer
207 1.5.2.2 bouyer return -1;
208 1.5.2.2 bouyer }
209 1.5.2.2 bouyer
210 1.5.2.2 bouyer
211 1.5.2.2 bouyer int
212 1.5.2.2 bouyer mkbd_cnattach()
213 1.5.2.2 bouyer {
214 1.5.2.2 bouyer
215 1.5.2.2 bouyer wskbd_cnattach(&mkbd_consops, NULL, &mkbd_keymapdata);
216 1.5.2.2 bouyer mkbd_console_initted = 1;
217 1.5.2.2 bouyer
218 1.5.2.2 bouyer return 0;
219 1.5.2.2 bouyer }
220 1.5.2.2 bouyer
221 1.5.2.2 bouyer static int polledkey;
222 1.5.2.2 bouyer extern int maple_polling;
223 1.5.2.2 bouyer
224 1.5.2.2 bouyer #define SHIFT_KEYCODE_BASE 0xe0
225 1.5.2.2 bouyer #define UP_KEYCODE_FLAG 0x1000
226 1.5.2.2 bouyer
227 1.5.2.2 bouyer #define KEY_UP(n) \
228 1.5.2.2 bouyer if (maple_polling) \
229 1.5.2.2 bouyer polledkey = (n)|UP_KEYCODE_FLAG; \
230 1.5.2.2 bouyer else \
231 1.5.2.2 bouyer wskbd_input(sc->sc_wskbddev, WSCONS_EVENT_KEY_UP, (n))
232 1.5.2.2 bouyer
233 1.5.2.2 bouyer #define KEY_DOWN(n) \
234 1.5.2.2 bouyer if (maple_polling) \
235 1.5.2.2 bouyer polledkey = (n); \
236 1.5.2.2 bouyer else \
237 1.5.2.2 bouyer wskbd_input(sc->sc_wskbddev, WSCONS_EVENT_KEY_DOWN, (n))
238 1.5.2.2 bouyer
239 1.5.2.2 bouyer #define SHIFT_UP(n) KEY_UP((n)|SHIFT_KEYCODE_BASE)
240 1.5.2.2 bouyer #define SHIFT_DOWN(n) KEY_DOWN((n)|SHIFT_KEYCODE_BASE)
241 1.5.2.2 bouyer
242 1.5.2.2 bouyer static void
243 1.5.2.2 bouyer mkbd_intr(sc, kbddata, sz)
244 1.5.2.2 bouyer struct mkbd_softc *sc;
245 1.5.2.2 bouyer struct mkbd_condition *kbddata;
246 1.5.2.2 bouyer int sz;
247 1.5.2.2 bouyer {
248 1.5.2.2 bouyer
249 1.5.2.2 bouyer if (sz >= sizeof(struct mkbd_condition)) {
250 1.5.2.2 bouyer int i, j, v;
251 1.5.2.2 bouyer
252 1.5.2.2 bouyer v = sc->sc_condition.shift & ~kbddata->shift;
253 1.5.2.2 bouyer if (v)
254 1.5.2.2 bouyer for (i=0; i<8; i++)
255 1.5.2.2 bouyer if (v & (1<<i))
256 1.5.2.2 bouyer SHIFT_UP(i);
257 1.5.2.2 bouyer
258 1.5.2.2 bouyer v = kbddata->shift & ~sc->sc_condition.shift;
259 1.5.2.2 bouyer if (v)
260 1.5.2.2 bouyer for (i=0; i<8; i++)
261 1.5.2.2 bouyer if (v & (1<<i))
262 1.5.2.2 bouyer SHIFT_DOWN(i);
263 1.5.2.2 bouyer
264 1.5.2.2 bouyer for (i=0, j=0; i<6; i++)
265 1.5.2.2 bouyer if (sc->sc_condition.key[i] < 4)
266 1.5.2.2 bouyer break;
267 1.5.2.2 bouyer else if(sc->sc_condition.key[i] == kbddata->key[j])
268 1.5.2.2 bouyer j++;
269 1.5.2.2 bouyer else
270 1.5.2.2 bouyer KEY_UP(sc->sc_condition.key[i]);
271 1.5.2.2 bouyer
272 1.5.2.2 bouyer for (; j<6; j++)
273 1.5.2.2 bouyer if (kbddata->key[j] < 4)
274 1.5.2.2 bouyer break;
275 1.5.2.2 bouyer else
276 1.5.2.2 bouyer KEY_DOWN(kbddata->key[j]);
277 1.5.2.2 bouyer
278 1.5.2.2 bouyer bcopy(kbddata, &sc->sc_condition, sizeof(struct mkbd_condition));
279 1.5.2.2 bouyer }
280 1.5.2.2 bouyer }
281 1.5.2.2 bouyer
282 1.5.2.2 bouyer void
283 1.5.2.2 bouyer mkbd_cngetc(v, type, data)
284 1.5.2.2 bouyer void *v;
285 1.5.2.2 bouyer u_int *type;
286 1.5.2.2 bouyer int *data;
287 1.5.2.2 bouyer {
288 1.5.2.2 bouyer int key;
289 1.5.2.2 bouyer
290 1.5.2.2 bouyer polledkey = -1;
291 1.5.2.2 bouyer maple_polling = 1;
292 1.5.2.2 bouyer while (polledkey == -1)
293 1.5.2.2 bouyer if (mkbd_console_softc != NULL ||
294 1.5.2.2 bouyer mkbd_console_softc->sc_parent != NULL) {
295 1.5.2.2 bouyer int t;
296 1.5.2.2 bouyer for(t=0; t<1000000; t++);
297 1.5.2.2 bouyer maple_run_polling(mkbd_console_softc->sc_parent);
298 1.5.2.2 bouyer }
299 1.5.2.2 bouyer maple_polling = 0;
300 1.5.2.2 bouyer key = polledkey;
301 1.5.2.2 bouyer
302 1.5.2.2 bouyer *data = key & ~UP_KEYCODE_FLAG;
303 1.5.2.2 bouyer *type = (key & UP_KEYCODE_FLAG)?
304 1.5.2.2 bouyer WSCONS_EVENT_KEY_UP : WSCONS_EVENT_KEY_DOWN;
305 1.5.2.2 bouyer }
306 1.5.2.2 bouyer
307 1.5.2.2 bouyer void
308 1.5.2.2 bouyer mkbd_cnpollc(v, on)
309 1.5.2.2 bouyer void *v;
310 1.5.2.2 bouyer int on;
311 1.5.2.2 bouyer {
312 1.5.2.2 bouyer }
313