sys/kern/kern_conf.c

   1 /*-
   2  * Copyright (c) 1999-2002 Poul-Henning Kamp
   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
  27 #include <sys/cdefs.h>
  28 __FBSDID("$FreeBSD$");
  29
  30 #include <sys/param.h>
  31 #include <sys/kernel.h>
  32 #include <sys/systm.h>
  33 #include <sys/bus.h>
  34 #include <sys/bio.h>
  35 #include <sys/lock.h>
  36 #include <sys/mutex.h>
  37 #include <sys/module.h>
  38 #include <sys/malloc.h>
  39 #include <sys/conf.h>
  40 #include <sys/vnode.h>
  41 #include <sys/queue.h>
  42 #include <sys/poll.h>
  43 #include <sys/sx.h>
  44 #include <sys/ctype.h>
  45 #include <sys/ucred.h>
  46 #include <sys/taskqueue.h>
  47 #include <machine/stdarg.h>
  48
  49 #include <fs/devfs/devfs_int.h>
  50 #include <vm/vm.h>
  51
  52 static MALLOC_DEFINE(M_DEVT, "cdev", "cdev storage");
  53
  54 struct mtx devmtx;
  55 static void destroy_devl(struct cdev *dev);
  56 static int destroy_dev_sched_cbl(struct cdev *dev,
  57     void (*cb)(void *), void *arg);
  58 static int make_dev_credv(int flags, struct cdev **dres, struct cdevsw *devsw,
  59     int unit, struct ucred *cr, uid_t uid, gid_t gid, int mode, const char *fmt,
  60     va_list ap);
  61
  62 static struct cdev_priv_list cdevp_free_list =
  63     TAILQ_HEAD_INITIALIZER(cdevp_free_list);
  64 static SLIST_HEAD(free_cdevsw, cdevsw) cdevsw_gt_post_list =
  65     SLIST_HEAD_INITIALIZER(cdevsw_gt_post_list);
  66
  67 void
  68 dev_lock(void)
  69 {
  70
  71         mtx_lock(&devmtx);
  72 }
  73
  74 /*
  75  * Free all the memory collected while the cdev mutex was
  76  * locked. Since devmtx is after the system map mutex, free() cannot
  77  * be called immediately and is postponed until cdev mutex can be
  78  * dropped.
  79  */
  80 static void
  81 dev_unlock_and_free(void)
  82 {
  83         struct cdev_priv_list cdp_free;
  84         struct free_cdevsw csw_free;
  85         struct cdev_priv *cdp;
  86         struct cdevsw *csw;
  87
  88         mtx_assert(&devmtx, MA_OWNED);
  89
  90         /*
  91          * Make the local copy of the list heads while the dev_mtx is
  92          * held. Free it later.
  93          */
  94         TAILQ_INIT(&cdp_free);
  95         TAILQ_CONCAT(&cdp_free, &cdevp_free_list, cdp_list);
  96         csw_free = cdevsw_gt_post_list;
  97         SLIST_INIT(&cdevsw_gt_post_list);
  98
  99         mtx_unlock(&devmtx);
 100
 101         while ((cdp = TAILQ_FIRST(&cdp_free)) != NULL) {
 102                 TAILQ_REMOVE(&cdp_free, cdp, cdp_list);
 103                 devfs_free(&cdp->cdp_c);
 104         }
 105         while ((csw = SLIST_FIRST(&csw_free)) != NULL) {
 106                 SLIST_REMOVE_HEAD(&csw_free, d_postfree_list);
 107                 free(csw, M_DEVT);
 108         }
 109 }
 110
 111 static void
 112 dev_free_devlocked(struct cdev *cdev)
 113 {
 114         struct cdev_priv *cdp;
 115
 116         mtx_assert(&devmtx, MA_OWNED);
 117         cdp = cdev2priv(cdev);
 118         KASSERT((cdp->cdp_flags & CDP_UNREF_DTR) == 0,
 119             ("destroy_dev() was not called after delist_dev(%p)", cdev));
 120         TAILQ_INSERT_HEAD(&cdevp_free_list, cdp, cdp_list);
 121 }
 122
 123 static void
 124 cdevsw_free_devlocked(struct cdevsw *csw)
 125 {
 126
 127         mtx_assert(&devmtx, MA_OWNED);
 128         SLIST_INSERT_HEAD(&cdevsw_gt_post_list, csw, d_postfree_list);
 129 }
 130
 131 void
 132 dev_unlock(void)
 133 {
 134
 135         mtx_unlock(&devmtx);
 136 }
 137
 138 void
 139 dev_ref(struct cdev *dev)
 140 {
 141
 142         mtx_assert(&devmtx, MA_NOTOWNED);
 143         mtx_lock(&devmtx);
 144         dev->si_refcount++;
 145         mtx_unlock(&devmtx);
 146 }
 147
 148 void
 149 dev_refl(struct cdev *dev)
 150 {
 151
 152         mtx_assert(&devmtx, MA_OWNED);
 153         dev->si_refcount++;
 154 }
 155
 156 void
 157 dev_rel(struct cdev *dev)
 158 {
 159         int flag = 0;
 160
 161         mtx_assert(&devmtx, MA_NOTOWNED);
 162         dev_lock();
 163         dev->si_refcount--;
 164         KASSERT(dev->si_refcount >= 0,
 165             ("dev_rel(%s) gave negative count", devtoname(dev)));
 166 #if 0
 167         if (dev->si_usecount == 0 &&
 168             (dev->si_flags & SI_CHEAPCLONE) && (dev->si_flags & SI_NAMED))
 169                 ;
 170         else
 171 #endif
 172         if (dev->si_devsw == NULL && dev->si_refcount == 0) {
 173                 LIST_REMOVE(dev, si_list);
 174                 flag = 1;
 175         }
 176         dev_unlock();
 177         if (flag)
 178                 devfs_free(dev);
 179 }
 180
 181 struct cdevsw *
 182 dev_refthread(struct cdev *dev, int *ref)
 183 {
 184         struct cdevsw *csw;
 185         struct cdev_priv *cdp;
 186
 187         mtx_assert(&devmtx, MA_NOTOWNED);
 188         if ((dev->si_flags & SI_ETERNAL) != 0) {
 189                 *ref = 0;
 190                 return (dev->si_devsw);
 191         }
 192         dev_lock();
 193         csw = dev->si_devsw;
 194         if (csw != NULL) {
 195                 cdp = cdev2priv(dev);
 196                 if ((cdp->cdp_flags & CDP_SCHED_DTR) == 0)
 197                         dev->si_threadcount++;
 198                 else
 199                         csw = NULL;
 200         }
 201         dev_unlock();
 202         *ref = 1;
 203         return (csw);
 204 }
 205
 206 struct cdevsw *
 207 devvn_refthread(struct vnode *vp, struct cdev **devp, int *ref)
 208 {
 209         struct cdevsw *csw;
 210         struct cdev_priv *cdp;
 211         struct cdev *dev;
 212
 213         mtx_assert(&devmtx, MA_NOTOWNED);
 214         if ((vp->v_vflag & VV_ETERNALDEV) != 0) {
 215                 dev = vp->v_rdev;
 216                 if (dev == NULL)
 217                         return (NULL);
 218                 KASSERT((dev->si_flags & SI_ETERNAL) != 0,
 219                     ("Not eternal cdev"));
 220                 *ref = 0;
 221                 csw = dev->si_devsw;
 222                 KASSERT(csw != NULL, ("Eternal cdev is destroyed"));
 223                 *devp = dev;
 224                 return (csw);
 225         }
 226
 227         csw = NULL;
 228         dev_lock();
 229         dev = vp->v_rdev;
 230         if (dev == NULL) {
 231                 dev_unlock();
 232                 return (NULL);
 233         }
 234         cdp = cdev2priv(dev);
 235         if ((cdp->cdp_flags & CDP_SCHED_DTR) == 0) {
 236                 csw = dev->si_devsw;
 237                 if (csw != NULL)
 238                         dev->si_threadcount++;
 239         }
 240         dev_unlock();
 241         if (csw != NULL) {
 242                 *devp = dev;
 243                 *ref = 1;
 244         }
 245         return (csw);
 246 }
 247
 248 void
 249 dev_relthread(struct cdev *dev, int ref)
 250 {
 251
 252         mtx_assert(&devmtx, MA_NOTOWNED);
 253         if (!ref)
 254                 return;
 255         dev_lock();
 256         KASSERT(dev->si_threadcount > 0,
 257             ("%s threadcount is wrong", dev->si_name));
 258         dev->si_threadcount--;
 259         dev_unlock();
 260 }
 261
 262 int
 263 nullop(void)
 264 {
 265
 266         return (0);
 267 }
 268
 269 int
 270 eopnotsupp(void)
 271 {
 272
 273         return (EOPNOTSUPP);
 274 }
 275
 276 static int
 277 enxio(void)
 278 {
 279         return (ENXIO);
 280 }
 281
 282 static int
 283 enodev(void)
 284 {
 285         return (ENODEV);
 286 }
 287
 288 /* Define a dead_cdevsw for use when devices leave unexpectedly. */
 289
 290 #define dead_open       (d_open_t *)enxio
 291 #define dead_close      (d_close_t *)enxio
 292 #define dead_read       (d_read_t *)enxio
 293 #define dead_write      (d_write_t *)enxio
 294 #define dead_ioctl      (d_ioctl_t *)enxio
 295 #define dead_poll       (d_poll_t *)enodev
 296 #define dead_mmap       (d_mmap_t *)enodev
 297
 298 static void
 299 dead_strategy(struct bio *bp)
 300 {
 301
 302         biofinish(bp, NULL, ENXIO);
 303 }
 304
 305 #define dead_dump       (dumper_t *)enxio
 306 #define dead_kqfilter   (d_kqfilter_t *)enxio
 307 #define dead_mmap_single (d_mmap_single_t *)enodev
 308
 309 static struct cdevsw dead_cdevsw = {
 310         .d_version =    D_VERSION,
 311         .d_open =       dead_open,
 312         .d_close =      dead_close,
 313         .d_read =       dead_read,
 314         .d_write =      dead_write,
 315         .d_ioctl =      dead_ioctl,
 316         .d_poll =       dead_poll,
 317         .d_mmap =       dead_mmap,
 318         .d_strategy =   dead_strategy,
 319         .d_name =       "dead",
 320         .d_dump =       dead_dump,
 321         .d_kqfilter =   dead_kqfilter,
 322         .d_mmap_single = dead_mmap_single
 323 };
 324
 325 /* Default methods if driver does not specify method */
 326
 327 #define null_open       (d_open_t *)nullop
 328 #define null_close      (d_close_t *)nullop
 329 #define no_read         (d_read_t *)enodev
 330 #define no_write        (d_write_t *)enodev
 331 #define no_ioctl        (d_ioctl_t *)enodev
 332 #define no_mmap         (d_mmap_t *)enodev
 333 #define no_kqfilter     (d_kqfilter_t *)enodev
 334 #define no_mmap_single  (d_mmap_single_t *)enodev
 335
 336 static void
 337 no_strategy(struct bio *bp)
 338 {
 339
 340         biofinish(bp, NULL, ENODEV);
 341 }
 342
 343 static int
 344 no_poll(struct cdev *dev __unused, int events, struct thread *td __unused)
 345 {
 346
 347         return (poll_no_poll(events));
 348 }
 349
 350 #define no_dump         (dumper_t *)enodev
 351
 352 static int
 353 giant_open(struct cdev *dev, int oflags, int devtype, struct thread *td)
 354 {
 355         struct cdevsw *dsw;
 356         int ref, retval;
 357
 358         dsw = dev_refthread(dev, &ref);
 359         if (dsw == NULL)
 360                 return (ENXIO);
 361         mtx_lock(&Giant);
 362         retval = dsw->d_gianttrick->d_open(dev, oflags, devtype, td);
 363         mtx_unlock(&Giant);
 364         dev_relthread(dev, ref);
 365         return (retval);
 366 }
 367
 368 static int
 369 giant_fdopen(struct cdev *dev, int oflags, struct thread *td, struct file *fp)
 370 {
 371         struct cdevsw *dsw;
 372         int ref, retval;
 373
 374         dsw = dev_refthread(dev, &ref);
 375         if (dsw == NULL)
 376                 return (ENXIO);
 377         mtx_lock(&Giant);
 378         retval = dsw->d_gianttrick->d_fdopen(dev, oflags, td, fp);
 379         mtx_unlock(&Giant);
 380         dev_relthread(dev, ref);
 381         return (retval);
 382 }
 383
 384 static int
 385 giant_close(struct cdev *dev, int fflag, int devtype, struct thread *td)
 386 {
 387         struct cdevsw *dsw;
 388         int ref, retval;
 389
 390         dsw = dev_refthread(dev, &ref);
 391         if (dsw == NULL)
 392                 return (ENXIO);
 393         mtx_lock(&Giant);
 394         retval = dsw->d_gianttrick->d_close(dev, fflag, devtype, td);
 395         mtx_unlock(&Giant);
 396         dev_relthread(dev, ref);
 397         return (retval);
 398 }
 399
 400 static void
 401 giant_strategy(struct bio *bp)
 402 {
 403         struct cdevsw *dsw;
 404         struct cdev *dev;
 405         int ref;
 406
 407         dev = bp->bio_dev;
 408         dsw = dev_refthread(dev, &ref);
 409         if (dsw == NULL) {
 410                 biofinish(bp, NULL, ENXIO);
 411                 return;
 412         }
 413         mtx_lock(&Giant);
 414         dsw->d_gianttrick->d_strategy(bp);
 415         mtx_unlock(&Giant);
 416         dev_relthread(dev, ref);
 417 }
 418
 419 static int
 420 giant_ioctl(struct cdev *dev, u_long cmd, caddr_t data, int fflag, struct thread *td)
 421 {
 422         struct cdevsw *dsw;
 423         int ref, retval;
 424
 425         dsw = dev_refthread(dev, &ref);
 426         if (dsw == NULL)
 427                 return (ENXIO);
 428         mtx_lock(&Giant);
 429         retval = dsw->d_gianttrick->d_ioctl(dev, cmd, data, fflag, td);
 430         mtx_unlock(&Giant);
 431         dev_relthread(dev, ref);
 432         return (retval);
 433 }
 434
 435 static int
 436 giant_read(struct cdev *dev, struct uio *uio, int ioflag)
 437 {
 438         struct cdevsw *dsw;
 439         int ref, retval;
 440
 441         dsw = dev_refthread(dev, &ref);
 442         if (dsw == NULL)
 443                 return (ENXIO);
 444         mtx_lock(&Giant);
 445         retval = dsw->d_gianttrick->d_read(dev, uio, ioflag);
 446         mtx_unlock(&Giant);
 447         dev_relthread(dev, ref);
 448         return (retval);
 449 }
 450
 451 static int
 452 giant_write(struct cdev *dev, struct uio *uio, int ioflag)
 453 {
 454         struct cdevsw *dsw;
 455         int ref, retval;
 456
 457         dsw = dev_refthread(dev, &ref);
 458         if (dsw == NULL)
 459                 return (ENXIO);
 460         mtx_lock(&Giant);
 461         retval = dsw->d_gianttrick->d_write(dev, uio, ioflag);
 462         mtx_unlock(&Giant);
 463         dev_relthread(dev, ref);
 464         return (retval);
 465 }
 466
 467 static int
 468 giant_poll(struct cdev *dev, int events, struct thread *td)
 469 {
 470         struct cdevsw *dsw;
 471         int ref, retval;
 472
 473         dsw = dev_refthread(dev, &ref);
 474         if (dsw == NULL)
 475                 return (ENXIO);
 476         mtx_lock(&Giant);
 477         retval = dsw->d_gianttrick->d_poll(dev, events, td);
 478         mtx_unlock(&Giant);
 479         dev_relthread(dev, ref);
 480         return (retval);
 481 }
 482
 483 static int
 484 giant_kqfilter(struct cdev *dev, struct knote *kn)
 485 {
 486         struct cdevsw *dsw;
 487         int ref, retval;
 488
 489         dsw = dev_refthread(dev, &ref);
 490         if (dsw == NULL)
 491                 return (ENXIO);
 492         mtx_lock(&Giant);
 493         retval = dsw->d_gianttrick->d_kqfilter(dev, kn);
 494         mtx_unlock(&Giant);
 495         dev_relthread(dev, ref);
 496         return (retval);
 497 }
 498
 499 static int
 500 giant_mmap(struct cdev *dev, vm_ooffset_t offset, vm_paddr_t *paddr, int nprot,
 501     vm_memattr_t *memattr)
 502 {
 503         struct cdevsw *dsw;
 504         int ref, retval;
 505
 506         dsw = dev_refthread(dev, &ref);
 507         if (dsw == NULL)
 508                 return (ENXIO);
 509         mtx_lock(&Giant);
 510         retval = dsw->d_gianttrick->d_mmap(dev, offset, paddr, nprot,
 511             memattr);
 512         mtx_unlock(&Giant);
 513         dev_relthread(dev, ref);
 514         return (retval);
 515 }
 516
 517 static int
 518 giant_mmap_single(struct cdev *dev, vm_ooffset_t *offset, vm_size_t size,
 519     vm_object_t *object, int nprot)
 520 {
 521         struct cdevsw *dsw;
 522         int ref, retval;
 523
 524         dsw = dev_refthread(dev, &ref);
 525         if (dsw == NULL)
 526                 return (ENXIO);
 527         mtx_lock(&Giant);
 528         retval = dsw->d_gianttrick->d_mmap_single(dev, offset, size, object,
 529             nprot);
 530         mtx_unlock(&Giant);
 531         dev_relthread(dev, ref);
 532         return (retval);
 533 }
 534
 535 static void
 536 notify(struct cdev *dev, const char *ev, int flags)
 537 {
 538         static const char prefix[] = "cdev=";
 539         char *data;
 540         int namelen, mflags;
 541
 542         if (cold)
 543                 return;
 544         mflags = (flags & MAKEDEV_NOWAIT) ? M_NOWAIT : M_WAITOK;
 545         namelen = strlen(dev->si_name);
 546         data = malloc(namelen + sizeof(prefix), M_TEMP, mflags);
 547         if (data == NULL)
 548                 return;
 549         memcpy(data, prefix, sizeof(prefix) - 1);
 550         memcpy(data + sizeof(prefix) - 1, dev->si_name, namelen + 1);
 551         devctl_notify_f("DEVFS", "CDEV", ev, data, mflags);
 552         free(data, M_TEMP);
 553 }
 554
 555 static void
 556 notify_create(struct cdev *dev, int flags)
 557 {
 558
 559         notify(dev, "CREATE", flags);
 560 }
 561
 562 static void
 563 notify_destroy(struct cdev *dev)
 564 {
 565
 566         notify(dev, "DESTROY", MAKEDEV_WAITOK);
 567 }
 568
 569 static struct cdev *
 570 newdev(struct cdevsw *csw, int unit, struct cdev *si)
 571 {
 572         struct cdev *si2;
 573
 574         mtx_assert(&devmtx, MA_OWNED);
 575         if (csw->d_flags & D_NEEDMINOR) {
 576                 /* We may want to return an existing device */
 577                 LIST_FOREACH(si2, &csw->d_devs, si_list) {
 578                         if (dev2unit(si2) == unit) {
 579                                 dev_free_devlocked(si);
 580                                 return (si2);
 581                         }
 582                 }
 583         }
 584         si->si_drv0 = unit;
 585         si->si_devsw = csw;
 586         LIST_INSERT_HEAD(&csw->d_devs, si, si_list);
 587         return (si);
 588 }
 589
 590 static void
 591 fini_cdevsw(struct cdevsw *devsw)
 592 {
 593         struct cdevsw *gt;
 594
 595         if (devsw->d_gianttrick != NULL) {
 596                 gt = devsw->d_gianttrick;
 597                 memcpy(devsw, gt, sizeof *devsw);
 598                 cdevsw_free_devlocked(gt);
 599                 devsw->d_gianttrick = NULL;
 600         }
 601         devsw->d_flags &= ~D_INIT;
 602 }
 603
 604 static int
 605 prep_cdevsw(struct cdevsw *devsw, int flags)
 606 {
 607         struct cdevsw *dsw2;
 608
 609         mtx_assert(&devmtx, MA_OWNED);
 610         if (devsw->d_flags & D_INIT)
 611                 return (0);
 612         if (devsw->d_flags & D_NEEDGIANT) {
 613                 dev_unlock();
 614                 dsw2 = malloc(sizeof *dsw2, M_DEVT,
 615                      (flags & MAKEDEV_NOWAIT) ? M_NOWAIT : M_WAITOK);
 616                 dev_lock();
 617                 if (dsw2 == NULL && !(devsw->d_flags & D_INIT))
 618                         return (ENOMEM);
 619         } else
 620                 dsw2 = NULL;
 621         if (devsw->d_flags & D_INIT) {
 622                 if (dsw2 != NULL)
 623                         cdevsw_free_devlocked(dsw2);
 624                 return (0);
 625         }
 626
 627         if (devsw->d_version != D_VERSION_03) {
 628                 printf(
 629                     "WARNING: Device driver \"%s\" has wrong version %s\n",
 630                     devsw->d_name == NULL ? "???" : devsw->d_name,
 631                     "and is disabled.  Recompile KLD module.");
 632                 devsw->d_open = dead_open;
 633                 devsw->d_close = dead_close;
 634                 devsw->d_read = dead_read;
 635                 devsw->d_write = dead_write;
 636                 devsw->d_ioctl = dead_ioctl;
 637                 devsw->d_poll = dead_poll;
 638                 devsw->d_mmap = dead_mmap;
 639                 devsw->d_mmap_single = dead_mmap_single;
 640                 devsw->d_strategy = dead_strategy;
 641                 devsw->d_dump = dead_dump;
 642                 devsw->d_kqfilter = dead_kqfilter;
 643         }
 644
 645         if (devsw->d_flags & D_NEEDGIANT) {
 646                 if (devsw->d_gianttrick == NULL) {
 647                         memcpy(dsw2, devsw, sizeof *dsw2);
 648                         devsw->d_gianttrick = dsw2;
 649                         dsw2 = NULL;
 650                 }
 651         }
 652
 653 #define FIXUP(member, noop, giant)                              \
 654         do {                                                    \
 655                 if (devsw->member == NULL) {                    \
 656                         devsw->member = noop;                   \
 657                 } else if (devsw->d_flags & D_NEEDGIANT)        \
 658                         devsw->member = giant;                  \
 659                 }                                               \
 660         while (0)
 661
 662         FIXUP(d_open,           null_open,      giant_open);
 663         FIXUP(d_fdopen,         NULL,           giant_fdopen);
 664         FIXUP(d_close,          null_close,     giant_close);
 665         FIXUP(d_read,           no_read,        giant_read);
 666         FIXUP(d_write,          no_write,       giant_write);
 667         FIXUP(d_ioctl,          no_ioctl,       giant_ioctl);
 668         FIXUP(d_poll,           no_poll,        giant_poll);
 669         FIXUP(d_mmap,           no_mmap,        giant_mmap);
 670         FIXUP(d_strategy,       no_strategy,    giant_strategy);
 671         FIXUP(d_kqfilter,       no_kqfilter,    giant_kqfilter);
 672         FIXUP(d_mmap_single,    no_mmap_single, giant_mmap_single);
 673
 674         if (devsw->d_dump == NULL)      devsw->d_dump = no_dump;
 675
 676         LIST_INIT(&devsw->d_devs);
 677
 678         devsw->d_flags |= D_INIT;
 679
 680         if (dsw2 != NULL)
 681                 cdevsw_free_devlocked(dsw2);
 682         return (0);
 683 }
 684
 685 static int
 686 prep_devname(struct cdev *dev, const char *fmt, va_list ap)
 687 {
 688         int len;
 689         char *from, *q, *s, *to;
 690
 691         mtx_assert(&devmtx, MA_OWNED);
 692
 693         len = vsnrprintf(dev->__si_namebuf, sizeof(dev->__si_namebuf), 32,
 694             fmt, ap);
 695         if (len > sizeof(dev->__si_namebuf) - 1)
 696                 return (ENAMETOOLONG);
 697
 698         /* Strip leading slashes. */
 699         for (from = dev->__si_namebuf; *from == '/'; from++)
 700                 ;
 701
 702         for (to = dev->__si_namebuf; *from != '\0'; from++, to++) {
 703                 /* Treat multiple sequential slashes as single. */
 704                 while (from[0] == '/' && from[1] == '/')
 705                         from++;
 706                 /* Trailing slash is considered invalid. */
 707                 if (from[0] == '/' && from[1] == '\0')
 708                         return (EINVAL);
 709                 *to = *from;
 710         }
 711         *to = '\0';
 712
 713         if (dev->__si_namebuf[0] == '\0')
 714                 return (EINVAL);
 715
 716         /* Disallow "." and ".." components. */
 717         for (s = dev->__si_namebuf;;) {
 718                 for (q = s; *q != '/' && *q != '\0'; q++)
 719                         ;
 720                 if (q - s == 1 && s[0] == '.')
 721                         return (EINVAL);
 722                 if (q - s == 2 && s[0] == '.' && s[1] == '.')
 723                         return (EINVAL);
 724                 if (*q != '/')
 725                         break;
 726                 s = q + 1;
 727         }
 728
 729         if (devfs_dev_exists(dev->__si_namebuf) != 0)
 730                 return (EEXIST);
 731
 732         return (0);
 733 }
 734
 735 static int
 736 make_dev_credv(int flags, struct cdev **dres, struct cdevsw *devsw, int unit,
 737     struct ucred *cr, uid_t uid, gid_t gid, int mode, const char *fmt,
 738     va_list ap)
 739 {
 740         struct cdev *dev, *dev_new;
 741         int res;
 742
 743         KASSERT((flags & MAKEDEV_WAITOK) == 0 || (flags & MAKEDEV_NOWAIT) == 0,
 744             ("make_dev_credv: both WAITOK and NOWAIT specified"));
 745         dev_new = devfs_alloc(flags);
 746         if (dev_new == NULL)
 747                 return (ENOMEM);
 748         dev_lock();
 749         res = prep_cdevsw(devsw, flags);
 750         if (res != 0) {
 751                 dev_unlock();
 752                 devfs_free(dev_new);
 753                 return (res);
 754         }
 755         dev = newdev(devsw, unit, dev_new);
 756         if ((dev->si_flags & SI_NAMED) == 0) {
 757                 res = prep_devname(dev, fmt, ap);
 758                 if (res != 0) {
 759                         if ((flags & MAKEDEV_CHECKNAME) == 0) {
 760                                 panic(
 761                         "make_dev_credv: bad si_name (error=%d, si_name=%s)",
 762                                     res, dev->si_name);
 763                         }
 764                         if (dev == dev_new) {
 765                                 LIST_REMOVE(dev, si_list);
 766                                 dev_unlock();
 767                                 devfs_free(dev);
 768                         } else
 769                                 dev_unlock();
 770                         return (res);
 771                 }
 772         }
 773         if (flags & MAKEDEV_REF)
 774                 dev_refl(dev);
 775         if (flags & MAKEDEV_ETERNAL)
 776                 dev->si_flags |= SI_ETERNAL;
 777         if (dev->si_flags & SI_CHEAPCLONE &&
 778             dev->si_flags & SI_NAMED) {
 779                 /*
 780                  * This is allowed as it removes races and generally
 781                  * simplifies cloning devices.
 782                  * XXX: still ??
 783                  */
 784                 dev_unlock_and_free();
 785                 *dres = dev;
 786                 return (0);
 787         }
 788         KASSERT(!(dev->si_flags & SI_NAMED),
 789             ("make_dev() by driver %s on pre-existing device (min=%x, name=%s)",
 790             devsw->d_name, dev2unit(dev), devtoname(dev)));
 791         dev->si_flags |= SI_NAMED;
 792         if (cr != NULL)
 793                 dev->si_cred = crhold(cr);
 794         dev->si_uid = uid;
 795         dev->si_gid = gid;
 796         dev->si_mode = mode;
 797
 798         devfs_create(dev);
 799         clean_unrhdrl(devfs_inos);
 800         dev_unlock_and_free();
 801
 802         notify_create(dev, flags);
 803
 804         *dres = dev;
 805         return (0);
 806 }
 807
 808 struct cdev *
 809 make_dev(struct cdevsw *devsw, int unit, uid_t uid, gid_t gid, int mode,
 810     const char *fmt, ...)
 811 {
 812         struct cdev *dev;
 813         va_list ap;
 814         int res;
 815
 816         va_start(ap, fmt);
 817         res = make_dev_credv(0, &dev, devsw, unit, NULL, uid, gid, mode, fmt,
 818             ap);
 819         va_end(ap);
 820         KASSERT(res == 0 && dev != NULL,
 821             ("make_dev: failed make_dev_credv (error=%d)", res));
 822         return (dev);
 823 }
 824
 825 struct cdev *
 826 make_dev_cred(struct cdevsw *devsw, int unit, struct ucred *cr, uid_t uid,
 827     gid_t gid, int mode, const char *fmt, ...)
 828 {
 829         struct cdev *dev;
 830         va_list ap;
 831         int res;
 832
 833         va_start(ap, fmt);
 834         res = make_dev_credv(0, &dev, devsw, unit, cr, uid, gid, mode, fmt, ap);
 835         va_end(ap);
 836
 837         KASSERT(res == 0 && dev != NULL,
 838             ("make_dev_cred: failed make_dev_credv (error=%d)", res));
 839         return (dev);
 840 }
 841
 842 struct cdev *
 843 make_dev_credf(int flags, struct cdevsw *devsw, int unit, struct ucred *cr,
 844     uid_t uid, gid_t gid, int mode, const char *fmt, ...)
 845 {
 846         struct cdev *dev;
 847         va_list ap;
 848         int res;
 849
 850         va_start(ap, fmt);
 851         res = make_dev_credv(flags, &dev, devsw, unit, cr, uid, gid, mode,
 852             fmt, ap);
 853         va_end(ap);
 854
 855         KASSERT(((flags & MAKEDEV_NOWAIT) != 0 && res == ENOMEM) ||
 856             ((flags & MAKEDEV_CHECKNAME) != 0 && res != ENOMEM) || res == 0,
 857             ("make_dev_credf: failed make_dev_credv (error=%d)", res));
 858         return (res == 0 ? dev : NULL);
 859 }
 860
 861 int
 862 make_dev_p(int flags, struct cdev **cdev, struct cdevsw *devsw,
 863     struct ucred *cr, uid_t uid, gid_t gid, int mode, const char *fmt, ...)
 864 {
 865         va_list ap;
 866         int res;
 867
 868         va_start(ap, fmt);
 869         res = make_dev_credv(flags, cdev, devsw, 0, cr, uid, gid, mode,
 870             fmt, ap);
 871         va_end(ap);
 872
 873         KASSERT(((flags & MAKEDEV_NOWAIT) != 0 && res == ENOMEM) ||
 874             ((flags & MAKEDEV_CHECKNAME) != 0 && res != ENOMEM) || res == 0,
 875             ("make_dev_p: failed make_dev_credv (error=%d)", res));
 876         return (res);
 877 }
 878
 879 static void
 880 dev_dependsl(struct cdev *pdev, struct cdev *cdev)
 881 {
 882
 883         cdev->si_parent = pdev;
 884         cdev->si_flags |= SI_CHILD;
 885         LIST_INSERT_HEAD(&pdev->si_children, cdev, si_siblings);
 886 }
 887
 888
 889 void
 890 dev_depends(struct cdev *pdev, struct cdev *cdev)
 891 {
 892
 893         dev_lock();
 894         dev_dependsl(pdev, cdev);
 895         dev_unlock();
 896 }
 897
 898 static int
 899 make_dev_alias_v(int flags, struct cdev **cdev, struct cdev *pdev,
 900     const char *fmt, va_list ap)
 901 {
 902         struct cdev *dev;
 903         int error;
 904
 905         KASSERT(pdev != NULL, ("make_dev_alias_v: pdev is NULL"));
 906         KASSERT((flags & MAKEDEV_WAITOK) == 0 || (flags & MAKEDEV_NOWAIT) == 0,
 907             ("make_dev_alias_v: both WAITOK and NOWAIT specified"));
 908         KASSERT((flags & ~(MAKEDEV_WAITOK | MAKEDEV_NOWAIT |
 909             MAKEDEV_CHECKNAME)) == 0,
 910             ("make_dev_alias_v: invalid flags specified (flags=%02x)", flags));
 911
 912         dev = devfs_alloc(flags);
 913         if (dev == NULL)
 914                 return (ENOMEM);
 915         dev_lock();
 916         dev->si_flags |= SI_ALIAS;
 917         error = prep_devname(dev, fmt, ap);
 918         if (error != 0) {
 919                 if ((flags & MAKEDEV_CHECKNAME) == 0) {
 920                         panic("make_dev_alias_v: bad si_name "
 921                             "(error=%d, si_name=%s)", error, dev->si_name);
 922                 }
 923                 dev_unlock();
 924                 devfs_free(dev);
 925                 return (error);
 926         }
 927         dev->si_flags |= SI_NAMED;
 928         devfs_create(dev);
 929         dev_dependsl(pdev, dev);
 930         clean_unrhdrl(devfs_inos);
 931         dev_unlock();
 932
 933         notify_create(dev, flags);
 934         *cdev = dev;
 935
 936         return (0);
 937 }
 938
 939 struct cdev *
 940 make_dev_alias(struct cdev *pdev, const char *fmt, ...)
 941 {
 942         struct cdev *dev;
 943         va_list ap;
 944         int res;
 945
 946         va_start(ap, fmt);
 947         res = make_dev_alias_v(MAKEDEV_WAITOK, &dev, pdev, fmt, ap);
 948         va_end(ap);
 949
 950         KASSERT(res == 0 && dev != NULL,
 951             ("make_dev_alias: failed make_dev_alias_v (error=%d)", res));
 952         return (dev);
 953 }
 954
 955 int
 956 make_dev_alias_p(int flags, struct cdev **cdev, struct cdev *pdev,
 957     const char *fmt, ...)
 958 {
 959         va_list ap;
 960         int res;
 961
 962         va_start(ap, fmt);
 963         res = make_dev_alias_v(flags, cdev, pdev, fmt, ap);
 964         va_end(ap);
 965         return (res);
 966 }
 967
 968 int
 969 make_dev_physpath_alias(int flags, struct cdev **cdev, struct cdev *pdev,
 970     struct cdev *old_alias, const char *physpath)
 971 {
 972         char *devfspath;
 973         int physpath_len;
 974         int max_parentpath_len;
 975         int parentpath_len;
 976         int devfspathbuf_len;
 977         int mflags;
 978         int ret;
 979
 980         *cdev = NULL;
 981         devfspath = NULL;
 982         physpath_len = strlen(physpath);
 983         ret = EINVAL;
 984         if (physpath_len == 0)
 985                 goto out;
 986
 987         if (strncmp("id1,", physpath, 4) == 0) {
 988                 physpath += 4;
 989                 physpath_len -= 4;
 990                 if (physpath_len == 0)
 991                         goto out;
 992         }
 993
 994         max_parentpath_len = SPECNAMELEN - physpath_len - /*/*/1;
 995         parentpath_len = strlen(pdev->si_name);
 996         if (max_parentpath_len < parentpath_len) {
 997                 if (bootverbose)
 998                         printf("WARNING: Unable to alias %s "
 999                             "to %s/%s - path too long\n",
1000                             pdev->si_name, physpath, pdev->si_name);
1001                 ret = ENAMETOOLONG;
1002                 goto out;
1003         }
1004
1005         mflags = (flags & MAKEDEV_NOWAIT) ? M_NOWAIT : M_WAITOK;
1006         devfspathbuf_len = physpath_len + /*/*/1 + parentpath_len + /*NUL*/1;
1007         devfspath = malloc(devfspathbuf_len, M_DEVBUF, mflags);
1008         if (devfspath == NULL) {
1009                 ret = ENOMEM;
1010                 goto out;
1011         }
1012
1013         sprintf(devfspath, "%s/%s", physpath, pdev->si_name);
1014         if (old_alias != NULL && strcmp(old_alias->si_name, devfspath) == 0) {
1015                 /* Retain the existing alias. */
1016                 *cdev = old_alias;
1017                 old_alias = NULL;
1018                 ret = 0;
1019         } else {
1020                 ret = make_dev_alias_p(flags, cdev, pdev, "%s", devfspath);
1021         }
1022 out:
1023         if (old_alias != NULL)
1024                 destroy_dev(old_alias);
1025         if (devfspath != NULL)
1026                 free(devfspath, M_DEVBUF);
1027         return (ret);
1028 }
1029
1030 static void
1031 destroy_devl(struct cdev *dev)
1032 {
1033         struct cdevsw *csw;
1034         struct cdev_privdata *p;
1035         struct cdev_priv *cdp;
1036
1037         mtx_assert(&devmtx, MA_OWNED);
1038         KASSERT(dev->si_flags & SI_NAMED,
1039             ("WARNING: Driver mistake: destroy_dev on %d\n", dev2unit(dev)));
1040         KASSERT((dev->si_flags & SI_ETERNAL) == 0,
1041             ("WARNING: Driver mistake: destroy_dev on eternal %d\n",
1042              dev2unit(dev)));
1043
1044         cdp = cdev2priv(dev);
1045         if ((cdp->cdp_flags & CDP_UNREF_DTR) == 0) {
1046                 /*
1047                  * Avoid race with dev_rel(), e.g. from the populate
1048                  * loop.  If CDP_UNREF_DTR flag is set, the reference
1049                  * to be dropped at the end of destroy_devl() was
1050                  * already taken by delist_dev_locked().
1051                  */
1052                 dev_refl(dev);
1053
1054                 devfs_destroy(dev);
1055         }
1056
1057         /* Remove name marking */
1058         dev->si_flags &= ~SI_NAMED;
1059
1060         /* If we are a child, remove us from the parents list */
1061         if (dev->si_flags & SI_CHILD) {
1062                 LIST_REMOVE(dev, si_siblings);
1063                 dev->si_flags &= ~SI_CHILD;
1064         }
1065
1066         /* Kill our children */
1067         while (!LIST_EMPTY(&dev->si_children))
1068                 destroy_devl(LIST_FIRST(&dev->si_children));
1069
1070         /* Remove from clone list */
1071         if (dev->si_flags & SI_CLONELIST) {
1072                 LIST_REMOVE(dev, si_clone);
1073                 dev->si_flags &= ~SI_CLONELIST;
1074         }
1075
1076         csw = dev->si_devsw;
1077         dev->si_devsw = NULL;   /* already NULL for SI_ALIAS */
1078         while (csw != NULL && csw->d_purge != NULL && dev->si_threadcount) {
1079                 csw->d_purge(dev);
1080                 msleep(csw, &devmtx, PRIBIO, "devprg", hz/10);
1081                 if (dev->si_threadcount)
1082                         printf("Still %lu threads in %s\n",
1083                             dev->si_threadcount, devtoname(dev));
1084         }
1085         while (dev->si_threadcount != 0) {
1086                 /* Use unique dummy wait ident */
1087                 msleep(&csw, &devmtx, PRIBIO, "devdrn", hz / 10);
1088         }
1089
1090         dev_unlock();
1091         notify_destroy(dev);
1092         mtx_lock(&cdevpriv_mtx);
1093         while ((p = LIST_FIRST(&cdev2priv(dev)->cdp_fdpriv)) != NULL) {
1094                 devfs_destroy_cdevpriv(p);
1095                 mtx_lock(&cdevpriv_mtx);
1096         }
1097         mtx_unlock(&cdevpriv_mtx);
1098         dev_lock();
1099
1100         dev->si_drv1 = 0;
1101         dev->si_drv2 = 0;
1102         bzero(&dev->__si_u, sizeof(dev->__si_u));
1103
1104         if (!(dev->si_flags & SI_ALIAS)) {
1105                 /* Remove from cdevsw list */
1106                 LIST_REMOVE(dev, si_list);
1107
1108                 /* If cdevsw has no more struct cdev *'s, clean it */
1109                 if (LIST_EMPTY(&csw->d_devs)) {
1110                         fini_cdevsw(csw);
1111                         wakeup(&csw->d_devs);
1112                 }
1113         }
1114         dev->si_flags &= ~SI_ALIAS;
1115         cdp->cdp_flags &= ~CDP_UNREF_DTR;
1116         dev->si_refcount--;
1117
1118         if (dev->si_refcount > 0)
1119                 LIST_INSERT_HEAD(&dead_cdevsw.d_devs, dev, si_list);
1120         else
1121                 dev_free_devlocked(dev);
1122 }
1123
1124 static void
1125 delist_dev_locked(struct cdev *dev)
1126 {
1127         struct cdev_priv *cdp;
1128         struct cdev *child;
1129
1130         mtx_assert(&devmtx, MA_OWNED);
1131         cdp = cdev2priv(dev);
1132         if ((cdp->cdp_flags & CDP_UNREF_DTR) != 0)
1133                 return;
1134         cdp->cdp_flags |= CDP_UNREF_DTR;
1135         dev_refl(dev);
1136         devfs_destroy(dev);
1137         LIST_FOREACH(child, &dev->si_children, si_siblings)
1138                 delist_dev_locked(child);
1139 }
1140
1141 void
1142 delist_dev(struct cdev *dev)
1143 {
1144
1145         dev_lock();
1146         delist_dev_locked(dev);
1147         dev_unlock();
1148 }
1149
1150 void
1151 destroy_dev(struct cdev *dev)
1152 {
1153
1154         WITNESS_WARN(WARN_GIANTOK | WARN_SLEEPOK, NULL, "destroy_dev");
1155         dev_lock();
1156         destroy_devl(dev);
1157         dev_unlock_and_free();
1158 }
1159
1160 const char *
1161 devtoname(struct cdev *dev)
1162 {
1163
1164         return (dev->si_name);
1165 }
1166
1167 int
1168 dev_stdclone(char *name, char **namep, const char *stem, int *unit)
1169 {
1170         int u, i;
1171
1172         i = strlen(stem);
1173         if (bcmp(stem, name, i) != 0)
1174                 return (0);
1175         if (!isdigit(name[i]))
1176                 return (0);
1177         u = 0;
1178         if (name[i] == '0' && isdigit(name[i+1]))
1179                 return (0);
1180         while (isdigit(name[i])) {
1181                 u *= 10;
1182                 u += name[i++] - '0';
1183         }
1184         if (u > 0xffffff)
1185                 return (0);
1186         *unit = u;
1187         if (namep)
1188                 *namep = &name[i];
1189         if (name[i])
1190                 return (2);
1191         return (1);
1192 }
1193
1194 /*
1195  * Helper functions for cloning device drivers.
1196  *
1197  * The objective here is to make it unnecessary for the device drivers to
1198  * use rman or similar to manage their unit number space.  Due to the way
1199  * we do "on-demand" devices, using rman or other "private" methods
1200  * will be very tricky to lock down properly once we lock down this file.
1201  *
1202  * Instead we give the drivers these routines which puts the struct cdev *'s
1203  * that are to be managed on their own list, and gives the driver the ability
1204  * to ask for the first free unit number or a given specified unit number.
1205  *
1206  * In addition these routines support paired devices (pty, nmdm and similar)
1207  * by respecting a number of "flag" bits in the minor number.
1208  *
1209  */
1210
1211 struct clonedevs {
1212         LIST_HEAD(,cdev)        head;
1213 };
1214
1215 void
1216 clone_setup(struct clonedevs **cdp)
1217 {
1218
1219         *cdp = malloc(sizeof **cdp, M_DEVBUF, M_WAITOK | M_ZERO);
1220         LIST_INIT(&(*cdp)->head);
1221 }
1222
1223 int
1224 clone_create(struct clonedevs **cdp, struct cdevsw *csw, int *up,
1225     struct cdev **dp, int extra)
1226 {
1227         struct clonedevs *cd;
1228         struct cdev *dev, *ndev, *dl, *de;
1229         int unit, low, u;
1230
1231         KASSERT(*cdp != NULL,
1232             ("clone_setup() not called in driver \"%s\"", csw->d_name));
1233         KASSERT(!(extra & CLONE_UNITMASK),
1234             ("Illegal extra bits (0x%x) in clone_create", extra));
1235         KASSERT(*up <= CLONE_UNITMASK,
1236             ("Too high unit (0x%x) in clone_create", *up));
1237         KASSERT(csw->d_flags & D_NEEDMINOR,
1238             ("clone_create() on cdevsw without minor numbers"));
1239
1240
1241         /*
1242          * Search the list for a lot of things in one go:
1243          *   A preexisting match is returned immediately.
1244          *   The lowest free unit number if we are passed -1, and the place
1245          *       in the list where we should insert that new element.
1246          *   The place to insert a specified unit number, if applicable
1247          *       the end of the list.
1248          */
1249         unit = *up;
1250         ndev = devfs_alloc(MAKEDEV_WAITOK);
1251         dev_lock();
1252         prep_cdevsw(csw, MAKEDEV_WAITOK);
1253         low = extra;
1254         de = dl = NULL;
1255         cd = *cdp;
1256         LIST_FOREACH(dev, &cd->head, si_clone) {
1257                 KASSERT(dev->si_flags & SI_CLONELIST,
1258                     ("Dev %p(%s) should be on clonelist", dev, dev->si_name));
1259                 u = dev2unit(dev);
1260                 if (u == (unit | extra)) {
1261                         *dp = dev;
1262                         dev_unlock();
1263                         devfs_free(ndev);
1264                         return (0);
1265                 }
1266                 if (unit == -1 && u == low) {
1267                         low++;
1268                         de = dev;
1269                         continue;
1270                 } else if (u < (unit | extra)) {
1271                         de = dev;
1272                         continue;
1273                 } else if (u > (unit | extra)) {
1274                         dl = dev;
1275                         break;
1276                 }
1277         }
1278         if (unit == -1)
1279                 unit = low & CLONE_UNITMASK;
1280         dev = newdev(csw, unit | extra, ndev);
1281         if (dev->si_flags & SI_CLONELIST) {
1282                 printf("dev %p (%s) is on clonelist\n", dev, dev->si_name);
1283                 printf("unit=%d, low=%d, extra=0x%x\n", unit, low, extra);
1284                 LIST_FOREACH(dev, &cd->head, si_clone) {
1285                         printf("\t%p %s\n", dev, dev->si_name);
1286                 }
1287                 panic("foo");
1288         }
1289         KASSERT(!(dev->si_flags & SI_CLONELIST),
1290             ("Dev %p(%s) should not be on clonelist", dev, dev->si_name));
1291         if (dl != NULL)
1292                 LIST_INSERT_BEFORE(dl, dev, si_clone);
1293         else if (de != NULL)
1294                 LIST_INSERT_AFTER(de, dev, si_clone);
1295         else
1296                 LIST_INSERT_HEAD(&cd->head, dev, si_clone);
1297         dev->si_flags |= SI_CLONELIST;
1298         *up = unit;
1299         dev_unlock_and_free();
1300         return (1);
1301 }
1302
1303 /*
1304  * Kill everything still on the list.  The driver should already have
1305  * disposed of any softc hung of the struct cdev *'s at this time.
1306  */
1307 void
1308 clone_cleanup(struct clonedevs **cdp)
1309 {
1310         struct cdev *dev;
1311         struct cdev_priv *cp;
1312         struct clonedevs *cd;
1313
1314         cd = *cdp;
1315         if (cd == NULL)
1316                 return;
1317         dev_lock();
1318         while (!LIST_EMPTY(&cd->head)) {
1319                 dev = LIST_FIRST(&cd->head);
1320                 LIST_REMOVE(dev, si_clone);
1321                 KASSERT(dev->si_flags & SI_CLONELIST,
1322                     ("Dev %p(%s) should be on clonelist", dev, dev->si_name));
1323                 dev->si_flags &= ~SI_CLONELIST;
1324                 cp = cdev2priv(dev);
1325                 if (!(cp->cdp_flags & CDP_SCHED_DTR)) {
1326                         cp->cdp_flags |= CDP_SCHED_DTR;
1327                         KASSERT(dev->si_flags & SI_NAMED,
1328                                 ("Driver has goofed in cloning underways udev %x unit %x", dev2udev(dev), dev2unit(dev)));
1329                         destroy_devl(dev);
1330                 }
1331         }
1332         dev_unlock_and_free();
1333         free(cd, M_DEVBUF);
1334         *cdp = NULL;
1335 }
1336
1337 static TAILQ_HEAD(, cdev_priv) dev_ddtr =
1338         TAILQ_HEAD_INITIALIZER(dev_ddtr);
1339 static struct task dev_dtr_task;
1340
1341 static void
1342 destroy_dev_tq(void *ctx, int pending)
1343 {
1344         struct cdev_priv *cp;
1345         struct cdev *dev;
1346         void (*cb)(void *);
1347         void *cb_arg;
1348
1349         dev_lock();
1350         while (!TAILQ_EMPTY(&dev_ddtr)) {
1351                 cp = TAILQ_FIRST(&dev_ddtr);
1352                 dev = &cp->cdp_c;
1353                 KASSERT(cp->cdp_flags & CDP_SCHED_DTR,
1354                     ("cdev %p in dev_destroy_tq without CDP_SCHED_DTR", cp));
1355                 TAILQ_REMOVE(&dev_ddtr, cp, cdp_dtr_list);
1356                 cb = cp->cdp_dtr_cb;
1357                 cb_arg = cp->cdp_dtr_cb_arg;
1358                 destroy_devl(dev);
1359                 dev_unlock_and_free();
1360                 dev_rel(dev);
1361                 if (cb != NULL)
1362                         cb(cb_arg);
1363                 dev_lock();
1364         }
1365         dev_unlock();
1366 }
1367
1368 /*
1369  * devmtx shall be locked on entry. devmtx will be unlocked after
1370  * function return.
1371  */
1372 static int
1373 destroy_dev_sched_cbl(struct cdev *dev, void (*cb)(void *), void *arg)
1374 {
1375         struct cdev_priv *cp;
1376
1377         mtx_assert(&devmtx, MA_OWNED);
1378         cp = cdev2priv(dev);
1379         if (cp->cdp_flags & CDP_SCHED_DTR) {
1380                 dev_unlock();
1381                 return (0);
1382         }
1383         dev_refl(dev);
1384         cp->cdp_flags |= CDP_SCHED_DTR;
1385         cp->cdp_dtr_cb = cb;
1386         cp->cdp_dtr_cb_arg = arg;
1387         TAILQ_INSERT_TAIL(&dev_ddtr, cp, cdp_dtr_list);
1388         dev_unlock();
1389         taskqueue_enqueue(taskqueue_swi_giant, &dev_dtr_task);
1390         return (1);
1391 }
1392
1393 int
1394 destroy_dev_sched_cb(struct cdev *dev, void (*cb)(void *), void *arg)
1395 {
1396
1397         dev_lock();
1398         return (destroy_dev_sched_cbl(dev, cb, arg));
1399 }
1400
1401 int
1402 destroy_dev_sched(struct cdev *dev)
1403 {
1404
1405         return (destroy_dev_sched_cb(dev, NULL, NULL));
1406 }
1407
1408 void
1409 destroy_dev_drain(struct cdevsw *csw)
1410 {
1411
1412         dev_lock();
1413         while (!LIST_EMPTY(&csw->d_devs)) {
1414                 msleep(&csw->d_devs, &devmtx, PRIBIO, "devscd", hz/10);
1415         }
1416         dev_unlock();
1417 }
1418
1419 void
1420 drain_dev_clone_events(void)
1421 {
1422
1423         sx_xlock(&clone_drain_lock);
1424         sx_xunlock(&clone_drain_lock);
1425 }
1426
1427 static void
1428 devdtr_init(void *dummy __unused)
1429 {
1430
1431         TASK_INIT(&dev_dtr_task, 0, destroy_dev_tq, NULL);
1432 }
1433
1434 SYSINIT(devdtr, SI_SUB_DEVFS, SI_ORDER_SECOND, devdtr_init, NULL);
1435
1436 #include "opt_ddb.h"
1437 #ifdef DDB
1438 #include <sys/kernel.h>
1439
1440 #include <ddb/ddb.h>
1441
1442 DB_SHOW_COMMAND(cdev, db_show_cdev)
1443 {
1444         struct cdev_priv *cdp;
1445         struct cdev *dev;
1446         u_int flags;
1447         char buf[512];
1448
1449         if (!have_addr) {
1450                 TAILQ_FOREACH(cdp, &cdevp_list, cdp_list) {
1451                         dev = &cdp->cdp_c;
1452                         db_printf("%s %p\n", dev->si_name, dev);
1453                         if (db_pager_quit)
1454                                 break;
1455                 }
1456                 return;
1457         }
1458
1459         dev = (struct cdev *)addr;
1460         cdp = cdev2priv(dev);
1461         db_printf("dev %s ref %d use %ld thr %ld inuse %u fdpriv %p\n",
1462             dev->si_name, dev->si_refcount, dev->si_usecount,
1463             dev->si_threadcount, cdp->cdp_inuse, cdp->cdp_fdpriv.lh_first);
1464         db_printf("devsw %p si_drv0 %d si_drv1 %p si_drv2 %p\n",
1465             dev->si_devsw, dev->si_drv0, dev->si_drv1, dev->si_drv2);
1466         flags = dev->si_flags;
1467 #define SI_FLAG(flag)   do {                                            \
1468         if (flags & (flag)) {                                           \
1469                 if (buf[0] != '\0')                                     \
1470                         strlcat(buf, ", ", sizeof(buf));                \
1471                 strlcat(buf, (#flag) + 3, sizeof(buf));                 \
1472                 flags &= ~(flag);                                       \
1473         }                                                               \
1474 } while (0)
1475         buf[0] = '\0';
1476         SI_FLAG(SI_ETERNAL);
1477         SI_FLAG(SI_ALIAS);
1478         SI_FLAG(SI_NAMED);
1479         SI_FLAG(SI_CHEAPCLONE);
1480         SI_FLAG(SI_CHILD);
1481         SI_FLAG(SI_DEVOPEN);
1482         SI_FLAG(SI_CONSOPEN);
1483         SI_FLAG(SI_DUMPDEV);
1484         SI_FLAG(SI_CANDELETE);
1485         SI_FLAG(SI_CLONELIST);
1486         db_printf("si_flags %s\n", buf);
1487
1488         flags = cdp->cdp_flags;
1489 #define CDP_FLAG(flag)  do {                                            \
1490         if (flags & (flag)) {                                           \
1491                 if (buf[0] != '\0')                                     \
1492                         strlcat(buf, ", ", sizeof(buf));                \
1493                 strlcat(buf, (#flag) + 4, sizeof(buf));                 \
1494                 flags &= ~(flag);                                       \
1495         }                                                               \
1496 } while (0)
1497         buf[0] = '\0';
1498         CDP_FLAG(CDP_ACTIVE);
1499         CDP_FLAG(CDP_SCHED_DTR);
1500         db_printf("cdp_flags %s\n", buf);
1501 }
1502 #endif