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