1 1.42 tsutsui /* $NetBSD: lunaws.c,v 1.42 2023/01/15 05:08:33 tsutsui Exp $ */ 2 1.1 nisimura 3 1.1 nisimura /*- 4 1.1 nisimura * Copyright (c) 2000 The NetBSD Foundation, Inc. 5 1.1 nisimura * All rights reserved. 6 1.1 nisimura * 7 1.1 nisimura * This code is derived from software contributed to The NetBSD Foundation 8 1.1 nisimura * by Tohru Nishimura. 9 1.1 nisimura * 10 1.1 nisimura * Redistribution and use in source and binary forms, with or without 11 1.1 nisimura * modification, are permitted provided that the following conditions 12 1.1 nisimura * are met: 13 1.1 nisimura * 1. Redistributions of source code must retain the above copyright 14 1.1 nisimura * notice, this list of conditions and the following disclaimer. 15 1.1 nisimura * 2. Redistributions in binary form must reproduce the above copyright 16 1.1 nisimura * notice, this list of conditions and the following disclaimer in the 17 1.1 nisimura * documentation and/or other materials provided with the distribution. 18 1.1 nisimura * 19 1.1 nisimura * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 20 1.1 nisimura * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 21 1.1 nisimura * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 22 1.1 nisimura * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 23 1.1 nisimura * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 24 1.1 nisimura * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 25 1.1 nisimura * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 26 1.1 nisimura * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 27 1.1 nisimura * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 28 1.1 nisimura * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 29 1.1 nisimura * POSSIBILITY OF SUCH DAMAGE. 30 1.1 nisimura */ 31 1.1 nisimura 32 1.1 nisimura #include <sys/cdefs.h> /* RCS ID & Copyright macro defns */ 33 1.1 nisimura 34 1.42 tsutsui __KERNEL_RCSID(0, "$NetBSD: lunaws.c,v 1.42 2023/01/15 05:08:33 tsutsui Exp $"); 35 1.1 nisimura 36 1.30 tsutsui #include "opt_wsdisplay_compat.h" 37 1.1 nisimura #include "wsmouse.h" 38 1.1 nisimura 39 1.1 nisimura #include <sys/param.h> 40 1.1 nisimura #include <sys/systm.h> 41 1.1 nisimura #include <sys/conf.h> 42 1.1 nisimura #include <sys/device.h> 43 1.41 tsutsui #include <sys/rndsource.h> 44 1.1 nisimura 45 1.1 nisimura #include <dev/wscons/wsconsio.h> 46 1.1 nisimura #include <dev/wscons/wskbdvar.h> 47 1.1 nisimura #include <dev/wscons/wsksymdef.h> 48 1.1 nisimura #include <dev/wscons/wsksymvar.h> 49 1.1 nisimura #include <dev/wscons/wsmousevar.h> 50 1.1 nisimura 51 1.30 tsutsui #include <luna68k/dev/omkbdmap.h> 52 1.1 nisimura #include <luna68k/dev/sioreg.h> 53 1.1 nisimura #include <luna68k/dev/siovar.h> 54 1.39 tsutsui 55 1.39 tsutsui #include <machine/board.h> 56 1.1 nisimura 57 1.22 tsutsui #include "ioconf.h" 58 1.22 tsutsui 59 1.26 tsutsui #define OMKBD_RXQ_LEN 64 60 1.26 tsutsui #define OMKBD_RXQ_LEN_MASK (OMKBD_RXQ_LEN - 1) 61 1.26 tsutsui #define OMKBD_NEXTRXQ(x) (((x) + 1) & OMKBD_RXQ_LEN_MASK) 62 1.35 tsutsui #define OMKBD_TXQ_LEN 16 63 1.35 tsutsui #define OMKBD_TXQ_LEN_MASK (OMKBD_TXQ_LEN - 1) 64 1.35 tsutsui #define OMKBD_NEXTTXQ(x) (((x) + 1) & OMKBD_TXQ_LEN_MASK) 65 1.35 tsutsui 66 1.35 tsutsui /* Keyboard commands */ 67 1.35 tsutsui /* 000XXXXXb : LED commands */ 68 1.35 tsutsui #define OMKBD_LED_ON_KANA 0x10 /* kana LED on */ 69 1.35 tsutsui #define OMKBD_LED_OFF_KANA 0x00 /* kana LED off */ 70 1.35 tsutsui #define OMKBD_LED_ON_CAPS 0x11 /* caps LED on */ 71 1.35 tsutsui #define OMKBD_LED_OFF_CAPS 0x01 /* caps LED off */ 72 1.35 tsutsui /* 010XXXXXb : buzzer commands */ 73 1.35 tsutsui #define OMKBD_BUZZER 0x40 74 1.35 tsutsui #define OMKBD_BUZZER_PERIOD 0x18 75 1.35 tsutsui #define OMKBD_BUZZER_40MS 0x00 76 1.35 tsutsui #define OMKBD_BUZZER_150MS 0x08 77 1.35 tsutsui #define OMKBD_BUZZER_400MS 0x10 78 1.35 tsutsui #define OMKBD_BUZZER_700MS 0x18 79 1.35 tsutsui #define OMKBD_BUZZER_PITCH 0x07 80 1.35 tsutsui #define OMKBD_BUZZER_6000HZ 0x00 81 1.35 tsutsui #define OMKBD_BUZZER_3000HZ 0x01 82 1.35 tsutsui #define OMKBD_BUZZER_1500HZ 0x02 83 1.35 tsutsui #define OMKBD_BUZZER_1000HZ 0x03 84 1.35 tsutsui #define OMKBD_BUZZER_600HZ 0x04 85 1.35 tsutsui #define OMKBD_BUZZER_300HZ 0x05 86 1.35 tsutsui #define OMKBD_BUZZER_150HZ 0x06 87 1.35 tsutsui #define OMKBD_BUZZER_100HZ 0x07 88 1.35 tsutsui /* 011XXXXXb : mouse on command */ 89 1.35 tsutsui #define OMKBD_MOUSE_ON 0x60 90 1.35 tsutsui /* 001XXXXXb : mouse off command */ 91 1.35 tsutsui #define OMKBD_MOUSE_OFF 0x20 92 1.35 tsutsui 93 1.35 tsutsui #define OMKBD_BUZZER_DEFAULT \ 94 1.35 tsutsui (OMKBD_BUZZER | OMKBD_BUZZER_40MS | OMKBD_BUZZER_1500HZ) 95 1.26 tsutsui 96 1.23 tsutsui static const uint8_t ch1_regs[6] = { 97 1.1 nisimura WR0_RSTINT, /* Reset E/S Interrupt */ 98 1.35 tsutsui WR1_RXALLS | WR1_TXENBL, /* Rx per char, Tx */ 99 1.1 nisimura 0, /* */ 100 1.1 nisimura WR3_RX8BIT | WR3_RXENBL, /* Rx */ 101 1.1 nisimura WR4_BAUD96 | WR4_STOP1 | WR4_NPARITY, /* Tx/Rx */ 102 1.1 nisimura WR5_TX8BIT | WR5_TXENBL, /* Tx */ 103 1.1 nisimura }; 104 1.1 nisimura 105 1.40 tsutsui struct ws_conscookie { 106 1.40 tsutsui struct sioreg *cc_sio; 107 1.40 tsutsui int cc_polling; 108 1.40 tsutsui struct ws_softc *cc_sc; 109 1.40 tsutsui }; 110 1.40 tsutsui 111 1.1 nisimura struct ws_softc { 112 1.22 tsutsui device_t sc_dev; 113 1.3 nisimura struct sioreg *sc_ctl; 114 1.23 tsutsui uint8_t sc_wr[6]; 115 1.25 tsutsui device_t sc_wskbddev; 116 1.26 tsutsui uint8_t sc_rxq[OMKBD_RXQ_LEN]; 117 1.26 tsutsui u_int sc_rxqhead; 118 1.26 tsutsui u_int sc_rxqtail; 119 1.35 tsutsui uint8_t sc_txq[OMKBD_TXQ_LEN]; 120 1.35 tsutsui u_int sc_txqhead; 121 1.35 tsutsui u_int sc_txqtail; 122 1.35 tsutsui bool sc_tx_busy; 123 1.35 tsutsui bool sc_tx_done; 124 1.35 tsutsui int sc_leds; 125 1.3 nisimura #if NWSMOUSE > 0 126 1.25 tsutsui device_t sc_wsmousedev; 127 1.26 tsutsui int sc_msbuttons, sc_msdx, sc_msdy; 128 1.3 nisimura #endif 129 1.34 tsutsui int sc_msreport; 130 1.26 tsutsui void *sc_si; 131 1.30 tsutsui int sc_rawkbd; 132 1.40 tsutsui 133 1.40 tsutsui struct ws_conscookie *sc_conscookie; 134 1.41 tsutsui krndsource_t sc_rndsource; 135 1.1 nisimura }; 136 1.1 nisimura 137 1.35 tsutsui static void omkbd_input(struct ws_softc *, int); 138 1.35 tsutsui static void omkbd_send(struct ws_softc *, uint8_t); 139 1.35 tsutsui static void omkbd_decode(struct ws_softc *, int, u_int *, int *); 140 1.35 tsutsui 141 1.16 dsl static int omkbd_enable(void *, int); 142 1.16 dsl static void omkbd_set_leds(void *, int); 143 1.16 dsl static int omkbd_ioctl(void *, u_long, void *, int, struct lwp *); 144 1.1 nisimura 145 1.35 tsutsui static void omkbd_complex_buzzer(struct ws_softc *, struct wskbd_bell_data *); 146 1.35 tsutsui static uint8_t omkbd_get_buzcmd(struct ws_softc *, struct wskbd_bell_data *, 147 1.35 tsutsui uint8_t); 148 1.35 tsutsui 149 1.1 nisimura static const struct wskbd_mapdata omkbd_keymapdata = { 150 1.35 tsutsui .keydesc = omkbd_keydesctab, 151 1.35 tsutsui .layout = KB_JP, 152 1.1 nisimura }; 153 1.1 nisimura static const struct wskbd_accessops omkbd_accessops = { 154 1.35 tsutsui .enable = omkbd_enable, 155 1.35 tsutsui .set_leds = omkbd_set_leds, 156 1.35 tsutsui .ioctl = omkbd_ioctl, 157 1.1 nisimura }; 158 1.1 nisimura 159 1.16 dsl void ws_cnattach(void); 160 1.16 dsl static void ws_cngetc(void *, u_int *, int *); 161 1.16 dsl static void ws_cnpollc(void *, int); 162 1.35 tsutsui static void ws_cnbell(void *, u_int, u_int, u_int); 163 1.1 nisimura static const struct wskbd_consops ws_consops = { 164 1.35 tsutsui .getc = ws_cngetc, 165 1.35 tsutsui .pollc = ws_cnpollc, 166 1.35 tsutsui .bell = ws_cnbell, 167 1.1 nisimura }; 168 1.40 tsutsui static struct ws_conscookie ws_conscookie; 169 1.1 nisimura 170 1.1 nisimura #if NWSMOUSE > 0 171 1.16 dsl static int omms_enable(void *); 172 1.16 dsl static int omms_ioctl(void *, u_long, void *, int, struct lwp *); 173 1.16 dsl static void omms_disable(void *); 174 1.1 nisimura 175 1.1 nisimura static const struct wsmouse_accessops omms_accessops = { 176 1.37 tsutsui .enable = omms_enable, 177 1.37 tsutsui .ioctl = omms_ioctl, 178 1.37 tsutsui .disable = omms_disable, 179 1.1 nisimura }; 180 1.1 nisimura #endif 181 1.1 nisimura 182 1.28 tsutsui static void wsintr(void *); 183 1.26 tsutsui static void wssoftintr(void *); 184 1.1 nisimura 185 1.22 tsutsui static int wsmatch(device_t, cfdata_t, void *); 186 1.22 tsutsui static void wsattach(device_t, device_t, void *); 187 1.1 nisimura 188 1.22 tsutsui CFATTACH_DECL_NEW(ws, sizeof(struct ws_softc), 189 1.9 thorpej wsmatch, wsattach, NULL, NULL); 190 1.1 nisimura 191 1.35 tsutsui /* #define LUNAWS_DEBUG */ 192 1.35 tsutsui 193 1.35 tsutsui #ifdef LUNAWS_DEBUG 194 1.35 tsutsui #define DEBUG_KBDTX 0x01 195 1.35 tsutsui #define DEBUG_RXSOFT 0x02 196 1.35 tsutsui #define DEBUG_BUZZER 0x04 197 1.35 tsutsui uint32_t lunaws_debug = 0x00 /* | DEBUG_BUZZER | DEBUG_KBDTX | DEBUG_RXSOFT */; 198 1.35 tsutsui #define DPRINTF(x, y) if (lunaws_debug & (x)) printf y 199 1.35 tsutsui #else 200 1.35 tsutsui #define DPRINTF(x, y) __nothing 201 1.35 tsutsui #endif 202 1.35 tsutsui 203 1.1 nisimura static int 204 1.22 tsutsui wsmatch(device_t parent, cfdata_t cf, void *aux) 205 1.1 nisimura { 206 1.1 nisimura struct sio_attach_args *args = aux; 207 1.1 nisimura 208 1.1 nisimura if (args->channel != 1) 209 1.1 nisimura return 0; 210 1.1 nisimura return 1; 211 1.1 nisimura } 212 1.1 nisimura 213 1.1 nisimura static void 214 1.22 tsutsui wsattach(device_t parent, device_t self, void *aux) 215 1.1 nisimura { 216 1.22 tsutsui struct ws_softc *sc = device_private(self); 217 1.28 tsutsui struct sio_softc *siosc = device_private(parent); 218 1.1 nisimura struct sio_attach_args *args = aux; 219 1.28 tsutsui int channel = args->channel; 220 1.1 nisimura struct wskbddev_attach_args a; 221 1.1 nisimura 222 1.22 tsutsui sc->sc_dev = self; 223 1.28 tsutsui sc->sc_ctl = &siosc->sc_ctl[channel]; 224 1.20 cegger memcpy(sc->sc_wr, ch1_regs, sizeof(ch1_regs)); 225 1.28 tsutsui siosc->sc_intrhand[channel].ih_func = wsintr; 226 1.28 tsutsui siosc->sc_intrhand[channel].ih_arg = sc; 227 1.27 tsutsui 228 1.40 tsutsui sc->sc_conscookie = &ws_conscookie; 229 1.40 tsutsui sc->sc_conscookie->cc_sc = sc; 230 1.40 tsutsui sc->sc_conscookie->cc_polling = 0; 231 1.40 tsutsui 232 1.1 nisimura setsioreg(sc->sc_ctl, WR0, sc->sc_wr[WR0]); 233 1.1 nisimura setsioreg(sc->sc_ctl, WR4, sc->sc_wr[WR4]); 234 1.1 nisimura setsioreg(sc->sc_ctl, WR3, sc->sc_wr[WR3]); 235 1.1 nisimura setsioreg(sc->sc_ctl, WR5, sc->sc_wr[WR5]); 236 1.1 nisimura setsioreg(sc->sc_ctl, WR0, sc->sc_wr[WR0]); 237 1.1 nisimura 238 1.26 tsutsui sc->sc_rxqhead = 0; 239 1.26 tsutsui sc->sc_rxqtail = 0; 240 1.35 tsutsui sc->sc_txqhead = 0; 241 1.35 tsutsui sc->sc_txqtail = 0; 242 1.35 tsutsui sc->sc_tx_busy = false; 243 1.35 tsutsui sc->sc_tx_done = false; 244 1.26 tsutsui 245 1.26 tsutsui sc->sc_si = softint_establish(SOFTINT_SERIAL, wssoftintr, sc); 246 1.41 tsutsui rnd_attach_source(&sc->sc_rndsource, device_xname(self), 247 1.41 tsutsui RND_TYPE_TTY, RND_FLAG_DEFAULT); 248 1.26 tsutsui 249 1.35 tsutsui /* enable interrupt */ 250 1.35 tsutsui setsioreg(sc->sc_ctl, WR1, sc->sc_wr[WR1]); 251 1.35 tsutsui 252 1.22 tsutsui aprint_normal("\n"); 253 1.1 nisimura 254 1.35 tsutsui /* keep mouse quiet */ 255 1.35 tsutsui omkbd_send(sc, OMKBD_MOUSE_OFF); 256 1.35 tsutsui 257 1.1 nisimura a.console = (args->hwflags == 1); 258 1.1 nisimura a.keymap = &omkbd_keymapdata; 259 1.1 nisimura a.accessops = &omkbd_accessops; 260 1.1 nisimura a.accesscookie = (void *)sc; 261 1.32 thorpej sc->sc_wskbddev = config_found(self, &a, wskbddevprint, 262 1.33 thorpej CFARGS(.iattr = "wskbddev")); 263 1.1 nisimura 264 1.1 nisimura #if NWSMOUSE > 0 265 1.1 nisimura { 266 1.1 nisimura struct wsmousedev_attach_args b; 267 1.1 nisimura b.accessops = &omms_accessops; 268 1.27 tsutsui b.accesscookie = (void *)sc; 269 1.32 thorpej sc->sc_wsmousedev = config_found(self, &b, wsmousedevprint, 270 1.33 thorpej CFARGS(.iattr = "wsmousedev")); 271 1.1 nisimura } 272 1.1 nisimura #endif 273 1.34 tsutsui sc->sc_msreport = 0; 274 1.1 nisimura } 275 1.1 nisimura 276 1.1 nisimura static void 277 1.28 tsutsui wsintr(void *arg) 278 1.1 nisimura { 279 1.28 tsutsui struct ws_softc *sc = arg; 280 1.1 nisimura struct sioreg *sio = sc->sc_ctl; 281 1.41 tsutsui uint8_t code = 0; 282 1.41 tsutsui uint16_t rr, rndcsr = 0; 283 1.35 tsutsui bool handled = false; 284 1.1 nisimura 285 1.1 nisimura rr = getsiocsr(sio); 286 1.41 tsutsui rndcsr = rr; 287 1.29 tsutsui if ((rr & RR_RXRDY) != 0) { 288 1.1 nisimura do { 289 1.1 nisimura code = sio->sio_data; 290 1.1 nisimura if (rr & (RR_FRAMING | RR_OVERRUN | RR_PARITY)) { 291 1.1 nisimura sio->sio_cmd = WR0_ERRRST; 292 1.1 nisimura continue; 293 1.1 nisimura } 294 1.26 tsutsui sc->sc_rxq[sc->sc_rxqtail] = code; 295 1.26 tsutsui sc->sc_rxqtail = OMKBD_NEXTRXQ(sc->sc_rxqtail); 296 1.29 tsutsui } while (((rr = getsiocsr(sio)) & RR_RXRDY) != 0); 297 1.35 tsutsui handled = true; 298 1.26 tsutsui } 299 1.35 tsutsui if ((rr & RR_TXRDY) != 0) { 300 1.26 tsutsui sio->sio_cmd = WR0_RSTPEND; 301 1.35 tsutsui if (sc->sc_tx_busy) { 302 1.35 tsutsui sc->sc_tx_busy = false; 303 1.35 tsutsui sc->sc_tx_done = true; 304 1.35 tsutsui handled = true; 305 1.35 tsutsui } 306 1.35 tsutsui } 307 1.41 tsutsui if (handled) { 308 1.35 tsutsui softint_schedule(sc->sc_si); 309 1.41 tsutsui rnd_add_uint32(&sc->sc_rndsource, (rndcsr << 8) | code); 310 1.41 tsutsui } 311 1.26 tsutsui } 312 1.26 tsutsui 313 1.26 tsutsui static void 314 1.26 tsutsui wssoftintr(void *arg) 315 1.26 tsutsui { 316 1.26 tsutsui struct ws_softc *sc = arg; 317 1.26 tsutsui uint8_t code; 318 1.26 tsutsui 319 1.35 tsutsui /* handle pending keyboard commands */ 320 1.35 tsutsui if (sc->sc_tx_done) { 321 1.35 tsutsui int s; 322 1.35 tsutsui 323 1.35 tsutsui s = splserial(); 324 1.35 tsutsui sc->sc_tx_done = false; 325 1.35 tsutsui DPRINTF(DEBUG_KBDTX, ("%s: tx complete\n", __func__)); 326 1.35 tsutsui if (sc->sc_txqhead != sc->sc_txqtail) { 327 1.35 tsutsui struct sioreg *sio = sc->sc_ctl; 328 1.35 tsutsui 329 1.35 tsutsui sc->sc_tx_busy = true; 330 1.35 tsutsui sio->sio_data = sc->sc_txq[sc->sc_txqhead]; 331 1.35 tsutsui DPRINTF(DEBUG_KBDTX, 332 1.35 tsutsui ("%s: sio_data <- txq[%2d] (%02x)\n", __func__, 333 1.35 tsutsui sc->sc_txqhead, sc->sc_txq[sc->sc_txqhead])); 334 1.35 tsutsui 335 1.35 tsutsui sc->sc_txqhead = OMKBD_NEXTTXQ(sc->sc_txqhead); 336 1.35 tsutsui } 337 1.35 tsutsui splx(s); 338 1.35 tsutsui } 339 1.35 tsutsui 340 1.35 tsutsui /* handle received keyboard and mouse data */ 341 1.26 tsutsui while (sc->sc_rxqhead != sc->sc_rxqtail) { 342 1.26 tsutsui code = sc->sc_rxq[sc->sc_rxqhead]; 343 1.35 tsutsui DPRINTF(DEBUG_RXSOFT, ("%s: %02x <- rxq[%2d]\n", __func__, 344 1.35 tsutsui code, sc->sc_rxqhead)); 345 1.26 tsutsui sc->sc_rxqhead = OMKBD_NEXTRXQ(sc->sc_rxqhead); 346 1.26 tsutsui /* 347 1.34 tsutsui * if (code >= 0x80 && code <= 0x87), i.e. 348 1.34 tsutsui * if ((code & 0xf8) == 0x80), then 349 1.26 tsutsui * it's the first byte of 3 byte long mouse report 350 1.27 tsutsui * code[0] & 07 -> LMR button condition 351 1.26 tsutsui * code[1], [2] -> x,y delta 352 1.26 tsutsui * otherwise, key press or release event. 353 1.26 tsutsui */ 354 1.34 tsutsui if (sc->sc_msreport == 1) { 355 1.34 tsutsui #if NWSMOUSE > 0 356 1.26 tsutsui sc->sc_msdx = (int8_t)code; 357 1.34 tsutsui #endif 358 1.26 tsutsui sc->sc_msreport = 2; 359 1.34 tsutsui continue; 360 1.26 tsutsui } else if (sc->sc_msreport == 2) { 361 1.34 tsutsui #if NWSMOUSE > 0 362 1.26 tsutsui sc->sc_msdy = (int8_t)code; 363 1.26 tsutsui wsmouse_input(sc->sc_wsmousedev, 364 1.26 tsutsui sc->sc_msbuttons, sc->sc_msdx, sc->sc_msdy, 0, 0, 365 1.26 tsutsui WSMOUSE_INPUT_DELTA); 366 1.34 tsutsui #endif 367 1.26 tsutsui sc->sc_msreport = 0; 368 1.34 tsutsui continue; 369 1.34 tsutsui } 370 1.34 tsutsui if ((code & 0xf8) == 0x80) { 371 1.34 tsutsui #if NWSMOUSE > 0 372 1.34 tsutsui /* buttons: Negative logic to positive */ 373 1.34 tsutsui code = ~code; 374 1.34 tsutsui /* LMR->RML: wsevent counts 0 for leftmost */ 375 1.34 tsutsui sc->sc_msbuttons = 376 1.34 tsutsui ((code & 1) << 2) | (code & 2) | ((code & 4) >> 2); 377 1.34 tsutsui #endif 378 1.34 tsutsui sc->sc_msreport = 1; 379 1.34 tsutsui continue; 380 1.26 tsutsui } 381 1.26 tsutsui omkbd_input(sc, code); 382 1.1 nisimura } 383 1.1 nisimura } 384 1.1 nisimura 385 1.1 nisimura static void 386 1.35 tsutsui omkbd_send(struct ws_softc *sc, uint8_t txdata) 387 1.35 tsutsui { 388 1.35 tsutsui int s; 389 1.35 tsutsui 390 1.35 tsutsui if (!sc->sc_tx_busy) { 391 1.35 tsutsui struct sioreg *sio = sc->sc_ctl; 392 1.35 tsutsui 393 1.35 tsutsui DPRINTF(DEBUG_KBDTX, 394 1.35 tsutsui ("%s: sio_data <- %02x\n", __func__, txdata)); 395 1.35 tsutsui s = splserial(); 396 1.35 tsutsui sc->sc_tx_busy = true; 397 1.35 tsutsui sio->sio_data = txdata; 398 1.35 tsutsui splx(s); 399 1.35 tsutsui } else { 400 1.35 tsutsui s = splsoftserial(); 401 1.35 tsutsui sc->sc_txq[sc->sc_txqtail] = txdata; 402 1.35 tsutsui DPRINTF(DEBUG_KBDTX, 403 1.35 tsutsui ("%s: txq[%2d] <- %02x\n", __func__, 404 1.35 tsutsui sc->sc_txqtail, sc->sc_txq[sc->sc_txqtail])); 405 1.35 tsutsui sc->sc_txqtail = OMKBD_NEXTTXQ(sc->sc_txqtail); 406 1.35 tsutsui splx(s); 407 1.35 tsutsui softint_schedule(sc->sc_si); 408 1.35 tsutsui } 409 1.35 tsutsui } 410 1.35 tsutsui 411 1.35 tsutsui static void 412 1.35 tsutsui omkbd_input(struct ws_softc *sc, int data) 413 1.1 nisimura { 414 1.1 nisimura u_int type; 415 1.1 nisimura int key; 416 1.1 nisimura 417 1.35 tsutsui omkbd_decode(sc, data, &type, &key); 418 1.30 tsutsui 419 1.30 tsutsui #ifdef WSDISPLAY_COMPAT_RAWKBD 420 1.30 tsutsui if (sc->sc_rawkbd) { 421 1.30 tsutsui uint8_t cbuf[2]; 422 1.30 tsutsui int c, j = 0; 423 1.30 tsutsui 424 1.30 tsutsui c = omkbd_raw[key]; 425 1.36 tsutsui if (c == 0x70 /* Kana */ || 426 1.36 tsutsui c == 0x3a /* CAP */) { 427 1.36 tsutsui /* See comment in !sc->sc_rawkbd case */ 428 1.36 tsutsui cbuf[0] = c; 429 1.36 tsutsui wskbd_rawinput(sc->sc_wskbddev, cbuf, 1); 430 1.36 tsutsui cbuf[0] = c | 0x80; 431 1.36 tsutsui wskbd_rawinput(sc->sc_wskbddev, cbuf, 1); 432 1.36 tsutsui } else 433 1.30 tsutsui if (c != 0x00) { 434 1.30 tsutsui /* fake extended scancode if necessary */ 435 1.30 tsutsui if (c & 0x80) 436 1.30 tsutsui cbuf[j++] = 0xe0; 437 1.30 tsutsui cbuf[j] = c & 0x7f; 438 1.30 tsutsui if (type == WSCONS_EVENT_KEY_UP) 439 1.30 tsutsui cbuf[j] |= 0x80; 440 1.30 tsutsui j++; 441 1.30 tsutsui 442 1.30 tsutsui wskbd_rawinput(sc->sc_wskbddev, cbuf, j); 443 1.30 tsutsui } 444 1.30 tsutsui } else 445 1.30 tsutsui #endif 446 1.30 tsutsui { 447 1.36 tsutsui if (sc->sc_wskbddev != NULL) { 448 1.36 tsutsui if (key == 0x0b /* Kana */ || 449 1.36 tsutsui key == 0x0e /* CAP */) { 450 1.36 tsutsui /* 451 1.36 tsutsui * LUNA's keyboard doesn't send any keycode 452 1.36 tsutsui * when these modifier keys are released. 453 1.36 tsutsui * Instead, it sends a pressed or released code 454 1.36 tsutsui * per how each modifier LED status will be 455 1.36 tsutsui * changed when the modifier keys are pressed. 456 1.36 tsutsui * To handle this quirk in MI wskbd(4) layer, 457 1.36 tsutsui * we have to send a faked 458 1.36 tsutsui * "pressed and released" sequence here. 459 1.36 tsutsui */ 460 1.36 tsutsui wskbd_input(sc->sc_wskbddev, 461 1.36 tsutsui WSCONS_EVENT_KEY_DOWN, key); 462 1.36 tsutsui wskbd_input(sc->sc_wskbddev, 463 1.36 tsutsui WSCONS_EVENT_KEY_UP, key); 464 1.36 tsutsui } else { 465 1.36 tsutsui wskbd_input(sc->sc_wskbddev, type, key); 466 1.36 tsutsui } 467 1.36 tsutsui } 468 1.30 tsutsui } 469 1.1 nisimura } 470 1.1 nisimura 471 1.30 tsutsui static void 472 1.35 tsutsui omkbd_decode(struct ws_softc *sc, int datain, u_int *type, int *dataout) 473 1.1 nisimura { 474 1.23 tsutsui 475 1.1 nisimura *type = (datain & 0x80) ? WSCONS_EVENT_KEY_UP : WSCONS_EVENT_KEY_DOWN; 476 1.1 nisimura *dataout = datain & 0x7f; 477 1.1 nisimura } 478 1.1 nisimura 479 1.1 nisimura static void 480 1.35 tsutsui omkbd_complex_buzzer(struct ws_softc *sc, struct wskbd_bell_data *wbd) 481 1.1 nisimura { 482 1.35 tsutsui uint8_t buzcmd; 483 1.35 tsutsui 484 1.35 tsutsui buzcmd = omkbd_get_buzcmd(sc, wbd, OMKBD_BUZZER_DEFAULT); 485 1.35 tsutsui omkbd_send(sc, buzcmd); 486 1.35 tsutsui } 487 1.35 tsutsui 488 1.35 tsutsui static uint8_t 489 1.35 tsutsui omkbd_get_buzcmd(struct ws_softc *sc, struct wskbd_bell_data *wbd, 490 1.35 tsutsui uint8_t obuzcmd) 491 1.35 tsutsui { 492 1.35 tsutsui u_int pitch, period; 493 1.35 tsutsui uint8_t buzcmd; 494 1.35 tsutsui 495 1.35 tsutsui pitch = wbd->pitch; 496 1.35 tsutsui period = wbd->period; 497 1.35 tsutsui buzcmd = OMKBD_BUZZER; 498 1.35 tsutsui 499 1.35 tsutsui if ((wbd->which & WSKBD_BELL_DOPERIOD) == 0) 500 1.35 tsutsui buzcmd |= obuzcmd & OMKBD_BUZZER_PERIOD; 501 1.35 tsutsui else if (period >= 700) 502 1.35 tsutsui buzcmd |= OMKBD_BUZZER_700MS; 503 1.35 tsutsui else if (period >= 400) 504 1.35 tsutsui buzcmd |= OMKBD_BUZZER_400MS; 505 1.35 tsutsui else if (period >= 150) 506 1.35 tsutsui buzcmd |= OMKBD_BUZZER_150MS; 507 1.35 tsutsui else 508 1.35 tsutsui buzcmd |= OMKBD_BUZZER_40MS; 509 1.35 tsutsui 510 1.35 tsutsui if ((wbd->which & WSKBD_BELL_DOPITCH) == 0) 511 1.35 tsutsui buzcmd |= obuzcmd & OMKBD_BUZZER_PITCH; 512 1.35 tsutsui else if (pitch >= 6000) 513 1.35 tsutsui buzcmd |= OMKBD_BUZZER_6000HZ; 514 1.35 tsutsui else if (pitch >= 3000) 515 1.35 tsutsui buzcmd |= OMKBD_BUZZER_3000HZ; 516 1.35 tsutsui else if (pitch >= 1500) 517 1.35 tsutsui buzcmd |= OMKBD_BUZZER_1500HZ; 518 1.35 tsutsui else if (pitch >= 1000) 519 1.35 tsutsui buzcmd |= OMKBD_BUZZER_1000HZ; 520 1.35 tsutsui else if (pitch >= 600) 521 1.35 tsutsui buzcmd |= OMKBD_BUZZER_600HZ; 522 1.35 tsutsui else if (pitch >= 300) 523 1.35 tsutsui buzcmd |= OMKBD_BUZZER_300HZ; 524 1.35 tsutsui else if (pitch >= 150) 525 1.35 tsutsui buzcmd |= OMKBD_BUZZER_150HZ; 526 1.35 tsutsui else 527 1.35 tsutsui buzcmd |= OMKBD_BUZZER_100HZ; 528 1.42 tsutsui 529 1.35 tsutsui /* no volume control for buzzer on the LUNA keyboards */ 530 1.35 tsutsui 531 1.35 tsutsui return buzcmd; 532 1.35 tsutsui } 533 1.35 tsutsui 534 1.35 tsutsui static void 535 1.35 tsutsui ws_cngetc(void *cookie, u_int *type, int *data) 536 1.35 tsutsui { 537 1.40 tsutsui struct ws_conscookie *conscookie = cookie; 538 1.40 tsutsui struct sioreg *sio = conscookie->cc_sio; 539 1.40 tsutsui struct ws_softc *sc = conscookie->cc_sc; /* currently unused */ 540 1.1 nisimura int code; 541 1.1 nisimura 542 1.39 tsutsui code = siogetc(sio); 543 1.35 tsutsui omkbd_decode(sc, code, type, data); 544 1.1 nisimura } 545 1.1 nisimura 546 1.1 nisimura static void 547 1.35 tsutsui ws_cnpollc(void *cookie, int on) 548 1.1 nisimura { 549 1.40 tsutsui struct ws_conscookie *conscookie = cookie; 550 1.40 tsutsui 551 1.40 tsutsui conscookie->cc_polling = on; 552 1.1 nisimura } 553 1.1 nisimura 554 1.35 tsutsui static void 555 1.35 tsutsui ws_cnbell(void *cookie, u_int pitch, u_int period, u_int volume) 556 1.35 tsutsui { 557 1.40 tsutsui struct ws_conscookie *conscookie = cookie; 558 1.40 tsutsui struct sioreg *sio = conscookie->cc_sio; 559 1.40 tsutsui struct ws_softc *sc = conscookie->cc_sc; /* currently unused */ 560 1.35 tsutsui struct wskbd_bell_data wbd; 561 1.35 tsutsui uint8_t buzcmd; 562 1.35 tsutsui 563 1.35 tsutsui /* 564 1.35 tsutsui * XXX cnbell(9) man page should describe each args.. 565 1.35 tsutsui * (it looks similar to the struct wskbd_bell_data) 566 1.35 tsutsui * pitch: bell frequency in hertz 567 1.35 tsutsui * period: bell period in ms 568 1.35 tsutsui * volume: bell volume as a percentage (0-100) (as spkr(4)) 569 1.35 tsutsui */ 570 1.35 tsutsui wbd.which = WSKBD_BELL_DOALL; 571 1.35 tsutsui wbd.period = period; 572 1.35 tsutsui wbd.pitch = pitch; 573 1.35 tsutsui wbd.volume = volume; 574 1.35 tsutsui buzcmd = omkbd_get_buzcmd(sc, &wbd, OMKBD_BUZZER_DEFAULT); 575 1.35 tsutsui 576 1.39 tsutsui sioputc(sio, buzcmd); 577 1.35 tsutsui } 578 1.35 tsutsui 579 1.1 nisimura /* EXPORT */ void 580 1.18 cegger ws_cnattach(void) 581 1.1 nisimura { 582 1.40 tsutsui struct sioreg *sio_base; 583 1.40 tsutsui 584 1.40 tsutsui sio_base = (struct sioreg *)OBIO_SIO; 585 1.40 tsutsui ws_conscookie.cc_sio = &sio_base[1]; /* channel B */ 586 1.1 nisimura 587 1.3 nisimura /* XXX need CH.B initialization XXX */ 588 1.3 nisimura 589 1.40 tsutsui wskbd_cnattach(&ws_consops, &ws_conscookie, &omkbd_keymapdata); 590 1.1 nisimura } 591 1.1 nisimura 592 1.1 nisimura static int 593 1.35 tsutsui omkbd_enable(void *cookie, int on) 594 1.1 nisimura { 595 1.23 tsutsui 596 1.1 nisimura return 0; 597 1.1 nisimura } 598 1.1 nisimura 599 1.1 nisimura static void 600 1.35 tsutsui omkbd_set_leds(void *cookie, int leds) 601 1.1 nisimura { 602 1.35 tsutsui struct ws_softc *sc = cookie; 603 1.40 tsutsui uint8_t capsledcmd, kanaledcmd; 604 1.23 tsutsui 605 1.40 tsutsui if (sc == NULL) { 606 1.40 tsutsui /* 607 1.40 tsutsui * This has been checked by the caller in wskbd(9) layer 608 1.40 tsutsui * for the early console, but just for sanity. 609 1.40 tsutsui */ 610 1.40 tsutsui return; 611 1.40 tsutsui } 612 1.38 tsutsui 613 1.35 tsutsui sc->sc_leds = leds; 614 1.35 tsutsui if ((leds & WSKBD_LED_CAPS) != 0) { 615 1.40 tsutsui capsledcmd = OMKBD_LED_ON_CAPS; 616 1.35 tsutsui } else { 617 1.40 tsutsui capsledcmd = OMKBD_LED_OFF_CAPS; 618 1.35 tsutsui } 619 1.35 tsutsui 620 1.35 tsutsui #if 0 /* no KANA lock support in wskbd */ 621 1.35 tsutsui if ((leds & WSKBD_LED_KANA) != 0) { 622 1.40 tsutsui kanaledcmd = OMKBD_LED_ON_KANA; 623 1.35 tsutsui } else 624 1.1 nisimura #endif 625 1.35 tsutsui { 626 1.40 tsutsui kanaledcmd = OMKBD_LED_OFF_KANA; 627 1.40 tsutsui } 628 1.40 tsutsui 629 1.40 tsutsui if (sc->sc_conscookie->cc_polling != 0) { 630 1.40 tsutsui struct sioreg *sio = sc->sc_ctl; 631 1.40 tsutsui 632 1.40 tsutsui sioputc(sio, capsledcmd); 633 1.40 tsutsui sioputc(sio, kanaledcmd); 634 1.40 tsutsui } else { 635 1.40 tsutsui omkbd_send(sc, capsledcmd); 636 1.40 tsutsui omkbd_send(sc, kanaledcmd); 637 1.35 tsutsui } 638 1.1 nisimura } 639 1.1 nisimura 640 1.1 nisimura static int 641 1.35 tsutsui omkbd_ioctl(void *cookie, u_long cmd, void *data, int flag, struct lwp *l) 642 1.1 nisimura { 643 1.35 tsutsui struct ws_softc *sc = cookie; 644 1.35 tsutsui struct wskbd_bell_data *wbd; 645 1.23 tsutsui 646 1.1 nisimura switch (cmd) { 647 1.23 tsutsui case WSKBDIO_GTYPE: 648 1.21 tsutsui *(int *)data = WSKBD_TYPE_LUNA; 649 1.1 nisimura return 0; 650 1.23 tsutsui case WSKBDIO_SETLEDS: 651 1.35 tsutsui omkbd_set_leds(cookie, *(int *)data); 652 1.35 tsutsui return 0; 653 1.23 tsutsui case WSKBDIO_GETLEDS: 654 1.35 tsutsui *(int *)data = sc->sc_leds; 655 1.1 nisimura return 0; 656 1.35 tsutsui 657 1.35 tsutsui /* 658 1.35 tsutsui * Note all WSKBDIO_*BELL ioctl(2)s except WSKBDIO_COMPLEXBELL 659 1.35 tsutsui * are handled MI wskbd(4) layer. 660 1.35 tsutsui * (wskbd_displayioctl() in src/sys/dev/wscons/wskbd.c) 661 1.35 tsutsui */ 662 1.35 tsutsui case WSKBDIO_COMPLEXBELL: 663 1.35 tsutsui wbd = data; 664 1.35 tsutsui DPRINTF(DEBUG_BUZZER, 665 1.35 tsutsui ("%s: WSKBDIO_COMPLEXBELL: pitch = %d, period = %d\n", 666 1.35 tsutsui __func__, wbd->pitch, wbd->period)); 667 1.35 tsutsui omkbd_complex_buzzer(sc, wbd); 668 1.35 tsutsui return 0; 669 1.35 tsutsui 670 1.30 tsutsui #ifdef WSDISPLAY_COMPAT_RAWKBD 671 1.30 tsutsui case WSKBDIO_SETMODE: 672 1.30 tsutsui sc->sc_rawkbd = *(int *)data == WSKBD_RAW; 673 1.30 tsutsui return 0; 674 1.30 tsutsui case WSKBDIO_GETMODE: 675 1.30 tsutsui *(int *)data = sc->sc_rawkbd; 676 1.30 tsutsui return 0; 677 1.30 tsutsui #endif 678 1.1 nisimura } 679 1.6 atatat return EPASSTHROUGH; 680 1.1 nisimura } 681 1.1 nisimura 682 1.1 nisimura #if NWSMOUSE > 0 683 1.1 nisimura 684 1.1 nisimura static int 685 1.35 tsutsui omms_enable(void *cookie) 686 1.1 nisimura { 687 1.35 tsutsui struct ws_softc *sc = cookie; 688 1.35 tsutsui 689 1.35 tsutsui /* enable 3 byte long mouse reporting */ 690 1.35 tsutsui omkbd_send(sc, OMKBD_MOUSE_ON); 691 1.35 tsutsui 692 1.1 nisimura return 0; 693 1.1 nisimura } 694 1.1 nisimura 695 1.1 nisimura /*ARGUSED*/ 696 1.1 nisimura static int 697 1.35 tsutsui omms_ioctl(void *cookie, u_long cmd, void *data, int flag, struct lwp *l) 698 1.1 nisimura { 699 1.23 tsutsui 700 1.1 nisimura if (cmd == WSMOUSEIO_GTYPE) { 701 1.1 nisimura *(u_int *)data = 0x19991005; /* XXX */ 702 1.1 nisimura return 0; 703 1.1 nisimura } 704 1.6 atatat return EPASSTHROUGH; 705 1.1 nisimura } 706 1.1 nisimura 707 1.1 nisimura static void 708 1.35 tsutsui omms_disable(void *cookie) 709 1.1 nisimura { 710 1.35 tsutsui struct ws_softc *sc = cookie; 711 1.35 tsutsui 712 1.35 tsutsui omkbd_send(sc, OMKBD_MOUSE_OFF); 713 1.1 nisimura } 714 1.1 nisimura #endif 715