Home | History | Annotate | Line # | Download | only in maple
mkbd.c revision 1.13
      1 /*	$NetBSD: mkbd.c,v 1.13 2002/03/25 18:59:40 uch Exp $	*/
      2 
      3 /*-
      4  * Copyright (c) 2001 Marcus Comstedt
      5  * All rights reserved.
      6  *
      7  * Redistribution and use in source and binary forms, with or without
      8  * modification, are permitted provided that the following conditions
      9  * are met:
     10  * 1. Redistributions of source code must retain the above copyright
     11  *    notice, this list of conditions and the following disclaimer.
     12  * 2. Redistributions in binary form must reproduce the above copyright
     13  *    notice, this list of conditions and the following disclaimer in the
     14  *    documentation and/or other materials provided with the distribution.
     15  * 3. All advertising materials mentioning features or use of this software
     16  *    must display the following acknowledgement:
     17  *	This product includes software developed by Marcus Comstedt.
     18  * 4. Neither the name of The NetBSD Foundation nor the names of its
     19  *    contributors may be used to endorse or promote products derived
     20  *    from this software without specific prior written permission.
     21  *
     22  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     23  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     24  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     25  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     26  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     27  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     28  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     29  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     30  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     31  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     32  * POSSIBILITY OF SUCH DAMAGE.
     33  */
     34 
     35 #include <sys/param.h>
     36 #include <sys/device.h>
     37 #include <sys/fcntl.h>
     38 #include <sys/poll.h>
     39 #include <sys/select.h>
     40 #include <sys/proc.h>
     41 #include <sys/signalvar.h>
     42 #include <sys/systm.h>
     43 
     44 #include "wskbd.h"
     45 
     46 #include <dev/wscons/wsconsio.h>
     47 #include <dev/wscons/wskbdvar.h>
     48 #include <dev/wscons/wsksymdef.h>
     49 #include <dev/wscons/wsksymvar.h>
     50 
     51 #include <machine/cpu.h>
     52 #include <machine/bus.h>
     53 
     54 #include <dreamcast/dev/maple/maple.h>
     55 #include <dreamcast/dev/maple/mapleconf.h>
     56 #include <dreamcast/dev/maple/mkbdvar.h>
     57 #include <dreamcast/dev/maple/mkbdmap.h>
     58 
     59 /*
     60  * Function declarations.
     61  */
     62 static	int mkbdmatch(struct device *, struct cfdata *, void *);
     63 static	void mkbdattach(struct device *, struct device *, void *);
     64 
     65 int	mkbd_enable(void *, int);
     66 void	mkbd_set_leds(void *, int);
     67 int	mkbd_ioctl(void *, u_long, caddr_t, int, struct proc *);
     68 
     69 struct wskbd_accessops mkbd_accessops = {
     70 	mkbd_enable,
     71 	mkbd_set_leds,
     72 	mkbd_ioctl,
     73 };
     74 
     75 static void mkbd_intr(struct mkbd_softc *, struct mkbd_condition *, int);
     76 
     77 void	mkbd_cngetc(void *, u_int *, int *);
     78 void	mkbd_cnpollc(void *, int);
     79 int	mkbd_cnattach(void);
     80 
     81 struct wskbd_consops mkbd_consops = {
     82 	mkbd_cngetc,
     83 	mkbd_cnpollc,
     84 };
     85 
     86 struct wskbd_mapdata mkbd_keymapdata = {
     87 	mkbd_keydesctab,
     88 	KB_JP,
     89 };
     90 
     91 static struct mkbd_softc *mkbd_console_softc = NULL;
     92 
     93 static int mkbd_console_initted = 0;
     94 
     95 /* Driver definition. */
     96 struct cfattach mkbd_ca = {
     97 	sizeof(struct mkbd_softc), mkbdmatch, mkbdattach
     98 };
     99 
    100 static int
    101 mkbdmatch(struct device *parent, struct cfdata *cf, void *aux)
    102 {
    103 	struct maple_attach_args *ma = aux;
    104 
    105 	return ((ma->ma_function & MAPLE_FUNC_KEYBOARD) != 0);
    106 }
    107 
    108 static void
    109 mkbdattach(struct device *parent, struct device *self, void *aux)
    110 {
    111 	struct mkbd_softc *sc = (struct mkbd_softc *) self;
    112 	struct maple_attach_args *ma = aux;
    113 #if NWSKBD > 0
    114 	struct wskbddev_attach_args a;
    115 #endif
    116 	u_int32_t kbdtype;
    117 
    118 	sc->sc_parent = parent;
    119 	sc->sc_port = ma->ma_port;
    120 	sc->sc_subunit = ma->ma_subunit;
    121 
    122 	kbdtype = maple_get_function_data(ma->ma_devinfo,
    123 	    MAPLE_FUNC_KEYBOARD) >> 24;
    124 	switch (kbdtype) {
    125 	case 1:
    126 		printf(": Japanese keyboard");
    127 		mkbd_keymapdata.layout = KB_JP;
    128 		break;
    129 	case 2:
    130 		printf(": US keyboard");
    131 		mkbd_keymapdata.layout = KB_US;
    132 		break;
    133 	case 3:
    134 		printf(": European keyboard");
    135 		mkbd_keymapdata.layout = KB_UK;
    136 		break;
    137 	default:
    138 		printf(": Unknown keyboard %d", kbdtype);
    139 	}
    140 	printf("\n");
    141 
    142 #if NWSKBD > 0
    143 	a.console = ((sc->sc_dev.dv_unit == 0) && (mkbd_console_initted == 1))
    144 	    ? 1 : 0;
    145 	a.keymap = &mkbd_keymapdata;
    146 	a.accessops = &mkbd_accessops;
    147 	a.accesscookie = sc;
    148 	if (a.console)
    149 		mkbd_console_softc = sc;
    150 	sc->sc_wskbddev = config_found(self, &a, wskbddevprint);
    151 #endif
    152 
    153 	maple_set_condition_callback(parent, sc->sc_port, sc->sc_subunit,
    154 	    MAPLE_FUNC_KEYBOARD,(void (*) (void *, void *, int)) mkbd_intr, sc);
    155 }
    156 
    157 
    158 
    159 int
    160 mkbd_enable(void *v, int on)
    161 {
    162 
    163 	return (0);
    164 }
    165 
    166 void
    167 mkbd_set_leds(void *v, int on)
    168 {
    169 }
    170 
    171 int
    172 mkbd_ioctl(void *v, u_long cmd, caddr_t data, int flag, struct proc *p)
    173 {
    174 
    175 	switch (cmd) {
    176 	case WSKBDIO_GTYPE:
    177 		*(int *) data = WSKBD_TYPE_USB;	/* XXX */
    178 		return (0);
    179 	case WSKBDIO_SETLEDS:
    180 		return (0);
    181 	case WSKBDIO_GETLEDS:
    182 		*(int *) data = 0;
    183 		return (0);
    184 	case WSKBDIO_BELL:
    185 	case WSKBDIO_COMPLEXBELL:
    186 		return (0);
    187 	}
    188 
    189 	return (EPASSTHROUGH);
    190 }
    191 
    192 int
    193 mkbd_cnattach()
    194 {
    195 
    196 	wskbd_cnattach(&mkbd_consops, NULL, &mkbd_keymapdata);
    197 	mkbd_console_initted = 1;
    198 
    199 	return (0);
    200 }
    201 
    202 static int polledkey;
    203 extern int maple_polling;
    204 
    205 #define SHIFT_KEYCODE_BASE 0xe0
    206 #define UP_KEYCODE_FLAG 0x1000
    207 
    208 #define KEY_UP(n) do {							\
    209 	if (maple_polling)						\
    210 		polledkey = (n)|UP_KEYCODE_FLAG;			\
    211 	else								\
    212 		wskbd_input(sc->sc_wskbddev, WSCONS_EVENT_KEY_UP, (n));	\
    213 	} while (/*CONSTCOND*/0)
    214 
    215 #define KEY_DOWN(n) do {						\
    216 	if (maple_polling)						\
    217 		polledkey = (n);					\
    218 	else								\
    219 		wskbd_input(sc->sc_wskbddev, WSCONS_EVENT_KEY_DOWN, (n)); \
    220 	} while (/*CONSTCOND*/0)
    221 
    222 #define SHIFT_UP(n)	KEY_UP((n) | SHIFT_KEYCODE_BASE)
    223 #define SHIFT_DOWN(n)	KEY_DOWN((n) | SHIFT_KEYCODE_BASE)
    224 
    225 static void
    226 mkbd_intr(struct mkbd_softc *sc, struct mkbd_condition *kbddata, int sz)
    227 {
    228 
    229 	if (sz >= sizeof(struct mkbd_condition)) {
    230 		int i, j, v;
    231 
    232 		v = sc->sc_condition.shift & ~kbddata->shift;
    233 		if (v)
    234 			for (i = 0; i < 8; i++)
    235 				if (v & (1 << i))
    236 					SHIFT_UP(i);
    237 
    238 		v = kbddata->shift & ~sc->sc_condition.shift;
    239 		if (v)
    240 			for (i = 0; i < 8; i++)
    241 				if (v & (1 << i))
    242 					SHIFT_DOWN(i);
    243 
    244 		for (i = 0, j = 0; i < 6; i++)
    245 			if (sc->sc_condition.key[i] < 4)
    246 				break;
    247 			else if (sc->sc_condition.key[i] == kbddata->key[j])
    248 				j++;
    249 			else
    250 				KEY_UP(sc->sc_condition.key[i]);
    251 
    252 		for (; j < 6; j++)
    253 			if (kbddata->key[j] < 4)
    254 				break;
    255 			else
    256 				KEY_DOWN(kbddata->key[j]);
    257 
    258 		memcpy(&sc->sc_condition, kbddata,
    259 		    sizeof(struct mkbd_condition));
    260 	}
    261 }
    262 
    263 void
    264 mkbd_cngetc(void *v, u_int *type,int *data)
    265 {
    266 	int key;
    267 
    268 	polledkey = -1;
    269 	maple_polling = 1;
    270 	while (polledkey == -1) {
    271 		if (mkbd_console_softc != NULL ||
    272 		    mkbd_console_softc->sc_parent != NULL) {
    273 			int t;
    274 			for (t = 0; t < 1000000; t++);
    275 			maple_run_polling(mkbd_console_softc->sc_parent);
    276 		}
    277 	}
    278 	maple_polling = 0;
    279 	key = polledkey;
    280 
    281 	*data = key & ~UP_KEYCODE_FLAG;
    282 	*type = (key & UP_KEYCODE_FLAG) ?
    283 	    WSCONS_EVENT_KEY_UP : WSCONS_EVENT_KEY_DOWN;
    284 }
    285 
    286 void
    287 mkbd_cnpollc(void *v, int on)
    288 {
    289 }
    290