1 /*- 2 * SPDX-License-Identifier: BSD-2-Clause-FreeBSD 3 * 4 * Copyright (c) 2013 Nathan Whitehorn 5 * All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 16 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND 17 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 19 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE 20 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 21 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 22 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 23 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 24 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 25 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 26 * SUCH DAMAGE. 27 */ 28 29 #include <sys/cdefs.h> 30 __FBSDID("$FreeBSD$"); 31 #include <sys/param.h> 32 #include <sys/systm.h> 33 #include <sys/module.h> 34 #include <sys/bus.h> 35 #include <sys/conf.h> 36 #include <sys/kernel.h> 37 #include <sys/rman.h> 38 39 #include <dev/ofw/openfirm.h> 40 #include <dev/ofw/ofw_bus.h> 41 #include <dev/ofw/ofw_bus_subr.h> 42 43 #include <dev/fdt/simplebus.h> 44 45 /* 46 * Bus interface. 47 */ 48 static int simplebus_probe(device_t dev); 49 static struct resource *simplebus_alloc_resource(device_t, device_t, int, 50 int *, rman_res_t, rman_res_t, rman_res_t, u_int); 51 static void simplebus_probe_nomatch(device_t bus, device_t child); 52 static int simplebus_print_child(device_t bus, device_t child); 53 static device_t simplebus_add_child(device_t dev, u_int order, 54 const char *name, int unit); 55 static struct resource_list *simplebus_get_resource_list(device_t bus, 56 device_t child); 57 58 static ssize_t simplebus_get_property(device_t bus, device_t child, 59 const char *propname, void *propvalue, size_t size, 60 device_property_type_t type); 61 /* 62 * ofw_bus interface 63 */ 64 static const struct ofw_bus_devinfo *simplebus_get_devinfo(device_t bus, 65 device_t child); 66 67 /* 68 * Driver methods. 69 */ 70 static device_method_t simplebus_methods[] = { 71 /* Device interface */ 72 DEVMETHOD(device_probe, simplebus_probe), 73 DEVMETHOD(device_attach, simplebus_attach), 74 DEVMETHOD(device_detach, simplebus_detach), 75 DEVMETHOD(device_shutdown, bus_generic_shutdown), 76 DEVMETHOD(device_suspend, bus_generic_suspend), 77 DEVMETHOD(device_resume, bus_generic_resume), 78 79 /* Bus interface */ 80 DEVMETHOD(bus_add_child, simplebus_add_child), 81 DEVMETHOD(bus_print_child, simplebus_print_child), 82 DEVMETHOD(bus_probe_nomatch, simplebus_probe_nomatch), 83 DEVMETHOD(bus_read_ivar, bus_generic_read_ivar), 84 DEVMETHOD(bus_write_ivar, bus_generic_write_ivar), 85 DEVMETHOD(bus_setup_intr, bus_generic_setup_intr), 86 DEVMETHOD(bus_teardown_intr, bus_generic_teardown_intr), 87 DEVMETHOD(bus_alloc_resource, simplebus_alloc_resource), 88 DEVMETHOD(bus_release_resource, bus_generic_release_resource), 89 DEVMETHOD(bus_activate_resource, bus_generic_activate_resource), 90 DEVMETHOD(bus_deactivate_resource, bus_generic_deactivate_resource), 91 DEVMETHOD(bus_adjust_resource, bus_generic_adjust_resource), 92 DEVMETHOD(bus_set_resource, bus_generic_rl_set_resource), 93 DEVMETHOD(bus_get_resource, bus_generic_rl_get_resource), 94 DEVMETHOD(bus_child_pnpinfo, ofw_bus_gen_child_pnpinfo), 95 DEVMETHOD(bus_get_resource_list, simplebus_get_resource_list), 96 DEVMETHOD(bus_get_property, simplebus_get_property), 97 DEVMETHOD(bus_get_device_path, ofw_bus_gen_get_device_path), 98 99 /* ofw_bus interface */ 100 DEVMETHOD(ofw_bus_get_devinfo, simplebus_get_devinfo), 101 DEVMETHOD(ofw_bus_get_compat, ofw_bus_gen_get_compat), 102 DEVMETHOD(ofw_bus_get_model, ofw_bus_gen_get_model), 103 DEVMETHOD(ofw_bus_get_name, ofw_bus_gen_get_name), 104 DEVMETHOD(ofw_bus_get_node, ofw_bus_gen_get_node), 105 DEVMETHOD(ofw_bus_get_type, ofw_bus_gen_get_type), 106 107 DEVMETHOD_END 108 }; 109 110 DEFINE_CLASS_0(simplebus, simplebus_driver, simplebus_methods, 111 sizeof(struct simplebus_softc)); 112 113 EARLY_DRIVER_MODULE(simplebus, ofwbus, simplebus_driver, 0, 0, BUS_PASS_BUS); 114 EARLY_DRIVER_MODULE(simplebus, simplebus, simplebus_driver, 0, 0, 115 BUS_PASS_BUS + BUS_PASS_ORDER_MIDDLE); 116 117 static int 118 simplebus_probe(device_t dev) 119 { 120 121 if (!ofw_bus_status_okay(dev)) 122 return (ENXIO); 123 /* 124 * XXX We should attach only to pure' compatible = "simple-bus"', 125 * without any other compatible string. 126 * For now, filter only know cases: 127 * "syscon", "simple-bus"; is handled by fdt/syscon driver 128 * "simple-mfd", "simple-bus"; is handled by fdt/simple-mfd driver 129 */ 130 if (ofw_bus_is_compatible(dev, "syscon") || 131 ofw_bus_is_compatible(dev, "simple-mfd")) 132 return (ENXIO); 133 134 /* 135 * FDT data puts a "simple-bus" compatible string on many things that 136 * have children but aren't really buses in our world. Without a 137 * ranges property we will fail to attach, so just fail to probe too. 138 */ 139 if (!(ofw_bus_is_compatible(dev, "simple-bus") && 140 ofw_bus_has_prop(dev, "ranges")) && 141 (ofw_bus_get_type(dev) == NULL || strcmp(ofw_bus_get_type(dev), 142 "soc") != 0)) 143 return (ENXIO); 144 145 device_set_desc(dev, "Flattened device tree simple bus"); 146 147 return (BUS_PROBE_GENERIC); 148 } 149 150 int 151 simplebus_attach_impl(device_t dev) 152 { 153 struct simplebus_softc *sc; 154 phandle_t node; 155 156 sc = device_get_softc(dev); 157 simplebus_init(dev, 0); 158 if ((sc->flags & SB_FLAG_NO_RANGES) == 0 && 159 simplebus_fill_ranges(sc->node, sc) < 0) { 160 device_printf(dev, "could not get ranges\n"); 161 return (ENXIO); 162 } 163 164 /* 165 * In principle, simplebus could have an interrupt map, but ignore that 166 * for now 167 */ 168 169 for (node = OF_child(sc->node); node > 0; node = OF_peer(node)) 170 simplebus_add_device(dev, node, 0, NULL, -1, NULL); 171 172 return (0); 173 } 174 175 int 176 simplebus_attach(device_t dev) 177 { 178 int rv; 179 180 rv = simplebus_attach_impl(dev); 181 if (rv != 0) 182 return (rv); 183 184 return (bus_generic_attach(dev)); 185 } 186 187 int 188 simplebus_detach(device_t dev) 189 { 190 struct simplebus_softc *sc; 191 192 sc = device_get_softc(dev); 193 if (sc->ranges != NULL) 194 free(sc->ranges, M_DEVBUF); 195 196 return (bus_generic_detach(dev)); 197 } 198 199 void 200 simplebus_init(device_t dev, phandle_t node) 201 { 202 struct simplebus_softc *sc; 203 204 sc = device_get_softc(dev); 205 if (node == 0) 206 node = ofw_bus_get_node(dev); 207 sc->dev = dev; 208 sc->node = node; 209 210 /* 211 * Some important numbers 212 */ 213 sc->acells = 2; 214 OF_getencprop(node, "#address-cells", &sc->acells, sizeof(sc->acells)); 215 sc->scells = 1; 216 OF_getencprop(node, "#size-cells", &sc->scells, sizeof(sc->scells)); 217 } 218 219 int 220 simplebus_fill_ranges(phandle_t node, struct simplebus_softc *sc) 221 { 222 int host_address_cells; 223 cell_t *base_ranges; 224 ssize_t nbase_ranges; 225 int err; 226 int i, j, k; 227 228 err = OF_searchencprop(OF_parent(node), "#address-cells", 229 &host_address_cells, sizeof(host_address_cells)); 230 if (err <= 0) 231 return (-1); 232 233 nbase_ranges = OF_getproplen(node, "ranges"); 234 if (nbase_ranges < 0) 235 return (-1); 236 sc->nranges = nbase_ranges / sizeof(cell_t) / 237 (sc->acells + host_address_cells + sc->scells); 238 if (sc->nranges == 0) 239 return (0); 240 241 sc->ranges = malloc(sc->nranges * sizeof(sc->ranges[0]), 242 M_DEVBUF, M_WAITOK); 243 base_ranges = malloc(nbase_ranges, M_DEVBUF, M_WAITOK); 244 OF_getencprop(node, "ranges", base_ranges, nbase_ranges); 245 246 for (i = 0, j = 0; i < sc->nranges; i++) { 247 sc->ranges[i].bus = 0; 248 for (k = 0; k < sc->acells; k++) { 249 sc->ranges[i].bus <<= 32; 250 sc->ranges[i].bus |= base_ranges[j++]; 251 } 252 sc->ranges[i].host = 0; 253 for (k = 0; k < host_address_cells; k++) { 254 sc->ranges[i].host <<= 32; 255 sc->ranges[i].host |= base_ranges[j++]; 256 } 257 sc->ranges[i].size = 0; 258 for (k = 0; k < sc->scells; k++) { 259 sc->ranges[i].size <<= 32; 260 sc->ranges[i].size |= base_ranges[j++]; 261 } 262 } 263 264 free(base_ranges, M_DEVBUF); 265 return (sc->nranges); 266 } 267 268 struct simplebus_devinfo * 269 simplebus_setup_dinfo(device_t dev, phandle_t node, 270 struct simplebus_devinfo *di) 271 { 272 struct simplebus_softc *sc; 273 struct simplebus_devinfo *ndi; 274 275 sc = device_get_softc(dev); 276 if (di == NULL) 277 ndi = malloc(sizeof(*ndi), M_DEVBUF, M_WAITOK | M_ZERO); 278 else 279 ndi = di; 280 if (ofw_bus_gen_setup_devinfo(&ndi->obdinfo, node) != 0) { 281 if (di == NULL) 282 free(ndi, M_DEVBUF); 283 return (NULL); 284 } 285 286 resource_list_init(&ndi->rl); 287 ofw_bus_reg_to_rl(dev, node, sc->acells, sc->scells, &ndi->rl); 288 ofw_bus_intr_to_rl(dev, node, &ndi->rl, NULL); 289 290 return (ndi); 291 } 292 293 device_t 294 simplebus_add_device(device_t dev, phandle_t node, u_int order, 295 const char *name, int unit, struct simplebus_devinfo *di) 296 { 297 struct simplebus_devinfo *ndi; 298 device_t cdev; 299 300 if ((ndi = simplebus_setup_dinfo(dev, node, di)) == NULL) 301 return (NULL); 302 cdev = device_add_child_ordered(dev, order, name, unit); 303 if (cdev == NULL) { 304 device_printf(dev, "<%s>: device_add_child failed\n", 305 ndi->obdinfo.obd_name); 306 resource_list_free(&ndi->rl); 307 ofw_bus_gen_destroy_devinfo(&ndi->obdinfo); 308 if (di == NULL) 309 free(ndi, M_DEVBUF); 310 return (NULL); 311 } 312 device_set_ivars(cdev, ndi); 313 314 return(cdev); 315 } 316 317 static device_t 318 simplebus_add_child(device_t dev, u_int order, const char *name, int unit) 319 { 320 device_t cdev; 321 struct simplebus_devinfo *ndi; 322 323 cdev = device_add_child_ordered(dev, order, name, unit); 324 if (cdev == NULL) 325 return (NULL); 326 327 ndi = malloc(sizeof(*ndi), M_DEVBUF, M_WAITOK | M_ZERO); 328 ndi->obdinfo.obd_node = -1; 329 resource_list_init(&ndi->rl); 330 device_set_ivars(cdev, ndi); 331 332 return (cdev); 333 } 334 335 static const struct ofw_bus_devinfo * 336 simplebus_get_devinfo(device_t bus __unused, device_t child) 337 { 338 struct simplebus_devinfo *ndi; 339 340 ndi = device_get_ivars(child); 341 if (ndi == NULL) 342 return (NULL); 343 return (&ndi->obdinfo); 344 } 345 346 static struct resource_list * 347 simplebus_get_resource_list(device_t bus __unused, device_t child) 348 { 349 struct simplebus_devinfo *ndi; 350 351 ndi = device_get_ivars(child); 352 if (ndi == NULL) 353 return (NULL); 354 return (&ndi->rl); 355 } 356 357 static ssize_t 358 simplebus_get_property(device_t bus, device_t child, const char *propname, 359 void *propvalue, size_t size, device_property_type_t type) 360 { 361 phandle_t node, xref; 362 ssize_t ret, i; 363 uint32_t *buffer; 364 uint64_t val; 365 366 switch (type) { 367 case DEVICE_PROP_ANY: 368 case DEVICE_PROP_BUFFER: 369 case DEVICE_PROP_UINT32: 370 case DEVICE_PROP_UINT64: 371 case DEVICE_PROP_HANDLE: 372 break; 373 default: 374 return (-1); 375 } 376 377 node = ofw_bus_get_node(child); 378 if (propvalue == NULL || size == 0) 379 return (OF_getproplen(node, propname)); 380 381 /* 382 * Integer values are stored in BE format. 383 * If caller declared that the underlying property type is uint32_t 384 * we need to do the conversion to match host endianness. 385 */ 386 if (type == DEVICE_PROP_UINT32) 387 return (OF_getencprop(node, propname, propvalue, size)); 388 389 /* 390 * uint64_t also requires endianness handling. 391 * In FDT every 8 byte value is stored using two uint32_t variables 392 * in BE format. Now, since the upper bits are stored as the first 393 * of the pair, both halves require swapping. 394 */ 395 if (type == DEVICE_PROP_UINT64) { 396 ret = OF_getencprop(node, propname, propvalue, size); 397 if (ret <= 0) { 398 return (ret); 399 } 400 401 buffer = (uint32_t *)propvalue; 402 403 for (i = 0; i < size / 4; i += 2) { 404 val = (uint64_t)buffer[i] << 32 | buffer[i + 1]; 405 ((uint64_t *)buffer)[i / 2] = val; 406 } 407 return (ret); 408 } 409 410 if (type == DEVICE_PROP_HANDLE) { 411 if (size < sizeof(node)) 412 return (-1); 413 ret = OF_getencprop(node, propname, &xref, sizeof(xref)); 414 if (ret <= 0) 415 return (ret); 416 417 node = OF_node_from_xref(xref); 418 if (propvalue != NULL) 419 *(uint32_t *)propvalue = node; 420 return (ret); 421 } 422 423 return (OF_getprop(node, propname, propvalue, size)); 424 } 425 426 static struct resource * 427 simplebus_alloc_resource(device_t bus, device_t child, int type, int *rid, 428 rman_res_t start, rman_res_t end, rman_res_t count, u_int flags) 429 { 430 struct simplebus_softc *sc; 431 struct simplebus_devinfo *di; 432 struct resource_list_entry *rle; 433 int j; 434 435 sc = device_get_softc(bus); 436 437 /* 438 * Request for the default allocation with a given rid: use resource 439 * list stored in the local device info. 440 */ 441 if (RMAN_IS_DEFAULT_RANGE(start, end)) { 442 if ((di = device_get_ivars(child)) == NULL) 443 return (NULL); 444 445 if (type == SYS_RES_IOPORT) 446 type = SYS_RES_MEMORY; 447 448 rle = resource_list_find(&di->rl, type, *rid); 449 if (rle == NULL) { 450 if (bootverbose) 451 device_printf(bus, "no default resources for " 452 "rid = %d, type = %d\n", *rid, type); 453 return (NULL); 454 } 455 start = rle->start; 456 end = rle->end; 457 count = rle->count; 458 } 459 460 if (type == SYS_RES_MEMORY) { 461 /* Remap through ranges property */ 462 for (j = 0; j < sc->nranges; j++) { 463 if (start >= sc->ranges[j].bus && end < 464 sc->ranges[j].bus + sc->ranges[j].size) { 465 start -= sc->ranges[j].bus; 466 start += sc->ranges[j].host; 467 end -= sc->ranges[j].bus; 468 end += sc->ranges[j].host; 469 break; 470 } 471 } 472 if (j == sc->nranges && sc->nranges != 0) { 473 if (bootverbose) 474 device_printf(bus, "Could not map resource " 475 "%#jx-%#jx\n", start, end); 476 477 return (NULL); 478 } 479 } 480 481 return (bus_generic_alloc_resource(bus, child, type, rid, start, end, 482 count, flags)); 483 } 484 485 static int 486 simplebus_print_res(struct simplebus_devinfo *di) 487 { 488 int rv; 489 490 if (di == NULL) 491 return (0); 492 rv = 0; 493 rv += resource_list_print_type(&di->rl, "mem", SYS_RES_MEMORY, "%#jx"); 494 rv += resource_list_print_type(&di->rl, "irq", SYS_RES_IRQ, "%jd"); 495 return (rv); 496 } 497 498 static void 499 simplebus_probe_nomatch(device_t bus, device_t child) 500 { 501 const char *name, *type, *compat; 502 503 if (!bootverbose) 504 return; 505 506 compat = ofw_bus_get_compat(child); 507 if (compat == NULL) 508 return; 509 name = ofw_bus_get_name(child); 510 type = ofw_bus_get_type(child); 511 512 device_printf(bus, "<%s>", name != NULL ? name : "unknown"); 513 simplebus_print_res(device_get_ivars(child)); 514 if (!ofw_bus_status_okay(child)) 515 printf(" disabled"); 516 if (type) 517 printf(" type %s", type); 518 printf(" compat %s (no driver attached)\n", compat); 519 } 520 521 static int 522 simplebus_print_child(device_t bus, device_t child) 523 { 524 int rv; 525 526 rv = bus_print_child_header(bus, child); 527 rv += simplebus_print_res(device_get_ivars(child)); 528 if (!ofw_bus_status_okay(child)) 529 rv += printf(" disabled"); 530 rv += bus_print_child_footer(bus, child); 531 return (rv); 532 } 533