Home | History | Annotate | Line # | Download | only in cardbus
rbus_ppb.c revision 1.45.10.1
      1  1.45.10.1  christos /*	$NetBSD: rbus_ppb.c,v 1.45.10.1 2019/06/10 22:07:06 christos Exp $	*/
      2        1.1       mcr 
      3        1.1       mcr /*
      4        1.1       mcr  * Copyright (c) 1999 The NetBSD Foundation, Inc.
      5        1.1       mcr  * All rights reserved.
      6        1.1       mcr  *
      7        1.1       mcr  * This code is derived from software contributed to The NetBSD Foundation
      8        1.1       mcr  * by Michael Richardson <mcr (at) sandelman.ottawa.on.ca>
      9        1.1       mcr  *
     10        1.1       mcr  * Redistribution and use in source and binary forms, with or without
     11        1.1       mcr  * modification, are permitted provided that the following conditions
     12        1.1       mcr  * are met:
     13        1.1       mcr  * 1. Redistributions of source code must retain the above copyright
     14        1.1       mcr  *    notice, this list of conditions and the following disclaimer.
     15        1.1       mcr  * 2. Redistributions in binary form must reproduce the above copyright
     16        1.1       mcr  *    notice, this list of conditions and the following disclaimer in the
     17        1.1       mcr  *    documentation and/or other materials provided with the distribution.
     18        1.1       mcr  *
     19        1.1       mcr  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     20        1.1       mcr  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     21        1.1       mcr  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     22        1.1       mcr  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     23        1.1       mcr  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     24        1.1       mcr  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     25        1.1       mcr  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     26        1.1       mcr  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     27        1.1       mcr  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     28        1.1       mcr  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     29        1.1       mcr  * POSSIBILITY OF SUCH DAMAGE.
     30        1.1       mcr  */
     31        1.1       mcr 
     32        1.1       mcr /*
     33        1.1       mcr  * CardBus front-end for the Intel/Digital DECchip 21152 PCI-PCI bridge
     34        1.1       mcr  */
     35        1.2     lukem 
     36        1.2     lukem #include <sys/cdefs.h>
     37  1.45.10.1  christos __KERNEL_RCSID(0, "$NetBSD: rbus_ppb.c,v 1.45.10.1 2019/06/10 22:07:06 christos Exp $");
     38        1.1       mcr 
     39        1.1       mcr #include <sys/param.h>
     40        1.1       mcr #include <sys/systm.h>
     41        1.1       mcr #include <sys/mbuf.h>
     42        1.1       mcr #include <sys/malloc.h>
     43        1.1       mcr #include <sys/kernel.h>
     44        1.1       mcr #include <sys/socket.h>
     45        1.1       mcr #include <sys/ioctl.h>
     46        1.1       mcr #include <sys/errno.h>
     47        1.1       mcr #include <sys/device.h>
     48       1.38    dyoung #include <sys/kmem.h>
     49        1.1       mcr 
     50        1.1       mcr #include <machine/endian.h>
     51        1.1       mcr 
     52       1.20        ad #include <sys/bus.h>
     53       1.20        ad #include <sys/intr.h>
     54        1.1       mcr 
     55        1.1       mcr #include <dev/pci/pcivar.h>
     56        1.1       mcr #include <dev/pci/pcireg.h>
     57        1.1       mcr #include <dev/pci/pcidevs.h>
     58        1.1       mcr #include <dev/pci/ppbreg.h>
     59        1.1       mcr 
     60        1.1       mcr #include <dev/ic/i82365reg.h>
     61        1.1       mcr 
     62       1.41  drochner #include <dev/cardbus/rbus.h>
     63        1.1       mcr #include <dev/pci/pccbbreg.h>
     64        1.1       mcr #include <dev/pci/pccbbvar.h>
     65        1.1       mcr 
     66        1.1       mcr #include <dev/cardbus/cardbusvar.h>
     67       1.12   mycroft #include <dev/pci/pcidevs.h>
     68        1.1       mcr 
     69       1.23  jmcneill #include <x86/pci/pci_addr_fixup.h>
     70       1.23  jmcneill #include <x86/pci/pci_bus_fixup.h>
     71        1.1       mcr #include <i386/pci/pci_intr_fixup.h>
     72        1.1       mcr #include <i386/pci/pcibios.h>
     73        1.1       mcr 
     74        1.1       mcr struct ppb_softc;
     75        1.1       mcr 
     76       1.31    cegger static int  ppb_cardbus_match(device_t, cfdata_t, void *);
     77       1.31    cegger static void ppb_cardbus_attach(device_t, device_t, void *);
     78       1.31    cegger static int  ppb_activate(device_t, enum devact);
     79       1.16  drochner int rppbprint(void *, const char *);
     80       1.16  drochner int rbus_intr_fixup(pci_chipset_tag_t, int, int, int);
     81       1.16  drochner void rbus_do_header_fixup(pci_chipset_tag_t, pcitag_t, void *);
     82        1.1       mcr 
     83       1.16  drochner static void rbus_pci_phys_allocate(pci_chipset_tag_t, pcitag_t, void *);
     84       1.16  drochner 
     85       1.16  drochner static int rbus_do_phys_allocate(pci_chipset_tag_t, pcitag_t, int,
     86       1.16  drochner 				 void *, int, bus_addr_t *, bus_size_t);
     87       1.16  drochner 
     88       1.16  drochner static void rbus_pci_phys_countspace(pci_chipset_tag_t, pcitag_t, void *);
     89       1.16  drochner 
     90       1.16  drochner static int rbus_do_phys_countspace(pci_chipset_tag_t, pcitag_t, int,
     91       1.16  drochner 				   void *, int, bus_addr_t *, bus_size_t);
     92       1.16  drochner 
     93       1.16  drochner unsigned int rbus_round_up(unsigned int, unsigned int);
     94        1.1       mcr 
     95        1.1       mcr 
     96        1.1       mcr struct ppb_cardbus_softc {
     97       1.25     joerg   device_t sc_dev;
     98        1.3   thorpej   pcitag_t sc_tag;
     99        1.1       mcr   int foo;
    100        1.1       mcr };
    101        1.1       mcr 
    102       1.25     joerg CFATTACH_DECL_NEW(rbus_ppb, sizeof(struct ppb_cardbus_softc),
    103       1.39    dyoung     ppb_cardbus_match, ppb_cardbus_attach, NULL, ppb_activate);
    104        1.1       mcr 
    105        1.1       mcr #ifdef  CBB_DEBUG
    106        1.1       mcr int rbus_ppb_debug = 0;   /* hack with kdb */
    107        1.1       mcr #define DPRINTF(X) if(rbus_ppb_debug) printf X
    108        1.1       mcr #else
    109        1.1       mcr #define DPRINTF(X)
    110        1.1       mcr #endif
    111        1.1       mcr 
    112        1.1       mcr static int
    113       1.31    cegger ppb_cardbus_match(device_t parent, cfdata_t match, void *aux)
    114        1.1       mcr {
    115        1.1       mcr 	struct cardbus_attach_args *ca = aux;
    116        1.1       mcr 
    117       1.35    dyoung 	if (PCI_VENDOR(ca->ca_id) ==  PCI_VENDOR_DEC &&
    118       1.35    dyoung 	    PCI_PRODUCT(ca->ca_id) == PCI_PRODUCT_DEC_21152)
    119        1.1       mcr 		return (1);
    120        1.1       mcr 
    121        1.1       mcr 	if(PCI_CLASS(ca->ca_class) == PCI_CLASS_BRIDGE &&
    122        1.1       mcr 	   PCI_SUBCLASS(ca->ca_class) == PCI_SUBCLASS_BRIDGE_PCI) {
    123        1.1       mcr 	  /* XXX */
    124        1.1       mcr 	  printf("recognizing generic bridge chip\n");
    125        1.1       mcr 	}
    126        1.1       mcr 
    127        1.1       mcr 	return (0);
    128        1.1       mcr }
    129        1.1       mcr 
    130        1.1       mcr 
    131        1.1       mcr int
    132       1.27       dsl rppbprint(void *aux, const char *pnp)
    133        1.1       mcr {
    134        1.1       mcr 	struct pcibus_attach_args *pba = aux;
    135        1.1       mcr 
    136        1.1       mcr 	/* only PCIs can attach to PPBs; easy. */
    137        1.1       mcr 	if (pnp)
    138        1.9   thorpej 		aprint_normal("pci at %s", pnp);
    139        1.9   thorpej 	aprint_normal(" bus %d (rbus)", pba->pba_bus);
    140        1.1       mcr 	return (UNCONF);
    141        1.1       mcr }
    142        1.1       mcr 
    143        1.1       mcr int
    144        1.1       mcr rbus_intr_fixup(pci_chipset_tag_t pc,
    145        1.1       mcr 		int minbus,
    146        1.1       mcr 		int maxbus,
    147        1.1       mcr 		int line)
    148        1.1       mcr {
    149        1.1       mcr   pci_device_foreach_min(pc, minbus,
    150        1.1       mcr 			 maxbus, rbus_do_header_fixup, (void *)&line);
    151        1.1       mcr   return 0;
    152        1.1       mcr }
    153        1.1       mcr 
    154        1.1       mcr void
    155       1.27       dsl rbus_do_header_fixup(pci_chipset_tag_t pc, pcitag_t tag, void *context)
    156        1.1       mcr {
    157        1.1       mcr   int bus, device, function;
    158       1.43  uebayasi   pcireg_t intr;
    159        1.1       mcr   int *pline = (int *)context;
    160        1.1       mcr   int line = *pline;
    161        1.1       mcr 
    162        1.1       mcr   pci_decompose_tag(pc, tag, &bus, &device, &function);
    163        1.1       mcr 
    164        1.1       mcr   intr = pci_conf_read(pc, tag, PCI_INTERRUPT_REG);
    165        1.1       mcr 
    166        1.1       mcr   intr &= ~(PCI_INTERRUPT_LINE_MASK << PCI_INTERRUPT_LINE_SHIFT);
    167        1.1       mcr   intr |= (line << PCI_INTERRUPT_LINE_SHIFT);
    168        1.1       mcr   pci_conf_write(pc, tag, PCI_INTERRUPT_REG, intr);
    169        1.1       mcr 
    170        1.1       mcr }
    171        1.1       mcr 
    172       1.15     perry /*
    173        1.1       mcr  * This function takes a range of PCI bus numbers and
    174        1.1       mcr  * allocates space for all devices found in this space (the BARs) from
    175        1.1       mcr  * the rbus space maps (I/O and memory).
    176        1.1       mcr  *
    177        1.1       mcr  * It assumes that "rbus" is defined. The whole concept does.
    178        1.1       mcr  *
    179        1.1       mcr  * It uses pci_device_foreach_min() to call rbus_pci_phys_allocate.
    180        1.1       mcr  * This function is mostly stolen from
    181       1.15     perry  *     pci_addr_fixup.c:pciaddr_resource_reserve.
    182        1.1       mcr  *
    183        1.1       mcr  */
    184        1.1       mcr struct rbus_pci_addr_fixup_context {
    185        1.1       mcr   struct ppb_cardbus_softc *csc;
    186        1.1       mcr   cardbus_chipset_tag_t ct;
    187        1.1       mcr   struct cardbus_softc *sc;
    188        1.1       mcr   struct cardbus_attach_args *caa;
    189        1.1       mcr   int    minbus;
    190        1.1       mcr   int    maxbus;
    191        1.1       mcr   bus_size_t  *bussize_ioreqs;
    192        1.1       mcr   bus_size_t  *bussize_memreqs;
    193        1.1       mcr   rbus_tag_t   *iobustags;
    194        1.1       mcr   rbus_tag_t   *membustags;
    195       1.15     perry };
    196        1.1       mcr 
    197       1.15     perry unsigned int
    198       1.16  drochner rbus_round_up(unsigned int size, unsigned int minval)
    199        1.1       mcr {
    200        1.1       mcr   unsigned int power2;
    201        1.1       mcr 
    202        1.1       mcr   if(size == 0) {
    203        1.1       mcr     return 0;
    204        1.1       mcr   }
    205        1.1       mcr 
    206       1.16  drochner   power2=minval;
    207        1.1       mcr 
    208        1.1       mcr   while(power2 < (1 << 31) &&
    209        1.1       mcr 	power2 < size) {
    210        1.1       mcr     power2 = power2 << 1;
    211        1.1       mcr   }
    212       1.15     perry 
    213        1.1       mcr   return power2;
    214        1.1       mcr }
    215       1.15     perry 
    216        1.1       mcr static void
    217        1.1       mcr rbus_pci_addr_fixup(struct ppb_cardbus_softc *csc,
    218        1.1       mcr 		    cardbus_chipset_tag_t ct,
    219        1.1       mcr 		    struct cardbus_softc *sc,
    220        1.1       mcr 		    pci_chipset_tag_t     pc,
    221        1.1       mcr 		    struct cardbus_attach_args *caa,
    222       1.38    dyoung 		    int minbus, const int maxbus)
    223        1.1       mcr {
    224        1.1       mcr 	struct rbus_pci_addr_fixup_context rct;
    225       1.38    dyoung 	const size_t size = sizeof(bus_size_t[maxbus+1]);
    226       1.38    dyoung 	int busnum;
    227        1.1       mcr 	bus_addr_t start;
    228        1.1       mcr 	bus_space_handle_t handle;
    229        1.1       mcr 	u_int32_t reg;
    230        1.1       mcr 
    231        1.1       mcr 	rct.csc=csc;
    232        1.1       mcr 	rct.ct=ct;
    233        1.1       mcr 	rct.sc=sc;
    234        1.1       mcr 	rct.caa=caa;
    235        1.1       mcr 	rct.minbus = minbus;
    236        1.1       mcr 	rct.maxbus = maxbus;
    237       1.45       chs 	rct.bussize_ioreqs = kmem_zalloc(size, KM_SLEEP);
    238       1.45       chs 	rct.bussize_memreqs = kmem_zalloc(size, KM_SLEEP);
    239       1.45       chs 	rct.iobustags = kmem_zalloc(maxbus * sizeof(rbus_tag_t), KM_SLEEP);
    240       1.45       chs 	rct.membustags = kmem_zalloc(maxbus * sizeof(rbus_tag_t), KM_SLEEP);
    241        1.1       mcr 
    242        1.1       mcr 	printf("%s: sizing buses %d-%d\n",
    243       1.25     joerg 	       device_xname(rct.csc->sc_dev),
    244        1.1       mcr 	       minbus, maxbus);
    245        1.1       mcr 
    246        1.1       mcr 	pci_device_foreach_min(pc, minbus, maxbus,
    247        1.1       mcr 			       rbus_pci_phys_countspace, &rct);
    248        1.1       mcr 
    249        1.1       mcr 	/*
    250        1.1       mcr 	 * we need to determine amount of address space for each
    251        1.1       mcr 	 * bus. To do this, we have to roll up amounts and then
    252        1.1       mcr 	 * we need to divide up the cardbus's extent to allocate
    253        1.1       mcr 	 * some space to each bus.
    254        1.1       mcr 	 */
    255        1.1       mcr 
    256        1.1       mcr 	for(busnum=maxbus; busnum > minbus; busnum--) {
    257        1.1       mcr 	  if(pci_bus_parent[busnum] != 0) {
    258        1.1       mcr 	    if(pci_bus_parent[busnum] < minbus ||
    259        1.1       mcr 	       pci_bus_parent[busnum] >= maxbus) {
    260        1.1       mcr 	      printf("%s: bus %d has illegal parent %d\n",
    261       1.25     joerg 		     device_xname(rct.csc->sc_dev),
    262        1.1       mcr 		     busnum, pci_bus_parent[busnum]);
    263        1.1       mcr 	      continue;
    264        1.1       mcr 	    }
    265        1.1       mcr 
    266        1.1       mcr 	    /* first round amount of space up */
    267        1.1       mcr 	    rct.bussize_ioreqs[busnum] =
    268  1.45.10.1  christos 	      rbus_round_up(rct.bussize_ioreqs[busnum],  PCI_BRIDGE_IO_MIN);
    269        1.1       mcr 	    rct.bussize_ioreqs[pci_bus_parent[busnum]] +=
    270        1.1       mcr 	      rct.bussize_ioreqs[busnum];
    271        1.1       mcr 
    272        1.1       mcr 	    rct.bussize_memreqs[busnum] =
    273  1.45.10.1  christos 	      rbus_round_up(rct.bussize_memreqs[busnum], PCI_BRIDGE_MEM_MIN);
    274        1.1       mcr 	    rct.bussize_memreqs[pci_bus_parent[busnum]] +=
    275        1.1       mcr 	      rct.bussize_memreqs[busnum];
    276        1.1       mcr 
    277        1.1       mcr 	  }
    278        1.1       mcr 	}
    279        1.1       mcr 
    280        1.1       mcr 	rct.bussize_ioreqs[minbus] =
    281  1.45.10.1  christos 	  rbus_round_up(rct.bussize_ioreqs[minbus], PCI_BRIDGE_IO_MIN);
    282  1.45.10.1  christos 	rct.bussize_memreqs[minbus] =  /* XXX Not 8 but PCI_BRIDGE_MEM_MIN ? */
    283        1.1       mcr 	  rbus_round_up(rct.bussize_memreqs[minbus], 8);
    284        1.1       mcr 
    285       1.38    dyoung 	printf("%s: total needs IO %08zx and MEM %08zx\n",
    286       1.25     joerg 	       device_xname(rct.csc->sc_dev),
    287        1.1       mcr 	       rct.bussize_ioreqs[minbus], rct.bussize_memreqs[minbus]);
    288        1.1       mcr 
    289        1.1       mcr 	if(!caa->ca_rbus_iot) {
    290        1.1       mcr 	  panic("no iot bus");
    291        1.1       mcr 	}
    292        1.1       mcr 
    293        1.1       mcr 	if(rct.bussize_ioreqs[minbus]) {
    294        1.1       mcr 	  if(rbus_space_alloc(caa->ca_rbus_iot, 0,
    295        1.1       mcr 			      rct.bussize_ioreqs[minbus],
    296        1.1       mcr 			      rct.bussize_ioreqs[minbus]-1 /* mask  */,
    297        1.1       mcr 			      rct.bussize_ioreqs[minbus] /* align */,
    298        1.1       mcr 			      /* flags */ 0,
    299        1.1       mcr 			      &start,
    300        1.1       mcr 			      &handle) != 0) {
    301       1.38    dyoung 	    panic("rbus_ppb: can not allocate %zu bytes in IO bus %d",
    302        1.1       mcr 		  rct.bussize_ioreqs[minbus], minbus);
    303        1.1       mcr 	  }
    304        1.1       mcr 	  rct.iobustags[minbus]=rbus_new(caa->ca_rbus_iot,
    305       1.15     perry 					 start,
    306        1.1       mcr 					 rct.bussize_ioreqs[minbus],
    307        1.1       mcr 					 0 /* offset to add to physical address
    308        1.1       mcr 					      to make processor address */,
    309        1.1       mcr 					 RBUS_SPACE_DEDICATE);
    310        1.1       mcr 	}
    311        1.1       mcr 
    312        1.1       mcr 	if(rct.bussize_memreqs[minbus]) {
    313        1.1       mcr 	  if(rbus_space_alloc(caa->ca_rbus_memt, 0,
    314        1.1       mcr 			      rct.bussize_memreqs[minbus],
    315        1.1       mcr 			      rct.bussize_memreqs[minbus]-1 /* mask */,
    316        1.1       mcr 			      rct.bussize_memreqs[minbus] /* align */,
    317        1.1       mcr 			      /* flags */ 0,
    318        1.1       mcr 			      &start,
    319        1.1       mcr 			      &handle) != 0) {
    320       1.38    dyoung 	    panic("%s: can not allocate %zu bytes in MEM bus %d",
    321       1.25     joerg 		  device_xname(rct.csc->sc_dev),
    322        1.1       mcr 		  rct.bussize_memreqs[minbus], minbus);
    323        1.1       mcr 	  }
    324        1.1       mcr 	  rct.membustags[minbus]=rbus_new(caa->ca_rbus_memt,
    325        1.1       mcr 					  start,
    326        1.1       mcr 					  rct.bussize_memreqs[minbus],
    327        1.1       mcr 					  0 /* offset to add to physical
    328        1.1       mcr 					       address to make processor
    329        1.1       mcr 					       address */,
    330        1.1       mcr 					  RBUS_SPACE_DEDICATE);
    331        1.1       mcr 	}
    332        1.1       mcr 
    333        1.1       mcr 	for(busnum=minbus+1; busnum <= maxbus; busnum++) {
    334        1.1       mcr 	  int busparent;
    335        1.1       mcr 
    336        1.1       mcr 	  busparent = pci_bus_parent[busnum];
    337        1.1       mcr 
    338       1.38    dyoung 	  printf("%s: bus %d (parent=%d) needs IO %08zx and MEM %08zx\n",
    339       1.25     joerg 		 device_xname(rct.csc->sc_dev),
    340        1.1       mcr 		 busnum,
    341        1.1       mcr 		 busparent,
    342        1.1       mcr 		 rct.bussize_ioreqs[busnum],
    343        1.1       mcr 		 rct.bussize_memreqs[busnum]);
    344        1.1       mcr 
    345        1.1       mcr 	  if(busparent > maxbus) {
    346        1.1       mcr 	    panic("rbus_ppb: illegal parent");
    347        1.1       mcr 	  }
    348        1.1       mcr 
    349        1.1       mcr 	  if(rct.bussize_ioreqs[busnum]) {
    350        1.1       mcr 	    if(rbus_space_alloc(rct.iobustags[busparent],
    351        1.1       mcr 				0,
    352        1.1       mcr 				rct.bussize_ioreqs[busnum],
    353        1.1       mcr 				rct.bussize_ioreqs[busnum]-1 /*mask */,
    354        1.1       mcr 				rct.bussize_ioreqs[busnum] /* align */,
    355        1.1       mcr 				/* flags */ 0,
    356        1.1       mcr 				&start,
    357        1.1       mcr 				&handle) != 0) {
    358       1.38    dyoung 	      panic("rbus_ppb: can not allocate %zu bytes in IO bus %d",
    359        1.1       mcr 		    rct.bussize_ioreqs[busnum], busnum);
    360        1.1       mcr 	    }
    361        1.1       mcr 	    rct.iobustags[busnum]=rbus_new(rct.iobustags[busparent],
    362        1.1       mcr 					   start,
    363        1.1       mcr 					   rct.bussize_ioreqs[busnum],
    364        1.1       mcr 					   0 /* offset to add to physical
    365        1.1       mcr 						address
    366        1.1       mcr 						to make processor address */,
    367        1.1       mcr 					   RBUS_SPACE_DEDICATE);
    368        1.1       mcr 
    369        1.1       mcr 	    /* program the bridge */
    370       1.15     perry 
    371        1.1       mcr 	    /* enable I/O space */
    372        1.1       mcr 	    reg = pci_conf_read(pc, pci_bus_tag[busnum],
    373        1.1       mcr 				PCI_COMMAND_STATUS_REG);
    374        1.1       mcr 	    reg |= PCI_COMMAND_IO_ENABLE | PCI_COMMAND_MASTER_ENABLE;
    375        1.1       mcr 	    pci_conf_write(pc, pci_bus_tag[busnum],
    376        1.1       mcr 			   PCI_COMMAND_STATUS_REG, reg);
    377        1.1       mcr 
    378        1.1       mcr 	    /* now init the limit register for I/O */
    379  1.45.10.1  christos 	    pci_conf_write(pc, pci_bus_tag[busnum], PCI_BRIDGE_STATIO_REG,
    380  1.45.10.1  christos 		__SHIFTIN((start >> 8)
    381  1.45.10.1  christos 		    & PCI_BRIDGE_STATIO_IOADDR, PCI_BRIDGE_STATIO_IOBASE) |
    382  1.45.10.1  christos 		__SHIFTIN(((start + rct.bussize_ioreqs[busnum] + 4095) >> 8)
    383  1.45.10.1  christos 		    & PCI_BRIDGE_STATIO_IOADDR, PCI_BRIDGE_STATIO_IOLIMIT));
    384        1.1       mcr 	  }
    385       1.15     perry 
    386        1.1       mcr 	  if(rct.bussize_memreqs[busnum]) {
    387        1.1       mcr 	    if(rbus_space_alloc(rct.membustags[busparent],
    388        1.1       mcr 				0,
    389       1.15     perry 				rct.bussize_memreqs[busnum] /* size  */,
    390       1.15     perry 				rct.bussize_memreqs[busnum]-1 /*mask */,
    391        1.1       mcr 				rct.bussize_memreqs[busnum] /* align */,
    392        1.1       mcr 				/* flags */ 0,
    393        1.1       mcr 				&start,
    394        1.1       mcr 				&handle) != 0) {
    395       1.38    dyoung 	      panic("rbus_ppb: can not allocate %zu bytes in MEM bus %d",
    396        1.1       mcr 		    rct.bussize_memreqs[busnum], busnum);
    397        1.1       mcr 	    }
    398        1.1       mcr 	    rct.membustags[busnum]=rbus_new(rct.membustags[busparent],
    399        1.1       mcr 					    start,
    400        1.1       mcr 					    rct.bussize_memreqs[busnum],
    401        1.1       mcr 					    0 /* offset to add to physical
    402        1.1       mcr 						 address to make processor
    403        1.1       mcr 						 address */,
    404        1.1       mcr 					    RBUS_SPACE_DEDICATE);
    405        1.1       mcr 
    406        1.1       mcr 	    /* program the bridge */
    407        1.1       mcr 	    /* enable memory space */
    408        1.1       mcr 	    reg = pci_conf_read(pc, pci_bus_tag[busnum],
    409        1.1       mcr 				PCI_COMMAND_STATUS_REG);
    410        1.1       mcr 	    reg |= PCI_COMMAND_MEM_ENABLE | PCI_COMMAND_MASTER_ENABLE;
    411        1.1       mcr 	    pci_conf_write(pc, pci_bus_tag[busnum],
    412        1.1       mcr 			   PCI_COMMAND_STATUS_REG, reg);
    413        1.1       mcr 
    414        1.1       mcr 	    /* now init the limit register for memory */
    415  1.45.10.1  christos 	    pci_conf_write(pc, pci_bus_tag[busnum], PCI_BRIDGE_MEMORY_REG,
    416  1.45.10.1  christos 		__SHIFTIN((start >> 16) & PCI_BRIDGE_MEMORY_ADDR,
    417  1.45.10.1  christos 		    PCI_BRIDGE_MEMORY_BASE) |
    418  1.45.10.1  christos 		__SHIFTIN(((start + rct.bussize_memreqs[busnum]
    419  1.45.10.1  christos 			    + PCI_BRIDGE_MEM_MIN - 1) >> 16)
    420  1.45.10.1  christos 		    & PCI_BRIDGE_MEMORY_ADDR, PCI_BRIDGE_MEMORY_LIMIT));
    421        1.1       mcr 
    422        1.1       mcr 	    /* and set the prefetchable limits as well */
    423  1.45.10.1  christos 	    pci_conf_write(pc, pci_bus_tag[busnum], PCI_BRIDGE_PREFETCHMEM_REG,
    424  1.45.10.1  christos 		__SHIFTIN((start >> 16) & PCI_BRIDGE_PREFETCHMEM_ADDR,
    425  1.45.10.1  christos 		    PCI_BRIDGE_PREFETCHMEM_BASE) |
    426  1.45.10.1  christos 		__SHIFTIN(((start + rct.bussize_memreqs[busnum]
    427  1.45.10.1  christos 			    + PCI_BRIDGE_MEM_MIN - 1) >> 16)
    428  1.45.10.1  christos 		    & PCI_BRIDGE_PREFETCHMEM_ADDR,
    429  1.45.10.1  christos 		    PCI_BRIDGE_PREFETCHMEM_LIMIT));
    430        1.1       mcr 
    431        1.1       mcr 	    /* pci_conf_print(pc, pci_bus_tag[busnum], NULL); */
    432        1.1       mcr 	  }
    433        1.1       mcr 	}
    434        1.1       mcr 
    435        1.1       mcr 	printf("%s: configuring buses %d-%d\n",
    436       1.25     joerg 		device_xname(rct.csc->sc_dev),
    437        1.1       mcr 	       minbus, maxbus);
    438        1.1       mcr 	pci_device_foreach_min(pc, minbus, maxbus,
    439        1.1       mcr 			       rbus_pci_phys_allocate, &rct);
    440       1.38    dyoung 
    441       1.38    dyoung 	kmem_free(rct.bussize_ioreqs, size);
    442       1.38    dyoung 	kmem_free(rct.bussize_memreqs, size);
    443       1.38    dyoung 	kmem_free(rct.iobustags, maxbus * sizeof(rbus_tag_t));
    444       1.38    dyoung 	kmem_free(rct.membustags, maxbus * sizeof(rbus_tag_t));
    445        1.1       mcr }
    446        1.1       mcr 
    447        1.1       mcr static void
    448       1.27       dsl rbus_pci_phys_countspace(pci_chipset_tag_t pc, pcitag_t tag, void *context)
    449        1.1       mcr {
    450        1.1       mcr         int bus, device, function;
    451        1.1       mcr 	struct  rbus_pci_addr_fixup_context *rct =
    452        1.1       mcr 	  (struct  rbus_pci_addr_fixup_context *)context;
    453        1.1       mcr 
    454        1.1       mcr 	pci_decompose_tag(pc, tag, &bus, &device, &function);
    455        1.1       mcr 
    456        1.1       mcr 	printf("%s: configuring device %02x:%02x:%02x\n",
    457       1.25     joerg 	       device_xname(rct->csc->sc_dev),
    458        1.1       mcr 	       bus, device, function);
    459        1.1       mcr 
    460        1.1       mcr 	pciaddr_resource_manage(pc, tag,
    461        1.1       mcr 				rbus_do_phys_countspace, context);
    462        1.1       mcr }
    463        1.1       mcr 
    464       1.15     perry 
    465        1.1       mcr int
    466       1.28       dsl rbus_do_phys_countspace(pci_chipset_tag_t pc, pcitag_t tag, int mapreg, void *ctx, int type, bus_addr_t *addr, bus_size_t size)
    467        1.1       mcr {
    468        1.1       mcr 	struct  rbus_pci_addr_fixup_context *rct =
    469        1.1       mcr 	  (struct  rbus_pci_addr_fixup_context *)ctx;
    470        1.1       mcr 	int bus, device, function;
    471        1.1       mcr 
    472        1.1       mcr 	pci_decompose_tag(pc, tag, &bus, &device, &function);
    473        1.1       mcr 
    474        1.1       mcr 	if(size > (1<<24)) {
    475        1.1       mcr 	  printf("%s: skipping huge space request of size=%08x\n",
    476       1.25     joerg 		 device_xname(rct->csc->sc_dev), (unsigned int)size);
    477        1.1       mcr 	  return 0;
    478        1.1       mcr 	}
    479        1.1       mcr 
    480        1.1       mcr 	if(PCI_MAPREG_TYPE(type) == PCI_MAPREG_TYPE_IO) {
    481        1.1       mcr 	  rct->bussize_ioreqs[bus] += size;
    482        1.1       mcr 	} else {
    483        1.1       mcr 	  rct->bussize_memreqs[bus]+= size;
    484        1.1       mcr 	}
    485       1.15     perry 
    486        1.1       mcr 	return 0;
    487        1.1       mcr }
    488        1.1       mcr 
    489        1.1       mcr static void
    490       1.27       dsl rbus_pci_phys_allocate(pci_chipset_tag_t pc, pcitag_t tag, void *context)
    491        1.1       mcr {
    492        1.1       mcr         int bus, device, function, command;
    493        1.1       mcr 	struct rbus_pci_addr_fixup_context *rct =
    494        1.1       mcr 	  (struct rbus_pci_addr_fixup_context *)context;
    495       1.15     perry 
    496        1.1       mcr 	pci_decompose_tag(pc, tag, &bus, &device, &function);
    497        1.1       mcr 
    498        1.1       mcr 	printf("%s: configuring device %02x:%02x:%02x\n",
    499       1.25     joerg 	       device_xname(rct->csc->sc_dev),
    500        1.1       mcr 	       bus, device, function);
    501        1.1       mcr 
    502        1.1       mcr 	pciaddr_resource_manage(pc, tag,
    503        1.1       mcr 				rbus_do_phys_allocate, context);
    504        1.1       mcr 
    505        1.1       mcr 	/* now turn the device's memory and I/O on */
    506        1.1       mcr 	command = pci_conf_read(pc, tag, PCI_COMMAND_STATUS_REG);
    507        1.1       mcr 	command |= PCI_COMMAND_IO_ENABLE|PCI_COMMAND_MEM_ENABLE;
    508        1.1       mcr 	pci_conf_write(pc, tag, PCI_COMMAND_STATUS_REG, command);
    509        1.1       mcr }
    510        1.1       mcr 
    511        1.1       mcr int
    512       1.28       dsl rbus_do_phys_allocate(pci_chipset_tag_t pc, pcitag_t tag, int mapreg, void *ctx, int type, bus_addr_t *addr, bus_size_t size)
    513        1.1       mcr {
    514        1.1       mcr 	struct  rbus_pci_addr_fixup_context *rct =
    515        1.1       mcr 	  (struct  rbus_pci_addr_fixup_context *)ctx;
    516        1.1       mcr 	cardbus_chipset_tag_t ct     = rct->ct;
    517        1.1       mcr 	struct cardbus_softc *sc     = rct->sc;
    518        1.1       mcr 	cardbus_function_t       *cf = sc->sc_cf;
    519        1.1       mcr 	rbus_tag_t          rbustag;
    520        1.1       mcr 	bus_addr_t mask = size -1;
    521        1.1       mcr 	bus_addr_t base = 0;
    522        1.1       mcr 	bus_space_handle_t handle;
    523        1.1       mcr 	int busflags = 0;
    524        1.1       mcr 	int flags    = 0;
    525       1.16  drochner 	const char *bustype;
    526        1.1       mcr 	int bus, device, function;
    527        1.1       mcr 
    528        1.1       mcr 	pci_decompose_tag(pc, tag, &bus, &device, &function);
    529        1.1       mcr 
    530        1.1       mcr 	/*
    531        1.1       mcr 	 * some devices come up with garbage in them (Tulip?)
    532        1.1       mcr 	 * we are in charge here, so give them address
    533       1.15     perry 	 * space anyway.
    534        1.1       mcr 	 *
    535        1.1       mcr 	 * XXX this may be due to no secondary PCI reset!!!
    536        1.1       mcr 	 */
    537        1.1       mcr #if 0
    538        1.1       mcr 	if (*addr) {
    539        1.1       mcr 		printf("Already allocated space at %08x\n",
    540        1.1       mcr 		       (unsigned int)*addr);
    541        1.1       mcr 		return (0);
    542        1.1       mcr 	}
    543        1.1       mcr #endif
    544        1.1       mcr 
    545        1.1       mcr 	if(size > (1<<24)) {
    546        1.1       mcr 	  printf("%s: skipping huge space request of size=%08x\n",
    547       1.25     joerg 		 device_xname(rct->csc->sc_dev), (unsigned int)size);
    548        1.1       mcr 	  return 0;
    549        1.1       mcr 	}
    550        1.1       mcr 
    551        1.1       mcr 	if(PCI_MAPREG_TYPE(type) == PCI_MAPREG_TYPE_IO) {
    552        1.1       mcr 	  rbustag = rct->iobustags[bus];
    553        1.1       mcr 	  bustype = "io";
    554        1.1       mcr 	} else {
    555        1.1       mcr 	  rbustag = rct->membustags[bus];
    556        1.1       mcr 	  bustype = "mem";
    557        1.1       mcr 	}
    558        1.1       mcr 
    559        1.1       mcr 	if((*cf->cardbus_space_alloc)(ct, rbustag, base, size,
    560        1.1       mcr 				      mask, size, busflags|flags,
    561        1.1       mcr 				      addr, &handle)) {
    562        1.1       mcr 	  printf("%s: no available resources (size=%08x) for bar %2d. fixup failed\n",
    563       1.25     joerg 		 device_xname(rct->csc->sc_dev), (unsigned int)size, mapreg);
    564        1.1       mcr 
    565        1.1       mcr 	  *addr = 0;
    566        1.1       mcr 	  pci_conf_write(pc, tag, mapreg, *addr);
    567        1.1       mcr 	  return (1);
    568        1.1       mcr 	}
    569        1.1       mcr 
    570        1.1       mcr 	printf("%s: alloc %s space of size %08x for %02d:%02d:%02d -> %08x\n",
    571       1.25     joerg 	       device_xname(rct->csc->sc_dev),
    572       1.15     perry 	       bustype,
    573        1.1       mcr 	       (unsigned int)size,
    574        1.1       mcr 	       bus, device, function, (unsigned int)*addr);
    575        1.1       mcr 
    576        1.1       mcr 	/* write new address to PCI device configuration header */
    577        1.1       mcr 	pci_conf_write(pc, tag, mapreg, *addr);
    578        1.1       mcr 
    579        1.1       mcr 	/* check */
    580        1.1       mcr 	{
    581        1.1       mcr 		DPRINTF(("%s: pci_addr_fixup: ",
    582       1.25     joerg 			 device_xname(rct->csc->sc_dev)));
    583        1.1       mcr #ifdef  CBB_DEBUG
    584        1.1       mcr 		if(rbus_ppb_debug) { pciaddr_print_devid(pc, tag); }
    585        1.1       mcr #endif
    586        1.1       mcr 	}
    587        1.1       mcr 
    588        1.1       mcr 	/* double check that the value got inserted correctly */
    589        1.1       mcr 	if (pciaddr_ioaddr(pci_conf_read(pc, tag, mapreg)) != *addr) {
    590        1.1       mcr 		pci_conf_write(pc, tag, mapreg, 0); /* clear */
    591        1.1       mcr 		printf("%s: fixup failed. (new address=%#x)\n",
    592       1.25     joerg 		       device_xname(rct->csc->sc_dev),
    593        1.1       mcr 		       (unsigned)*addr);
    594        1.1       mcr 		return (1);
    595        1.1       mcr 	}
    596        1.1       mcr 
    597        1.1       mcr 	DPRINTF(("new address 0x%08x\n",
    598        1.1       mcr 		 (unsigned)*addr));
    599        1.1       mcr 
    600        1.1       mcr 	return (0);
    601        1.1       mcr }
    602        1.1       mcr 
    603        1.1       mcr static void
    604       1.25     joerg ppb_cardbus_attach(device_t parent, device_t self, void *aux)
    605        1.1       mcr {
    606       1.19   thorpej 	struct ppb_cardbus_softc *csc = device_private(self);
    607       1.24     joerg 	struct cardbus_softc *parent_sc = device_private(parent);
    608        1.1       mcr 	struct cardbus_attach_args *ca = aux;
    609        1.1       mcr 	cardbus_devfunc_t ct = ca->ca_ct;
    610        1.1       mcr 	cardbus_chipset_tag_t cc = ct->ct_cc;
    611        1.1       mcr 	struct pccbb_softc *psc = (struct pccbb_softc *)cc;
    612        1.1       mcr 	struct pcibus_attach_args pba;
    613        1.1       mcr 	char devinfo[256];
    614        1.1       mcr 	pcireg_t busdata;
    615        1.1       mcr 	int minbus, maxbus;
    616        1.1       mcr 
    617       1.25     joerg 	csc->sc_dev = self;
    618       1.25     joerg 
    619       1.11    itojun 	pci_devinfo(ca->ca_id, ca->ca_class, 0, devinfo, sizeof(devinfo));
    620        1.1       mcr 	printf(": %s (rev. 0x%02x)\n", devinfo, PCI_REVISION(ca->ca_class));
    621        1.1       mcr 
    622       1.32    dyoung 	csc->sc_tag = ca->ca_tag;
    623        1.3   thorpej 
    624  1.45.10.1  christos 	busdata = Cardbus_conf_read(ct, ca->ca_tag, PCI_BRIDGE_BUS_REG);
    625        1.1       mcr 	minbus = pcibios_max_bus;
    626       1.10     lukem 	maxbus = minbus;		/* XXX; gcc */
    627        1.1       mcr 
    628  1.45.10.1  christos 	if (PCI_BRIDGE_BUS_NUM_SECONDARY(busdata) == 0) {
    629       1.21    cegger 		aprint_error_dev(self, "not configured by system firmware calling pci_bus_fixup(%d)\n", 0);
    630        1.1       mcr 
    631        1.1       mcr 	  /*
    632        1.1       mcr 	   * first, pull the reset wire on the secondary bridge
    633        1.1       mcr 	   * to clear all devices
    634        1.1       mcr 	   */
    635  1.45.10.1  christos 	  busdata = Cardbus_conf_read(ct, ca->ca_tag, PCI_BRIDGE_CONTROL_REG);
    636  1.45.10.1  christos 	  Cardbus_conf_write(ct, ca->ca_tag, PCI_BRIDGE_CONTROL_REG,
    637  1.45.10.1  christos 	      busdata | PCI_BRIDGE_CONTROL_SECBR);
    638        1.1       mcr 	  delay(1);
    639  1.45.10.1  christos 	  Cardbus_conf_write(ct, ca->ca_tag, PCI_BRIDGE_CONTROL_REG,
    640        1.1       mcr 			     busdata);
    641        1.1       mcr 
    642        1.1       mcr 	  /* then go initialize the bridge control registers */
    643        1.1       mcr 	  maxbus = pci_bus_fixup(psc->sc_pc, 0);
    644        1.1       mcr 	}
    645        1.1       mcr 
    646  1.45.10.1  christos 	busdata = Cardbus_conf_read(ct, ca->ca_tag, PCI_BRIDGE_BUS_REG);
    647  1.45.10.1  christos 	if(PCI_BRIDGE_BUS_NUM_SECONDARY(busdata) == 0) {
    648       1.21    cegger 		aprint_error_dev(self, "still not configured, not fixable.\n");
    649       1.21    cegger 		return;
    650        1.1       mcr 	}
    651        1.1       mcr 
    652       1.15     perry #if 0
    653  1.45.10.1  christos 	minbus = PCI_BRIDGE_BUS_NUM_SECONDARY(busdata);
    654  1.45.10.1  christos 	maxbus = PCI_BRIDGE_BUS_NUM_SUBORDINATE(busdata);
    655        1.1       mcr #endif
    656       1.15     perry 
    657        1.1       mcr 	/* now, go and assign addresses for the new devices */
    658        1.1       mcr 	rbus_pci_addr_fixup(csc, cc, parent_sc,
    659        1.1       mcr 			    psc->sc_pc,
    660        1.1       mcr 			    ca,
    661        1.1       mcr 			    minbus, maxbus);
    662        1.1       mcr 
    663        1.1       mcr 	/*
    664        1.1       mcr 	 * now configure all connected devices to the IRQ which
    665        1.1       mcr 	 * was assigned to this slot, as they will all arrive from
    666        1.1       mcr 	 * that IRQ.
    667        1.1       mcr 	 */
    668       1.41  drochner 	rbus_intr_fixup(psc->sc_pc, minbus, maxbus, 0);
    669        1.1       mcr 
    670       1.15     perry 	/*
    671        1.1       mcr 	 * enable direct routing of interrupts. We do this because
    672        1.1       mcr 	 * we can not manage to get pccb_intr_establish() called until
    673        1.1       mcr 	 * PCI subsystem is merged with rbus. The major thing that this
    674        1.1       mcr 	 * routine does is avoid calling the driver's interrupt routine
    675        1.1       mcr 	 * when the card has been removed.
    676        1.1       mcr 	 *
    677        1.1       mcr 	 * The rbus_ppb.c can not cope with card desertions until the merging
    678        1.1       mcr 	 * anyway.
    679        1.1       mcr 	 */
    680        1.1       mcr 	pccbb_intr_route(psc);
    681        1.1       mcr 
    682        1.1       mcr 	/*
    683        1.1       mcr 	 * Attach the PCI bus than hangs off of it.
    684        1.1       mcr 	 *
    685        1.1       mcr 	 * XXX Don't pass-through Memory Read Multiple.  Should we?
    686        1.1       mcr 	 * XXX Consult the spec...
    687       1.15     perry 	 */
    688        1.1       mcr 	pba.pba_iot  = ca->ca_iot;
    689        1.1       mcr 	pba.pba_memt = ca->ca_memt;
    690        1.1       mcr 	pba.pba_dmat = ca->ca_dmat;
    691        1.1       mcr 	pba.pba_pc   = psc->sc_pc;
    692  1.45.10.1  christos 	pba.pba_flags    = PCI_FLAGS_IO_OKAY | PCI_FLAGS_MEM_OKAY;
    693  1.45.10.1  christos 	pba.pba_bus      = PCI_BRIDGE_BUS_NUM_SECONDARY(busdata);
    694        1.4     lukem 	pba.pba_bridgetag = &csc->sc_tag;
    695        1.1       mcr 	/*pba.pba_intrswiz = parent_sc->sc_intrswiz; */
    696        1.1       mcr 	pba.pba_intrtag  = psc->sc_pa.pa_intrtag;
    697        1.1       mcr 
    698       1.13  drochner 	config_found_ia(self, "pcibus", &pba, rppbprint);
    699        1.1       mcr }
    700        1.1       mcr 
    701        1.1       mcr int
    702       1.31    cegger ppb_activate(device_t self, enum devact act)
    703        1.1       mcr {
    704        1.1       mcr   printf("ppb_activate called\n");
    705        1.1       mcr   return 0;
    706        1.1       mcr }
    707