lunaws.c revision 1.2
1 /* $NetBSD: lunaws.c,v 1.2 2000/01/07 05:13:08 nisimura Exp $ */ 2 3 /*- 4 * Copyright (c) 2000 The NetBSD Foundation, Inc. 5 * All rights reserved. 6 * 7 * This code is derived from software contributed to The NetBSD Foundation 8 * by Tohru Nishimura. 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 * 3. All advertising materials mentioning features or use of this software 19 * must display the following acknowledgement: 20 * This product includes software developed by the NetBSD 21 * Foundation, Inc. and its contributors. 22 * 4. Neither the name of The NetBSD Foundation nor the names of its 23 * contributors may be used to endorse or promote products derived 24 * from this software without specific prior written permission. 25 * 26 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 27 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 28 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 29 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 30 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 31 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 32 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 33 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 34 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 35 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 36 * POSSIBILITY OF SUCH DAMAGE. 37 */ 38 39 #include <sys/cdefs.h> /* RCS ID & Copyright macro defns */ 40 41 __KERNEL_RCSID(0, "$NetBSD: lunaws.c,v 1.2 2000/01/07 05:13:08 nisimura Exp $"); 42 43 #include "wsmouse.h" 44 45 #include <sys/param.h> 46 #include <sys/systm.h> 47 #include <sys/conf.h> 48 #include <sys/device.h> 49 50 #include <dev/wscons/wsconsio.h> 51 #include <dev/wscons/wskbdvar.h> 52 #include <dev/wscons/wsksymdef.h> 53 #include <dev/wscons/wsksymvar.h> 54 #include <dev/wscons/wsmousevar.h> 55 56 #include <luna68k/dev/sioreg.h> 57 #include <luna68k/dev/siovar.h> 58 59 static const u_int8_t ch1_regs[6] = { 60 WR0_RSTINT, /* Reset E/S Interrupt */ 61 WR1_RXALLS, /* Rx per char, No Tx */ 62 0, /* */ 63 WR3_RX8BIT | WR3_RXENBL, /* Rx */ 64 WR4_BAUD96 | WR4_STOP1 | WR4_NPARITY, /* Tx/Rx */ 65 WR5_TX8BIT | WR5_TXENBL, /* Tx */ 66 }; 67 68 struct ws_softc { 69 struct device sc_dv; 70 struct device *sc_wskbddev; 71 struct device *sc_wsmousedev; 72 struct sioreg *sc_ctl; 73 u_int8_t sc_wr[6]; 74 }; 75 76 static void omkbd_input __P((void *, int)); 77 static int omkbd_decode __P((void *, int, u_int *, int *)); 78 static int omkbd_enable __P((void *, int)); 79 static void omkbd_set_leds __P((void *, int)); 80 static int omkbd_ioctl __P((void *, u_long, caddr_t, int, struct proc *)); 81 82 struct wscons_keydesc omkbd_keydesctab[]; 83 84 static const struct wskbd_mapdata omkbd_keymapdata = { 85 omkbd_keydesctab, 86 KB_JP, 87 }; 88 static const struct wskbd_accessops omkbd_accessops = { 89 omkbd_enable, 90 omkbd_set_leds, 91 omkbd_ioctl, 92 }; 93 94 void ws_cnattach __P((void)); 95 static void ws_cngetc __P((void *, u_int *, int *)); 96 static void ws_cnpollc __P((void *, int)); 97 static const struct wskbd_consops ws_consops = { 98 ws_cngetc, 99 ws_cnpollc, 100 }; 101 102 #if NWSMOUSE > 0 103 static int omms_enable __P((void *)); 104 static int omms_ioctl __P((void *, u_long, caddr_t, int, struct proc *)); 105 static void omms_disable __P((void *)); 106 107 static const struct wsmouse_accessops omms_accessops = { 108 omms_enable, 109 omms_ioctl, 110 omms_disable, 111 }; 112 #endif 113 114 static void wsintr __P((int)); 115 116 static int wsmatch __P((struct device *, struct cfdata *, void *)); 117 static void wsattach __P((struct device *, struct device *, void *)); 118 static int ws_submatch_kbd __P((struct device *, struct cfdata *, void *)); 119 #if NWSMOUSE > 0 120 static int ws_submatch_mouse __P((struct device *, struct cfdata *, void *)); 121 #endif 122 123 const struct cfattach ws_ca = { 124 sizeof(struct ws_softc), wsmatch, wsattach 125 }; 126 extern struct cfdriver ws_cd; 127 128 extern int syscngetc __P((dev_t)); 129 extern void syscnputc __P((dev_t, int)); 130 131 static int 132 wsmatch(parent, match, aux) 133 struct device *parent; 134 struct cfdata *match; 135 void *aux; 136 { 137 struct sio_attach_args *args = aux; 138 139 if (args->channel != 1) 140 return 0; 141 return 1; 142 } 143 144 static void 145 wsattach(parent, self, aux) 146 struct device *parent; 147 struct device *self; 148 void *aux; 149 { 150 struct ws_softc *sc = (struct ws_softc *)self; 151 struct sio_softc *scp = (struct sio_softc *)parent; 152 struct sio_attach_args *args = aux; 153 struct wskbddev_attach_args a; 154 155 sc->sc_ctl = (struct sioreg *)scp->scp_ctl + 1; 156 bcopy(ch1_regs, sc->sc_wr, sizeof(ch1_regs)); 157 scp->scp_intr[1] = wsintr; 158 159 setsioreg(sc->sc_ctl, WR0, sc->sc_wr[WR0]); 160 setsioreg(sc->sc_ctl, WR4, sc->sc_wr[WR4]); 161 setsioreg(sc->sc_ctl, WR3, sc->sc_wr[WR3]); 162 setsioreg(sc->sc_ctl, WR5, sc->sc_wr[WR5]); 163 setsioreg(sc->sc_ctl, WR0, sc->sc_wr[WR0]); 164 setsioreg(sc->sc_ctl, WR1, sc->sc_wr[WR1]); 165 166 syscnputc((dev_t)1, 0x20); /* keep quiet mouse */ 167 168 printf("\n"); 169 170 a.console = (args->hwflags == 1); 171 a.keymap = &omkbd_keymapdata; 172 a.accessops = &omkbd_accessops; 173 a.accesscookie = (void *)sc; 174 sc->sc_wskbddev = config_found_sm(self, &a, wskbddevprint, 175 ws_submatch_kbd); 176 177 #if NWSMOUSE > 0 178 { 179 struct wsmousedev_attach_args b; 180 b.accessops = &omms_accessops; 181 b.accesscookie = (void *)sc; 182 sc->sc_wsmousedev = config_found_sm(self, &b, wsmousedevprint, 183 ws_submatch_mouse); 184 } 185 #endif 186 } 187 188 static int 189 ws_submatch_kbd(parent, cf, aux) 190 struct device *parent; 191 struct cfdata *cf; 192 void *aux; 193 { 194 195 if (strcmp(cf->cf_driver->cd_name, "wskbd")) 196 return (0); 197 return ((*cf->cf_attach->ca_match)(parent, cf, aux)); 198 } 199 200 #if NWSMOUSE > 0 201 202 static int 203 ws_submatch_mouse(parent, cf, aux) 204 struct device *parent; 205 struct cfdata *cf; 206 void *aux; 207 { 208 209 if (strcmp(cf->cf_driver->cd_name, "wsmouse")) 210 return (0); 211 return ((*cf->cf_attach->ca_match)(parent, cf, aux)); 212 } 213 214 #endif 215 216 /*ARGSUSED*/ 217 static void 218 wsintr(chan) 219 int chan; 220 { 221 struct ws_softc *sc = ws_cd.cd_devs[0]; 222 struct sioreg *sio = sc->sc_ctl; 223 u_int code; 224 int rr; 225 226 rr = getsiocsr(sio); 227 if (rr & RR_RXRDY) { 228 do { 229 code = sio->sio_data; 230 if (rr & (RR_FRAMING | RR_OVERRUN | RR_PARITY)) { 231 sio->sio_cmd = WR0_ERRRST; 232 #if 0 233 if (sio->sio_stat & RR_FRAMING) 234 code |= TTY_FE; 235 else if (sio->sio_stat & RR_PARITY) 236 code |= TTY_PE; 237 #endif 238 continue; 239 } 240 #if 0 241 /* 242 * if (code >= 0x80 || code <= 0x87), then 243 * it's the first byte of 3 byte long mouse report 244 * code[0] & 07 -> LMR button condition 245 * code[1], [2] -> x,y delta 246 */ 247 #endif 248 omkbd_input(sc, code & 0xff); 249 } while ((rr = getsiocsr(sio)) & RR_RXRDY); 250 } 251 if (rr && RR_TXRDY) 252 sio->sio_cmd = WR0_RSTPEND; 253 /* not capable of transmit, yet */ 254 } 255 256 static void 257 omkbd_input(v, data) 258 void *v; 259 int data; 260 { 261 struct ws_softc *sc = v; 262 u_int type; 263 int key; 264 265 if (omkbd_decode(v, data, &type, &key)) 266 wskbd_input(sc->sc_wskbddev, type, key); 267 } 268 269 static int 270 omkbd_decode(v, datain, type, dataout) 271 void *v; 272 int datain; 273 u_int *type; 274 int *dataout; 275 { 276 *type = (datain & 0x80) ? WSCONS_EVENT_KEY_UP : WSCONS_EVENT_KEY_DOWN; 277 *dataout = datain & 0x7f; 278 return 1; 279 } 280 281 #define KC(n) KS_KEYCODE(n) 282 283 static const keysym_t omkbd_keydesc_1[] = { 284 /* pos command normal shifted */ 285 KC(0x9), KS_Tab, 286 KC(0xa), KS_Control_L, 287 KC(0xb), KS_Mode_switch, /* Kana */ 288 KC(0xc), KS_Shift_R, 289 KC(0xd), KS_Shift_L, 290 KC(0xe), KS_Caps_Lock, 291 KC(0xf), KS_Meta_L, /* Zenmen */ 292 KC(0x10), KS_Escape, 293 KC(0x11), KS_BackSpace, 294 KC(0x12), KS_Return, 295 KC(0x14), KS_space, 296 KC(0x15), KS_Delete, 297 KC(0x16), KS_Alt_L, /* Henkan */ 298 KC(0x17), KS_Alt_R, /* Kakutei */ 299 KC(0x18), KS_f11, /* Shokyo */ 300 KC(0x19), KS_f12, /* Yobidashi */ 301 KC(0x1a), KS_f13, /* Bunsetsu L */ 302 KC(0x1b), KS_f14, /* Bunsetsu R */ 303 KC(0x1c), KS_KP_Up, 304 KC(0x1d), KS_KP_Left, 305 KC(0x1e), KS_KP_Right, 306 KC(0x1f), KS_KP_Down, 307 /* KC(0x20), KS_f11, */ 308 /* KC(0x21), KS_f12, */ 309 KC(0x22), KS_1, KS_exclam, 310 KC(0x23), KS_2, KS_quotedbl, 311 KC(0x24), KS_3, KS_numbersign, 312 KC(0x25), KS_4, KS_dollar, 313 KC(0x26), KS_5, KS_percent, 314 KC(0x27), KS_6, KS_ampersand, 315 KC(0x28), KS_7, KS_apostrophe, 316 KC(0x29), KS_8, KS_parenleft, 317 KC(0x2a), KS_9, KS_parenright, 318 KC(0x2b), KS_0, 319 KC(0x2c), KS_minus, KS_equal, 320 KC(0x2d), KS_asciicircum, KS_asciitilde, 321 KC(0x2e), KS_backslash, KS_bar, 322 /* KC(0x30), KS_f13, */ 323 /* KC(0x31), KS_f14, */ 324 KC(0x32), KS_q, 325 KC(0x33), KS_w, 326 KC(0x34), KS_e, 327 KC(0x35), KS_r, 328 KC(0x36), KS_t, 329 KC(0x37), KS_y, 330 KC(0x38), KS_u, 331 KC(0x39), KS_i, 332 KC(0x3a), KS_o, 333 KC(0x3b), KS_p, 334 KC(0x3c), KS_at, KS_grave, 335 KC(0x3d), KS_bracketleft, KS_braceleft, 336 KC(0x42), KS_a, 337 KC(0x43), KS_s, 338 KC(0x44), KS_d, 339 KC(0x45), KS_f, 340 KC(0x46), KS_g, 341 KC(0x47), KS_h, 342 KC(0x48), KS_j, 343 KC(0x49), KS_k, 344 KC(0x4a), KS_l, 345 KC(0x4b), KS_semicolon, KS_plus, 346 KC(0x4c), KS_colon, KS_asterisk, 347 KC(0x4d), KS_bracketright, KS_braceright, 348 KC(0x52), KS_z, 349 KC(0x53), KS_x, 350 KC(0x54), KS_c, 351 KC(0x55), KS_v, 352 KC(0x56), KS_b, 353 KC(0x57), KS_n, 354 KC(0x58), KS_m, 355 KC(0x59), KS_comma, KS_less, 356 KC(0x5a), KS_period, KS_greater, 357 KC(0x5b), KS_slash, KS_question, 358 KC(0x5c), KS_underscore, 359 KC(0x60), KS_KP_Delete, 360 KC(0x61), KS_KP_Add, 361 KC(0x62), KS_KP_Subtract, 362 KC(0x63), KS_KP_7, 363 KC(0x64), KS_KP_8, 364 KC(0x65), KS_KP_9, 365 KC(0x66), KS_KP_4, 366 KC(0x67), KS_KP_5, 367 KC(0x68), KS_KP_6, 368 KC(0x69), KS_KP_1, 369 KC(0x6a), KS_KP_2, 370 KC(0x6b), KS_KP_3, 371 KC(0x6c), KS_KP_0, 372 KC(0x6d), KS_KP_Decimal, 373 KC(0x6e), KS_KP_Enter, 374 KC(0x72), KS_f1, 375 KC(0x73), KS_f2, 376 KC(0x74), KS_f3, 377 KC(0x75), KS_f4, 378 KC(0x76), KS_f5, 379 KC(0x77), KS_f6, 380 KC(0x78), KS_f7, 381 KC(0x79), KS_f8, 382 KC(0x7a), KS_f9, 383 KC(0x7b), KS_f10, 384 KC(0x7c), KS_KP_Multiply, 385 KC(0x7d), KS_KP_Divide, 386 KC(0x7e), KS_KP_Equal, 387 KC(0x7f), KS_KP_Separator, 388 }; 389 390 #define SIZE(map) (sizeof(map)/sizeof(keysym_t)) 391 392 struct wscons_keydesc omkbd_keydesctab[] = { 393 { KB_JP, 0, SIZE(omkbd_keydesc_1), omkbd_keydesc_1, }, 394 { 0, 0, 0, 0 }, 395 }; 396 397 static void 398 ws_cngetc(v, type, data) 399 void *v; 400 u_int *type; 401 int *data; 402 { 403 int code; 404 405 do { 406 code = syscngetc((dev_t)1); 407 } while (!omkbd_decode(v, code, type, data)); 408 } 409 410 static void 411 ws_cnpollc(v, on) 412 void *v; 413 int on; 414 { 415 } 416 417 /* EXPORT */ void 418 ws_cnattach() 419 { 420 static int voidfill; 421 422 wskbd_cnattach(&ws_consops, &voidfill, &omkbd_keymapdata); 423 } 424 425 static int 426 omkbd_enable(v, on) 427 void *v; 428 int on; 429 { 430 return 0; 431 } 432 433 static void 434 omkbd_set_leds(v, leds) 435 void *v; 436 int leds; 437 { 438 #if 0 439 syscnputc((dev_t)1, 0x10); /* kana LED on */ 440 syscnputc((dev_t)1, 0x00); /* kana LED off */ 441 syscnputc((dev_t)1, 0x11); /* caps LED on */ 442 syscnputc((dev_t)1, 0x01); /* caps LED off */ 443 #endif 444 } 445 446 static int 447 omkbd_ioctl(v, cmd, data, flag, p) 448 void *v; 449 u_long cmd; 450 caddr_t data; 451 int flag; 452 struct proc *p; 453 { 454 switch (cmd) { 455 case WSKBDIO_GTYPE: 456 *(int *)data = 0x19991005 /* XXX */; 457 return 0; 458 case WSKBDIO_SETLEDS: 459 case WSKBDIO_GETLEDS: 460 case WSKBDIO_COMPLEXBELL: 461 return 0; 462 } 463 return -1; 464 } 465 466 #if NWSMOUSE > 0 467 468 static int 469 omms_enable(v) 470 void *v; 471 { 472 syscnputc((dev_t)1, 0x60); /* enable 3 byte long mouse reporting */ 473 return 0; 474 } 475 476 /*ARGUSED*/ 477 static int 478 omms_ioctl(v, cmd, data, flag, p) 479 void *v; 480 u_long cmd; 481 caddr_t data; 482 int flag; 483 struct proc *p; 484 { 485 if (cmd == WSMOUSEIO_GTYPE) { 486 *(u_int *)data = 0x19991005; /* XXX */ 487 return 0; 488 } 489 return ENOTTY; 490 } 491 492 static void 493 omms_disable(v) 494 void *v; 495 { 496 syscnputc((dev_t)1, 0x20); /* quiet mouse */ 497 } 498 #endif 499
Indexes created Fri Sep 26 20:09:58 GMT 2025