1 /* $NetBSD: bandit.c,v 1.31 2015/10/02 05:22:51 msaitoh Exp $ */ 2 3 /*- 4 * Copyright (c) 2000 Tsubai Masanari. All rights reserved. 5 * 6 * Redistribution and use in source and binary forms, with or without 7 * modification, are permitted provided that the following conditions 8 * are met: 9 * 1. Redistributions of source code must retain the above copyright 10 * notice, this list of conditions and the following disclaimer. 11 * 2. Redistributions in binary form must reproduce the above copyright 12 * notice, this list of conditions and the following disclaimer in the 13 * documentation and/or other materials provided with the distribution. 14 * 3. The name of the author may not be used to endorse or promote products 15 * derived from this software without specific prior written permission. 16 * 17 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 18 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 19 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 20 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 21 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 22 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 23 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 24 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 25 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE 26 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 27 */ 28 29 #include <sys/cdefs.h> 30 __KERNEL_RCSID(0, "$NetBSD: bandit.c,v 1.31 2015/10/02 05:22:51 msaitoh Exp $"); 31 32 #include <sys/param.h> 33 #include <sys/device.h> 34 #include <sys/systm.h> 35 36 #include <dev/pci/pcivar.h> 37 #include <dev/ofw/openfirm.h> 38 #include <dev/ofw/ofw_pci.h> 39 40 #include <machine/autoconf.h> 41 #include <machine/pci_machdep.h> 42 #include <machine/pio.h> 43 44 struct bandit_softc { 45 device_t sc_dev; 46 struct genppc_pci_chipset sc_pc; 47 struct powerpc_bus_space sc_iot; 48 struct powerpc_bus_space sc_memt; 49 }; 50 51 static void bandit_attach(device_t, device_t, void *); 52 static int bandit_match(device_t, cfdata_t, void *); 53 54 static pcireg_t bandit_conf_read(void *, pcitag_t, int); 55 static void bandit_conf_write(void *, pcitag_t, int, pcireg_t); 56 57 static void bandit_init(struct bandit_softc *); 58 59 CFATTACH_DECL_NEW(bandit, sizeof(struct bandit_softc), 60 bandit_match, bandit_attach, NULL, NULL); 61 62 static int 63 bandit_match(device_t parent, cfdata_t cf, void *aux) 64 { 65 struct confargs *ca = aux; 66 67 if (strcmp(ca->ca_name, "bandit") == 0 || 68 strcmp(ca->ca_name, "chaos") == 0) 69 return 1; 70 71 return 0; 72 } 73 74 static void 75 bandit_attach(device_t parent, device_t self, void *aux) 76 { 77 struct bandit_softc *sc = device_private(self); 78 pci_chipset_tag_t pc = &sc->sc_pc; 79 struct confargs *ca = aux; 80 struct pcibus_attach_args pba; 81 int len, node = ca->ca_node; 82 uint32_t reg[2], busrange[2]; 83 struct range { 84 uint32_t pci_hi, pci_mid, pci_lo; 85 uint32_t host; 86 uint32_t size_hi, size_lo; 87 } ranges[6], *rp = ranges; 88 89 aprint_normal("\n"); 90 sc->sc_dev = self; 91 92 /* Bandit address */ 93 if (OF_getprop(node, "reg", reg, sizeof(reg)) < 8) 94 return; 95 96 /* PCI bus number */ 97 if (OF_getprop(node, "bus-range", busrange, sizeof(busrange)) != 8) 98 return; 99 100 /* find i/o tag */ 101 len = OF_getprop(node, "ranges", ranges, sizeof(ranges)); 102 if (len == -1) 103 return; 104 while (len >= sizeof(ranges[0])) { 105 if ((rp->pci_hi & OFW_PCI_PHYS_HI_SPACEMASK) == 106 OFW_PCI_PHYS_HI_SPACE_IO) { 107 sc->sc_iot.pbs_base = rp->host; 108 sc->sc_iot.pbs_limit = rp->host + rp->size_lo; 109 break; 110 } 111 len -= sizeof(ranges[0]); 112 rp++; 113 } 114 memset(&sc->sc_iot, 0, sizeof(struct powerpc_bus_space)); 115 memset(&sc->sc_memt, 0, sizeof(struct powerpc_bus_space)); 116 sc->sc_iot.pbs_flags = _BUS_SPACE_LITTLE_ENDIAN|_BUS_SPACE_IO_TYPE; 117 if (ofwoea_map_space(RANGE_TYPE_PCI, RANGE_IO, node, &sc->sc_iot, 118 "bandit io-space") != 0) 119 panic("Can't init bandit io tag"); 120 121 sc->sc_memt.pbs_flags = _BUS_SPACE_LITTLE_ENDIAN|_BUS_SPACE_MEM_TYPE; 122 if (ofwoea_map_space(RANGE_TYPE_PCI, RANGE_MEM, node, &sc->sc_memt, 123 "bandit mem-space") != 0) 124 panic("Can't init bandit mem tag"); 125 126 macppc_pci_get_chipset_tag(pc); 127 pc->pc_node = node; 128 pc->pc_iot = &sc->sc_iot; 129 pc->pc_memt = &sc->sc_memt; 130 pc->pc_addr = mapiodev(reg[0] + 0x800000, 4, false); 131 pc->pc_data = mapiodev(reg[0] + 0xc00000, 8, false); 132 pc->pc_bus = busrange[0]; 133 pc->pc_conf_read = bandit_conf_read; 134 pc->pc_conf_write = bandit_conf_write; 135 136 bandit_init(sc); 137 138 memset(&pba, 0, sizeof(pba)); 139 pba.pba_memt = pc->pc_memt; 140 pba.pba_iot = pc->pc_iot; 141 pba.pba_dmat = &pci_bus_dma_tag; 142 pba.pba_dmat64 = NULL; 143 pba.pba_bus = pc->pc_bus; 144 pba.pba_bridgetag = NULL; 145 pba.pba_pc = pc; 146 pba.pba_flags = PCI_FLAGS_IO_OKAY | PCI_FLAGS_MEM_OKAY; 147 148 config_found_ia(self, "pcibus", &pba, pcibusprint); 149 } 150 151 static pcireg_t 152 bandit_conf_read(void *cookie, pcitag_t tag, int reg) 153 { 154 pci_chipset_tag_t pc = cookie; 155 pcireg_t data; 156 int bus, dev, func, s; 157 uint32_t x; 158 159 if ((unsigned int)reg >= PCI_CONF_SIZE) 160 return (pcireg_t) -1; 161 162 pci_decompose_tag(pc, tag, &bus, &dev, &func); 163 164 /* 165 * bandit's minimum device number of the first bus is 11. 166 * So we behave as if there is no device when dev < 11. 167 */ 168 if (func > 7) 169 panic("pci_conf_read: func > 7"); 170 171 if (bus == pc->pc_bus) { 172 if (dev < 11) 173 return 0xffffffff; 174 x = (1 << dev) | (func << 8) | reg; 175 } else 176 x = tag | reg | 1; 177 178 s = splhigh(); 179 180 out32rb(pc->pc_addr, x); 181 DELAY(10); 182 data = 0xffffffff; 183 if (!badaddr(pc->pc_data, 4)) 184 data = in32rb(pc->pc_data); 185 DELAY(10); 186 out32rb(pc->pc_addr, 0); 187 DELAY(10); 188 189 splx(s); 190 191 return data; 192 } 193 194 static void 195 bandit_conf_write(void *cookie, pcitag_t tag, int reg, pcireg_t data) 196 { 197 pci_chipset_tag_t pc = cookie; 198 int bus, dev, func, s; 199 u_int32_t x; 200 201 if ((unsigned int)reg >= PCI_CONF_SIZE) 202 return; 203 204 pci_decompose_tag(pc, tag, &bus, &dev, &func); 205 206 if (func > 7) 207 panic("pci_conf_write: func > 7"); 208 209 if (bus == pc->pc_bus) { 210 if (dev < 11) 211 panic("pci_conf_write: dev < 11"); 212 x = (1 << dev) | (func << 8) | reg; 213 } else 214 x = tag | reg | 1; 215 216 s = splhigh(); 217 218 out32rb(pc->pc_addr, x); 219 DELAY(10); 220 out32rb(pc->pc_data, data); 221 DELAY(10); 222 out32rb(pc->pc_addr, 0); 223 DELAY(10); 224 225 splx(s); 226 } 227 228 #define PCI_BANDIT 11 229 230 #define PCI_REG_MODE_SELECT 0x50 231 232 #define PCI_MODE_IO_COHERENT 0x040 /* I/O coherent */ 233 234 static void 235 bandit_init(struct bandit_softc *sc) 236 { 237 pci_chipset_tag_t pc = &sc->sc_pc; 238 pcitag_t tag; 239 u_int mode; 240 241 tag = pci_make_tag(pc, pc->pc_bus, PCI_BANDIT, 0); 242 if ((pci_conf_read(pc, tag, PCI_ID_REG) & 0xffff) == 0xffff) 243 return; 244 245 mode = pci_conf_read(pc, tag, PCI_REG_MODE_SELECT); 246 247 if ((mode & PCI_MODE_IO_COHERENT) == 0) { 248 mode |= PCI_MODE_IO_COHERENT; 249 pci_conf_write(pc, tag, PCI_REG_MODE_SELECT, mode); 250 } 251 } 252