/* $OpenBSD: lunaws.c,v 1.16 2023/03/08 04:43:07 guenther Exp $ */ /* $NetBSD: lunaws.c,v 1.6 2002/03/17 19:40:42 atatat Exp $ */ /*- * Copyright (c) 2000 The NetBSD Foundation, Inc. * All rights reserved. * * This code is derived from software contributed to The NetBSD Foundation * by Tohru Nishimura. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE * POSSIBILITY OF SUCH DAMAGE. */ #include #include #include #include #include #include #include #include #ifdef WSDISPLAY_COMPAT_RAWKBD #include #endif #include "wsmouse.h" #if NWSMOUSE > 0 #include #endif #include #include #include #define OMKBD_RXQ_LEN 64 #define OMKBD_RXQ_LEN_MASK (OMKBD_RXQ_LEN - 1) #define OMKBD_NEXTRXQ(x) (((x) + 1) & OMKBD_RXQ_LEN_MASK) static const u_int8_t ch1_regs[6] = { WR0_RSTINT, /* Reset E/S Interrupt */ WR1_RXALLS, /* Rx per char, No Tx */ 0, /* */ WR3_RX8BIT | WR3_RXENBL, /* Rx */ WR4_BAUD96 | WR4_STOP1 | WR4_NPARITY, /* Tx/Rx */ WR5_TX8BIT | WR5_TXENBL, /* Tx */ }; struct ws_softc { struct device sc_dev; struct sioreg *sc_ctl; u_int8_t sc_wr[6]; struct device *sc_wskbddev; u_int8_t sc_rxq[OMKBD_RXQ_LEN]; u_int sc_rxqhead; u_int sc_rxqtail; #if NWSMOUSE > 0 struct device *sc_wsmousedev; int sc_msreport; int sc_msbuttons, sc_msdx, sc_msdy; #endif void *sc_si; #ifdef WSDISPLAY_COMPAT_RAWKBD int sc_rawkbd; #endif }; void omkbd_input(void *, int); void omkbd_decode(void *, int, u_int *, int *); int omkbd_enable(void *, int); void omkbd_set_leds(void *, int); int omkbd_ioctl(void *, u_long, caddr_t, int, struct proc *); const struct wskbd_mapdata omkbd_keymapdata = { omkbd_keydesctab, #ifdef OMKBD_LAYOUT OMKBD_LAYOUT, #else KB_JP | KB_DEFAULT, #endif }; const struct wskbd_accessops omkbd_accessops = { omkbd_enable, omkbd_set_leds, omkbd_ioctl, }; void ws_cnattach(void); void ws_cngetc(void *, u_int *, int *); void ws_cnpollc(void *, int); const struct wskbd_consops ws_consops = { ws_cngetc, ws_cnpollc, NULL /* bell */ }; #if NWSMOUSE > 0 int omms_enable(void *); int omms_ioctl(void *, u_long, caddr_t, int, struct proc *); void omms_disable(void *); const struct wsmouse_accessops omms_accessops = { omms_enable, omms_ioctl, omms_disable, }; #endif void wsintr(void *); void wssoftintr(void *); int wsmatch(struct device *, void *, void *); void wsattach(struct device *, struct device *, void *); int ws_submatch_kbd(struct device *, void *, void *); #if NWSMOUSE > 0 int ws_submatch_mouse(struct device *, void *, void *); #endif const struct cfattach ws_ca = { sizeof(struct ws_softc), wsmatch, wsattach }; struct cfdriver ws_cd = { NULL, "ws", DV_TTY }; extern int syscngetc(dev_t); extern void syscnputc(dev_t, int); int wsmatch(struct device *parent, void *match, void *aux) { struct sio_attach_args *args = aux; if (args->channel != 1) return 0; return 1; } void wsattach(struct device *parent, struct device *self, void *aux) { struct ws_softc *sc = (struct ws_softc *)self; struct sio_softc *siosc = (struct sio_softc *)parent; struct sio_attach_args *args = aux; int channel = args->channel; struct wskbddev_attach_args a; sc->sc_ctl = &siosc->sc_ctl[channel]; memcpy(sc->sc_wr, ch1_regs, sizeof(ch1_regs)); siosc->sc_intrhand[channel].ih_func = wsintr; siosc->sc_intrhand[channel].ih_arg = sc; setsioreg(sc->sc_ctl, WR0, sc->sc_wr[WR0]); setsioreg(sc->sc_ctl, WR4, sc->sc_wr[WR4]); setsioreg(sc->sc_ctl, WR3, sc->sc_wr[WR3]); setsioreg(sc->sc_ctl, WR5, sc->sc_wr[WR5]); setsioreg(sc->sc_ctl, WR0, sc->sc_wr[WR0]); setsioreg(sc->sc_ctl, WR1, sc->sc_wr[WR1]); syscnputc((dev_t)1, 0x20); /* keep quiet mouse */ sc->sc_rxqhead = 0; sc->sc_rxqtail = 0; sc->sc_si = softintr_establish(IPL_SOFTTTY, wssoftintr, sc); printf("\n"); a.console = (args->hwflags == 1); a.keymap = &omkbd_keymapdata; a.accessops = &omkbd_accessops; a.accesscookie = (void *)sc; sc->sc_wskbddev = config_found_sm(self, &a, wskbddevprint, ws_submatch_kbd); #if NWSMOUSE > 0 { struct wsmousedev_attach_args b; b.accessops = &omms_accessops; b.accesscookie = (void *)sc; sc->sc_wsmousedev = config_found_sm(self, &b, wsmousedevprint, ws_submatch_mouse); sc->sc_msreport = 0; } #endif } int ws_submatch_kbd(struct device *parent, void *match, void *aux) { struct cfdata *cf = match; if (strcmp(cf->cf_driver->cd_name, "wskbd")) return (0); return ((*cf->cf_attach->ca_match)(parent, cf, aux)); } #if NWSMOUSE > 0 int ws_submatch_mouse(struct device *parent, void *match, void *aux) { struct cfdata *cf = match; if (strcmp(cf->cf_driver->cd_name, "wsmouse")) return (0); return ((*cf->cf_attach->ca_match)(parent, cf, aux)); } #endif void wsintr(void *arg) { struct ws_softc *sc = arg; struct sioreg *sio = sc->sc_ctl; u_int code; int rr; rr = getsiocsr(sio); if (rr & RR_RXRDY) { do { code = sio->sio_data; if (rr & (RR_FRAMING | RR_OVERRUN | RR_PARITY)) { sio->sio_cmd = WR0_ERRRST; continue; } sc->sc_rxq[sc->sc_rxqtail] = code; sc->sc_rxqtail = OMKBD_NEXTRXQ(sc->sc_rxqtail); } while ((rr = getsiocsr(sio)) & RR_RXRDY); softintr_schedule(sc->sc_si); } if (rr & RR_TXRDY) sio->sio_cmd = WR0_RSTPEND; /* not capable of transmit, yet */ } void wssoftintr(void *arg) { struct ws_softc *sc = arg; uint8_t code; while (sc->sc_rxqhead != sc->sc_rxqtail) { code = sc->sc_rxq[sc->sc_rxqhead]; sc->sc_rxqhead = OMKBD_NEXTRXQ(sc->sc_rxqhead); #if NWSMOUSE > 0 /* * if (code >= 0x80 && code <= 0x87), then * it's the first byte of 3 byte long mouse report * code[0] & 07 -> LMR button condition * code[1], [2] -> x,y delta * otherwise, key press or release event. */ if (sc->sc_msreport == 0) { if (code < 0x80 || code > 0x87) { omkbd_input(sc, code); continue; } code = (code & 07) ^ 07; /* LMR->RML: wsevent counts 0 for leftmost */ sc->sc_msbuttons = (code & 02); if ((code & 01) != 0) sc->sc_msbuttons |= 04; if ((code & 04) != 0) sc->sc_msbuttons |= 01; sc->sc_msreport = 1; } else if (sc->sc_msreport == 1) { sc->sc_msdx = (int8_t)code; sc->sc_msreport = 2; } else if (sc->sc_msreport == 2) { sc->sc_msdy = (int8_t)code; WSMOUSE_INPUT(sc->sc_wsmousedev, sc->sc_msbuttons, sc->sc_msdx, sc->sc_msdy, 0, 0); sc->sc_msreport = 0; } #else omkbd_input(sc, code); #endif } } void omkbd_input(void *v, int data) { struct ws_softc *sc = v; u_int type; int key; omkbd_decode(v, data, &type, &key); #if WSDISPLAY_COMPAT_RAWKBD if (sc->sc_rawkbd) { u_char cbuf[2]; int c, j = 0; c = omkbd_raw[key]; if (c != RAWKEY_Null) { /* fake extended scancode if necessary */ if (c & 0x80) cbuf[j++] = 0xe0; cbuf[j] = c & 0x7f; if (type == WSCONS_EVENT_KEY_UP) cbuf[j] |= 0x80; j++; wskbd_rawinput(sc->sc_wskbddev, cbuf, j); } } else #endif { if (sc->sc_wskbddev != NULL) wskbd_input(sc->sc_wskbddev, type, key); } } void omkbd_decode(void *v, int datain, u_int *type, int *dataout) { *type = (datain & 0x80) ? WSCONS_EVENT_KEY_UP : WSCONS_EVENT_KEY_DOWN; *dataout = datain & 0x7f; } void ws_cngetc(void *v, u_int *type, int *data) { int code; code = syscngetc((dev_t)1); omkbd_decode(v, code, type, data); } void ws_cnpollc(void *v, int on) { } /* EXPORT */ void ws_cnattach() { static int voidfill; /* XXX need CH.B initialization XXX */ wskbd_cnattach(&ws_consops, &voidfill, &omkbd_keymapdata); } int omkbd_enable(void *v, int on) { return 0; } void omkbd_set_leds(void *v, int leds) { #if 0 syscnputc((dev_t)1, 0x10); /* kana LED on */ syscnputc((dev_t)1, 0x00); /* kana LED off */ syscnputc((dev_t)1, 0x11); /* caps LED on */ syscnputc((dev_t)1, 0x01); /* caps LED off */ #endif } int omkbd_ioctl(void *v, u_long cmd, caddr_t data, int flag, struct proc *p) { #if WSDISPLAY_COMPAT_RAWKBD struct ws_softc *sc = v; #endif switch (cmd) { case WSKBDIO_GTYPE: *(int *)data = WSKBD_TYPE_LUNA; return 0; case WSKBDIO_SETLEDS: case WSKBDIO_GETLEDS: case WSKBDIO_COMPLEXBELL: /* XXX capable of complex bell */ return -1; #if WSDISPLAY_COMPAT_RAWKBD case WSKBDIO_SETMODE: sc->sc_rawkbd = *(int *)data == WSKBD_RAW; return 0; case WSKBDIO_GETMODE: *(int *)data = sc->sc_rawkbd; return 0; #endif } return -1; } #if NWSMOUSE > 0 int omms_enable(void *v) { struct ws_softc *sc = v; syscnputc((dev_t)1, 0x60); /* enable 3 byte long mouse reporting */ sc->sc_msreport = 0; return 0; } /*ARGUSED*/ int omms_ioctl(void *v, u_long cmd, caddr_t data, int flag, struct proc *p) { switch (cmd) { case WSMOUSEIO_GTYPE: *(u_int *)data = WSMOUSE_TYPE_LUNA; return 0; } return -1; } void omms_disable(void *v) { struct ws_softc *sc = v; syscnputc((dev_t)1, 0x20); /* quiet mouse */ sc->sc_msreport = 0; } #endif