VFS messaging/interfacing work stage 9/99: VFS 'NEW' API WORK.
[dragonfly.git] / sys / vfs / gnu / ext2fs / ext2_vnops.c
1 /*
2  *  modified for EXT2FS support in Lites 1.1
3  *
4  *  Aug 1995, Godmar Back (gback@cs.utah.edu)
5  *  University of Utah, Department of Computer Science
6  */
7 /*
8  * Copyright (c) 1982, 1986, 1989, 1993
9  *      The Regents of the University of California.  All rights reserved.
10  * (c) UNIX System Laboratories, Inc.
11  * All or some portions of this file are derived from material licensed
12  * to the University of California by American Telephone and Telegraph
13  * Co. or Unix System Laboratories, Inc. and are reproduced herein with
14  * the permission of UNIX System Laboratories, Inc.
15  *
16  * Redistribution and use in source and binary forms, with or without
17  * modification, are permitted provided that the following conditions
18  * are met:
19  * 1. Redistributions of source code must retain the above copyright
20  *    notice, this list of conditions and the following disclaimer.
21  * 2. Redistributions in binary form must reproduce the above copyright
22  *    notice, this list of conditions and the following disclaimer in the
23  *    documentation and/or other materials provided with the distribution.
24  * 3. All advertising materials mentioning features or use of this software
25  *    must display the following acknowledgement:
26  *      This product includes software developed by the University of
27  *      California, Berkeley and its contributors.
28  * 4. Neither the name of the University nor the names of its contributors
29  *    may be used to endorse or promote products derived from this software
30  *    without specific prior written permission.
31  *
32  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
33  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
34  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
35  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
36  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
37  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
38  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
39  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
40  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
41  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
42  * SUCH DAMAGE.
43  *
44  *      @(#)ufs_vnops.c 8.27 (Berkeley) 5/27/95
45  *      @(#)ext2_vnops.c        8.7 (Berkeley) 2/3/94
46  * $FreeBSD: src/sys/gnu/ext2fs/ext2_vnops.c,v 1.51.2.2 2003/01/02 17:26:18 bde Exp $
47  * $DragonFly: src/sys/vfs/gnu/ext2fs/ext2_vnops.c,v 1.17 2004/11/12 00:09:30 dillon Exp $
48  */
49
50 #include "opt_quota.h"
51 #include "opt_suiddir.h"
52
53 #include <sys/param.h>
54 #include <sys/systm.h>
55 #include <sys/resourcevar.h>
56 #include <sys/kernel.h>
57 #include <sys/stat.h>
58 #include <sys/buf.h>
59 #include <sys/proc.h>
60 #include <sys/mount.h>
61 #include <sys/time.h>
62 #include <sys/vnode.h>
63 #include <sys/namei.h>
64
65 #include <vm/vm.h>
66 #include <vm/vm_extern.h>
67 #include <vm/vm_zone.h>
68 #include <vm/vnode_pager.h>
69 #include <sys/buf2.h>
70
71 #include <sys/signalvar.h>
72 #include <vfs/ufs/dir.h>
73 #include <vfs/ufs/quota.h>
74 #include <vfs/ufs/inode.h>
75 #include <vfs/ufs/ufsmount.h>
76 #include <vfs/ufs/ufs_extern.h>
77
78 #include "ext2_fs_sb.h"
79 #include "fs.h"
80 #include "ext2_extern.h"
81 #include "ext2_fs.h"
82
83 static int ext2_makeinode (int mode, struct vnode *, struct vnode **, struct componentname *);
84
85 static int ext2_fsync (struct vop_fsync_args *);
86 static int ext2_read (struct vop_read_args *);
87 static int ext2_write (struct vop_write_args *);
88 static int ext2_remove (struct vop_remove_args *);
89 static int ext2_link (struct vop_link_args *);
90 static int ext2_rename (struct vop_rename_args *);
91 static int ext2_mkdir (struct vop_mkdir_args *);
92 static int ext2_rmdir (struct vop_rmdir_args *);
93 static int ext2_create (struct vop_create_args *);
94 static int ext2_mknod (struct vop_mknod_args *);
95 static int ext2_symlink (struct vop_symlink_args *);
96 static int ext2_getpages (struct vop_getpages_args *);
97 static int ext2_putpages (struct vop_putpages_args *);
98
99 /* Global vfs data structures for ufs. */
100 struct vnodeopv_entry_desc ext2_vnodeop_entries[] = {
101         { &vop_default_desc,            (void *) ufs_vnoperate },
102         { &vop_fsync_desc,              (void *) ext2_fsync },
103         { &vop_inactive_desc,           (void *) ext2_inactive },
104         { &vop_lookup_desc,             (void *) ext2_lookup },
105         { &vop_read_desc,               (void *) ext2_read },
106         { &vop_readdir_desc,            (void *) ext2_readdir },
107         { &vop_reallocblks_desc,        (void *) ext2_reallocblks },
108         { &vop_write_desc,              (void *) ext2_write },
109         { &vop_remove_desc,             (void *) ext2_remove },
110         { &vop_link_desc,               (void *) ext2_link },
111         { &vop_rename_desc,             (void *) ext2_rename },
112         { &vop_mkdir_desc,              (void *) ext2_mkdir },
113         { &vop_rmdir_desc,              (void *) ext2_rmdir },
114         { &vop_create_desc,             (void *) ext2_create },
115         { &vop_mknod_desc,              (void *) ext2_mknod },
116         { &vop_symlink_desc,            (void *) ext2_symlink },
117         { &vop_getpages_desc,           (void *) ext2_getpages },
118         { &vop_putpages_desc,           (void *) ext2_putpages },
119         { NULL, NULL }
120 };
121
122 struct vnodeopv_entry_desc ext2_specop_entries[] = {
123         { &vop_default_desc,            (void *) ufs_vnoperatespec },
124         { &vop_fsync_desc,              (void *) ext2_fsync },
125         { &vop_inactive_desc,           (void *) ext2_inactive },
126         { NULL, NULL }
127 };
128
129 struct vnodeopv_entry_desc ext2_fifoop_entries[] = {
130         { &vop_default_desc,            (void *) ufs_vnoperatefifo },
131         { &vop_fsync_desc,              (void *) ext2_fsync },
132         { &vop_inactive_desc,           (void *) ext2_inactive },
133         { NULL, NULL }
134 };
135
136 #include "ext2_readwrite.c"
137
138 /*
139  * A virgin directory (no blushing please).
140  * Note that the type and namlen fields are reversed relative to ufs.
141  * Also, we don't use `struct odirtemplate', since it would just cause
142  * endianness problems.
143  */
144 static struct dirtemplate mastertemplate = {
145         0, 12, 1, EXT2_FT_DIR, ".",
146         0, DIRBLKSIZ - 12, 2, EXT2_FT_DIR, ".."
147 };
148 static struct dirtemplate omastertemplate = {
149         0, 12, 1, EXT2_FT_UNKNOWN, ".",
150         0, DIRBLKSIZ - 12, 2, EXT2_FT_UNKNOWN, ".."
151 };
152
153 /*
154  * Create a regular file
155  *
156  * ext2_create(struct vnode *a_dvp, struct vnode **a_vpp,
157  *             struct componentname *a_cnp, struct vattr *a_vap)
158  */
159 static int
160 ext2_create(struct vop_create_args *ap)
161 {
162         int error;
163
164         error =
165             ext2_makeinode(MAKEIMODE(ap->a_vap->va_type, ap->a_vap->va_mode),
166             ap->a_dvp, ap->a_vpp, ap->a_cnp);
167         if (error)
168                 return (error);
169         return (0);
170 }
171
172 /*
173  * Synch an open file.
174  *
175  * ext2_fsync(struct vnode *a_vp, struct ucred *a_cred, int a_waitfor,
176  *            struct proc *a_p)
177  */
178 /* ARGSUSED */
179 static int
180 ext2_fsync(struct vop_fsync_args *ap)
181 {
182         struct vnode *vp = ap->a_vp;
183         struct buf *bp;
184         struct buf *nbp;
185         int s;
186
187         /* 
188          * XXX why is all this fs specific?
189          */
190
191         /*
192          * Flush all dirty buffers associated with a vnode.
193          */
194         ext2_discard_prealloc(VTOI(vp));
195
196 loop:
197         s = splbio();
198         for (bp = TAILQ_FIRST(&vp->v_dirtyblkhd); bp; bp = nbp) {
199                 nbp = TAILQ_NEXT(bp, b_vnbufs);
200                 if (BUF_LOCK(bp, LK_EXCLUSIVE | LK_NOWAIT))
201                         continue;
202                 if ((bp->b_flags & B_DELWRI) == 0)
203                         panic("ext2_fsync: not dirty");
204                 bremfree(bp);
205                 splx(s);
206                 /*
207                  * Wait for I/O associated with indirect blocks to complete,
208                  * since there is no way to quickly wait for them below.
209                  */
210                 if (bp->b_vp == vp || ap->a_waitfor == MNT_NOWAIT)
211                         (void) bawrite(bp);
212                 else
213                         (void) bwrite(bp);
214                 goto loop;
215         }
216         if (ap->a_waitfor == MNT_WAIT) {
217                 while (vp->v_numoutput) {
218                         vp->v_flag |= VBWAIT;
219                         tsleep(&vp->v_numoutput, 0, "e2fsyn", 0);
220                 }
221 #if DIAGNOSTIC
222                 if (!TAILQ_EMPTY(&vp->v_dirtyblkhd)) {
223                         vprint("ext2_fsync: dirty", vp);
224                         goto loop;
225                 }
226 #endif
227         }
228         splx(s);
229         return (UFS_UPDATE(ap->a_vp, ap->a_waitfor == MNT_WAIT));
230 }
231
232 /*
233  * Mknod vnode call
234  *
235  * ext2_mknod(struct vnode *a_dvp, struct vnode **a_vpp,
236  *            struct componentname *a_cnp, struct vattr *a_vap)
237  */
238 /* ARGSUSED */
239 static int
240 ext2_mknod(struct vop_mknod_args *ap)
241 {
242         struct vattr *vap = ap->a_vap;
243         struct vnode **vpp = ap->a_vpp;
244         struct inode *ip;
245         ino_t ino;
246         int error;
247
248         error = ext2_makeinode(MAKEIMODE(vap->va_type, vap->va_mode),
249             ap->a_dvp, vpp, ap->a_cnp);
250         if (error)
251                 return (error);
252         ip = VTOI(*vpp);
253         ip->i_flag |= IN_ACCESS | IN_CHANGE | IN_UPDATE;
254         if (vap->va_rdev != VNOVAL) {
255                 /*
256                  * Want to be able to use this to make badblock
257                  * inodes, so don't truncate the dev number.
258                  */
259                 ip->i_rdev = vap->va_rdev;
260         }
261         /*
262          * Remove inode, then reload it through VFS_VGET so it is
263          * checked to see if it is an alias of an existing entry in
264          * the inode cache.
265          */
266         (*vpp)->v_type = VNON;
267         ino = ip->i_number;     /* Save this before vgone() invalidates ip. */
268         vgone(*vpp);
269         vput(*vpp);
270         error = VFS_VGET(ap->a_dvp->v_mount, ino, vpp);
271         if (error) {
272                 *vpp = NULL;
273                 return (error);
274         }
275         return (0);
276 }
277
278 /*
279  * ext2_remove(struct vnode *a_dvp, struct vnode *a_vp,
280  *             struct componentname *a_cnp)
281  */
282 static int
283 ext2_remove(struct vop_remove_args *ap)
284 {
285         struct inode *ip;
286         struct vnode *vp = ap->a_vp;
287         struct vnode *dvp = ap->a_dvp;
288         int error;
289
290         ip = VTOI(vp);
291         if ((ip->i_flags & (NOUNLINK | IMMUTABLE | APPEND)) ||
292             (VTOI(dvp)->i_flags & APPEND)) {
293                 error = EPERM;
294                 goto out;
295         }
296         error = ext2_dirremove(dvp, ap->a_cnp);
297         if (error == 0) {
298                 ip->i_nlink--;
299                 ip->i_flag |= IN_CHANGE;
300         }
301 out:
302         return (error);
303 }
304
305 /*
306  * link vnode call
307  *
308  * ext2_link(struct vnode *a_tdvp, struct vnode *a_vp,
309  *           struct componentname *a_cnp)
310  */
311 static int
312 ext2_link(struct vop_link_args *ap)
313 {
314         struct vnode *vp = ap->a_vp;
315         struct vnode *tdvp = ap->a_tdvp;
316         struct componentname *cnp = ap->a_cnp;
317         struct thread *td = cnp->cn_td;
318         struct inode *ip;
319         int error;
320
321         if (tdvp->v_mount != vp->v_mount) {
322                 error = EXDEV;
323                 goto out2;
324         }
325         if (tdvp != vp && (error = vn_lock(vp, LK_EXCLUSIVE, td))) {
326                 goto out2;
327         }
328         ip = VTOI(vp);
329         if ((nlink_t)ip->i_nlink >= LINK_MAX) {
330                 error = EMLINK;
331                 goto out1;
332         }
333         if (ip->i_flags & (IMMUTABLE | APPEND)) {
334                 error = EPERM;
335                 goto out1;
336         }
337         ip->i_nlink++;
338         ip->i_flag |= IN_CHANGE;
339         error = UFS_UPDATE(vp, 1);
340         if (!error)
341                 error = ext2_direnter(ip, tdvp, cnp);
342         if (error) {
343                 ip->i_nlink--;
344                 ip->i_flag |= IN_CHANGE;
345         }
346 out1:
347         if (tdvp != vp)
348                 VOP_UNLOCK(vp, 0, td);
349 out2:
350         return (error);
351 }
352
353 /*
354  * Rename system call.  fdvp, fvp are ref'd.  tvp, tdvp are ref'd and locked.
355  * all vp's are released and must be in an unlocked state on return.
356  *
357  * ext2_rename(struct vnode *a_fdvp, struct vnode *a_fvp,
358  *              struct componentname *a_fcnp, struct vnode *a_tdvp,
359  *              struct vnode *a_tvp, struct componentname *a_tcnp)
360  */
361 static int
362 ext2_rename(struct vop_rename_args *ap)
363 {
364         struct vnode *tvp = ap->a_tvp;
365         struct vnode *tdvp = ap->a_tdvp;
366         struct vnode *fvp = ap->a_fvp;
367         struct vnode *fdvp = ap->a_fdvp;
368         struct componentname *tcnp = ap->a_tcnp;
369         struct componentname *fcnp = ap->a_fcnp;
370         struct thread *td = fcnp->cn_td;
371         struct inode *ip, *xp, *dp;
372         struct dirtemplate dirbuf;
373         int doingdirectory = 0, oldparent = 0, newparent = 0;
374         int error = 0;
375         u_char namlen;
376
377         /*
378          * Check for cross-device rename.
379          */
380         if ((fvp->v_mount != tdvp->v_mount) ||
381             (tvp && (fvp->v_mount != tvp->v_mount)) ||
382             tvp == tdvp) {
383                 error = EXDEV;
384 abortit:
385                 if (tdvp == tvp)
386                         vrele(tdvp);
387                 else
388                         vput(tdvp);
389                 if (tvp)
390                         vput(tvp);
391                 vrele(fdvp);
392                 vrele(fvp);
393                 return (error);
394         }
395
396         if (tvp && ((VTOI(tvp)->i_flags & (NOUNLINK | IMMUTABLE | APPEND)) ||
397             (VTOI(tdvp)->i_flags & APPEND))) {
398                 error = EPERM;
399                 goto abortit;
400         }
401
402         /*
403          * Renaming a file to itself has no effect.  The upper layers should
404          * not call us in that case.  Temporarily just warn if they do.
405          */
406         if (fvp == tvp) {
407                 error = 0;
408                 goto abortit;
409         }
410
411         if ((error = vn_lock(fvp, LK_EXCLUSIVE, td)) != 0)
412                 goto abortit;
413
414         /*
415          * fvp, tvp, tdvp locked.  fdvp not locked but note that fdvp may
416          * be equal to tdvp.
417          */
418         dp = VTOI(fdvp);
419         ip = VTOI(fvp);
420         if (ip->i_nlink >= LINK_MAX) {
421                 VOP_UNLOCK(fvp, 0, td);
422                 error = EMLINK;
423                 goto abortit;
424         }
425         if ((ip->i_flags & (NOUNLINK | IMMUTABLE | APPEND))
426             || (dp->i_flags & APPEND)) {
427                 VOP_UNLOCK(fvp, 0, td);
428                 error = EPERM;
429                 goto abortit;
430         }
431         if ((ip->i_mode & IFMT) == IFDIR) {
432                 /*
433                  * Avoid ".", "..", and aliases of "." for obvious reasons.
434                  */
435                 if ((fcnp->cn_namelen == 1 && fcnp->cn_nameptr[0] == '.') ||
436                     dp == ip || (fcnp->cn_flags | tcnp->cn_flags) & CNP_ISDOTDOT ||
437                     (ip->i_flag & IN_RENAME)) {
438                         VOP_UNLOCK(fvp, 0, td);
439                         error = EINVAL;
440                         goto abortit;
441                 }
442                 ip->i_flag |= IN_RENAME;
443                 oldparent = dp->i_number;
444                 doingdirectory++;
445         }
446
447         /*
448          * tvp is non-NULL if the target exists.   fvp is still locked but
449          * we will unlock it soon.  The 'bad' goto target requires dp and
450          * xp to be correctly assigned.
451          */
452         dp = VTOI(tdvp);
453         if (tvp)
454                 xp = VTOI(tvp);
455         else
456                 xp = NULL;
457
458         /*
459          * 1) Bump link count while we're moving stuff
460          *    around.  If we crash somewhere before
461          *    completing our work, the link count
462          *    may be wrong, but correctable.
463          */
464         ip->i_nlink++;
465         ip->i_flag |= IN_CHANGE;
466         if ((error = UFS_UPDATE(fvp, 1)) != 0) {
467                 VOP_UNLOCK(fvp, 0, td);
468                 goto bad;
469         }
470
471         /*
472          * If ".." must be changed (ie the directory gets a new
473          * parent) then the source directory must not be in the
474          * directory heirarchy above the target, as this would
475          * orphan everything below the source directory. Also
476          * the user must have write permission in the source so
477          * as to be able to change "..". We must repeat the call
478          * to namei, as the parent directory is unlocked by the
479          * call to checkpath().
480          */
481         error = VOP_ACCESS(fvp, VWRITE, tcnp->cn_cred, tcnp->cn_td);
482         VOP_UNLOCK(fvp, 0, td);
483
484         /*
485          * tvp (if not NULL) and tdvp are locked.  fvp and fdvp are not.
486          * dp and xp are set according to tdvp and tvp.
487          */
488         if (oldparent != dp->i_number)
489                 newparent = dp->i_number;
490         if (doingdirectory && newparent) {
491                 if (error)      /* write access check above */
492                         goto bad;
493
494                 /*
495                  * Prepare for relookup, get rid of xp
496                  */
497                 if (xp != NULL) {
498                         vput(tvp);
499                         xp = NULL;
500                 }
501
502                 /*
503                  * checkpath vput()'s tdvp (VTOI(dp)) on return no matter what,
504                  * get an extra ref so we wind up with just an unlocked, ref'd
505                  * tdvp.  The 'out' target skips xp and tdvp cleanups.  Our
506                  * tdvp is now unlocked so we have to clean it up ourselves.
507                  */
508                 vref(tdvp);
509                 error = ext2_checkpath(ip, dp, tcnp->cn_cred);
510                 if (error) {
511                         vrele(tdvp);
512                         goto out;
513                 }
514                 /*
515                  * relookup no longer messes with the ref count.  An unlocked
516                  * tdvp must be passed and if no error occurs a locked tdvp
517                  * will be returned.  We have to use the out target again.
518                  */
519                 error = relookup(tdvp, &tvp, tcnp);
520                 if (error) {
521                         if (tcnp->cn_flags & CNP_PDIRUNLOCK)
522                                 vrele(tdvp);
523                         else
524                                 vput(tdvp);
525                         goto out;
526                 }
527
528                 /*
529                  * tdvp is locked at this point.  in the RENAME case tvp may
530                  * be NULL without an error, assign xp accordingly.  The
531                  * 'bad' target can be used again after this.
532                  */
533                 dp = VTOI(tdvp);
534                 if (tvp)
535                         xp = VTOI(tvp);
536         }
537         /*
538          * 2) If target doesn't exist, link the target
539          *    to the source and unlink the source.
540          *    Otherwise, rewrite the target directory
541          *    entry to reference the source inode and
542          *    expunge the original entry's existence.
543          *
544          * tdvp and tvp are cleaned up by this code.  tvp is only good if
545          * xp is not NULL.
546          */
547         if (xp == NULL) {
548                 if (dp->i_dev != ip->i_dev)
549                         panic("ufs_rename: EXDEV");
550                 /*
551                  * Account for ".." in new directory.
552                  * When source and destination have the same
553                  * parent we don't fool with the link count.
554                  */
555                 if (doingdirectory && newparent) {
556                         if ((nlink_t)dp->i_nlink >= LINK_MAX) {
557                                 error = EMLINK;
558                                 goto bad;
559                         }
560                         dp->i_nlink++;
561                         dp->i_flag |= IN_CHANGE;
562                         error = UFS_UPDATE(tdvp, 1);
563                         if (error)
564                                 goto bad;
565                 }
566                 error = ext2_direnter(ip, tdvp, tcnp);
567                 if (error) {
568                         if (doingdirectory && newparent) {
569                                 dp->i_nlink--;
570                                 dp->i_flag |= IN_CHANGE;
571                                 (void)UFS_UPDATE(tdvp, 1);
572                         }
573                         goto bad;
574                 }
575
576                 /*
577                  * manual cleanup, we can't use the bad or out target after
578                  * this.
579                  */
580                 vput(tdvp);
581         } else {
582                 if (xp->i_dev != dp->i_dev || xp->i_dev != ip->i_dev)
583                         panic("ufs_rename: EXDEV");
584                 /*
585                  * Short circuit rename(foo, foo).
586                  */
587                 if (xp->i_number == ip->i_number)
588                         panic("ufs_rename: same file");
589                 /*
590                  * If the parent directory is "sticky", then the user must
591                  * own the parent directory, or the destination of the rename,
592                  * otherwise the destination may not be changed (except by
593                  * root). This implements append-only directories.
594                  */
595                 if ((dp->i_mode & S_ISTXT) && tcnp->cn_cred->cr_uid != 0 &&
596                     tcnp->cn_cred->cr_uid != dp->i_uid &&
597                     xp->i_uid != tcnp->cn_cred->cr_uid) {
598                         error = EPERM;
599                         goto bad;
600                 }
601                 /*
602                  * Target must be empty if a directory and have no links
603                  * to it. Also, ensure source and target are compatible
604                  * (both directories, or both not directories).
605                  */
606                 if ((xp->i_mode&IFMT) == IFDIR) {
607                         if (! ext2_dirempty(xp, dp->i_number, tcnp->cn_cred) || 
608                             xp->i_nlink > 2) {
609                                 error = ENOTEMPTY;
610                                 goto bad;
611                         }
612                         if (!doingdirectory) {
613                                 error = ENOTDIR;
614                                 goto bad;
615                         }
616                 } else if (doingdirectory) {
617                         error = EISDIR;
618                         goto bad;
619                 }
620                 error = ext2_dirrewrite(dp, ip, tcnp);
621                 if (error)
622                         goto bad;
623                 /*
624                  * If the target directory is in the same
625                  * directory as the source directory,
626                  * decrement the link count on the parent
627                  * of the target directory.
628                  */
629                  if (doingdirectory && !newparent) {
630                         dp->i_nlink--;
631                         dp->i_flag |= IN_CHANGE;
632                 }
633
634                 /*
635                  * manual cleanup, we can't use the bad or out target after
636                  * this.
637                  */
638                 vput(tdvp);
639
640                 /*
641                  * Adjust the link count of the target to
642                  * reflect the dirrewrite above.  If this is
643                  * a directory it is empty and there are
644                  * no links to it, so we can squash the inode and
645                  * any space associated with it.  We disallowed
646                  * renaming over top of a directory with links to
647                  * it above, as the remaining link would point to
648                  * a directory without "." or ".." entries.
649                  */
650                 xp->i_nlink--;
651                 if (doingdirectory) {
652                         if (--xp->i_nlink != 0)
653                                 panic("ufs_rename: linked directory");
654                         error = UFS_TRUNCATE(tvp, (off_t)0, IO_SYNC,
655                             tcnp->cn_cred, tcnp->cn_td);
656                 }
657                 xp->i_flag |= IN_CHANGE;
658                 vput(tvp);
659                 xp = NULL;
660         }
661
662         /*
663          * tvp and tdvp have been cleaned up.  The bad and out targets may
664          * not be used.  fvp and fdvp are ref'd but not locked.  ip
665          * still represents the old fvp and ip->i_flag may still have IN_RENAME
666          * set (if doingdirectory).
667          */
668
669         /*
670          * 3) Unlink the source.
671          *
672          * fdvp is locked and ref'd. ap->a_fvp holds the old lookup unlocked
673          * and ref'd, fvp will hold the new lookup locked and ref'd.
674          *
675          * After the relookup ap->a_fvp must be released as part of our
676          * cleanup, not just fdvp and fvp.  And, on success, fdvp and
677          * fvp will be locked so the bad and out targets cannot be used.
678          */
679         fcnp->cn_flags &= ~CNP_MODMASK;
680         fcnp->cn_flags |= CNP_LOCKPARENT;
681         KKASSERT(fcnp->cn_flags & CNP_PDIRUNLOCK);
682         error = relookup(fdvp, &fvp, fcnp);
683         if (error) {
684                 /*
685                  * From name has disappeared.
686                  */
687                 if (doingdirectory)
688                         panic("ufs_rename: lost dir entry");
689                 /* ip->i_flag only sets IN_RENAME if doingdirectory */
690                 vrele(ap->a_fvp);
691                 if (fcnp->cn_flags & CNP_PDIRUNLOCK)
692                         vrele(fdvp);
693                 else
694                         vput(fdvp);
695                 return (0);
696         }
697         KKASSERT((fcnp->cn_flags & CNP_PDIRUNLOCK) == 0);
698
699         /*
700          * This case shouldn't occur
701          */
702         if (fvp == NULL) {
703                 /*
704                  * From name has disappeared.
705                  */
706                 if (doingdirectory)
707                         panic("ufs_rename: lost dir entry");
708                 /* ip->i_flag only sets IN_RENAME if doingdirectory */
709                 vrele(ap->a_fvp);
710                 vput(fvp);
711                 vput(fdvp);
712                 return (0);
713         }
714
715         /*
716          * fvp and fdvp are both ref'd and locked.
717          */
718         xp = VTOI(fvp);
719         dp = VTOI(fdvp);
720
721         /*
722          * Ensure that the directory entry still exists and has not
723          * changed while the new name has been entered. If the source is
724          * a file then the entry may have been unlinked or renamed. In
725          * either case there is no further work to be done. If the source
726          * is a directory then it cannot have been rmdir'ed; its link
727          * count of three would cause a rmdir to fail with ENOTEMPTY.
728          * The IN_RENAME flag ensures that it cannot be moved by another
729          * rename.
730          */
731         if (xp != ip) {
732                 if (doingdirectory)
733                         panic("ufs_rename: lost dir entry");
734                 /* ip->i_flag only sets IN_RENAME if doingdirectory */
735         } else {
736                 /*
737                  * If the source is a directory with a
738                  * new parent, the link count of the old
739                  * parent directory must be decremented
740                  * and ".." set to point to the new parent.
741                  */
742                 if (doingdirectory && newparent) {
743                         dp->i_nlink--;
744                         dp->i_flag |= IN_CHANGE;
745                         error = vn_rdwr(UIO_READ, fvp, (caddr_t)&dirbuf,
746                                 sizeof (struct dirtemplate), (off_t)0,
747                                 UIO_SYSSPACE, IO_NODELOCKED,
748                                 tcnp->cn_cred, (int *)0, NULL);
749                         if (error == 0) {
750                                 /* Like ufs little-endian: */
751                                 namlen = dirbuf.dotdot_type;
752                                 if (namlen != 2 ||
753                                     dirbuf.dotdot_name[0] != '.' ||
754                                     dirbuf.dotdot_name[1] != '.') {
755                                         ufs_dirbad(xp, (doff_t)12,
756                                             "rename: mangled dir");
757                                 } else {
758                                         dirbuf.dotdot_ino = newparent;
759                                         (void) vn_rdwr(UIO_WRITE, fvp,
760                                             (caddr_t)&dirbuf,
761                                             sizeof (struct dirtemplate),
762                                             (off_t)0, UIO_SYSSPACE,
763                                             IO_NODELOCKED|IO_SYNC,
764                                             tcnp->cn_cred, (int *)0,
765                                             NULL);
766                                 }
767                         }
768                 }
769                 error = ext2_dirremove(fdvp, fcnp);
770                 if (!error) {
771                         xp->i_nlink--;
772                         xp->i_flag |= IN_CHANGE;
773                 }
774                 xp->i_flag &= ~IN_RENAME;
775         }
776         vput(fdvp);
777         vput(fvp);
778         vrele(ap->a_fvp);
779         return (error);
780
781 bad:
782         if (xp)
783                 vput(ITOV(xp));
784         if (dp)
785                 vput(ITOV(dp));
786 out:
787         if (doingdirectory)
788                 ip->i_flag &= ~IN_RENAME;
789         if (vn_lock(fvp, LK_EXCLUSIVE, td) == 0) {
790                 ip->i_nlink--;
791                 ip->i_flag |= IN_CHANGE;
792                 ip->i_flag &= ~IN_RENAME;
793                 vput(fvp);
794         } else {
795                 vrele(fvp);
796         }
797         return (error);
798 }
799
800 /*
801  * Mkdir system call
802  *
803  * ext2_mkdir(struct vnode *a_dvp, struct vnode **a_vpp,
804  *            struct componentname *a_cnp, struct vattr *a_vap)
805  */
806 static int
807 ext2_mkdir(struct vop_mkdir_args *ap)
808 {
809         struct vnode *dvp = ap->a_dvp;
810         struct vattr *vap = ap->a_vap;
811         struct componentname *cnp = ap->a_cnp;
812         struct inode *ip, *dp;
813         struct vnode *tvp;
814         struct dirtemplate dirtemplate, *dtp;
815         int error, dmode;
816
817         dp = VTOI(dvp);
818         if ((nlink_t)dp->i_nlink >= LINK_MAX) {
819                 error = EMLINK;
820                 goto out;
821         }
822         dmode = vap->va_mode & 0777;
823         dmode |= IFDIR;
824         /*
825          * Must simulate part of ext2_makeinode here to acquire the inode,
826          * but not have it entered in the parent directory. The entry is
827          * made later after writing "." and ".." entries.
828          */
829         error = UFS_VALLOC(dvp, dmode, cnp->cn_cred, &tvp);
830         if (error)
831                 goto out;
832         ip = VTOI(tvp);
833         ip->i_gid = dp->i_gid;
834 #ifdef SUIDDIR
835         {
836 #ifdef QUOTA
837                 struct ucred ucred, *ucp;
838                 ucp = cnp->cn_cred;
839 #endif
840                 /*
841                  * if we are hacking owners here, (only do this where told to)
842                  * and we are not giving it TOO root, (would subvert quotas)
843                  * then go ahead and give it to the other user.
844                  * The new directory also inherits the SUID bit. 
845                  * If user's UID and dir UID are the same,
846                  * 'give it away' so that the SUID is still forced on.
847                  */
848                 if ( (dvp->v_mount->mnt_flag & MNT_SUIDDIR) &&
849                    (dp->i_mode & ISUID) && dp->i_uid) {
850                         dmode |= ISUID;
851                         ip->i_uid = dp->i_uid;
852 #ifdef QUOTA
853                         if (dp->i_uid != cnp->cn_cred->cr_uid) {
854                                 /*
855                                  * make sure the correct user gets charged
856                                  * for the space.
857                                  * Make a dummy credential for the victim.
858                                  * XXX This seems to never be accessed out of
859                                  * our context so a stack variable is ok.
860                                  */
861                                 ucred.cr_ref = 1;
862                                 ucred.cr_uid = ip->i_uid;
863                                 ucred.cr_ngroups = 1;
864                                 ucred.cr_groups[0] = dp->i_gid;
865                                 ucp = &ucred;
866                         }
867 #endif
868                 } else {
869                         ip->i_uid = cnp->cn_cred->cr_uid;
870                 }
871 #ifdef QUOTA
872                 if ((error = getinoquota(ip)) ||
873                 (error = chkiq(ip, 1, ucp, 0))) {
874                         UFS_VFREE(tvp, ip->i_number, dmode);
875                         vput(tvp);
876                         return (error);
877                 }
878 #endif
879         }
880 #else
881         ip->i_uid = cnp->cn_cred->cr_uid;
882 #ifdef QUOTA
883         if ((error = getinoquota(ip)) ||
884             (error = chkiq(ip, 1, cnp->cn_cred, 0))) {
885                 UFS_VFREE(tvp, ip->i_number, dmode);
886                 vput(tvp);
887                 return (error);
888         }
889 #endif
890 #endif
891         ip->i_flag |= IN_ACCESS | IN_CHANGE | IN_UPDATE;
892         ip->i_mode = dmode;
893         tvp->v_type = VDIR;     /* Rest init'd in getnewvnode(). */
894         ip->i_nlink = 2;
895         if (cnp->cn_flags & CNP_ISWHITEOUT)
896                 ip->i_flags |= UF_OPAQUE;
897         error = UFS_UPDATE(tvp, 1);
898
899         /*
900          * Bump link count in parent directory
901          * to reflect work done below.  Should
902          * be done before reference is created
903          * so reparation is possible if we crash.
904          */
905         dp->i_nlink++;
906         dp->i_flag |= IN_CHANGE;
907         error = UFS_UPDATE(dvp, 1);
908         if (error)
909                 goto bad;
910
911         /* Initialize directory with "." and ".." from static template. */
912         if (EXT2_HAS_INCOMPAT_FEATURE(ip->i_e2fs->s_es,
913             EXT2_FEATURE_INCOMPAT_FILETYPE))
914                 dtp = &mastertemplate;
915         else
916                 dtp = &omastertemplate;
917         dirtemplate = *dtp;
918         dirtemplate.dot_ino = ip->i_number;
919         dirtemplate.dotdot_ino = dp->i_number;
920         /* note that in ext2 DIRBLKSIZ == blocksize, not DEV_BSIZE 
921          * so let's just redefine it - for this function only
922          */
923 #undef  DIRBLKSIZ 
924 #define DIRBLKSIZ  VTOI(dvp)->i_e2fs->s_blocksize
925         dirtemplate.dotdot_reclen = DIRBLKSIZ - 12;
926         error = vn_rdwr(UIO_WRITE, tvp, (caddr_t)&dirtemplate,
927             sizeof (dirtemplate), (off_t)0, UIO_SYSSPACE,
928             IO_NODELOCKED|IO_SYNC, cnp->cn_cred, (int *)0, NULL);
929         if (error) {
930                 dp->i_nlink--;
931                 dp->i_flag |= IN_CHANGE;
932                 goto bad;
933         }
934         if (DIRBLKSIZ > VFSTOUFS(dvp->v_mount)->um_mountp->mnt_stat.f_bsize)
935                 panic("ufs_mkdir: blksize"); /* XXX should grow with balloc() */
936         else {
937                 ip->i_size = DIRBLKSIZ;
938                 ip->i_flag |= IN_CHANGE;
939         }
940
941         /* Directory set up, now install its entry in the parent directory. */
942         error = ext2_direnter(ip, dvp, cnp);
943         if (error) {
944                 dp->i_nlink--;
945                 dp->i_flag |= IN_CHANGE;
946         }
947 bad:
948         /*
949          * No need to do an explicit VOP_TRUNCATE here, vrele will do this
950          * for us because we set the link count to 0.
951          */
952         if (error) {
953                 ip->i_nlink = 0;
954                 ip->i_flag |= IN_CHANGE;
955                 vput(tvp);
956         } else
957                 *ap->a_vpp = tvp;
958 out:
959         return (error);
960 #undef  DIRBLKSIZ
961 #define DIRBLKSIZ  DEV_BSIZE
962 }
963
964 /*
965  * Rmdir system call.
966  *
967  * ext2_rmdir(struct vnode *a_dvp, struct vnode *a_vp,
968  *            struct componentname *a_cnp)
969  */
970 static int
971 ext2_rmdir(struct vop_rmdir_args *ap)
972 {
973         struct vnode *vp = ap->a_vp;
974         struct vnode *dvp = ap->a_dvp;
975         struct componentname *cnp = ap->a_cnp;
976         struct thread *td = cnp->cn_td;
977         struct inode *ip, *dp;
978         int error;
979
980         ip = VTOI(vp);
981         dp = VTOI(dvp);
982
983         /*
984          * Verify the directory is empty (and valid).
985          * (Rmdir ".." won't be valid since
986          *  ".." will contain a reference to
987          *  the current directory and thus be
988          *  non-empty.)
989          */
990         error = 0;
991         if (ip->i_nlink != 2 || !ext2_dirempty(ip, dp->i_number, cnp->cn_cred)) {
992                 error = ENOTEMPTY;
993                 goto out;
994         }
995         if ((dp->i_flags & APPEND)
996             || (ip->i_flags & (NOUNLINK | IMMUTABLE | APPEND))) {
997                 error = EPERM;
998                 goto out;
999         }
1000         /*
1001          * Delete reference to directory before purging
1002          * inode.  If we crash in between, the directory
1003          * will be reattached to lost+found,
1004          */
1005         error = ext2_dirremove(dvp, cnp);
1006         if (error)
1007                 goto out;
1008         dp->i_nlink--;
1009         dp->i_flag |= IN_CHANGE;
1010         VOP_UNLOCK(dvp, 0, td);
1011         /*
1012          * Truncate inode.  The only stuff left
1013          * in the directory is "." and "..".  The
1014          * "." reference is inconsequential since
1015          * we're quashing it.  The ".." reference
1016          * has already been adjusted above.  We've
1017          * removed the "." reference and the reference
1018          * in the parent directory, but there may be
1019          * other hard links so decrement by 2 and
1020          * worry about them later.
1021          */
1022         ip->i_nlink -= 2;
1023         error = UFS_TRUNCATE(vp, (off_t)0, IO_SYNC, cnp->cn_cred, td);
1024         vn_lock(dvp, LK_EXCLUSIVE | LK_RETRY, td);
1025 out:
1026         return (error);
1027 }
1028
1029 /*
1030  * symlink -- make a symbolic link
1031  *
1032  * ext2_symlink(struct vnode *a_dvp, struct vnode **a_vpp,
1033  *              struct componentname *a_cnp, struct vattr *a_vap,
1034  *              char *a_target)
1035  */
1036 static int
1037 ext2_symlink(struct vop_symlink_args *ap)
1038 {
1039         struct vnode *vp, **vpp = ap->a_vpp;
1040         struct inode *ip;
1041         int len, error;
1042
1043         error = ext2_makeinode(IFLNK | ap->a_vap->va_mode, ap->a_dvp,
1044             vpp, ap->a_cnp);
1045         if (error)
1046                 return (error);
1047         vp = *vpp;
1048         len = strlen(ap->a_target);
1049         if (len < vp->v_mount->mnt_maxsymlinklen) {
1050                 ip = VTOI(vp);
1051                 bcopy(ap->a_target, (char *)ip->i_shortlink, len);
1052                 ip->i_size = len;
1053                 ip->i_flag |= IN_CHANGE | IN_UPDATE;
1054         } else
1055                 error = vn_rdwr(UIO_WRITE, vp, ap->a_target, len, (off_t)0,
1056                     UIO_SYSSPACE, IO_NODELOCKED, ap->a_cnp->cn_cred, (int *)0,
1057                     NULL);
1058         if (error)
1059                 vput(vp);
1060         return (error);
1061 }
1062
1063 /*
1064  * Allocate a new inode.
1065  */
1066 static int
1067 ext2_makeinode(int mode, struct vnode *dvp, struct vnode **vpp,
1068                struct componentname *cnp)
1069 {
1070         struct inode *ip, *pdir;
1071         struct vnode *tvp;
1072         int error;
1073
1074         pdir = VTOI(dvp);
1075         *vpp = NULL;
1076         if ((mode & IFMT) == 0)
1077                 mode |= IFREG;
1078
1079         error = UFS_VALLOC(dvp, mode, cnp->cn_cred, &tvp);
1080         if (error) {
1081                 return (error);
1082         }
1083         ip = VTOI(tvp);
1084         ip->i_gid = pdir->i_gid;
1085 #ifdef SUIDDIR
1086         {
1087 #ifdef QUOTA
1088                 struct ucred ucred, *ucp;
1089                 ucp = cnp->cn_cred;
1090 #endif
1091                 /*
1092                  * if we are
1093                  * not the owner of the directory,
1094                  * and we are hacking owners here, (only do this where told to)
1095                  * and we are not giving it TOO root, (would subvert quotas)
1096                  * then go ahead and give it to the other user.
1097                  * Note that this drops off the execute bits for security.
1098                  */
1099                 if ( (dvp->v_mount->mnt_flag & MNT_SUIDDIR) &&
1100                      (pdir->i_mode & ISUID) &&
1101                      (pdir->i_uid != cnp->cn_cred->cr_uid) && pdir->i_uid) {
1102                         ip->i_uid = pdir->i_uid;
1103                         mode &= ~07111;
1104 #ifdef QUOTA
1105                         /*
1106                          * make sure the correct user gets charged
1107                          * for the space.
1108                          * Quickly knock up a dummy credential for the victim.
1109                          * XXX This seems to never be accessed out of our
1110                          * context so a stack variable is ok.
1111                          */
1112                         ucred.cr_ref = 1;
1113                         ucred.cr_uid = ip->i_uid;
1114                         ucred.cr_ngroups = 1;
1115                         ucred.cr_groups[0] = pdir->i_gid;
1116                         ucp = &ucred;
1117 #endif
1118                 } else {
1119                         ip->i_uid = cnp->cn_cred->cr_uid;
1120                 }
1121         
1122 #ifdef QUOTA
1123                 if ((error = getinoquota(ip)) ||
1124                 (error = chkiq(ip, 1, ucp, 0))) {
1125                         UFS_VFREE(tvp, ip->i_number, mode);
1126                         vput(tvp);
1127                         return (error);
1128                 }
1129 #endif
1130         }
1131 #else
1132         ip->i_uid = cnp->cn_cred->cr_uid;
1133 #ifdef QUOTA
1134         if ((error = getinoquota(ip)) ||
1135             (error = chkiq(ip, 1, cnp->cn_cred, 0))) {
1136                 UFS_VFREE(tvp, ip->i_number, mode);
1137                 vput(tvp);
1138                 return (error);
1139         }
1140 #endif
1141 #endif
1142         ip->i_flag |= IN_ACCESS | IN_CHANGE | IN_UPDATE;
1143         ip->i_mode = mode;
1144         tvp->v_type = IFTOVT(mode);     /* Rest init'd in getnewvnode(). */
1145         ip->i_nlink = 1;
1146         if ((ip->i_mode & ISGID) && !groupmember(ip->i_gid, cnp->cn_cred) &&
1147             suser_cred(cnp->cn_cred, PRISON_ROOT))
1148                 ip->i_mode &= ~ISGID;
1149
1150         if (cnp->cn_flags & CNP_ISWHITEOUT)
1151                 ip->i_flags |= UF_OPAQUE;
1152
1153         /*
1154          * Make sure inode goes to disk before directory entry.
1155          */
1156         error = UFS_UPDATE(tvp, 1);
1157         if (error)
1158                 goto bad;
1159         error = ext2_direnter(ip, dvp, cnp);
1160         if (error)
1161                 goto bad;
1162
1163         *vpp = tvp;
1164         return (0);
1165
1166 bad:
1167         /*
1168          * Write error occurred trying to update the inode
1169          * or the directory so must deallocate the inode.
1170          */
1171         ip->i_nlink = 0;
1172         ip->i_flag |= IN_CHANGE;
1173         vput(tvp);
1174         return (error);
1175 }
1176
1177 /*
1178  * get page routine
1179  *
1180  * XXX By default, wimp out... note that a_offset is ignored (and always
1181  * XXX has been).
1182  */
1183 static int
1184 ext2_getpages(struct vop_getpages_args *ap)
1185 {
1186         return (vnode_pager_generic_getpages(ap->a_vp, ap->a_m, ap->a_count,
1187                 ap->a_reqpage));
1188 }
1189
1190 /*
1191  * put page routine
1192  *
1193  * XXX By default, wimp out... note that a_offset is ignored (and always
1194  * XXX has been).
1195  */
1196 static int
1197 ext2_putpages(struct vop_putpages_args *ap)
1198 {
1199         return (vnode_pager_generic_putpages(ap->a_vp, ap->a_m, ap->a_count,
1200                 ap->a_sync, ap->a_rtvals));
1201 }