Use M_INTWAIT, not M_NOWAIT. We don't really support fast interrupt
[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.15 2004/12/17 00:18:46 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/nlookup.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 nlookupdata 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         lowerrootvp = NULL;
130         error = nlookup_init(&nd, args.target, UIO_USERSPACE, NLC_FOLLOW);
131         if (error == 0)
132                 error = nlookup(&nd);
133         if (error == 0) {
134                 error = cache_vget(nd.nl_ncp, nd.nl_cred, LK_EXCLUSIVE, 
135                                         &lowerrootvp);
136         }
137         nlookup_done(&nd);
138         if (error)
139                 return (error);
140
141         /*
142          * Sanity check on lower vnode
143          */
144 #ifdef DEBUG
145         printf("vp = %p, check for VDIR...\n", (void *)lowerrootvp);
146 #endif
147         if (lowerrootvp->v_type != VDIR) {
148                 vput(lowerrootvp);
149                 return (EINVAL);
150         }
151
152 #ifdef DEBUG
153         printf("mp = %p\n", (void *)mp);
154 #endif
155
156         amp = (struct umap_mount *) malloc(sizeof(struct umap_mount),
157                                 M_UMAPFSMNT, M_WAITOK); /* XXX */
158
159         /*
160          * Save reference to underlying FS
161          */
162         amp->umapm_vfs = lowerrootvp->v_mount;
163
164         /*
165          * Now copy in the number of entries and maps for umap mapping.
166          */
167         if (args.nentries > MAPFILEENTRIES || args.gnentries >
168             GMAPFILEENTRIES) {
169                 vput(lowerrootvp);
170                 return (error);
171         }
172
173         amp->info_nentries = args.nentries;
174         amp->info_gnentries = args.gnentries;
175         error = copyin(args.mapdata, (caddr_t)amp->info_mapdata,
176             2*sizeof(u_long)*args.nentries);
177         if (error)
178                 return (error);
179
180 #ifdef DEBUG
181         printf("umap_mount:nentries %d\n",args.nentries);
182         for (i = 0; i < args.nentries; i++)
183                 printf("   %lu maps to %lu\n", amp->info_mapdata[i][0],
184                     amp->info_mapdata[i][1]);
185 #endif
186
187         error = copyin(args.gmapdata, (caddr_t)amp->info_gmapdata,
188             2*sizeof(u_long)*args.gnentries);
189         if (error)
190                 return (error);
191
192 #ifdef DEBUG
193         printf("umap_mount:gnentries %d\n",args.gnentries);
194         for (i = 0; i < args.gnentries; i++)
195                 printf("        group %lu maps to %lu\n",
196                     amp->info_gmapdata[i][0],
197                     amp->info_gmapdata[i][1]);
198 #endif
199
200         vfs_add_vnodeops(mp, &mp->mnt_vn_norm_ops, umap_vnodeop_entries);
201
202         /*
203          * Save reference.  Each mount also holds
204          * a reference on the root vnode.
205          */
206         error = umap_node_create(mp, lowerrootvp, &vp);
207         /*
208          * Unlock the node (either the lower or the alias)
209          */
210         VOP_UNLOCK(vp, 0, td);
211         /*
212          * Make sure the node alias worked
213          */
214         if (error) {
215                 vrele(lowerrootvp);
216                 free(amp, M_UMAPFSMNT); /* XXX */
217                 return (error);
218         }
219
220         /*
221          * Keep a held reference to the root vnode.
222          * It is vrele'd in umapfs_unmount.
223          */
224         umapm_rootvp = vp;
225         umapm_rootvp->v_flag |= VROOT;
226         amp->umapm_rootvp = umapm_rootvp;
227         if (UMAPVPTOLOWERVP(umapm_rootvp)->v_mount->mnt_flag & MNT_LOCAL)
228                 mp->mnt_flag |= MNT_LOCAL;
229         mp->mnt_data = (qaddr_t) amp;
230         vfs_getnewfsid(mp);
231
232         (void) copyinstr(path, mp->mnt_stat.f_mntonname, MNAMELEN - 1, &size);
233         bzero(mp->mnt_stat.f_mntonname + size, MNAMELEN - size);
234         (void) copyinstr(args.target, mp->mnt_stat.f_mntfromname, MNAMELEN - 1,
235             &size);
236         bzero(mp->mnt_stat.f_mntfromname + size, MNAMELEN - size);
237         (void)umapfs_statfs(mp, &mp->mnt_stat, td);
238 #ifdef DEBUG
239         printf("umapfs_mount: lower %s, alias at %s\n",
240                 mp->mnt_stat.f_mntfromname, mp->mnt_stat.f_mntonname);
241 #endif
242         return (0);
243 }
244
245 /*
246  * VFS start.  Nothing needed here - the start routine
247  * on the underlying filesystem will have been called
248  * when that filesystem was mounted.
249  */
250 static int
251 umapfs_start(struct mount *mp, int flags, struct thread *td)
252 {
253         return (0);
254         /* return (VFS_START(MOUNTTOUMAPMOUNT(mp)->umapm_vfs, flags, p)); */
255 }
256
257 /*
258  * Free reference to umap layer
259  */
260 static int
261 umapfs_unmount(struct mount *mp, int mntflags, struct thread *td)
262 {
263         int error;
264         int flags = 0;
265
266 #ifdef DEBUG
267         printf("umapfs_unmount(mp = %p)\n", (void *)mp);
268 #endif
269
270         if (mntflags & MNT_FORCE)
271                 flags |= FORCECLOSE;
272
273         /*
274          * Clear out buffer cache.  I don't think we
275          * ever get anything cached at this level at the
276          * moment, but who knows...
277          */
278 #ifdef notyet
279         mntflushbuf(mp, 0);
280         if (mntinvalbuf(mp, 1))
281                 return (EBUSY);
282 #endif
283         /* There is 1 extra root vnode reference (umapm_rootvp). */
284         error = vflush(mp, 1, flags);
285         if (error)
286                 return (error);
287
288         /*
289          * Finally, throw away the umap_mount structure
290          */
291         free(mp->mnt_data, M_UMAPFSMNT);        /* XXX */
292         mp->mnt_data = 0;
293         return (0);
294 }
295
296 static int
297 umapfs_root(struct mount *mp, struct vnode **vpp)
298 {
299         struct thread *td = curthread;  /* XXX */
300         struct vnode *vp;
301
302 #ifdef DEBUG
303         printf("umapfs_root(mp = %p, vp = %p->%p)\n",
304             (void *)mp, (void *)MOUNTTOUMAPMOUNT(mp)->umapm_rootvp,
305             (void *)UMAPVPTOLOWERVP(MOUNTTOUMAPMOUNT(mp)->umapm_rootvp));
306 #endif
307
308         /*
309          * Return locked reference to root.
310          */
311         vp = MOUNTTOUMAPMOUNT(mp)->umapm_rootvp;
312         vref(vp);
313         vn_lock(vp, LK_EXCLUSIVE | LK_RETRY, td);
314         *vpp = vp;
315         return (0);
316 }
317
318 static int
319 umapfs_quotactl(struct mount *mp, int cmd, uid_t uid, 
320         caddr_t arg, struct thread *td)
321 {
322         return (VFS_QUOTACTL(MOUNTTOUMAPMOUNT(mp)->umapm_vfs, cmd, uid, arg, td));
323 }
324
325 static int
326 umapfs_statfs(struct mount *mp, struct statfs *sbp, struct thread *td)
327 {
328         int error;
329         struct statfs mstat;
330
331 #ifdef DEBUG
332         printf("umapfs_statfs(mp = %p, vp = %p->%p)\n",
333             (void *)mp, (void *)MOUNTTOUMAPMOUNT(mp)->umapm_rootvp,
334             (void *)UMAPVPTOLOWERVP(MOUNTTOUMAPMOUNT(mp)->umapm_rootvp));
335 #endif
336
337         bzero(&mstat, sizeof(mstat));
338
339         error = VFS_STATFS(MOUNTTOUMAPMOUNT(mp)->umapm_vfs, &mstat, td);
340         if (error)
341                 return (error);
342
343         /* now copy across the "interesting" information and fake the rest */
344         sbp->f_type = mstat.f_type;
345         sbp->f_flags = mstat.f_flags;
346         sbp->f_bsize = mstat.f_bsize;
347         sbp->f_iosize = mstat.f_iosize;
348         sbp->f_blocks = mstat.f_blocks;
349         sbp->f_bfree = mstat.f_bfree;
350         sbp->f_bavail = mstat.f_bavail;
351         sbp->f_files = mstat.f_files;
352         sbp->f_ffree = mstat.f_ffree;
353         if (sbp != &mp->mnt_stat) {
354                 bcopy(&mp->mnt_stat.f_fsid, &sbp->f_fsid, sizeof(sbp->f_fsid));
355                 bcopy(mp->mnt_stat.f_mntonname, sbp->f_mntonname, MNAMELEN);
356                 bcopy(mp->mnt_stat.f_mntfromname, sbp->f_mntfromname, MNAMELEN);
357         }
358         return (0);
359 }
360
361 static int
362 umapfs_sync(struct mount *mp, int waitfor, struct thread *td)
363 {
364         /*
365          * XXX - Assumes no data cached at umap layer.
366          */
367         return (0);
368 }
369
370 static int
371 umapfs_vget(struct mount *mp, ino_t ino, struct vnode **vpp)
372 {
373
374         return (VFS_VGET(MOUNTTOUMAPMOUNT(mp)->umapm_vfs, ino, vpp));
375 }
376
377 static int
378 umapfs_fhtovp(struct mount *mp, struct fid *fidp, struct vnode **vpp)
379 {
380         
381         return (VFS_FHTOVP(MOUNTTOUMAPMOUNT(mp)->umapm_vfs, fidp, vpp));
382 }
383
384 static int
385 umapfs_checkexp(struct mount *mp, struct sockaddr *nam, int *exflagsp,
386         struct ucred **credanonp)
387 {
388
389         return (VFS_CHECKEXP(MOUNTTOUMAPMOUNT(mp)->umapm_vfs, nam, 
390                 exflagsp, credanonp));
391 }
392
393 static int
394 umapfs_vptofh(struct vnode *vp, struct fid *fhp)
395 {
396         return (VFS_VPTOFH(UMAPVPTOLOWERVP(vp), fhp));
397 }
398
399 static int
400 umapfs_extattrctl(struct mount *mp, int cmd, const char *attrname,
401         caddr_t arg, struct thread *td)
402 {
403         return (VFS_EXTATTRCTL(MOUNTTOUMAPMOUNT(mp)->umapm_vfs, cmd, attrname,
404             arg, td));
405
406
407
408 static struct vfsops umap_vfsops = {
409         umapfs_mount,
410         umapfs_start,
411         umapfs_unmount,
412         umapfs_root,
413         umapfs_quotactl,
414         umapfs_statfs,
415         umapfs_sync,
416         umapfs_vget,
417         umapfs_fhtovp,
418         umapfs_checkexp,
419         umapfs_vptofh,
420         umapfs_init,
421         vfs_stduninit,
422         umapfs_extattrctl,
423 };
424
425 VFS_SET(umap_vfsops, umap, VFCF_LOOPBACK);