1/* $NetBSD: dtkbd.c,v 1.9 2011/06/04 01:37:36 tsutsui Exp $ */ 2 3/*- 4 * Copyright (c) 2002, 2003 The NetBSD Foundation, Inc. 5 * All rights reserved. 6 * 7 * This code is derived from software contributed to The NetBSD Foundation 8 * by Andrew Doran. 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 * 19 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 20 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 21 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 22 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 23 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 24 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 25 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 26 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 27 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 28 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 29 * POSSIBILITY OF SUCH DAMAGE. 30 */ 31 32#include <sys/cdefs.h> 33__KERNEL_RCSID(0, "$NetBSD: dtkbd.c,v 1.9 2011/06/04 01:37:36 tsutsui Exp $"); 34 35#include "locators.h" 36 37#include <sys/param.h> 38#include <sys/bus.h> 39#include <sys/callout.h> 40#include <sys/device.h> 41#include <sys/ioctl.h> 42#include <sys/systm.h> 43 44#include <dev/wscons/wsconsio.h> 45#include <dev/wscons/wskbdvar.h> 46#include <dev/wscons/wsksymdef.h> 47#include <dev/wscons/wsksymvar.h> 48#include <dev/dec/wskbdmap_lk201.h> 49#include <dev/tc/tcvar.h> 50 51#include <pmax/tc/dtreg.h> 52#include <pmax/tc/dtvar.h> 53 54#include <pmax/pmax/cons.h> 55 56struct dtkbd_softc { 57 device_t sc_dev; 58 device_t sc_wskbddev; 59 int sc_enabled; 60}; 61 62int dtkbd_match(device_t, cfdata_t, void *); 63void dtkbd_attach(device_t, device_t, void *); 64int dtkbd_enable(void *, int); 65int dtkbd_ioctl(void *, u_long, void *, int, struct lwp *); 66void dtkbd_cngetc(void *, u_int *, int *); 67void dtkbd_cnpollc(void *, int); 68int dtkbd_process_msg(struct dt_msg *, u_int *, int *); 69void dtkbd_handler(void *, struct dt_msg *); 70void dtkbd_set_leds(void *, int); 71 72const struct wskbd_accessops dtkbd_accessops = { 73 dtkbd_enable, 74 dtkbd_set_leds, 75 dtkbd_ioctl, 76}; 77 78const struct wskbd_consops dtkbd_consops = { 79 dtkbd_cngetc, 80 dtkbd_cnpollc, 81}; 82 83CFATTACH_DECL_NEW(dtkbd, sizeof(struct dtkbd_softc), 84 dtkbd_match, dtkbd_attach, NULL, NULL); 85 86const struct wskbd_mapdata dtkbd_keymapdata = { 87 lkkbd_keydesctab, 88#ifdef DTKBD_LAYOUT 89 DTKBD_LAYOUT, 90#else 91 KB_US | KB_LK401, 92#endif 93}; 94 95int dtkbd_isconsole; 96uint8_t dtkbd_map[10]; 97int dtkbd_maplen; 98 99int 100dtkbd_match(device_t parent, cfdata_t cf, void *aux) 101{ 102 struct dt_attach_args *dta; 103 104 dta = aux; 105 return (dta->dta_addr == DT_ADDR_KBD); 106} 107 108void 109dtkbd_attach(device_t parent, device_t self, void *aux) 110{ 111 struct dt_softc *dt; 112 struct dtkbd_softc *sc; 113 struct wskbddev_attach_args a; 114 115 dt = device_private(parent); 116 sc = device_private(self); 117 sc->sc_dev = self; 118 119 printf("\n"); 120 121 if (dt_establish_handler(dt, &dt_kbd_dv, sc, dtkbd_handler)) { 122 printf("%s: unable to establish handler\n", device_xname(self)); 123 return; 124 } 125 126 sc->sc_enabled = 1; 127 128 a.console = dtkbd_isconsole; 129 a.keymap = &dtkbd_keymapdata; 130 a.accessops = &dtkbd_accessops; 131 a.accesscookie = sc; 132 sc->sc_wskbddev = config_found(self, &a, wskbddevprint); 133} 134 135void 136dtkbd_cnattach(void) 137{ 138 139 dtkbd_isconsole = 1; 140 dt_cninit(); 141 142 wskbd_cnattach(&dtkbd_consops, &dtkbd_map, &dtkbd_keymapdata); 143} 144 145int 146dtkbd_enable(void *v, int on) 147{ 148 struct dtkbd_softc *sc; 149 150 sc = v; 151 sc->sc_enabled = on; 152 153 return (0); 154} 155 156void 157dtkbd_cngetc(void *v, u_int *type, int *data) 158{ 159 struct dt_msg msg; 160 static u_int types[20]; 161 static int cnt, i, vals[20]; 162 163 while (i >= cnt) { 164 for (;;) { 165 if (dt_msg_get(&msg, 0) == DT_GET_DONE) 166 if (msg.src == dt_kbd_addr && 167 !DT_CTL_P(msg.ctl)) 168 break; 169 DELAY(1000); 170 } 171 172 cnt = dtkbd_process_msg(&msg, types, vals); 173 i = 0; 174 } 175 176 *type = types[i++]; 177 *data = vals[i++]; 178} 179 180void 181dtkbd_cnpollc(void *v, int on) 182{ 183 184 /* XXX */ 185} 186 187int 188dtkbd_ioctl(void *v, u_long cmd, void *data, int flag, struct lwp *l) 189{ 190 struct dtkbd_softc *sc; 191 192 sc = v; 193 194 switch (cmd) { 195 case WSKBDIO_GTYPE: 196 *(int *)data = WSKBD_TYPE_LK201; 197 return 0; 198 default: 199 /* XXX */ 200 return (EPASSTHROUGH); 201 } 202} 203 204void 205dtkbd_set_leds(void *v, int state) 206{ 207 208 /* XXX */ 209} 210 211void 212dtkbd_handler(void *cookie, struct dt_msg *msg) 213{ 214 struct dtkbd_softc *sc; 215 u_int types[20]; 216 int i, cnt, vals[20]; 217 218 sc = cookie; 219 220 if (!sc->sc_enabled) 221 return; 222 223 cnt = dtkbd_process_msg(msg, types, vals); 224 for (i = 0; i < cnt; i++) 225 wskbd_input(sc->sc_wskbddev, types[i], vals[i]); 226} 227 228int 229dtkbd_process_msg(struct dt_msg *msg, u_int *types, int *vals) 230{ 231 u_int len, c, count; 232 int i, j; 233 234 len = DT_CTL_LEN(msg->ctl); 235 236 if ((msg->body[0] < DT_KBD_KEY_MIN && msg->body[0] != DT_KBD_EMPTY) || 237 len > 10) { 238 printf("dtkbd0: error: %x %x %x\n", len, msg->body[0], 239 msg->body[1]); 240 241 /* 242 * Fake an "all ups" to avoid the stuck key syndrome. 243 */ 244 msg->body[0] = DT_KBD_EMPTY; 245 len = 1; 246 } 247 248 if (msg->body[0] == DT_KBD_EMPTY) { 249 types[0] = WSCONS_EVENT_ALL_KEYS_UP; 250 vals[0] = 0; 251 dtkbd_maplen = 0; 252 return (1); 253 } 254 255 count = 0; 256 257 for (i = 0; i < len; i++) { 258 c = msg->body[i]; 259 260 for (j = 0; j < dtkbd_maplen; j++) 261 if (dtkbd_map[j] == c) 262 break; 263 264 if (j == dtkbd_maplen) { 265 types[count] = WSCONS_EVENT_KEY_DOWN; 266 vals[count] = c - MIN_LK201_KEY; 267 count++; 268 } 269 } 270 271 for (j = 0; j < dtkbd_maplen; j++) { 272 c = dtkbd_map[j]; 273 274 for (i = 0; i < len; i++) 275 if (msg->body[i] == c) 276 break; 277 278 if (i == len) { 279 types[count] = WSCONS_EVENT_KEY_UP; 280 vals[count] = c - MIN_LK201_KEY; 281 count++; 282 } 283 } 284 285 memcpy(dtkbd_map, msg->body, len); 286 dtkbd_maplen = len; 287 288 return (count); 289} 290