Merge from vendor branch CVS:
[dragonfly.git] / sys / vfs / mfs / mfs_vfsops.c
1 /*
2  * Copyright (c) 1989, 1990, 1993, 1994
3  *      The Regents of the University of California.  All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  * 3. All advertising materials mentioning features or use of this software
14  *    must display the following acknowledgement:
15  *      This product includes software developed by the University of
16  *      California, Berkeley and its contributors.
17  * 4. Neither the name of the University nor the names of its contributors
18  *    may be used to endorse or promote products derived from this software
19  *    without specific prior written permission.
20  *
21  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31  * SUCH DAMAGE.
32  *
33  *      @(#)mfs_vfsops.c        8.11 (Berkeley) 6/19/95
34  * $FreeBSD: src/sys/ufs/mfs/mfs_vfsops.c,v 1.81.2.3 2001/07/04 17:35:21 tegge Exp $
35  * $DragonFly: src/sys/vfs/mfs/mfs_vfsops.c,v 1.22 2005/06/06 15:09:38 drhodus Exp $
36  */
37
38
39 #include "opt_mfs.h"
40
41 #include <sys/param.h>
42 #include <sys/systm.h>
43 #include <sys/conf.h>
44 #include <sys/kernel.h>
45 #include <sys/proc.h>
46 #include <sys/buf.h>
47 #include <sys/mount.h>
48 #include <sys/signalvar.h>
49 #include <sys/vnode.h>
50 #include <sys/malloc.h>
51 #include <sys/linker.h>
52 #include <sys/fcntl.h>
53
54 #include <sys/buf2.h>
55
56 #include <sys/thread2.h>
57
58 #include <vfs/ufs/quota.h>
59 #include <vfs/ufs/inode.h>
60 #include <vfs/ufs/ufsmount.h>
61 #include <vfs/ufs/ufs_extern.h>
62 #include <vfs/ufs/fs.h>
63 #include <vfs/ufs/ffs_extern.h>
64
65 #include "mfsnode.h"
66 #include "mfs_extern.h"
67
68 MALLOC_DEFINE(M_MFSNODE, "MFS node", "MFS vnode private part");
69
70
71 extern struct vop_ops *mfs_vnode_vops;
72
73 static int      mfs_mount (struct mount *mp,
74                         char *path, caddr_t data, struct thread *td);
75 static int      mfs_start (struct mount *mp, int flags, struct thread *td);
76 static int      mfs_statfs (struct mount *mp, struct statfs *sbp, 
77                         struct thread *td);
78 static int      mfs_init (struct vfsconf *);
79
80 d_open_t        mfsopen;
81 d_close_t       mfsclose;
82 d_strategy_t    mfsstrategy;
83
84 #define MFS_CDEV_MAJOR  253
85
86 static struct cdevsw mfs_cdevsw = {
87         /* name */      "MFS",
88         /* maj */       MFS_CDEV_MAJOR,
89         /* flags */     D_DISK,
90         /* port */      NULL,
91         /* clone */     NULL,
92
93         /* open */      mfsopen,
94         /* close */     mfsclose,
95         /* read */      physread,
96         /* write */     physwrite,
97         /* ioctl */     noioctl,
98         /* poll */      nopoll,
99         /* mmap */      nommap,
100         /* strategy */  mfsstrategy,
101         /* dump */      nodump,
102         /* psize */     nopsize
103 };
104
105 /*
106  * mfs vfs operations.
107  */
108 static struct vfsops mfs_vfsops = {
109         mfs_mount,
110         mfs_start,
111         ffs_unmount,
112         ufs_root,
113         ufs_quotactl,
114         mfs_statfs,
115         ffs_sync,
116         ffs_vget,
117         ffs_fhtovp,
118         ufs_check_export,
119         ffs_vptofh,
120         mfs_init,
121         vfs_stduninit,
122         vfs_stdextattrctl,
123 };
124
125 VFS_SET(mfs_vfsops, mfs, 0);
126
127 /*
128  * We allow the underlying MFS block device to be opened and read.
129  */
130 int
131 mfsopen(dev_t dev, int flags, int mode, struct thread *td)
132 {
133         if (flags & FWRITE)
134                 return(EROFS);
135         if (dev->si_drv1)
136                 return(0);
137         return(ENXIO);
138 }
139
140 int
141 mfsclose(dev_t dev, int flags, int mode, struct thread *td)
142 {
143         return(0);
144 }
145
146 void
147 mfsstrategy(struct buf *bp)
148 {
149         struct mfsnode *mfsp;
150
151         if ((mfsp = bp->b_dev->si_drv1) != NULL) {
152                 off_t boff = (off_t)bp->b_blkno << DEV_BSHIFT;
153                 off_t eoff = boff + bp->b_bcount;
154
155                 if (eoff <= mfsp->mfs_size) {
156                         bufq_insert_tail(&mfsp->buf_queue, bp);
157                         wakeup((caddr_t)mfsp);
158                 } else if (boff < mfsp->mfs_size) {
159                         bp->b_bcount = mfsp->mfs_size - boff;
160                         bufq_insert_tail(&mfsp->buf_queue, bp);
161                         wakeup((caddr_t)mfsp);
162                 } else if (boff == mfsp->mfs_size) {
163                         bp->b_resid = bp->b_bcount;
164                         biodone(bp);
165                 } else {
166                         bp->b_error = EINVAL;
167                         biodone(bp);
168                 }
169         } else {
170                 bp->b_error = ENXIO;
171                 bp->b_flags |= B_ERROR;
172                 biodone(bp);
173         }
174 }
175
176 /*
177  * mfs_mount
178  *
179  * Called when mounting local physical media
180  *
181  * PARAMETERS:
182  *              mountroot
183  *                      mp      mount point structure
184  *                      path    NULL (flag for root mount!!!)
185  *                      data    <unused>
186  *                      ndp     <unused>
187  *                      p       process (user credentials check [statfs])
188  *
189  *              mount
190  *                      mp      mount point structure
191  *                      path    path to mount point
192  *                      data    pointer to argument struct in user space
193  *                      ndp     mount point namei() return (used for
194  *                              credentials on reload), reused to look
195  *                              up block device.
196  *                      p       process (user credentials check)
197  *
198  * RETURNS:     0       Success
199  *              !0      error number (errno.h)
200  *
201  * LOCK STATE:
202  *
203  *              ENTRY
204  *                      mount point is locked
205  *              EXIT
206  *                      mount point is locked
207  *
208  * NOTES:
209  *              A NULL path can be used for a flag since the mount
210  *              system call will fail with EFAULT in copyinstr in
211  *              namei() if it is a genuine NULL from the user.
212  */
213 /* ARGSUSED */
214 static int
215 mfs_mount(struct mount *mp, char *path, caddr_t data, struct thread *td)
216 {
217         struct vnode *devvp;
218         struct mfs_args args;
219         struct ufsmount *ump;
220         struct fs *fs;
221         struct mfsnode *mfsp;
222         size_t size;
223         int flags, err;
224         int minnum;
225         dev_t dev;
226
227         /*
228          * Use NULL path to flag a root mount
229          */
230         if( path == NULL) {
231                 /*
232                  ***
233                  * Mounting root file system
234                  ***
235                  */
236
237                 /* you lose */
238                 panic("mfs_mount: mount MFS as root: not configured!");
239         }
240
241         /*
242          ***
243          * Mounting non-root file system or updating a file system
244          ***
245          */
246
247         /* copy in user arguments*/
248         if ((err = copyin(data, (caddr_t)&args, sizeof (struct mfs_args))) != 0)
249                 goto error_1;
250
251         /*
252          * If updating, check whether changing from read-only to
253          * read/write; if there is no device name, that's all we do.
254          */
255         if (mp->mnt_flag & MNT_UPDATE) {
256                 /*
257                  ********************
258                  * UPDATE
259                  ********************
260                  */
261                 ump = VFSTOUFS(mp);
262                 fs = ump->um_fs;
263                 if (fs->fs_ronly == 0 && (mp->mnt_flag & MNT_RDONLY)) {
264                         flags = WRITECLOSE;
265                         if (mp->mnt_flag & MNT_FORCE)
266                                 flags |= FORCECLOSE;
267                         err = ffs_flushfiles(mp, flags, td);
268                         if (err)
269                                 goto error_1;
270                 }
271                 if (fs->fs_ronly && (mp->mnt_kern_flag & MNTK_WANTRDWR))
272                         fs->fs_ronly = 0;
273                 /* if not updating name...*/
274                 if (args.fspec == 0) {
275                         /*
276                          * Process export requests.  Jumping to "success"
277                          * will return the vfs_export() error code. 
278                          */
279                         err = vfs_export(mp, &ump->um_export, &args.export);
280                         goto success;
281                 }
282
283                 /* XXX MFS does not support name updating*/
284                 goto success;
285         }
286         /*
287          * Do the MALLOC before the getnewvnode since doing so afterward
288          * might cause a bogus v_data pointer to get dereferenced
289          * elsewhere if MALLOC should block.
290          */
291         MALLOC(mfsp, struct mfsnode *, sizeof *mfsp, M_MFSNODE, M_WAITOK);
292
293         err = getspecialvnode(VT_MFS, NULL, &mfs_vnode_vops, &devvp, 0, 0);
294         if (err) {
295                 FREE(mfsp, M_MFSNODE);
296                 goto error_1;
297         }
298
299         minnum = (curproc->p_pid & 0xFF) |
300                 ((curproc->p_pid & ~0xFF) << 8);
301
302         devvp->v_type = VCHR;
303         dev = make_dev(&mfs_cdevsw, minnum, UID_ROOT, GID_WHEEL, 0600,
304                         "MFS%d", minnum >> 16);
305         /* It is not clear that these will get initialized otherwise */
306         dev->si_bsize_phys = DEV_BSIZE;
307         dev->si_iosize_max = DFLTPHYS;
308         dev->si_drv1 = mfsp;
309         addaliasu(devvp, makeudev(MFS_CDEV_MAJOR, minnum));
310         devvp->v_data = mfsp;
311         mfsp->mfs_baseoff = args.base;
312         mfsp->mfs_size = args.size;
313         mfsp->mfs_vnode = devvp;
314         mfsp->mfs_dev = reference_dev(dev);
315         mfsp->mfs_td = td;
316         mfsp->mfs_active = 1;
317         bufq_init(&mfsp->buf_queue);
318
319         /* Save "mounted from" info for mount point (NULL pad)*/
320         copyinstr(      args.fspec,                     /* device name*/
321                         mp->mnt_stat.f_mntfromname,     /* save area*/
322                         MNAMELEN - 1,                   /* max size*/
323                         &size);                         /* real size*/
324         bzero( mp->mnt_stat.f_mntfromname + size, MNAMELEN - size);
325
326         vx_unlock(devvp);
327         if ((err = ffs_mountfs(devvp, mp, td, M_MFSNODE)) != 0) { 
328                 mfsp->mfs_active = 0;
329                 goto error_2;
330         }
331
332         /*
333          * Initialize FS stat information in mount struct; uses
334          * mp->mnt_stat.f_mntfromname.
335          *
336          * This code is common to root and non-root mounts
337          */
338         (void) VFS_STATFS(mp, &mp->mnt_stat, td);
339
340         goto success;
341
342 error_2:        /* error with devvp held*/
343
344         /* release devvp before failing*/
345         vrele(devvp);
346
347 error_1:        /* no state to back out*/
348
349 success:
350         return( err);
351 }
352
353 /*
354  * Used to grab the process and keep it in the kernel to service
355  * memory filesystem I/O requests.
356  *
357  * Loop servicing I/O requests.
358  * Copy the requested data into or out of the memory filesystem
359  * address space.
360  */
361 /* ARGSUSED */
362 static int
363 mfs_start(struct mount *mp, int flags, struct thread *td)
364 {
365         struct vnode *vp = VFSTOUFS(mp)->um_devvp;
366         struct mfsnode *mfsp = VTOMFS(vp);
367         struct buf *bp;
368         int gotsig = 0, sig;
369
370         /*
371          * We must prevent the system from trying to swap
372          * out or kill ( when swap space is low, see vm/pageout.c ) the
373          * process.  A deadlock can occur if the process is swapped out,
374          * and the system can loop trying to kill the unkillable ( while
375          * references exist ) MFS process when swap space is low.
376          */
377         KKASSERT(curproc);
378         PHOLD(curproc);
379
380         while (mfsp->mfs_active) {
381
382                 crit_enter();
383
384                 while ((bp = bufq_first(&mfsp->buf_queue)) != NULL) {
385                         bufq_remove(&mfsp->buf_queue, bp);
386                         crit_exit();
387                         mfs_doio(bp, mfsp);
388                         wakeup((caddr_t)bp);
389                         crit_enter();
390                 }
391
392                 crit_exit();
393
394                 /*
395                  * If a non-ignored signal is received, try to unmount.
396                  * If that fails, clear the signal (it has been "processed"),
397                  * otherwise we will loop here, as tsleep will always return
398                  * EINTR/ERESTART.
399                  */
400                 /*
401                  * Note that dounmount() may fail if work was queued after
402                  * we slept. We have to jump hoops here to make sure that we
403                  * process any buffers after the sleep, before we dounmount()
404                  */
405                 if (gotsig) {
406                         gotsig = 0;
407                         if (dounmount(mp, 0, td) != 0) {
408                                 KKASSERT(td->td_proc);
409                                 sig = CURSIG(td->td_proc);
410                                 if (sig)
411                                         SIGDELSET(td->td_proc->p_siglist, sig);
412                         }
413                 }
414                 else if (tsleep((caddr_t)mfsp, PCATCH, "mfsidl", 0))
415                         gotsig++;       /* try to unmount in next pass */
416         }
417         PRELE(curproc);
418         v_release_rdev(vp);     /* hack because we do not implement CLOSE */
419         /* XXX destroy/release devvp */
420         return (0);
421 }
422
423 /*
424  * Get file system statistics.
425  */
426 static int
427 mfs_statfs(struct mount *mp, struct statfs *sbp, struct thread *td)
428 {
429         int error;
430
431         error = ffs_statfs(mp, sbp, td);
432         sbp->f_type = mp->mnt_vfc->vfc_typenum;
433         return (error);
434 }
435
436 /*
437  * Memory based filesystem initialization.
438  */
439 static int
440 mfs_init(struct vfsconf *vfsp)
441 {
442         cdevsw_add(&mfs_cdevsw, 0, 0);
443         return (0);
444 }