Home | History | Annotate | Line # | Download | only in iomd
iomdkbc.c revision 1.5
      1 /* $NetBSD: iomdkbc.c,v 1.5 2012/05/14 10:38:08 skrll Exp $ */
      2 
      3 /*-
      4  * Copyright (c) 2004 Ben Harris
      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. The name of the author may not be used to endorse or promote products
     16  *    derived from this software without specific prior written permission.
     17  *
     18  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     19  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     20  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     21  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     22  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     23  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     24  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     25  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     26  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     27  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     28  */
     29 
     30 #include <sys/cdefs.h>
     31 __KERNEL_RCSID(0, "$NetBSD: iomdkbc.c,v 1.5 2012/05/14 10:38:08 skrll Exp $");
     32 
     33 #include <sys/param.h>
     34 #include <sys/device.h>
     35 #include <sys/malloc.h>
     36 #include <sys/systm.h>
     37 
     38 #include <dev/pckbport/pckbportvar.h>
     39 
     40 #include <sys/bus.h>
     41 #include <machine/intr.h>
     42 
     43 #include <arch/arm/iomd/iomdreg.h>
     44 #include <arch/arm/iomd/iomdvar.h>
     45 #include <arch/arm/iomd/iomdkbcvar.h>
     46 
     47 /* XXX belongs in iomdreg.h */
     48 #define IOMDKBC_TXE	0x80
     49 #define IOMDKBC_TXB	0x40
     50 #define IOMDKBC_RXF	0x20
     51 #define IOMDKBC_RXB	0x10
     52 #define IOMDKBC_ENA	0x08
     53 #define IOMDKBC_RXP	0x04
     54 #define IOMDKBC_DATA	0x02
     55 #define IOMDKBC_CLK	0x01
     56 
     57 #define IOMDKBC_DR	0x00
     58 #define IOMDKBC_CR	0x01
     59 
     60 #define KBC_DEVCMD_ACK 0xfa
     61 #define KBC_DEVCMD_RESEND 0xfe
     62 
     63 struct iomdkbc_softc {
     64 	device_t		sc_dev;
     65 	struct iomdkbc_internal *sc_id;
     66 };
     67 
     68 struct iomdkbc_internal {
     69 	struct iomdkbc_softc	*t_sc;
     70 	struct pckbport_tag	*t_pt;
     71 
     72 	int			t_haveport[PCKBPORT_NSLOTS];
     73 	bus_space_tag_t		t_iot;
     74 	bus_space_handle_t	t_ioh[PCKBPORT_NSLOTS];
     75 
     76 	void	*t_rxih[PCKBPORT_NSLOTS];
     77 	int	t_rxirq[PCKBPORT_NSLOTS];
     78 };
     79 
     80 static int iomdkbc_match(device_t , cfdata_t , void *);
     81 static void iomdkbc_attach(device_t , device_t , void *);
     82 
     83 static int iomdkbc_xt_translation(void *, pckbport_slot_t, int);
     84 static int iomdkbc_send_devcmd(void *, pckbport_slot_t, u_char);
     85 static int iomdkbc_poll_data1(void *, pckbport_slot_t);
     86 static void iomdkbc_slot_enable(void *, pckbport_slot_t, int);
     87 static void iomdkbc_intr_establish(void *, pckbport_slot_t);
     88 static void iomdkbc_set_poll(void *, pckbport_slot_t, int);
     89 
     90 static int iomdkbc_intr(void *);
     91 
     92 CFATTACH_DECL_NEW(iomdkbc, sizeof(struct iomdkbc_softc),
     93     iomdkbc_match, iomdkbc_attach, NULL, NULL);
     94 
     95 static struct pckbport_accessops const iomdkbc_ops = {
     96 	iomdkbc_xt_translation,
     97 	iomdkbc_send_devcmd,
     98 	iomdkbc_poll_data1,
     99 	iomdkbc_slot_enable,
    100 	iomdkbc_intr_establish,
    101 	iomdkbc_set_poll
    102 };
    103 
    104 static struct iomdkbc_internal iomdkbc_cntag;
    105 
    106 static int
    107 iomdkbc_match(device_t parent, cfdata_t cf, void *aux)
    108 {
    109 	struct kbd_attach_args *ka = aux;
    110 	struct opms_attach_args *pa = aux;
    111 
    112 	if (strcmp(ka->ka_name, "kbd") == 0 ||
    113 	    strcmp(pa->pa_name, "opms") == 0)
    114 		return 1;
    115 	return 0;
    116 }
    117 
    118 static void
    119 iomdkbc_attach(device_t parent, device_t self, void *aux)
    120 {
    121 	struct kbd_attach_args *ka = aux;
    122 	struct opms_attach_args *pa = aux;
    123 	struct iomdkbc_softc *sc = device_private(self);
    124 	struct iomdkbc_internal *t;
    125 
    126 	sc->sc_dev = self;
    127 	aprint_normal("\n");
    128 
    129 	t = NULL;
    130 	if (strcmp(ka->ka_name, "kbd") == 0) {
    131 		/* XXX not really right, but good enough. */
    132 		if (iomdkbc_cntag.t_haveport[PCKBPORT_KBD_SLOT]) {
    133 			/* Have an iomdkbc as console.  Assume it's this one.*/
    134 			t = &iomdkbc_cntag;
    135 		} else {
    136 			t = malloc(sizeof(struct iomdkbc_internal), M_DEVBUF,
    137 			    M_NOWAIT | M_ZERO);
    138 			if (t == NULL) {
    139 				aprint_error(": no memory");
    140 				return;
    141 			}
    142 			t->t_haveport[PCKBPORT_KBD_SLOT] = 1;
    143 			t->t_iot = ka->ka_iot;
    144 			t->t_ioh[PCKBPORT_KBD_SLOT] = ka->ka_ioh;
    145 		}
    146 		t->t_rxih[PCKBPORT_KBD_SLOT] = intr_claim(ka->ka_rxirq,
    147 		    IPL_TTY, device_xname(sc->sc_dev), iomdkbc_intr, t);
    148 		t->t_rxirq[PCKBPORT_KBD_SLOT] = ka->ka_rxirq;
    149 		disable_irq(t->t_rxirq[PCKBPORT_KBD_SLOT]);
    150 		sc->sc_id = t;
    151 		t->t_sc = sc;
    152 		t->t_pt = pckbport_attach(t, &iomdkbc_ops);
    153 		pckbport_attach_slot(sc->sc_dev, t->t_pt, PCKBPORT_KBD_SLOT);
    154 	}
    155 
    156 	if (strcmp(pa->pa_name, "opms") == 0) {
    157 		if (t == NULL) {
    158 			t = malloc(sizeof(struct iomdkbc_internal), M_DEVBUF,
    159 			    M_NOWAIT | M_ZERO);
    160 			if (t == NULL) {
    161 				aprint_error(": no memory");
    162 				return;
    163 			}
    164 		}
    165 		t->t_haveport[PCKBPORT_AUX_SLOT] = 1;
    166 		t->t_iot = pa->pa_iot;
    167 		t->t_ioh[PCKBPORT_AUX_SLOT] = pa->pa_ioh;
    168 		t->t_rxih[PCKBPORT_AUX_SLOT] = intr_claim(pa->pa_irq,
    169 		    IPL_TTY, device_xname(sc->sc_dev), iomdkbc_intr, t);
    170 		t->t_rxirq[PCKBPORT_AUX_SLOT] = pa->pa_irq;
    171 		disable_irq(t->t_rxirq[PCKBPORT_AUX_SLOT]);
    172 		sc->sc_id = t;
    173 		t->t_sc = sc;
    174 		if (t->t_pt == NULL)
    175 			t->t_pt = pckbport_attach(t, &iomdkbc_ops);
    176 		pckbport_attach_slot(sc->sc_dev, t->t_pt, PCKBPORT_AUX_SLOT);
    177 	}
    178 }
    179 
    180 static int
    181 iomdkbc_send_devcmd(void *cookie, pckbport_slot_t slot, u_char cmd)
    182 {
    183 	struct iomdkbc_internal *t = cookie;
    184 	bus_space_tag_t iot = t->t_iot;
    185 	bus_space_handle_t ioh = t->t_ioh[slot];
    186 	int timeout;
    187 
    188 	timeout = 10000;
    189 	while ((bus_space_read_1(iot, ioh, IOMDKBC_CR) &
    190 		   IOMDKBC_TXE) == 0) {
    191 		DELAY(10);
    192 		if (--timeout == 0) return 0;
    193 	}
    194 
    195         bus_space_write_1(iot, ioh, IOMDKBC_DR, cmd);
    196 	return 1;
    197 }
    198 
    199 static int
    200 iomdkbc_poll_data1(void *cookie, pckbport_slot_t slot)
    201 {
    202 	struct iomdkbc_internal *t = cookie;
    203 	bus_space_tag_t iot = t->t_iot;
    204 	bus_space_handle_t ioh = t->t_ioh[slot];
    205 	int timeout;
    206 
    207 	timeout = 10000;
    208 	while ((bus_space_read_1(iot, ioh, IOMDKBC_CR) &
    209 		   IOMDKBC_RXF) == 0) {
    210 		DELAY(10);
    211 		if (--timeout == 0) return -1;
    212 	}
    213 
    214         return bus_space_read_1(iot, ioh, IOMDKBC_DR);
    215 }
    216 
    217 /*
    218  * switch scancode translation on / off
    219  * return nonzero on success
    220  */
    221 static int
    222 iomdkbc_xt_translation(void *cookie, pckbport_slot_t slot, int on)
    223 {
    224 
    225 	if (on)
    226 		return 0; /* Can't do XT translation */
    227 	else
    228 		return 1;
    229 }
    230 
    231 static void
    232 iomdkbc_slot_enable(void *cookie, pckbport_slot_t slot, int on)
    233 {
    234 	struct iomdkbc_internal *t = cookie;
    235 	bus_space_tag_t iot = t->t_iot;
    236 	bus_space_handle_t ioh = t->t_ioh[slot];
    237 
    238 	bus_space_write_1(iot, ioh, IOMDKBC_CR, on ? IOMDKBC_ENA : 0);
    239 }
    240 
    241 
    242 static void
    243 iomdkbc_intr_establish(void *cookie, pckbport_slot_t slot)
    244 {
    245 	struct iomdkbc_internal *t = cookie;
    246 
    247 	enable_irq(t->t_rxirq[slot]);
    248 }
    249 
    250 static void
    251 iomdkbc_set_poll(void *cookie, pckbport_slot_t slot, int on)
    252 {
    253 	struct iomdkbc_internal *t = cookie;
    254 
    255 	if (on)
    256 		disable_irq(t->t_rxirq[slot]);
    257 	else
    258 		enable_irq(t->t_rxirq[slot]);
    259 }
    260 
    261 static int
    262 iomdkbc_intr(void *self)
    263 {
    264 	struct iomdkbc_internal *t = self;
    265 	bus_space_tag_t iot = t->t_iot;
    266 	bus_space_handle_t ioh;
    267 	unsigned i;
    268 	int stat, ret;
    269 
    270 	ret = 0;
    271 	for (i = 0; i < PCKBPORT_NSLOTS; i++)
    272 		if (t->t_haveport[i]) {
    273 			ioh = t->t_ioh[i];
    274 			stat = bus_space_read_1(iot, ioh, IOMDKBC_CR);
    275 			if ((stat & IOMDKBC_RXF) == 0)
    276 				continue;
    277 			pckbportintr(t->t_pt, i,
    278 			    bus_space_read_1(iot, ioh, IOMDKBC_DR));
    279 			ret = 1;
    280 		}
    281 
    282 	return ret;
    283 }
    284 
    285 int
    286 iomdkbc_cnattach(bus_space_tag_t iot, bus_addr_t addr, int slot)
    287 {
    288 	struct iomdkbc_internal *t = &iomdkbc_cntag;
    289 
    290 	t->t_iot = iot;
    291 	bus_space_map(iot, addr, 2, 0, &t->t_ioh[slot]);
    292 	t->t_haveport[slot] = 1;
    293 	iomdkbc_slot_enable(t, slot, 1);
    294 	return pckbport_cnattach(t, &iomdkbc_ops, slot);
    295 }
    296