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