1 /*-
2 * Copyright (c) 1998, 1999 Semen Ustimenko (semenu@FreeBSD.org)
3 * 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 *
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
24 * SUCH DAMAGE.
25 *
26 * $FreeBSD$
27 */
28
29
30 #include <sys/param.h>
31 #include <sys/systm.h>
32 #include <sys/namei.h>
33 #include <sys/conf.h>
34 #include <sys/proc.h>
35 #include <sys/kernel.h>
36 #include <sys/vnode.h>
37 #include <sys/mount.h>
38 #include <sys/bio.h>
39 #include <sys/buf.h>
40 #include <sys/fcntl.h>
41 #include <sys/malloc.h>
42
43 #include <geom/geom.h>
44 #include <geom/geom_vfs.h>
45
46 #include <vm/vm.h>
47 #include <vm/vm_param.h>
48 #include <vm/vm_page.h>
49 #include <vm/vm_object.h>
50 #include <vm/vm_extern.h>
51
52 #include <fs/hpfs/hpfs.h>
53 #include <fs/hpfs/hpfsmount.h>
54 #include <fs/hpfs/hpfs_subr.h>
55
56 MALLOC_DEFINE(M_HPFSMNT, "hpfs_mount", "HPFS mount structure");
57 MALLOC_DEFINE(M_HPFSNO, "hpfs_node", "HPFS node structure");
58
59 struct sockaddr;
60
61 static int hpfs_mountfs(register struct vnode *, struct mount *,
62 struct thread *);
63
64 static vfs_fhtovp_t hpfs_fhtovp;
65 static vfs_vget_t hpfs_vget;
66 static vfs_cmount_t hpfs_cmount;
67 static vfs_mount_t hpfs_mount;
68 static vfs_root_t hpfs_root;
69 static vfs_statfs_t hpfs_statfs;
70 static vfs_unmount_t hpfs_unmount;
71
72 static int
73 hpfs_cmount (
74 struct mntarg *ma,
75 void *data,
76 int flags,
77 struct thread *td )
78 {
79 struct hpfs_args args;
80 int error;
81
82 error = copyin(data, (caddr_t)&args, sizeof (struct hpfs_args));
83 if (error)
84 return (error);
85
86 ma = mount_argsu(ma, "from", args.fspec, MAXPATHLEN);
87 ma = mount_arg(ma, "export", &args.export, sizeof args.export);
88 ma = mount_argf(ma, "uid", "%d", args.uid);
89 ma = mount_argf(ma, "gid", "%d", args.gid);
90 ma = mount_argf(ma, "mode", "%d", args.mode);
91 if (args.flags & HPFSMNT_TABLES) {
92 ma = mount_arg(ma, "d2u", args.d2u, sizeof args.d2u);
93 ma = mount_arg(ma, "u2d", args.u2d, sizeof args.u2d);
94 }
95
96 error = kernel_mount(ma, flags);
97
98 return (error);
99 }
100
101 static const char *hpfs_opts[] = {
102 "from", "export", "uid", "gid", "mode", "d2u", "u2d", NULL
103 };
104
105 static int
106 hpfs_mount (
107 struct mount *mp,
108 struct thread *td )
109 {
110 int err = 0, error;
111 struct vnode *devvp;
112 struct hpfsmount *hpmp = 0;
113 struct nameidata ndp;
114 struct export_args export;
115 char *from;
116
117 dprintf(("hpfs_omount():\n"));
118 /*
119 ***
120 * Mounting non-root filesystem or updating a filesystem
121 ***
122 */
123 if (vfs_filteropt(mp->mnt_optnew, hpfs_opts))
124 return (EINVAL);
125
126 from = vfs_getopts(mp->mnt_optnew, "from", &error);
127 if (error)
128 return (error);
129
130 /*
131 * If updating, check whether changing from read-only to
132 * read/write; if there is no device name, that's all we do.
133 */
134 if (mp->mnt_flag & MNT_UPDATE) {
135 dprintf(("hpfs_omount: MNT_UPDATE: "));
136
137 hpmp = VFSTOHPFS(mp);
138
139 if (from == NULL) {
140 error = vfs_copyopt(mp->mnt_optnew, "export",
141 &export, sizeof export);
142 if (error)
143 return (error);
144 dprintf(("export 0x%x\n",args.export.ex_flags));
145 err = vfs_export(mp, &export);
146 if (err) {
147 printf("hpfs_omount: vfs_export failed %d\n",
148 err);
149 }
150 goto success;
151 } else {
152 dprintf(("name [FAILED]\n"));
153 err = EINVAL;
154 goto success;
155 }
156 dprintf(("\n"));
157 }
158
159 /*
160 * Not an update, or updating the name: look up the name
161 * and verify that it refers to a sensible block device.
162 */
163 NDINIT(&ndp, LOOKUP, FOLLOW | LOCKLEAF, UIO_SYSSPACE, from, td);
164 err = namei(&ndp);
165 if (err) {
166 /* can't get devvp!*/
167 goto error_1;
168 }
169
170 devvp = ndp.ni_vp;
171
172 if (!vn_isdisk(devvp, &err)) {
173 vput(devvp);
174 return (err);
175 }
176
177 /*
178 ********************
179 * NEW MOUNT
180 ********************
181 */
182
183 /*
184 * Since this is a new mount, we want the names for
185 * the device and the mount point copied in. If an
186 * error occurs, the mountpoint is discarded by the
187 * upper level code. Note that vfs_omount() handles
188 * copying the mountpoint f_mntonname for us, so we
189 * don't have to do it here unless we want to set it
190 * to something other than "path" for some rason.
191 */
192 /* Save "mounted from" info for mount point (NULL pad)*/
193 vfs_mountedfrom(mp, from);
194
195 err = hpfs_mountfs(devvp, mp, td);
196 if (err) {
197 vrele(devvp);
198 goto error_1;
199 }
200
201 goto success;
202
203 error_1: /* no state to back out*/
204 /* XXX: Missing NDFREE(&ndp, ...) */
205
206 success:
207 return( err);
208 }
209
210 /*
211 * Common code for mount and mountroot
212 */
213 int
214 hpfs_mountfs(devvp, mp, td)
215 register struct vnode *devvp;
216 struct mount *mp;
217 struct thread *td;
218 {
219 int error, ronly, v;
220 struct sublock *sup;
221 struct spblock *spp;
222 struct hpfsmount *hpmp;
223 struct buf *bp = NULL;
224 struct vnode *vp;
225 struct cdev *dev = devvp->v_rdev;
226 struct g_consumer *cp;
227 struct bufobj *bo;
228
229 if (mp->mnt_flag & MNT_ROOTFS)
230 return (EOPNOTSUPP);
231 dprintf(("hpfs_mountfs():\n"));
232 ronly = (mp->mnt_flag & MNT_RDONLY) != 0;
233 /* XXX: use VOP_ACCESS to check FS perms */
234 DROP_GIANT();
235 g_topology_lock();
236 error = g_vfs_open(devvp, &cp, "hpfs", ronly ? 0 : 1);
237 g_topology_unlock();
238 PICKUP_GIANT();
239 VOP_UNLOCK(devvp, 0, td);
240 if (error)
241 return (error);
242
243 bo = &devvp->v_bufobj;
244 bo->bo_private = cp;
245 bo->bo_ops = g_vfs_bufops;
246
247 /*
248 * Do actual mount
249 */
250 hpmp = malloc(sizeof(struct hpfsmount), M_HPFSMNT, M_WAITOK | M_ZERO);
251
252 hpmp->hpm_cp = cp;
253 hpmp->hpm_bo = bo;
254
255 /* Read in SuperBlock */
256 error = bread(devvp, SUBLOCK, SUSIZE, NOCRED, &bp);
257 if (error)
258 goto failed;
259 bcopy(bp->b_data, &hpmp->hpm_su, sizeof(struct sublock));
260 brelse(bp); bp = NULL;
261
262 /* Read in SpareBlock */
263 error = bread(devvp, SPBLOCK, SPSIZE, NOCRED, &bp);
264 if (error)
265 goto failed;
266 bcopy(bp->b_data, &hpmp->hpm_sp, sizeof(struct spblock));
267 brelse(bp); bp = NULL;
268
269 sup = &hpmp->hpm_su;
270 spp = &hpmp->hpm_sp;
271
272 /* Check magic */
273 if (sup->su_magic != SU_MAGIC) {
274 printf("hpfs_mountfs: SuperBlock MAGIC DOESN'T MATCH\n");
275 error = EINVAL;
276 goto failed;
277 }
278 if (spp->sp_magic != SP_MAGIC) {
279 printf("hpfs_mountfs: SpareBlock MAGIC DOESN'T MATCH\n");
280 error = EINVAL;
281 goto failed;
282 }
283
284 mp->mnt_data = (qaddr_t)hpmp;
285 hpmp->hpm_devvp = devvp;
286 hpmp->hpm_dev = devvp->v_rdev;
287 hpmp->hpm_mp = mp;
288 if (1 == vfs_scanopt(mp->mnt_optnew, "uid", "%d", &v))
289 hpmp->hpm_uid = v;
290 if (1 == vfs_scanopt(mp->mnt_optnew, "gid", "%d", &v))
291 hpmp->hpm_gid = v;
292 if (1 == vfs_scanopt(mp->mnt_optnew, "mode", "%d", &v))
293 hpmp->hpm_mode = v;
294
295 error = hpfs_bminit(hpmp);
296 if (error)
297 goto failed;
298
299 error = hpfs_cpinit(mp, hpmp);
300 if (error) {
301 hpfs_bmdeinit(hpmp);
302 goto failed;
303 }
304
305 error = hpfs_root(mp, LK_EXCLUSIVE, &vp, td);
306 if (error) {
307 hpfs_cpdeinit(hpmp);
308 hpfs_bmdeinit(hpmp);
309 goto failed;
310 }
311
312 vput(vp);
313
314 mp->mnt_stat.f_fsid.val[0] = (long)dev2udev(dev);
315 mp->mnt_stat.f_fsid.val[1] = mp->mnt_vfc->vfc_typenum;
316 mp->mnt_maxsymlinklen = 0;
317 MNT_ILOCK(mp);
318 mp->mnt_flag |= MNT_LOCAL;
319 MNT_IUNLOCK(mp);
320 return (0);
321
322 failed:
323 if (bp)
324 brelse (bp);
325 mp->mnt_data = (qaddr_t)NULL;
326 DROP_GIANT();
327 g_topology_lock();
328 g_vfs_close(cp, td);
329 g_topology_unlock();
330 PICKUP_GIANT();
331 return (error);
332 }
333
334 static int
335 hpfs_unmount(
336 struct mount *mp,
337 int mntflags,
338 struct thread *td)
339 {
340 int error, flags, ronly;
341 register struct hpfsmount *hpmp = VFSTOHPFS(mp);
342
343 dprintf(("hpfs_unmount():\n"));
344
345 ronly = (mp->mnt_flag & MNT_RDONLY) != 0;
346
347 flags = 0;
348 if(mntflags & MNT_FORCE)
349 flags |= FORCECLOSE;
350
351 dprintf(("hpfs_unmount: vflushing...\n"));
352
353 error = vflush(mp, 0, flags, td);
354 if (error) {
355 printf("hpfs_unmount: vflush failed: %d\n",error);
356 return (error);
357 }
358
359 vinvalbuf(hpmp->hpm_devvp, V_SAVE, td, 0, 0);
360 DROP_GIANT();
361 g_topology_lock();
362 g_vfs_close(hpmp->hpm_cp, td);
363 g_topology_unlock();
364 PICKUP_GIANT();
365 vrele(hpmp->hpm_devvp);
366
367 dprintf(("hpfs_umount: freeing memory...\n"));
368 hpfs_cpdeinit(hpmp);
369 hpfs_bmdeinit(hpmp);
370 mp->mnt_data = (qaddr_t)0;
371 MNT_ILOCK(mp);
372 mp->mnt_flag &= ~MNT_LOCAL;
373 MNT_IUNLOCK(mp);
374 FREE(hpmp, M_HPFSMNT);
375
376 return (0);
377 }
378
379 static int
380 hpfs_root(
381 struct mount *mp,
382 int flags,
383 struct vnode **vpp,
384 struct thread *td )
385 {
386 int error = 0;
387 struct hpfsmount *hpmp = VFSTOHPFS(mp);
388
389 dprintf(("hpfs_root():\n"));
390 error = VFS_VGET(mp, (ino_t)hpmp->hpm_su.su_rootfno, LK_EXCLUSIVE, vpp);
391 if(error) {
392 printf("hpfs_root: VFS_VGET failed: %d\n",error);
393 return (error);
394 }
395
396 return (error);
397 }
398
399 static int
400 hpfs_statfs(
401 struct mount *mp,
402 struct statfs *sbp,
403 struct thread *td)
404 {
405 struct hpfsmount *hpmp = VFSTOHPFS(mp);
406
407 dprintf(("hpfs_statfs(): HPFS%d.%d\n",
408 hpmp->hpm_su.su_hpfsver, hpmp->hpm_su.su_fnctver));
409
410 sbp->f_type = mp->mnt_vfc->vfc_typenum;
411 sbp->f_bsize = DEV_BSIZE;
412 sbp->f_iosize = DEV_BSIZE;
413 sbp->f_blocks = hpmp->hpm_su.su_btotal;
414 sbp->f_bfree = sbp->f_bavail = hpmp->hpm_bavail;
415 sbp->f_ffree = 0;
416 sbp->f_files = 0;
417 sbp->f_flags = mp->mnt_flag;
418
419 return (0);
420 }
421
422 /*ARGSUSED*/
423 static int
424 hpfs_fhtovp(
425 struct mount *mp,
426 struct fid *fhp,
427 struct vnode **vpp)
428 {
429 struct vnode *nvp;
430 struct hpfid *hpfhp = (struct hpfid *)fhp;
431 int error;
432
433 if ((error = VFS_VGET(mp, hpfhp->hpfid_ino, LK_EXCLUSIVE, &nvp)) != 0) {
434 *vpp = NULLVP;
435 return (error);
436 }
437 /* XXX as unlink/rmdir/mkdir/creat are not currently possible
438 * with HPFS, we don't need to check anything else for now */
439 *vpp = nvp;
440
441 return (0);
442 }
443
444 static int
445 hpfs_vget(
446 struct mount *mp,
447 ino_t ino,
448 int flags,
449 struct vnode **vpp)
450 {
451 struct hpfsmount *hpmp = VFSTOHPFS(mp);
452 struct vnode *vp;
453 struct hpfsnode *hp;
454 struct buf *bp;
455 int error;
456 struct thread *td;
457
458 dprintf(("hpfs_vget(0x%x): ",ino));
459
460 error = vfs_hash_get(mp, ino, flags, curthread, vpp, NULL, NULL);
461 if (error || *vpp != NULL)
462 return (error);
463
464 *vpp = NULL;
465 hp = NULL;
466 vp = NULL;
467
468 /*
469 * We have to lock node creation for a while,
470 * but then we have to call getnewvnode(),
471 * this may cause hpfs_reclaim() to be called,
472 * this may need to VOP_VGET() parent dir for
473 * update reasons, and if parent is not in
474 * hash, we have to lock node creation...
475 * To solve this, we MALLOC, getnewvnode and init while
476 * not locked (probability of node appearence
477 * at that time is little, and anyway - we'll
478 * check for it).
479 */
480 MALLOC(hp, struct hpfsnode *, sizeof(struct hpfsnode),
481 M_HPFSNO, M_WAITOK);
482
483 error = getnewvnode("hpfs", mp, &hpfs_vnodeops, &vp);
484 if (error) {
485 printf("hpfs_vget: can't get new vnode\n");
486 FREE(hp, M_HPFSNO);
487 return (error);
488 }
489
490 dprintf(("prenew "));
491
492 vp->v_data = hp;
493
494 if (ino == (ino_t)hpmp->hpm_su.su_rootfno)
495 vp->v_vflag |= VV_ROOT;
496
497
498 mtx_init(&hp->h_interlock, "hpfsnode interlock", NULL, MTX_DEF);
499
500 hp->h_flag = H_INVAL;
501 hp->h_vp = vp;
502 hp->h_hpmp = hpmp;
503 hp->h_no = ino;
504 hp->h_dev = hpmp->hpm_dev;
505 hp->h_uid = hpmp->hpm_uid;
506 hp->h_gid = hpmp->hpm_uid;
507 hp->h_mode = hpmp->hpm_mode;
508 hp->h_devvp = hpmp->hpm_devvp;
509
510 td = curthread;
511 lockmgr(vp->v_vnlock, LK_EXCLUSIVE, NULL, td);
512 error = insmntque(vp, mp);
513 if (error != 0) {
514 free(hp, M_HPFSNO);
515 return (error);
516 }
517 error = vfs_hash_insert(vp, ino, flags, td, vpp, NULL, NULL);
518 if (error || *vpp != NULL)
519 return (error);
520
521 error = bread(hpmp->hpm_devvp, ino, FNODESIZE, NOCRED, &bp);
522 if (error) {
523 printf("hpfs_vget: can't read ino %d\n",ino);
524 vput(vp);
525 return (error);
526 }
527 bcopy(bp->b_data, &hp->h_fn, sizeof(struct fnode));
528 brelse(bp);
529
530 if (hp->h_fn.fn_magic != FN_MAGIC) {
531 printf("hpfs_vget: MAGIC DOESN'T MATCH\n");
532 vput(vp);
533 return (EINVAL);
534 }
535
536 vp->v_type = hp->h_fn.fn_flag ? VDIR:VREG;
537 hp->h_flag &= ~H_INVAL;
538
539 *vpp = vp;
540
541 return (0);
542 }
543
544 static struct vfsops hpfs_vfsops = {
545 .vfs_fhtovp = hpfs_fhtovp,
546 .vfs_cmount = hpfs_cmount,
547 .vfs_mount = hpfs_mount,
548 .vfs_root = hpfs_root,
549 .vfs_statfs = hpfs_statfs,
550 .vfs_unmount = hpfs_unmount,
551 .vfs_vget = hpfs_vget,
552 };
553 VFS_SET(hpfs_vfsops, hpfs, 0);
Cache object: 9197601dadf8a6624f2cacf800c76aaa
|