Home | History | Annotate | Line # | Download | only in dec
dzkbd.c revision 1.18 
      1 /*	$NetBSD: dzkbd.c,v 1.18 2007/07/14 17:23:21 ad Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 1992, 1993
      5  *	The Regents of the University of California.  All rights reserved.
      6  *
      7  * This software was developed by the Computer Systems Engineering group
      8  * at Lawrence Berkeley Laboratory under DARPA contract BG 91-66 and
      9  * contributed to Berkeley.
     10  *
     11  * All advertising materials mentioning features or use of this software
     12  * must display the following acknowledgement:
     13  *	This product includes software developed by the University of
     14  *	California, Lawrence Berkeley Laboratory.
     15  *
     16  * Redistribution and use in source and binary forms, with or without
     17  * modification, are permitted provided that the following conditions
     18  * are met:
     19  * 1. Redistributions of source code must retain the above copyright
     20  *    notice, this list of conditions and the following disclaimer.
     21  * 2. Redistributions in binary form must reproduce the above copyright
     22  *    notice, this list of conditions and the following disclaimer in the
     23  *    documentation and/or other materials provided with the distribution.
     24  * 3. Neither the name of the University nor the names of its contributors
     25  *    may be used to endorse or promote products derived from this software
     26  *    without specific prior written permission.
     27  *
     28  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     29  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     30  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     31  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     32  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     33  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     34  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     35  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     36  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     37  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     38  * SUCH DAMAGE.
     39  *
     40  *	@(#)kbd.c	8.2 (Berkeley) 10/30/93
     41  */
     42 
     43 /*
     44  * LK200/LK400 keyboard attached to line 0 of the DZ*-11
     45  */
     46 
     47 #include <sys/cdefs.h>
     48 __KERNEL_RCSID(0, "$NetBSD: dzkbd.c,v 1.18 2007/07/14 17:23:21 ad Exp $");
     49 
     50 #include <sys/param.h>
     51 #include <sys/systm.h>
     52 #include <sys/device.h>
     53 #include <sys/ioctl.h>
     54 #include <sys/syslog.h>
     55 #include <sys/malloc.h>
     56 
     57 #include <dev/wscons/wsconsio.h>
     58 #include <dev/wscons/wskbdvar.h>
     59 #include <dev/wscons/wsksymdef.h>
     60 #include <dev/wscons/wsksymvar.h>
     61 #include <dev/dec/wskbdmap_lk201.h>
     62 
     63 #include <machine/bus.h>
     64 
     65 #include <dev/dec/dzreg.h>
     66 #include <dev/dec/dzvar.h>
     67 #include <dev/dec/dzkbdvar.h>
     68 #include <dev/dec/lk201reg.h>
     69 #include <dev/dec/lk201var.h>
     70 
     71 #include "locators.h"
     72 
     73 struct dzkbd_internal {
     74 	struct dz_linestate *dzi_ls;
     75 	struct lk201_state dzi_ks;
     76 };
     77 
     78 struct dzkbd_internal dzkbd_console_internal;
     79 
     80 struct dzkbd_softc {
     81 	struct device dzkbd_dev;	/* required first: base device */
     82 
     83 	struct dzkbd_internal *sc_itl;
     84 
     85 	int sc_enabled;
     86 	int kbd_type;
     87 
     88 	struct device *sc_wskbddev;
     89 };
     90 
     91 static int	dzkbd_input(void *, int);
     92 
     93 static int	dzkbd_match(struct device *, struct cfdata *, void *);
     94 static void	dzkbd_attach(struct device *, struct device *, void *);
     95 
     96 CFATTACH_DECL(dzkbd, sizeof(struct dzkbd_softc),
     97     dzkbd_match, dzkbd_attach, NULL, NULL);
     98 
     99 static int	dzkbd_enable(void *, int);
    100 static void	dzkbd_set_leds(void *, int);
    101 static int	dzkbd_ioctl(void *, u_long, void *, int, struct lwp *);
    102 
    103 const struct wskbd_accessops dzkbd_accessops = {
    104 	dzkbd_enable,
    105 	dzkbd_set_leds,
    106 	dzkbd_ioctl,
    107 };
    108 
    109 static void	dzkbd_cngetc(void *, u_int *, int *);
    110 static void	dzkbd_cnpollc(void *, int);
    111 
    112 const struct wskbd_consops dzkbd_consops = {
    113 	dzkbd_cngetc,
    114 	dzkbd_cnpollc,
    115 };
    116 
    117 static int dzkbd_sendchar(void *, u_char);
    118 
    119 const struct wskbd_mapdata dzkbd_keymapdata = {
    120 	lkkbd_keydesctab,
    121 #ifdef DZKBD_LAYOUT
    122 	DZKBD_LAYOUT,
    123 #else
    124 	KB_US | KB_LK401,
    125 #endif
    126 };
    127 
    128 /*
    129  * kbd_match: how is this dz line configured?
    130  */
    131 static int
    132 dzkbd_match(struct device *parent, struct cfdata *cf, void *aux)
    133 {
    134 	struct dzkm_attach_args *daa = aux;
    135 
    136 	/* Exact match is better than wildcard. */
    137 	if (cf->cf_loc[DZCF_LINE] == daa->daa_line)
    138 		return 2;
    139 
    140 	/* This driver accepts wildcard. */
    141 	if (cf->cf_loc[DZCF_LINE] == DZCF_LINE_DEFAULT)
    142 		return 1;
    143 
    144 	return 0;
    145 }
    146 
    147 static void
    148 dzkbd_attach(struct device *parent, struct device *self, void *aux)
    149 {
    150 	struct dz_softc *dz = device_private(parent);
    151 	struct dzkbd_softc *dzkbd = device_private(self);
    152 	struct dzkm_attach_args *daa = aux;
    153 	struct dz_linestate *ls;
    154 	struct dzkbd_internal *dzi;
    155 	struct wskbddev_attach_args a;
    156 	int isconsole;
    157 
    158 	dz->sc_dz[daa->daa_line].dz_catch = dzkbd_input;
    159 	dz->sc_dz[daa->daa_line].dz_private = dzkbd;
    160 	ls = &dz->sc_dz[daa->daa_line];
    161 
    162 	isconsole = (daa->daa_flags & DZKBD_CONSOLE);
    163 
    164 	if (isconsole) {
    165 		dzi = &dzkbd_console_internal;
    166 	} else {
    167 		dzi = malloc(sizeof(struct dzkbd_internal),
    168 				       M_DEVBUF, M_NOWAIT);
    169 		dzi->dzi_ks.attmt.sendchar = dzkbd_sendchar;
    170 		dzi->dzi_ks.attmt.cookie = ls;
    171 	}
    172 	dzi->dzi_ls = ls;
    173 	dzkbd->sc_itl = dzi;
    174 
    175 	printf("\n");
    176 
    177 	if (!isconsole) {
    178 		DELAY(100000);
    179 		lk201_init(&dzi->dzi_ks);
    180 	}
    181 
    182 	/* XXX should identify keyboard ID here XXX */
    183 	/* XXX layout and the number of LED is varying XXX */
    184 
    185 	dzkbd->kbd_type = WSKBD_TYPE_LK201;
    186 
    187 	dzkbd->sc_enabled = 1;
    188 
    189 	a.console = isconsole;
    190 	a.keymap = &dzkbd_keymapdata;
    191 	a.accessops = &dzkbd_accessops;
    192 	a.accesscookie = dzkbd;
    193 
    194 	dzkbd->sc_wskbddev = config_found(self, &a, wskbddevprint);
    195 }
    196 
    197 int
    198 dzkbd_cnattach(ls)
    199 	struct dz_linestate *ls;
    200 {
    201 
    202 	dzkbd_console_internal.dzi_ks.attmt.sendchar = dzkbd_sendchar;
    203 	dzkbd_console_internal.dzi_ks.attmt.cookie = ls;
    204 	lk201_init(&dzkbd_console_internal.dzi_ks);
    205 	dzkbd_console_internal.dzi_ls = ls;
    206 
    207 	wskbd_cnattach(&dzkbd_consops, &dzkbd_console_internal,
    208 		       &dzkbd_keymapdata);
    209 
    210 	return 0;
    211 }
    212 
    213 static int
    214 dzkbd_enable(v, on)
    215 	void *v;
    216 	int on;
    217 {
    218 	struct dzkbd_softc *sc = v;
    219 
    220 	sc->sc_enabled = on;
    221 	return 0;
    222 }
    223 
    224 static int
    225 dzkbd_sendchar(v, c)
    226 	void *v;
    227 	u_char c;
    228 {
    229 	struct dz_linestate *ls = v;
    230 	int s;
    231 
    232 	s = spltty();
    233 	dzputc(ls, c);
    234 	splx(s);
    235 	return (0);
    236 }
    237 
    238 static void
    239 dzkbd_cngetc(v, type, data)
    240 	void *v;
    241 	u_int *type;
    242 	int *data;
    243 {
    244 	struct dzkbd_internal *dzi = v;
    245 	int c;
    246 
    247 	do {
    248 		c = dzgetc(dzi->dzi_ls);
    249 	} while (!lk201_decode(&dzi->dzi_ks, c, type, data));
    250 }
    251 
    252 static void
    253 dzkbd_cnpollc(v, on)
    254 	void *v;
    255         int on;
    256 {
    257 #if 0
    258 	struct dzkbd_internal *dzi = v;
    259 #endif
    260 }
    261 
    262 static void
    263 dzkbd_set_leds(v, leds)
    264 	void *v;
    265 	int leds;
    266 {
    267 	struct dzkbd_softc *sc = (struct dzkbd_softc *)v;
    268 
    269 //printf("dzkbd_set_leds\n");
    270 	lk201_set_leds(&sc->sc_itl->dzi_ks, leds);
    271 }
    272 
    273 static int
    274 dzkbd_ioctl(v, cmd, data, flag, l)
    275 	void *v;
    276 	u_long cmd;
    277 	void *data;
    278 	int flag;
    279 	struct lwp *l;
    280 {
    281 	struct dzkbd_softc *sc = (struct dzkbd_softc *)v;
    282 
    283 	switch (cmd) {
    284 	case WSKBDIO_GTYPE:
    285 		*(int *)data = sc->kbd_type;
    286 		return 0;
    287 	case WSKBDIO_SETLEDS:
    288 		lk201_set_leds(&sc->sc_itl->dzi_ks, *(int *)data);
    289 		return 0;
    290 	case WSKBDIO_GETLEDS:
    291 		/* XXX don't dig in kbd internals */
    292 		*(int *)data = sc->sc_itl->dzi_ks.leds_state;
    293 		return 0;
    294 	case WSKBDIO_COMPLEXBELL:
    295 		lk201_bell(&sc->sc_itl->dzi_ks,
    296 			   (struct wskbd_bell_data *)data);
    297 		return 0;
    298 	case WSKBDIO_SETKEYCLICK:
    299 		lk201_set_keyclick(&sc->sc_itl->dzi_ks, *(int *)data);
    300 		return 0;
    301 	case WSKBDIO_GETKEYCLICK:
    302 		/* XXX don't dig in kbd internals */
    303 		*(int *)data = sc->sc_itl->dzi_ks.kcvol;
    304 		return 0;
    305 	}
    306 	return (EPASSTHROUGH);
    307 }
    308 
    309 static int
    310 dzkbd_input(v, data)
    311 	void *v;
    312 	int data;
    313 {
    314 	struct dzkbd_softc *sc = (struct dzkbd_softc *)v;
    315 	u_int type;
    316 	int val;
    317 
    318 	if (sc->sc_enabled == 0)
    319 		return(0);
    320 
    321 	if (lk201_decode(&sc->sc_itl->dzi_ks, data, &type, &val))
    322 		wskbd_input(sc->sc_wskbddev, type, val);
    323 	return(1);
    324 }
    325 
    326