xref: /minix3/sys/fs/udf/udf_vfsops.c (revision ebfedea0ce5bbe81e252ddf32d732e40fb633fae)
1 /* $NetBSD: udf_vfsops.c,v 1.64 2013/09/30 18:58:00 hannken Exp $ */
2 
3 /*
4  * Copyright (c) 2006, 2008 Reinoud Zandijk
5  * All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  *
16  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
17  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
18  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
19  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
20  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
21  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
22  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
23  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
24  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
25  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
26  *
27  */
28 
29 #include <sys/cdefs.h>
30 #ifndef lint
31 __KERNEL_RCSID(0, "$NetBSD: udf_vfsops.c,v 1.64 2013/09/30 18:58:00 hannken Exp $");
32 #endif /* not lint */
33 
34 
35 #if defined(_KERNEL_OPT)
36 #include "opt_compat_netbsd.h"
37 #endif
38 
39 #include <sys/param.h>
40 #include <sys/systm.h>
41 #include <sys/sysctl.h>
42 #include <sys/namei.h>
43 #include <sys/proc.h>
44 #include <sys/kernel.h>
45 #include <sys/vnode.h>
46 #include <miscfs/genfs/genfs.h>
47 #include <miscfs/specfs/specdev.h>
48 #include <sys/mount.h>
49 #include <sys/buf.h>
50 #include <sys/file.h>
51 #include <sys/device.h>
52 #include <sys/disklabel.h>
53 #include <sys/ioctl.h>
54 #include <sys/malloc.h>
55 #include <sys/dirent.h>
56 #include <sys/stat.h>
57 #include <sys/conf.h>
58 #include <sys/kauth.h>
59 #include <sys/module.h>
60 
61 #include <fs/udf/ecma167-udf.h>
62 #include <fs/udf/udf_mount.h>
63 #include <sys/dirhash.h>
64 
65 #include "udf.h"
66 #include "udf_subr.h"
67 #include "udf_bswap.h"
68 
69 MODULE(MODULE_CLASS_VFS, udf, NULL);
70 
71 #define VTOI(vnode) ((struct udf_node *) vnode->v_data)
72 
73 /* verbose levels of the udf filingsystem */
74 int udf_verbose = UDF_DEBUGGING;
75 
76 /* malloc regions */
77 MALLOC_JUSTDEFINE(M_UDFMNT,   "UDF mount",	"UDF mount structures");
78 MALLOC_JUSTDEFINE(M_UDFVOLD,  "UDF volspace",	"UDF volume space descriptors");
79 MALLOC_JUSTDEFINE(M_UDFTEMP,  "UDF temp",	"UDF scrap space");
80 struct pool udf_node_pool;
81 
82 /* supported functions predefined */
83 VFS_PROTOS(udf);
84 
85 static struct sysctllog *udf_sysctl_log;
86 
87 /* internal functions */
88 static int udf_mountfs(struct vnode *, struct mount *, struct lwp *, struct udf_args *);
89 
90 
91 /* --------------------------------------------------------------------- */
92 
93 /* predefine vnode-op list descriptor */
94 extern const struct vnodeopv_desc udf_vnodeop_opv_desc;
95 
96 const struct vnodeopv_desc * const udf_vnodeopv_descs[] = {
97 	&udf_vnodeop_opv_desc,
98 	NULL,
99 };
100 
101 
102 /* vfsops descriptor linked in as anchor point for the filingsystem */
103 struct vfsops udf_vfsops = {
104 	MOUNT_UDF,			/* vfs_name */
105 	sizeof (struct udf_args),
106 	udf_mount,
107 	udf_start,
108 	udf_unmount,
109 	udf_root,
110 	(void *)eopnotsupp,		/* vfs_quotactl */
111 	udf_statvfs,
112 	udf_sync,
113 	udf_vget,
114 	udf_fhtovp,
115 	udf_vptofh,
116 	udf_init,
117 	udf_reinit,
118 	udf_done,
119 	udf_mountroot,
120 	udf_snapshot,
121 	vfs_stdextattrctl,
122 	(void *)eopnotsupp,		/* vfs_suspendctl */
123 	genfs_renamelock_enter,
124 	genfs_renamelock_exit,
125 	(void *)eopnotsupp,
126 	udf_vnodeopv_descs,
127 	0, /* int vfs_refcount   */
128 	{ NULL, NULL, }, /* LIST_ENTRY(vfsops) */
129 };
130 
131 /* --------------------------------------------------------------------- */
132 
133 /* file system starts here */
134 void
135 udf_init(void)
136 {
137 	size_t size;
138 
139 	/* setup memory types */
140 	malloc_type_attach(M_UDFMNT);
141 	malloc_type_attach(M_UDFVOLD);
142 	malloc_type_attach(M_UDFTEMP);
143 
144 	/* init node pools */
145 	size = sizeof(struct udf_node);
146 	pool_init(&udf_node_pool, size, 0, 0, 0,
147 		"udf_node_pool", NULL, IPL_NONE);
148 }
149 
150 
151 void
152 udf_reinit(void)
153 {
154 	/* nothing to do */
155 }
156 
157 
158 void
159 udf_done(void)
160 {
161 	/* remove pools */
162 	pool_destroy(&udf_node_pool);
163 
164 	malloc_type_detach(M_UDFMNT);
165 	malloc_type_detach(M_UDFVOLD);
166 	malloc_type_detach(M_UDFTEMP);
167 }
168 
169 /*
170  * If running a DEBUG kernel, provide an easy way to set the debug flags when
171  * running into a problem.
172  */
173 #define UDF_VERBOSE_SYSCTLOPT        1
174 
175 static int
176 udf_modcmd(modcmd_t cmd, void *arg)
177 {
178 	const struct sysctlnode *node;
179 	int error;
180 
181 	switch (cmd) {
182 	case MODULE_CMD_INIT:
183 		error = vfs_attach(&udf_vfsops);
184 		if (error != 0)
185 			break;
186 		/*
187 		 * XXX the "24" below could be dynamic, thereby eliminating one
188 		 * more instance of the "number to vfs" mapping problem, but
189 		 * "24" is the order as taken from sys/mount.h
190 		 */
191 		sysctl_createv(&udf_sysctl_log, 0, NULL, NULL,
192 			       CTLFLAG_PERMANENT,
193 			       CTLTYPE_NODE, "vfs", NULL,
194 			       NULL, 0, NULL, 0,
195 			       CTL_VFS, CTL_EOL);
196 		sysctl_createv(&udf_sysctl_log, 0, NULL, &node,
197 			       CTLFLAG_PERMANENT,
198 			       CTLTYPE_NODE, "udf",
199 			       SYSCTL_DESCR("OSTA Universal File System"),
200 			       NULL, 0, NULL, 0,
201 			       CTL_VFS, 24, CTL_EOL);
202 #ifdef DEBUG
203 		sysctl_createv(&udf_sysctl_log, 0, NULL, &node,
204 			       CTLFLAG_PERMANENT|CTLFLAG_READWRITE,
205 			       CTLTYPE_INT, "verbose",
206 			       SYSCTL_DESCR("Bitmask for filesystem debugging"),
207 			       NULL, 0, &udf_verbose, 0,
208 			       CTL_VFS, 24, UDF_VERBOSE_SYSCTLOPT, CTL_EOL);
209 #endif
210 		break;
211 	case MODULE_CMD_FINI:
212 		error = vfs_detach(&udf_vfsops);
213 		if (error != 0)
214 			break;
215 		sysctl_teardown(&udf_sysctl_log);
216 		break;
217 	default:
218 		error = ENOTTY;
219 		break;
220 	}
221 
222 	return (error);
223 }
224 
225 /* --------------------------------------------------------------------- */
226 
227 int
228 udf_mountroot(void)
229 {
230 	return EOPNOTSUPP;
231 }
232 
233 /* --------------------------------------------------------------------- */
234 
235 #define MPFREE(a, lst) \
236 	if ((a)) free((a), lst);
237 static void
238 free_udf_mountinfo(struct mount *mp)
239 {
240 	struct udf_mount *ump;
241 	int i;
242 
243 	if (!mp)
244 		return;
245 
246 	ump = VFSTOUDF(mp);
247 	if (ump) {
248 		/* clear our data */
249 		for (i = 0; i < UDF_ANCHORS; i++)
250 			MPFREE(ump->anchors[i], M_UDFVOLD);
251 		MPFREE(ump->primary_vol,      M_UDFVOLD);
252 		MPFREE(ump->logical_vol,      M_UDFVOLD);
253 		MPFREE(ump->unallocated,      M_UDFVOLD);
254 		MPFREE(ump->implementation,   M_UDFVOLD);
255 		MPFREE(ump->logvol_integrity, M_UDFVOLD);
256 		for (i = 0; i < UDF_PARTITIONS; i++) {
257 			MPFREE(ump->partitions[i],        M_UDFVOLD);
258 			MPFREE(ump->part_unalloc_dscr[i], M_UDFVOLD);
259 			MPFREE(ump->part_freed_dscr[i],   M_UDFVOLD);
260 		}
261 		MPFREE(ump->metadata_unalloc_dscr, M_UDFVOLD);
262 
263 		MPFREE(ump->fileset_desc,   M_UDFVOLD);
264 		MPFREE(ump->sparing_table,  M_UDFVOLD);
265 
266 		MPFREE(ump->la_node_ad_cpy, M_UDFMNT);
267 		MPFREE(ump->la_pmapping,    M_TEMP);
268 		MPFREE(ump->la_lmapping,    M_TEMP);
269 
270 		mutex_destroy(&ump->ihash_lock);
271 		mutex_destroy(&ump->get_node_lock);
272 		mutex_destroy(&ump->logvol_mutex);
273 		mutex_destroy(&ump->allocate_mutex);
274 		cv_destroy(&ump->dirtynodes_cv);
275 
276 		MPFREE(ump->vat_table, M_UDFVOLD);
277 
278 		free(ump, M_UDFMNT);
279 	}
280 }
281 #undef MPFREE
282 
283 /* --------------------------------------------------------------------- */
284 
285 /* if the system nodes exist, release them */
286 static void
287 udf_release_system_nodes(struct mount *mp)
288 {
289 	struct udf_mount *ump = VFSTOUDF(mp);
290 	int error;
291 
292 	/* if we haven't even got an ump, dont bother */
293 	if (!ump)
294 		return;
295 
296 	/* VAT partition support */
297 	if (ump->vat_node)
298 		vrele(ump->vat_node->vnode);
299 
300 	/* Metadata partition support */
301 	if (ump->metadata_node)
302 		vrele(ump->metadata_node->vnode);
303 	if (ump->metadatamirror_node)
304 		vrele(ump->metadatamirror_node->vnode);
305 	if (ump->metadatabitmap_node)
306 		vrele(ump->metadatabitmap_node->vnode);
307 
308 	/* This flush should NOT write anything nor allow any node to remain */
309 	if ((error = vflush(ump->vfs_mountp, NULLVP, 0)) != 0)
310 		panic("Failure to flush UDF system vnodes\n");
311 }
312 
313 
314 int
315 udf_mount(struct mount *mp, const char *path,
316 	  void *data, size_t *data_len)
317 {
318 	struct lwp *l = curlwp;
319 	struct udf_args *args = data;
320 	struct udf_mount *ump;
321 	struct vnode *devvp;
322 	int openflags, accessmode, error;
323 
324 	DPRINTF(CALL, ("udf_mount called\n"));
325 
326 	if (*data_len < sizeof *args)
327 		return EINVAL;
328 
329 	if (mp->mnt_flag & MNT_GETARGS) {
330 		/* request for the mount arguments */
331 		ump = VFSTOUDF(mp);
332 		if (ump == NULL)
333 			return EINVAL;
334 		*args = ump->mount_args;
335 		*data_len = sizeof *args;
336 		return 0;
337 	}
338 
339 	/* handle request for updating mount parameters */
340 	/* TODO can't update my mountpoint yet */
341 	if (mp->mnt_flag & MNT_UPDATE) {
342 		return EOPNOTSUPP;
343 	}
344 
345 	/* OK, so we are asked to mount the device */
346 
347 	/* check/translate struct version */
348 	/* TODO sanity checking other mount arguments */
349 	if (args->version != 1) {
350 		printf("mount_udf: unrecognized argument structure version\n");
351 		return EINVAL;
352 	}
353 
354 	/* lookup name to get its vnode */
355 	error = namei_simple_user(args->fspec,
356 				NSM_FOLLOW_NOEMULROOT, &devvp);
357 	if (error)
358 		return error;
359 
360 #ifdef DEBUG
361 	if (udf_verbose & UDF_DEBUG_VOLUMES)
362 		vprint("UDF mount, trying to mount \n", devvp);
363 #endif
364 
365 	/* check if its a block device specified */
366 	if (devvp->v_type != VBLK) {
367 		vrele(devvp);
368 		return ENOTBLK;
369 	}
370 	if (bdevsw_lookup(devvp->v_rdev) == NULL) {
371 		vrele(devvp);
372 		return ENXIO;
373 	}
374 
375 	/*
376 	 * If mount by non-root, then verify that user has necessary
377 	 * permissions on the device.
378 	 */
379 	accessmode = VREAD;
380 	if ((mp->mnt_flag & MNT_RDONLY) == 0)
381 		accessmode |= VWRITE;
382 	vn_lock(devvp, LK_EXCLUSIVE | LK_RETRY);
383 	error = kauth_authorize_system(l->l_cred, KAUTH_SYSTEM_MOUNT,
384 	    KAUTH_REQ_SYSTEM_MOUNT_DEVICE, mp, devvp, KAUTH_ARG(accessmode));
385 	VOP_UNLOCK(devvp);
386 	if (error) {
387 		vrele(devvp);
388 		return error;
389 	}
390 
391 	/*
392 	 * Open device and try to mount it!
393 	 */
394 	if (mp->mnt_flag & MNT_RDONLY) {
395 		openflags = FREAD;
396 	} else {
397 		openflags = FREAD | FWRITE;
398 	}
399 	vn_lock(devvp, LK_EXCLUSIVE | LK_RETRY);
400 	error = VOP_OPEN(devvp, openflags, FSCRED);
401 	VOP_UNLOCK(devvp);
402 	if (error == 0) {
403 		/* opened ok, try mounting */
404 		error = udf_mountfs(devvp, mp, l, args);
405 		if (error) {
406 			udf_release_system_nodes(mp);
407 			/* cleanup */
408 			udf_discstrat_finish(VFSTOUDF(mp));
409 			free_udf_mountinfo(mp);
410 			vn_lock(devvp, LK_EXCLUSIVE | LK_RETRY);
411 			(void) VOP_CLOSE(devvp, openflags, NOCRED);
412 			VOP_UNLOCK(devvp);
413 		}
414 	}
415 	if (error) {
416 		/* devvp is still locked */
417 		vrele(devvp);
418 		return error;
419 	}
420 
421 	/* register our mountpoint being on this device */
422 	spec_node_setmountedfs(devvp, mp);
423 
424 	/* successfully mounted */
425 	DPRINTF(VOLUMES, ("udf_mount() successfull\n"));
426 
427 	error = set_statvfs_info(path, UIO_USERSPACE, args->fspec, UIO_USERSPACE,
428 			mp->mnt_op->vfs_name, mp, l);
429 	if (error)
430 		return error;
431 
432 	/* If we're not opened read-only, open its logical volume */
433 	if ((mp->mnt_flag & MNT_RDONLY) == 0) {
434 		if ((error = udf_open_logvol(VFSTOUDF(mp))) != 0) {
435 			printf( "mount_udf: can't open logical volume for "
436 				"writing, downgrading access to read-only\n");
437 			mp->mnt_flag |= MNT_RDONLY;
438 			/* FIXME we can't return error now on open failure */
439 			return 0;
440 		}
441 	}
442 
443 	return 0;
444 }
445 
446 /* --------------------------------------------------------------------- */
447 
448 #ifdef DEBUG
449 static void
450 udf_unmount_sanity_check(struct mount *mp)
451 {
452 	struct vnode *vp;
453 
454 	printf("On unmount, i found the following nodes:\n");
455 	TAILQ_FOREACH(vp, &mp->mnt_vnodelist, v_mntvnodes) {
456 		vprint("", vp);
457 		if (VOP_ISLOCKED(vp) == LK_EXCLUSIVE) {
458 			printf("  is locked\n");
459 		}
460 		if (vp->v_usecount > 1)
461 			printf("  more than one usecount %d\n", vp->v_usecount);
462 	}
463 }
464 #endif
465 
466 
467 int
468 udf_unmount(struct mount *mp, int mntflags)
469 {
470 	struct udf_mount *ump;
471 	int error, flags, closeflags;
472 
473 	DPRINTF(CALL, ("udf_umount called\n"));
474 
475 	ump = VFSTOUDF(mp);
476 	if (!ump)
477 		panic("UDF unmount: empty ump\n");
478 
479 	flags = (mntflags & MNT_FORCE) ? FORCECLOSE : 0;
480 	/* TODO remove these paranoid functions */
481 #ifdef DEBUG
482 	if (udf_verbose & UDF_DEBUG_LOCKING)
483 		udf_unmount_sanity_check(mp);
484 #endif
485 
486 	/*
487 	 * By specifying SKIPSYSTEM we can skip vnodes marked with VV_SYSTEM.
488 	 * This hardly documented feature allows us to exempt certain files
489 	 * from being flushed.
490 	 */
491 	if ((error = vflush(mp, NULLVP, flags | SKIPSYSTEM)) != 0)
492 		return error;
493 
494 	/* update nodes and wait for completion of writeout of system nodes */
495 	udf_sync(mp, FSYNC_WAIT, NOCRED);
496 
497 #ifdef DEBUG
498 	if (udf_verbose & UDF_DEBUG_LOCKING)
499 		udf_unmount_sanity_check(mp);
500 #endif
501 
502 	/* flush again, to check if we are still busy for something else */
503 	if ((error = vflush(ump->vfs_mountp, NULLVP, flags | SKIPSYSTEM)) != 0)
504 		return error;
505 
506 	DPRINTF(VOLUMES, ("flush OK on unmount\n"));
507 
508 	/* close logical volume and close session if requested */
509 	if ((error = udf_close_logvol(ump, mntflags)) != 0)
510 		return error;
511 
512 #ifdef DEBUG
513 	DPRINTF(VOLUMES, ("FINAL sanity check\n"));
514 	if (udf_verbose & UDF_DEBUG_LOCKING)
515 		udf_unmount_sanity_check(mp);
516 #endif
517 
518 	/* NOTE release system nodes should NOT write anything */
519 	udf_release_system_nodes(mp);
520 
521 	/* finalise disc strategy */
522 	udf_discstrat_finish(ump);
523 
524 	/* synchronise device caches */
525 	(void) udf_synchronise_caches(ump);
526 
527 	/* close device */
528 	DPRINTF(VOLUMES, ("closing device\n"));
529 	if (mp->mnt_flag & MNT_RDONLY) {
530 		closeflags = FREAD;
531 	} else {
532 		closeflags = FREAD | FWRITE;
533 	}
534 
535 	/* devvp is still locked by us */
536 	vn_lock(ump->devvp, LK_EXCLUSIVE | LK_RETRY);
537 	error = VOP_CLOSE(ump->devvp, closeflags, NOCRED);
538 	if (error)
539 		printf("Error during closure of device! error %d, "
540 		       "device might stay locked\n", error);
541 	DPRINTF(VOLUMES, ("device close ok\n"));
542 
543 	/* clear our mount reference and release device node */
544 	spec_node_setmountedfs(ump->devvp, NULL);
545 	vput(ump->devvp);
546 
547 	/* free our ump */
548 	free_udf_mountinfo(mp);
549 
550 	/* free ump struct references */
551 	mp->mnt_data = NULL;
552 	mp->mnt_flag &= ~MNT_LOCAL;
553 
554 	DPRINTF(VOLUMES, ("Fin unmount\n"));
555 	return error;
556 }
557 
558 /* --------------------------------------------------------------------- */
559 
560 /*
561  * Helper function of udf_mount() that actually mounts the disc.
562  */
563 
564 static int
565 udf_mountfs(struct vnode *devvp, struct mount *mp,
566 	    struct lwp *l, struct udf_args *args)
567 {
568 	struct udf_mount     *ump;
569 	uint32_t sector_size, lb_size, bshift;
570 	uint32_t logvol_integrity;
571 	int    num_anchors, error;
572 
573 	/* flush out any old buffers remaining from a previous use. */
574 	if ((error = vinvalbuf(devvp, V_SAVE, l->l_cred, l, 0, 0)))
575 		return error;
576 
577 	/* setup basic mount information */
578 	mp->mnt_data = NULL;
579 	mp->mnt_stat.f_fsidx.__fsid_val[0] = (uint32_t) devvp->v_rdev;
580 	mp->mnt_stat.f_fsidx.__fsid_val[1] = makefstype(MOUNT_UDF);
581 	mp->mnt_stat.f_fsid = mp->mnt_stat.f_fsidx.__fsid_val[0];
582 	mp->mnt_stat.f_namemax = UDF_MAXNAMLEN;
583 	mp->mnt_flag |= MNT_LOCAL;
584 //	mp->mnt_iflag |= IMNT_MPSAFE;
585 
586 	/* allocate udf part of mount structure; malloc always succeeds */
587 	ump = malloc(sizeof(struct udf_mount), M_UDFMNT, M_WAITOK | M_ZERO);
588 
589 	/* init locks */
590 	mutex_init(&ump->logvol_mutex, MUTEX_DEFAULT, IPL_NONE);
591 	mutex_init(&ump->ihash_lock, MUTEX_DEFAULT, IPL_NONE);
592 	mutex_init(&ump->get_node_lock, MUTEX_DEFAULT, IPL_NONE);
593 	mutex_init(&ump->allocate_mutex, MUTEX_DEFAULT, IPL_NONE);
594 	cv_init(&ump->dirtynodes_cv, "udfsync2");
595 
596 	/* init rbtree for nodes, ordered by their icb address (long_ad) */
597 	udf_init_nodes_tree(ump);
598 
599 	/* set up linkage */
600 	mp->mnt_data    = ump;
601 	ump->vfs_mountp = mp;
602 
603 	/* set up arguments and device */
604 	ump->mount_args = *args;
605 	ump->devvp      = devvp;
606 	if ((error = udf_update_discinfo(ump))) {
607 		printf("UDF mount: error inspecting fs node\n");
608 		return error;
609 	}
610 
611 	/* inspect sector size */
612 	sector_size = ump->discinfo.sector_size;
613 	bshift = 1;
614 	while ((1 << bshift) < sector_size)
615 		bshift++;
616 	if ((1 << bshift) != sector_size) {
617 		printf("UDF mount: "
618 		       "hit NetBSD implementation fence on sector size\n");
619 		return EIO;
620 	}
621 
622 	/* temporary check to overcome sectorsize >= 8192 bytes panic */
623 	if (sector_size >= 8192) {
624 		printf("UDF mount: "
625 			"hit implementation limit, sectorsize to big\n");
626 		return EIO;
627 	}
628 
629 	/*
630 	 * Inspect if we're asked to mount read-write on a non recordable or
631 	 * closed sequential disc.
632 	 */
633 	if ((mp->mnt_flag & MNT_RDONLY) == 0) {
634 		if ((ump->discinfo.mmc_cur & MMC_CAP_RECORDABLE) == 0) {
635 			printf("UDF mount: disc is not recordable\n");
636 			return EROFS;
637 		}
638 		if (ump->discinfo.mmc_cur & MMC_CAP_SEQUENTIAL) {
639 			if (ump->discinfo.disc_state == MMC_STATE_FULL) {
640 				printf("UDF mount: disc is not appendable\n");
641 				return EROFS;
642 			}
643 
644 			/*
645 			 * TODO if the last session is closed check if there
646 			 * is enough space to open/close new session
647 			 */
648 		}
649 		/* double check if we're not mounting a pervious session RW */
650 		if (args->sessionnr != 0) {
651 			printf("UDF mount: updating a previous session "
652 				"not yet allowed\n");
653 			return EROFS;
654 		}
655 	}
656 
657 	/* initialise bootstrap disc strategy */
658 	ump->strategy = &udf_strat_bootstrap;
659 	udf_discstrat_init(ump);
660 
661 	/* read all anchors to get volume descriptor sequence */
662 	num_anchors = udf_read_anchors(ump);
663 	if (num_anchors == 0)
664 		return EINVAL;
665 
666 	DPRINTF(VOLUMES, ("Read %d anchors on this disc, session %d\n",
667 	    num_anchors, args->sessionnr));
668 
669 	/* read in volume descriptor sequence */
670 	if ((error = udf_read_vds_space(ump))) {
671 		printf("UDF mount: error reading volume space\n");
672 		return error;
673 	}
674 
675 	/* close down bootstrap disc strategy */
676 	udf_discstrat_finish(ump);
677 
678 	/* check consistency and completeness */
679 	if ((error = udf_process_vds(ump))) {
680 		printf( "UDF mount: disc not properly formatted"
681 			"(bad VDS)\n");
682 		return error;
683 	}
684 
685 	/* switch to new disc strategy */
686 	KASSERT(ump->strategy != &udf_strat_bootstrap);
687 	udf_discstrat_init(ump);
688 
689 	/* initialise late allocation administration space */
690 	ump->la_lmapping = malloc(sizeof(uint64_t) * UDF_MAX_MAPPINGS,
691 			M_TEMP, M_WAITOK);
692 	ump->la_pmapping = malloc(sizeof(uint64_t) * UDF_MAX_MAPPINGS,
693 			M_TEMP, M_WAITOK);
694 
695 	/* setup node cleanup extents copy space */
696 	lb_size = udf_rw32(ump->logical_vol->lb_size);
697 	ump->la_node_ad_cpy = malloc(lb_size * UDF_MAX_ALLOC_EXTENTS,
698 		M_UDFMNT, M_WAITOK);
699 	memset(ump->la_node_ad_cpy, 0, lb_size * UDF_MAX_ALLOC_EXTENTS);
700 
701 	/* setup rest of mount information */
702 	mp->mnt_data = ump;
703 
704 	/* bshift is allways equal to disc sector size */
705 	mp->mnt_dev_bshift = bshift;
706 	mp->mnt_fs_bshift  = bshift;
707 
708 	/* note that the mp info needs to be initialised for reading! */
709 	/* read vds support tables like VAT, sparable etc. */
710 	if ((error = udf_read_vds_tables(ump))) {
711 		printf( "UDF mount: error in format or damaged disc "
712 			"(VDS tables failing)\n");
713 		return error;
714 	}
715 
716 	/* check if volume integrity is closed otherwise its dirty */
717 	logvol_integrity = udf_rw32(ump->logvol_integrity->integrity_type);
718 	if (logvol_integrity != UDF_INTEGRITY_CLOSED) {
719 		printf("UDF mount: file system is not clean; ");
720 		printf("please fsck(8)\n");
721 		return EPERM;
722 	}
723 
724 	/* read root directory */
725 	if ((error = udf_read_rootdirs(ump))) {
726 		printf( "UDF mount: "
727 			"disc not properly formatted or damaged disc "
728 			"(rootdirs failing)\n");
729 		return error;
730 	}
731 
732 	/* success! */
733 	return 0;
734 }
735 
736 /* --------------------------------------------------------------------- */
737 
738 int
739 udf_start(struct mount *mp, int flags)
740 {
741 	/* do we have to do something here? */
742 	return 0;
743 }
744 
745 /* --------------------------------------------------------------------- */
746 
747 int
748 udf_root(struct mount *mp, struct vnode **vpp)
749 {
750 	struct vnode *vp;
751 	struct long_ad *dir_loc;
752 	struct udf_mount *ump = VFSTOUDF(mp);
753 	struct udf_node *root_dir;
754 	int error;
755 
756 	DPRINTF(CALL, ("udf_root called\n"));
757 
758 	dir_loc = &ump->fileset_desc->rootdir_icb;
759 	error = udf_get_node(ump, dir_loc, &root_dir);
760 
761 	if (!root_dir)
762 		error = ENOENT;
763 	if (error)
764 		return error;
765 
766 	vp = root_dir->vnode;
767 	KASSERT(vp->v_vflag & VV_ROOT);
768 
769 	*vpp = vp;
770 	return 0;
771 }
772 
773 /* --------------------------------------------------------------------- */
774 
775 int
776 udf_statvfs(struct mount *mp, struct statvfs *sbp)
777 {
778 	struct udf_mount *ump = VFSTOUDF(mp);
779 	struct logvol_int_desc *lvid;
780 	struct udf_logvol_info *impl;
781 	uint64_t freeblks, sizeblks;
782 	int num_part;
783 
784 	DPRINTF(CALL, ("udf_statvfs called\n"));
785 	sbp->f_flag   = mp->mnt_flag;
786 	sbp->f_bsize  = ump->discinfo.sector_size;
787 	sbp->f_frsize = ump->discinfo.sector_size;
788 	sbp->f_iosize = ump->discinfo.sector_size;
789 
790 	mutex_enter(&ump->allocate_mutex);
791 
792 	udf_calc_freespace(ump, &sizeblks, &freeblks);
793 
794 	sbp->f_blocks = sizeblks;
795 	sbp->f_bfree  = freeblks;
796 	sbp->f_files  = 0;
797 
798 	lvid = ump->logvol_integrity;
799 	num_part = udf_rw32(lvid->num_part);
800 	impl = (struct udf_logvol_info *) (lvid->tables + 2*num_part);
801 	if (impl) {
802 		sbp->f_files  = udf_rw32(impl->num_files);
803 		sbp->f_files += udf_rw32(impl->num_directories);
804 	}
805 
806 	/* XXX read only for now XXX */
807 	sbp->f_bavail = 0;
808 	sbp->f_bresvd = 0;
809 
810 	/* tricky, next only aplies to ffs i think, so set to zero */
811 	sbp->f_ffree  = 0;
812 	sbp->f_favail = 0;
813 	sbp->f_fresvd = 0;
814 
815 	mutex_exit(&ump->allocate_mutex);
816 
817 	copy_statvfs_info(sbp, mp);
818 	return 0;
819 }
820 
821 /* --------------------------------------------------------------------- */
822 
823 /*
824  * TODO what about writing out free space maps, lvid etc? only on `waitfor'
825  * i.e. explicit syncing by the user?
826  */
827 
828 static int
829 udf_sync_writeout_system_files(struct udf_mount *ump, int clearflags)
830 {
831 	int error;
832 
833 	/* XXX lock for VAT en bitmaps? */
834 	/* metadata nodes are written synchronous */
835 	DPRINTF(CALL, ("udf_sync: syncing metadata\n"));
836 	if (ump->lvclose & UDF_WRITE_VAT)
837 		udf_writeout_vat(ump);
838 
839 	error = 0;
840 	if (ump->lvclose & UDF_WRITE_PART_BITMAPS) {
841 		/* writeout metadata spacetable if existing */
842 		error = udf_write_metadata_partition_spacetable(ump, MNT_WAIT);
843 		if (error)
844 			printf( "udf_writeout_system_files : "
845 				" writeout of metadata space bitmap failed\n");
846 
847 		/* writeout partition spacetables */
848 		error = udf_write_physical_partition_spacetables(ump, MNT_WAIT);
849 		if (error)
850 			printf( "udf_writeout_system_files : "
851 				"writeout of space tables failed\n");
852 		if (!error && clearflags)
853 			ump->lvclose &= ~UDF_WRITE_PART_BITMAPS;
854 	}
855 
856 	return error;
857 }
858 
859 
860 int
861 udf_sync(struct mount *mp, int waitfor, kauth_cred_t cred)
862 {
863 	struct udf_mount *ump = VFSTOUDF(mp);
864 
865 	DPRINTF(CALL, ("udf_sync called\n"));
866 	/* if called when mounted readonly, just ignore */
867 	if (mp->mnt_flag & MNT_RDONLY)
868 		return 0;
869 
870 	if (ump->syncing && !waitfor) {
871 		printf("UDF: skipping autosync\n");
872 		return 0;
873 	}
874 
875 	/* get sync lock */
876 	ump->syncing = 1;
877 
878 	/* pre-sync */
879 	udf_do_sync(ump, cred, waitfor);
880 
881 	if (waitfor == MNT_WAIT)
882 		udf_sync_writeout_system_files(ump, true);
883 
884 	DPRINTF(CALL, ("end of udf_sync()\n"));
885 	ump->syncing = 0;
886 
887 	return 0;
888 }
889 
890 /* --------------------------------------------------------------------- */
891 
892 /*
893  * Get vnode for the file system type specific file id ino for the fs. Its
894  * used for reference to files by unique ID and for NFSv3.
895  * (optional) TODO lookup why some sources state NFSv3
896  */
897 int
898 udf_vget(struct mount *mp, ino_t ino,
899     struct vnode **vpp)
900 {
901 	DPRINTF(NOTIMPL, ("udf_vget called\n"));
902 	return EOPNOTSUPP;
903 }
904 
905 /* --------------------------------------------------------------------- */
906 
907 /*
908  * Lookup vnode for file handle specified
909  */
910 int
911 udf_fhtovp(struct mount *mp, struct fid *fhp,
912     struct vnode **vpp)
913 {
914 	DPRINTF(NOTIMPL, ("udf_fhtovp called\n"));
915 	return EOPNOTSUPP;
916 }
917 
918 /* --------------------------------------------------------------------- */
919 
920 /*
921  * Create an unique file handle. Its structure is opaque and won't be used by
922  * other subsystems. It should uniquely identify the file in the filingsystem
923  * and enough information to know if a file has been removed and/or resources
924  * have been recycled.
925  */
926 int
927 udf_vptofh(struct vnode *vp, struct fid *fid,
928     size_t *fh_size)
929 {
930 	DPRINTF(NOTIMPL, ("udf_vptofh called\n"));
931 	return EOPNOTSUPP;
932 }
933 
934 /* --------------------------------------------------------------------- */
935 
936 /*
937  * Create a filingsystem snapshot at the specified timestamp. Could be
938  * implemented by explicitly creating a new session or with spare room in the
939  * integrity descriptor space
940  */
941 int
942 udf_snapshot(struct mount *mp, struct vnode *vp,
943     struct timespec *tm)
944 {
945 	DPRINTF(NOTIMPL, ("udf_snapshot called\n"));
946 	return EOPNOTSUPP;
947 }
948 
949 /* --------------------------------------------------------------------- */
950