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: releng/5.0/sys/fs/hpfs/hpfs_vfsops.c 106594 2002-11-07 22:33:28Z jhb $
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_root(struct mount *, struct vnode **);
59 static int hpfs_statfs(struct mount *, struct statfs *, struct thread *);
60 static int hpfs_unmount(struct mount *, int, struct thread *);
61 static int hpfs_vget(struct mount *mp, ino_t ino, int flags,
62 struct vnode **vpp);
63 static int hpfs_mountfs(register struct vnode *, struct mount *,
64 struct hpfs_args *, struct thread *);
65 static int hpfs_vptofh(struct vnode *, struct fid *);
66 static int hpfs_fhtovp(struct mount *, struct fid *, struct vnode **);
67 static int hpfs_mount(struct mount *, char *, caddr_t,
68 struct nameidata *, struct thread *);
69 static int hpfs_init(struct vfsconf *);
70 static int hpfs_uninit(struct vfsconf *);
71
72 static int
73 hpfs_init (
74 struct vfsconf *vcp )
75 {
76 dprintf(("hpfs_init():\n"));
77
78 hpfs_hphashinit();
79 return 0;
80 }
81
82 static int
83 hpfs_uninit (vfsp)
84 struct vfsconf *vfsp;
85 {
86 hpfs_hphashdestroy();
87 return 0;;
88 }
89
90 static int
91 hpfs_mount (
92 struct mount *mp,
93 char *path,
94 caddr_t data,
95 struct nameidata *ndp,
96 struct thread *td )
97 {
98 size_t size;
99 int err = 0;
100 struct vnode *devvp;
101 struct hpfs_args args;
102 struct hpfsmount *hpmp = 0;
103
104 dprintf(("hpfs_mount():\n"));
105 /*
106 ***
107 * Mounting non-root filesystem or updating a filesystem
108 ***
109 */
110
111 /* copy in user arguments*/
112 err = copyin(data, (caddr_t)&args, sizeof (struct hpfs_args));
113 if (err)
114 goto error_1; /* can't get arguments*/
115
116 /*
117 * If updating, check whether changing from read-only to
118 * read/write; if there is no device name, that's all we do.
119 */
120 if (mp->mnt_flag & MNT_UPDATE) {
121 dprintf(("hpfs_mount: MNT_UPDATE: "));
122
123 hpmp = VFSTOHPFS(mp);
124
125 if (args.fspec == 0) {
126 dprintf(("export 0x%x\n",args.export.ex_flags));
127 err = vfs_export(mp, &args.export);
128 if (err) {
129 printf("hpfs_mount: vfs_export failed %d\n",
130 err);
131 }
132 goto success;
133 } else {
134 dprintf(("name [FAILED]\n"));
135 err = EINVAL;
136 goto success;
137 }
138 dprintf(("\n"));
139 }
140
141 /*
142 * Not an update, or updating the name: look up the name
143 * and verify that it refers to a sensible block device.
144 */
145 NDINIT(ndp, LOOKUP, FOLLOW, UIO_USERSPACE, args.fspec, td);
146 err = namei(ndp);
147 if (err) {
148 /* can't get devvp!*/
149 goto error_1;
150 }
151
152 devvp = ndp->ni_vp;
153
154 if (!vn_isdisk(devvp, &err))
155 goto error_2;
156
157 /*
158 ********************
159 * NEW MOUNT
160 ********************
161 */
162
163 /*
164 * Since this is a new mount, we want the names for
165 * the device and the mount point copied in. If an
166 * error occurs, the mountpoint is discarded by the
167 * upper level code. Note that vfs_mount() handles
168 * copying the mountpoint f_mntonname for us, so we
169 * don't have to do it here unless we want to set it
170 * to something other than "path" for some rason.
171 */
172 /* Save "mounted from" info for mount point (NULL pad)*/
173 copyinstr( args.fspec, /* device name*/
174 mp->mnt_stat.f_mntfromname, /* save area*/
175 MNAMELEN - 1, /* max size*/
176 &size); /* real size*/
177 bzero( mp->mnt_stat.f_mntfromname + size, MNAMELEN - size);
178
179 err = hpfs_mountfs(devvp, mp, &args, td);
180 if (err)
181 goto error_2;
182
183 /*
184 * Initialize FS stat information in mount struct; uses both
185 * mp->mnt_stat.f_mntonname and mp->mnt_stat.f_mntfromname
186 *
187 * This code is common to root and non-root mounts
188 */
189 (void)VFS_STATFS(mp, &mp->mnt_stat, td);
190
191 goto success;
192
193
194 error_2: /* error with devvp held*/
195
196 /* release devvp before failing*/
197 vrele(devvp);
198
199 error_1: /* no state to back out*/
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 dev_t 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 && devvp != rootvp)
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);
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);
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);
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 {
377 int error = 0;
378 struct hpfsmount *hpmp = VFSTOHPFS(mp);
379
380 dprintf(("hpfs_root():\n"));
381 error = VFS_VGET(mp, (ino_t)hpmp->hpm_su.su_rootfno, LK_EXCLUSIVE, vpp);
382 if(error) {
383 printf("hpfs_root: VFS_VGET failed: %d\n",error);
384 return (error);
385 }
386
387 return (error);
388 }
389
390 static int
391 hpfs_statfs(
392 struct mount *mp,
393 struct statfs *sbp,
394 struct thread *td)
395 {
396 struct hpfsmount *hpmp = VFSTOHPFS(mp);
397
398 dprintf(("hpfs_statfs(): HPFS%d.%d\n",
399 hpmp->hpm_su.su_hpfsver, hpmp->hpm_su.su_fnctver));
400
401 sbp->f_type = mp->mnt_vfc->vfc_typenum;
402 sbp->f_bsize = DEV_BSIZE;
403 sbp->f_iosize = DEV_BSIZE;
404 sbp->f_blocks = hpmp->hpm_su.su_btotal;
405 sbp->f_bfree = sbp->f_bavail = hpmp->hpm_bavail;
406 sbp->f_ffree = 0;
407 sbp->f_files = 0;
408 if (sbp != &mp->mnt_stat) {
409 bcopy((caddr_t)mp->mnt_stat.f_mntonname,
410 (caddr_t)&sbp->f_mntonname[0], MNAMELEN);
411 bcopy((caddr_t)mp->mnt_stat.f_mntfromname,
412 (caddr_t)&sbp->f_mntfromname[0], MNAMELEN);
413 }
414 sbp->f_flags = mp->mnt_flag;
415
416 return (0);
417 }
418
419 /*ARGSUSED*/
420 static int
421 hpfs_fhtovp(
422 struct mount *mp,
423 struct fid *fhp,
424 struct vnode **vpp)
425 {
426 struct vnode *nvp;
427 struct hpfid *hpfhp = (struct hpfid *)fhp;
428 int error;
429
430 if ((error = VFS_VGET(mp, hpfhp->hpfid_ino, LK_EXCLUSIVE, &nvp)) != 0) {
431 *vpp = NULLVP;
432 return (error);
433 }
434 /* XXX as unlink/rmdir/mkdir/creat are not currently possible
435 * with HPFS, we don't need to check anything else for now */
436 *vpp = nvp;
437
438 return (0);
439 }
440
441 static int
442 hpfs_vptofh(
443 struct vnode *vp,
444 struct fid *fhp)
445 {
446 register struct hpfsnode *hpp;
447 register struct hpfid *hpfhp;
448
449 hpp = VTOHP(vp);
450 hpfhp = (struct hpfid *)fhp;
451 hpfhp->hpfid_len = sizeof(struct hpfid);
452 hpfhp->hpfid_ino = hpp->h_no;
453 /* hpfhp->hpfid_gen = hpp->h_gen; */
454 return (0);
455 }
456
457 static int
458 hpfs_vget(
459 struct mount *mp,
460 ino_t ino,
461 int flags,
462 struct vnode **vpp)
463 {
464 struct hpfsmount *hpmp = VFSTOHPFS(mp);
465 struct vnode *vp;
466 struct hpfsnode *hp;
467 struct buf *bp;
468 struct thread *td = curthread; /* XXX */
469 int error;
470
471 dprintf(("hpfs_vget(0x%x): ",ino));
472
473 *vpp = NULL;
474 hp = NULL;
475 vp = NULL;
476
477 if ((error = hpfs_hphashvget(hpmp->hpm_dev, ino, flags, vpp, td)) != 0)
478 return (error);
479 if (*vpp != NULL) {
480 dprintf(("hashed\n"));
481 return (0);
482 }
483
484 /*
485 * We have to lock node creation for a while,
486 * but then we have to call getnewvnode(),
487 * this may cause hpfs_reclaim() to be called,
488 * this may need to VOP_VGET() parent dir for
489 * update reasons, and if parent is not in
490 * hash, we have to lock node creation...
491 * To solve this, we MALLOC, getnewvnode and init while
492 * not locked (probability of node appearence
493 * at that time is little, and anyway - we'll
494 * check for it).
495 */
496 MALLOC(hp, struct hpfsnode *, sizeof(struct hpfsnode),
497 M_HPFSNO, M_WAITOK);
498
499 error = getnewvnode("hpfs", hpmp->hpm_mp, hpfs_vnodeop_p, &vp);
500 if (error) {
501 printf("hpfs_vget: can't get new vnode\n");
502 FREE(hp, M_HPFSNO);
503 return (error);
504 }
505
506 dprintf(("prenew "));
507
508 vp->v_data = hp;
509
510 if (ino == (ino_t)hpmp->hpm_su.su_rootfno)
511 vp->v_vflag |= VV_ROOT;
512
513
514 mtx_init(&hp->h_interlock, "hpfsnode interlock", NULL, MTX_DEF);
515
516 hp->h_flag = H_INVAL;
517 hp->h_vp = vp;
518 hp->h_hpmp = hpmp;
519 hp->h_no = ino;
520 hp->h_dev = hpmp->hpm_dev;
521 hp->h_uid = hpmp->hpm_uid;
522 hp->h_gid = hpmp->hpm_uid;
523 hp->h_mode = hpmp->hpm_mode;
524 hp->h_devvp = hpmp->hpm_devvp;
525 VREF(hp->h_devvp);
526
527 error = vn_lock(vp, LK_EXCLUSIVE, td);
528 if (error) {
529 vput(vp);
530 return (error);
531 }
532
533 do {
534 if ((error =
535 hpfs_hphashvget(hpmp->hpm_dev, ino, flags, vpp, td))) {
536 vput(vp);
537 return (error);
538 }
539 if (*vpp != NULL) {
540 dprintf(("hashed2\n"));
541 vput(vp);
542 return (0);
543 }
544 } while(lockmgr(&hpfs_hphash_lock,LK_EXCLUSIVE|LK_SLEEPFAIL,NULL,NULL));
545
546 hpfs_hphashins(hp);
547
548 lockmgr(&hpfs_hphash_lock, LK_RELEASE, NULL, NULL);
549
550 error = bread(hpmp->hpm_devvp, ino, FNODESIZE, NOCRED, &bp);
551 if (error) {
552 printf("hpfs_vget: can't read ino %d\n",ino);
553 vput(vp);
554 return (error);
555 }
556 bcopy(bp->b_data, &hp->h_fn, sizeof(struct fnode));
557 brelse(bp);
558
559 if (hp->h_fn.fn_magic != FN_MAGIC) {
560 printf("hpfs_vget: MAGIC DOESN'T MATCH\n");
561 vput(vp);
562 return (EINVAL);
563 }
564
565 vp->v_type = hp->h_fn.fn_flag ? VDIR:VREG;
566 hp->h_flag &= ~H_INVAL;
567
568 *vpp = vp;
569
570 return (0);
571 }
572
573 static struct vfsops hpfs_vfsops = {
574 hpfs_mount,
575 vfs_stdstart,
576 hpfs_unmount,
577 hpfs_root,
578 vfs_stdquotactl,
579 hpfs_statfs,
580 vfs_stdsync,
581 hpfs_vget,
582 hpfs_fhtovp,
583 vfs_stdcheckexp,
584 hpfs_vptofh,
585 hpfs_init,
586 hpfs_uninit,
587 vfs_stdextattrctl,
588 };
589 VFS_SET(hpfs_vfsops, hpfs, 0);
Cache object: 870be88e6892b99eba6503153618d4da
|