sys/kern/subr_bus.c

   1 /*
   2  * Copyright (c) 1997,1998 Doug Rabson
   3  * All rights reserved.
   4  *
   5  * Redistribution and use in source and binary forms, with or without
   6  * modification, are permitted provided that the following conditions
   7  * are met:
   8  * 1. Redistributions of source code must retain the above copyright
   9  *    notice, this list of conditions and the following disclaimer.
  10  * 2. Redistributions in binary form must reproduce the above copyright
  11  *    notice, this list of conditions and the following disclaimer in the
  12  *    documentation and/or other materials provided with the distribution.
  13  *
  14  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  15  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  16  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  17  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  18  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  19  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  20  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  21  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  22  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  23  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  24  * SUCH DAMAGE.
  25  *
  26  * $FreeBSD: src/sys/kern/subr_bus.c,v 1.54.2.9 2002/10/10 15:13:32 jhb Exp $
  27  * $DragonFly: src/sys/kern/subr_bus.c,v 1.27 2005/06/27 12:24:46 joerg Exp $
  28  */
  29
  30 #include "opt_bus.h"
  31
  32 #include <sys/param.h>
  33 #include <sys/queue.h>
  34 #include <sys/malloc.h>
  35 #include <sys/kernel.h>
  36 #include <sys/module.h>
  37 #ifdef DEVICE_SYSCTLS
  38 #include <sys/sysctl.h>
  39 #endif
  40 #include <sys/kobj.h>
  41 #include <sys/bus_private.h>
  42 #include <sys/systm.h>
  43 #include <machine/bus.h>
  44 #include <sys/rman.h>
  45 #include <machine/stdarg.h>     /* for device_printf() */
  46
  47 MALLOC_DEFINE(M_BUS, "bus", "Bus data structures");
  48
  49 #ifdef BUS_DEBUG
  50 #define PDEBUG(a)       (printf("%s:%d: ", __func__, __LINE__), printf a, printf("\n"))
  51 #define DEVICENAME(d)   ((d)? device_get_name(d): "no device")
  52 #define DRIVERNAME(d)   ((d)? d->name : "no driver")
  53 #define DEVCLANAME(d)   ((d)? d->name : "no devclass")
  54
  55 /* Produce the indenting, indent*2 spaces plus a '.' ahead of that to
  56  * prevent syslog from deleting initial spaces
  57  */
  58 #define indentprintf(p) do { int iJ; printf("."); for (iJ=0; iJ<indent; iJ++) printf("  "); printf p ; } while(0)
  59
  60 static void     print_device_short(device_t dev, int indent);
  61 static void     print_device(device_t dev, int indent);
  62 void            print_device_tree_short(device_t dev, int indent);
  63 void            print_device_tree(device_t dev, int indent);
  64 static void     print_driver_short(driver_t *driver, int indent);
  65 static void     print_driver(driver_t *driver, int indent);
  66 static void     print_driver_list(driver_list_t drivers, int indent);
  67 static void     print_devclass_short(devclass_t dc, int indent);
  68 static void     print_devclass(devclass_t dc, int indent);
  69 void            print_devclass_list_short(void);
  70 void            print_devclass_list(void);
  71
  72 #else
  73 /* Make the compiler ignore the function calls */
  74 #define PDEBUG(a)                       /* nop */
  75 #define DEVICENAME(d)                   /* nop */
  76 #define DRIVERNAME(d)                   /* nop */
  77 #define DEVCLANAME(d)                   /* nop */
  78
  79 #define print_device_short(d,i)         /* nop */
  80 #define print_device(d,i)               /* nop */
  81 #define print_device_tree_short(d,i)    /* nop */
  82 #define print_device_tree(d,i)          /* nop */
  83 #define print_driver_short(d,i)         /* nop */
  84 #define print_driver(d,i)               /* nop */
  85 #define print_driver_list(d,i)          /* nop */
  86 #define print_devclass_short(d,i)       /* nop */
  87 #define print_devclass(d,i)             /* nop */
  88 #define print_devclass_list_short()     /* nop */
  89 #define print_devclass_list()           /* nop */
  90 #endif
  91
  92 #ifdef DEVICE_SYSCTLS
  93 static void     device_register_oids(device_t dev);
  94 static void     device_unregister_oids(device_t dev);
  95 #endif
  96
  97 kobj_method_t null_methods[] = {
  98         { 0, 0 }
  99 };
 100
 101 DEFINE_CLASS(null, null_methods, 0);
 102
 103 /*
 104  * Devclass implementation
 105  */
 106
 107 static devclass_list_t devclasses = TAILQ_HEAD_INITIALIZER(devclasses);
 108
 109 static devclass_t
 110 devclass_find_internal(const char *classname, const char *parentname,
 111                        int create)
 112 {
 113         devclass_t dc;
 114
 115         PDEBUG(("looking for %s", classname));
 116         if (classname == NULL)
 117                 return(NULL);
 118
 119         TAILQ_FOREACH(dc, &devclasses, link)
 120                 if (!strcmp(dc->name, classname))
 121                         break;
 122
 123         if (create && !dc) {
 124                 PDEBUG(("creating %s", classname));
 125                 dc = malloc(sizeof(struct devclass) + strlen(classname) + 1,
 126                             M_BUS, M_INTWAIT | M_ZERO);
 127                 if (!dc)
 128                         return(NULL);
 129                 dc->parent = NULL;
 130                 dc->name = (char*) (dc + 1);
 131                 strcpy(dc->name, classname);
 132                 dc->devices = NULL;
 133                 dc->maxunit = 0;
 134                 TAILQ_INIT(&dc->drivers);
 135                 TAILQ_INSERT_TAIL(&devclasses, dc, link);
 136         }
 137         if (parentname && dc && !dc->parent)
 138                 dc->parent = devclass_find_internal(parentname, NULL, FALSE);
 139
 140         return(dc);
 141 }
 142
 143 devclass_t
 144 devclass_create(const char *classname)
 145 {
 146         return(devclass_find_internal(classname, NULL, TRUE));
 147 }
 148
 149 devclass_t
 150 devclass_find(const char *classname)
 151 {
 152         return(devclass_find_internal(classname, NULL, FALSE));
 153 }
 154
 155 int
 156 devclass_add_driver(devclass_t dc, driver_t *driver)
 157 {
 158         driverlink_t dl;
 159         int i;
 160
 161         PDEBUG(("%s", DRIVERNAME(driver)));
 162
 163         dl = malloc(sizeof *dl, M_BUS, M_INTWAIT | M_ZERO);
 164         if (!dl)
 165                 return(ENOMEM);
 166
 167         /*
 168          * Compile the driver's methods. Also increase the reference count
 169          * so that the class doesn't get freed when the last instance
 170          * goes. This means we can safely use static methods and avoids a
 171          * double-free in devclass_delete_driver.
 172          */
 173         kobj_class_instantiate(driver);
 174
 175         /*
 176          * Make sure the devclass which the driver is implementing exists.
 177          */
 178         devclass_find_internal(driver->name, NULL, TRUE);
 179
 180         dl->driver = driver;
 181         TAILQ_INSERT_TAIL(&dc->drivers, dl, link);
 182
 183         /*
 184          * Call BUS_DRIVER_ADDED for any existing busses in this class.
 185          */
 186         for (i = 0; i < dc->maxunit; i++)
 187                 if (dc->devices[i])
 188                         BUS_DRIVER_ADDED(dc->devices[i], driver);
 189
 190         return(0);
 191 }
 192
 193 int
 194 devclass_delete_driver(devclass_t busclass, driver_t *driver)
 195 {
 196         devclass_t dc = devclass_find(driver->name);
 197         driverlink_t dl;
 198         device_t dev;
 199         int i;
 200         int error;
 201
 202         PDEBUG(("%s from devclass %s", driver->name, DEVCLANAME(busclass)));
 203
 204         if (!dc)
 205                 return(0);
 206
 207         /*
 208          * Find the link structure in the bus' list of drivers.
 209          */
 210         TAILQ_FOREACH(dl, &busclass->drivers, link)
 211                 if (dl->driver == driver)
 212                         break;
 213
 214         if (!dl) {
 215                 PDEBUG(("%s not found in %s list", driver->name, busclass->name));
 216                 return(ENOENT);
 217         }
 218
 219         /*
 220          * Disassociate from any devices.  We iterate through all the
 221          * devices in the devclass of the driver and detach any which are
 222          * using the driver and which have a parent in the devclass which
 223          * we are deleting from.
 224          *
 225          * Note that since a driver can be in multiple devclasses, we
 226          * should not detach devices which are not children of devices in
 227          * the affected devclass.
 228          */
 229         for (i = 0; i < dc->maxunit; i++)
 230                 if (dc->devices[i]) {
 231                         dev = dc->devices[i];
 232                         if (dev->driver == driver && dev->parent &&
 233                             dev->parent->devclass == busclass) {
 234                                 if ((error = device_detach(dev)) != 0)
 235                                         return(error);
 236                                 device_set_driver(dev, NULL);
 237                         }
 238                 }
 239
 240         TAILQ_REMOVE(&busclass->drivers, dl, link);
 241         free(dl, M_BUS);
 242
 243         kobj_class_uninstantiate(driver);
 244
 245         return(0);
 246 }
 247
 248 static driverlink_t
 249 devclass_find_driver_internal(devclass_t dc, const char *classname)
 250 {
 251         driverlink_t dl;
 252
 253         PDEBUG(("%s in devclass %s", classname, DEVCLANAME(dc)));
 254
 255         TAILQ_FOREACH(dl, &dc->drivers, link)
 256                 if (!strcmp(dl->driver->name, classname))
 257                         return(dl);
 258
 259         PDEBUG(("not found"));
 260         return(NULL);
 261 }
 262
 263 kobj_class_t
 264 devclass_find_driver(devclass_t dc, const char *classname)
 265 {
 266         driverlink_t dl;
 267
 268         dl = devclass_find_driver_internal(dc, classname);
 269         if (dl)
 270                 return(dl->driver);
 271         else
 272                 return(NULL);
 273 }
 274
 275 const char *
 276 devclass_get_name(devclass_t dc)
 277 {
 278         return(dc->name);
 279 }
 280
 281 device_t
 282 devclass_get_device(devclass_t dc, int unit)
 283 {
 284         if (dc == NULL || unit < 0 || unit >= dc->maxunit)
 285                 return(NULL);
 286         return(dc->devices[unit]);
 287 }
 288
 289 void *
 290 devclass_get_softc(devclass_t dc, int unit)
 291 {
 292         device_t dev;
 293
 294         dev = devclass_get_device(dc, unit);
 295         if (!dev)
 296                 return(NULL);
 297
 298         return(device_get_softc(dev));
 299 }
 300
 301 int
 302 devclass_get_devices(devclass_t dc, device_t **devlistp, int *devcountp)
 303 {
 304         int i;
 305         int count;
 306         device_t *list;
 307
 308         count = 0;
 309         for (i = 0; i < dc->maxunit; i++)
 310                 if (dc->devices[i])
 311                         count++;
 312
 313         list = malloc(count * sizeof(device_t), M_TEMP, M_INTWAIT | M_ZERO);
 314         if (list == NULL)
 315                 return(ENOMEM);
 316
 317         count = 0;
 318         for (i = 0; i < dc->maxunit; i++)
 319                 if (dc->devices[i]) {
 320                         list[count] = dc->devices[i];
 321                         count++;
 322                 }
 323
 324         *devlistp = list;
 325         *devcountp = count;
 326
 327         return(0);
 328 }
 329
 330 int
 331 devclass_get_maxunit(devclass_t dc)
 332 {
 333         return(dc->maxunit);
 334 }
 335
 336 void
 337 devclass_set_parent(devclass_t dc, devclass_t pdc)
 338 {
 339         dc->parent = pdc;
 340 }
 341
 342 devclass_t
 343 devclass_get_parent(devclass_t dc)
 344 {
 345         return(dc->parent);
 346 }
 347
 348 static int
 349 devclass_alloc_unit(devclass_t dc, int *unitp)
 350 {
 351         int unit = *unitp;
 352
 353         PDEBUG(("unit %d in devclass %s", unit, DEVCLANAME(dc)));
 354
 355         /* If we have been given a wired unit number, check for existing device */
 356         if (unit != -1) {
 357                 if (unit >= 0 && unit < dc->maxunit &&
 358                     dc->devices[unit] != NULL) {
 359                         if (bootverbose)
 360                                 printf("%s-: %s%d exists, using next available unit number\n",
 361                                        dc->name, dc->name, unit);
 362                         /* find the next available slot */
 363                         while (++unit < dc->maxunit && dc->devices[unit] != NULL)
 364                                 ;
 365                 }
 366         } else {
 367                 /* Unwired device, find the next available slot for it */
 368                 unit = 0;
 369                 while (unit < dc->maxunit && dc->devices[unit] != NULL)
 370                         unit++;
 371         }
 372
 373         /*
 374          * We've selected a unit beyond the length of the table, so let's
 375          * extend the table to make room for all units up to and including
 376          * this one.
 377          */
 378         if (unit >= dc->maxunit) {
 379                 device_t *newlist;
 380                 int newsize;
 381
 382                 newsize = roundup((unit + 1), MINALLOCSIZE / sizeof(device_t));
 383                 newlist = malloc(sizeof(device_t) * newsize, M_BUS,
 384                                  M_INTWAIT | M_ZERO);
 385                 if (newlist == NULL)
 386                         return(ENOMEM);
 387                 bcopy(dc->devices, newlist, sizeof(device_t) * dc->maxunit);
 388                 if (dc->devices)
 389                         free(dc->devices, M_BUS);
 390                 dc->devices = newlist;
 391                 dc->maxunit = newsize;
 392         }
 393         PDEBUG(("now: unit %d in devclass %s", unit, DEVCLANAME(dc)));
 394
 395         *unitp = unit;
 396         return(0);
 397 }
 398
 399 static int
 400 devclass_add_device(devclass_t dc, device_t dev)
 401 {
 402         int buflen, error;
 403
 404         PDEBUG(("%s in devclass %s", DEVICENAME(dev), DEVCLANAME(dc)));
 405
 406         buflen = strlen(dc->name) + 5;
 407         dev->nameunit = malloc(buflen, M_BUS, M_INTWAIT | M_ZERO);
 408         if (!dev->nameunit)
 409                 return(ENOMEM);
 410
 411         if ((error = devclass_alloc_unit(dc, &dev->unit)) != 0) {
 412                 free(dev->nameunit, M_BUS);
 413                 dev->nameunit = NULL;
 414                 return(error);
 415         }
 416         dc->devices[dev->unit] = dev;
 417         dev->devclass = dc;
 418         snprintf(dev->nameunit, buflen, "%s%d", dc->name, dev->unit);
 419
 420 #ifdef DEVICE_SYSCTLS
 421         device_register_oids(dev);
 422 #endif
 423
 424         return(0);
 425 }
 426
 427 static int
 428 devclass_delete_device(devclass_t dc, device_t dev)
 429 {
 430         if (!dc || !dev)
 431                 return(0);
 432
 433         PDEBUG(("%s in devclass %s", DEVICENAME(dev), DEVCLANAME(dc)));
 434
 435         if (dev->devclass != dc || dc->devices[dev->unit] != dev)
 436                 panic("devclass_delete_device: inconsistent device class");
 437         dc->devices[dev->unit] = NULL;
 438         if (dev->flags & DF_WILDCARD)
 439                 dev->unit = -1;
 440         dev->devclass = NULL;
 441         free(dev->nameunit, M_BUS);
 442         dev->nameunit = NULL;
 443
 444 #ifdef DEVICE_SYSCTLS
 445         device_unregister_oids(dev);
 446 #endif
 447
 448         return(0);
 449 }
 450
 451 static device_t
 452 make_device(device_t parent, const char *name, int unit)
 453 {
 454         device_t dev;
 455         devclass_t dc;
 456
 457         PDEBUG(("%s at %s as unit %d", name, DEVICENAME(parent), unit));
 458
 459         if (name != NULL) {
 460                 dc = devclass_find_internal(name, NULL, TRUE);
 461                 if (!dc) {
 462                         printf("make_device: can't find device class %s\n", name);
 463                         return(NULL);
 464                 }
 465         } else
 466                 dc = NULL;
 467
 468         dev = malloc(sizeof(struct device), M_BUS, M_INTWAIT | M_ZERO);
 469         if (!dev)
 470                 return(0);
 471
 472         dev->parent = parent;
 473         TAILQ_INIT(&dev->children);
 474         kobj_init((kobj_t) dev, &null_class);
 475         dev->driver = NULL;
 476         dev->devclass = NULL;
 477         dev->unit = unit;
 478         dev->nameunit = NULL;
 479         dev->desc = NULL;
 480         dev->busy = 0;
 481         dev->devflags = 0;
 482         dev->flags = DF_ENABLED;
 483         dev->order = 0;
 484         if (unit == -1)
 485                 dev->flags |= DF_WILDCARD;
 486         if (name) {
 487                 dev->flags |= DF_FIXEDCLASS;
 488                 if (devclass_add_device(dc, dev) != 0) {
 489                         kobj_delete((kobj_t)dev, M_BUS);
 490                         return(NULL);
 491                 }
 492         }
 493         dev->ivars = NULL;
 494         dev->softc = NULL;
 495
 496         dev->state = DS_NOTPRESENT;
 497
 498         return(dev);
 499 }
 500
 501 static int
 502 device_print_child(device_t dev, device_t child)
 503 {
 504         int retval = 0;
 505
 506         if (device_is_alive(child))
 507                 retval += BUS_PRINT_CHILD(dev, child);
 508         else
 509                 retval += device_printf(child, " not found\n");
 510
 511         return(retval);
 512 }
 513
 514 device_t
 515 device_add_child(device_t dev, const char *name, int unit)
 516 {
 517         return device_add_child_ordered(dev, 0, name, unit);
 518 }
 519
 520 device_t
 521 device_add_child_ordered(device_t dev, int order, const char *name, int unit)
 522 {
 523         device_t child;
 524         device_t place;
 525
 526         PDEBUG(("%s at %s with order %d as unit %d", name, DEVICENAME(dev),
 527                 order, unit));
 528
 529         child = make_device(dev, name, unit);
 530         if (child == NULL)
 531                 return child;
 532         child->order = order;
 533
 534         TAILQ_FOREACH(place, &dev->children, link)
 535                 if (place->order > order)
 536                         break;
 537
 538         if (place) {
 539                 /*
 540                  * The device 'place' is the first device whose order is
 541                  * greater than the new child.
 542                  */
 543                 TAILQ_INSERT_BEFORE(place, child, link);
 544         } else {
 545                 /*
 546                  * The new child's order is greater or equal to the order of
 547                  * any existing device. Add the child to the tail of the list.
 548                  */
 549                 TAILQ_INSERT_TAIL(&dev->children, child, link);
 550         }
 551
 552         return(child);
 553 }
 554
 555 int
 556 device_delete_child(device_t dev, device_t child)
 557 {
 558         int error;
 559         device_t grandchild;
 560
 561         PDEBUG(("%s from %s", DEVICENAME(child), DEVICENAME(dev)));
 562
 563         /* remove children first */
 564         while ( (grandchild = TAILQ_FIRST(&child->children)) ) {
 565                 error = device_delete_child(child, grandchild);
 566                 if (error)
 567                         return(error);
 568         }
 569
 570         if ((error = device_detach(child)) != 0)
 571                 return(error);
 572         if (child->devclass)
 573                 devclass_delete_device(child->devclass, child);
 574         TAILQ_REMOVE(&dev->children, child, link);
 575         device_set_desc(child, NULL);
 576         kobj_delete((kobj_t)child, M_BUS);
 577
 578         return(0);
 579 }
 580
 581 /*
 582  * Find only devices attached to this bus.
 583  */
 584 device_t
 585 device_find_child(device_t dev, const char *classname, int unit)
 586 {
 587         devclass_t dc;
 588         device_t child;
 589
 590         dc = devclass_find(classname);
 591         if (!dc)
 592                 return(NULL);
 593
 594         child = devclass_get_device(dc, unit);
 595         if (child && child->parent == dev)
 596                 return(child);
 597         return(NULL);
 598 }
 599
 600 static driverlink_t
 601 first_matching_driver(devclass_t dc, device_t dev)
 602 {
 603         if (dev->devclass)
 604                 return(devclass_find_driver_internal(dc, dev->devclass->name));
 605         else
 606                 return(TAILQ_FIRST(&dc->drivers));
 607 }
 608
 609 static driverlink_t
 610 next_matching_driver(devclass_t dc, device_t dev, driverlink_t last)
 611 {
 612         if (dev->devclass) {
 613                 driverlink_t dl;
 614                 for (dl = TAILQ_NEXT(last, link); dl; dl = TAILQ_NEXT(dl, link))
 615                         if (!strcmp(dev->devclass->name, dl->driver->name))
 616                                 return(dl);
 617                 return(NULL);
 618         } else
 619                 return(TAILQ_NEXT(last, link));
 620 }
 621
 622 static int
 623 device_probe_child(device_t dev, device_t child)
 624 {
 625         devclass_t dc;
 626         driverlink_t best = 0;
 627         driverlink_t dl;
 628         int result, pri = 0;
 629         int hasclass = (child->devclass != 0);
 630
 631         dc = dev->devclass;
 632         if (!dc)
 633                 panic("device_probe_child: parent device has no devclass");
 634
 635         if (child->state == DS_ALIVE)
 636                 return(0);
 637
 638         for (; dc; dc = dc->parent) {
 639                 for (dl = first_matching_driver(dc, child); dl;
 640                      dl = next_matching_driver(dc, child, dl)) {
 641                         PDEBUG(("Trying %s", DRIVERNAME(dl->driver)));
 642                         device_set_driver(child, dl->driver);
 643                         if (!hasclass)
 644                                 device_set_devclass(child, dl->driver->name);
 645                         result = DEVICE_PROBE(child);
 646                         if (!hasclass)
 647                                 device_set_devclass(child, 0);
 648
 649                         /*
 650                          * If the driver returns SUCCESS, there can be
 651                          * no higher match for this device.
 652                          */
 653                         if (result == 0) {
 654                                 best = dl;
 655                                 pri = 0;
 656                                 break;
 657                         }
 658
 659                         /*
 660                          * The driver returned an error so it
 661                          * certainly doesn't match.
 662                          */
 663                         if (result > 0) {
 664                                 device_set_driver(child, 0);
 665                                 continue;
 666                         }
 667
 668                         /*
 669                          * A priority lower than SUCCESS, remember the
 670                          * best matching driver. Initialise the value
 671                          * of pri for the first match.
 672                          */
 673                         if (best == 0 || result > pri) {
 674                                 best = dl;
 675                                 pri = result;
 676                                 continue;
 677                         }
 678                 }
 679                 /*
 680                  * If we have unambiguous match in this devclass,
 681                  * don't look in the parent.
 682                  */
 683                 if (best && pri == 0)
 684                         break;
 685         }
 686
 687         /*
 688          * If we found a driver, change state and initialise the devclass.
 689          */
 690         if (best) {
 691                 if (!child->devclass)
 692                         device_set_devclass(child, best->driver->name);
 693                 device_set_driver(child, best->driver);
 694                 if (pri < 0) {
 695                         /*
 696                          * A bit bogus. Call the probe method again to make
 697                          * sure that we have the right description.
 698                          */
 699                         DEVICE_PROBE(child);
 700                 }
 701                 child->state = DS_ALIVE;
 702                 return(0);
 703         }
 704
 705         return(ENXIO);
 706 }
 707
 708 device_t
 709 device_get_parent(device_t dev)
 710 {
 711         return dev->parent;
 712 }
 713
 714 int
 715 device_get_children(device_t dev, device_t **devlistp, int *devcountp)
 716 {
 717         int count;
 718         device_t child;
 719         device_t *list;
 720
 721         count = 0;
 722         TAILQ_FOREACH(child, &dev->children, link)
 723                 count++;
 724
 725         list = malloc(count * sizeof(device_t), M_TEMP, M_INTWAIT | M_ZERO);
 726         if (!list)
 727                 return(ENOMEM);
 728
 729         count = 0;
 730         TAILQ_FOREACH(child, &dev->children, link) {
 731                 list[count] = child;
 732                 count++;
 733         }
 734
 735         *devlistp = list;
 736         *devcountp = count;
 737
 738         return(0);
 739 }
 740
 741 driver_t *
 742 device_get_driver(device_t dev)
 743 {
 744         return(dev->driver);
 745 }
 746
 747 devclass_t
 748 device_get_devclass(device_t dev)
 749 {
 750         return(dev->devclass);
 751 }
 752
 753 const char *
 754 device_get_name(device_t dev)
 755 {
 756         if (dev->devclass)
 757                 return devclass_get_name(dev->devclass);
 758         return(NULL);
 759 }
 760
 761 const char *
 762 device_get_nameunit(device_t dev)
 763 {
 764         return(dev->nameunit);
 765 }
 766
 767 int
 768 device_get_unit(device_t dev)
 769 {
 770         return(dev->unit);
 771 }
 772
 773 const char *
 774 device_get_desc(device_t dev)
 775 {
 776         return(dev->desc);
 777 }
 778
 779 uint32_t
 780 device_get_flags(device_t dev)
 781 {
 782         return(dev->devflags);
 783 }
 784
 785 int
 786 device_print_prettyname(device_t dev)
 787 {
 788         const char *name = device_get_name(dev);
 789
 790         if (name == 0)
 791                 return printf("unknown: ");
 792         else
 793                 return printf("%s%d: ", name, device_get_unit(dev));
 794 }
 795
 796 int
 797 device_printf(device_t dev, const char * fmt, ...)
 798 {
 799         __va_list ap;
 800         int retval;
 801
 802         retval = device_print_prettyname(dev);
 803         __va_start(ap, fmt);
 804         retval += vprintf(fmt, ap);
 805         __va_end(ap);
 806         return retval;
 807 }
 808
 809 static void
 810 device_set_desc_internal(device_t dev, const char* desc, int copy)
 811 {
 812         if (dev->desc && (dev->flags & DF_DESCMALLOCED)) {
 813                 free(dev->desc, M_BUS);
 814                 dev->flags &= ~DF_DESCMALLOCED;
 815                 dev->desc = NULL;
 816         }
 817
 818         if (copy && desc) {
 819                 dev->desc = malloc(strlen(desc) + 1, M_BUS, M_INTWAIT);
 820                 if (dev->desc) {
 821                         strcpy(dev->desc, desc);
 822                         dev->flags |= DF_DESCMALLOCED;
 823                 }
 824         } else
 825                 /* Avoid a -Wcast-qual warning */
 826                 dev->desc = (char *)(uintptr_t) desc;
 827
 828 #ifdef DEVICE_SYSCTLS
 829         {
 830                 struct sysctl_oid *oid = &dev->oid[1];
 831                 oid->oid_arg1 = dev->desc ? dev->desc : "";
 832                 oid->oid_arg2 = dev->desc ? strlen(dev->desc) : 0;
 833         }
 834 #endif
 835 }
 836
 837 void
 838 device_set_desc(device_t dev, const char* desc)
 839 {
 840         device_set_desc_internal(dev, desc, FALSE);
 841 }
 842
 843 void
 844 device_set_desc_copy(device_t dev, const char* desc)
 845 {
 846         device_set_desc_internal(dev, desc, TRUE);
 847 }
 848
 849 void
 850 device_set_flags(device_t dev, uint32_t flags)
 851 {
 852         dev->devflags = flags;
 853 }
 854
 855 void *
 856 device_get_softc(device_t dev)
 857 {
 858         return dev->softc;
 859 }
 860
 861 void
 862 device_set_softc(device_t dev, void *softc)
 863 {
 864         if (dev->softc && !(dev->flags & DF_EXTERNALSOFTC))
 865                 free(dev->softc, M_BUS);
 866         dev->softc = softc;
 867         if (dev->softc)
 868                 dev->flags |= DF_EXTERNALSOFTC;
 869         else
 870                 dev->flags &= ~DF_EXTERNALSOFTC;
 871 }
 872
 873 void *
 874 device_get_ivars(device_t dev)
 875 {
 876         return dev->ivars;
 877 }
 878
 879 void
 880 device_set_ivars(device_t dev, void * ivars)
 881 {
 882         if (!dev)
 883                 return;
 884
 885         dev->ivars = ivars;
 886 }
 887
 888 device_state_t
 889 device_get_state(device_t dev)
 890 {
 891         return(dev->state);
 892 }
 893
 894 void
 895 device_enable(device_t dev)
 896 {
 897         dev->flags |= DF_ENABLED;
 898 }
 899
 900 void
 901 device_disable(device_t dev)
 902 {
 903         dev->flags &= ~DF_ENABLED;
 904 }
 905
 906 /*
 907  * YYY cannot block
 908  */
 909 void
 910 device_busy(device_t dev)
 911 {
 912         if (dev->state < DS_ATTACHED)
 913                 panic("device_busy: called for unattached device");
 914         if (dev->busy == 0 && dev->parent)
 915                 device_busy(dev->parent);
 916         dev->busy++;
 917         dev->state = DS_BUSY;
 918 }
 919
 920 /*
 921  * YYY cannot block
 922  */
 923 void
 924 device_unbusy(device_t dev)
 925 {
 926         if (dev->state != DS_BUSY)
 927                 panic("device_unbusy: called for non-busy device");
 928         dev->busy--;
 929         if (dev->busy == 0) {
 930                 if (dev->parent)
 931                         device_unbusy(dev->parent);
 932                 dev->state = DS_ATTACHED;
 933         }
 934 }
 935
 936 void
 937 device_quiet(device_t dev)
 938 {
 939         dev->flags |= DF_QUIET;
 940 }
 941
 942 void
 943 device_verbose(device_t dev)
 944 {
 945         dev->flags &= ~DF_QUIET;
 946 }
 947
 948 int
 949 device_is_quiet(device_t dev)
 950 {
 951         return((dev->flags & DF_QUIET) != 0);
 952 }
 953
 954 int
 955 device_is_enabled(device_t dev)
 956 {
 957         return((dev->flags & DF_ENABLED) != 0);
 958 }
 959
 960 int
 961 device_is_alive(device_t dev)
 962 {
 963         return(dev->state >= DS_ALIVE);
 964 }
 965
 966 int
 967 device_is_attached(device_t dev)
 968 {
 969         return(dev->state >= DS_ATTACHED);
 970 }
 971
 972 int
 973 device_set_devclass(device_t dev, const char *classname)
 974 {
 975         devclass_t dc;
 976
 977         if (!classname) {
 978                 if (dev->devclass)
 979                         devclass_delete_device(dev->devclass, dev);
 980                 return(0);
 981         }
 982
 983         if (dev->devclass) {
 984                 printf("device_set_devclass: device class already set\n");
 985                 return(EINVAL);
 986         }
 987
 988         dc = devclass_find_internal(classname, NULL, TRUE);
 989         if (!dc)
 990                 return(ENOMEM);
 991
 992         return(devclass_add_device(dc, dev));
 993 }
 994
 995 int
 996 device_set_driver(device_t dev, driver_t *driver)
 997 {
 998         if (dev->state >= DS_ATTACHED)
 999                 return(EBUSY);
1000
1001         if (dev->driver == driver)
1002                 return(0);
1003
1004         if (dev->softc && !(dev->flags & DF_EXTERNALSOFTC)) {
1005                 free(dev->softc, M_BUS);
1006                 dev->softc = NULL;
1007         }
1008         kobj_delete((kobj_t) dev, 0);
1009         dev->driver = driver;
1010         if (driver) {
1011                 kobj_init((kobj_t) dev, (kobj_class_t) driver);
1012                 if (!(dev->flags & DF_EXTERNALSOFTC)) {
1013                         dev->softc = malloc(driver->size, M_BUS,
1014                                             M_INTWAIT | M_ZERO);
1015                         if (!dev->softc) {
1016                                 kobj_delete((kobj_t)dev, 0);
1017                                 kobj_init((kobj_t) dev, &null_class);
1018                                 dev->driver = NULL;
1019                                 return(ENOMEM);
1020                         }
1021                 }
1022         } else
1023                 kobj_init((kobj_t) dev, &null_class);
1024         return(0);
1025 }
1026
1027 int
1028 device_probe_and_attach(device_t dev)
1029 {
1030         device_t bus = dev->parent;
1031         int error = 0;
1032         int hasclass = (dev->devclass != 0);
1033
1034         if (dev->state >= DS_ALIVE)
1035                 return(0);
1036
1037         if ((dev->flags & DF_ENABLED) == 0) {
1038                 if (bootverbose) {
1039                         device_print_prettyname(dev);
1040                         printf("not probed (disabled)\n");
1041                 }
1042                 return(0);
1043         }
1044
1045         error = device_probe_child(bus, dev);
1046         if (error) {
1047                 if (!(dev->flags & DF_DONENOMATCH)) {
1048                         BUS_PROBE_NOMATCH(bus, dev);
1049                         dev->flags |= DF_DONENOMATCH;
1050                 }
1051                 return(error);
1052         }
1053
1054         /*
1055          * Output the exact device chain prior to the attach in case the
1056          * system locks up during attach, and generate the full info after
1057          * the attach so correct irq and other information is displayed.
1058          */
1059         if (bootverbose && !device_is_quiet(dev)) {
1060                 device_t tmp;
1061
1062                 printf("%s", device_get_nameunit(dev));
1063                 for (tmp = dev->parent; tmp; tmp = tmp->parent)
1064                         printf(".%s", device_get_nameunit(tmp));
1065                 printf("\n");
1066         }
1067         if (!device_is_quiet(dev))
1068                 device_print_child(bus, dev);
1069         error = DEVICE_ATTACH(dev);
1070         if (error == 0) {
1071                 dev->state = DS_ATTACHED;
1072                 if (bootverbose && !device_is_quiet(dev))
1073                         device_print_child(bus, dev);
1074         } else {
1075                 printf("device_probe_and_attach: %s%d attach returned %d\n",
1076                        dev->driver->name, dev->unit, error);
1077                 /* Unset the class that was set in device_probe_child */
1078                 if (!hasclass)
1079                         device_set_devclass(dev, 0);
1080                 device_set_driver(dev, NULL);
1081                 dev->state = DS_NOTPRESENT;
1082         }
1083
1084         return(error);
1085 }
1086
1087 int
1088 device_detach(device_t dev)
1089 {
1090         int error;
1091
1092         PDEBUG(("%s", DEVICENAME(dev)));
1093         if (dev->state == DS_BUSY)
1094                 return(EBUSY);
1095         if (dev->state != DS_ATTACHED)
1096                 return(0);
1097
1098         if ((error = DEVICE_DETACH(dev)) != 0)
1099                 return(error);
1100         device_printf(dev, "detached\n");
1101         if (dev->parent)
1102                 BUS_CHILD_DETACHED(dev->parent, dev);
1103
1104         if (!(dev->flags & DF_FIXEDCLASS))
1105                 devclass_delete_device(dev->devclass, dev);
1106
1107         dev->state = DS_NOTPRESENT;
1108         device_set_driver(dev, NULL);
1109
1110         return(0);
1111 }
1112
1113 int
1114 device_shutdown(device_t dev)
1115 {
1116         if (dev->state < DS_ATTACHED)
1117                 return 0;
1118         PDEBUG(("%s", DEVICENAME(dev)));
1119         return DEVICE_SHUTDOWN(dev);
1120 }
1121
1122 int
1123 device_set_unit(device_t dev, int unit)
1124 {
1125         devclass_t dc;
1126         int err;
1127
1128         dc = device_get_devclass(dev);
1129         if (unit < dc->maxunit && dc->devices[unit])
1130                 return(EBUSY);
1131         err = devclass_delete_device(dc, dev);
1132         if (err)
1133                 return(err);
1134         dev->unit = unit;
1135         err = devclass_add_device(dc, dev);
1136         return(err);
1137 }
1138
1139 #ifdef DEVICE_SYSCTLS
1140
1141 /*
1142  * Sysctl nodes for devices.
1143  */
1144
1145 SYSCTL_NODE(_hw, OID_AUTO, devices, CTLFLAG_RW, 0, "A list of all devices");
1146
1147 static int
1148 sysctl_handle_children(SYSCTL_HANDLER_ARGS)
1149 {
1150         device_t dev = arg1;
1151         device_t child;
1152         int first = 1, error = 0;
1153
1154         TAILQ_FOREACH(child, &dev->children, link)
1155                 if (child->nameunit) {
1156                         if (!first) {
1157                                 error = SYSCTL_OUT(req, ",", 1);
1158                                 if (error)
1159                                         return error;
1160                         } else
1161                                 first = 0;
1162                         error = SYSCTL_OUT(req, child->nameunit,
1163                                            strlen(child->nameunit));
1164                         if (error)
1165                                 return(error);
1166                 }
1167
1168         error = SYSCTL_OUT(req, "", 1);
1169
1170         return(error);
1171 }
1172
1173 static int
1174 sysctl_handle_state(SYSCTL_HANDLER_ARGS)
1175 {
1176         device_t dev = arg1;
1177
1178         switch (dev->state) {
1179         case DS_NOTPRESENT:
1180                 return SYSCTL_OUT(req, "notpresent", sizeof("notpresent"));
1181         case DS_ALIVE:
1182                 return SYSCTL_OUT(req, "alive", sizeof("alive"));
1183         case DS_ATTACHED:
1184                 return SYSCTL_OUT(req, "attached", sizeof("attached"));
1185         case DS_BUSY:
1186                 return SYSCTL_OUT(req, "busy", sizeof("busy"));
1187         default:
1188                 return (0);
1189         }
1190 }
1191
1192 static void
1193 device_register_oids(device_t dev)
1194 {
1195         struct sysctl_oid* oid;
1196
1197         oid = &dev->oid[0];
1198         bzero(oid, sizeof(*oid));
1199         oid->oid_parent = &sysctl__hw_devices_children;
1200         oid->oid_number = OID_AUTO;
1201         oid->oid_kind = CTLTYPE_NODE | CTLFLAG_RW;
1202         oid->oid_arg1 = &dev->oidlist[0];
1203         oid->oid_arg2 = 0;
1204         oid->oid_name = dev->nameunit;
1205         oid->oid_handler = 0;
1206         oid->oid_fmt = "N";
1207         SLIST_INIT(&dev->oidlist[0]);
1208         sysctl_register_oid(oid);
1209
1210         oid = &dev->oid[1];
1211         bzero(oid, sizeof(*oid));
1212         oid->oid_parent = &dev->oidlist[0];
1213         oid->oid_number = OID_AUTO;
1214         oid->oid_kind = CTLTYPE_STRING | CTLFLAG_RD;
1215         oid->oid_arg1 = dev->desc ? dev->desc : "";
1216         oid->oid_arg2 = dev->desc ? strlen(dev->desc) : 0;
1217         oid->oid_name = "desc";
1218         oid->oid_handler = sysctl_handle_string;
1219         oid->oid_fmt = "A";
1220         sysctl_register_oid(oid);
1221
1222         oid = &dev->oid[2];
1223         bzero(oid, sizeof(*oid));
1224         oid->oid_parent = &dev->oidlist[0];
1225         oid->oid_number = OID_AUTO;
1226         oid->oid_kind = CTLTYPE_INT | CTLFLAG_RD;
1227         oid->oid_arg1 = dev;
1228         oid->oid_arg2 = 0;
1229         oid->oid_name = "children";
1230         oid->oid_handler = sysctl_handle_children;
1231         oid->oid_fmt = "A";
1232         sysctl_register_oid(oid);
1233
1234         oid = &dev->oid[3];
1235         bzero(oid, sizeof(*oid));
1236         oid->oid_parent = &dev->oidlist[0];
1237         oid->oid_number = OID_AUTO;
1238         oid->oid_kind = CTLTYPE_INT | CTLFLAG_RD;
1239         oid->oid_arg1 = dev;
1240         oid->oid_arg2 = 0;
1241         oid->oid_name = "state";
1242         oid->oid_handler = sysctl_handle_state;
1243         oid->oid_fmt = "A";
1244         sysctl_register_oid(oid);
1245 }
1246
1247 static void
1248 device_unregister_oids(device_t dev)
1249 {
1250         sysctl_unregister_oid(&dev->oid[0]);
1251         sysctl_unregister_oid(&dev->oid[1]);
1252         sysctl_unregister_oid(&dev->oid[2]);
1253 }
1254
1255 #endif
1256
1257 /*======================================*/
1258 /*
1259  * Access functions for device resources.
1260  */
1261
1262 /* Supplied by config(8) in ioconf.c */
1263 extern struct config_device config_devtab[];
1264 extern int devtab_count;
1265
1266 /* Runtime version */
1267 struct config_device *devtab = config_devtab;
1268
1269 static int
1270 resource_new_name(const char *name, int unit)
1271 {
1272         struct config_device *new;
1273
1274         new = malloc((devtab_count + 1) * sizeof(*new), M_TEMP,
1275                      M_INTWAIT | M_ZERO);
1276         if (new == NULL)
1277                 return(-1);
1278         if (devtab && devtab_count > 0)
1279                 bcopy(devtab, new, devtab_count * sizeof(*new));
1280         new[devtab_count].name = malloc(strlen(name) + 1, M_TEMP, M_INTWAIT);
1281         if (new[devtab_count].name == NULL) {
1282                 free(new, M_TEMP);
1283                 return(-1);
1284         }
1285         strcpy(new[devtab_count].name, name);
1286         new[devtab_count].unit = unit;
1287         new[devtab_count].resource_count = 0;
1288         new[devtab_count].resources = NULL;
1289         if (devtab && devtab != config_devtab)
1290                 free(devtab, M_TEMP);
1291         devtab = new;
1292         return devtab_count++;
1293 }
1294
1295 static int
1296 resource_new_resname(int j, const char *resname, resource_type type)
1297 {
1298         struct config_resource *new;
1299         int i;
1300
1301         i = devtab[j].resource_count;
1302         new = malloc((i + 1) * sizeof(*new), M_TEMP, M_INTWAIT | M_ZERO);
1303         if (new == NULL)
1304                 return(-1);
1305         if (devtab[j].resources && i > 0)
1306                 bcopy(devtab[j].resources, new, i * sizeof(*new));
1307         new[i].name = malloc(strlen(resname) + 1, M_TEMP, M_INTWAIT);
1308         if (new[i].name == NULL) {
1309                 free(new, M_TEMP);
1310                 return(-1);
1311         }
1312         strcpy(new[i].name, resname);
1313         new[i].type = type;
1314         if (devtab[j].resources)
1315                 free(devtab[j].resources, M_TEMP);
1316         devtab[j].resources = new;
1317         devtab[j].resource_count = i + 1;
1318         return(i);
1319 }
1320
1321 static int
1322 resource_match_string(int i, const char *resname, const char *value)
1323 {
1324         int j;
1325         struct config_resource *res;
1326
1327         for (j = 0, res = devtab[i].resources;
1328              j < devtab[i].resource_count; j++, res++)
1329                 if (!strcmp(res->name, resname)
1330                     && res->type == RES_STRING
1331                     && !strcmp(res->u.stringval, value))
1332                         return(j);
1333         return(-1);
1334 }
1335
1336 static int
1337 resource_find(const char *name, int unit, const char *resname,
1338               struct config_resource **result)
1339 {
1340         int i, j;
1341         struct config_resource *res;
1342
1343         /*
1344          * First check specific instances, then generic.
1345          */
1346         for (i = 0; i < devtab_count; i++) {
1347                 if (devtab[i].unit < 0)
1348                         continue;
1349                 if (!strcmp(devtab[i].name, name) && devtab[i].unit == unit) {
1350                         res = devtab[i].resources;
1351                         for (j = 0; j < devtab[i].resource_count; j++, res++)
1352                                 if (!strcmp(res->name, resname)) {
1353                                         *result = res;
1354                                         return(0);
1355                                 }
1356                 }
1357         }
1358         for (i = 0; i < devtab_count; i++) {
1359                 if (devtab[i].unit >= 0)
1360                         continue;
1361                 /* XXX should this `&& devtab[i].unit == unit' be here? */
1362                 /* XXX if so, then the generic match does nothing */
1363                 if (!strcmp(devtab[i].name, name) && devtab[i].unit == unit) {
1364                         res = devtab[i].resources;
1365                         for (j = 0; j < devtab[i].resource_count; j++, res++)
1366                                 if (!strcmp(res->name, resname)) {
1367                                         *result = res;
1368                                         return(0);
1369                                 }
1370                 }
1371         }
1372         return(ENOENT);
1373 }
1374
1375 int
1376 resource_int_value(const char *name, int unit, const char *resname, int *result)
1377 {
1378         int error;
1379         struct config_resource *res;
1380
1381         if ((error = resource_find(name, unit, resname, &res)) != 0)
1382                 return(error);
1383         if (res->type != RES_INT)
1384                 return(EFTYPE);
1385         *result = res->u.intval;
1386         return(0);
1387 }
1388
1389 int
1390 resource_long_value(const char *name, int unit, const char *resname,
1391                     long *result)
1392 {
1393         int error;
1394         struct config_resource *res;
1395
1396         if ((error = resource_find(name, unit, resname, &res)) != 0)
1397                 return(error);
1398         if (res->type != RES_LONG)
1399                 return(EFTYPE);
1400         *result = res->u.longval;
1401         return(0);
1402 }
1403
1404 int
1405 resource_string_value(const char *name, int unit, const char *resname,
1406                       char **result)
1407 {
1408         int error;
1409         struct config_resource *res;
1410
1411         if ((error = resource_find(name, unit, resname, &res)) != 0)
1412                 return(error);
1413         if (res->type != RES_STRING)
1414                 return(EFTYPE);
1415         *result = res->u.stringval;
1416         return(0);
1417 }
1418
1419 int
1420 resource_query_string(int i, const char *resname, const char *value)
1421 {
1422         if (i < 0)
1423                 i = 0;
1424         else
1425                 i = i + 1;
1426         for (; i < devtab_count; i++)
1427                 if (resource_match_string(i, resname, value) >= 0)
1428                         return(i);
1429         return(-1);
1430 }
1431
1432 int
1433 resource_locate(int i, const char *resname)
1434 {
1435         if (i < 0)
1436                 i = 0;
1437         else
1438                 i = i + 1;
1439         for (; i < devtab_count; i++)
1440                 if (!strcmp(devtab[i].name, resname))
1441                         return(i);
1442         return(-1);
1443 }
1444
1445 int
1446 resource_count(void)
1447 {
1448         return(devtab_count);
1449 }
1450
1451 char *
1452 resource_query_name(int i)
1453 {
1454         return(devtab[i].name);
1455 }
1456
1457 int
1458 resource_query_unit(int i)
1459 {
1460         return(devtab[i].unit);
1461 }
1462
1463 static int
1464 resource_create(const char *name, int unit, const char *resname,
1465                 resource_type type, struct config_resource **result)
1466 {
1467         int i, j;
1468         struct config_resource *res = NULL;
1469
1470         for (i = 0; i < devtab_count; i++)
1471                 if (!strcmp(devtab[i].name, name) && devtab[i].unit == unit) {
1472                         res = devtab[i].resources;
1473                         break;
1474                 }
1475         if (res == NULL) {
1476                 i = resource_new_name(name, unit);
1477                 if (i < 0)
1478                         return(ENOMEM);
1479                 res = devtab[i].resources;
1480         }
1481         for (j = 0; j < devtab[i].resource_count; j++, res++)
1482                 if (!strcmp(res->name, resname)) {
1483                         *result = res;
1484                         return(0);
1485                 }
1486         j = resource_new_resname(i, resname, type);
1487         if (j < 0)
1488                 return(ENOMEM);
1489         res = &devtab[i].resources[j];
1490         *result = res;
1491         return(0);
1492 }
1493
1494 int
1495 resource_set_int(const char *name, int unit, const char *resname, int value)
1496 {
1497         int error;
1498         struct config_resource *res;
1499
1500         error = resource_create(name, unit, resname, RES_INT, &res);
1501         if (error)
1502                 return(error);
1503         if (res->type != RES_INT)
1504                 return(EFTYPE);
1505         res->u.intval = value;
1506         return(0);
1507 }
1508
1509 int
1510 resource_set_long(const char *name, int unit, const char *resname, long value)
1511 {
1512         int error;
1513         struct config_resource *res;
1514
1515         error = resource_create(name, unit, resname, RES_LONG, &res);
1516         if (error)
1517                 return(error);
1518         if (res->type != RES_LONG)
1519                 return(EFTYPE);
1520         res->u.longval = value;
1521         return(0);
1522 }
1523
1524 int
1525 resource_set_string(const char *name, int unit, const char *resname,
1526                     const char *value)
1527 {
1528         int error;
1529         struct config_resource *res;
1530
1531         error = resource_create(name, unit, resname, RES_STRING, &res);
1532         if (error)
1533                 return(error);
1534         if (res->type != RES_STRING)
1535                 return(EFTYPE);
1536         if (res->u.stringval)
1537                 free(res->u.stringval, M_TEMP);
1538         res->u.stringval = malloc(strlen(value) + 1, M_TEMP, M_INTWAIT);
1539         if (res->u.stringval == NULL)
1540                 return(ENOMEM);
1541         strcpy(res->u.stringval, value);
1542         return(0);
1543 }
1544
1545 static void
1546 resource_cfgload(void *dummy __unused)
1547 {
1548         struct config_resource *res, *cfgres;
1549         int i, j;
1550         int error;
1551         char *name, *resname;
1552         int unit;
1553         resource_type type;
1554         char *stringval;
1555         int config_devtab_count;
1556
1557         config_devtab_count = devtab_count;
1558         devtab = NULL;
1559         devtab_count = 0;
1560
1561         for (i = 0; i < config_devtab_count; i++) {
1562                 name = config_devtab[i].name;
1563                 unit = config_devtab[i].unit;
1564
1565                 for (j = 0; j < config_devtab[i].resource_count; j++) {
1566                         cfgres = config_devtab[i].resources;
1567                         resname = cfgres[j].name;
1568                         type = cfgres[j].type;
1569                         error = resource_create(name, unit, resname, type,
1570                                                 &res);
1571                         if (error) {
1572                                 printf("create resource %s%d: error %d\n",
1573                                         name, unit, error);
1574                                 continue;
1575                         }
1576                         if (res->type != type) {
1577                                 printf("type mismatch %s%d: %d != %d\n",
1578                                         name, unit, res->type, type);
1579                                 continue;
1580                         }
1581                         switch (type) {
1582                         case RES_INT:
1583                                 res->u.intval = cfgres[j].u.intval;
1584                                 break;
1585                         case RES_LONG:
1586                                 res->u.longval = cfgres[j].u.longval;
1587                                 break;
1588                         case RES_STRING:
1589                                 if (res->u.stringval)
1590                                         free(res->u.stringval, M_TEMP);
1591                                 stringval = cfgres[j].u.stringval;
1592                                 res->u.stringval = malloc(strlen(stringval) + 1,
1593                                                           M_TEMP, M_INTWAIT);
1594                                 if (res->u.stringval == NULL)
1595                                         break;
1596                                 strcpy(res->u.stringval, stringval);
1597                                 break;
1598                         default:
1599                                 panic("unknown resource type %d", type);
1600                         }
1601                 }
1602         }
1603 }
1604 SYSINIT(cfgload, SI_SUB_KMEM, SI_ORDER_ANY + 50, resource_cfgload, 0)
1605
1606
1607 /*======================================*/
1608 /*
1609  * Some useful method implementations to make life easier for bus drivers.
1610  */
1611
1612 void
1613 resource_list_init(struct resource_list *rl)
1614 {
1615         SLIST_INIT(rl);
1616 }
1617
1618 void
1619 resource_list_free(struct resource_list *rl)
1620 {
1621         struct resource_list_entry *rle;
1622
1623         while ((rle = SLIST_FIRST(rl)) != NULL) {
1624                 if (rle->res)
1625                         panic("resource_list_free: resource entry is busy");
1626                 SLIST_REMOVE_HEAD(rl, link);
1627                 free(rle, M_BUS);
1628         }
1629 }
1630
1631 void
1632 resource_list_add(struct resource_list *rl,
1633                   int type, int rid,
1634                   u_long start, u_long end, u_long count)
1635 {
1636         struct resource_list_entry *rle;
1637
1638         rle = resource_list_find(rl, type, rid);
1639         if (rle == NULL) {
1640                 rle = malloc(sizeof(struct resource_list_entry), M_BUS,
1641                              M_INTWAIT);
1642                 if (!rle)
1643                         panic("resource_list_add: can't record entry");
1644                 SLIST_INSERT_HEAD(rl, rle, link);
1645                 rle->type = type;
1646                 rle->rid = rid;
1647                 rle->res = NULL;
1648         }
1649
1650         if (rle->res)
1651                 panic("resource_list_add: resource entry is busy");
1652
1653         rle->start = start;
1654         rle->end = end;
1655         rle->count = count;
1656 }
1657
1658 struct resource_list_entry*
1659 resource_list_find(struct resource_list *rl,
1660                    int type, int rid)
1661 {
1662         struct resource_list_entry *rle;
1663
1664         SLIST_FOREACH(rle, rl, link)
1665                 if (rle->type == type && rle->rid == rid)
1666                         return(rle);
1667         return(NULL);
1668 }
1669
1670 void
1671 resource_list_delete(struct resource_list *rl,
1672                      int type, int rid)
1673 {
1674         struct resource_list_entry *rle = resource_list_find(rl, type, rid);
1675
1676         if (rle) {
1677                 SLIST_REMOVE(rl, rle, resource_list_entry, link);
1678                 free(rle, M_BUS);
1679         }
1680 }
1681
1682 struct resource *
1683 resource_list_alloc(struct resource_list *rl,
1684                     device_t bus, device_t child,
1685                     int type, int *rid,
1686                     u_long start, u_long end,
1687                     u_long count, u_int flags)
1688 {
1689         struct resource_list_entry *rle = 0;
1690         int passthrough = (device_get_parent(child) != bus);
1691         int isdefault = (start == 0UL && end == ~0UL);
1692
1693         if (passthrough) {
1694                 return(BUS_ALLOC_RESOURCE(device_get_parent(bus), child,
1695                                           type, rid,
1696                                           start, end, count, flags));
1697         }
1698
1699         rle = resource_list_find(rl, type, *rid);
1700
1701         if (!rle)
1702                 return(0);              /* no resource of that type/rid */
1703         if (rle->res)
1704                 panic("resource_list_alloc: resource entry is busy");
1705
1706         if (isdefault) {
1707                 start = rle->start;
1708                 count = max(count, rle->count);
1709                 end = max(rle->end, start + count - 1);
1710         }
1711
1712         rle->res = BUS_ALLOC_RESOURCE(device_get_parent(bus), child,
1713                                       type, rid, start, end, count, flags);
1714
1715         /*
1716          * Record the new range.
1717          */
1718         if (rle->res) {
1719                 rle->start = rman_get_start(rle->res);
1720                 rle->end = rman_get_end(rle->res);
1721                 rle->count = count;
1722         }
1723
1724         return(rle->res);
1725 }
1726
1727 int
1728 resource_list_release(struct resource_list *rl,
1729                       device_t bus, device_t child,
1730                       int type, int rid, struct resource *res)
1731 {
1732         struct resource_list_entry *rle = 0;
1733         int passthrough = (device_get_parent(child) != bus);
1734         int error;
1735
1736         if (passthrough) {
1737                 return(BUS_RELEASE_RESOURCE(device_get_parent(bus), child,
1738                                             type, rid, res));
1739         }
1740
1741         rle = resource_list_find(rl, type, rid);
1742
1743         if (!rle)
1744                 panic("resource_list_release: can't find resource");
1745         if (!rle->res)
1746                 panic("resource_list_release: resource entry is not busy");
1747
1748         error = BUS_RELEASE_RESOURCE(device_get_parent(bus), child,
1749                                      type, rid, res);
1750         if (error)
1751                 return(error);
1752
1753         rle->res = NULL;
1754         return(0);
1755 }
1756
1757 int
1758 resource_list_print_type(struct resource_list *rl, const char *name, int type,
1759                          const char *format)
1760 {
1761         struct resource_list_entry *rle;
1762         int printed, retval;
1763
1764         printed = 0;
1765         retval = 0;
1766         /* Yes, this is kinda cheating */
1767         SLIST_FOREACH(rle, rl, link) {
1768                 if (rle->type == type) {
1769                         if (printed == 0)
1770                                 retval += printf(" %s ", name);
1771                         else
1772                                 retval += printf(",");
1773                         printed++;
1774                         retval += printf(format, rle->start);
1775                         if (rle->count > 1) {
1776                                 retval += printf("-");
1777                                 retval += printf(format, rle->start +
1778                                                  rle->count - 1);
1779                         }
1780                 }
1781         }
1782         return(retval);
1783 }
1784
1785 /*
1786  * Call DEVICE_IDENTIFY for each driver.
1787  */
1788 int
1789 bus_generic_probe(device_t dev)
1790 {
1791         devclass_t dc = dev->devclass;
1792         driverlink_t dl;
1793
1794         TAILQ_FOREACH(dl, &dc->drivers, link)
1795                 DEVICE_IDENTIFY(dl->driver, dev);
1796
1797         return(0);
1798 }
1799
1800 int
1801 bus_generic_attach(device_t dev)
1802 {
1803         device_t child;
1804
1805         TAILQ_FOREACH(child, &dev->children, link)
1806                 device_probe_and_attach(child);
1807
1808         return(0);
1809 }
1810
1811 int
1812 bus_generic_detach(device_t dev)
1813 {
1814         device_t child;
1815         int error;
1816
1817         if (dev->state != DS_ATTACHED)
1818                 return(EBUSY);
1819
1820         TAILQ_FOREACH(child, &dev->children, link)
1821                 if ((error = device_detach(child)) != 0)
1822                         return(error);
1823
1824         return 0;
1825 }
1826
1827 int
1828 bus_generic_shutdown(device_t dev)
1829 {
1830         device_t child;
1831
1832         TAILQ_FOREACH(child, &dev->children, link)
1833                 device_shutdown(child);
1834
1835         return(0);
1836 }
1837
1838 int
1839 bus_generic_suspend(device_t dev)
1840 {
1841         int error;
1842         device_t child, child2;
1843
1844         TAILQ_FOREACH(child, &dev->children, link) {
1845                 error = DEVICE_SUSPEND(child);
1846                 if (error) {
1847                         for (child2 = TAILQ_FIRST(&dev->children);
1848                              child2 && child2 != child;
1849                              child2 = TAILQ_NEXT(child2, link))
1850                                 DEVICE_RESUME(child2);
1851                         return(error);
1852                 }
1853         }
1854         return(0);
1855 }
1856
1857 int
1858 bus_generic_resume(device_t dev)
1859 {
1860         device_t child;
1861
1862         TAILQ_FOREACH(child, &dev->children, link)
1863                 DEVICE_RESUME(child);
1864                 /* if resume fails, there's nothing we can usefully do... */
1865
1866         return(0);
1867 }
1868
1869 int
1870 bus_print_child_header(device_t dev, device_t child)
1871 {
1872         int retval = 0;
1873
1874         if (device_get_desc(child))
1875                 retval += device_printf(child, "<%s>", device_get_desc(child));
1876         else
1877                 retval += printf("%s", device_get_nameunit(child));
1878         if (bootverbose) {
1879                 if (child->state != DS_ATTACHED)
1880                         printf(" [tentative]");
1881                 else
1882                         printf(" [attached!]");
1883         }
1884         return(retval);
1885 }
1886
1887 int
1888 bus_print_child_footer(device_t dev, device_t child)
1889 {
1890         return(printf(" on %s\n", device_get_nameunit(dev)));
1891 }
1892
1893 int
1894 bus_generic_print_child(device_t dev, device_t child)
1895 {
1896         int retval = 0;
1897
1898         retval += bus_print_child_header(dev, child);
1899         retval += bus_print_child_footer(dev, child);
1900
1901         return(retval);
1902 }
1903
1904 int
1905 bus_generic_read_ivar(device_t dev, device_t child, int index,
1906                       uintptr_t * result)
1907 {
1908     return(ENOENT);
1909 }
1910
1911 int
1912 bus_generic_write_ivar(device_t dev, device_t child, int index,
1913                        uintptr_t value)
1914 {
1915     return(ENOENT);
1916 }
1917
1918 struct resource_list *
1919 bus_generic_get_resource_list(device_t dev, device_t child)
1920 {
1921     return(NULL);
1922 }
1923
1924 void
1925 bus_generic_driver_added(device_t dev, driver_t *driver)
1926 {
1927         device_t child;
1928
1929         DEVICE_IDENTIFY(driver, dev);
1930         TAILQ_FOREACH(child, &dev->children, link)
1931                 if (child->state == DS_NOTPRESENT)
1932                         device_probe_and_attach(child);
1933 }
1934
1935 int
1936 bus_generic_setup_intr(device_t dev, device_t child, struct resource *irq,
1937                        int flags, driver_intr_t *intr, void *arg,
1938                        void **cookiep, lwkt_serialize_t serializer)
1939 {
1940         /* Propagate up the bus hierarchy until someone handles it. */
1941         if (dev->parent)
1942                 return(BUS_SETUP_INTR(dev->parent, child, irq, flags,
1943                                       intr, arg, cookiep, serializer));
1944         else
1945                 return(EINVAL);
1946 }
1947
1948 int
1949 bus_generic_teardown_intr(device_t dev, device_t child, struct resource *irq,
1950                           void *cookie)
1951 {
1952         /* Propagate up the bus hierarchy until someone handles it. */
1953         if (dev->parent)
1954                 return(BUS_TEARDOWN_INTR(dev->parent, child, irq, cookie));
1955         else
1956                 return(EINVAL);
1957 }
1958
1959 int
1960 bus_generic_disable_intr(device_t dev, device_t child, void *cookie)
1961 {
1962         if (dev->parent)
1963                 return(BUS_DISABLE_INTR(dev->parent, child, cookie));
1964         else
1965                 return(0);
1966 }
1967
1968 void
1969 bus_generic_enable_intr(device_t dev, device_t child, void *cookie)
1970 {
1971         if (dev->parent)
1972                 BUS_ENABLE_INTR(dev->parent, child, cookie);
1973 }
1974
1975 struct resource *
1976 bus_generic_alloc_resource(device_t dev, device_t child, int type, int *rid,
1977                            u_long start, u_long end, u_long count, u_int flags)
1978 {
1979         /* Propagate up the bus hierarchy until someone handles it. */
1980         if (dev->parent)
1981                 return(BUS_ALLOC_RESOURCE(dev->parent, child, type, rid,
1982                                            start, end, count, flags));
1983         else
1984                 return(NULL);
1985 }
1986
1987 int
1988 bus_generic_release_resource(device_t dev, device_t child, int type, int rid,
1989                              struct resource *r)
1990 {
1991         /* Propagate up the bus hierarchy until someone handles it. */
1992         if (dev->parent)
1993                 return(BUS_RELEASE_RESOURCE(dev->parent, child, type, rid, r));
1994         else
1995                 return(EINVAL);
1996 }
1997
1998 int
1999 bus_generic_activate_resource(device_t dev, device_t child, int type, int rid,
2000                               struct resource *r)
2001 {
2002         /* Propagate up the bus hierarchy until someone handles it. */
2003         if (dev->parent)
2004                 return(BUS_ACTIVATE_RESOURCE(dev->parent, child, type, rid, r));
2005         else
2006                 return(EINVAL);
2007 }
2008
2009 int
2010 bus_generic_deactivate_resource(device_t dev, device_t child, int type,
2011                                 int rid, struct resource *r)
2012 {
2013         /* Propagate up the bus hierarchy until someone handles it. */
2014         if (dev->parent)
2015                 return(BUS_DEACTIVATE_RESOURCE(dev->parent, child, type, rid,
2016                                                r));
2017         else
2018                 return(EINVAL);
2019 }
2020
2021 int
2022 bus_generic_config_intr(device_t dev, int irq, enum intr_trigger trig,
2023     enum intr_polarity pol)
2024 {
2025         /* Propagate up the bus hierarchy until someone handles it. */
2026         if (dev->parent)
2027                 return(BUS_CONFIG_INTR(dev->parent, irq, trig, pol));
2028         else
2029                 return(EINVAL);
2030 }
2031
2032 int
2033 bus_generic_rl_get_resource(device_t dev, device_t child, int type, int rid,
2034     u_long *startp, u_long *countp)
2035 {
2036         struct resource_list *rl = NULL;
2037         struct resource_list_entry *rle = NULL;
2038
2039         rl = BUS_GET_RESOURCE_LIST(dev, child);
2040         if (!rl)
2041                 return(EINVAL);
2042
2043         rle = resource_list_find(rl, type, rid);
2044         if (!rle)
2045                 return(ENOENT);
2046
2047         if (startp)
2048                 *startp = rle->start;
2049         if (countp)
2050                 *countp = rle->count;
2051
2052         return(0);
2053 }
2054
2055 int
2056 bus_generic_rl_set_resource(device_t dev, device_t child, int type, int rid,
2057     u_long start, u_long count)
2058 {
2059         struct resource_list *rl = NULL;
2060
2061         rl = BUS_GET_RESOURCE_LIST(dev, child);
2062         if (!rl)
2063                 return(EINVAL);
2064
2065         resource_list_add(rl, type, rid, start, (start + count - 1), count);
2066
2067         return(0);
2068 }
2069
2070 void
2071 bus_generic_rl_delete_resource(device_t dev, device_t child, int type, int rid)
2072 {
2073         struct resource_list *rl = NULL;
2074
2075         rl = BUS_GET_RESOURCE_LIST(dev, child);
2076         if (!rl)
2077                 return;
2078
2079         resource_list_delete(rl, type, rid);
2080 }
2081
2082 int
2083 bus_generic_rl_release_resource(device_t dev, device_t child, int type,
2084     int rid, struct resource *r)
2085 {
2086         struct resource_list *rl = NULL;
2087
2088         rl = BUS_GET_RESOURCE_LIST(dev, child);
2089         if (!rl)
2090                 return(EINVAL);
2091
2092         return(resource_list_release(rl, dev, child, type, rid, r));
2093 }
2094
2095 struct resource *
2096 bus_generic_rl_alloc_resource(device_t dev, device_t child, int type,
2097     int *rid, u_long start, u_long end, u_long count, u_int flags)
2098 {
2099         struct resource_list *rl = NULL;
2100
2101         rl = BUS_GET_RESOURCE_LIST(dev, child);
2102         if (!rl)
2103                 return(NULL);
2104
2105         return(resource_list_alloc(rl, dev, child, type, rid,
2106             start, end, count, flags));
2107 }
2108
2109 int
2110 bus_generic_child_present(device_t bus, device_t child)
2111 {
2112         return(BUS_CHILD_PRESENT(device_get_parent(bus), bus));
2113 }
2114
2115
2116 /*
2117  * Some convenience functions to make it easier for drivers to use the
2118  * resource-management functions.  All these really do is hide the
2119  * indirection through the parent's method table, making for slightly
2120  * less-wordy code.  In the future, it might make sense for this code
2121  * to maintain some sort of a list of resources allocated by each device.
2122  */
2123 struct resource *
2124 bus_alloc_resource(device_t dev, int type, int *rid, u_long start, u_long end,
2125                    u_long count, u_int flags)
2126 {
2127         if (dev->parent == 0)
2128                 return(0);
2129         return(BUS_ALLOC_RESOURCE(dev->parent, dev, type, rid, start, end,
2130                                   count, flags));
2131 }
2132
2133 int
2134 bus_activate_resource(device_t dev, int type, int rid, struct resource *r)
2135 {
2136         if (dev->parent == 0)
2137                 return(EINVAL);
2138         return(BUS_ACTIVATE_RESOURCE(dev->parent, dev, type, rid, r));
2139 }
2140
2141 int
2142 bus_deactivate_resource(device_t dev, int type, int rid, struct resource *r)
2143 {
2144         if (dev->parent == 0)
2145                 return(EINVAL);
2146         return(BUS_DEACTIVATE_RESOURCE(dev->parent, dev, type, rid, r));
2147 }
2148
2149 int
2150 bus_release_resource(device_t dev, int type, int rid, struct resource *r)
2151 {
2152         if (dev->parent == 0)
2153                 return(EINVAL);
2154         return(BUS_RELEASE_RESOURCE(dev->parent, dev, type, rid, r));
2155 }
2156
2157 int
2158 bus_setup_intr(device_t dev, struct resource *r, int flags,
2159                driver_intr_t handler, void *arg,
2160                void **cookiep, lwkt_serialize_t serializer)
2161 {
2162         if (dev->parent == 0)
2163                 return(EINVAL);
2164         return(BUS_SETUP_INTR(dev->parent, dev, r, flags, handler, arg,
2165                               cookiep, serializer));
2166 }
2167
2168 int
2169 bus_teardown_intr(device_t dev, struct resource *r, void *cookie)
2170 {
2171         if (dev->parent == 0)
2172                 return(EINVAL);
2173         return(BUS_TEARDOWN_INTR(dev->parent, dev, r, cookie));
2174 }
2175
2176 void
2177 bus_enable_intr(device_t dev, void *cookie)
2178 {
2179         if (dev->parent)
2180                 BUS_ENABLE_INTR(dev->parent, dev, cookie);
2181 }
2182
2183 int
2184 bus_disable_intr(device_t dev, void *cookie)
2185 {
2186         if (dev->parent)
2187                 return(BUS_DISABLE_INTR(dev->parent, dev, cookie));
2188         else
2189                 return(0);
2190 }
2191
2192 int
2193 bus_set_resource(device_t dev, int type, int rid,
2194                  u_long start, u_long count)
2195 {
2196         return(BUS_SET_RESOURCE(device_get_parent(dev), dev, type, rid,
2197                                 start, count));
2198 }
2199
2200 int
2201 bus_get_resource(device_t dev, int type, int rid,
2202                  u_long *startp, u_long *countp)
2203 {
2204         return(BUS_GET_RESOURCE(device_get_parent(dev), dev, type, rid,
2205                                 startp, countp));
2206 }
2207
2208 u_long
2209 bus_get_resource_start(device_t dev, int type, int rid)
2210 {
2211         u_long start, count;
2212         int error;
2213
2214         error = BUS_GET_RESOURCE(device_get_parent(dev), dev, type, rid,
2215                                  &start, &count);
2216         if (error)
2217                 return(0);
2218         return(start);
2219 }
2220
2221 u_long
2222 bus_get_resource_count(device_t dev, int type, int rid)
2223 {
2224         u_long start, count;
2225         int error;
2226
2227         error = BUS_GET_RESOURCE(device_get_parent(dev), dev, type, rid,
2228                                  &start, &count);
2229         if (error)
2230                 return(0);
2231         return(count);
2232 }
2233
2234 void
2235 bus_delete_resource(device_t dev, int type, int rid)
2236 {
2237         BUS_DELETE_RESOURCE(device_get_parent(dev), dev, type, rid);
2238 }
2239
2240 int
2241 bus_child_present(device_t child)
2242 {
2243         return (BUS_CHILD_PRESENT(device_get_parent(child), child));
2244 }
2245
2246 int
2247 bus_child_pnpinfo_str(device_t child, char *buf, size_t buflen)
2248 {
2249         device_t parent;
2250
2251         parent = device_get_parent(child);
2252         if (parent == NULL) {
2253                 *buf = '\0';
2254                 return (0);
2255         }
2256         return (BUS_CHILD_PNPINFO_STR(parent, child, buf, buflen));
2257 }
2258
2259 int
2260 bus_child_location_str(device_t child, char *buf, size_t buflen)
2261 {
2262         device_t parent;
2263
2264         parent = device_get_parent(child);
2265         if (parent == NULL) {
2266                 *buf = '\0';
2267                 return (0);
2268         }
2269         return (BUS_CHILD_LOCATION_STR(parent, child, buf, buflen));
2270 }
2271
2272 static int
2273 root_print_child(device_t dev, device_t child)
2274 {
2275         return(0);
2276 }
2277
2278 static int
2279 root_setup_intr(device_t dev, device_t child, driver_intr_t *intr, void *arg,
2280                 void **cookiep, lwkt_serialize_t serializer)
2281 {
2282         /*
2283          * If an interrupt mapping gets to here something bad has happened.
2284          */
2285         panic("root_setup_intr");
2286 }
2287
2288 /*
2289  * If we get here, assume that the device is permanant and really is
2290  * present in the system.  Removable bus drivers are expected to intercept
2291  * this call long before it gets here.  We return -1 so that drivers that
2292  * really care can check vs -1 or some ERRNO returned higher in the food
2293  * chain.
2294  */
2295 static int
2296 root_child_present(device_t dev, device_t child)
2297 {
2298         return(-1);
2299 }
2300
2301 /*
2302  * XXX NOTE! other defaults may be set in bus_if.m
2303  */
2304 static kobj_method_t root_methods[] = {
2305         /* Device interface */
2306         KOBJMETHOD(device_shutdown,     bus_generic_shutdown),
2307         KOBJMETHOD(device_suspend,      bus_generic_suspend),
2308         KOBJMETHOD(device_resume,       bus_generic_resume),
2309
2310         /* Bus interface */
2311         KOBJMETHOD(bus_print_child,     root_print_child),
2312         KOBJMETHOD(bus_read_ivar,       bus_generic_read_ivar),
2313         KOBJMETHOD(bus_write_ivar,      bus_generic_write_ivar),
2314         KOBJMETHOD(bus_setup_intr,      root_setup_intr),
2315         KOBJMETHOD(bus_child_present,   root_child_present),
2316
2317         { 0, 0 }
2318 };
2319
2320 static driver_t root_driver = {
2321         "root",
2322         root_methods,
2323         1,                      /* no softc */
2324 };
2325
2326 device_t        root_bus;
2327 devclass_t      root_devclass;
2328
2329 static int
2330 root_bus_module_handler(module_t mod, int what, void* arg)
2331 {
2332         switch (what) {
2333         case MOD_LOAD:
2334                 root_bus = make_device(NULL, "root", 0);
2335                 root_bus->desc = "System root bus";
2336                 kobj_init((kobj_t) root_bus, (kobj_class_t) &root_driver);
2337                 root_bus->driver = &root_driver;
2338                 root_bus->state = DS_ATTACHED;
2339                 root_devclass = devclass_find_internal("root", NULL, FALSE);
2340                 return(0);
2341
2342         case MOD_SHUTDOWN:
2343                 device_shutdown(root_bus);
2344                 return(0);
2345         default:
2346                 return(0);
2347         }
2348 }
2349
2350 static moduledata_t root_bus_mod = {
2351         "rootbus",
2352         root_bus_module_handler,
2353         0
2354 };
2355 DECLARE_MODULE(rootbus, root_bus_mod, SI_SUB_DRIVERS, SI_ORDER_FIRST);
2356
2357 void
2358 root_bus_configure(void)
2359 {
2360         device_t dev;
2361
2362         PDEBUG(("."));
2363
2364         TAILQ_FOREACH(dev, &root_bus->children, link)
2365                 device_probe_and_attach(dev);
2366 }
2367
2368 int
2369 driver_module_handler(module_t mod, int what, void *arg)
2370 {
2371         int error;
2372         struct driver_module_data *dmd;
2373         devclass_t bus_devclass;
2374         kobj_class_t driver;
2375         const char *parentname;
2376
2377         dmd = (struct driver_module_data *)arg;
2378         bus_devclass = devclass_find_internal(dmd->dmd_busname, NULL, TRUE);
2379         error = 0;
2380
2381         switch (what) {
2382         case MOD_LOAD:
2383                 if (dmd->dmd_chainevh)
2384                         error = dmd->dmd_chainevh(mod,what,dmd->dmd_chainarg);
2385
2386                 driver = dmd->dmd_driver;
2387                 PDEBUG(("Loading module: driver %s on bus %s",
2388                         DRIVERNAME(driver), dmd->dmd_busname));
2389                 error = devclass_add_driver(bus_devclass, driver);
2390                 if (error)
2391                         break;
2392
2393                 /*
2394                  * If the driver has any base classes, make the
2395                  * devclass inherit from the devclass of the driver's
2396                  * first base class. This will allow the system to
2397                  * search for drivers in both devclasses for children
2398                  * of a device using this driver.
2399                  */
2400                 if (driver->baseclasses)
2401                         parentname = driver->baseclasses[0]->name;
2402                 else
2403                         parentname = NULL;
2404                 *dmd->dmd_devclass = devclass_find_internal(driver->name,
2405                                                             parentname, TRUE);
2406                 break;
2407
2408         case MOD_UNLOAD:
2409                 PDEBUG(("Unloading module: driver %s from bus %s",
2410                         DRIVERNAME(dmd->dmd_driver), dmd->dmd_busname));
2411                 error = devclass_delete_driver(bus_devclass, dmd->dmd_driver);
2412
2413                 if (!error && dmd->dmd_chainevh)
2414                         error = dmd->dmd_chainevh(mod,what,dmd->dmd_chainarg);
2415                 break;
2416         }
2417
2418         return (error);
2419 }
2420
2421 #ifdef BUS_DEBUG
2422
2423 /*
2424  * The _short versions avoid iteration by not calling anything that prints
2425  * more than oneliners. I love oneliners.
2426  */
2427
2428 static void
2429 print_device_short(device_t dev, int indent)
2430 {
2431         if (!dev)
2432                 return;
2433
2434         indentprintf(("device %d: <%s> %sparent,%schildren,%s%s%s%s,%sivars,%ssoftc,busy=%d\n",
2435                       dev->unit, dev->desc,
2436                       (dev->parent? "":"no "),
2437                       (TAILQ_EMPTY(&dev->children)? "no ":""),
2438                       (dev->flags&DF_ENABLED? "enabled,":"disabled,"),
2439                       (dev->flags&DF_FIXEDCLASS? "fixed,":""),
2440                       (dev->flags&DF_WILDCARD? "wildcard,":""),
2441                       (dev->flags&DF_DESCMALLOCED? "descmalloced,":""),
2442                       (dev->ivars? "":"no "),
2443                       (dev->softc? "":"no "),
2444                       dev->busy));
2445 }
2446
2447 static void
2448 print_device(device_t dev, int indent)
2449 {
2450         if (!dev)
2451                 return;
2452
2453         print_device_short(dev, indent);
2454
2455         indentprintf(("Parent:\n"));
2456         print_device_short(dev->parent, indent+1);
2457         indentprintf(("Driver:\n"));
2458         print_driver_short(dev->driver, indent+1);
2459         indentprintf(("Devclass:\n"));
2460         print_devclass_short(dev->devclass, indent+1);
2461 }
2462
2463 /*
2464  * Print the device and all its children (indented).
2465  */
2466 void
2467 print_device_tree_short(device_t dev, int indent)
2468 {
2469         device_t child;
2470
2471         if (!dev)
2472                 return;
2473
2474         print_device_short(dev, indent);
2475
2476         TAILQ_FOREACH(child, &dev->children, link)
2477                 print_device_tree_short(child, indent+1);
2478 }
2479
2480 /*
2481  * Print the device and all its children (indented).
2482  */
2483 void
2484 print_device_tree(device_t dev, int indent)
2485 {
2486         device_t child;
2487
2488         if (!dev)
2489                 return;
2490
2491         print_device(dev, indent);
2492
2493         TAILQ_FOREACH(child, &dev->children, link)
2494                 print_device_tree(child, indent+1);
2495 }
2496
2497 static void
2498 print_driver_short(driver_t *driver, int indent)
2499 {
2500         if (!driver)
2501                 return;
2502
2503         indentprintf(("driver %s: softc size = %d\n",
2504                       driver->name, driver->size));
2505 }
2506
2507 static void
2508 print_driver(driver_t *driver, int indent)
2509 {
2510         if (!driver)
2511                 return;
2512
2513         print_driver_short(driver, indent);
2514 }
2515
2516
2517 static void
2518 print_driver_list(driver_list_t drivers, int indent)
2519 {
2520         driverlink_t driver;
2521
2522         TAILQ_FOREACH(driver, &drivers, link)
2523                 print_driver(driver->driver, indent);
2524 }
2525
2526 static void
2527 print_devclass_short(devclass_t dc, int indent)
2528 {
2529         if (!dc)
2530                 return;
2531
2532         indentprintf(("devclass %s: max units = %d\n", dc->name, dc->maxunit));
2533 }
2534
2535 static void
2536 print_devclass(devclass_t dc, int indent)
2537 {
2538         int i;
2539
2540         if (!dc)
2541                 return;
2542
2543         print_devclass_short(dc, indent);
2544         indentprintf(("Drivers:\n"));
2545         print_driver_list(dc->drivers, indent+1);
2546
2547         indentprintf(("Devices:\n"));
2548         for (i = 0; i < dc->maxunit; i++)
2549                 if (dc->devices[i])
2550                         print_device(dc->devices[i], indent+1);
2551 }
2552
2553 void
2554 print_devclass_list_short(void)
2555 {
2556         devclass_t dc;
2557
2558         printf("Short listing of devclasses, drivers & devices:\n");
2559         TAILQ_FOREACH(dc, &devclasses, link) {
2560                 print_devclass_short(dc, 0);
2561         }
2562 }
2563
2564 void
2565 print_devclass_list(void)
2566 {
2567         devclass_t dc;
2568
2569         printf("Full listing of devclasses, drivers & devices:\n");
2570         TAILQ_FOREACH(dc, &devclasses, link) {
2571                 print_devclass(dc, 0);
2572         }
2573 }
2574
2575 #endif
2576
2577 /*
2578  * Check to see if a device is disabled via a disabled hint.
2579  */
2580 int
2581 resource_disabled(const char *name, int unit)
2582 {
2583         int error, value;
2584
2585         error = resource_int_value(name, unit, "disabled", &value);
2586         if (error)
2587                return(0);
2588         return(value);
2589 }