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