Home | History | Annotate | Line # | Download | only in pci
necpb.c revision 1.29.40.1
      1 /*	$NetBSD: necpb.c,v 1.29.40.1 2008/04/03 12:42:11 mjf Exp $	*/
      2 
      3 /*-
      4  * Copyright (c) 1997, 1998 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 of the Numerical Aerospace Simulation Facility,
      9  * NASA Ames Research Center.
     10  *
     11  * Redistribution and use in source and binary forms, with or without
     12  * modification, are permitted provided that the following conditions
     13  * are met:
     14  * 1. Redistributions of source code must retain the above copyright
     15  *    notice, this list of conditions and the following disclaimer.
     16  * 2. Redistributions in binary form must reproduce the above copyright
     17  *    notice, this list of conditions and the following disclaimer in the
     18  *    documentation and/or other materials provided with the distribution.
     19  * 3. All advertising materials mentioning features or use of this software
     20  *    must display the following acknowledgement:
     21  *	This product includes software developed by the NetBSD
     22  *	Foundation, Inc. and its contributors.
     23  * 4. Neither the name of The NetBSD Foundation nor the names of its
     24  *    contributors may be used to endorse or promote products derived
     25  *    from this software without specific prior written permission.
     26  *
     27  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     28  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     29  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     30  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     31  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     32  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     33  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     34  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     35  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     36  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     37  * POSSIBILITY OF SUCH DAMAGE.
     38  */
     39 
     40 /*
     41  * Copyright (c) 1996 Christopher G. Demetriou.  All rights reserved.
     42  * Copyright (c) 1994 Charles M. Hannum.  All rights reserved.
     43  *
     44  * Redistribution and use in source and binary forms, with or without
     45  * modification, are permitted provided that the following conditions
     46  * are met:
     47  * 1. Redistributions of source code must retain the above copyright
     48  *    notice, this list of conditions and the following disclaimer.
     49  * 2. Redistributions in binary form must reproduce the above copyright
     50  *    notice, this list of conditions and the following disclaimer in the
     51  *    documentation and/or other materials provided with the distribution.
     52  * 3. All advertising materials mentioning features or use of this software
     53  *    must display the following acknowledgement:
     54  *	This product includes software developed by Charles M. Hannum.
     55  * 4. The name of the author may not be used to endorse or promote products
     56  *    derived from this software without specific prior written permission.
     57  *
     58  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     59  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     60  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     61  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
     62  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
     63  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
     64  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
     65  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
     66  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
     67  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     68  */
     69 
     70 #include <sys/cdefs.h>
     71 __KERNEL_RCSID(0, "$NetBSD: necpb.c,v 1.29.40.1 2008/04/03 12:42:11 mjf Exp $");
     72 
     73 #include "opt_pci.h"
     74 
     75 #include <sys/types.h>
     76 #include <sys/param.h>
     77 #include <sys/time.h>
     78 #include <sys/systm.h>
     79 #include <sys/errno.h>
     80 #include <sys/device.h>
     81 #include <sys/malloc.h>
     82 #include <sys/extent.h>
     83 
     84 #include <uvm/uvm_extern.h>
     85 
     86 #define _ARC_BUS_DMA_PRIVATE
     87 #include <machine/bus.h>
     88 
     89 #include <machine/pio.h>
     90 
     91 #include <machine/autoconf.h>
     92 #include <machine/cpu.h>
     93 #include <machine/platform.h>
     94 
     95 #include <mips/cache.h>
     96 
     97 #include <dev/pci/pcivar.h>
     98 #include <dev/pci/pcireg.h>
     99 #include <dev/pci/pcidevs.h>
    100 #ifdef PCI_NETBSD_CONFIGURE
    101 #include <dev/pci/pciconf.h>
    102 #endif
    103 
    104 #include <arc/jazz/rd94.h>
    105 #include <arc/pci/necpbvar.h>
    106 
    107 #include "ioconf.h"
    108 
    109 int	necpbmatch(struct device *, struct cfdata *, void *);
    110 void	necpbattach(struct device *, struct device *, void *);
    111 
    112 void		necpb_attach_hook(struct device *, struct device *,
    113 		    struct pcibus_attach_args *);
    114 int		necpb_bus_maxdevs(pci_chipset_tag_t, int);
    115 pcitag_t	necpb_make_tag(pci_chipset_tag_t, int, int, int);
    116 void		necpb_decompose_tag(pci_chipset_tag_t, pcitag_t, int *,
    117 		    int *, int *);
    118 pcireg_t	necpb_conf_read(pci_chipset_tag_t, pcitag_t, int);
    119 void		necpb_conf_write(pci_chipset_tag_t, pcitag_t, int, pcireg_t);
    120 int		necpb_intr_map(struct pci_attach_args *, pci_intr_handle_t *);
    121 const char *	necpb_intr_string(pci_chipset_tag_t, pci_intr_handle_t);
    122 void *		necpb_intr_establish(pci_chipset_tag_t, pci_intr_handle_t,
    123 		    int, int (*func)(void *), void *);
    124 void		necpb_intr_disestablish(pci_chipset_tag_t, void *);
    125 #ifdef PCI_NETBSD_CONFIGURE
    126 void		necpb_conf_interrupt(pci_chipset_tag_t, int, int, int, int,
    127 		    int *);
    128 int		necpb_conf_hook(pci_chipset_tag_t, int, int, int, pcireg_t);
    129 #endif
    130 
    131 uint32_t	necpb_intr(uint32_t, struct clockframe *);
    132 
    133 
    134 CFATTACH_DECL(necpb, sizeof(struct necpb_softc),
    135     necpbmatch, necpbattach, NULL, NULL);
    136 
    137 static struct necpb_intrhand	*necpb_inttbl[4];
    138 
    139 /* There can be only one. */
    140 int necpbfound;
    141 struct necpb_context necpb_main_context;
    142 static long necpb_mem_ex_storage[EXTENT_FIXED_STORAGE_SIZE(10) / sizeof(long)];
    143 static long necpb_io_ex_storage[EXTENT_FIXED_STORAGE_SIZE(10) / sizeof(long)];
    144 
    145 int
    146 necpbmatch(struct device *parent, struct cfdata *match, void *aux)
    147 {
    148 	struct confargs *ca = aux;
    149 
    150 	if (strcmp(ca->ca_name, necpb_cd.cd_name) != 0)
    151 		return 0;
    152 
    153 	if (necpbfound)
    154 		return 0;
    155 
    156 	return 1;
    157 }
    158 
    159 /*
    160  * Set up the chipset's function pointers.
    161  */
    162 void
    163 necpb_init(struct necpb_context *ncp)
    164 {
    165 	pci_chipset_tag_t pc;
    166 #ifndef PCI_NETBSD_CONFIGURE
    167 	pcitag_t tag;
    168 	pcireg_t id, class, csr;
    169 	u_int dev;
    170 #endif
    171 
    172 	if (ncp->nc_initialized)
    173 		return;
    174 
    175 	arc_large_bus_space_init(&ncp->nc_memt, "necpcimem",
    176 	    RD94_P_PCI_MEM, 0, RD94_S_PCI_MEM);
    177 	arc_bus_space_init_extent(&ncp->nc_memt, (void *)necpb_mem_ex_storage,
    178 	    sizeof(necpb_mem_ex_storage));
    179 
    180 	arc_bus_space_init(&ncp->nc_iot, "necpciio",
    181 	    RD94_P_PCI_IO, RD94_V_PCI_IO, 0, RD94_S_PCI_IO);
    182 	arc_bus_space_init_extent(&ncp->nc_iot, (void *)necpb_io_ex_storage,
    183 	    sizeof(necpb_io_ex_storage));
    184 
    185 	jazz_bus_dma_tag_init(&ncp->nc_dmat);
    186 
    187 	pc = &ncp->nc_pc;
    188 	pc->pc_attach_hook = necpb_attach_hook;
    189 	pc->pc_bus_maxdevs = necpb_bus_maxdevs;
    190 	pc->pc_make_tag = necpb_make_tag;
    191 	pc->pc_decompose_tag = necpb_decompose_tag;
    192 	pc->pc_conf_read = necpb_conf_read;
    193 	pc->pc_conf_write = necpb_conf_write;
    194 	pc->pc_intr_map = necpb_intr_map;
    195 	pc->pc_intr_string = necpb_intr_string;
    196 	pc->pc_intr_establish = necpb_intr_establish;
    197 	pc->pc_intr_disestablish = necpb_intr_disestablish;
    198 #ifdef PCI_NETBSD_CONFIGURE
    199 	pc->pc_conf_interrupt = necpb_conf_interrupt;
    200 	pc->pc_conf_hook = necpb_conf_hook;
    201 #endif
    202 
    203 #ifndef PCI_NETBSD_CONFIGURE
    204 	/*
    205 	 * XXX:
    206 	 *  NEC's firmware does not configure PCI devices completely.
    207 	 *  We need to disable expansion ROM and enable mem/io/busmaster
    208 	 *  bits here.
    209 	 */
    210 	for (dev = 3; dev <= 5; dev++) {
    211 		tag = necpb_make_tag(pc, 0, dev, 0);
    212 		id = necpb_conf_read(pc, tag, PCI_ID_REG);
    213 
    214 		if (PCI_VENDOR(id) == PCI_VENDOR_INVALID)
    215 			continue;
    216 
    217 		class = necpb_conf_read(pc, tag, PCI_CLASS_REG);
    218 		csr = necpb_conf_read(pc, tag, PCI_COMMAND_STATUS_REG);
    219 		if (PCI_CLASS(class) != PCI_CLASS_BRIDGE ||
    220 		    PCI_SUBCLASS(class) != PCI_SUBCLASS_BRIDGE_PCI) {
    221 			csr |= PCI_COMMAND_IO_ENABLE | PCI_COMMAND_MEM_ENABLE;
    222 			necpb_conf_write(pc, tag, PCI_MAPREG_ROM, 0);
    223 		}
    224 		csr |= PCI_COMMAND_MASTER_ENABLE;
    225 		necpb_conf_write(pc, tag, PCI_COMMAND_STATUS_REG, csr);
    226 	}
    227 #endif
    228 
    229 	ncp->nc_initialized = 1;
    230 }
    231 
    232 void
    233 necpbattach(struct device *parent, struct device *self, void *aux)
    234 {
    235 	struct necpb_softc *sc = (struct necpb_softc *)self;
    236 	struct pcibus_attach_args pba;
    237 	pci_chipset_tag_t pc;
    238 	int i;
    239 
    240 	necpbfound = 1;
    241 
    242 	printf("\n");
    243 
    244 	sc->sc_ncp = &necpb_main_context;
    245 	necpb_init(sc->sc_ncp);
    246 
    247 	pc = &sc->sc_ncp->nc_pc;
    248 #ifdef PCI_NETBSD_CONFIGURE
    249 	pc->pc_ioext = extent_create("necpbio", 0x00100000, 0x01ffffff,
    250 	    M_DEVBUF, NULL, 0, EX_NOWAIT);
    251 	pc->pc_memext = extent_create("necpbmem", 0x08000000, 0x3fffffff,
    252 	    M_DEVBUF, NULL, 0, EX_NOWAIT);
    253 	pci_configure_bus(pc, pc->pc_ioext, pc->pc_memext, NULL, 0,
    254 	    mips_dcache_align);
    255 #endif
    256 
    257 	out32(RD94_SYS_PCI_INTMASK, 0xf);
    258 
    259 	for (i = 0; i < 4; i++)
    260 		necpb_inttbl[i] = NULL;
    261 
    262 	(*platform->set_intr)(MIPS_INT_MASK_2, necpb_intr, ARC_INTPRI_PCIISA);
    263 
    264 	pba.pba_iot = &sc->sc_ncp->nc_iot;
    265 	pba.pba_memt = &sc->sc_ncp->nc_memt;
    266 	pba.pba_dmat = &sc->sc_ncp->nc_dmat;
    267 	pba.pba_dmat64 = NULL;
    268 	pba.pba_pc = pc;
    269 	pba.pba_flags = PCI_FLAGS_IO_ENABLED | PCI_FLAGS_MEM_ENABLED;
    270 	pba.pba_bus = 0;
    271 	pba.pba_bridgetag = NULL;
    272 
    273 	config_found_ia(self, "pcibus", &pba, pcibusprint);
    274 }
    275 
    276 void
    277 necpb_attach_hook(struct device *parent, struct device *self,
    278     struct pcibus_attach_args *pba)
    279 {
    280 }
    281 
    282 int
    283 necpb_bus_maxdevs(pci_chipset_tag_t pc, int busno)
    284 {
    285 
    286 	return 32;
    287 }
    288 
    289 pcitag_t
    290 necpb_make_tag(pci_chipset_tag_t pc, int bus, int device, int function)
    291 {
    292 	pcitag_t tag;
    293 
    294 	if (bus >= 256 || device >= 32 || function >= 8)
    295 		panic("necpb_make_tag: bad request");
    296 
    297 	tag = 0x80000000 | (bus << 16) | (device << 11) | (function << 8);
    298 	return tag;
    299 }
    300 
    301 void
    302 necpb_decompose_tag(pci_chipset_tag_t pc, pcitag_t tag, int *bp, int *dp,
    303    int *fp)
    304 {
    305 
    306 	if (bp != NULL)
    307 		*bp = (tag >> 16) & 0xff;
    308 	if (dp != NULL)
    309 		*dp = (tag >> 11) & 0x1f;
    310 	if (fp != NULL)
    311 		*fp = (tag >> 8) & 0x07;
    312 }
    313 
    314 pcireg_t
    315 necpb_conf_read(pci_chipset_tag_t pc, pcitag_t tag, int reg)
    316 {
    317 	pcireg_t data;
    318 	int s;
    319 
    320 	s = splhigh();
    321 	out32(RD94_SYS_PCI_CONFADDR, tag | reg);
    322 	data = in32(RD94_SYS_PCI_CONFDATA);
    323 	out32(RD94_SYS_PCI_CONFADDR, 0);
    324 	splx(s);
    325 
    326 	return data;
    327 }
    328 
    329 void
    330 necpb_conf_write(pci_chipset_tag_t pc, pcitag_t tag, int reg, pcireg_t data)
    331 {
    332 	int s;
    333 
    334 	s = splhigh();
    335 	out32(RD94_SYS_PCI_CONFADDR, tag | reg);
    336 	out32(RD94_SYS_PCI_CONFDATA, data);
    337 	out32(RD94_SYS_PCI_CONFADDR, 0);
    338 	splx(s);
    339 }
    340 
    341 int
    342 necpb_intr_map(struct pci_attach_args *pa, pci_intr_handle_t *ihp)
    343 {
    344 	pci_chipset_tag_t pc = pa->pa_pc;
    345 	pcitag_t intrtag = pa->pa_intrtag;
    346 	int pin = pa->pa_intrpin;
    347 	int swiz = pa->pa_intrswiz % 4;
    348 	int bus, dev;
    349 
    350 	if (pin == 0) {
    351 		/* No IRQ used. */
    352 		*ihp = -1;
    353 		return 1;
    354 	}
    355 
    356 	if (pin > 4) {
    357 		printf("necpb_intr_map: bad interrupt pin %d\n", pin);
    358 		*ihp = -1;
    359 		return 1;
    360 	}
    361 
    362 	necpb_decompose_tag(pc, intrtag, &bus, &dev, NULL);
    363 	if (bus != 0) {
    364 		printf("necpb_intr_map: unknown bus %d\n", bus);
    365 		*ihp = -1;
    366 		return 1;
    367 	}
    368 
    369 	switch (dev) {
    370 	case 3:
    371 		*ihp = (pin - swiz + 2) % 4;
    372 		break;
    373 	case 4:
    374 		*ihp = (pin - swiz + 1) % 4;
    375 		break;
    376 	case 5:
    377 		*ihp = (pin - swiz + 0) % 4;
    378 		break;
    379 	default:
    380 		*ihp = -1;
    381 		return 1;
    382 	}
    383 
    384 	return 0;
    385 }
    386 
    387 const char *
    388 necpb_intr_string(pci_chipset_tag_t pc, pci_intr_handle_t ih)
    389 {
    390 	static char str[8];
    391 
    392 	if (ih >= 4)
    393 		panic("necpb_intr_string: bogus handle %ld", ih);
    394 	sprintf(str, "int %c", 'A' + (int)ih);
    395 	return str;
    396 }
    397 
    398 void *
    399 necpb_intr_establish(pci_chipset_tag_t pc, pci_intr_handle_t ih, int level,
    400     int (*func)(void *), void *arg)
    401 {
    402 	struct necpb_intrhand *n, *p;
    403 	uint32_t mask;
    404 
    405 	if (ih >= 4)
    406 		panic("necpb_intr_establish: bogus handle");
    407 
    408 	n = malloc(sizeof(struct necpb_intrhand), M_DEVBUF, M_NOWAIT);
    409 	if (n == NULL)
    410 		panic("necpb_intr_establish: can't malloc interrupt handle");
    411 
    412 	n->ih_func = func;
    413 	n->ih_arg = arg;
    414 	n->ih_next = NULL;
    415 	n->ih_intn = ih;
    416 	strlcpy(n->ih_evname, necpb_intr_string(pc, ih), sizeof(n->ih_evname));
    417 	evcnt_attach_dynamic(&n->ih_evcnt, EVCNT_TYPE_INTR, NULL, "necpb",
    418 	    n->ih_evname);
    419 
    420 	if (necpb_inttbl[ih] == NULL) {
    421 		necpb_inttbl[ih] = n;
    422 		mask = in32(RD94_SYS_PCI_INTMASK);
    423 		mask |= 1 << ih;
    424 		out32(RD94_SYS_PCI_INTMASK, mask);
    425 	} else {
    426 		p = necpb_inttbl[ih];
    427 		while (p->ih_next != NULL)
    428 			p = p->ih_next;
    429 		p->ih_next = n;
    430 	}
    431 
    432 	return n;
    433 }
    434 
    435 void
    436 necpb_intr_disestablish(pci_chipset_tag_t pc, void *cookie)
    437 {
    438 	struct necpb_intrhand *n, *p, *q;
    439 	uint32_t mask;
    440 
    441 	n = cookie;
    442 
    443 	q = NULL;
    444 	p = necpb_inttbl[n->ih_intn];
    445 	while (p != n) {
    446 		if (p == NULL)
    447 			panic("necpb_intr_disestablish: broken intr table");
    448 		q = p;
    449 		p = p->ih_next;
    450 	}
    451 
    452 	if (q == NULL) {
    453 		necpb_inttbl[n->ih_intn] = n->ih_next;
    454 		if (n->ih_next == NULL) {
    455 			mask = in32(RD94_SYS_PCI_INTMASK);
    456 			mask &= ~(1 << n->ih_intn);
    457 			out32(RD94_SYS_PCI_INTMASK, mask);
    458 		}
    459 	} else
    460 		q->ih_next = n->ih_next;
    461 
    462 	evcnt_detach(&n->ih_evcnt);
    463 
    464 	free(n, M_DEVBUF);
    465 }
    466 
    467 /*
    468  *   Handle PCI/EISA interrupt.
    469  */
    470 uint32_t
    471 necpb_intr(uint32_t mask, struct clockframe *cf)
    472 {
    473 	uint32_t vector, stat;
    474 	struct necpb_intrhand *p;
    475 	int i, handled;
    476 
    477 	handled = 0;
    478 	vector = in32(RD94_SYS_INTSTAT2) & 0xffff;
    479 
    480 	if (vector == 0x4000) {
    481 		stat = in32(RD94_SYS_PCI_INTSTAT);
    482 		stat &= in32(RD94_SYS_PCI_INTMASK);
    483 		for (i = 0; i < 4; i++) {
    484 			if (stat & (1 << i)) {
    485 #if 0
    486 				printf("pint %d\n", i);
    487 #endif
    488 				p = necpb_inttbl[i];
    489 				while (p != NULL) {
    490 					if ((*p->ih_func)(p->ih_arg)) {
    491 						p->ih_evcnt.ev_count++;
    492 						handled |= 1;
    493 					}
    494 					p = p->ih_next;
    495 				}
    496 			}
    497 		}
    498 	} else if (vector == 0x8000) {
    499 		printf("eisa_nmi\n");
    500 	} else {
    501 		printf("eint %d\n", vector & 0xff);
    502 #if 0
    503 		if (eisa_intr(vector & 0xff)) {
    504 			handled |= 1;
    505 		}
    506 #endif
    507 	}
    508 
    509 	return handled ? MIPS_INT_MASK_2 : 0;
    510 }
    511 
    512 #ifdef PCI_NETBSD_CONFIGURE
    513 void
    514 necpb_conf_interrupt(pci_chipset_tag_t pc, int bus, int dev, int func,
    515     int swiz, int *iline)
    516 {
    517 
    518 	return;
    519 }
    520 
    521 int
    522 necpb_conf_hook(pci_chipset_tag_t pc, int bus, int dev, int func,
    523     pcireg_t id)
    524 {
    525 
    526 	/* ignore bogus IDs */
    527 	if (id == 0)
    528 		return 0;
    529 
    530 	/* don't configure bridges */
    531 	if (bus == 0 && (dev == 1 || dev == 2))
    532 		return 0;
    533 
    534 	return PCI_CONF_DEFAULT;
    535 }
    536 #endif
    537