oops, forgot a mention. Last commit:
[dragonfly.git] / sys / vfs / umapfs / umap_vfsops.c
1 /*
2  * Copyright (c) 1992, 1993, 1995
3  *      The Regents of the University of California.  All rights reserved.
4  *
5  * This code is derived from software donated to Berkeley by
6  * the UCLA Ficus project.
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions
10  * are met:
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice, this list of conditions and the following disclaimer.
13  * 2. Redistributions in binary form must reproduce the above copyright
14  *    notice, this list of conditions and the following disclaimer in the
15  *    documentation and/or other materials provided with the distribution.
16  * 3. All advertising materials mentioning features or use of this software
17  *    must display the following acknowledgement:
18  *      This product includes software developed by the University of
19  *      California, Berkeley and its contributors.
20  * 4. Neither the name of the University nor the names of its contributors
21  *    may be used to endorse or promote products derived from this software
22  *    without specific prior written permission.
23  *
24  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
25  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
28  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
34  * SUCH DAMAGE.
35  *
36  *      @(#)umap_vfsops.c       8.8 (Berkeley) 5/14/95
37  *
38  * $FreeBSD: src/sys/miscfs/umapfs/umap_vfsops.c,v 1.31.2.2 2001/09/11 09:49:53 kris Exp $
39  * $DragonFly: src/sys/vfs/umapfs/Attic/umap_vfsops.c,v 1.13 2004/10/12 19:21:13 dillon Exp $
40  */
41
42 /*
43  * Umap Layer
44  * (See mount_umap(8) for a description of this layer.)
45  */
46
47 #include <sys/param.h>
48 #include <sys/systm.h>
49 #include <sys/kernel.h>
50 #include <sys/proc.h>
51 #include <sys/vnode.h>
52 #include <sys/mount.h>
53 #include <sys/namei.h>
54 #include <sys/malloc.h>
55 #include "umap.h"
56 #include <vm/vm_zone.h>
57
58 extern struct vnodeopv_entry_desc umap_vnodeop_entries[];
59
60 static MALLOC_DEFINE(M_UMAPFSMNT, "UMAP mount", "UMAP mount structure");
61
62 static int      umapfs_fhtovp (struct mount *mp, struct fid *fidp,
63                                    struct vnode **vpp);
64 static int      umapfs_checkexp (struct mount *mp, struct sockaddr *nam,
65                                     int *extflagsp, struct ucred **credanonp);
66 static int      umapfs_mount (struct mount *mp, char *path, caddr_t data,
67                                   struct thread *td);
68 static int      umapfs_quotactl (struct mount *mp, int cmd, uid_t uid,
69                                      caddr_t arg, struct thread *td);
70 static int      umapfs_root (struct mount *mp, struct vnode **vpp);
71 static int      umapfs_start (struct mount *mp, int flags, struct thread *td);
72 static int      umapfs_statfs (struct mount *mp, struct statfs *sbp,
73                                    struct thread *td);
74 static int      umapfs_sync (struct mount *mp, int waitfor,
75                                  struct thread *td);
76 static int      umapfs_unmount (struct mount *mp, int mntflags,
77                                     struct thread *td);
78 static int      umapfs_vget (struct mount *mp, ino_t ino,
79                                  struct vnode **vpp);
80 static int      umapfs_vptofh (struct vnode *vp, struct fid *fhp);
81 static int      umapfs_extattrctl (struct mount *mp, int cmd,
82                                        const char *attrname, caddr_t arg,
83                                        struct thread *td);
84
85 /*
86  * Mount umap layer
87  */
88 static int
89 umapfs_mount(struct mount *mp, char *path, caddr_t data, struct thread *td)
90 {
91         struct umap_args args;
92         struct vnode *lowerrootvp, *vp;
93         struct vnode *umapm_rootvp;
94         struct umap_mount *amp;
95         struct nameidata nd;
96         u_int size;
97         int error;
98 #ifdef DEBUG
99         int     i;
100 #endif
101
102         /*
103          * Only for root
104          */
105         if ((error = suser(td)) != 0)
106                 return (error);
107
108 #ifdef DEBUG
109         printf("umapfs_mount(mp = %p)\n", (void *)mp);
110 #endif
111
112         /*
113          * Update is a no-op
114          */
115         if (mp->mnt_flag & MNT_UPDATE) {
116                 return (EOPNOTSUPP);
117         }
118
119         /*
120          * Get argument
121          */
122         error = copyin(data, (caddr_t)&args, sizeof(struct umap_args));
123         if (error)
124                 return (error);
125
126         /*
127          * Find lower node
128          */
129         NDINIT(&nd, NAMEI_LOOKUP, CNP_FOLLOW | CNP_WANTPARENT | CNP_LOCKLEAF,
130                 UIO_USERSPACE, args.target, td);
131         error = namei(&nd);
132         if (error)
133                 return (error);
134         NDFREE(&nd, NDF_ONLY_PNBUF);
135
136         /*
137          * Sanity check on lower vnode
138          */
139         lowerrootvp = nd.ni_vp;
140 #ifdef DEBUG
141         printf("vp = %p, check for VDIR...\n", (void *)lowerrootvp);
142 #endif
143         vrele(nd.ni_dvp);
144         nd.ni_dvp = 0;
145
146         if (lowerrootvp->v_type != VDIR) {
147                 vput(lowerrootvp);
148                 return (EINVAL);
149         }
150
151 #ifdef DEBUG
152         printf("mp = %p\n", (void *)mp);
153 #endif
154
155         amp = (struct umap_mount *) malloc(sizeof(struct umap_mount),
156                                 M_UMAPFSMNT, M_WAITOK); /* XXX */
157
158         /*
159          * Save reference to underlying FS
160          */
161         amp->umapm_vfs = lowerrootvp->v_mount;
162
163         /*
164          * Now copy in the number of entries and maps for umap mapping.
165          */
166         if (args.nentries > MAPFILEENTRIES || args.gnentries >
167             GMAPFILEENTRIES) {
168                 vput(lowerrootvp);
169                 return (error);
170         }
171
172         amp->info_nentries = args.nentries;
173         amp->info_gnentries = args.gnentries;
174         error = copyin(args.mapdata, (caddr_t)amp->info_mapdata,
175             2*sizeof(u_long)*args.nentries);
176         if (error)
177                 return (error);
178
179 #ifdef DEBUG
180         printf("umap_mount:nentries %d\n",args.nentries);
181         for (i = 0; i < args.nentries; i++)
182                 printf("   %lu maps to %lu\n", amp->info_mapdata[i][0],
183                     amp->info_mapdata[i][1]);
184 #endif
185
186         error = copyin(args.gmapdata, (caddr_t)amp->info_gmapdata,
187             2*sizeof(u_long)*args.gnentries);
188         if (error)
189                 return (error);
190
191 #ifdef DEBUG
192         printf("umap_mount:gnentries %d\n",args.gnentries);
193         for (i = 0; i < args.gnentries; i++)
194                 printf("        group %lu maps to %lu\n",
195                     amp->info_gmapdata[i][0],
196                     amp->info_gmapdata[i][1]);
197 #endif
198
199         vfs_add_vnodeops(&mp->mnt_vn_ops, umap_vnodeop_entries);
200
201         /*
202          * Save reference.  Each mount also holds
203          * a reference on the root vnode.
204          */
205         error = umap_node_create(mp, lowerrootvp, &vp);
206         /*
207          * Unlock the node (either the lower or the alias)
208          */
209         VOP_UNLOCK(vp, 0, td);
210         /*
211          * Make sure the node alias worked
212          */
213         if (error) {
214                 vrele(lowerrootvp);
215                 free(amp, M_UMAPFSMNT); /* XXX */
216                 return (error);
217         }
218
219         /*
220          * Keep a held reference to the root vnode.
221          * It is vrele'd in umapfs_unmount.
222          */
223         umapm_rootvp = vp;
224         umapm_rootvp->v_flag |= VROOT;
225         amp->umapm_rootvp = umapm_rootvp;
226         if (UMAPVPTOLOWERVP(umapm_rootvp)->v_mount->mnt_flag & MNT_LOCAL)
227                 mp->mnt_flag |= MNT_LOCAL;
228         mp->mnt_data = (qaddr_t) amp;
229         vfs_getnewfsid(mp);
230
231         (void) copyinstr(path, mp->mnt_stat.f_mntonname, MNAMELEN - 1, &size);
232         bzero(mp->mnt_stat.f_mntonname + size, MNAMELEN - size);
233         (void) copyinstr(args.target, mp->mnt_stat.f_mntfromname, MNAMELEN - 1,
234             &size);
235         bzero(mp->mnt_stat.f_mntfromname + size, MNAMELEN - size);
236         (void)umapfs_statfs(mp, &mp->mnt_stat, td);
237 #ifdef DEBUG
238         printf("umapfs_mount: lower %s, alias at %s\n",
239                 mp->mnt_stat.f_mntfromname, mp->mnt_stat.f_mntonname);
240 #endif
241         return (0);
242 }
243
244 /*
245  * VFS start.  Nothing needed here - the start routine
246  * on the underlying filesystem will have been called
247  * when that filesystem was mounted.
248  */
249 static int
250 umapfs_start(struct mount *mp, int flags, struct thread *td)
251 {
252         return (0);
253         /* return (VFS_START(MOUNTTOUMAPMOUNT(mp)->umapm_vfs, flags, p)); */
254 }
255
256 /*
257  * Free reference to umap layer
258  */
259 static int
260 umapfs_unmount(struct mount *mp, int mntflags, struct thread *td)
261 {
262         int error;
263         int flags = 0;
264
265 #ifdef DEBUG
266         printf("umapfs_unmount(mp = %p)\n", (void *)mp);
267 #endif
268
269         if (mntflags & MNT_FORCE)
270                 flags |= FORCECLOSE;
271
272         /*
273          * Clear out buffer cache.  I don't think we
274          * ever get anything cached at this level at the
275          * moment, but who knows...
276          */
277 #ifdef notyet
278         mntflushbuf(mp, 0);
279         if (mntinvalbuf(mp, 1))
280                 return (EBUSY);
281 #endif
282         /* There is 1 extra root vnode reference (umapm_rootvp). */
283         error = vflush(mp, 1, flags);
284         if (error)
285                 return (error);
286
287         /*
288          * Finally, throw away the umap_mount structure
289          */
290         free(mp->mnt_data, M_UMAPFSMNT);        /* XXX */
291         mp->mnt_data = 0;
292         return (0);
293 }
294
295 static int
296 umapfs_root(struct mount *mp, struct vnode **vpp)
297 {
298         struct thread *td = curthread;  /* XXX */
299         struct vnode *vp;
300
301 #ifdef DEBUG
302         printf("umapfs_root(mp = %p, vp = %p->%p)\n",
303             (void *)mp, (void *)MOUNTTOUMAPMOUNT(mp)->umapm_rootvp,
304             (void *)UMAPVPTOLOWERVP(MOUNTTOUMAPMOUNT(mp)->umapm_rootvp));
305 #endif
306
307         /*
308          * Return locked reference to root.
309          */
310         vp = MOUNTTOUMAPMOUNT(mp)->umapm_rootvp;
311         vref(vp);
312         vn_lock(vp, LK_EXCLUSIVE | LK_RETRY, td);
313         *vpp = vp;
314         return (0);
315 }
316
317 static int
318 umapfs_quotactl(struct mount *mp, int cmd, uid_t uid, 
319         caddr_t arg, struct thread *td)
320 {
321         return (VFS_QUOTACTL(MOUNTTOUMAPMOUNT(mp)->umapm_vfs, cmd, uid, arg, td));
322 }
323
324 static int
325 umapfs_statfs(struct mount *mp, struct statfs *sbp, struct thread *td)
326 {
327         int error;
328         struct statfs mstat;
329
330 #ifdef DEBUG
331         printf("umapfs_statfs(mp = %p, vp = %p->%p)\n",
332             (void *)mp, (void *)MOUNTTOUMAPMOUNT(mp)->umapm_rootvp,
333             (void *)UMAPVPTOLOWERVP(MOUNTTOUMAPMOUNT(mp)->umapm_rootvp));
334 #endif
335
336         bzero(&mstat, sizeof(mstat));
337
338         error = VFS_STATFS(MOUNTTOUMAPMOUNT(mp)->umapm_vfs, &mstat, td);
339         if (error)
340                 return (error);
341
342         /* now copy across the "interesting" information and fake the rest */
343         sbp->f_type = mstat.f_type;
344         sbp->f_flags = mstat.f_flags;
345         sbp->f_bsize = mstat.f_bsize;
346         sbp->f_iosize = mstat.f_iosize;
347         sbp->f_blocks = mstat.f_blocks;
348         sbp->f_bfree = mstat.f_bfree;
349         sbp->f_bavail = mstat.f_bavail;
350         sbp->f_files = mstat.f_files;
351         sbp->f_ffree = mstat.f_ffree;
352         if (sbp != &mp->mnt_stat) {
353                 bcopy(&mp->mnt_stat.f_fsid, &sbp->f_fsid, sizeof(sbp->f_fsid));
354                 bcopy(mp->mnt_stat.f_mntonname, sbp->f_mntonname, MNAMELEN);
355                 bcopy(mp->mnt_stat.f_mntfromname, sbp->f_mntfromname, MNAMELEN);
356         }
357         return (0);
358 }
359
360 static int
361 umapfs_sync(struct mount *mp, int waitfor, struct thread *td)
362 {
363         /*
364          * XXX - Assumes no data cached at umap layer.
365          */
366         return (0);
367 }
368
369 static int
370 umapfs_vget(struct mount *mp, ino_t ino, struct vnode **vpp)
371 {
372
373         return (VFS_VGET(MOUNTTOUMAPMOUNT(mp)->umapm_vfs, ino, vpp));
374 }
375
376 static int
377 umapfs_fhtovp(struct mount *mp, struct fid *fidp, struct vnode **vpp)
378 {
379         
380         return (VFS_FHTOVP(MOUNTTOUMAPMOUNT(mp)->umapm_vfs, fidp, vpp));
381 }
382
383 static int
384 umapfs_checkexp(struct mount *mp, struct sockaddr *nam, int *exflagsp,
385         struct ucred **credanonp)
386 {
387
388         return (VFS_CHECKEXP(MOUNTTOUMAPMOUNT(mp)->umapm_vfs, nam, 
389                 exflagsp, credanonp));
390 }
391
392 static int
393 umapfs_vptofh(struct vnode *vp, struct fid *fhp)
394 {
395         return (VFS_VPTOFH(UMAPVPTOLOWERVP(vp), fhp));
396 }
397
398 static int
399 umapfs_extattrctl(struct mount *mp, int cmd, const char *attrname,
400         caddr_t arg, struct thread *td)
401 {
402         return (VFS_EXTATTRCTL(MOUNTTOUMAPMOUNT(mp)->umapm_vfs, cmd, attrname,
403             arg, td));
404
405
406
407 static struct vfsops umap_vfsops = {
408         umapfs_mount,
409         umapfs_start,
410         umapfs_unmount,
411         umapfs_root,
412         umapfs_quotactl,
413         umapfs_statfs,
414         umapfs_sync,
415         umapfs_vget,
416         umapfs_fhtovp,
417         umapfs_checkexp,
418         umapfs_vptofh,
419         umapfs_init,
420         vfs_stduninit,
421         umapfs_extattrctl,
422 };
423
424 VFS_SET(umap_vfsops, umap, VFCF_LOOPBACK);