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 <vm/vm.h>
44 #include <vm/vm_param.h>
45 #include <vm/vm_page.h>
46 #include <vm/vm_object.h>
47 #include <vm/vm_extern.h>
48
49 #include <fs/hpfs/hpfs.h>
50 #include <fs/hpfs/hpfsmount.h>
51 #include <fs/hpfs/hpfs_subr.h>
52
53 MALLOC_DEFINE(M_HPFSMNT, "HPFS mount", "HPFS mount structure");
54 MALLOC_DEFINE(M_HPFSNO, "HPFS node", "HPFS node structure");
55
56 struct sockaddr;
57
58 static int hpfs_mountfs(register struct vnode *, struct mount *,
59 struct hpfs_args *, struct thread *);
60
61 static vfs_init_t hpfs_init;
62 static vfs_uninit_t hpfs_uninit;
63 static vfs_fhtovp_t hpfs_fhtovp;
64 static vfs_vget_t hpfs_vget;
65 static vfs_omount_t hpfs_omount;
66 static vfs_root_t hpfs_root;
67 static vfs_statfs_t hpfs_statfs;
68 static vfs_unmount_t hpfs_unmount;
69 static vfs_vptofh_t hpfs_vptofh;
70
71 static int
72 hpfs_init (
73 struct vfsconf *vcp )
74 {
75 dprintf(("hpfs_init():\n"));
76
77 hpfs_hphashinit();
78 return 0;
79 }
80
81 static int
82 hpfs_uninit (vfsp)
83 struct vfsconf *vfsp;
84 {
85 hpfs_hphashdestroy();
86 return 0;;
87 }
88
89 static int
90 hpfs_omount (
91 struct mount *mp,
92 char *path,
93 caddr_t data,
94 struct thread *td )
95 {
96 size_t size;
97 int err = 0;
98 struct vnode *devvp;
99 struct hpfs_args args;
100 struct hpfsmount *hpmp = 0;
101 struct nameidata ndp;
102
103 dprintf(("hpfs_omount():\n"));
104 /*
105 ***
106 * Mounting non-root filesystem or updating a filesystem
107 ***
108 */
109
110 /* copy in user arguments*/
111 err = copyin(data, (caddr_t)&args, sizeof (struct hpfs_args));
112 if (err)
113 goto error_1; /* can't get arguments*/
114
115 /*
116 * If updating, check whether changing from read-only to
117 * read/write; if there is no device name, that's all we do.
118 */
119 if (mp->mnt_flag & MNT_UPDATE) {
120 dprintf(("hpfs_omount: MNT_UPDATE: "));
121
122 hpmp = VFSTOHPFS(mp);
123
124 if (args.fspec == 0) {
125 dprintf(("export 0x%x\n",args.export.ex_flags));
126 err = vfs_export(mp, &args.export);
127 if (err) {
128 printf("hpfs_omount: vfs_export failed %d\n",
129 err);
130 }
131 goto success;
132 } else {
133 dprintf(("name [FAILED]\n"));
134 err = EINVAL;
135 goto success;
136 }
137 dprintf(("\n"));
138 }
139
140 /*
141 * Not an update, or updating the name: look up the name
142 * and verify that it refers to a sensible block device.
143 */
144 NDINIT(&ndp, LOOKUP, FOLLOW, UIO_USERSPACE, args.fspec, td);
145 err = namei(&ndp);
146 if (err) {
147 /* can't get devvp!*/
148 goto error_1;
149 }
150
151 devvp = ndp.ni_vp;
152
153 if (!vn_isdisk(devvp, &err))
154 goto error_2;
155
156 /*
157 ********************
158 * NEW MOUNT
159 ********************
160 */
161
162 /*
163 * Since this is a new mount, we want the names for
164 * the device and the mount point copied in. If an
165 * error occurs, the mountpoint is discarded by the
166 * upper level code. Note that vfs_omount() handles
167 * copying the mountpoint f_mntonname for us, so we
168 * don't have to do it here unless we want to set it
169 * to something other than "path" for some rason.
170 */
171 /* Save "mounted from" info for mount point (NULL pad)*/
172 copyinstr( args.fspec, /* device name*/
173 mp->mnt_stat.f_mntfromname, /* save area*/
174 MNAMELEN - 1, /* max size*/
175 &size); /* real size*/
176 bzero( mp->mnt_stat.f_mntfromname + size, MNAMELEN - size);
177
178 err = hpfs_mountfs(devvp, mp, &args, td);
179 if (err)
180 goto error_2;
181
182 /*
183 * Initialize FS stat information in mount struct; uses both
184 * mp->mnt_stat.f_mntonname and mp->mnt_stat.f_mntfromname
185 *
186 * This code is common to root and non-root mounts
187 */
188 (void)VFS_STATFS(mp, &mp->mnt_stat, td);
189
190 goto success;
191
192
193 error_2: /* error with devvp held*/
194
195 /* release devvp before failing*/
196 vrele(devvp);
197
198 error_1: /* no state to back out*/
199 /* XXX: Missing NDFREE(&ndp, ...) */
200
201 success:
202 return( err);
203 }
204
205 /*
206 * Common code for mount and mountroot
207 */
208 int
209 hpfs_mountfs(devvp, mp, argsp, td)
210 register struct vnode *devvp;
211 struct mount *mp;
212 struct hpfs_args *argsp;
213 struct thread *td;
214 {
215 int error, ncount, ronly;
216 struct sublock *sup;
217 struct spblock *spp;
218 struct hpfsmount *hpmp;
219 struct buf *bp = NULL;
220 struct vnode *vp;
221 struct cdev *dev = devvp->v_rdev;
222
223 dprintf(("hpfs_mountfs():\n"));
224 /*
225 * Disallow multiple mounts of the same device.
226 * Disallow mounting of a device that is currently in use
227 * (except for root, which might share swap device for miniroot).
228 * Flush out any old buffers remaining from a previous use.
229 */
230 error = vfs_mountedon(devvp);
231 if (error)
232 return (error);
233 ncount = vcount(devvp);
234 if (devvp->v_object)
235 ncount -= 1;
236 if (ncount > 1)
237 return (EBUSY);
238
239 vn_lock(devvp, LK_EXCLUSIVE | LK_RETRY, td);
240 error = vinvalbuf(devvp, V_SAVE, td->td_ucred, td, 0, 0);
241 VOP_UNLOCK(devvp, 0, td);
242 if (error)
243 return (error);
244
245 ronly = (mp->mnt_flag & MNT_RDONLY) != 0;
246 vn_lock(devvp, LK_EXCLUSIVE | LK_RETRY, td);
247 error = VOP_OPEN(devvp, ronly ? FREAD : FREAD|FWRITE, FSCRED, td, -1);
248 VOP_UNLOCK(devvp, 0, td);
249 if (error)
250 return (error);
251
252 /*
253 * Do actual mount
254 */
255 hpmp = malloc(sizeof(struct hpfsmount), M_HPFSMNT, M_WAITOK | M_ZERO);
256
257 /* Read in SuperBlock */
258 error = bread(devvp, SUBLOCK, SUSIZE, NOCRED, &bp);
259 if (error)
260 goto failed;
261 bcopy(bp->b_data, &hpmp->hpm_su, sizeof(struct sublock));
262 brelse(bp); bp = NULL;
263
264 /* Read in SpareBlock */
265 error = bread(devvp, SPBLOCK, SPSIZE, NOCRED, &bp);
266 if (error)
267 goto failed;
268 bcopy(bp->b_data, &hpmp->hpm_sp, sizeof(struct spblock));
269 brelse(bp); bp = NULL;
270
271 sup = &hpmp->hpm_su;
272 spp = &hpmp->hpm_sp;
273
274 /* Check magic */
275 if (sup->su_magic != SU_MAGIC) {
276 printf("hpfs_mountfs: SuperBlock MAGIC DOESN'T MATCH\n");
277 error = EINVAL;
278 goto failed;
279 }
280 if (spp->sp_magic != SP_MAGIC) {
281 printf("hpfs_mountfs: SpareBlock MAGIC DOESN'T MATCH\n");
282 error = EINVAL;
283 goto failed;
284 }
285
286 mp->mnt_data = (qaddr_t)hpmp;
287 hpmp->hpm_devvp = devvp;
288 hpmp->hpm_dev = devvp->v_rdev;
289 hpmp->hpm_mp = mp;
290 hpmp->hpm_uid = argsp->uid;
291 hpmp->hpm_gid = argsp->gid;
292 hpmp->hpm_mode = argsp->mode;
293
294 error = hpfs_bminit(hpmp);
295 if (error)
296 goto failed;
297
298 error = hpfs_cpinit(hpmp, argsp);
299 if (error) {
300 hpfs_bmdeinit(hpmp);
301 goto failed;
302 }
303
304 error = hpfs_root(mp, &vp, td);
305 if (error) {
306 hpfs_cpdeinit(hpmp);
307 hpfs_bmdeinit(hpmp);
308 goto failed;
309 }
310
311 vput(vp);
312
313 mp->mnt_stat.f_fsid.val[0] = (long)dev2udev(dev);
314 mp->mnt_stat.f_fsid.val[1] = mp->mnt_vfc->vfc_typenum;
315 mp->mnt_maxsymlinklen = 0;
316 mp->mnt_flag |= MNT_LOCAL;
317 devvp->v_rdev->si_mountpoint = mp;
318 return (0);
319
320 failed:
321 if (bp)
322 brelse (bp);
323 mp->mnt_data = (qaddr_t)NULL;
324 devvp->v_rdev->si_mountpoint = NULL;
325 (void)VOP_CLOSE(devvp, ronly ? FREAD : FREAD|FWRITE, NOCRED, td);
326 return (error);
327 }
328
329 static int
330 hpfs_unmount(
331 struct mount *mp,
332 int mntflags,
333 struct thread *td)
334 {
335 int error, flags, ronly;
336 register struct hpfsmount *hpmp = VFSTOHPFS(mp);
337
338 dprintf(("hpfs_unmount():\n"));
339
340 ronly = (mp->mnt_flag & MNT_RDONLY) != 0;
341
342 flags = 0;
343 if(mntflags & MNT_FORCE)
344 flags |= FORCECLOSE;
345
346 dprintf(("hpfs_unmount: vflushing...\n"));
347
348 error = vflush(mp, 0, flags, td);
349 if (error) {
350 printf("hpfs_unmount: vflush failed: %d\n",error);
351 return (error);
352 }
353
354 hpmp->hpm_devvp->v_rdev->si_mountpoint = NULL;
355
356 vinvalbuf(hpmp->hpm_devvp, V_SAVE, NOCRED, td, 0, 0);
357 error = VOP_CLOSE(hpmp->hpm_devvp, ronly ? FREAD : FREAD|FWRITE,
358 NOCRED, td);
359
360 vrele(hpmp->hpm_devvp);
361
362 dprintf(("hpfs_umount: freeing memory...\n"));
363 hpfs_cpdeinit(hpmp);
364 hpfs_bmdeinit(hpmp);
365 mp->mnt_data = (qaddr_t)0;
366 mp->mnt_flag &= ~MNT_LOCAL;
367 FREE(hpmp, M_HPFSMNT);
368
369 return (0);
370 }
371
372 static int
373 hpfs_root(
374 struct mount *mp,
375 struct vnode **vpp,
376 struct thread *td )
377 {
378 int error = 0;
379 struct hpfsmount *hpmp = VFSTOHPFS(mp);
380
381 dprintf(("hpfs_root():\n"));
382 error = VFS_VGET(mp, (ino_t)hpmp->hpm_su.su_rootfno, LK_EXCLUSIVE, vpp);
383 if(error) {
384 printf("hpfs_root: VFS_VGET failed: %d\n",error);
385 return (error);
386 }
387
388 return (error);
389 }
390
391 static int
392 hpfs_statfs(
393 struct mount *mp,
394 struct statfs *sbp,
395 struct thread *td)
396 {
397 struct hpfsmount *hpmp = VFSTOHPFS(mp);
398
399 dprintf(("hpfs_statfs(): HPFS%d.%d\n",
400 hpmp->hpm_su.su_hpfsver, hpmp->hpm_su.su_fnctver));
401
402 sbp->f_type = mp->mnt_vfc->vfc_typenum;
403 sbp->f_bsize = DEV_BSIZE;
404 sbp->f_iosize = DEV_BSIZE;
405 sbp->f_blocks = hpmp->hpm_su.su_btotal;
406 sbp->f_bfree = sbp->f_bavail = hpmp->hpm_bavail;
407 sbp->f_ffree = 0;
408 sbp->f_files = 0;
409 if (sbp != &mp->mnt_stat) {
410 bcopy((caddr_t)mp->mnt_stat.f_mntonname,
411 (caddr_t)&sbp->f_mntonname[0], MNAMELEN);
412 bcopy((caddr_t)mp->mnt_stat.f_mntfromname,
413 (caddr_t)&sbp->f_mntfromname[0], MNAMELEN);
414 }
415 sbp->f_flags = mp->mnt_flag;
416
417 return (0);
418 }
419
420 /*ARGSUSED*/
421 static int
422 hpfs_fhtovp(
423 struct mount *mp,
424 struct fid *fhp,
425 struct vnode **vpp)
426 {
427 struct vnode *nvp;
428 struct hpfid *hpfhp = (struct hpfid *)fhp;
429 int error;
430
431 if ((error = VFS_VGET(mp, hpfhp->hpfid_ino, LK_EXCLUSIVE, &nvp)) != 0) {
432 *vpp = NULLVP;
433 return (error);
434 }
435 /* XXX as unlink/rmdir/mkdir/creat are not currently possible
436 * with HPFS, we don't need to check anything else for now */
437 *vpp = nvp;
438
439 return (0);
440 }
441
442 static int
443 hpfs_vptofh(
444 struct vnode *vp,
445 struct fid *fhp)
446 {
447 register struct hpfsnode *hpp;
448 register struct hpfid *hpfhp;
449
450 hpp = VTOHP(vp);
451 hpfhp = (struct hpfid *)fhp;
452 hpfhp->hpfid_len = sizeof(struct hpfid);
453 hpfhp->hpfid_ino = hpp->h_no;
454 /* hpfhp->hpfid_gen = hpp->h_gen; */
455 return (0);
456 }
457
458 static int
459 hpfs_vget(
460 struct mount *mp,
461 ino_t ino,
462 int flags,
463 struct vnode **vpp)
464 {
465 struct hpfsmount *hpmp = VFSTOHPFS(mp);
466 struct vnode *vp;
467 struct hpfsnode *hp;
468 struct buf *bp;
469 struct thread *td = curthread; /* XXX */
470 int error;
471
472 dprintf(("hpfs_vget(0x%x): ",ino));
473
474 *vpp = NULL;
475 hp = NULL;
476 vp = NULL;
477
478 if ((error = hpfs_hphashvget(hpmp->hpm_dev, ino, flags, vpp, td)) != 0)
479 return (error);
480 if (*vpp != NULL) {
481 dprintf(("hashed\n"));
482 return (0);
483 }
484
485 /*
486 * We have to lock node creation for a while,
487 * but then we have to call getnewvnode(),
488 * this may cause hpfs_reclaim() to be called,
489 * this may need to VOP_VGET() parent dir for
490 * update reasons, and if parent is not in
491 * hash, we have to lock node creation...
492 * To solve this, we MALLOC, getnewvnode and init while
493 * not locked (probability of node appearence
494 * at that time is little, and anyway - we'll
495 * check for it).
496 */
497 MALLOC(hp, struct hpfsnode *, sizeof(struct hpfsnode),
498 M_HPFSNO, M_WAITOK);
499
500 error = getnewvnode("hpfs", hpmp->hpm_mp, hpfs_vnodeop_p, &vp);
501 if (error) {
502 printf("hpfs_vget: can't get new vnode\n");
503 FREE(hp, M_HPFSNO);
504 return (error);
505 }
506
507 dprintf(("prenew "));
508
509 vp->v_data = hp;
510
511 if (ino == (ino_t)hpmp->hpm_su.su_rootfno)
512 vp->v_vflag |= VV_ROOT;
513
514
515 mtx_init(&hp->h_interlock, "hpfsnode interlock", NULL, MTX_DEF);
516
517 hp->h_flag = H_INVAL;
518 hp->h_vp = vp;
519 hp->h_hpmp = hpmp;
520 hp->h_no = ino;
521 hp->h_dev = hpmp->hpm_dev;
522 hp->h_uid = hpmp->hpm_uid;
523 hp->h_gid = hpmp->hpm_uid;
524 hp->h_mode = hpmp->hpm_mode;
525 hp->h_devvp = hpmp->hpm_devvp;
526 VREF(hp->h_devvp);
527
528 error = vn_lock(vp, LK_EXCLUSIVE, td);
529 if (error) {
530 vput(vp);
531 return (error);
532 }
533
534 do {
535 if ((error =
536 hpfs_hphashvget(hpmp->hpm_dev, ino, flags, vpp, td))) {
537 vput(vp);
538 return (error);
539 }
540 if (*vpp != NULL) {
541 dprintf(("hashed2\n"));
542 vput(vp);
543 return (0);
544 }
545 } while(lockmgr(&hpfs_hphash_lock,LK_EXCLUSIVE|LK_SLEEPFAIL,NULL,NULL));
546
547 hpfs_hphashins(hp);
548
549 lockmgr(&hpfs_hphash_lock, LK_RELEASE, NULL, NULL);
550
551 error = bread(hpmp->hpm_devvp, ino, FNODESIZE, NOCRED, &bp);
552 if (error) {
553 printf("hpfs_vget: can't read ino %d\n",ino);
554 vput(vp);
555 return (error);
556 }
557 bcopy(bp->b_data, &hp->h_fn, sizeof(struct fnode));
558 brelse(bp);
559
560 if (hp->h_fn.fn_magic != FN_MAGIC) {
561 printf("hpfs_vget: MAGIC DOESN'T MATCH\n");
562 vput(vp);
563 return (EINVAL);
564 }
565
566 vp->v_type = hp->h_fn.fn_flag ? VDIR:VREG;
567 hp->h_flag &= ~H_INVAL;
568
569 *vpp = vp;
570
571 return (0);
572 }
573
574 static struct vfsops hpfs_vfsops = {
575 .vfs_fhtovp = hpfs_fhtovp,
576 .vfs_init = hpfs_init,
577 .vfs_omount = hpfs_omount,
578 .vfs_root = hpfs_root,
579 .vfs_statfs = hpfs_statfs,
580 .vfs_uninit = hpfs_uninit,
581 .vfs_unmount = hpfs_unmount,
582 .vfs_vget = hpfs_vget,
583 .vfs_vptofh = hpfs_vptofh,
584 };
585 VFS_SET(hpfs_vfsops, hpfs, 0);
Cache object: a8dbc954f2cb01458da206494cf87c9c
|