Home | History | Annotate | Line # | Download | only in adb
adb_kbd.c revision 1.16
      1  1.16  macallan /*	$NetBSD: adb_kbd.c,v 1.16 2011/11/16 06:56:49 macallan Exp $	*/
      2   1.1  macallan 
      3   1.1  macallan /*
      4   1.1  macallan  * Copyright (C) 1998	Colin Wood
      5   1.4  macallan  * Copyright (C) 2006, 2007 Michael Lorenz
      6   1.1  macallan  * All rights reserved.
      7   1.1  macallan  *
      8   1.1  macallan  * Redistribution and use in source and binary forms, with or without
      9   1.1  macallan  * modification, are permitted provided that the following conditions
     10   1.1  macallan  * are met:
     11   1.1  macallan  * 1. Redistributions of source code must retain the above copyright
     12   1.1  macallan  *    notice, this list of conditions and the following disclaimer.
     13   1.1  macallan  * 2. Redistributions in binary form must reproduce the above copyright
     14   1.1  macallan  *    notice, this list of conditions and the following disclaimer in the
     15   1.1  macallan  *    documentation and/or other materials provided with the distribution.
     16   1.1  macallan  * 3. All advertising materials mentioning features or use of this software
     17   1.1  macallan  *    must display the following acknowledgement:
     18   1.1  macallan  *	This product includes software developed by Colin Wood.
     19   1.1  macallan  * 4. The name of the author may not be used to endorse or promote products
     20   1.1  macallan  *    derived from this software without specific prior written permission.
     21   1.1  macallan  *
     22   1.1  macallan  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     23   1.1  macallan  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     24   1.1  macallan  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     25   1.1  macallan  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     26   1.1  macallan  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     27   1.1  macallan  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     28   1.1  macallan  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     29   1.1  macallan  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     30   1.1  macallan  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
     31   1.1  macallan  * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     32   1.1  macallan  */
     33   1.1  macallan 
     34   1.1  macallan #include <sys/cdefs.h>
     35  1.16  macallan __KERNEL_RCSID(0, "$NetBSD: adb_kbd.c,v 1.16 2011/11/16 06:56:49 macallan Exp $");
     36   1.1  macallan 
     37   1.1  macallan #include <sys/param.h>
     38   1.1  macallan #include <sys/device.h>
     39   1.1  macallan #include <sys/fcntl.h>
     40   1.1  macallan #include <sys/poll.h>
     41   1.1  macallan #include <sys/select.h>
     42   1.1  macallan #include <sys/proc.h>
     43   1.1  macallan #include <sys/systm.h>
     44   1.1  macallan #include <sys/kernel.h>
     45   1.1  macallan #include <sys/sysctl.h>
     46   1.1  macallan 
     47   1.1  macallan #include <dev/wscons/wsconsio.h>
     48   1.1  macallan #include <dev/wscons/wskbdvar.h>
     49   1.1  macallan #include <dev/wscons/wsksymdef.h>
     50   1.1  macallan #include <dev/wscons/wsksymvar.h>
     51   1.1  macallan #include <dev/wscons/wsmousevar.h>
     52   1.1  macallan 
     53   1.3  macallan #include <dev/sysmon/sysmonvar.h>
     54   1.3  macallan #include <dev/sysmon/sysmon_taskq.h>
     55   1.3  macallan 
     56   1.1  macallan #include <machine/autoconf.h>
     57   1.1  macallan #include <machine/keyboard.h>
     58   1.1  macallan #include <machine/adbsys.h>
     59   1.1  macallan 
     60   1.1  macallan #include <dev/adb/adbvar.h>
     61   1.1  macallan #include <dev/adb/adb_keymap.h>
     62   1.1  macallan 
     63   1.8  macallan #include "opt_wsdisplay_compat.h"
     64   1.1  macallan #include "adbdebug.h"
     65  1.11  macallan #include "wsmouse.h"
     66   1.1  macallan 
     67   1.1  macallan struct adbkbd_softc {
     68  1.12      matt 	device_t sc_dev;
     69   1.1  macallan 	struct adb_device *sc_adbdev;
     70   1.1  macallan 	struct adb_bus_accessops *sc_ops;
     71  1.12      matt 	device_t sc_wskbddev;
     72  1.11  macallan #if NWSMOUSE > 0
     73  1.12      matt 	device_t sc_wsmousedev;
     74  1.11  macallan #endif
     75   1.3  macallan 	struct sysmon_pswitch sc_sm_pbutton;
     76   1.1  macallan 	int sc_leds;
     77   1.1  macallan 	int sc_have_led_control;
     78  1.16  macallan 	int sc_power_button_delay;
     79   1.1  macallan 	int sc_msg_len;
     80   1.1  macallan 	int sc_event;
     81   1.1  macallan 	int sc_poll;
     82   1.1  macallan 	int sc_polled_chars;
     83   1.1  macallan 	int sc_trans[3];
     84   1.1  macallan 	int sc_capslock;
     85  1.10  macallan 	uint32_t sc_timestamp;
     86   1.1  macallan #ifdef WSDISPLAY_COMPAT_RAWKBD
     87   1.1  macallan 	int sc_rawkbd;
     88   1.1  macallan #endif
     89   1.1  macallan 	uint8_t sc_buffer[16];
     90   1.1  macallan 	uint8_t sc_pollbuf[16];
     91   1.1  macallan 	uint8_t sc_us;
     92   1.9  macallan 	uint8_t sc_power, sc_pe;
     93   1.1  macallan };
     94   1.1  macallan 
     95   1.1  macallan /*
     96   1.1  macallan  * Function declarations.
     97   1.1  macallan  */
     98  1.12      matt static int	adbkbd_match(device_t, cfdata_t, void *);
     99  1.12      matt static void	adbkbd_attach(device_t, device_t, void *);
    100   1.1  macallan 
    101   1.1  macallan static void	adbkbd_initleds(struct adbkbd_softc *);
    102   1.1  macallan static void	adbkbd_keys(struct adbkbd_softc *, uint8_t, uint8_t);
    103   1.1  macallan static inline void adbkbd_key(struct adbkbd_softc *, uint8_t);
    104   1.1  macallan static int	adbkbd_wait(struct adbkbd_softc *, int);
    105   1.1  macallan 
    106   1.1  macallan /* Driver definition. */
    107  1.12      matt CFATTACH_DECL_NEW(adbkbd, sizeof(struct adbkbd_softc),
    108   1.1  macallan     adbkbd_match, adbkbd_attach, NULL, NULL);
    109   1.1  macallan 
    110   1.8  macallan extern struct cfdriver adbkbd_cd;
    111   1.1  macallan 
    112   1.1  macallan static int adbkbd_enable(void *, int);
    113   1.5  christos static int adbkbd_ioctl(void *, u_long, void *, int, struct lwp *);
    114   1.1  macallan static void adbkbd_set_leds(void *, int);
    115   1.1  macallan static void adbkbd_handler(void *, int, uint8_t *);
    116   1.9  macallan static void adbkbd_powerbutton(void *);
    117   1.1  macallan 
    118   1.1  macallan struct wskbd_accessops adbkbd_accessops = {
    119   1.1  macallan 	adbkbd_enable,
    120   1.1  macallan 	adbkbd_set_leds,
    121   1.1  macallan 	adbkbd_ioctl,
    122   1.1  macallan };
    123   1.1  macallan 
    124   1.1  macallan static void adbkbd_cngetc(void *, u_int *, int *);
    125   1.1  macallan static void adbkbd_cnpollc(void *, int);
    126   1.1  macallan 
    127   1.1  macallan struct wskbd_consops adbkbd_consops = {
    128   1.1  macallan 	adbkbd_cngetc,
    129   1.1  macallan 	adbkbd_cnpollc,
    130   1.1  macallan };
    131   1.1  macallan 
    132   1.1  macallan struct wskbd_mapdata adbkbd_keymapdata = {
    133   1.1  macallan 	akbd_keydesctab,
    134   1.1  macallan #ifdef AKBD_LAYOUT
    135   1.1  macallan 	AKBD_LAYOUT,
    136   1.1  macallan #else
    137   1.1  macallan 	KB_US,
    138   1.1  macallan #endif
    139   1.1  macallan };
    140   1.1  macallan 
    141  1.11  macallan #if NWSMOUSE > 0
    142   1.1  macallan static int adbkms_enable(void *);
    143   1.5  christos static int adbkms_ioctl(void *, u_long, void *, int, struct lwp *);
    144   1.1  macallan static void adbkms_disable(void *);
    145   1.1  macallan 
    146   1.1  macallan const struct wsmouse_accessops adbkms_accessops = {
    147   1.1  macallan 	adbkms_enable,
    148   1.1  macallan 	adbkms_ioctl,
    149   1.1  macallan 	adbkms_disable,
    150   1.1  macallan };
    151   1.1  macallan 
    152  1.14  macallan static int  adbkbd_sysctl_mid(SYSCTLFN_ARGS);
    153  1.14  macallan static int  adbkbd_sysctl_right(SYSCTLFN_ARGS);
    154   1.1  macallan static void adbkbd_setup_sysctl(struct adbkbd_softc *);
    155   1.1  macallan 
    156  1.11  macallan #endif /* NWSMOUSE > 0 */
    157  1.11  macallan 
    158   1.1  macallan #ifdef ADBKBD_DEBUG
    159   1.1  macallan #define DPRINTF printf
    160   1.1  macallan #else
    161   1.1  macallan #define DPRINTF while (0) printf
    162   1.1  macallan #endif
    163   1.1  macallan 
    164   1.1  macallan static int adbkbd_is_console = 0;
    165   1.1  macallan static int adbkbd_console_attached = 0;
    166   1.1  macallan 
    167   1.1  macallan static int
    168  1.12      matt adbkbd_match(device_t parent, cfdata_t cf, void *aux)
    169   1.1  macallan {
    170   1.1  macallan 	struct adb_attach_args *aaa = aux;
    171   1.1  macallan 
    172   1.1  macallan 	if (aaa->dev->original_addr == ADBADDR_KBD)
    173   1.1  macallan 		return 1;
    174   1.1  macallan 	else
    175   1.1  macallan 		return 0;
    176   1.1  macallan }
    177   1.1  macallan 
    178   1.1  macallan static void
    179  1.12      matt adbkbd_attach(device_t parent, device_t self, void *aux)
    180   1.1  macallan {
    181  1.12      matt 	struct adbkbd_softc *sc = device_private(self);
    182   1.1  macallan 	struct adb_attach_args *aaa = aux;
    183   1.1  macallan 	short cmd;
    184   1.1  macallan 	struct wskbddev_attach_args a;
    185  1.11  macallan #if NWSMOUSE > 0
    186   1.1  macallan 	struct wsmousedev_attach_args am;
    187  1.11  macallan #endif
    188   1.1  macallan 
    189  1.12      matt 	sc->sc_dev = self;
    190   1.1  macallan 	sc->sc_ops = aaa->ops;
    191   1.1  macallan 	sc->sc_adbdev = aaa->dev;
    192   1.1  macallan 	sc->sc_adbdev->cookie = sc;
    193   1.1  macallan 	sc->sc_adbdev->handler = adbkbd_handler;
    194   1.1  macallan 	sc->sc_us = ADBTALK(sc->sc_adbdev->current_addr, 0);
    195   1.1  macallan 
    196   1.1  macallan 	sc->sc_leds = 0;	/* initially off */
    197   1.1  macallan 	sc->sc_have_led_control = 0;
    198  1.16  macallan 
    199  1.16  macallan 	/*
    200  1.16  macallan 	 * If this is != 0 then pushing the power button will not immadiately
    201  1.16  macallan 	 * send a shutdown event to sysmon but instead require another key
    202  1.16  macallan 	 * press within 5 seconds with a gap of at least two seconds. The
    203  1.16  macallan 	 * reason to do this is the fact that some PowerBook keyboards,
    204  1.16  macallan 	 * like the 2400, 3400 and original G3 have their power buttons
    205  1.16  macallan 	 * right next to the backspace key and it's extremely easy to hit
    206  1.16  macallan 	 * it by accident.
    207  1.16  macallan 	 * On most other keyboards the power button is sufficiently far out
    208  1.16  macallan 	 * of the way so we don't need this.
    209  1.16  macallan 	 */
    210  1.16  macallan 	sc->sc_power_button_delay = 0;
    211   1.1  macallan 	sc->sc_msg_len = 0;
    212   1.1  macallan 	sc->sc_poll = 0;
    213   1.1  macallan 	sc->sc_capslock = 0;
    214   1.1  macallan 	sc->sc_trans[1] = 103;	/* F11 */
    215   1.1  macallan 	sc->sc_trans[2] = 111;	/* F12 */
    216   1.6  macallan 	sc->sc_power = 0x7f;
    217  1.10  macallan 	sc->sc_timestamp = 0;
    218   1.1  macallan 
    219   1.7  macallan 	printf(" addr %d: ", sc->sc_adbdev->current_addr);
    220   1.1  macallan 
    221   1.1  macallan 	switch (sc->sc_adbdev->handler_id) {
    222   1.1  macallan 	case ADB_STDKBD:
    223   1.1  macallan 		printf("standard keyboard\n");
    224   1.1  macallan 		break;
    225   1.1  macallan 	case ADB_ISOKBD:
    226   1.1  macallan 		printf("standard keyboard (ISO layout)\n");
    227   1.1  macallan 		break;
    228   1.1  macallan 	case ADB_EXTKBD:
    229   1.1  macallan 		cmd = ADBTALK(sc->sc_adbdev->current_addr, 1);
    230   1.1  macallan 		sc->sc_msg_len = 0;
    231   1.1  macallan 		sc->sc_ops->send(sc->sc_ops->cookie, sc->sc_poll, cmd, 0, NULL);
    232   1.1  macallan 		adbkbd_wait(sc, 10);
    233   1.1  macallan 
    234   1.1  macallan 		/* Ignore Logitech MouseMan/Trackman pseudo keyboard */
    235   1.1  macallan 		/* XXX needs testing */
    236   1.1  macallan 		if (sc->sc_buffer[2] == 0x9a && sc->sc_buffer[3] == 0x20) {
    237   1.1  macallan 			printf("Mouseman (non-EMP) pseudo keyboard\n");
    238   1.1  macallan 			return;
    239   1.1  macallan 		} else if (sc->sc_buffer[2] == 0x9a &&
    240   1.1  macallan 		    sc->sc_buffer[3] == 0x21) {
    241   1.1  macallan 			printf("Trackman (non-EMP) pseudo keyboard\n");
    242   1.1  macallan 			return;
    243   1.1  macallan 		} else {
    244   1.1  macallan 			printf("extended keyboard\n");
    245   1.1  macallan 			adbkbd_initleds(sc);
    246   1.1  macallan 		}
    247   1.1  macallan 		break;
    248   1.1  macallan 	case ADB_EXTISOKBD:
    249   1.1  macallan 		printf("extended keyboard (ISO layout)\n");
    250   1.1  macallan 		adbkbd_initleds(sc);
    251   1.1  macallan 		break;
    252   1.1  macallan 	case ADB_KBDII:
    253   1.1  macallan 		printf("keyboard II\n");
    254   1.1  macallan 		break;
    255   1.1  macallan 	case ADB_ISOKBDII:
    256   1.1  macallan 		printf("keyboard II (ISO layout)\n");
    257   1.1  macallan 		break;
    258   1.1  macallan 	case ADB_PBKBD:
    259   1.1  macallan 		printf("PowerBook keyboard\n");
    260   1.6  macallan 		sc->sc_power = 0x7e;
    261  1.16  macallan 		sc->sc_power_button_delay = 1;
    262   1.1  macallan 		break;
    263   1.1  macallan 	case ADB_PBISOKBD:
    264   1.1  macallan 		printf("PowerBook keyboard (ISO layout)\n");
    265   1.6  macallan 		sc->sc_power = 0x7e;
    266  1.16  macallan 		sc->sc_power_button_delay = 1;
    267   1.1  macallan 		break;
    268   1.1  macallan 	case ADB_ADJKPD:
    269   1.1  macallan 		printf("adjustable keypad\n");
    270   1.1  macallan 		break;
    271   1.1  macallan 	case ADB_ADJKBD:
    272   1.1  macallan 		printf("adjustable keyboard\n");
    273   1.1  macallan 		break;
    274   1.1  macallan 	case ADB_ADJISOKBD:
    275   1.1  macallan 		printf("adjustable keyboard (ISO layout)\n");
    276   1.1  macallan 		break;
    277   1.1  macallan 	case ADB_ADJJAPKBD:
    278   1.1  macallan 		printf("adjustable keyboard (Japanese layout)\n");
    279   1.1  macallan 		break;
    280   1.1  macallan 	case ADB_PBEXTISOKBD:
    281   1.1  macallan 		printf("PowerBook extended keyboard (ISO layout)\n");
    282  1.16  macallan 		sc->sc_power_button_delay = 1;
    283   1.6  macallan 		sc->sc_power = 0x7e;
    284   1.1  macallan 		break;
    285   1.1  macallan 	case ADB_PBEXTJAPKBD:
    286   1.1  macallan 		printf("PowerBook extended keyboard (Japanese layout)\n");
    287  1.16  macallan 		sc->sc_power_button_delay = 1;
    288   1.6  macallan 		sc->sc_power = 0x7e;
    289   1.1  macallan 		break;
    290   1.1  macallan 	case ADB_JPKBDII:
    291   1.1  macallan 		printf("keyboard II (Japanese layout)\n");
    292   1.1  macallan 		break;
    293   1.1  macallan 	case ADB_PBEXTKBD:
    294   1.1  macallan 		printf("PowerBook extended keyboard\n");
    295  1.16  macallan 		sc->sc_power_button_delay = 1;
    296   1.6  macallan 		sc->sc_power = 0x7e;
    297   1.1  macallan 		break;
    298   1.1  macallan 	case ADB_DESIGNKBD:
    299   1.1  macallan 		printf("extended keyboard\n");
    300   1.1  macallan 		adbkbd_initleds(sc);
    301   1.1  macallan 		break;
    302   1.1  macallan 	case ADB_PBJPKBD:
    303   1.1  macallan 		printf("PowerBook keyboard (Japanese layout)\n");
    304  1.16  macallan 		sc->sc_power_button_delay = 1;
    305   1.6  macallan 		sc->sc_power = 0x7e;
    306   1.1  macallan 		break;
    307   1.1  macallan 	case ADB_PBG3KBD:
    308   1.1  macallan 		printf("PowerBook G3 keyboard\n");
    309   1.6  macallan 		sc->sc_power = 0x7e;
    310   1.1  macallan 		break;
    311   1.1  macallan 	case ADB_PBG3JPKBD:
    312   1.1  macallan 		printf("PowerBook G3 keyboard (Japanese layout)\n");
    313   1.6  macallan 		sc->sc_power = 0x7e;
    314   1.1  macallan 		break;
    315   1.1  macallan 	case ADB_IBOOKKBD:
    316   1.1  macallan 		printf("iBook keyboard\n");
    317   1.1  macallan 		break;
    318   1.1  macallan 	default:
    319   1.1  macallan 		printf("mapped device (%d)\n", sc->sc_adbdev->handler_id);
    320   1.1  macallan 		break;
    321   1.1  macallan 	}
    322   1.1  macallan 
    323   1.1  macallan 	if (adbkbd_is_console && (adbkbd_console_attached == 0)) {
    324   1.1  macallan 		wskbd_cnattach(&adbkbd_consops, sc, &adbkbd_keymapdata);
    325   1.1  macallan 		adbkbd_console_attached = 1;
    326   1.1  macallan 		a.console = 1;
    327   1.1  macallan 	} else {
    328   1.1  macallan 		a.console = 0;
    329   1.1  macallan 	}
    330   1.1  macallan 	a.keymap = &adbkbd_keymapdata;
    331   1.1  macallan 	a.accessops = &adbkbd_accessops;
    332   1.1  macallan 	a.accesscookie = sc;
    333   1.1  macallan 
    334   1.1  macallan 	sc->sc_wskbddev = config_found_ia(self, "wskbddev", &a, wskbddevprint);
    335   1.1  macallan 
    336  1.11  macallan #if NWSMOUSE > 0
    337   1.1  macallan 	/* attach the mouse device */
    338   1.1  macallan 	am.accessops = &adbkms_accessops;
    339   1.1  macallan 	am.accesscookie = sc;
    340  1.11  macallan 	sc->sc_wsmousedev = config_found_ia(self, "wsmousedev", &am,
    341  1.11  macallan 	    wsmousedevprint);
    342   1.1  macallan 
    343   1.1  macallan 	if (sc->sc_wsmousedev != NULL)
    344   1.1  macallan 		adbkbd_setup_sysctl(sc);
    345  1.11  macallan #endif
    346   1.3  macallan 
    347   1.3  macallan 	/* finally register the power button */
    348   1.3  macallan 	sysmon_task_queue_init();
    349   1.3  macallan 	memset(&sc->sc_sm_pbutton, 0, sizeof(struct sysmon_pswitch));
    350  1.12      matt 	sc->sc_sm_pbutton.smpsw_name = device_xname(sc->sc_dev);
    351   1.3  macallan 	sc->sc_sm_pbutton.smpsw_type = PSWITCH_TYPE_POWER;
    352   1.3  macallan 	if (sysmon_pswitch_register(&sc->sc_sm_pbutton) != 0)
    353  1.12      matt 		aprint_error_dev(sc->sc_dev,
    354  1.12      matt 		    "unable to register power button with sysmon\n");
    355   1.1  macallan }
    356   1.1  macallan 
    357   1.1  macallan static void
    358   1.1  macallan adbkbd_handler(void *cookie, int len, uint8_t *data)
    359   1.1  macallan {
    360   1.1  macallan 	struct adbkbd_softc *sc = cookie;
    361   1.1  macallan 
    362   1.1  macallan #ifdef ADBKBD_DEBUG
    363   1.1  macallan 	int i;
    364  1.12      matt 	printf("%s: %02x - ", device_xname(sc->sc_dev), sc->sc_us);
    365   1.1  macallan 	for (i = 0; i < len; i++) {
    366   1.1  macallan 		printf(" %02x", data[i]);
    367   1.1  macallan 	}
    368   1.1  macallan 	printf("\n");
    369   1.1  macallan #endif
    370   1.1  macallan 	if (len >= 2) {
    371   1.1  macallan 		if (data[1] == sc->sc_us) {
    372   1.1  macallan 			adbkbd_keys(sc, data[2], data[3]);
    373   1.1  macallan 			return;
    374   1.1  macallan 		} else {
    375   1.1  macallan 			memcpy(sc->sc_buffer, data, len);
    376   1.1  macallan 		}
    377   1.1  macallan 		sc->sc_msg_len = len;
    378   1.1  macallan 		wakeup(&sc->sc_event);
    379   1.1  macallan 	} else {
    380   1.1  macallan 		DPRINTF("bogus message\n");
    381   1.1  macallan 	}
    382   1.1  macallan }
    383   1.1  macallan 
    384   1.1  macallan static int
    385   1.1  macallan adbkbd_wait(struct adbkbd_softc *sc, int timeout)
    386   1.1  macallan {
    387   1.1  macallan 	int cnt = 0;
    388   1.1  macallan 
    389   1.1  macallan 	if (sc->sc_poll) {
    390   1.1  macallan 		while (sc->sc_msg_len == 0) {
    391   1.1  macallan 			sc->sc_ops->poll(sc->sc_ops->cookie);
    392   1.1  macallan 		}
    393   1.1  macallan 	} else {
    394   1.1  macallan 		while ((sc->sc_msg_len == 0) && (cnt < timeout)) {
    395   1.1  macallan 			tsleep(&sc->sc_event, 0, "adbkbdio", hz);
    396   1.1  macallan 			cnt++;
    397   1.1  macallan 		}
    398   1.1  macallan 	}
    399   1.1  macallan 	return (sc->sc_msg_len > 0);
    400   1.1  macallan }
    401   1.1  macallan 
    402   1.1  macallan static void
    403   1.1  macallan adbkbd_keys(struct adbkbd_softc *sc, uint8_t k1, uint8_t k2)
    404   1.1  macallan {
    405   1.3  macallan 
    406   1.1  macallan 	/* keyboard event processing */
    407   1.3  macallan 
    408   1.1  macallan 	DPRINTF("[%02x %02x]", k1, k2);
    409   1.3  macallan 
    410   1.6  macallan 	if (((k1 == k2) && (k1 == 0x7f)) || (k1 == sc->sc_power)) {
    411  1.10  macallan 		uint32_t now = time_second;
    412  1.10  macallan 		uint32_t diff = now - sc->sc_timestamp;
    413   1.3  macallan 
    414  1.10  macallan 		sc->sc_timestamp = now;
    415  1.16  macallan 		if (((diff > 1) && (diff < 5)) ||
    416  1.16  macallan 		     (sc->sc_power_button_delay == 0)) {
    417  1.10  macallan 
    418  1.10  macallan 			/* power button, report to sysmon */
    419  1.10  macallan 			sc->sc_pe = k1;
    420  1.10  macallan 
    421  1.10  macallan 			sysmon_task_queue_sched(0, adbkbd_powerbutton, sc);
    422  1.10  macallan 		}
    423   1.1  macallan 	} else {
    424   1.3  macallan 
    425   1.1  macallan 		adbkbd_key(sc, k1);
    426   1.1  macallan 		if (k2 != 0xff)
    427   1.1  macallan 			adbkbd_key(sc, k2);
    428   1.1  macallan 	}
    429   1.1  macallan }
    430   1.1  macallan 
    431   1.9  macallan static void
    432   1.9  macallan adbkbd_powerbutton(void *cookie)
    433   1.9  macallan {
    434   1.9  macallan 	struct adbkbd_softc *sc = cookie;
    435   1.9  macallan 
    436   1.9  macallan 	sysmon_pswitch_event(&sc->sc_sm_pbutton,
    437   1.9  macallan 	    ADBK_PRESS(sc->sc_pe) ? PSWITCH_EVENT_PRESSED :
    438   1.9  macallan 	    PSWITCH_EVENT_RELEASED);
    439   1.9  macallan }
    440   1.9  macallan 
    441   1.1  macallan static inline void
    442   1.1  macallan adbkbd_key(struct adbkbd_softc *sc, uint8_t k)
    443   1.1  macallan {
    444   1.1  macallan 
    445   1.1  macallan 	if (sc->sc_poll) {
    446   1.1  macallan 		if (sc->sc_polled_chars >= 16) {
    447  1.12      matt 			aprint_error_dev(sc->sc_dev,"polling buffer is full\n");
    448   1.1  macallan 		}
    449   1.1  macallan 		sc->sc_pollbuf[sc->sc_polled_chars] = k;
    450   1.1  macallan 		sc->sc_polled_chars++;
    451   1.1  macallan 		return;
    452   1.1  macallan 	}
    453   1.1  macallan 
    454  1.11  macallan #if NWSMOUSE > 0
    455   1.1  macallan 	/* translate some keys to mouse events */
    456   1.1  macallan 	if (sc->sc_wsmousedev != NULL) {
    457   1.1  macallan 		if (ADBK_KEYVAL(k) == sc->sc_trans[1]) {
    458   1.1  macallan 			wsmouse_input(sc->sc_wsmousedev, ADBK_PRESS(k) ? 2 : 0,
    459   1.1  macallan 			      0, 0, 0, 0,
    460   1.1  macallan 			      WSMOUSE_INPUT_DELTA);
    461   1.1  macallan 			return;
    462   1.1  macallan 		}
    463   1.1  macallan 		if (ADBK_KEYVAL(k) == sc->sc_trans[2]) {
    464   1.1  macallan 			wsmouse_input(sc->sc_wsmousedev, ADBK_PRESS(k) ? 4 : 0,
    465   1.1  macallan 			      0, 0, 0, 0,
    466   1.1  macallan 			      WSMOUSE_INPUT_DELTA);
    467   1.1  macallan 			return;
    468   1.1  macallan 		}
    469   1.1  macallan 	}
    470  1.11  macallan #endif
    471  1.11  macallan 
    472   1.1  macallan #ifdef WSDISPLAY_COMPAT_RAWKBD
    473   1.1  macallan 	if (sc->sc_rawkbd) {
    474   1.1  macallan 		char cbuf[2];
    475   1.1  macallan 		int s;
    476   1.1  macallan 
    477   1.8  macallan 		cbuf[0] = k;
    478   1.1  macallan 
    479   1.1  macallan 		s = spltty();
    480   1.8  macallan 		wskbd_rawinput(sc->sc_wskbddev, cbuf, 1);
    481   1.1  macallan 		splx(s);
    482   1.1  macallan 	} else {
    483   1.1  macallan #endif
    484   1.1  macallan 
    485   1.1  macallan 	if (ADBK_KEYVAL(k) == 0x39) {
    486   1.1  macallan 		/* caps lock - send up and down */
    487   1.1  macallan 		if (ADBK_PRESS(k) != sc->sc_capslock) {
    488   1.1  macallan 			sc->sc_capslock = ADBK_PRESS(k);
    489   1.1  macallan 			wskbd_input(sc->sc_wskbddev,
    490   1.1  macallan 			    WSCONS_EVENT_KEY_DOWN, 0x39);
    491   1.1  macallan 			wskbd_input(sc->sc_wskbddev,
    492   1.1  macallan 			    WSCONS_EVENT_KEY_UP, 0x39);
    493   1.1  macallan 		}
    494   1.1  macallan 	} else {
    495   1.1  macallan 		/* normal event */
    496   1.1  macallan 		int type;
    497   1.1  macallan 
    498   1.1  macallan 		type = ADBK_PRESS(k) ?
    499   1.1  macallan 		    WSCONS_EVENT_KEY_DOWN : WSCONS_EVENT_KEY_UP;
    500   1.1  macallan 		wskbd_input(sc->sc_wskbddev, type, ADBK_KEYVAL(k));
    501   1.1  macallan 	}
    502   1.1  macallan #ifdef WSDISPLAY_COMPAT_RAWKBD
    503   1.1  macallan 	}
    504   1.1  macallan #endif
    505   1.1  macallan }
    506   1.1  macallan 
    507   1.1  macallan /*
    508   1.1  macallan  * Set the keyboard LED's.
    509   1.1  macallan  *
    510   1.1  macallan  * Automatically translates from ioctl/softc format to the
    511   1.1  macallan  * actual keyboard register format
    512   1.1  macallan  */
    513   1.1  macallan static void
    514   1.1  macallan adbkbd_set_leds(void *cookie, int leds)
    515   1.1  macallan {
    516   1.1  macallan 	struct adbkbd_softc *sc = cookie;
    517   1.1  macallan 	int aleds;
    518   1.1  macallan 	short cmd;
    519   1.1  macallan 	uint8_t buffer[2];
    520   1.1  macallan 
    521   1.1  macallan 	DPRINTF("adbkbd_set_leds: %02x\n", leds);
    522   1.1  macallan 	if ((leds & 0x07) == (sc->sc_leds & 0x07))
    523   1.1  macallan 		return;
    524   1.1  macallan 
    525   1.1  macallan  	if (sc->sc_have_led_control) {
    526   1.1  macallan 
    527   1.1  macallan 		aleds = (~leds & 0x04) | 3;
    528   1.1  macallan 		if (leds & 1)
    529   1.1  macallan 			aleds &= ~2;
    530   1.1  macallan 		if (leds & 2)
    531   1.1  macallan 			aleds &= ~1;
    532   1.1  macallan 
    533   1.1  macallan 		buffer[0] = 0xff;
    534   1.1  macallan 		buffer[1] = aleds | 0xf8;
    535   1.1  macallan 
    536   1.1  macallan 		cmd = ADBLISTEN(sc->sc_adbdev->current_addr, 2);
    537  1.11  macallan 		sc->sc_ops->send(sc->sc_ops->cookie, sc->sc_poll, cmd, 2,
    538  1.11  macallan 		    buffer);
    539   1.1  macallan 	}
    540   1.1  macallan 
    541   1.1  macallan 	sc->sc_leds = leds & 7;
    542   1.1  macallan }
    543   1.1  macallan 
    544   1.1  macallan static void
    545   1.1  macallan adbkbd_initleds(struct adbkbd_softc *sc)
    546   1.1  macallan {
    547   1.1  macallan 	short cmd;
    548   1.1  macallan 
    549   1.1  macallan 	/* talk R2 */
    550   1.1  macallan 	cmd = ADBTALK(sc->sc_adbdev->current_addr, 2);
    551   1.1  macallan 	sc->sc_msg_len = 0;
    552   1.1  macallan 	sc->sc_ops->send(sc->sc_ops->cookie, sc->sc_poll, cmd, 0, NULL);
    553   1.1  macallan 	if (!adbkbd_wait(sc, 10)) {
    554   1.1  macallan 		printf("unable to read LED state\n");
    555   1.1  macallan 		return;
    556   1.1  macallan 	}
    557   1.1  macallan 	sc->sc_have_led_control = 1;
    558   1.1  macallan 	DPRINTF("have LED control\n");
    559   1.1  macallan 	return;
    560   1.1  macallan }
    561   1.1  macallan 
    562   1.1  macallan static int
    563   1.1  macallan adbkbd_enable(void *v, int on)
    564   1.1  macallan {
    565   1.1  macallan 	return 0;
    566   1.1  macallan }
    567   1.1  macallan 
    568   1.1  macallan static int
    569   1.5  christos adbkbd_ioctl(void *v, u_long cmd, void *data, int flag, struct lwp *l)
    570   1.1  macallan {
    571   1.1  macallan 	struct adbkbd_softc *sc = (struct adbkbd_softc *) v;
    572   1.1  macallan 
    573   1.1  macallan 	switch (cmd) {
    574   1.1  macallan 
    575   1.1  macallan 	case WSKBDIO_GTYPE:
    576   1.1  macallan 		*(int *)data = WSKBD_TYPE_ADB;
    577   1.1  macallan 		return 0;
    578   1.1  macallan 	case WSKBDIO_SETLEDS:
    579   1.1  macallan 		adbkbd_set_leds(sc, *(int *)data);
    580   1.1  macallan 		return 0;
    581   1.1  macallan 	case WSKBDIO_GETLEDS:
    582   1.1  macallan 		*(int *)data = sc->sc_leds;
    583   1.1  macallan 		return 0;
    584   1.1  macallan #ifdef WSDISPLAY_COMPAT_RAWKBD
    585   1.1  macallan 	case WSKBDIO_SETMODE:
    586   1.1  macallan 		sc->sc_rawkbd = *(int *)data == WSKBD_RAW;
    587   1.1  macallan 		return 0;
    588   1.1  macallan #endif
    589   1.1  macallan 	}
    590   1.1  macallan 
    591   1.1  macallan 	return EPASSTHROUGH;
    592   1.1  macallan }
    593   1.1  macallan 
    594   1.1  macallan int
    595  1.13    cegger adbkbd_cnattach(void)
    596   1.1  macallan {
    597   1.1  macallan 
    598   1.1  macallan 	adbkbd_is_console = 1;
    599   1.1  macallan 	return 0;
    600   1.1  macallan }
    601   1.1  macallan 
    602   1.1  macallan static void
    603   1.1  macallan adbkbd_cngetc(void *v, u_int *type, int *data)
    604   1.1  macallan {
    605   1.1  macallan 	struct adbkbd_softc *sc = v;
    606   1.1  macallan 	int key, press, val;
    607   1.1  macallan 	int s;
    608   1.1  macallan 
    609   1.1  macallan 	s = splhigh();
    610   1.1  macallan 
    611   1.1  macallan 	KASSERT(sc->sc_poll);
    612   1.1  macallan 
    613   1.1  macallan 	DPRINTF("polling...");
    614   1.1  macallan 	while (sc->sc_polled_chars == 0) {
    615   1.1  macallan 		sc->sc_ops->poll(sc->sc_ops->cookie);
    616   1.1  macallan 	}
    617   1.1  macallan 	DPRINTF(" got one\n");
    618   1.1  macallan 	splx(s);
    619   1.1  macallan 
    620   1.1  macallan 	key = sc->sc_pollbuf[0];
    621   1.1  macallan 	sc->sc_polled_chars--;
    622   1.1  macallan 	memmove(sc->sc_pollbuf, sc->sc_pollbuf + 1,
    623   1.1  macallan 		sc->sc_polled_chars);
    624   1.1  macallan 
    625   1.1  macallan 	press = ADBK_PRESS(key);
    626   1.1  macallan 	val = ADBK_KEYVAL(key);
    627   1.1  macallan 
    628   1.1  macallan 	*data = val;
    629   1.1  macallan 	*type = press ? WSCONS_EVENT_KEY_DOWN : WSCONS_EVENT_KEY_UP;
    630   1.1  macallan }
    631   1.1  macallan 
    632   1.1  macallan static void
    633   1.1  macallan adbkbd_cnpollc(void *v, int on)
    634   1.1  macallan {
    635   1.1  macallan 	struct adbkbd_softc *sc = v;
    636   1.1  macallan 
    637   1.1  macallan 	sc->sc_poll = on;
    638   1.1  macallan 	if (!on) {
    639   1.1  macallan 		int i;
    640   1.1  macallan 
    641   1.1  macallan 		/* feed the poll buffer's content to wskbd */
    642   1.1  macallan 		for (i = 0; i < sc->sc_polled_chars; i++) {
    643   1.1  macallan 			adbkbd_key(sc, sc->sc_pollbuf[i]);
    644   1.1  macallan 		}
    645   1.1  macallan 		sc->sc_polled_chars = 0;
    646   1.1  macallan 	}
    647   1.1  macallan }
    648   1.1  macallan 
    649  1.11  macallan #if NWSMOUSE > 0
    650   1.1  macallan /* stuff for the pseudo mouse */
    651   1.1  macallan static int
    652   1.1  macallan adbkms_enable(void *v)
    653   1.1  macallan {
    654   1.1  macallan 	return 0;
    655   1.1  macallan }
    656   1.1  macallan 
    657   1.1  macallan static int
    658   1.5  christos adbkms_ioctl(void *v, u_long cmd, void *data, int flag, struct lwp *l)
    659   1.1  macallan {
    660   1.1  macallan 
    661   1.1  macallan 	switch (cmd) {
    662   1.1  macallan 	case WSMOUSEIO_GTYPE:
    663   1.1  macallan 		*(u_int *)data = WSMOUSE_TYPE_PSEUDO;
    664   1.1  macallan 		break;
    665   1.1  macallan 
    666   1.1  macallan 	default:
    667   1.1  macallan 		return (EPASSTHROUGH);
    668   1.1  macallan 	}
    669   1.1  macallan 	return (0);
    670   1.1  macallan }
    671   1.1  macallan 
    672   1.1  macallan static void
    673   1.1  macallan adbkms_disable(void *v)
    674   1.1  macallan {
    675   1.1  macallan }
    676   1.1  macallan 
    677   1.1  macallan static void
    678   1.1  macallan adbkbd_setup_sysctl(struct adbkbd_softc *sc)
    679   1.1  macallan {
    680  1.14  macallan 	const struct sysctlnode *me, *node;
    681   1.1  macallan 	int ret;
    682   1.1  macallan 
    683  1.12      matt 	DPRINTF("%s: sysctl setup\n", device_xname(sc->sc_dev));
    684  1.14  macallan 	ret = sysctl_createv(NULL, 0, NULL, &me,
    685   1.1  macallan 	       CTLFLAG_READWRITE,
    686  1.12      matt 	       CTLTYPE_NODE, device_xname(sc->sc_dev), NULL,
    687   1.1  macallan 	       NULL, 0, NULL, 0,
    688   1.1  macallan 	       CTL_MACHDEP, CTL_CREATE, CTL_EOL);
    689   1.1  macallan 
    690   1.1  macallan 	ret = sysctl_createv(NULL, 0, NULL,
    691  1.15  christos 	    (void *)&node,
    692  1.14  macallan 	    CTLFLAG_READWRITE | CTLFLAG_OWNDESC,
    693  1.14  macallan 	    CTLTYPE_INT, "middle", "middle mouse button", adbkbd_sysctl_mid,
    694  1.14  macallan 		    1, sc, 0, CTL_MACHDEP, me->sysctl_num, CTL_CREATE,
    695  1.11  macallan 		    CTL_EOL);
    696   1.1  macallan 
    697   1.1  macallan 	ret = sysctl_createv(NULL, 0, NULL,
    698  1.15  christos 	    (void *)&node,
    699  1.14  macallan 	    CTLFLAG_READWRITE | CTLFLAG_OWNDESC,
    700  1.14  macallan 	    CTLTYPE_INT, "right", "right mouse button", adbkbd_sysctl_right,
    701  1.14  macallan 		    2, sc, 0, CTL_MACHDEP, me->sysctl_num, CTL_CREATE,
    702  1.11  macallan 		    CTL_EOL);
    703   1.1  macallan }
    704   1.1  macallan 
    705   1.1  macallan static int
    706  1.14  macallan adbkbd_sysctl_mid(SYSCTLFN_ARGS)
    707   1.1  macallan {
    708   1.1  macallan 	struct sysctlnode node = *rnode;
    709   1.1  macallan 	struct adbkbd_softc *sc=(struct adbkbd_softc *)node.sysctl_data;
    710   1.1  macallan 	const int *np = newp;
    711  1.14  macallan 	int reg;
    712   1.1  macallan 
    713  1.14  macallan 	DPRINTF("adbkbd_sysctl_mid\n");
    714  1.14  macallan 	reg = sc->sc_trans[1];
    715   1.1  macallan 	if (np) {
    716   1.1  macallan 		/* we're asked to write */
    717   1.1  macallan 		node.sysctl_data = &reg;
    718   1.1  macallan 		if (sysctl_lookup(SYSCTLFN_CALL(&node)) == 0) {
    719   1.1  macallan 
    720  1.14  macallan 			sc->sc_trans[1] = *(int *)node.sysctl_data;
    721   1.1  macallan 			return 0;
    722   1.1  macallan 		}
    723   1.1  macallan 		return EINVAL;
    724   1.1  macallan 	} else {
    725  1.14  macallan 		node.sysctl_data = &reg;
    726  1.14  macallan 		node.sysctl_size = 4;
    727  1.14  macallan 		return (sysctl_lookup(SYSCTLFN_CALL(&node)));
    728  1.14  macallan 	}
    729  1.14  macallan }
    730  1.14  macallan 
    731  1.14  macallan static int
    732  1.14  macallan adbkbd_sysctl_right(SYSCTLFN_ARGS)
    733  1.14  macallan {
    734  1.14  macallan 	struct sysctlnode node = *rnode;
    735  1.14  macallan 	struct adbkbd_softc *sc=(struct adbkbd_softc *)node.sysctl_data;
    736  1.14  macallan 	const int *np = newp;
    737  1.14  macallan 	int reg;
    738  1.14  macallan 
    739  1.14  macallan 	DPRINTF("adbkbd_sysctl_right\n");
    740  1.14  macallan 	reg = sc->sc_trans[2];
    741  1.14  macallan 	if (np) {
    742  1.14  macallan 		/* we're asked to write */
    743  1.14  macallan 		node.sysctl_data = &reg;
    744  1.14  macallan 		if (sysctl_lookup(SYSCTLFN_CALL(&node)) == 0) {
    745  1.14  macallan 
    746  1.14  macallan 			sc->sc_trans[2] = *(int *)node.sysctl_data;
    747  1.14  macallan 			return 0;
    748  1.14  macallan 		}
    749  1.14  macallan 		return EINVAL;
    750  1.14  macallan 	} else {
    751  1.14  macallan 		node.sysctl_data = &reg;
    752   1.1  macallan 		node.sysctl_size = 4;
    753   1.1  macallan 		return (sysctl_lookup(SYSCTLFN_CALL(&node)));
    754   1.1  macallan 	}
    755   1.1  macallan }
    756   1.1  macallan 
    757   1.1  macallan SYSCTL_SETUP(sysctl_adbkbdtrans_setup, "adbkbd translator setup")
    758   1.1  macallan {
    759   1.1  macallan 
    760   1.1  macallan 	sysctl_createv(NULL, 0, NULL, NULL,
    761   1.1  macallan 		       CTLFLAG_PERMANENT,
    762   1.1  macallan 		       CTLTYPE_NODE, "machdep", NULL,
    763   1.1  macallan 		       NULL, 0, NULL, 0,
    764   1.1  macallan 		       CTL_MACHDEP, CTL_EOL);
    765   1.1  macallan }
    766  1.11  macallan #endif /* NWSMOUSE > 0 */
    767