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