Home | History | Annotate | Line # | Download | only in pci
pci_6600.c revision 1.19.4.2
      1 /* $NetBSD: pci_6600.c,v 1.19.4.2 2011/04/21 01:40:46 rmind Exp $ */
      2 
      3 /*-
      4  * Copyright (c) 1999 by Ross Harvey.  All rights reserved.
      5  *
      6  * Redistribution and use in source and binary forms, with or without
      7  * modification, are permitted provided that the following conditions
      8  * are met:
      9  * 1. Redistributions of source code must retain the above copyright
     10  *    notice, this list of conditions and the following disclaimer.
     11  * 2. Redistributions in binary form must reproduce the above copyright
     12  *    notice, this list of conditions and the following disclaimer in the
     13  *    documentation and/or other materials provided with the distribution.
     14  * 3. All advertising materials mentioning features or use of this software
     15  *    must display the following acknowledgement:
     16  *	This product includes software developed by Ross Harvey.
     17  * 4. The name of Ross Harvey may not be used to endorse or promote products
     18  *    derived from this software without specific prior written permission.
     19  *
     20  * THIS SOFTWARE IS PROVIDED BY ROSS HARVEY ``AS IS'' AND ANY EXPRESS
     21  * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
     22  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURP0SE
     23  * ARE DISCLAIMED.  IN NO EVENT SHALL ROSS HARVEY BE LIABLE FOR ANY
     24  * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     25  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     26  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     27  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     28  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     29  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     30  * SUCH DAMAGE.
     31  *
     32  */
     33 
     34 #include <sys/cdefs.h>
     35 
     36 __KERNEL_RCSID(0, "$NetBSD: pci_6600.c,v 1.19.4.2 2011/04/21 01:40:46 rmind Exp $");
     37 
     38 #include <sys/param.h>
     39 #include <sys/systm.h>
     40 #include <sys/kernel.h>
     41 #include <sys/device.h>
     42 #include <sys/malloc.h>
     43 
     44 #include <machine/autoconf.h>
     45 #define _ALPHA_BUS_DMA_PRIVATE
     46 #include <machine/bus.h>
     47 #include <machine/rpb.h>
     48 #include <machine/alpha.h>
     49 
     50 #include <dev/pci/pcireg.h>
     51 #include <dev/pci/pcivar.h>
     52 #include <dev/pci/pciidereg.h>
     53 #include <dev/pci/pciidevar.h>
     54 
     55 #include <alpha/pci/tsreg.h>
     56 #include <alpha/pci/tsvar.h>
     57 #include <alpha/pci/pci_6600.h>
     58 
     59 #define pci_6600() { Generate ctags(1) key. }
     60 
     61 #include "sio.h"
     62 #if NSIO
     63 #include <alpha/pci/siovar.h>
     64 #endif
     65 
     66 #define	PCI_NIRQ		64
     67 #define	PCI_STRAY_MAX		5
     68 
     69 /*
     70  * Some Tsunami models have a PCI device (the USB controller) with interrupts
     71  * tied to ISA IRQ lines.  The IRQ is encoded as:
     72  *
     73  *	line = 0xe0 | isa_irq;
     74  */
     75 #define	DEC_6600_LINE_IS_ISA(line)	((line) >= 0xe0 && (line) <= 0xef)
     76 #define	DEC_6600_LINE_ISA_IRQ(line)	((line) & 0x0f)
     77 
     78 static const char *irqtype = "6600 irq";
     79 static struct tsp_config *sioprimary;
     80 
     81 void dec_6600_intr_disestablish(void *, void *);
     82 void *dec_6600_intr_establish(
     83     void *, pci_intr_handle_t, int, int (*func)(void *), void *);
     84 const char *dec_6600_intr_string(void *, pci_intr_handle_t);
     85 const struct evcnt *dec_6600_intr_evcnt(void *, pci_intr_handle_t);
     86 int dec_6600_intr_map(const struct pci_attach_args *, pci_intr_handle_t *);
     87 void *dec_6600_pciide_compat_intr_establish(void *, struct device *,
     88     const struct pci_attach_args *, int, int (*)(void *), void *);
     89 
     90 struct alpha_shared_intr *dec_6600_pci_intr;
     91 
     92 void dec_6600_iointr(void *arg, unsigned long vec);
     93 extern void dec_6600_intr_enable(int irq);
     94 extern void dec_6600_intr_disable(int irq);
     95 
     96 void
     97 pci_6600_pickintr(struct tsp_config *pcp)
     98 {
     99 	bus_space_tag_t iot = &pcp->pc_iot;
    100 	pci_chipset_tag_t pc = &pcp->pc_pc;
    101 	char *cp;
    102 	int i;
    103 
    104         pc->pc_intr_v = pcp;
    105         pc->pc_intr_map = dec_6600_intr_map;
    106         pc->pc_intr_string = dec_6600_intr_string;
    107 	pc->pc_intr_evcnt = dec_6600_intr_evcnt;
    108         pc->pc_intr_establish = dec_6600_intr_establish;
    109         pc->pc_intr_disestablish = dec_6600_intr_disestablish;
    110 	pc->pc_pciide_compat_intr_establish = NULL;
    111 
    112 	/*
    113 	 * System-wide and Pchip-0-only logic...
    114 	 */
    115 	if (dec_6600_pci_intr == NULL) {
    116 		sioprimary = pcp;
    117 		pc->pc_pciide_compat_intr_establish =
    118 		    dec_6600_pciide_compat_intr_establish;
    119 		dec_6600_pci_intr = alpha_shared_intr_alloc(PCI_NIRQ, 8);
    120 		for (i = 0; i < PCI_NIRQ; i++) {
    121 			alpha_shared_intr_set_maxstrays(dec_6600_pci_intr, i,
    122 			    PCI_STRAY_MAX);
    123 			alpha_shared_intr_set_private(dec_6600_pci_intr, i,
    124 			    sioprimary);
    125 
    126 			cp = alpha_shared_intr_string(dec_6600_pci_intr, i);
    127 			sprintf(cp, "irq %d", i);
    128 			evcnt_attach_dynamic(alpha_shared_intr_evcnt(
    129 			    dec_6600_pci_intr, i), EVCNT_TYPE_INTR, NULL,
    130 			    "dec_6600", cp);
    131 		}
    132 #if NSIO
    133 		sio_intr_setup(pc, iot);
    134 		dec_6600_intr_enable(55);	/* irq line for sio */
    135 #endif
    136 	}
    137 }
    138 
    139 int
    140 dec_6600_intr_map(const struct pci_attach_args *pa, pci_intr_handle_t *ihp)
    141 {
    142 	pcitag_t bustag = pa->pa_intrtag;
    143 	int buspin = pa->pa_intrpin, line = pa->pa_intrline;
    144 	pci_chipset_tag_t pc = pa->pa_pc;
    145 	int bus, device, function;
    146 
    147 	if (buspin == 0) {
    148 		/* No IRQ used. */
    149 		return 1;
    150 	}
    151 	if (buspin > 4) {
    152 		printf("intr_map: bad interrupt pin %d\n", buspin);
    153 		return 1;
    154 	}
    155 
    156 	pci_decompose_tag(pc, bustag, &bus, &device, &function);
    157 
    158 	/*
    159 	 * The console places the interrupt mapping in the "line" value.
    160 	 * A value of (char)-1 indicates there is no mapping.
    161 	 */
    162 	if (line == 0xff) {
    163 		printf("dec_6600_intr_map: no mapping for %d/%d/%d\n",
    164 		    bus, device, function);
    165 		return (1);
    166 	}
    167 
    168 #if NSIO == 0
    169 	if (DEC_6600_LINE_IS_ISA(line)) {
    170 		printf("dec_6600_intr_map: ISA IRQ %d for %d/%d/%d\n",
    171 		    DEC_6600_LINE_ISA_IRQ(line), bus, device, function);
    172 		return (1);
    173 	}
    174 #endif
    175 
    176 	if (DEC_6600_LINE_IS_ISA(line) == 0 && line >= PCI_NIRQ)
    177 		panic("dec_6600_intr_map: dec 6600 irq too large (%d)",
    178 		    line);
    179 
    180 	*ihp = line;
    181 	return (0);
    182 }
    183 
    184 const char *
    185 dec_6600_intr_string(void *acv, pci_intr_handle_t ih)
    186 {
    187 
    188 	static const char irqfmt[] = "dec 6600 irq %ld";
    189 	static char irqstr[sizeof irqfmt];
    190 
    191 #if NSIO
    192 	if (DEC_6600_LINE_IS_ISA(ih))
    193 		return (sio_intr_string(NULL /*XXX*/,
    194 		    DEC_6600_LINE_ISA_IRQ(ih)));
    195 #endif
    196 
    197 	snprintf(irqstr, sizeof irqstr, irqfmt, ih);
    198 	return (irqstr);
    199 }
    200 
    201 const struct evcnt *
    202 dec_6600_intr_evcnt(void *acv, pci_intr_handle_t ih)
    203 {
    204 
    205 #if NSIO
    206 	if (DEC_6600_LINE_IS_ISA(ih))
    207 		return (sio_intr_evcnt(NULL /*XXX*/,
    208 		    DEC_6600_LINE_ISA_IRQ(ih)));
    209 #endif
    210 
    211 	return (alpha_shared_intr_evcnt(dec_6600_pci_intr, ih));
    212 }
    213 
    214 void *
    215 dec_6600_intr_establish(void *acv, pci_intr_handle_t ih, int level, int (*func)(void *), void *arg)
    216 {
    217 	void *cookie;
    218 
    219 #if NSIO
    220 	if (DEC_6600_LINE_IS_ISA(ih))
    221 		return (sio_intr_establish(NULL /*XXX*/,
    222 		    DEC_6600_LINE_ISA_IRQ(ih), IST_LEVEL, level, func, arg));
    223 #endif
    224 
    225 	if (ih >= PCI_NIRQ)
    226 		panic("dec_6600_intr_establish: bogus dec 6600 IRQ 0x%lx",
    227 		    ih);
    228 
    229 	cookie = alpha_shared_intr_establish(dec_6600_pci_intr, ih, IST_LEVEL,
    230 	    level, func, arg, irqtype);
    231 
    232 	if (cookie != NULL &&
    233 	    alpha_shared_intr_firstactive(dec_6600_pci_intr, ih)) {
    234 		scb_set(0x900 + SCB_IDXTOVEC(ih), dec_6600_iointr, NULL,
    235 		    level);
    236 		dec_6600_intr_enable(ih);
    237 	}
    238 	return (cookie);
    239 }
    240 
    241 void
    242 dec_6600_intr_disestablish(void *acv, void *cookie)
    243 {
    244 	struct alpha_shared_intrhand *ih = cookie;
    245 	unsigned int irq = ih->ih_num;
    246 	int s;
    247 
    248 #if NSIO
    249 	/*
    250 	 * We have to determine if this is an ISA IRQ or not!  We do this
    251 	 * by checking to see if the intrhand points back to an intrhead
    252 	 * that points to the sioprimary TSP.  If not, it's an ISA IRQ.
    253 	 * Pretty disgusting, eh?
    254 	 */
    255 	if (ih->ih_intrhead->intr_private != sioprimary) {
    256 		sio_intr_disestablish(NULL /*XXX*/, cookie);
    257 		return;
    258 	}
    259 #endif
    260 
    261 	s = splhigh();
    262 
    263 	alpha_shared_intr_disestablish(dec_6600_pci_intr, cookie, irqtype);
    264 	if (alpha_shared_intr_isactive(dec_6600_pci_intr, irq) == 0) {
    265 		dec_6600_intr_disable(irq);
    266 		alpha_shared_intr_set_dfltsharetype(dec_6600_pci_intr, irq,
    267 		    IST_NONE);
    268 		scb_free(0x900 + SCB_IDXTOVEC(irq));
    269 	}
    270 
    271 	splx(s);
    272 }
    273 
    274 void
    275 dec_6600_iointr(void *arg, unsigned long vec)
    276 {
    277 	int irq;
    278 
    279 	irq = SCB_VECTOIDX(vec - 0x900);
    280 
    281 	if (irq >= PCI_NIRQ)
    282 		panic("iointr: irq %d is too high", irq);
    283 
    284 	if (!alpha_shared_intr_dispatch(dec_6600_pci_intr, irq)) {
    285 		alpha_shared_intr_stray(dec_6600_pci_intr, irq,
    286 		    irqtype);
    287 		if (ALPHA_SHARED_INTR_DISABLE(dec_6600_pci_intr, irq))
    288 			dec_6600_intr_disable(irq);
    289 	} else
    290 		alpha_shared_intr_reset_strays(dec_6600_pci_intr, irq);
    291 }
    292 
    293 void
    294 dec_6600_intr_enable(int irq)
    295 {
    296 	alpha_mb();
    297 	STQP(TS_C_DIM0) |= 1UL << irq;
    298 	alpha_mb();
    299 }
    300 
    301 void
    302 dec_6600_intr_disable(int irq)
    303 {
    304 	alpha_mb();
    305 	STQP(TS_C_DIM0) &= ~(1UL << irq);
    306 	alpha_mb();
    307 }
    308 
    309 void *
    310 dec_6600_pciide_compat_intr_establish(void *v, struct device *dev,
    311     const struct pci_attach_args *pa, int chan, int (*func)(void *), void *arg)
    312 {
    313 	pci_chipset_tag_t pc = pa->pa_pc;
    314 	void *cookie = NULL;
    315 	int bus, irq;
    316 
    317 	pci_decompose_tag(pc, pa->pa_tag, &bus, NULL, NULL);
    318 
    319 	/*
    320 	 * If this isn't PCI bus #0 on the TSP that holds the PCI-ISA
    321 	 * bridge, all bets are off.
    322 	 */
    323 	if (bus != 0 || pc->pc_intr_v != sioprimary)
    324 		return (NULL);
    325 
    326 	irq = PCIIDE_COMPAT_IRQ(chan);
    327 #if NSIO
    328 	cookie = sio_intr_establish(NULL /*XXX*/, irq, IST_EDGE, IPL_BIO,
    329 	    func, arg);
    330 	if (cookie == NULL)
    331 		return (NULL);
    332 	printf("%s: %s channel interrupting at %s\n", dev->dv_xname,
    333 	    PCIIDE_CHANNEL_NAME(chan), sio_intr_string(NULL /*XXX*/, irq));
    334 #endif
    335 	return (cookie);
    336 }
    337