1 /* $NetBSD: pq3obio.c,v 1.5 2020/07/06 09:34:16 rin Exp $ */ 2 /*- 3 * Copyright (c) 2010, 2011 The NetBSD Foundation, Inc. 4 * All rights reserved. 5 * 6 * This code is derived from software contributed to The NetBSD Foundation 7 * by Raytheon BBN Technologies Corp and Defense Advanced Research Projects 8 * Agency and which was developed by Matt Thomas of 3am Software Foundry. 9 * 10 * This material is based upon work supported by the Defense Advanced Research 11 * Projects Agency and Space and Naval Warfare Systems Center, Pacific, under 12 * Contract No. N66001-09-C-2073. 13 * Approved for Public Release, Distribution Unlimited 14 * 15 * Redistribution and use in source and binary forms, with or without 16 * modification, are permitted provided that the following conditions 17 * are met: 18 * 1. Redistributions of source code must retain the above copyright 19 * notice, this list of conditions and the following disclaimer. 20 * 2. Redistributions in binary form must reproduce the above copyright 21 * notice, this list of conditions and the following disclaimer in the 22 * documentation and/or other materials provided with the distribution. 23 * 24 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 25 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 26 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 27 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 28 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 29 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 30 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 31 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 32 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 33 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 34 * POSSIBILITY OF SUCH DAMAGE. 35 */ 36 37 #define LBC_PRIVATE 38 39 #include <sys/cdefs.h> 40 __KERNEL_RCSID(0, "$NetBSD: pq3obio.c,v 1.5 2020/07/06 09:34:16 rin Exp $"); 41 42 #include "locators.h" 43 44 #include <sys/param.h> 45 #include <sys/device.h> 46 #include <sys/kmem.h> 47 #include <sys/bus.h> 48 #include <sys/extent.h> 49 50 #include <powerpc/booke/cpuvar.h> 51 #include <powerpc/booke/e500var.h> 52 #include <powerpc/booke/e500reg.h> 53 #include <powerpc/booke/obiovar.h> 54 55 #define OBIO_PORTS 8 56 57 static int pq3obio_match(device_t, cfdata_t, void *); 58 static void pq3obio_attach(device_t, device_t, void *); 59 60 CFATTACH_DECL_NEW(pq3obio, sizeof(struct pq3obio_softc), 61 pq3obio_match, pq3obio_attach, NULL, NULL); 62 63 static int 64 pq3obio_match(device_t parent, cfdata_t cf, void *aux) 65 { 66 67 if (!e500_cpunode_submatch(parent, cf, "lbc", aux)) 68 return 0; 69 70 return 1; 71 } 72 73 static int 74 pq3obio_print(void *aux, const char *pnp) 75 { 76 struct generic_attach_args * const ga = aux; 77 78 if (pnp) 79 aprint_normal(" at %s", pnp); 80 81 if (ga->ga_cs != OBIOCF_CS_DEFAULT) 82 aprint_normal(" cs %d", ga->ga_cs); 83 84 if (ga->ga_addr != OBIOCF_ADDR_DEFAULT) { 85 aprint_normal(" addr %#x", ga->ga_addr); 86 if (ga->ga_size != OBIOCF_SIZE_DEFAULT) 87 aprint_normal(" size %#x", ga->ga_size); 88 } 89 if (ga->ga_irq != OBIOCF_IRQ_DEFAULT) 90 aprint_normal(" irq %d", ga->ga_irq); 91 92 return UNCONF; 93 } 94 95 static int 96 pq3obio_search(device_t parent, cfdata_t cf, const int *slocs, void *aux) 97 { 98 struct pq3obio_softc * const sc = device_private(parent); 99 struct generic_attach_args ga; 100 bool tryagain; 101 102 do { 103 const struct pq3lbc_softc *lbc; 104 ga.ga_name = "obio"; 105 ga.ga_addr = cf->cf_loc[OBIOCF_ADDR]; 106 ga.ga_size = cf->cf_loc[OBIOCF_SIZE]; 107 ga.ga_irq = cf->cf_loc[OBIOCF_IRQ]; 108 ga.ga_cs = cf->cf_loc[OBIOCF_CS]; 109 ga.ga_bst = &sc->sc_obio_bst; 110 111 if (ga.ga_cs != OBIOCF_CS_DEFAULT) { 112 lbc = &sc->sc_lbcs[ga.ga_cs]; 113 if ((u_int) ga.ga_cs >= __arraycount(sc->sc_lbcs)) 114 return 0; 115 if (ga.ga_addr != OBIOCF_ADDR_DEFAULT) { 116 if (ga.ga_addr < lbc->lbc_base 117 || ga.ga_addr > lbc->lbc_limit) 118 return 0; 119 } else { 120 ga.ga_addr = lbc->lbc_base; 121 } 122 } else { 123 u_int cs; 124 if (ga.ga_addr == OBIOCF_ADDR_DEFAULT) 125 return 0; 126 for (cs = 0, lbc = sc->sc_lbcs; 127 cs < __arraycount(sc->sc_lbcs); 128 cs++, lbc++) { 129 if (ga.ga_addr >= lbc->lbc_base 130 && ga.ga_addr <= lbc->lbc_limit) { 131 ga.ga_cs = cs; 132 break; 133 } 134 } 135 if (ga.ga_cs == OBIOCF_CS_DEFAULT) 136 return 0; 137 } 138 139 if (ga.ga_size != OBIOCF_SIZE_DEFAULT) { 140 if (ga.ga_size >= lbc->lbc_limit - ga.ga_addr) 141 return 0; 142 } else { 143 ga.ga_size = lbc->lbc_limit + 1 - lbc->lbc_base; 144 } 145 146 tryagain = false; 147 if (config_match(parent, cf, &ga) > 0) { 148 int floc[OBIOCF_NLOCS] = { 149 [OBIOCF_ADDR] = ga.ga_addr, 150 [OBIOCF_SIZE] = ga.ga_size, 151 [OBIOCF_IRQ] = ga.ga_irq, 152 [OBIOCF_CS] = ga.ga_cs, 153 }; 154 config_attach_loc(parent, cf, floc, &ga, pq3obio_print); 155 tryagain = (cf->cf_fstate == FSTATE_STAR); 156 } 157 } while (tryagain); 158 159 return (0); 160 } 161 162 static const char br_msel_strings[8][6] = { 163 [__SHIFTOUT(BR_MSEL_GPCM,BR_MSEL)] = "GPCM", 164 [__SHIFTOUT(BR_MSEL_FCM,BR_MSEL)] = "FCM", 165 [__SHIFTOUT(BR_MSEL_SDRAM,BR_MSEL)] = "SDRAM", 166 [__SHIFTOUT(BR_MSEL_UPMA,BR_MSEL)] = "UPMA", 167 [__SHIFTOUT(BR_MSEL_UPMB,BR_MSEL)] = "UPMB", 168 [__SHIFTOUT(BR_MSEL_UPMC,BR_MSEL)] = "UPMC", 169 }; 170 171 static void 172 pq3obio_attach(device_t parent, device_t self, void *aux) 173 { 174 struct cpunode_softc * const psc = device_private(parent); 175 struct pq3obio_softc * const sc = device_private(self); 176 struct cpunode_attach_args * const cna = aux; 177 struct cpunode_locators * const cnl = &cna->cna_locs; 178 struct powerpc_bus_space * const t = &sc->sc_obio_bst; 179 u_int found = 0; 180 int error; 181 182 psc->sc_children |= cna->cna_childmask; 183 sc->sc_dev = self; 184 sc->sc_bst = cna->cna_memt; 185 186 error = bus_space_map(sc->sc_bst, cnl->cnl_addr, cnl->cnl_size, 0, 187 &sc->sc_bsh); 188 if (error) { 189 aprint_error("failed to map registers: %d\n", error); 190 return; 191 } 192 193 for (u_int i = 0; i < OBIO_PORTS; i++) { 194 struct pq3lbc_softc * const lbc = &sc->sc_lbcs[i]; 195 uint32_t br = bus_space_read_4(sc->sc_bst, sc->sc_bsh, BRn(i)); 196 if (br & BR_V) { 197 found++; 198 lbc->lbc_br = br; 199 lbc->lbc_or = bus_space_read_4(sc->sc_bst, 200 sc->sc_bsh, ORn(i)); 201 lbc->lbc_base = lbc->lbc_br & BR_BA & lbc->lbc_or; 202 lbc->lbc_limit = lbc->lbc_base + ~(lbc->lbc_or & OR_AM); 203 } 204 } 205 206 aprint_normal(": %u of 8 ports enabled\n", found); 207 if (found == 0) 208 return; 209 210 t->pbs_base = 0xffffffff; 211 t->pbs_limit = 0; 212 t->pbs_flags = _BUS_SPACE_BIG_ENDIAN; 213 214 u_int sorted[OBIO_PORTS]; 215 u_int nsorted = 0; 216 217 for (u_int i = 0; i < OBIO_PORTS; i++) { 218 struct pq3lbc_softc * const lbc = &sc->sc_lbcs[i]; 219 if ((lbc->lbc_br & BR_V) == 0) 220 continue; 221 222 u_int j; 223 for (j = 0; j < nsorted; j++) { 224 if (lbc->lbc_base < sc->sc_lbcs[sorted[j]].lbc_base) 225 break; 226 } 227 for (u_int k = ++nsorted; k > j; k--) { 228 sorted[k] = sorted[k - 1]; 229 } 230 sorted[j] = i; 231 232 if (lbc->lbc_base < t->pbs_base) 233 t->pbs_base = lbc->lbc_base; 234 if (lbc->lbc_limit > t->pbs_limit) 235 t->pbs_limit = lbc->lbc_limit; 236 #if 0 237 aprint_normal_dev(sc->sc_dev, 238 "cs%u: br=%#x or=%#x", i, lbc->lbc_br, lbc->lbc_or); 239 #endif 240 u_int n = ffs(~(lbc->lbc_or & OR_AM) + 1) - 1; 241 aprint_normal_dev(sc->sc_dev, 242 "cs%u: %u%cB %u-bit %s region at %#x\n", 243 i, 244 1 << (n % 10), " KMGTPE"[n / 10], 245 1 << (__SHIFTOUT(lbc->lbc_br, BR_PS) + 2), 246 br_msel_strings[__SHIFTOUT(lbc->lbc_br,BR_MSEL)], 247 lbc->lbc_base); 248 } 249 250 error = bus_space_init(t, device_xname(sc->sc_dev), NULL, 0); 251 if (error) { 252 aprint_error_dev(sc->sc_dev, 253 "failed to initialize obio bus space: %d\n", error); 254 return; 255 } 256 257 /* 258 * We've created a bus space which covers all the chip selects 259 * but there might be gaps inbetween them. We need to make sure 260 * bus_space_map will fail for those. To do that, we reserve 261 * the gaps between the chip-selects. 262 */ 263 for (u_int i = 1; i < found; i++) { 264 struct pq3lbc_softc * const lbc_lo = &sc->sc_lbcs[sorted[i-1]]; 265 struct pq3lbc_softc * const lbc_hi = &sc->sc_lbcs[sorted[i]]; 266 if (lbc_lo->lbc_limit + 1 == lbc_hi->lbc_base) 267 continue; 268 error = extent_alloc_region(t->pbs_extent, 269 lbc_lo->lbc_limit + 1, 270 lbc_hi->lbc_base - (lbc_lo->lbc_limit + 1), 0); 271 if (error) { 272 aprint_error_dev(sc->sc_dev, 273 "failed to reserve %#x..%#x: %d\n", 274 lbc_lo->lbc_limit + 1, 275 lbc_hi->lbc_base - 1, 276 error); 277 return; 278 } 279 } 280 281 /* 282 * Now we can do the device configuration to find what might 283 * be using obio. 284 */ 285 int locs[OBIOCF_NLOCS]; 286 locs[OBIOCF_ADDR] = OBIOCF_ADDR_DEFAULT; 287 locs[OBIOCF_SIZE] = OBIOCF_SIZE_DEFAULT; 288 locs[OBIOCF_CS] = OBIOCF_CS_DEFAULT; 289 config_search_loc(pq3obio_search, self, "obio", locs, NULL); 290 } 291