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