]> CyberLeo.Net >> Repos - FreeBSD/stable/8.git/blob - sys/kern/vfs_vnops.c
MFC r200273:
[FreeBSD/stable/8.git] / sys / kern / vfs_vnops.c
1 /*-
2  * Copyright (c) 1982, 1986, 1989, 1993
3  *      The Regents of the University of California.  All rights reserved.
4  * (c) UNIX System Laboratories, Inc.
5  * All or some portions of this file are derived from material licensed
6  * to the University of California by American Telephone and Telegraph
7  * Co. or Unix System Laboratories, Inc. and are reproduced herein with
8  * the permission of UNIX System Laboratories, Inc.
9  *
10  * Redistribution and use in source and binary forms, with or without
11  * modification, are permitted provided that the following conditions
12  * are met:
13  * 1. Redistributions of source code must retain the above copyright
14  *    notice, this list of conditions and the following disclaimer.
15  * 2. Redistributions in binary form must reproduce the above copyright
16  *    notice, this list of conditions and the following disclaimer in the
17  *    documentation and/or other materials provided with the distribution.
18  * 4. Neither the name of the University nor the names of its contributors
19  *    may be used to endorse or promote products derived from this software
20  *    without specific prior written permission.
21  *
22  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
23  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
26  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32  * SUCH DAMAGE.
33  *
34  *      @(#)vfs_vnops.c 8.2 (Berkeley) 1/21/94
35  */
36
37 #include <sys/cdefs.h>
38 __FBSDID("$FreeBSD$");
39
40 #include <sys/param.h>
41 #include <sys/systm.h>
42 #include <sys/fcntl.h>
43 #include <sys/file.h>
44 #include <sys/kdb.h>
45 #include <sys/stat.h>
46 #include <sys/priv.h>
47 #include <sys/proc.h>
48 #include <sys/limits.h>
49 #include <sys/lock.h>
50 #include <sys/mount.h>
51 #include <sys/mutex.h>
52 #include <sys/namei.h>
53 #include <sys/vnode.h>
54 #include <sys/bio.h>
55 #include <sys/buf.h>
56 #include <sys/filio.h>
57 #include <sys/sx.h>
58 #include <sys/ttycom.h>
59 #include <sys/conf.h>
60 #include <sys/syslog.h>
61 #include <sys/unistd.h>
62
63 #include <security/mac/mac_framework.h>
64
65 static fo_rdwr_t        vn_read;
66 static fo_rdwr_t        vn_write;
67 static fo_truncate_t    vn_truncate;
68 static fo_ioctl_t       vn_ioctl;
69 static fo_poll_t        vn_poll;
70 static fo_kqfilter_t    vn_kqfilter;
71 static fo_stat_t        vn_statfile;
72 static fo_close_t       vn_closefile;
73
74 struct  fileops vnops = {
75         .fo_read = vn_read,
76         .fo_write = vn_write,
77         .fo_truncate = vn_truncate,
78         .fo_ioctl = vn_ioctl,
79         .fo_poll = vn_poll,
80         .fo_kqfilter = vn_kqfilter,
81         .fo_stat = vn_statfile,
82         .fo_close = vn_closefile,
83         .fo_flags = DFLAG_PASSABLE | DFLAG_SEEKABLE
84 };
85
86 int
87 vn_open(ndp, flagp, cmode, fp)
88         struct nameidata *ndp;
89         int *flagp, cmode;
90         struct file *fp;
91 {
92         struct thread *td = ndp->ni_cnd.cn_thread;
93
94         return (vn_open_cred(ndp, flagp, cmode, 0, td->td_ucred, fp));
95 }
96
97 /*
98  * Common code for vnode open operations.
99  * Check permissions, and call the VOP_OPEN or VOP_CREATE routine.
100  * 
101  * Note that this does NOT free nameidata for the successful case,
102  * due to the NDINIT being done elsewhere.
103  */
104 int
105 vn_open_cred(struct nameidata *ndp, int *flagp, int cmode, u_int vn_open_flags,
106     struct ucred *cred, struct file *fp)
107 {
108         struct vnode *vp;
109         struct mount *mp;
110         struct thread *td = ndp->ni_cnd.cn_thread;
111         struct vattr vat;
112         struct vattr *vap = &vat;
113         int fmode, error;
114         accmode_t accmode;
115         int vfslocked, mpsafe;
116
117         mpsafe = ndp->ni_cnd.cn_flags & MPSAFE;
118 restart:
119         vfslocked = 0;
120         fmode = *flagp;
121         if (fmode & O_CREAT) {
122                 ndp->ni_cnd.cn_nameiop = CREATE;
123                 ndp->ni_cnd.cn_flags = ISOPEN | LOCKPARENT | LOCKLEAF |
124                     MPSAFE;
125                 if ((fmode & O_EXCL) == 0 && (fmode & O_NOFOLLOW) == 0)
126                         ndp->ni_cnd.cn_flags |= FOLLOW;
127                 if (!(vn_open_flags & VN_OPEN_NOAUDIT))
128                         ndp->ni_cnd.cn_flags |= AUDITVNODE1;
129                 bwillwrite();
130                 if ((error = namei(ndp)) != 0)
131                         return (error);
132                 vfslocked = NDHASGIANT(ndp);
133                 if (!mpsafe)
134                         ndp->ni_cnd.cn_flags &= ~MPSAFE;
135                 if (ndp->ni_vp == NULL) {
136                         VATTR_NULL(vap);
137                         vap->va_type = VREG;
138                         vap->va_mode = cmode;
139                         if (fmode & O_EXCL)
140                                 vap->va_vaflags |= VA_EXCLUSIVE;
141                         if (vn_start_write(ndp->ni_dvp, &mp, V_NOWAIT) != 0) {
142                                 NDFREE(ndp, NDF_ONLY_PNBUF);
143                                 vput(ndp->ni_dvp);
144                                 VFS_UNLOCK_GIANT(vfslocked);
145                                 if ((error = vn_start_write(NULL, &mp,
146                                     V_XSLEEP | PCATCH)) != 0)
147                                         return (error);
148                                 goto restart;
149                         }
150 #ifdef MAC
151                         error = mac_vnode_check_create(cred, ndp->ni_dvp,
152                             &ndp->ni_cnd, vap);
153                         if (error == 0)
154 #endif
155                                 error = VOP_CREATE(ndp->ni_dvp, &ndp->ni_vp,
156                                                    &ndp->ni_cnd, vap);
157                         vput(ndp->ni_dvp);
158                         vn_finished_write(mp);
159                         if (error) {
160                                 VFS_UNLOCK_GIANT(vfslocked);
161                                 NDFREE(ndp, NDF_ONLY_PNBUF);
162                                 return (error);
163                         }
164                         fmode &= ~O_TRUNC;
165                         vp = ndp->ni_vp;
166                 } else {
167                         if (ndp->ni_dvp == ndp->ni_vp)
168                                 vrele(ndp->ni_dvp);
169                         else
170                                 vput(ndp->ni_dvp);
171                         ndp->ni_dvp = NULL;
172                         vp = ndp->ni_vp;
173                         if (fmode & O_EXCL) {
174                                 error = EEXIST;
175                                 goto bad;
176                         }
177                         fmode &= ~O_CREAT;
178                 }
179         } else {
180                 ndp->ni_cnd.cn_nameiop = LOOKUP;
181                 ndp->ni_cnd.cn_flags = ISOPEN |
182                     ((fmode & O_NOFOLLOW) ? NOFOLLOW : FOLLOW) |
183                     LOCKLEAF | MPSAFE;
184                 if (!(fmode & FWRITE))
185                         ndp->ni_cnd.cn_flags |= LOCKSHARED;
186                 if (!(vn_open_flags & VN_OPEN_NOAUDIT))
187                         ndp->ni_cnd.cn_flags |= AUDITVNODE1;
188                 if ((error = namei(ndp)) != 0)
189                         return (error);
190                 if (!mpsafe)
191                         ndp->ni_cnd.cn_flags &= ~MPSAFE;
192                 vfslocked = NDHASGIANT(ndp);
193                 vp = ndp->ni_vp;
194         }
195         if (vp->v_type == VLNK) {
196                 error = EMLINK;
197                 goto bad;
198         }
199         if (vp->v_type == VSOCK) {
200                 error = EOPNOTSUPP;
201                 goto bad;
202         }
203         accmode = 0;
204         if (fmode & (FWRITE | O_TRUNC)) {
205                 if (vp->v_type == VDIR) {
206                         error = EISDIR;
207                         goto bad;
208                 }
209                 accmode |= VWRITE;
210         }
211         if (fmode & FREAD)
212                 accmode |= VREAD;
213         if (fmode & FEXEC)
214                 accmode |= VEXEC;
215         if ((fmode & O_APPEND) && (fmode & FWRITE))
216                 accmode |= VAPPEND;
217 #ifdef MAC
218         error = mac_vnode_check_open(cred, vp, accmode);
219         if (error)
220                 goto bad;
221 #endif
222         if ((fmode & O_CREAT) == 0) {
223                 if (accmode & VWRITE) {
224                         error = vn_writechk(vp);
225                         if (error)
226                                 goto bad;
227                 }
228                 if (accmode) {
229                         error = VOP_ACCESS(vp, accmode, cred, td);
230                         if (error)
231                                 goto bad;
232                 }
233         }
234         if ((error = VOP_OPEN(vp, fmode, cred, td, fp)) != 0)
235                 goto bad;
236
237         if (fmode & FWRITE)
238                 vp->v_writecount++;
239         *flagp = fmode;
240         ASSERT_VOP_LOCKED(vp, "vn_open_cred");
241         if (!mpsafe)
242                 VFS_UNLOCK_GIANT(vfslocked);
243         return (0);
244 bad:
245         NDFREE(ndp, NDF_ONLY_PNBUF);
246         vput(vp);
247         VFS_UNLOCK_GIANT(vfslocked);
248         *flagp = fmode;
249         ndp->ni_vp = NULL;
250         return (error);
251 }
252
253 /*
254  * Check for write permissions on the specified vnode.
255  * Prototype text segments cannot be written.
256  */
257 int
258 vn_writechk(vp)
259         register struct vnode *vp;
260 {
261
262         ASSERT_VOP_LOCKED(vp, "vn_writechk");
263         /*
264          * If there's shared text associated with
265          * the vnode, try to free it up once.  If
266          * we fail, we can't allow writing.
267          */
268         if (vp->v_vflag & VV_TEXT)
269                 return (ETXTBSY);
270
271         return (0);
272 }
273
274 /*
275  * Vnode close call
276  */
277 int
278 vn_close(vp, flags, file_cred, td)
279         register struct vnode *vp;
280         int flags;
281         struct ucred *file_cred;
282         struct thread *td;
283 {
284         struct mount *mp;
285         int error, lock_flags;
286
287         if (!(flags & FWRITE) && vp->v_mount != NULL &&
288             vp->v_mount->mnt_kern_flag & MNTK_EXTENDED_SHARED)
289                 lock_flags = LK_SHARED;
290         else
291                 lock_flags = LK_EXCLUSIVE;
292
293         VFS_ASSERT_GIANT(vp->v_mount);
294
295         vn_start_write(vp, &mp, V_WAIT);
296         vn_lock(vp, lock_flags | LK_RETRY);
297         if (flags & FWRITE) {
298                 VNASSERT(vp->v_writecount > 0, vp, 
299                     ("vn_close: negative writecount"));
300                 vp->v_writecount--;
301         }
302         error = VOP_CLOSE(vp, flags, file_cred, td);
303         vput(vp);
304         vn_finished_write(mp);
305         return (error);
306 }
307
308 /*
309  * Heuristic to detect sequential operation.
310  */
311 static int
312 sequential_heuristic(struct uio *uio, struct file *fp)
313 {
314
315         if (atomic_load_acq_int(&(fp->f_flag)) & FRDAHEAD)
316                 return (fp->f_seqcount << IO_SEQSHIFT);
317
318         /*
319          * Offset 0 is handled specially.  open() sets f_seqcount to 1 so
320          * that the first I/O is normally considered to be slightly
321          * sequential.  Seeking to offset 0 doesn't change sequentiality
322          * unless previous seeks have reduced f_seqcount to 0, in which
323          * case offset 0 is not special.
324          */
325         if ((uio->uio_offset == 0 && fp->f_seqcount > 0) ||
326             uio->uio_offset == fp->f_nextoff) {
327                 /*
328                  * f_seqcount is in units of fixed-size blocks so that it
329                  * depends mainly on the amount of sequential I/O and not
330                  * much on the number of sequential I/O's.  The fixed size
331                  * of 16384 is hard-coded here since it is (not quite) just
332                  * a magic size that works well here.  This size is more
333                  * closely related to the best I/O size for real disks than
334                  * to any block size used by software.
335                  */
336                 fp->f_seqcount += howmany(uio->uio_resid, 16384);
337                 if (fp->f_seqcount > IO_SEQMAX)
338                         fp->f_seqcount = IO_SEQMAX;
339                 return (fp->f_seqcount << IO_SEQSHIFT);
340         }
341
342         /* Not sequential.  Quickly draw-down sequentiality. */
343         if (fp->f_seqcount > 1)
344                 fp->f_seqcount = 1;
345         else
346                 fp->f_seqcount = 0;
347         return (0);
348 }
349
350 /*
351  * Package up an I/O request on a vnode into a uio and do it.
352  */
353 int
354 vn_rdwr(rw, vp, base, len, offset, segflg, ioflg, active_cred, file_cred,
355     aresid, td)
356         enum uio_rw rw;
357         struct vnode *vp;
358         void *base;
359         int len;
360         off_t offset;
361         enum uio_seg segflg;
362         int ioflg;
363         struct ucred *active_cred;
364         struct ucred *file_cred;
365         int *aresid;
366         struct thread *td;
367 {
368         struct uio auio;
369         struct iovec aiov;
370         struct mount *mp;
371         struct ucred *cred;
372         int error, lock_flags;
373
374         VFS_ASSERT_GIANT(vp->v_mount);
375
376         if ((ioflg & IO_NODELOCKED) == 0) {
377                 mp = NULL;
378                 if (rw == UIO_WRITE) { 
379                         if (vp->v_type != VCHR &&
380                             (error = vn_start_write(vp, &mp, V_WAIT | PCATCH))
381                             != 0)
382                                 return (error);
383                         if (MNT_SHARED_WRITES(mp) ||
384                             ((mp == NULL) && MNT_SHARED_WRITES(vp->v_mount))) {
385                                 lock_flags = LK_SHARED;
386                         } else {
387                                 lock_flags = LK_EXCLUSIVE;
388                         }
389                         vn_lock(vp, lock_flags | LK_RETRY);
390                 } else
391                         vn_lock(vp, LK_SHARED | LK_RETRY);
392
393         }
394         ASSERT_VOP_LOCKED(vp, "IO_NODELOCKED with no vp lock held");
395         auio.uio_iov = &aiov;
396         auio.uio_iovcnt = 1;
397         aiov.iov_base = base;
398         aiov.iov_len = len;
399         auio.uio_resid = len;
400         auio.uio_offset = offset;
401         auio.uio_segflg = segflg;
402         auio.uio_rw = rw;
403         auio.uio_td = td;
404         error = 0;
405 #ifdef MAC
406         if ((ioflg & IO_NOMACCHECK) == 0) {
407                 if (rw == UIO_READ)
408                         error = mac_vnode_check_read(active_cred, file_cred,
409                             vp);
410                 else
411                         error = mac_vnode_check_write(active_cred, file_cred,
412                             vp);
413         }
414 #endif
415         if (error == 0) {
416                 if (file_cred)
417                         cred = file_cred;
418                 else
419                         cred = active_cred;
420                 if (rw == UIO_READ)
421                         error = VOP_READ(vp, &auio, ioflg, cred);
422                 else
423                         error = VOP_WRITE(vp, &auio, ioflg, cred);
424         }
425         if (aresid)
426                 *aresid = auio.uio_resid;
427         else
428                 if (auio.uio_resid && error == 0)
429                         error = EIO;
430         if ((ioflg & IO_NODELOCKED) == 0) {
431                 if (rw == UIO_WRITE && vp->v_type != VCHR)
432                         vn_finished_write(mp);
433                 VOP_UNLOCK(vp, 0);
434         }
435         return (error);
436 }
437
438 /*
439  * Package up an I/O request on a vnode into a uio and do it.  The I/O
440  * request is split up into smaller chunks and we try to avoid saturating
441  * the buffer cache while potentially holding a vnode locked, so we 
442  * check bwillwrite() before calling vn_rdwr().  We also call uio_yield()
443  * to give other processes a chance to lock the vnode (either other processes
444  * core'ing the same binary, or unrelated processes scanning the directory).
445  */
446 int
447 vn_rdwr_inchunks(rw, vp, base, len, offset, segflg, ioflg, active_cred,
448     file_cred, aresid, td)
449         enum uio_rw rw;
450         struct vnode *vp;
451         void *base;
452         size_t len;
453         off_t offset;
454         enum uio_seg segflg;
455         int ioflg;
456         struct ucred *active_cred;
457         struct ucred *file_cred;
458         size_t *aresid;
459         struct thread *td;
460 {
461         int error = 0;
462         int iaresid;
463
464         VFS_ASSERT_GIANT(vp->v_mount);
465
466         do {
467                 int chunk;
468
469                 /*
470                  * Force `offset' to a multiple of MAXBSIZE except possibly
471                  * for the first chunk, so that filesystems only need to
472                  * write full blocks except possibly for the first and last
473                  * chunks.
474                  */
475                 chunk = MAXBSIZE - (uoff_t)offset % MAXBSIZE;
476
477                 if (chunk > len)
478                         chunk = len;
479                 if (rw != UIO_READ && vp->v_type == VREG)
480                         bwillwrite();
481                 iaresid = 0;
482                 error = vn_rdwr(rw, vp, base, chunk, offset, segflg,
483                     ioflg, active_cred, file_cred, &iaresid, td);
484                 len -= chunk;   /* aresid calc already includes length */
485                 if (error)
486                         break;
487                 offset += chunk;
488                 base = (char *)base + chunk;
489                 uio_yield();
490         } while (len);
491         if (aresid)
492                 *aresid = len + iaresid;
493         return (error);
494 }
495
496 /*
497  * File table vnode read routine.
498  */
499 static int
500 vn_read(fp, uio, active_cred, flags, td)
501         struct file *fp;
502         struct uio *uio;
503         struct ucred *active_cred;
504         struct thread *td;
505         int flags;
506 {
507         struct vnode *vp;
508         int error, ioflag;
509         struct mtx *mtxp;
510         int vfslocked;
511
512         KASSERT(uio->uio_td == td, ("uio_td %p is not td %p",
513             uio->uio_td, td));
514         mtxp = NULL;
515         vp = fp->f_vnode;
516         ioflag = 0;
517         if (fp->f_flag & FNONBLOCK)
518                 ioflag |= IO_NDELAY;
519         if (fp->f_flag & O_DIRECT)
520                 ioflag |= IO_DIRECT;
521         vfslocked = VFS_LOCK_GIANT(vp->v_mount);
522         /*
523          * According to McKusick the vn lock was protecting f_offset here.
524          * It is now protected by the FOFFSET_LOCKED flag.
525          */
526         if ((flags & FOF_OFFSET) == 0) {
527                 mtxp = mtx_pool_find(mtxpool_sleep, fp);
528                 mtx_lock(mtxp);
529                 while(fp->f_vnread_flags & FOFFSET_LOCKED) {
530                         fp->f_vnread_flags |= FOFFSET_LOCK_WAITING;
531                         msleep(&fp->f_vnread_flags, mtxp, PUSER -1,
532                             "vnread offlock", 0);
533                 }
534                 fp->f_vnread_flags |= FOFFSET_LOCKED;
535                 mtx_unlock(mtxp);
536                 vn_lock(vp, LK_SHARED | LK_RETRY);
537                 uio->uio_offset = fp->f_offset;
538         } else
539                 vn_lock(vp, LK_SHARED | LK_RETRY);
540
541         ioflag |= sequential_heuristic(uio, fp);
542
543 #ifdef MAC
544         error = mac_vnode_check_read(active_cred, fp->f_cred, vp);
545         if (error == 0)
546 #endif
547                 error = VOP_READ(vp, uio, ioflag, fp->f_cred);
548         if ((flags & FOF_OFFSET) == 0) {
549                 fp->f_offset = uio->uio_offset;
550                 mtx_lock(mtxp);
551                 if (fp->f_vnread_flags & FOFFSET_LOCK_WAITING)
552                         wakeup(&fp->f_vnread_flags);
553                 fp->f_vnread_flags = 0;
554                 mtx_unlock(mtxp);
555         }
556         fp->f_nextoff = uio->uio_offset;
557         VOP_UNLOCK(vp, 0);
558         VFS_UNLOCK_GIANT(vfslocked);
559         return (error);
560 }
561
562 /*
563  * File table vnode write routine.
564  */
565 static int
566 vn_write(fp, uio, active_cred, flags, td)
567         struct file *fp;
568         struct uio *uio;
569         struct ucred *active_cred;
570         struct thread *td;
571         int flags;
572 {
573         struct vnode *vp;
574         struct mount *mp;
575         int error, ioflag, lock_flags;
576         int vfslocked;
577
578         KASSERT(uio->uio_td == td, ("uio_td %p is not td %p",
579             uio->uio_td, td));
580         vp = fp->f_vnode;
581         vfslocked = VFS_LOCK_GIANT(vp->v_mount);
582         if (vp->v_type == VREG)
583                 bwillwrite();
584         ioflag = IO_UNIT;
585         if (vp->v_type == VREG && (fp->f_flag & O_APPEND))
586                 ioflag |= IO_APPEND;
587         if (fp->f_flag & FNONBLOCK)
588                 ioflag |= IO_NDELAY;
589         if (fp->f_flag & O_DIRECT)
590                 ioflag |= IO_DIRECT;
591         if ((fp->f_flag & O_FSYNC) ||
592             (vp->v_mount && (vp->v_mount->mnt_flag & MNT_SYNCHRONOUS)))
593                 ioflag |= IO_SYNC;
594         mp = NULL;
595         if (vp->v_type != VCHR &&
596             (error = vn_start_write(vp, &mp, V_WAIT | PCATCH)) != 0)
597                 goto unlock;
598  
599         if ((MNT_SHARED_WRITES(mp) ||
600             ((mp == NULL) && MNT_SHARED_WRITES(vp->v_mount))) &&
601             (flags & FOF_OFFSET) != 0) {
602                 lock_flags = LK_SHARED;
603         } else {
604                 lock_flags = LK_EXCLUSIVE;
605         }
606
607         vn_lock(vp, lock_flags | LK_RETRY);
608         if ((flags & FOF_OFFSET) == 0)
609                 uio->uio_offset = fp->f_offset;
610         ioflag |= sequential_heuristic(uio, fp);
611 #ifdef MAC
612         error = mac_vnode_check_write(active_cred, fp->f_cred, vp);
613         if (error == 0)
614 #endif
615                 error = VOP_WRITE(vp, uio, ioflag, fp->f_cred);
616         if ((flags & FOF_OFFSET) == 0)
617                 fp->f_offset = uio->uio_offset;
618         fp->f_nextoff = uio->uio_offset;
619         VOP_UNLOCK(vp, 0);
620         if (vp->v_type != VCHR)
621                 vn_finished_write(mp);
622 unlock:
623         VFS_UNLOCK_GIANT(vfslocked);
624         return (error);
625 }
626
627 /*
628  * File table truncate routine.
629  */
630 static int
631 vn_truncate(fp, length, active_cred, td)
632         struct file *fp;
633         off_t length;
634         struct ucred *active_cred;
635         struct thread *td;
636 {
637         struct vattr vattr;
638         struct mount *mp;
639         struct vnode *vp;
640         int vfslocked;
641         int error;
642
643         vp = fp->f_vnode;
644         vfslocked = VFS_LOCK_GIANT(vp->v_mount);
645         error = vn_start_write(vp, &mp, V_WAIT | PCATCH);
646         if (error) {
647                 VFS_UNLOCK_GIANT(vfslocked);
648                 return (error);
649         }
650         vn_lock(vp, LK_EXCLUSIVE | LK_RETRY);
651         if (vp->v_type == VDIR) {
652                 error = EISDIR;
653                 goto out;
654         }
655 #ifdef MAC
656         error = mac_vnode_check_write(active_cred, fp->f_cred, vp);
657         if (error)
658                 goto out;
659 #endif
660         error = vn_writechk(vp);
661         if (error == 0) {
662                 VATTR_NULL(&vattr);
663                 vattr.va_size = length;
664                 error = VOP_SETATTR(vp, &vattr, fp->f_cred);
665         }
666 out:
667         VOP_UNLOCK(vp, 0);
668         vn_finished_write(mp);
669         VFS_UNLOCK_GIANT(vfslocked);
670         return (error);
671 }
672
673 /*
674  * File table vnode stat routine.
675  */
676 static int
677 vn_statfile(fp, sb, active_cred, td)
678         struct file *fp;
679         struct stat *sb;
680         struct ucred *active_cred;
681         struct thread *td;
682 {
683         struct vnode *vp = fp->f_vnode;
684         int vfslocked;
685         int error;
686
687         vfslocked = VFS_LOCK_GIANT(vp->v_mount);
688         vn_lock(vp, LK_SHARED | LK_RETRY);
689         error = vn_stat(vp, sb, active_cred, fp->f_cred, td);
690         VOP_UNLOCK(vp, 0);
691         VFS_UNLOCK_GIANT(vfslocked);
692
693         return (error);
694 }
695
696 /*
697  * Stat a vnode; implementation for the stat syscall
698  */
699 int
700 vn_stat(vp, sb, active_cred, file_cred, td)
701         struct vnode *vp;
702         register struct stat *sb;
703         struct ucred *active_cred;
704         struct ucred *file_cred;
705         struct thread *td;
706 {
707         struct vattr vattr;
708         register struct vattr *vap;
709         int error;
710         u_short mode;
711
712 #ifdef MAC
713         error = mac_vnode_check_stat(active_cred, file_cred, vp);
714         if (error)
715                 return (error);
716 #endif
717
718         vap = &vattr;
719
720         /*
721          * Initialize defaults for new and unusual fields, so that file
722          * systems which don't support these fields don't need to know
723          * about them.
724          */
725         vap->va_birthtime.tv_sec = -1;
726         vap->va_birthtime.tv_nsec = 0;
727         vap->va_fsid = VNOVAL;
728         vap->va_rdev = NODEV;
729
730         error = VOP_GETATTR(vp, vap, active_cred);
731         if (error)
732                 return (error);
733
734         /*
735          * Zero the spare stat fields
736          */
737         bzero(sb, sizeof *sb);
738
739         /*
740          * Copy from vattr table
741          */
742         if (vap->va_fsid != VNOVAL)
743                 sb->st_dev = vap->va_fsid;
744         else
745                 sb->st_dev = vp->v_mount->mnt_stat.f_fsid.val[0];
746         sb->st_ino = vap->va_fileid;
747         mode = vap->va_mode;
748         switch (vap->va_type) {
749         case VREG:
750                 mode |= S_IFREG;
751                 break;
752         case VDIR:
753                 mode |= S_IFDIR;
754                 break;
755         case VBLK:
756                 mode |= S_IFBLK;
757                 break;
758         case VCHR:
759                 mode |= S_IFCHR;
760                 break;
761         case VLNK:
762                 mode |= S_IFLNK;
763                 break;
764         case VSOCK:
765                 mode |= S_IFSOCK;
766                 break;
767         case VFIFO:
768                 mode |= S_IFIFO;
769                 break;
770         default:
771                 return (EBADF);
772         };
773         sb->st_mode = mode;
774         sb->st_nlink = vap->va_nlink;
775         sb->st_uid = vap->va_uid;
776         sb->st_gid = vap->va_gid;
777         sb->st_rdev = vap->va_rdev;
778         if (vap->va_size > OFF_MAX)
779                 return (EOVERFLOW);
780         sb->st_size = vap->va_size;
781         sb->st_atimespec = vap->va_atime;
782         sb->st_mtimespec = vap->va_mtime;
783         sb->st_ctimespec = vap->va_ctime;
784         sb->st_birthtimespec = vap->va_birthtime;
785
786         /*
787          * According to www.opengroup.org, the meaning of st_blksize is 
788          *   "a filesystem-specific preferred I/O block size for this 
789          *    object.  In some filesystem types, this may vary from file
790          *    to file"
791          * Default to PAGE_SIZE after much discussion.
792          * XXX: min(PAGE_SIZE, vp->v_bufobj.bo_bsize) may be more correct.
793          */
794
795         sb->st_blksize = PAGE_SIZE;
796         
797         sb->st_flags = vap->va_flags;
798         if (priv_check(td, PRIV_VFS_GENERATION))
799                 sb->st_gen = 0;
800         else
801                 sb->st_gen = vap->va_gen;
802
803         sb->st_blocks = vap->va_bytes / S_BLKSIZE;
804         return (0);
805 }
806
807 /*
808  * File table vnode ioctl routine.
809  */
810 static int
811 vn_ioctl(fp, com, data, active_cred, td)
812         struct file *fp;
813         u_long com;
814         void *data;
815         struct ucred *active_cred;
816         struct thread *td;
817 {
818         struct vnode *vp = fp->f_vnode;
819         struct vattr vattr;
820         int vfslocked;
821         int error;
822
823         vfslocked = VFS_LOCK_GIANT(vp->v_mount);
824         error = ENOTTY;
825         switch (vp->v_type) {
826         case VREG:
827         case VDIR:
828                 if (com == FIONREAD) {
829                         vn_lock(vp, LK_EXCLUSIVE | LK_RETRY);
830                         error = VOP_GETATTR(vp, &vattr, active_cred);
831                         VOP_UNLOCK(vp, 0);
832                         if (!error)
833                                 *(int *)data = vattr.va_size - fp->f_offset;
834                 }
835                 if (com == FIONBIO || com == FIOASYNC)  /* XXX */
836                         error = 0;
837                 else
838                         error = VOP_IOCTL(vp, com, data, fp->f_flag,
839                             active_cred, td);
840                 break;
841
842         default:
843                 break;
844         }
845         VFS_UNLOCK_GIANT(vfslocked);
846         return (error);
847 }
848
849 /*
850  * File table vnode poll routine.
851  */
852 static int
853 vn_poll(fp, events, active_cred, td)
854         struct file *fp;
855         int events;
856         struct ucred *active_cred;
857         struct thread *td;
858 {
859         struct vnode *vp;
860         int vfslocked;
861         int error;
862
863         vp = fp->f_vnode;
864         vfslocked = VFS_LOCK_GIANT(vp->v_mount);
865 #ifdef MAC
866         vn_lock(vp, LK_EXCLUSIVE | LK_RETRY);
867         error = mac_vnode_check_poll(active_cred, fp->f_cred, vp);
868         VOP_UNLOCK(vp, 0);
869         if (!error)
870 #endif
871
872         error = VOP_POLL(vp, events, fp->f_cred, td);
873         VFS_UNLOCK_GIANT(vfslocked);
874         return (error);
875 }
876
877 /*
878  * Acquire the requested lock and then check for validity.  LK_RETRY
879  * permits vn_lock to return doomed vnodes.
880  */
881 int
882 _vn_lock(struct vnode *vp, int flags, char *file, int line)
883 {
884         int error;
885
886         VNASSERT((flags & LK_TYPE_MASK) != 0, vp,
887             ("vn_lock called with no locktype."));
888         do {
889 #ifdef DEBUG_VFS_LOCKS
890                 KASSERT(vp->v_holdcnt != 0,
891                     ("vn_lock %p: zero hold count", vp));
892 #endif
893                 error = VOP_LOCK1(vp, flags, file, line);
894                 flags &= ~LK_INTERLOCK; /* Interlock is always dropped. */
895                 KASSERT((flags & LK_RETRY) == 0 || error == 0,
896                     ("LK_RETRY set with incompatible flags (0x%x) or an error occured (%d)",
897                     flags, error));
898                 /*
899                  * Callers specify LK_RETRY if they wish to get dead vnodes.
900                  * If RETRY is not set, we return ENOENT instead.
901                  */
902                 if (error == 0 && vp->v_iflag & VI_DOOMED &&
903                     (flags & LK_RETRY) == 0) {
904                         VOP_UNLOCK(vp, 0);
905                         error = ENOENT;
906                         break;
907                 }
908         } while (flags & LK_RETRY && error != 0);
909         return (error);
910 }
911
912 /*
913  * File table vnode close routine.
914  */
915 static int
916 vn_closefile(fp, td)
917         struct file *fp;
918         struct thread *td;
919 {
920         struct vnode *vp;
921         struct flock lf;
922         int vfslocked;
923         int error;
924
925         vp = fp->f_vnode;
926
927         vfslocked = VFS_LOCK_GIANT(vp->v_mount);
928         if (fp->f_type == DTYPE_VNODE && fp->f_flag & FHASLOCK) {
929                 lf.l_whence = SEEK_SET;
930                 lf.l_start = 0;
931                 lf.l_len = 0;
932                 lf.l_type = F_UNLCK;
933                 (void) VOP_ADVLOCK(vp, fp, F_UNLCK, &lf, F_FLOCK);
934         }
935
936         fp->f_ops = &badfileops;
937
938         error = vn_close(vp, fp->f_flag, fp->f_cred, td);
939         VFS_UNLOCK_GIANT(vfslocked);
940         return (error);
941 }
942
943 /*
944  * Preparing to start a filesystem write operation. If the operation is
945  * permitted, then we bump the count of operations in progress and
946  * proceed. If a suspend request is in progress, we wait until the
947  * suspension is over, and then proceed.
948  */
949 int
950 vn_start_write(vp, mpp, flags)
951         struct vnode *vp;
952         struct mount **mpp;
953         int flags;
954 {
955         struct mount *mp;
956         int error;
957
958         error = 0;
959         /*
960          * If a vnode is provided, get and return the mount point that
961          * to which it will write.
962          */
963         if (vp != NULL) {
964                 if ((error = VOP_GETWRITEMOUNT(vp, mpp)) != 0) {
965                         *mpp = NULL;
966                         if (error != EOPNOTSUPP)
967                                 return (error);
968                         return (0);
969                 }
970         }
971         if ((mp = *mpp) == NULL)
972                 return (0);
973
974         /*
975          * VOP_GETWRITEMOUNT() returns with the mp refcount held through
976          * a vfs_ref().
977          * As long as a vnode is not provided we need to acquire a
978          * refcount for the provided mountpoint too, in order to
979          * emulate a vfs_ref().
980          */
981         MNT_ILOCK(mp);
982         if (vp == NULL)
983                 MNT_REF(mp);
984
985         /*
986          * Check on status of suspension.
987          */
988         if ((curthread->td_pflags & TDP_IGNSUSP) == 0 ||
989             mp->mnt_susp_owner != curthread) {
990                 while ((mp->mnt_kern_flag & MNTK_SUSPEND) != 0) {
991                         if (flags & V_NOWAIT) {
992                                 error = EWOULDBLOCK;
993                                 goto unlock;
994                         }
995                         error = msleep(&mp->mnt_flag, MNT_MTX(mp),
996                             (PUSER - 1) | (flags & PCATCH), "suspfs", 0);
997                         if (error)
998                                 goto unlock;
999                 }
1000         }
1001         if (flags & V_XSLEEP)
1002                 goto unlock;
1003         mp->mnt_writeopcount++;
1004 unlock:
1005         if (error != 0 || (flags & V_XSLEEP) != 0)
1006                 MNT_REL(mp);
1007         MNT_IUNLOCK(mp);
1008         return (error);
1009 }
1010
1011 /*
1012  * Secondary suspension. Used by operations such as vop_inactive
1013  * routines that are needed by the higher level functions. These
1014  * are allowed to proceed until all the higher level functions have
1015  * completed (indicated by mnt_writeopcount dropping to zero). At that
1016  * time, these operations are halted until the suspension is over.
1017  */
1018 int
1019 vn_start_secondary_write(vp, mpp, flags)
1020         struct vnode *vp;
1021         struct mount **mpp;
1022         int flags;
1023 {
1024         struct mount *mp;
1025         int error;
1026
1027  retry:
1028         if (vp != NULL) {
1029                 if ((error = VOP_GETWRITEMOUNT(vp, mpp)) != 0) {
1030                         *mpp = NULL;
1031                         if (error != EOPNOTSUPP)
1032                                 return (error);
1033                         return (0);
1034                 }
1035         }
1036         /*
1037          * If we are not suspended or have not yet reached suspended
1038          * mode, then let the operation proceed.
1039          */
1040         if ((mp = *mpp) == NULL)
1041                 return (0);
1042
1043         /*
1044          * VOP_GETWRITEMOUNT() returns with the mp refcount held through
1045          * a vfs_ref().
1046          * As long as a vnode is not provided we need to acquire a
1047          * refcount for the provided mountpoint too, in order to
1048          * emulate a vfs_ref().
1049          */
1050         MNT_ILOCK(mp);
1051         if (vp == NULL)
1052                 MNT_REF(mp);
1053         if ((mp->mnt_kern_flag & (MNTK_SUSPENDED | MNTK_SUSPEND2)) == 0) {
1054                 mp->mnt_secondary_writes++;
1055                 mp->mnt_secondary_accwrites++;
1056                 MNT_IUNLOCK(mp);
1057                 return (0);
1058         }
1059         if (flags & V_NOWAIT) {
1060                 MNT_REL(mp);
1061                 MNT_IUNLOCK(mp);
1062                 return (EWOULDBLOCK);
1063         }
1064         /*
1065          * Wait for the suspension to finish.
1066          */
1067         error = msleep(&mp->mnt_flag, MNT_MTX(mp),
1068                        (PUSER - 1) | (flags & PCATCH) | PDROP, "suspfs", 0);
1069         vfs_rel(mp);
1070         if (error == 0)
1071                 goto retry;
1072         return (error);
1073 }
1074
1075 /*
1076  * Filesystem write operation has completed. If we are suspending and this
1077  * operation is the last one, notify the suspender that the suspension is
1078  * now in effect.
1079  */
1080 void
1081 vn_finished_write(mp)
1082         struct mount *mp;
1083 {
1084         if (mp == NULL)
1085                 return;
1086         MNT_ILOCK(mp);
1087         MNT_REL(mp);
1088         mp->mnt_writeopcount--;
1089         if (mp->mnt_writeopcount < 0)
1090                 panic("vn_finished_write: neg cnt");
1091         if ((mp->mnt_kern_flag & MNTK_SUSPEND) != 0 &&
1092             mp->mnt_writeopcount <= 0)
1093                 wakeup(&mp->mnt_writeopcount);
1094         MNT_IUNLOCK(mp);
1095 }
1096
1097
1098 /*
1099  * Filesystem secondary write operation has completed. If we are
1100  * suspending and this operation is the last one, notify the suspender
1101  * that the suspension is now in effect.
1102  */
1103 void
1104 vn_finished_secondary_write(mp)
1105         struct mount *mp;
1106 {
1107         if (mp == NULL)
1108                 return;
1109         MNT_ILOCK(mp);
1110         MNT_REL(mp);
1111         mp->mnt_secondary_writes--;
1112         if (mp->mnt_secondary_writes < 0)
1113                 panic("vn_finished_secondary_write: neg cnt");
1114         if ((mp->mnt_kern_flag & MNTK_SUSPEND) != 0 &&
1115             mp->mnt_secondary_writes <= 0)
1116                 wakeup(&mp->mnt_secondary_writes);
1117         MNT_IUNLOCK(mp);
1118 }
1119
1120
1121
1122 /*
1123  * Request a filesystem to suspend write operations.
1124  */
1125 int
1126 vfs_write_suspend(mp)
1127         struct mount *mp;
1128 {
1129         int error;
1130
1131         MNT_ILOCK(mp);
1132         if (mp->mnt_susp_owner == curthread) {
1133                 MNT_IUNLOCK(mp);
1134                 return (EALREADY);
1135         }
1136         while (mp->mnt_kern_flag & MNTK_SUSPEND)
1137                 msleep(&mp->mnt_flag, MNT_MTX(mp), PUSER - 1, "wsuspfs", 0);
1138         mp->mnt_kern_flag |= MNTK_SUSPEND;
1139         mp->mnt_susp_owner = curthread;
1140         if (mp->mnt_writeopcount > 0)
1141                 (void) msleep(&mp->mnt_writeopcount, 
1142                     MNT_MTX(mp), (PUSER - 1)|PDROP, "suspwt", 0);
1143         else
1144                 MNT_IUNLOCK(mp);
1145         if ((error = VFS_SYNC(mp, MNT_SUSPEND)) != 0)
1146                 vfs_write_resume(mp);
1147         return (error);
1148 }
1149
1150 /*
1151  * Request a filesystem to resume write operations.
1152  */
1153 void
1154 vfs_write_resume(mp)
1155         struct mount *mp;
1156 {
1157
1158         MNT_ILOCK(mp);
1159         if ((mp->mnt_kern_flag & MNTK_SUSPEND) != 0) {
1160                 KASSERT(mp->mnt_susp_owner == curthread, ("mnt_susp_owner"));
1161                 mp->mnt_kern_flag &= ~(MNTK_SUSPEND | MNTK_SUSPEND2 |
1162                                        MNTK_SUSPENDED);
1163                 mp->mnt_susp_owner = NULL;
1164                 wakeup(&mp->mnt_writeopcount);
1165                 wakeup(&mp->mnt_flag);
1166                 curthread->td_pflags &= ~TDP_IGNSUSP;
1167                 MNT_IUNLOCK(mp);
1168                 VFS_SUSP_CLEAN(mp);
1169         } else
1170                 MNT_IUNLOCK(mp);
1171 }
1172
1173 /*
1174  * Implement kqueues for files by translating it to vnode operation.
1175  */
1176 static int
1177 vn_kqfilter(struct file *fp, struct knote *kn)
1178 {
1179         int vfslocked;
1180         int error;
1181
1182         vfslocked = VFS_LOCK_GIANT(fp->f_vnode->v_mount);
1183         error = VOP_KQFILTER(fp->f_vnode, kn);
1184         VFS_UNLOCK_GIANT(vfslocked);
1185
1186         return error;
1187 }
1188
1189 /*
1190  * Simplified in-kernel wrapper calls for extended attribute access.
1191  * Both calls pass in a NULL credential, authorizing as "kernel" access.
1192  * Set IO_NODELOCKED in ioflg if the vnode is already locked.
1193  */
1194 int
1195 vn_extattr_get(struct vnode *vp, int ioflg, int attrnamespace,
1196     const char *attrname, int *buflen, char *buf, struct thread *td)
1197 {
1198         struct uio      auio;
1199         struct iovec    iov;
1200         int     error;
1201
1202         iov.iov_len = *buflen;
1203         iov.iov_base = buf;
1204
1205         auio.uio_iov = &iov;
1206         auio.uio_iovcnt = 1;
1207         auio.uio_rw = UIO_READ;
1208         auio.uio_segflg = UIO_SYSSPACE;
1209         auio.uio_td = td;
1210         auio.uio_offset = 0;
1211         auio.uio_resid = *buflen;
1212
1213         if ((ioflg & IO_NODELOCKED) == 0)
1214                 vn_lock(vp, LK_EXCLUSIVE | LK_RETRY);
1215
1216         ASSERT_VOP_LOCKED(vp, "IO_NODELOCKED with no vp lock held");
1217
1218         /* authorize attribute retrieval as kernel */
1219         error = VOP_GETEXTATTR(vp, attrnamespace, attrname, &auio, NULL, NULL,
1220             td);
1221
1222         if ((ioflg & IO_NODELOCKED) == 0)
1223                 VOP_UNLOCK(vp, 0);
1224
1225         if (error == 0) {
1226                 *buflen = *buflen - auio.uio_resid;
1227         }
1228
1229         return (error);
1230 }
1231
1232 /*
1233  * XXX failure mode if partially written?
1234  */
1235 int
1236 vn_extattr_set(struct vnode *vp, int ioflg, int attrnamespace,
1237     const char *attrname, int buflen, char *buf, struct thread *td)
1238 {
1239         struct uio      auio;
1240         struct iovec    iov;
1241         struct mount    *mp;
1242         int     error;
1243
1244         iov.iov_len = buflen;
1245         iov.iov_base = buf;
1246
1247         auio.uio_iov = &iov;
1248         auio.uio_iovcnt = 1;
1249         auio.uio_rw = UIO_WRITE;
1250         auio.uio_segflg = UIO_SYSSPACE;
1251         auio.uio_td = td;
1252         auio.uio_offset = 0;
1253         auio.uio_resid = buflen;
1254
1255         if ((ioflg & IO_NODELOCKED) == 0) {
1256                 if ((error = vn_start_write(vp, &mp, V_WAIT)) != 0)
1257                         return (error);
1258                 vn_lock(vp, LK_EXCLUSIVE | LK_RETRY);
1259         }
1260
1261         ASSERT_VOP_LOCKED(vp, "IO_NODELOCKED with no vp lock held");
1262
1263         /* authorize attribute setting as kernel */
1264         error = VOP_SETEXTATTR(vp, attrnamespace, attrname, &auio, NULL, td);
1265
1266         if ((ioflg & IO_NODELOCKED) == 0) {
1267                 vn_finished_write(mp);
1268                 VOP_UNLOCK(vp, 0);
1269         }
1270
1271         return (error);
1272 }
1273
1274 int
1275 vn_extattr_rm(struct vnode *vp, int ioflg, int attrnamespace,
1276     const char *attrname, struct thread *td)
1277 {
1278         struct mount    *mp;
1279         int     error;
1280
1281         if ((ioflg & IO_NODELOCKED) == 0) {
1282                 if ((error = vn_start_write(vp, &mp, V_WAIT)) != 0)
1283                         return (error);
1284                 vn_lock(vp, LK_EXCLUSIVE | LK_RETRY);
1285         }
1286
1287         ASSERT_VOP_LOCKED(vp, "IO_NODELOCKED with no vp lock held");
1288
1289         /* authorize attribute removal as kernel */
1290         error = VOP_DELETEEXTATTR(vp, attrnamespace, attrname, NULL, td);
1291         if (error == EOPNOTSUPP)
1292                 error = VOP_SETEXTATTR(vp, attrnamespace, attrname, NULL,
1293                     NULL, td);
1294
1295         if ((ioflg & IO_NODELOCKED) == 0) {
1296                 vn_finished_write(mp);
1297                 VOP_UNLOCK(vp, 0);
1298         }
1299
1300         return (error);
1301 }
1302
1303 int
1304 vn_vget_ino(struct vnode *vp, ino_t ino, int lkflags, struct vnode **rvp)
1305 {
1306         struct mount *mp;
1307         int ltype, error;
1308
1309         mp = vp->v_mount;
1310         ltype = VOP_ISLOCKED(vp);
1311         KASSERT(ltype == LK_EXCLUSIVE || ltype == LK_SHARED,
1312             ("vn_vget_ino: vp not locked"));
1313         error = vfs_busy(mp, MBF_NOWAIT);
1314         if (error != 0) {
1315                 vfs_ref(mp);
1316                 VOP_UNLOCK(vp, 0);
1317                 error = vfs_busy(mp, 0);
1318                 vn_lock(vp, ltype | LK_RETRY);
1319                 vfs_rel(mp);
1320                 if (error != 0)
1321                         return (ENOENT);
1322                 if (vp->v_iflag & VI_DOOMED) {
1323                         vfs_unbusy(mp);
1324                         return (ENOENT);
1325                 }
1326         }
1327         VOP_UNLOCK(vp, 0);
1328         error = VFS_VGET(mp, ino, lkflags, rvp);
1329         vfs_unbusy(mp);
1330         vn_lock(vp, ltype | LK_RETRY);
1331         if (vp->v_iflag & VI_DOOMED) {
1332                 if (error == 0)
1333                         vput(*rvp);
1334                 error = ENOENT;
1335         }
1336         return (error);
1337 }