Home | History | Annotate | Line # | Download | only in sableio
      1 /* $NetBSD: pckbc_sableio.c,v 1.15 2021/05/07 16:58:34 thorpej Exp $ */
      2 
      3 /*-
      4  * Copyright (c) 1999 The NetBSD Foundation, Inc.
      5  * All rights reserved.
      6  *
      7  * This code is derived from software contributed to The NetBSD Foundation
      8  * by Jason R. Thorpe.
      9  *
     10  * Redistribution and use in source and binary forms, with or without
     11  * modification, are permitted provided that the following conditions
     12  * are met:
     13  * 1. Redistributions of source code must retain the above copyright
     14  *    notice, this list of conditions and the following disclaimer.
     15  * 2. Redistributions in binary form must reproduce the above copyright
     16  *    notice, this list of conditions and the following disclaimer in the
     17  *    documentation and/or other materials provided with the distribution.
     18  *
     19  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     20  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     21  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     22  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     23  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     24  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     25  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     26  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     27  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     28  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     29  * POSSIBILITY OF SUCH DAMAGE.
     30  */
     31 
     32 #include <sys/cdefs.h>			/* RCS ID & Copyright macro defns */
     33 
     34 __KERNEL_RCSID(0, "$NetBSD: pckbc_sableio.c,v 1.15 2021/05/07 16:58:34 thorpej Exp $");
     35 
     36 #include <sys/param.h>
     37 #include <sys/systm.h>
     38 #include <sys/kernel.h>
     39 #include <sys/proc.h>
     40 #include <sys/device.h>
     41 #include <sys/kmem.h>
     42 #include <sys/errno.h>
     43 #include <sys/queue.h>
     44 #include <sys/intr.h>
     45 #include <sys/bus.h>
     46 
     47 #include <dev/ic/i8042reg.h>
     48 #include <dev/ic/pckbcvar.h>
     49 
     50 #include <dev/pci/pcivar.h>
     51 #include <dev/isa/isavar.h>
     52 
     53 #include <alpha/sableio/sableiovar.h>
     54 
     55 struct pckbc_sableio_softc {
     56 	struct	pckbc_softc sc_pckbc;	/* real "pckbc" softc */
     57 
     58 	/* STDIO-specific goo. */
     59 	void	*sc_ih[PCKBC_NSLOTS];	/* interrupt handlers */
     60 	int	sc_irq[PCKBC_NSLOTS];	/* Sable IRQs to use */
     61 	pci_chipset_tag_t sc_pc;	/* PCI chipset for registering intrs */
     62 };
     63 
     64 static int	pckbc_sableio_match(device_t, cfdata_t, void *);
     65 static void	pckbc_sableio_attach(device_t, device_t, void *);
     66 
     67 CFATTACH_DECL_NEW(pckbc_sableio, sizeof(struct pckbc_sableio_softc),
     68     pckbc_sableio_match, pckbc_sableio_attach, NULL, NULL);
     69 
     70 static void	pckbc_sableio_intr_establish(struct pckbc_softc *,
     71 		    pckbc_slot_t);
     72 
     73 static int
     74 pckbc_sableio_match(device_t parent, cfdata_t match, void *aux)
     75 {
     76 	struct sableio_attach_args *sa = aux;
     77 
     78 	/* Always present. */
     79 	if (strcmp(sa->sa_name, match->cf_name) == 0)
     80 		return (1);
     81 
     82 	return (0);
     83 }
     84 
     85 static void
     86 pckbc_sableio_attach(device_t parent, device_t self, void *aux)
     87 {
     88 	struct pckbc_sableio_softc *ssc = device_private(self);
     89 	struct pckbc_softc *sc = &ssc->sc_pckbc;
     90 	struct sableio_attach_args *sa = aux;
     91 	struct pckbc_internal *t;
     92 	bus_space_handle_t ioh_d, ioh_c;
     93 
     94 	sc->sc_dv = self;
     95 	ssc->sc_pc = sa->sa_pc;
     96 
     97 	/*
     98 	 * Set up IRQs.
     99 	 */
    100 	ssc->sc_irq[PCKBC_KBD_SLOT] = sa->sa_sableirq[0];
    101 	ssc->sc_irq[PCKBC_AUX_SLOT] = sa->sa_sableirq[1];
    102 
    103 	sc->intr_establish = pckbc_sableio_intr_establish;
    104 
    105 	if (pckbc_is_console(sa->sa_iot, sa->sa_ioaddr)) {
    106 		t = &pckbc_consdata;
    107 		pckbc_console_attached = 1;
    108 		/* t->t_cmdbyte was initialized by cnattach */
    109 	} else {
    110 		if (bus_space_map(sa->sa_iot, sa->sa_ioaddr + KBDATAP,
    111 				  1, 0, &ioh_d) != 0 ||
    112 		    bus_space_map(sa->sa_iot, sa->sa_ioaddr + KBCMDP,
    113 				  1, 0, &ioh_c) != 0)
    114 			panic("pckbc_sableio_attach: couldn't map");
    115 
    116 		t = kmem_zalloc(sizeof(struct pckbc_internal), KM_SLEEP);
    117 		t->t_iot = sa->sa_iot;
    118 		t->t_ioh_d = ioh_d;
    119 		t->t_ioh_c = ioh_c;
    120 		t->t_addr = sa->sa_ioaddr;
    121 		t->t_cmdbyte = KC8_CPU; /* Enable ports */
    122 	}
    123 
    124 	t->t_sc = sc;
    125 	sc->id = t;
    126 
    127 	aprint_normal("\n");
    128 
    129 	/* Finish off the attach. */
    130 	pckbc_attach(sc);
    131 }
    132 
    133 static void
    134 pckbc_sableio_intr_establish(struct pckbc_softc *sc, pckbc_slot_t slot)
    135 {
    136 	struct pckbc_sableio_softc *ssc = (void *) sc;
    137 	const char *intrstr;
    138 	char buf[PCI_INTRSTR_LEN];
    139 	pci_intr_handle_t ih;
    140 
    141 	alpha_pci_intr_handle_init(&ih, ssc->sc_irq[slot], 0);
    142 
    143 	intrstr = pci_intr_string(ssc->sc_pc, ih, buf,
    144 	    sizeof(buf));
    145 	ssc->sc_ih[slot] = pci_intr_establish(ssc->sc_pc, ih,
    146 	    IPL_TTY, pckbcintr, sc);
    147 	if (ssc->sc_ih[slot] == NULL) {
    148 		aprint_error_dev(sc->sc_dv,
    149 		    "unable to establish interrupt for %s slot",
    150 		    pckbc_slot_names[slot]);
    151 		if (intrstr != NULL)
    152 			aprint_error(" at %s", intrstr);
    153 		aprint_error("\n");
    154 		return;
    155 	}
    156 	aprint_normal_dev(sc->sc_dv, "%s slot interrupting at %s\n",
    157 	    pckbc_slot_names[slot], intrstr);
    158 }
    159