spec_vnops.c revision 1.69 1 1.69 agc /* $NetBSD: spec_vnops.c,v 1.69 2003/08/07 16:32:44 agc Exp $ */
2 1.16 cgd
3 1.1 cgd /*
4 1.15 mycroft * Copyright (c) 1989, 1993
5 1.15 mycroft * The Regents of the University of California. All rights reserved.
6 1.1 cgd *
7 1.1 cgd * Redistribution and use in source and binary forms, with or without
8 1.1 cgd * modification, are permitted provided that the following conditions
9 1.1 cgd * are met:
10 1.1 cgd * 1. Redistributions of source code must retain the above copyright
11 1.1 cgd * notice, this list of conditions and the following disclaimer.
12 1.1 cgd * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 cgd * notice, this list of conditions and the following disclaimer in the
14 1.1 cgd * documentation and/or other materials provided with the distribution.
15 1.69 agc * 3. Neither the name of the University nor the names of its contributors
16 1.1 cgd * may be used to endorse or promote products derived from this software
17 1.1 cgd * without specific prior written permission.
18 1.1 cgd *
19 1.1 cgd * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20 1.1 cgd * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21 1.1 cgd * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22 1.1 cgd * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23 1.1 cgd * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24 1.1 cgd * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25 1.1 cgd * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26 1.1 cgd * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27 1.1 cgd * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28 1.1 cgd * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29 1.1 cgd * SUCH DAMAGE.
30 1.1 cgd *
31 1.39 fvdl * @(#)spec_vnops.c 8.15 (Berkeley) 7/14/95
32 1.1 cgd */
33 1.60 lukem
34 1.60 lukem #include <sys/cdefs.h>
35 1.69 agc __KERNEL_RCSID(0, "$NetBSD: spec_vnops.c,v 1.69 2003/08/07 16:32:44 agc Exp $");
36 1.1 cgd
37 1.9 mycroft #include <sys/param.h>
38 1.9 mycroft #include <sys/proc.h>
39 1.9 mycroft #include <sys/systm.h>
40 1.9 mycroft #include <sys/kernel.h>
41 1.9 mycroft #include <sys/conf.h>
42 1.9 mycroft #include <sys/buf.h>
43 1.9 mycroft #include <sys/mount.h>
44 1.9 mycroft #include <sys/namei.h>
45 1.9 mycroft #include <sys/vnode.h>
46 1.9 mycroft #include <sys/stat.h>
47 1.9 mycroft #include <sys/errno.h>
48 1.9 mycroft #include <sys/ioctl.h>
49 1.9 mycroft #include <sys/file.h>
50 1.9 mycroft #include <sys/disklabel.h>
51 1.35 kleink #include <sys/lockf.h>
52 1.28 christos
53 1.30 mycroft #include <miscfs/genfs/genfs.h>
54 1.15 mycroft #include <miscfs/specfs/specdev.h>
55 1.1 cgd
56 1.1 cgd /* symbolic sleep message strings for devices */
57 1.37 mycroft const char devopn[] = "devopn";
58 1.37 mycroft const char devio[] = "devio";
59 1.37 mycroft const char devwait[] = "devwait";
60 1.37 mycroft const char devin[] = "devin";
61 1.37 mycroft const char devout[] = "devout";
62 1.37 mycroft const char devioc[] = "devioc";
63 1.37 mycroft const char devcls[] = "devcls";
64 1.61 matt
65 1.61 matt struct vnode *speclisth[SPECHSZ];
66 1.46 sommerfe
67 1.46 sommerfe /*
68 1.46 sommerfe * This vnode operations vector is used for two things only:
69 1.46 sommerfe * - special device nodes created from whole cloth by the kernel.
70 1.46 sommerfe * - as a temporary vnodeops replacement for vnodes which were found to
71 1.46 sommerfe * be aliased by callers of checkalias().
72 1.46 sommerfe * For the ops vector for vnodes built from special devices found in a
73 1.46 sommerfe * filesystem, see (e.g) ffs_specop_entries[] in ffs_vnops.c or the
74 1.46 sommerfe * equivalent for other filesystems.
75 1.46 sommerfe */
76 1.1 cgd
77 1.28 christos int (**spec_vnodeop_p) __P((void *));
78 1.53 jdolecek const struct vnodeopv_entry_desc spec_vnodeop_entries[] = {
79 1.15 mycroft { &vop_default_desc, vn_default_error },
80 1.15 mycroft { &vop_lookup_desc, spec_lookup }, /* lookup */
81 1.15 mycroft { &vop_create_desc, spec_create }, /* create */
82 1.15 mycroft { &vop_mknod_desc, spec_mknod }, /* mknod */
83 1.15 mycroft { &vop_open_desc, spec_open }, /* open */
84 1.15 mycroft { &vop_close_desc, spec_close }, /* close */
85 1.15 mycroft { &vop_access_desc, spec_access }, /* access */
86 1.15 mycroft { &vop_getattr_desc, spec_getattr }, /* getattr */
87 1.15 mycroft { &vop_setattr_desc, spec_setattr }, /* setattr */
88 1.15 mycroft { &vop_read_desc, spec_read }, /* read */
89 1.15 mycroft { &vop_write_desc, spec_write }, /* write */
90 1.21 mycroft { &vop_lease_desc, spec_lease_check }, /* lease */
91 1.47 sommerfe { &vop_fcntl_desc, spec_fcntl }, /* fcntl */
92 1.15 mycroft { &vop_ioctl_desc, spec_ioctl }, /* ioctl */
93 1.32 mycroft { &vop_poll_desc, spec_poll }, /* poll */
94 1.65 jdolecek { &vop_kqfilter_desc, spec_kqfilter }, /* kqfilter */
95 1.39 fvdl { &vop_revoke_desc, spec_revoke }, /* revoke */
96 1.15 mycroft { &vop_mmap_desc, spec_mmap }, /* mmap */
97 1.15 mycroft { &vop_fsync_desc, spec_fsync }, /* fsync */
98 1.15 mycroft { &vop_seek_desc, spec_seek }, /* seek */
99 1.15 mycroft { &vop_remove_desc, spec_remove }, /* remove */
100 1.15 mycroft { &vop_link_desc, spec_link }, /* link */
101 1.15 mycroft { &vop_rename_desc, spec_rename }, /* rename */
102 1.15 mycroft { &vop_mkdir_desc, spec_mkdir }, /* mkdir */
103 1.15 mycroft { &vop_rmdir_desc, spec_rmdir }, /* rmdir */
104 1.15 mycroft { &vop_symlink_desc, spec_symlink }, /* symlink */
105 1.15 mycroft { &vop_readdir_desc, spec_readdir }, /* readdir */
106 1.15 mycroft { &vop_readlink_desc, spec_readlink }, /* readlink */
107 1.15 mycroft { &vop_abortop_desc, spec_abortop }, /* abortop */
108 1.15 mycroft { &vop_inactive_desc, spec_inactive }, /* inactive */
109 1.15 mycroft { &vop_reclaim_desc, spec_reclaim }, /* reclaim */
110 1.15 mycroft { &vop_lock_desc, spec_lock }, /* lock */
111 1.15 mycroft { &vop_unlock_desc, spec_unlock }, /* unlock */
112 1.15 mycroft { &vop_bmap_desc, spec_bmap }, /* bmap */
113 1.15 mycroft { &vop_strategy_desc, spec_strategy }, /* strategy */
114 1.15 mycroft { &vop_print_desc, spec_print }, /* print */
115 1.15 mycroft { &vop_islocked_desc, spec_islocked }, /* islocked */
116 1.15 mycroft { &vop_pathconf_desc, spec_pathconf }, /* pathconf */
117 1.15 mycroft { &vop_advlock_desc, spec_advlock }, /* advlock */
118 1.15 mycroft { &vop_blkatoff_desc, spec_blkatoff }, /* blkatoff */
119 1.15 mycroft { &vop_valloc_desc, spec_valloc }, /* valloc */
120 1.15 mycroft { &vop_vfree_desc, spec_vfree }, /* vfree */
121 1.15 mycroft { &vop_truncate_desc, spec_truncate }, /* truncate */
122 1.15 mycroft { &vop_update_desc, spec_update }, /* update */
123 1.28 christos { &vop_bwrite_desc, spec_bwrite }, /* bwrite */
124 1.55 chs { &vop_getpages_desc, spec_getpages }, /* getpages */
125 1.55 chs { &vop_putpages_desc, spec_putpages }, /* putpages */
126 1.55 chs { NULL, NULL }
127 1.1 cgd };
128 1.53 jdolecek const struct vnodeopv_desc spec_vnodeop_opv_desc =
129 1.15 mycroft { &spec_vnodeop_p, spec_vnodeop_entries };
130 1.1 cgd
131 1.1 cgd /*
132 1.1 cgd * Trivial lookup routine that always fails.
133 1.1 cgd */
134 1.4 andrew int
135 1.28 christos spec_lookup(v)
136 1.28 christos void *v;
137 1.28 christos {
138 1.15 mycroft struct vop_lookup_args /* {
139 1.15 mycroft struct vnode *a_dvp;
140 1.15 mycroft struct vnode **a_vpp;
141 1.15 mycroft struct componentname *a_cnp;
142 1.28 christos } */ *ap = v;
143 1.1 cgd
144 1.15 mycroft *ap->a_vpp = NULL;
145 1.1 cgd return (ENOTDIR);
146 1.66 jdolecek }
147 1.66 jdolecek
148 1.66 jdolecek /*
149 1.66 jdolecek * Returns true if dev is /dev/mem or /dev/kmem.
150 1.66 jdolecek */
151 1.66 jdolecek static int
152 1.66 jdolecek iskmemdev(dev_t dev)
153 1.66 jdolecek {
154 1.66 jdolecek /* mem_no is emitted by config(8) to generated devsw.c */
155 1.66 jdolecek extern const int mem_no;
156 1.66 jdolecek
157 1.66 jdolecek /* minor 14 is /dev/io on i386 with COMPAT_10 */
158 1.66 jdolecek return (major(dev) == mem_no && (minor(dev) < 2 || minor(dev) == 14));
159 1.1 cgd }
160 1.1 cgd
161 1.1 cgd /*
162 1.15 mycroft * Open a special file.
163 1.1 cgd */
164 1.1 cgd /* ARGSUSED */
165 1.28 christos int
166 1.28 christos spec_open(v)
167 1.28 christos void *v;
168 1.28 christos {
169 1.15 mycroft struct vop_open_args /* {
170 1.15 mycroft struct vnode *a_vp;
171 1.15 mycroft int a_mode;
172 1.15 mycroft struct ucred *a_cred;
173 1.68 fvdl struct proc *a_p;
174 1.28 christos } */ *ap = v;
175 1.68 fvdl struct proc *p = ap->a_p;
176 1.15 mycroft struct vnode *bvp, *vp = ap->a_vp;
177 1.64 gehenna const struct bdevsw *bdev;
178 1.64 gehenna const struct cdevsw *cdev;
179 1.64 gehenna dev_t blkdev, dev = (dev_t)vp->v_rdev;
180 1.1 cgd int error;
181 1.55 chs struct partinfo pi;
182 1.1 cgd
183 1.15 mycroft /*
184 1.15 mycroft * Don't allow open if fs is mounted -nodev.
185 1.15 mycroft */
186 1.1 cgd if (vp->v_mount && (vp->v_mount->mnt_flag & MNT_NODEV))
187 1.1 cgd return (ENXIO);
188 1.1 cgd
189 1.1 cgd switch (vp->v_type) {
190 1.1 cgd
191 1.1 cgd case VCHR:
192 1.64 gehenna cdev = cdevsw_lookup(dev);
193 1.64 gehenna if (cdev == NULL)
194 1.1 cgd return (ENXIO);
195 1.15 mycroft if (ap->a_cred != FSCRED && (ap->a_mode & FWRITE)) {
196 1.15 mycroft /*
197 1.15 mycroft * When running in very secure mode, do not allow
198 1.15 mycroft * opens for writing of any disk character devices.
199 1.15 mycroft */
200 1.64 gehenna if (securelevel >= 2 && cdev->d_type == D_DISK)
201 1.15 mycroft return (EPERM);
202 1.15 mycroft /*
203 1.15 mycroft * When running in secure mode, do not allow opens
204 1.15 mycroft * for writing of /dev/mem, /dev/kmem, or character
205 1.15 mycroft * devices whose corresponding block devices are
206 1.15 mycroft * currently mounted.
207 1.15 mycroft */
208 1.15 mycroft if (securelevel >= 1) {
209 1.64 gehenna blkdev = devsw_chr2blk(dev);
210 1.64 gehenna if (blkdev != (dev_t)NODEV &&
211 1.64 gehenna vfinddev(blkdev, VBLK, &bvp) &&
212 1.15 mycroft (error = vfs_mountedon(bvp)))
213 1.15 mycroft return (error);
214 1.15 mycroft if (iskmemdev(dev))
215 1.15 mycroft return (EPERM);
216 1.15 mycroft }
217 1.15 mycroft }
218 1.64 gehenna if (cdev->d_type == D_TTY)
219 1.23 mycroft vp->v_flag |= VISTTY;
220 1.39 fvdl VOP_UNLOCK(vp, 0);
221 1.68 fvdl error = (*cdev->d_open)(dev, ap->a_mode, S_IFCHR, p);
222 1.39 fvdl vn_lock(vp, LK_EXCLUSIVE | LK_RETRY);
223 1.1 cgd return (error);
224 1.1 cgd
225 1.1 cgd case VBLK:
226 1.64 gehenna bdev = bdevsw_lookup(dev);
227 1.64 gehenna if (bdev == NULL)
228 1.1 cgd return (ENXIO);
229 1.15 mycroft /*
230 1.15 mycroft * When running in very secure mode, do not allow
231 1.15 mycroft * opens for writing of any disk block devices.
232 1.15 mycroft */
233 1.15 mycroft if (securelevel >= 2 && ap->a_cred != FSCRED &&
234 1.64 gehenna (ap->a_mode & FWRITE) && bdev->d_type == D_DISK)
235 1.15 mycroft return (EPERM);
236 1.15 mycroft /*
237 1.15 mycroft * Do not allow opens of block devices that are
238 1.15 mycroft * currently mounted.
239 1.15 mycroft */
240 1.28 christos if ((error = vfs_mountedon(vp)) != 0)
241 1.1 cgd return (error);
242 1.68 fvdl error = (*bdev->d_open)(dev, ap->a_mode, S_IFBLK, p);
243 1.55 chs if (error) {
244 1.55 chs return error;
245 1.55 chs }
246 1.64 gehenna error = (*bdev->d_ioctl)(vp->v_rdev,
247 1.68 fvdl DIOCGPART, (caddr_t)&pi, FREAD, curproc);
248 1.55 chs if (error == 0) {
249 1.57 chs vp->v_size = (voff_t)pi.disklab->d_secsize *
250 1.55 chs pi.part->p_size;
251 1.55 chs }
252 1.55 chs return 0;
253 1.55 chs
254 1.28 christos case VNON:
255 1.28 christos case VLNK:
256 1.28 christos case VDIR:
257 1.28 christos case VREG:
258 1.28 christos case VBAD:
259 1.28 christos case VFIFO:
260 1.28 christos case VSOCK:
261 1.28 christos break;
262 1.1 cgd }
263 1.15 mycroft return (0);
264 1.1 cgd }
265 1.1 cgd
266 1.1 cgd /*
267 1.1 cgd * Vnode op for read
268 1.1 cgd */
269 1.1 cgd /* ARGSUSED */
270 1.28 christos int
271 1.28 christos spec_read(v)
272 1.28 christos void *v;
273 1.28 christos {
274 1.15 mycroft struct vop_read_args /* {
275 1.15 mycroft struct vnode *a_vp;
276 1.15 mycroft struct uio *a_uio;
277 1.15 mycroft int a_ioflag;
278 1.15 mycroft struct ucred *a_cred;
279 1.28 christos } */ *ap = v;
280 1.48 augustss struct vnode *vp = ap->a_vp;
281 1.48 augustss struct uio *uio = ap->a_uio;
282 1.68 fvdl struct proc *p = uio->uio_procp;
283 1.56 chs struct buf *bp;
284 1.64 gehenna const struct bdevsw *bdev;
285 1.64 gehenna const struct cdevsw *cdev;
286 1.57 chs daddr_t bn;
287 1.59 chs int bsize, bscale;
288 1.56 chs struct partinfo dpart;
289 1.64 gehenna int n, on;
290 1.1 cgd int error = 0;
291 1.1 cgd
292 1.1 cgd #ifdef DIAGNOSTIC
293 1.1 cgd if (uio->uio_rw != UIO_READ)
294 1.1 cgd panic("spec_read mode");
295 1.68 fvdl if (uio->uio_segflg == UIO_USERSPACE && uio->uio_procp != curproc)
296 1.1 cgd panic("spec_read proc");
297 1.1 cgd #endif
298 1.1 cgd if (uio->uio_resid == 0)
299 1.1 cgd return (0);
300 1.1 cgd
301 1.56 chs switch (vp->v_type) {
302 1.56 chs
303 1.56 chs case VCHR:
304 1.39 fvdl VOP_UNLOCK(vp, 0);
305 1.64 gehenna cdev = cdevsw_lookup(vp->v_rdev);
306 1.64 gehenna if (cdev != NULL)
307 1.64 gehenna error = (*cdev->d_read)(vp->v_rdev, uio, ap->a_ioflag);
308 1.64 gehenna else
309 1.64 gehenna error = ENXIO;
310 1.58 chs vn_lock(vp, LK_SHARED | LK_RETRY);
311 1.1 cgd return (error);
312 1.1 cgd
313 1.56 chs case VBLK:
314 1.56 chs if (uio->uio_offset < 0)
315 1.56 chs return (EINVAL);
316 1.56 chs bsize = BLKDEV_IOSIZE;
317 1.64 gehenna bdev = bdevsw_lookup(vp->v_rdev);
318 1.64 gehenna if (bdev != NULL &&
319 1.64 gehenna (*bdev->d_ioctl)(vp->v_rdev, DIOCGPART, (caddr_t)&dpart,
320 1.68 fvdl FREAD, p) == 0) {
321 1.56 chs if (dpart.part->p_fstype == FS_BSDFFS &&
322 1.56 chs dpart.part->p_frag != 0 && dpart.part->p_fsize != 0)
323 1.56 chs bsize = dpart.part->p_frag *
324 1.56 chs dpart.part->p_fsize;
325 1.56 chs }
326 1.59 chs bscale = bsize >> DEV_BSHIFT;
327 1.56 chs do {
328 1.59 chs bn = (uio->uio_offset >> DEV_BSHIFT) &~ (bscale - 1);
329 1.56 chs on = uio->uio_offset % bsize;
330 1.56 chs n = min((unsigned)(bsize - on), uio->uio_resid);
331 1.57 chs error = bread(vp, bn, bsize, NOCRED, &bp);
332 1.56 chs n = min(n, bsize - bp->b_resid);
333 1.56 chs if (error) {
334 1.56 chs brelse(bp);
335 1.56 chs return (error);
336 1.56 chs }
337 1.56 chs error = uiomove((char *)bp->b_data + on, n, uio);
338 1.56 chs brelse(bp);
339 1.56 chs } while (error == 0 && uio->uio_resid > 0 && n != 0);
340 1.56 chs return (error);
341 1.56 chs
342 1.56 chs default:
343 1.56 chs panic("spec_read type");
344 1.1 cgd }
345 1.56 chs /* NOTREACHED */
346 1.1 cgd }
347 1.1 cgd
348 1.1 cgd /*
349 1.1 cgd * Vnode op for write
350 1.1 cgd */
351 1.1 cgd /* ARGSUSED */
352 1.28 christos int
353 1.28 christos spec_write(v)
354 1.28 christos void *v;
355 1.28 christos {
356 1.15 mycroft struct vop_write_args /* {
357 1.15 mycroft struct vnode *a_vp;
358 1.15 mycroft struct uio *a_uio;
359 1.15 mycroft int a_ioflag;
360 1.15 mycroft struct ucred *a_cred;
361 1.28 christos } */ *ap = v;
362 1.48 augustss struct vnode *vp = ap->a_vp;
363 1.48 augustss struct uio *uio = ap->a_uio;
364 1.68 fvdl struct proc *p = uio->uio_procp;
365 1.56 chs struct buf *bp;
366 1.64 gehenna const struct bdevsw *bdev;
367 1.64 gehenna const struct cdevsw *cdev;
368 1.56 chs daddr_t bn;
369 1.59 chs int bsize, bscale;
370 1.56 chs struct partinfo dpart;
371 1.64 gehenna int n, on;
372 1.1 cgd int error = 0;
373 1.1 cgd
374 1.1 cgd #ifdef DIAGNOSTIC
375 1.1 cgd if (uio->uio_rw != UIO_WRITE)
376 1.1 cgd panic("spec_write mode");
377 1.68 fvdl if (uio->uio_segflg == UIO_USERSPACE && uio->uio_procp != curproc)
378 1.1 cgd panic("spec_write proc");
379 1.1 cgd #endif
380 1.1 cgd
381 1.56 chs switch (vp->v_type) {
382 1.56 chs
383 1.56 chs case VCHR:
384 1.39 fvdl VOP_UNLOCK(vp, 0);
385 1.64 gehenna cdev = cdevsw_lookup(vp->v_rdev);
386 1.64 gehenna if (cdev != NULL)
387 1.64 gehenna error = (*cdev->d_write)(vp->v_rdev, uio, ap->a_ioflag);
388 1.64 gehenna else
389 1.64 gehenna error = ENXIO;
390 1.39 fvdl vn_lock(vp, LK_EXCLUSIVE | LK_RETRY);
391 1.1 cgd return (error);
392 1.56 chs
393 1.56 chs case VBLK:
394 1.56 chs if (uio->uio_resid == 0)
395 1.56 chs return (0);
396 1.56 chs if (uio->uio_offset < 0)
397 1.56 chs return (EINVAL);
398 1.56 chs bsize = BLKDEV_IOSIZE;
399 1.64 gehenna bdev = bdevsw_lookup(vp->v_rdev);
400 1.64 gehenna if (bdev != NULL &&
401 1.64 gehenna (*bdev->d_ioctl)(vp->v_rdev, DIOCGPART, (caddr_t)&dpart,
402 1.68 fvdl FREAD, p) == 0) {
403 1.56 chs if (dpart.part->p_fstype == FS_BSDFFS &&
404 1.56 chs dpart.part->p_frag != 0 && dpart.part->p_fsize != 0)
405 1.56 chs bsize = dpart.part->p_frag *
406 1.56 chs dpart.part->p_fsize;
407 1.56 chs }
408 1.59 chs bscale = bsize >> DEV_BSHIFT;
409 1.56 chs do {
410 1.59 chs bn = (uio->uio_offset >> DEV_BSHIFT) &~ (bscale - 1);
411 1.56 chs on = uio->uio_offset % bsize;
412 1.56 chs n = min((unsigned)(bsize - on), uio->uio_resid);
413 1.56 chs if (n == bsize)
414 1.56 chs bp = getblk(vp, bn, bsize, 0, 0);
415 1.56 chs else
416 1.56 chs error = bread(vp, bn, bsize, NOCRED, &bp);
417 1.56 chs if (error) {
418 1.56 chs brelse(bp);
419 1.56 chs return (error);
420 1.56 chs }
421 1.56 chs n = min(n, bsize - bp->b_resid);
422 1.56 chs error = uiomove((char *)bp->b_data + on, n, uio);
423 1.56 chs if (error)
424 1.56 chs brelse(bp);
425 1.56 chs else {
426 1.56 chs if (n + on == bsize)
427 1.56 chs bawrite(bp);
428 1.56 chs else
429 1.56 chs bdwrite(bp);
430 1.56 chs if (bp->b_flags & B_ERROR)
431 1.56 chs error = bp->b_error;
432 1.56 chs }
433 1.56 chs } while (error == 0 && uio->uio_resid > 0 && n != 0);
434 1.56 chs return (error);
435 1.56 chs
436 1.56 chs default:
437 1.56 chs panic("spec_write type");
438 1.55 chs }
439 1.56 chs /* NOTREACHED */
440 1.1 cgd }
441 1.1 cgd
442 1.1 cgd /*
443 1.1 cgd * Device ioctl operation.
444 1.1 cgd */
445 1.1 cgd /* ARGSUSED */
446 1.28 christos int
447 1.28 christos spec_ioctl(v)
448 1.28 christos void *v;
449 1.28 christos {
450 1.15 mycroft struct vop_ioctl_args /* {
451 1.15 mycroft struct vnode *a_vp;
452 1.19 cgd u_long a_command;
453 1.15 mycroft caddr_t a_data;
454 1.15 mycroft int a_fflag;
455 1.15 mycroft struct ucred *a_cred;
456 1.68 fvdl struct proc *a_p;
457 1.28 christos } */ *ap = v;
458 1.64 gehenna const struct bdevsw *bdev;
459 1.64 gehenna const struct cdevsw *cdev;
460 1.15 mycroft dev_t dev = ap->a_vp->v_rdev;
461 1.1 cgd
462 1.15 mycroft switch (ap->a_vp->v_type) {
463 1.1 cgd
464 1.1 cgd case VCHR:
465 1.64 gehenna cdev = cdevsw_lookup(dev);
466 1.64 gehenna if (cdev == NULL)
467 1.64 gehenna return (ENXIO);
468 1.64 gehenna return ((*cdev->d_ioctl)(dev, ap->a_command, ap->a_data,
469 1.68 fvdl ap->a_fflag, ap->a_p));
470 1.1 cgd
471 1.1 cgd case VBLK:
472 1.64 gehenna bdev = bdevsw_lookup(dev);
473 1.64 gehenna if (bdev == NULL)
474 1.64 gehenna return (ENXIO);
475 1.42 thorpej if (ap->a_command == 0 && (long)ap->a_data == B_TAPE) {
476 1.64 gehenna if (bdev->d_type == D_TAPE)
477 1.1 cgd return (0);
478 1.1 cgd else
479 1.1 cgd return (1);
480 1.42 thorpej }
481 1.64 gehenna return ((*bdev->d_ioctl)(dev, ap->a_command, ap->a_data,
482 1.68 fvdl ap->a_fflag, ap->a_p));
483 1.1 cgd
484 1.1 cgd default:
485 1.1 cgd panic("spec_ioctl");
486 1.1 cgd /* NOTREACHED */
487 1.1 cgd }
488 1.1 cgd }
489 1.1 cgd
490 1.1 cgd /* ARGSUSED */
491 1.28 christos int
492 1.32 mycroft spec_poll(v)
493 1.28 christos void *v;
494 1.28 christos {
495 1.32 mycroft struct vop_poll_args /* {
496 1.15 mycroft struct vnode *a_vp;
497 1.32 mycroft int a_events;
498 1.68 fvdl struct proc *a_p;
499 1.28 christos } */ *ap = v;
500 1.64 gehenna const struct cdevsw *cdev;
501 1.48 augustss dev_t dev;
502 1.1 cgd
503 1.15 mycroft switch (ap->a_vp->v_type) {
504 1.1 cgd
505 1.1 cgd case VCHR:
506 1.15 mycroft dev = ap->a_vp->v_rdev;
507 1.64 gehenna cdev = cdevsw_lookup(dev);
508 1.64 gehenna if (cdev == NULL)
509 1.64 gehenna return (ENXIO);
510 1.68 fvdl return (*cdev->d_poll)(dev, ap->a_events, ap->a_p);
511 1.30 mycroft
512 1.30 mycroft default:
513 1.32 mycroft return (genfs_poll(v));
514 1.15 mycroft }
515 1.15 mycroft }
516 1.65 jdolecek
517 1.65 jdolecek /* ARGSUSED */
518 1.65 jdolecek int
519 1.65 jdolecek spec_kqfilter(v)
520 1.65 jdolecek void *v;
521 1.65 jdolecek {
522 1.65 jdolecek struct vop_kqfilter_args /* {
523 1.65 jdolecek struct vnode *a_vp;
524 1.65 jdolecek struct proc *a_kn;
525 1.65 jdolecek } */ *ap = v;
526 1.65 jdolecek const struct cdevsw *cdev;
527 1.65 jdolecek dev_t dev;
528 1.65 jdolecek
529 1.65 jdolecek switch (ap->a_vp->v_type) {
530 1.65 jdolecek
531 1.65 jdolecek case VCHR:
532 1.65 jdolecek dev = ap->a_vp->v_rdev;
533 1.65 jdolecek cdev = cdevsw_lookup(dev);
534 1.65 jdolecek if (cdev == NULL)
535 1.65 jdolecek return (ENXIO);
536 1.65 jdolecek return (*cdev->d_kqfilter)(dev, ap->a_kn);
537 1.65 jdolecek default:
538 1.65 jdolecek /*
539 1.65 jdolecek * Block devices don't support kqfilter, and refuse it
540 1.65 jdolecek * for any other files (like those vflush()ed) too.
541 1.65 jdolecek */
542 1.65 jdolecek return (EOPNOTSUPP);
543 1.65 jdolecek }
544 1.65 jdolecek }
545 1.65 jdolecek
546 1.15 mycroft /*
547 1.15 mycroft * Synch buffers associated with a block device
548 1.15 mycroft */
549 1.15 mycroft /* ARGSUSED */
550 1.15 mycroft int
551 1.28 christos spec_fsync(v)
552 1.28 christos void *v;
553 1.28 christos {
554 1.15 mycroft struct vop_fsync_args /* {
555 1.15 mycroft struct vnode *a_vp;
556 1.15 mycroft struct ucred *a_cred;
557 1.40 kleink int a_flags;
558 1.50 fvdl off_t offlo;
559 1.50 fvdl off_t offhi;
560 1.68 fvdl struct proc *a_p;
561 1.28 christos } */ *ap = v;
562 1.48 augustss struct vnode *vp = ap->a_vp;
563 1.15 mycroft
564 1.30 mycroft if (vp->v_type == VBLK)
565 1.40 kleink vflushbuf(vp, (ap->a_flags & FSYNC_WAIT) != 0);
566 1.15 mycroft return (0);
567 1.1 cgd }
568 1.1 cgd
569 1.1 cgd /*
570 1.1 cgd * Just call the device strategy routine
571 1.1 cgd */
572 1.28 christos int
573 1.28 christos spec_strategy(v)
574 1.28 christos void *v;
575 1.28 christos {
576 1.15 mycroft struct vop_strategy_args /* {
577 1.15 mycroft struct buf *a_bp;
578 1.28 christos } */ *ap = v;
579 1.45 fvdl struct buf *bp;
580 1.64 gehenna const struct bdevsw *bdev;
581 1.1 cgd
582 1.45 fvdl bp = ap->a_bp;
583 1.45 fvdl if (!(bp->b_flags & B_READ) &&
584 1.45 fvdl (LIST_FIRST(&bp->b_dep)) != NULL && bioops.io_start)
585 1.45 fvdl (*bioops.io_start)(bp);
586 1.64 gehenna bdev = bdevsw_lookup(bp->b_dev);
587 1.64 gehenna if (bdev != NULL)
588 1.64 gehenna (*bdev->d_strategy)(bp);
589 1.1 cgd return (0);
590 1.1 cgd }
591 1.1 cgd
592 1.39 fvdl int
593 1.39 fvdl spec_inactive(v)
594 1.39 fvdl void *v;
595 1.39 fvdl {
596 1.39 fvdl struct vop_inactive_args /* {
597 1.39 fvdl struct vnode *a_vp;
598 1.68 fvdl struct proc *a_p;
599 1.39 fvdl } */ *ap = v;
600 1.39 fvdl
601 1.39 fvdl VOP_UNLOCK(ap->a_vp, 0);
602 1.39 fvdl return (0);
603 1.39 fvdl }
604 1.39 fvdl
605 1.1 cgd /*
606 1.1 cgd * This is a noop, simply returning what one has been given.
607 1.1 cgd */
608 1.28 christos int
609 1.28 christos spec_bmap(v)
610 1.28 christos void *v;
611 1.28 christos {
612 1.15 mycroft struct vop_bmap_args /* {
613 1.15 mycroft struct vnode *a_vp;
614 1.15 mycroft daddr_t a_bn;
615 1.15 mycroft struct vnode **a_vpp;
616 1.15 mycroft daddr_t *a_bnp;
617 1.39 fvdl int *a_runp;
618 1.28 christos } */ *ap = v;
619 1.1 cgd
620 1.15 mycroft if (ap->a_vpp != NULL)
621 1.15 mycroft *ap->a_vpp = ap->a_vp;
622 1.15 mycroft if (ap->a_bnp != NULL)
623 1.15 mycroft *ap->a_bnp = ap->a_bn;
624 1.39 fvdl if (ap->a_runp != NULL)
625 1.55 chs *ap->a_runp = (MAXBSIZE >> DEV_BSHIFT) - 1;
626 1.1 cgd return (0);
627 1.1 cgd }
628 1.1 cgd
629 1.1 cgd /*
630 1.1 cgd * Device close routine
631 1.1 cgd */
632 1.1 cgd /* ARGSUSED */
633 1.28 christos int
634 1.28 christos spec_close(v)
635 1.28 christos void *v;
636 1.28 christos {
637 1.15 mycroft struct vop_close_args /* {
638 1.15 mycroft struct vnode *a_vp;
639 1.15 mycroft int a_fflag;
640 1.15 mycroft struct ucred *a_cred;
641 1.68 fvdl struct proc *a_p;
642 1.28 christos } */ *ap = v;
643 1.48 augustss struct vnode *vp = ap->a_vp;
644 1.64 gehenna const struct bdevsw *bdev;
645 1.64 gehenna const struct cdevsw *cdev;
646 1.1 cgd dev_t dev = vp->v_rdev;
647 1.68 fvdl int (*devclose) __P((dev_t, int, int, struct proc *));
648 1.44 wrstuden int mode, error, count, flags, flags1;
649 1.44 wrstuden
650 1.54 thorpej count = vcount(vp);
651 1.44 wrstuden simple_lock(&vp->v_interlock);
652 1.44 wrstuden flags = vp->v_flag;
653 1.44 wrstuden simple_unlock(&vp->v_interlock);
654 1.1 cgd
655 1.1 cgd switch (vp->v_type) {
656 1.1 cgd
657 1.1 cgd case VCHR:
658 1.11 cgd /*
659 1.11 cgd * Hack: a tty device that is a controlling terminal
660 1.11 cgd * has a reference from the session structure.
661 1.11 cgd * We cannot easily tell that a character device is
662 1.11 cgd * a controlling terminal, unless it is the closing
663 1.11 cgd * process' controlling terminal. In that case,
664 1.11 cgd * if the reference count is 2 (this last descriptor
665 1.11 cgd * plus the session), release the reference from the session.
666 1.11 cgd */
667 1.68 fvdl if (count == 2 && ap->a_p &&
668 1.68 fvdl vp == ap->a_p->p_session->s_ttyvp) {
669 1.11 cgd vrele(vp);
670 1.44 wrstuden count--;
671 1.68 fvdl ap->a_p->p_session->s_ttyvp = NULL;
672 1.11 cgd }
673 1.1 cgd /*
674 1.1 cgd * If the vnode is locked, then we are in the midst
675 1.1 cgd * of forcably closing the device, otherwise we only
676 1.1 cgd * close on last reference.
677 1.1 cgd */
678 1.44 wrstuden if (count > 1 && (flags & VXLOCK) == 0)
679 1.1 cgd return (0);
680 1.64 gehenna cdev = cdevsw_lookup(dev);
681 1.64 gehenna if (cdev != NULL)
682 1.64 gehenna devclose = cdev->d_close;
683 1.64 gehenna else
684 1.64 gehenna devclose = NULL;
685 1.1 cgd mode = S_IFCHR;
686 1.1 cgd break;
687 1.1 cgd
688 1.1 cgd case VBLK:
689 1.1 cgd /*
690 1.1 cgd * On last close of a block device (that isn't mounted)
691 1.1 cgd * we must invalidate any in core blocks, so that
692 1.1 cgd * we can, for instance, change floppy disks.
693 1.1 cgd */
694 1.68 fvdl error = vinvalbuf(vp, V_SAVE, ap->a_cred, ap->a_p, 0, 0);
695 1.28 christos if (error)
696 1.15 mycroft return (error);
697 1.1 cgd /*
698 1.1 cgd * We do not want to really close the device if it
699 1.1 cgd * is still in use unless we are trying to close it
700 1.1 cgd * forcibly. Since every use (buffer, vnode, swap, cmap)
701 1.1 cgd * holds a reference to the vnode, and because we mark
702 1.1 cgd * any other vnodes that alias this device, when the
703 1.1 cgd * sum of the reference counts on all the aliased
704 1.1 cgd * vnodes descends to one, we are on last close.
705 1.1 cgd */
706 1.44 wrstuden if (count > 1 && (flags & VXLOCK) == 0)
707 1.1 cgd return (0);
708 1.64 gehenna bdev = bdevsw_lookup(dev);
709 1.64 gehenna if (bdev != NULL)
710 1.64 gehenna devclose = bdev->d_close;
711 1.64 gehenna else
712 1.64 gehenna devclose = NULL;
713 1.1 cgd mode = S_IFBLK;
714 1.1 cgd break;
715 1.5 cgd
716 1.1 cgd default:
717 1.1 cgd panic("spec_close: not special");
718 1.1 cgd }
719 1.1 cgd
720 1.44 wrstuden flags1 = ap->a_fflag;
721 1.44 wrstuden
722 1.44 wrstuden /*
723 1.44 wrstuden * if VXLOCK is set, then we're going away soon, so make this
724 1.44 wrstuden * non-blocking. Also ensures that we won't wedge in vn_lock below.
725 1.44 wrstuden */
726 1.44 wrstuden if (flags & VXLOCK)
727 1.44 wrstuden flags1 |= FNONBLOCK;
728 1.44 wrstuden
729 1.44 wrstuden /*
730 1.62 wiz * If we're able to block, release the vnode lock & reacquire. We
731 1.44 wrstuden * might end up sleaping for someone else who wants our queues. They
732 1.44 wrstuden * won't get them if we hold the vnode locked. Also, if VXLOCK is set,
733 1.44 wrstuden * don't release the lock as we won't be able to regain it.
734 1.44 wrstuden */
735 1.44 wrstuden if (!(flags1 & FNONBLOCK))
736 1.44 wrstuden VOP_UNLOCK(vp, 0);
737 1.44 wrstuden
738 1.64 gehenna if (devclose != NULL)
739 1.68 fvdl error = (*devclose)(dev, flags1, mode, ap->a_p);
740 1.64 gehenna else
741 1.64 gehenna error = ENXIO;
742 1.44 wrstuden
743 1.44 wrstuden if (!(flags1 & FNONBLOCK))
744 1.44 wrstuden vn_lock(vp, LK_EXCLUSIVE | LK_RETRY);
745 1.44 wrstuden
746 1.44 wrstuden return (error);
747 1.1 cgd }
748 1.1 cgd
749 1.1 cgd /*
750 1.1 cgd * Print out the contents of a special device vnode.
751 1.1 cgd */
752 1.28 christos int
753 1.28 christos spec_print(v)
754 1.28 christos void *v;
755 1.28 christos {
756 1.15 mycroft struct vop_print_args /* {
757 1.15 mycroft struct vnode *a_vp;
758 1.28 christos } */ *ap = v;
759 1.15 mycroft
760 1.34 christos printf("tag VT_NON, dev %d, %d\n", major(ap->a_vp->v_rdev),
761 1.33 christos minor(ap->a_vp->v_rdev));
762 1.28 christos return 0;
763 1.15 mycroft }
764 1.15 mycroft
765 1.15 mycroft /*
766 1.15 mycroft * Return POSIX pathconf information applicable to special devices.
767 1.15 mycroft */
768 1.28 christos int
769 1.28 christos spec_pathconf(v)
770 1.28 christos void *v;
771 1.28 christos {
772 1.15 mycroft struct vop_pathconf_args /* {
773 1.15 mycroft struct vnode *a_vp;
774 1.15 mycroft int a_name;
775 1.18 cgd register_t *a_retval;
776 1.28 christos } */ *ap = v;
777 1.1 cgd
778 1.15 mycroft switch (ap->a_name) {
779 1.15 mycroft case _PC_LINK_MAX:
780 1.15 mycroft *ap->a_retval = LINK_MAX;
781 1.15 mycroft return (0);
782 1.15 mycroft case _PC_MAX_CANON:
783 1.15 mycroft *ap->a_retval = MAX_CANON;
784 1.15 mycroft return (0);
785 1.15 mycroft case _PC_MAX_INPUT:
786 1.15 mycroft *ap->a_retval = MAX_INPUT;
787 1.15 mycroft return (0);
788 1.15 mycroft case _PC_PIPE_BUF:
789 1.15 mycroft *ap->a_retval = PIPE_BUF;
790 1.15 mycroft return (0);
791 1.15 mycroft case _PC_CHOWN_RESTRICTED:
792 1.15 mycroft *ap->a_retval = 1;
793 1.15 mycroft return (0);
794 1.15 mycroft case _PC_VDISABLE:
795 1.15 mycroft *ap->a_retval = _POSIX_VDISABLE;
796 1.41 kleink return (0);
797 1.41 kleink case _PC_SYNC_IO:
798 1.41 kleink *ap->a_retval = 1;
799 1.15 mycroft return (0);
800 1.15 mycroft default:
801 1.15 mycroft return (EINVAL);
802 1.15 mycroft }
803 1.1 cgd /* NOTREACHED */
804 1.35 kleink }
805 1.35 kleink
806 1.35 kleink /*
807 1.35 kleink * Advisory record locking support.
808 1.35 kleink */
809 1.35 kleink int
810 1.35 kleink spec_advlock(v)
811 1.35 kleink void *v;
812 1.35 kleink {
813 1.35 kleink struct vop_advlock_args /* {
814 1.35 kleink struct vnode *a_vp;
815 1.35 kleink caddr_t a_id;
816 1.35 kleink int a_op;
817 1.35 kleink struct flock *a_fl;
818 1.35 kleink int a_flags;
819 1.35 kleink } */ *ap = v;
820 1.48 augustss struct vnode *vp = ap->a_vp;
821 1.35 kleink
822 1.49 jdolecek return lf_advlock(ap, &vp->v_speclockf, (off_t)0);
823 1.1 cgd }
824