xref: /dragonfly/sys/vfs/ntfs/ntfs_vfsops.c (revision 611395e5)
1 /*	$NetBSD: ntfs_vfsops.c,v 1.23 1999/11/15 19:38:14 jdolecek Exp $	*/
2 
3 /*-
4  * Copyright (c) 1998, 1999 Semen Ustimenko
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 AND CONTRIBUTORS ``AS IS'' AND
17  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
20  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
22  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
24  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26  * SUCH DAMAGE.
27  *
28  * $FreeBSD: src/sys/ntfs/ntfs_vfsops.c,v 1.20.2.5 2001/12/25 01:44:45 dillon Exp $
29  * $DragonFly: src/sys/vfs/ntfs/ntfs_vfsops.c,v 1.25 2004/12/17 00:18:29 dillon Exp $
30  */
31 
32 
33 #include <sys/param.h>
34 #include <sys/systm.h>
35 #include <sys/conf.h>
36 #include <sys/proc.h>
37 #include <sys/nlookup.h>
38 #include <sys/kernel.h>
39 #include <sys/vnode.h>
40 #include <sys/mount.h>
41 #include <sys/buf.h>
42 #include <sys/fcntl.h>
43 #include <sys/malloc.h>
44 #include <sys/systm.h>
45 #if defined(__NetBSD__)
46 #include <sys/device.h>
47 #endif
48 
49 #include <vm/vm.h>
50 #include <vm/vm_param.h>
51 #if defined(__NetBSD__)
52 #include <vm/vm_prot.h>
53 #endif
54 #include <vm/vm_page.h>
55 #include <vm/vm_object.h>
56 #include <vm/vm_extern.h>
57 #include <vm/vm_zone.h>
58 
59 #if defined(__NetBSD__)
60 #include <miscfs/specfs/specdev.h>
61 #endif
62 
63 /*#define NTFS_DEBUG 1*/
64 #include "ntfs.h"
65 #include "ntfs_inode.h"
66 #include "ntfs_subr.h"
67 #include "ntfs_vfsops.h"
68 #include "ntfs_ihash.h"
69 #include "ntfsmount.h"
70 
71 extern struct vnodeopv_entry_desc ntfs_vnodeop_entries[];
72 
73 #if defined(__DragonFly__)
74 MALLOC_DEFINE(M_NTFSMNT, "NTFS mount", "NTFS mount structure");
75 MALLOC_DEFINE(M_NTFSNTNODE,"NTFS ntnode",  "NTFS ntnode information");
76 MALLOC_DEFINE(M_NTFSFNODE,"NTFS fnode",  "NTFS fnode information");
77 MALLOC_DEFINE(M_NTFSDIR,"NTFS dir",  "NTFS dir buffer");
78 #endif
79 
80 static int	ntfs_root (struct mount *, struct vnode **);
81 static int	ntfs_statfs (struct mount *, struct statfs *,
82 				 struct thread *);
83 static int	ntfs_unmount (struct mount *, int, struct thread *);
84 static int	ntfs_vget (struct mount *mp, ino_t ino,
85 			       struct vnode **vpp);
86 static int	ntfs_mountfs (struct vnode *, struct mount *,
87 				  struct ntfs_args *, struct thread *);
88 static int	ntfs_vptofh (struct vnode *, struct fid *);
89 static int	ntfs_fhtovp (struct mount *, struct fid *,
90 				 struct vnode **);
91 
92 #if !defined (__DragonFly__)
93 static int	ntfs_quotactl (struct mount *, int, uid_t, caddr_t,
94 				   struct thread *);
95 static int	ntfs_start (struct mount *, int, struct thread *);
96 static int	ntfs_sync (struct mount *, int, struct ucred *,
97 			       struct thread *);
98 #endif
99 
100 #if defined(__DragonFly__)
101 struct sockaddr;
102 static int	ntfs_mount (struct mount *, char *, caddr_t, struct thread *);
103 static int	ntfs_init (struct vfsconf *);
104 static int	ntfs_checkexp (struct mount *, struct sockaddr *,
105 				   int *, struct ucred **);
106 #elif defined(__NetBSD__)
107 static int	ntfs_mount (struct mount *, const char *, void *,
108 				struct nameidata *, struct thread *);
109 static void	ntfs_init (void);
110 static int	ntfs_mountroot (void);
111 static int	ntfs_sysctl (int *, u_int, void *, size_t *, void *,
112 				 size_t, struct thread *);
113 static int	ntfs_checkexp (struct mount *, struct mbuf *,
114 				   int *, struct ucred **);
115 #endif
116 
117 /*
118  * Verify a remote client has export rights and return these rights via.
119  * exflagsp and credanonp.
120  */
121 static int
122 ntfs_checkexp(struct mount *mp,
123 #if defined(__DragonFly__)
124 	      struct sockaddr *nam,
125 #else /* defined(__NetBSD__) */
126 	      struct mbuf *nam,
127 #endif
128 	      int *exflagsp, struct ucred **credanonp)
129 {
130 	struct netcred *np;
131 	struct ntfsmount *ntm = VFSTONTFS(mp);
132 
133 	/*
134 	 * Get the export permission structure for this <mp, client> tuple.
135 	 */
136 	np = vfs_export_lookup(mp, &ntm->ntm_export, nam);
137 	if (np == NULL)
138 		return (EACCES);
139 
140 	*exflagsp = np->netc_exflags;
141 	*credanonp = &np->netc_anon;
142 	return (0);
143 }
144 
145 #if defined(__NetBSD__)
146 /*ARGSUSED*/
147 static int
148 ntfs_sysctl(int *name, u_int namelen, void *oldp, size_t *oldlenp, void *newp,
149 	    size_t newlen, struct thread *td)
150 {
151 	return (EINVAL);
152 }
153 
154 static int
155 ntfs_mountroot(void)
156 {
157 	struct mount *mp;
158 	struct vnode *rootvp;
159 	struct thread *td = curthread;	/* XXX */
160 	struct ntfs_args args;
161 	lwkt_tokref ilock;
162 	int error;
163 
164 	if (root_device->dv_class != DV_DISK)
165 		return (ENODEV);
166 
167 	/*
168 	 * Get vnodes for rootdev.
169 	 */
170 	if (bdevvp(rootdev, &rootvp))
171 		panic("ntfs_mountroot: can't setup rootvp");
172 
173 	if ((error = vfs_rootmountalloc(MOUNT_NTFS, "root_device", &mp))) {
174 		vrele(rootvp);
175 		return (error);
176 	}
177 
178 	args.flag = 0;
179 	args.uid = 0;
180 	args.gid = 0;
181 	args.mode = 0777;
182 
183 	if ((error = ntfs_mountfs(rootvp, mp, &args, td)) != 0) {
184 		mp->mnt_op->vfs_refcount--;
185 		vfs_unbusy(mp);
186 		free(mp, M_MOUNT);
187 		vrele(rootvp);
188 		return (error);
189 	}
190 
191 	lwkt_gettoken(&ilock, &mountlist_token);
192 	CIRCLEQ_INSERT_TAIL(&mountlist, mp, mnt_list);
193 	lwkt_reltoken(&ilock);
194 	(void)ntfs_statfs(mp, &mp->mnt_stat, td);
195 	vfs_unbusy(mp);
196 	return (0);
197 }
198 
199 static void
200 ntfs_init(void)
201 {
202 	ntfs_nthashinit();
203 	ntfs_toupper_init();
204 }
205 
206 #elif defined(__DragonFly__)
207 
208 static int
209 ntfs_init(struct vfsconf *vcp)
210 {
211 	ntfs_nthashinit();
212 	ntfs_toupper_init();
213 	return 0;
214 }
215 
216 #endif /* NetBSD */
217 
218 static int
219 ntfs_mount(struct mount *mp,
220 #if defined(__DragonFly__)
221 	   char *path, caddr_t data,
222 #else
223 	   const char *path, void *data,
224 #endif
225 	   struct thread *td)
226 {
227 	size_t		size;
228 	int		error;
229 	struct vnode	*devvp;
230 	struct ntfs_args args;
231 	struct nlookupdata nd;
232 	struct vnode *rootvp;
233 
234 	error = 0;
235 #ifdef __DragonFly__
236 	/*
237 	 * Use NULL path to flag a root mount
238 	 */
239 	if( path == NULL) {
240 		/*
241 		 ***
242 		 * Mounting root file system
243 		 ***
244 		 */
245 
246 		/* Get vnode for root device*/
247 		if( bdevvp( rootdev, &rootvp))
248 			panic("ffs_mountroot: can't setup bdevvp for root");
249 
250 		/*
251 		 * FS specific handling
252 		 */
253 		mp->mnt_flag |= MNT_RDONLY;	/* XXX globally applicable?*/
254 
255 		/*
256 		 * Attempt mount
257 		 */
258 		if( ( error = ntfs_mountfs(rootvp, mp, &args, td)) != 0) {
259 			/* fs specific cleanup (if any)*/
260 			goto error_1;
261 		}
262 
263 		goto dostatfs;		/* success*/
264 
265 	}
266 #endif /* FreeBSD */
267 
268 	/*
269 	 ***
270 	 * Mounting non-root file system or updating a file system
271 	 ***
272 	 */
273 
274 	/* copy in user arguments*/
275 	error = copyin(data, (caddr_t)&args, sizeof (struct ntfs_args));
276 	if (error)
277 		goto error_1;		/* can't get arguments*/
278 
279 	/*
280 	 * If updating, check whether changing from read-only to
281 	 * read/write; if there is no device name, that's all we do.
282 	 */
283 	if (mp->mnt_flag & MNT_UPDATE) {
284 		/* if not updating name...*/
285 		if (args.fspec == 0) {
286 			/*
287 			 * Process export requests.  Jumping to "success"
288 			 * will return the vfs_export() error code.
289 			 */
290 			struct ntfsmount *ntm = VFSTONTFS(mp);
291 			error = vfs_export(mp, &ntm->ntm_export, &args.export);
292 			goto success;
293 		}
294 
295 		printf("ntfs_mount(): MNT_UPDATE not supported\n");
296 		error = EINVAL;
297 		goto error_1;
298 	}
299 
300 	/*
301 	 * Not an update, or updating the name: look up the name
302 	 * and verify that it refers to a sensible block device.
303 	 */
304 	devvp = NULL;
305 	error = nlookup_init(&nd, args.fspec, UIO_USERSPACE, NLC_FOLLOW);
306 	if (error == 0)
307 		error = nlookup(&nd);
308 	if (error == 0)
309 		error = cache_vref(nd.nl_ncp, nd.nl_cred, &devvp);
310 	nlookup_done(&nd);
311 	if (error)
312 		goto error_1;
313 
314 #if defined(__DragonFly__)
315 	if (!vn_isdisk(devvp, &error))
316 		goto error_2;
317 #else
318 	if (devvp->v_type != VBLK) {
319 		error = ENOTBLK;
320 		goto error_2;
321 	}
322 	if (umajor(devvp->v_udev) >= nblkdev) {
323 		error = ENXIO;
324 		goto error_2;
325 	}
326 #endif
327 	if (mp->mnt_flag & MNT_UPDATE) {
328 #if 0
329 		/*
330 		 ********************
331 		 * UPDATE
332 		 ********************
333 		 */
334 
335 		if (devvp != ntmp->um_devvp)
336 			error = EINVAL;	/* needs translation */
337 		else
338 			vrele(devvp);
339 		/*
340 		 * Update device name only on success
341 		 */
342 		if( !error) {
343 			/* Save "mounted from" info for mount point (NULL pad)*/
344 			copyinstr(	args.fspec,
345 					mp->mnt_stat.f_mntfromname,
346 					MNAMELEN - 1,
347 					&size);
348 			bzero( mp->mnt_stat.f_mntfromname + size, MNAMELEN - size);
349 		}
350 #endif
351 	} else {
352 		/*
353 		 ********************
354 		 * NEW MOUNT
355 		 ********************
356 		 */
357 
358 		/*
359 		 * Since this is a new mount, we want the names for
360 		 * the device and the mount point copied in.  If an
361 		 * error occurs,  the mountpoint is discarded by the
362 		 * upper level code.
363 		 */
364 		/* Save "last mounted on" info for mount point (NULL pad)*/
365 		copyinstr(	path,				/* mount point*/
366 				mp->mnt_stat.f_mntonname,	/* save area*/
367 				MNAMELEN - 1,			/* max size*/
368 				&size);				/* real size*/
369 		bzero( mp->mnt_stat.f_mntonname + size, MNAMELEN - size);
370 
371 		/* Save "mounted from" info for mount point (NULL pad)*/
372 		copyinstr(	args.fspec,			/* device name*/
373 				mp->mnt_stat.f_mntfromname,	/* save area*/
374 				MNAMELEN - 1,			/* max size*/
375 				&size);				/* real size*/
376 		bzero( mp->mnt_stat.f_mntfromname + size, MNAMELEN - size);
377 
378 		error = ntfs_mountfs(devvp, mp, &args, td);
379 	}
380 	if (error) {
381 		goto error_2;
382 	}
383 
384 #ifdef __DragonFly__
385 dostatfs:
386 #endif
387 	/*
388 	 * Initialize FS stat information in mount struct; uses both
389 	 * mp->mnt_stat.f_mntonname and mp->mnt_stat.f_mntfromname
390 	 *
391 	 * This code is common to root and non-root mounts
392 	 */
393 	(void)VFS_STATFS(mp, &mp->mnt_stat, td);
394 
395 	goto success;
396 
397 
398 error_2:	/* error with devvp held*/
399 
400 	/* release devvp before failing*/
401 	vrele(devvp);
402 
403 error_1:	/* no state to back out*/
404 
405 success:
406 	return(error);
407 }
408 
409 /*
410  * Common code for mount and mountroot
411  */
412 int
413 ntfs_mountfs(struct vnode *devvp, struct mount *mp, struct ntfs_args *argsp,
414 	     struct thread *td)
415 {
416 	struct buf *bp;
417 	struct ntfsmount *ntmp;
418 	dev_t dev;
419 	int error, ronly, ncount, i;
420 	struct vnode *vp;
421 	struct ucred *cred;
422 
423 	KKASSERT(td->td_proc);
424 	cred = td->td_proc->p_ucred;
425 
426 	/*
427 	 * Disallow multiple mounts of the same device.
428 	 * Disallow mounting of a device that is currently in use
429 	 * (except for root, which might share swap device for miniroot).
430 	 * Flush out any old buffers remaining from a previous use.
431 	 */
432 	error = vfs_mountedon(devvp);
433 	if (error)
434 		return (error);
435 	ncount = count_udev(devvp->v_udev);
436 #if defined(__DragonFly__)
437 	if (devvp->v_object)
438 		ncount -= 1;
439 #endif
440 	if (ncount > 1)
441 		return (EBUSY);
442 #if defined(__DragonFly__)
443 	VN_LOCK(devvp, LK_EXCLUSIVE | LK_RETRY, td);
444 	error = vinvalbuf(devvp, V_SAVE, td, 0, 0);
445 	VOP__UNLOCK(devvp, 0, td);
446 #else
447 	error = vinvalbuf(devvp, V_SAVE, td, 0, 0);
448 #endif
449 	if (error)
450 		return (error);
451 
452 	ronly = (mp->mnt_flag & MNT_RDONLY) != 0;
453 	VN_LOCK(devvp, LK_EXCLUSIVE | LK_RETRY, td);
454 	error = VOP_OPEN(devvp, ronly ? FREAD : FREAD|FWRITE, FSCRED, NULL, td);
455 	VOP__UNLOCK(devvp, 0, td);
456 	if (error)
457 		return (error);
458 	dev = devvp->v_rdev;
459 
460 	bp = NULL;
461 
462 	error = bread(devvp, BBLOCK, BBSIZE, &bp);
463 	if (error)
464 		goto out;
465 	ntmp = malloc( sizeof *ntmp, M_NTFSMNT, M_WAITOK );
466 	bzero( ntmp, sizeof *ntmp );
467 	bcopy( bp->b_data, &ntmp->ntm_bootfile, sizeof(struct bootfile) );
468 	brelse( bp );
469 	bp = NULL;
470 
471 	if (strncmp(ntmp->ntm_bootfile.bf_sysid, NTFS_BBID, NTFS_BBIDLEN)) {
472 		error = EINVAL;
473 		dprintf(("ntfs_mountfs: invalid boot block\n"));
474 		goto out;
475 	}
476 
477 	{
478 		int8_t cpr = ntmp->ntm_mftrecsz;
479 		if( cpr > 0 )
480 			ntmp->ntm_bpmftrec = ntmp->ntm_spc * cpr;
481 		else
482 			ntmp->ntm_bpmftrec = (1 << (-cpr)) / ntmp->ntm_bps;
483 	}
484 	dprintf(("ntfs_mountfs(): bps: %d, spc: %d, media: %x, mftrecsz: %d (%d sects)\n",
485 		ntmp->ntm_bps,ntmp->ntm_spc,ntmp->ntm_bootfile.bf_media,
486 		ntmp->ntm_mftrecsz,ntmp->ntm_bpmftrec));
487 	dprintf(("ntfs_mountfs(): mftcn: 0x%x|0x%x\n",
488 		(u_int32_t)ntmp->ntm_mftcn,(u_int32_t)ntmp->ntm_mftmirrcn));
489 
490 	ntmp->ntm_mountp = mp;
491 	ntmp->ntm_dev = dev;
492 	ntmp->ntm_devvp = devvp;
493 	ntmp->ntm_uid = argsp->uid;
494 	ntmp->ntm_gid = argsp->gid;
495 	ntmp->ntm_mode = argsp->mode;
496 	ntmp->ntm_flag = argsp->flag;
497 
498 	/* Copy in the 8-bit to Unicode conversion table */
499 	if (argsp->flag & NTFSMNT_U2WTABLE) {
500 		ntfs_82u_init(ntmp, argsp->u2w);
501 	} else {
502 		ntfs_82u_init(ntmp, NULL);
503 	}
504 
505 	/* Initialize Unicode to 8-bit table from 8toU table */
506 	ntfs_u28_init(ntmp, ntmp->ntm_82u);
507 
508 	mp->mnt_data = (qaddr_t)ntmp;
509 
510 	dprintf(("ntfs_mountfs(): case-%s,%s uid: %d, gid: %d, mode: %o\n",
511 		(ntmp->ntm_flag & NTFS_MFLAG_CASEINS)?"insens.":"sens.",
512 		(ntmp->ntm_flag & NTFS_MFLAG_ALLNAMES)?" allnames,":"",
513 		ntmp->ntm_uid, ntmp->ntm_gid, ntmp->ntm_mode));
514 
515 	vfs_add_vnodeops(mp, &mp->mnt_vn_norm_ops, ntfs_vnodeop_entries);
516 
517 	/*
518 	 * We read in some system nodes to do not allow
519 	 * reclaim them and to have everytime access to them.
520 	 */
521 	{
522 		int pi[3] = { NTFS_MFTINO, NTFS_ROOTINO, NTFS_BITMAPINO };
523 		for (i=0; i<3; i++) {
524 			error = VFS_VGET(mp, pi[i], &(ntmp->ntm_sysvn[pi[i]]));
525 			if(error)
526 				goto out1;
527 			ntmp->ntm_sysvn[pi[i]]->v_flag |= VSYSTEM;
528 			vref(ntmp->ntm_sysvn[pi[i]]);
529 			vput(ntmp->ntm_sysvn[pi[i]]);
530 		}
531 	}
532 
533 	/* read the Unicode lowercase --> uppercase translation table,
534 	 * if necessary */
535 	if ((error = ntfs_toupper_use(mp, ntmp)))
536 		goto out1;
537 
538 	/*
539 	 * Scan $BitMap and count free clusters
540 	 */
541 	error = ntfs_calccfree(ntmp, &ntmp->ntm_cfree);
542 	if(error)
543 		goto out1;
544 
545 	/*
546 	 * Read and translate to internal format attribute
547 	 * definition file.
548 	 */
549 	{
550 		int num,j;
551 		struct attrdef ad;
552 
553 		/* Open $AttrDef */
554 		error = VFS_VGET(mp, NTFS_ATTRDEFINO, &vp );
555 		if(error)
556 			goto out1;
557 
558 		/* Count valid entries */
559 		for(num=0;;num++) {
560 			error = ntfs_readattr(ntmp, VTONT(vp),
561 					NTFS_A_DATA, NULL,
562 					num * sizeof(ad), sizeof(ad),
563 					&ad, NULL);
564 			if (error)
565 				goto out1;
566 			if (ad.ad_name[0] == 0)
567 				break;
568 		}
569 
570 		/* Alloc memory for attribute definitions */
571 		MALLOC(ntmp->ntm_ad, struct ntvattrdef *,
572 			num * sizeof(struct ntvattrdef),
573 			M_NTFSMNT, M_WAITOK);
574 
575 		ntmp->ntm_adnum = num;
576 
577 		/* Read them and translate */
578 		for(i=0;i<num;i++){
579 			error = ntfs_readattr(ntmp, VTONT(vp),
580 					NTFS_A_DATA, NULL,
581 					i * sizeof(ad), sizeof(ad),
582 					&ad, NULL);
583 			if (error)
584 				goto out1;
585 			j = 0;
586 			do {
587 				ntmp->ntm_ad[i].ad_name[j] = ad.ad_name[j];
588 			} while(ad.ad_name[j++]);
589 			ntmp->ntm_ad[i].ad_namelen = j - 1;
590 			ntmp->ntm_ad[i].ad_type = ad.ad_type;
591 		}
592 
593 		vput(vp);
594 	}
595 
596 #if defined(__DragonFly__)
597 	mp->mnt_stat.f_fsid.val[0] = dev2udev(dev);
598 	mp->mnt_stat.f_fsid.val[1] = mp->mnt_vfc->vfc_typenum;
599 #else
600 	mp->mnt_stat.f_fsid.val[0] = dev;
601 	mp->mnt_stat.f_fsid.val[1] = makefstype(MOUNT_NTFS);
602 #endif
603 	mp->mnt_maxsymlinklen = 0;
604 	mp->mnt_flag |= MNT_LOCAL;
605 	dev->si_mountpoint = mp;
606 
607 	return (0);
608 
609 out1:
610 	for(i=0;i<NTFS_SYSNODESNUM;i++)
611 		if(ntmp->ntm_sysvn[i]) vrele(ntmp->ntm_sysvn[i]);
612 
613 	if (vflush(mp, 0, 0))
614 		dprintf(("ntfs_mountfs: vflush failed\n"));
615 
616 out:
617 	dev->si_mountpoint = NULL;
618 	if (bp)
619 		brelse(bp);
620 
621 #if defined __NetBSD__
622 	/* lock the device vnode before calling VOP_CLOSE() */
623 	VN_LOCK(devvp, LK_EXCLUSIVE | LK_RETRY, td);
624 	(void)VOP_CLOSE(devvp, ronly ? FREAD : FREAD|FWRITE, td);
625 	VOP__UNLOCK(devvp, 0, td);
626 #else
627 	(void)VOP_CLOSE(devvp, ronly ? FREAD : FREAD|FWRITE, td);
628 #endif
629 
630 	return (error);
631 }
632 
633 #if !defined(__DragonFly__)
634 static int
635 ntfs_start(struct mount *mp, int flags, struct thread *td)
636 {
637 	return (0);
638 }
639 #endif
640 
641 static int
642 ntfs_unmount(struct mount *mp, int mntflags, struct thread *td)
643 {
644 	struct ntfsmount *ntmp;
645 	int error, ronly = 0, flags, i;
646 
647 	dprintf(("ntfs_unmount: unmounting...\n"));
648 	ntmp = VFSTONTFS(mp);
649 
650 	flags = 0;
651 	if(mntflags & MNT_FORCE)
652 		flags |= FORCECLOSE;
653 
654 	dprintf(("ntfs_unmount: vflushing...\n"));
655 	error = vflush(mp, 0, flags | SKIPSYSTEM);
656 	if (error) {
657 		printf("ntfs_unmount: vflush failed: %d\n",error);
658 		return (error);
659 	}
660 
661 	/* Check if only system vnodes are rest */
662 	for(i=0;i<NTFS_SYSNODESNUM;i++)
663 		 if((ntmp->ntm_sysvn[i]) &&
664 		    (ntmp->ntm_sysvn[i]->v_usecount > 1)) return (EBUSY);
665 
666 	/* Dereference all system vnodes */
667 	for(i=0;i<NTFS_SYSNODESNUM;i++)
668 		 if(ntmp->ntm_sysvn[i]) vrele(ntmp->ntm_sysvn[i]);
669 
670 	/* vflush system vnodes */
671 	error = vflush(mp, 0, flags);
672 	if (error)
673 		printf("ntfs_unmount: vflush failed(sysnodes): %d\n",error);
674 
675 	/* Check if the type of device node isn't VBAD before
676 	 * touching v_specinfo.  If the device vnode is revoked, the
677 	 * field is NULL and touching it causes null pointer derefercence.
678 	 */
679 	if (ntmp->ntm_devvp->v_type != VBAD)
680 		ntmp->ntm_devvp->v_rdev->si_mountpoint = NULL;
681 
682 	vinvalbuf(ntmp->ntm_devvp, V_SAVE, td, 0, 0);
683 
684 #if defined(__NetBSD__)
685 	/* lock the device vnode before calling VOP_CLOSE() */
686 	VOP_LOCK(ntmp->ntm_devvp, LK_EXCLUSIVE | LK_RETRY);
687 	error = VOP_CLOSE(ntmp->ntm_devvp, ronly ? FREAD : FREAD|FWRITE, td);
688 	VOP__UNLOCK(ntmp->ntm_devvp, 0, td);
689 #else
690 	error = VOP_CLOSE(ntmp->ntm_devvp, ronly ? FREAD : FREAD|FWRITE, td);
691 #endif
692 
693 	vrele(ntmp->ntm_devvp);
694 
695 	/* free the toupper table, if this has been last mounted ntfs volume */
696 	ntfs_toupper_unuse();
697 
698 	dprintf(("ntfs_umount: freeing memory...\n"));
699 	ntfs_u28_uninit(ntmp);
700 	ntfs_82u_uninit(ntmp);
701 	mp->mnt_data = (qaddr_t)0;
702 	mp->mnt_flag &= ~MNT_LOCAL;
703 	FREE(ntmp->ntm_ad, M_NTFSMNT);
704 	FREE(ntmp, M_NTFSMNT);
705 	return (error);
706 }
707 
708 static int
709 ntfs_root(struct mount *mp, struct vnode **vpp)
710 {
711 	struct vnode *nvp;
712 	int error = 0;
713 
714 	dprintf(("ntfs_root(): sysvn: %p\n",
715 		VFSTONTFS(mp)->ntm_sysvn[NTFS_ROOTINO]));
716 	error = VFS_VGET(mp, (ino_t)NTFS_ROOTINO, &nvp);
717 	if(error) {
718 		printf("ntfs_root: VFS_VGET failed: %d\n",error);
719 		return (error);
720 	}
721 
722 	*vpp = nvp;
723 	return (0);
724 }
725 
726 #if !defined(__DragonFly__)
727 static int
728 ntfs_quotactl(struct mount *mp, int cmds, uid_t uid, caddr_t arg,
729 	      struct thread *td)
730 {
731 	printf("\nntfs_quotactl():\n");
732 	return EOPNOTSUPP;
733 }
734 #endif
735 
736 int
737 ntfs_calccfree(struct ntfsmount *ntmp, cn_t *cfreep)
738 {
739 	struct vnode *vp;
740 	u_int8_t *tmp;
741 	int j, error;
742 	long cfree = 0;
743 	size_t bmsize, i;
744 
745 	vp = ntmp->ntm_sysvn[NTFS_BITMAPINO];
746 
747 	bmsize = VTOF(vp)->f_size;
748 
749 	MALLOC(tmp, u_int8_t *, bmsize, M_TEMP, M_WAITOK);
750 
751 	error = ntfs_readattr(ntmp, VTONT(vp), NTFS_A_DATA, NULL,
752 			       0, bmsize, tmp, NULL);
753 	if (error)
754 		goto out;
755 
756 	for(i=0;i<bmsize;i++)
757 		for(j=0;j<8;j++)
758 			if(~tmp[i] & (1 << j)) cfree++;
759 	*cfreep = cfree;
760 
761     out:
762 	FREE(tmp, M_TEMP);
763 	return(error);
764 }
765 
766 static int
767 ntfs_statfs(struct mount *mp, struct statfs *sbp, struct thread *td)
768 {
769 	struct ntfsmount *ntmp = VFSTONTFS(mp);
770 	u_int64_t mftsize,mftallocated;
771 
772 	dprintf(("ntfs_statfs():\n"));
773 
774 	mftsize = VTOF(ntmp->ntm_sysvn[NTFS_MFTINO])->f_size;
775 	mftallocated = VTOF(ntmp->ntm_sysvn[NTFS_MFTINO])->f_allocated;
776 
777 #if defined(__DragonFly__)
778 	sbp->f_type = mp->mnt_vfc->vfc_typenum;
779 #elif defined(__NetBSD__)
780 	sbp->f_type = 0;
781 #else
782 	sbp->f_type = MOUNT_NTFS;
783 #endif
784 	sbp->f_bsize = ntmp->ntm_bps;
785 	sbp->f_iosize = ntmp->ntm_bps * ntmp->ntm_spc;
786 	sbp->f_blocks = ntmp->ntm_bootfile.bf_spv;
787 	sbp->f_bfree = sbp->f_bavail = ntfs_cntobn(ntmp->ntm_cfree);
788 	sbp->f_ffree = sbp->f_bfree / ntmp->ntm_bpmftrec;
789 	sbp->f_files = mftallocated / ntfs_bntob(ntmp->ntm_bpmftrec) +
790 		       sbp->f_ffree;
791 	if (sbp != &mp->mnt_stat) {
792 		bcopy((caddr_t)mp->mnt_stat.f_mntonname,
793 			(caddr_t)&sbp->f_mntonname[0], MNAMELEN);
794 		bcopy((caddr_t)mp->mnt_stat.f_mntfromname,
795 			(caddr_t)&sbp->f_mntfromname[0], MNAMELEN);
796 	}
797 	sbp->f_flags = mp->mnt_flag;
798 #ifdef __NetBSD__
799 	strncpy(sbp->f_fstypename, mp->mnt_op->vfs_name, MFSNAMELEN);
800 #endif
801 
802 	return (0);
803 }
804 
805 #if !defined(__DragonFly__)
806 static int
807 ntfs_sync(struct mount *mp, int waitfor, struct ucred *cred, struct thread *td)
808 {
809 	/*dprintf(("ntfs_sync():\n"));*/
810 	return (0);
811 }
812 #endif
813 
814 /*ARGSUSED*/
815 static int
816 ntfs_fhtovp(struct mount *mp, struct fid *fhp, struct vnode **vpp)
817 {
818 	struct vnode *nvp;
819 	struct ntfid *ntfhp = (struct ntfid *)fhp;
820 	int error;
821 
822 	ddprintf(("ntfs_fhtovp(): %d\n", ntfhp->ntfid_ino));
823 
824 	if ((error = VFS_VGET(mp, ntfhp->ntfid_ino, &nvp)) != 0) {
825 		*vpp = NULLVP;
826 		return (error);
827 	}
828 	/* XXX as unlink/rmdir/mkdir/creat are not currently possible
829 	 * with NTFS, we don't need to check anything else for now */
830 	*vpp = nvp;
831 
832 	return (0);
833 }
834 
835 static int
836 ntfs_vptofh(struct vnode *vp, struct fid *fhp)
837 {
838 	struct ntnode *ntp;
839 	struct ntfid *ntfhp;
840 
841 	ddprintf(("ntfs_fhtovp(): %p\n", vp));
842 
843 	ntp = VTONT(vp);
844 	ntfhp = (struct ntfid *)fhp;
845 	ntfhp->ntfid_len = sizeof(struct ntfid);
846 	ntfhp->ntfid_ino = ntp->i_number;
847 	/* ntfhp->ntfid_gen = ntp->i_gen; */
848 	return (0);
849 }
850 
851 int
852 ntfs_vgetex(struct mount *mp, ino_t ino, u_int32_t attrtype, char *attrname,
853 	    u_long lkflags, u_long flags, struct thread *td,
854 	    struct vnode **vpp)
855 {
856 	int error;
857 	struct ntfsmount *ntmp;
858 	struct ntnode *ip;
859 	struct fnode *fp;
860 	struct vnode *vp;
861 	enum vtype f_type;
862 
863 	dprintf(("ntfs_vgetex: ino: %d, attr: 0x%x:%s, lkf: 0x%lx, f: 0x%lx\n",
864 		ino, attrtype, attrname?attrname:"", (u_long)lkflags,
865 		(u_long)flags ));
866 
867 	ntmp = VFSTONTFS(mp);
868 	*vpp = NULL;
869 
870 	/* Get ntnode */
871 	error = ntfs_ntlookup(ntmp, ino, &ip);
872 	if (error) {
873 		printf("ntfs_vget: ntfs_ntget failed\n");
874 		return (error);
875 	}
876 
877 	/* It may be not initialized fully, so force load it */
878 	if (!(flags & VG_DONTLOADIN) && !(ip->i_flag & IN_LOADED)) {
879 		error = ntfs_loadntnode(ntmp, ip);
880 		if(error) {
881 			printf("ntfs_vget: CAN'T LOAD ATTRIBUTES FOR INO: %d\n",
882 			       ip->i_number);
883 			ntfs_ntput(ip);
884 			return (error);
885 		}
886 	}
887 
888 	error = ntfs_fget(ntmp, ip, attrtype, attrname, &fp);
889 	if (error) {
890 		printf("ntfs_vget: ntfs_fget failed\n");
891 		ntfs_ntput(ip);
892 		return (error);
893 	}
894 
895 	f_type = VNON;
896 	if (!(flags & VG_DONTVALIDFN) && !(fp->f_flag & FN_VALID)) {
897 		if ((ip->i_frflag & NTFS_FRFLAG_DIR) &&
898 		    (fp->f_attrtype == NTFS_A_DATA && fp->f_attrname == NULL)) {
899 			f_type = VDIR;
900 		} else if (flags & VG_EXT) {
901 			f_type = VNON;
902 			fp->f_size = fp->f_allocated = 0;
903 		} else {
904 			f_type = VREG;
905 
906 			error = ntfs_filesize(ntmp, fp,
907 					      &fp->f_size, &fp->f_allocated);
908 			if (error) {
909 				ntfs_ntput(ip);
910 				return (error);
911 			}
912 		}
913 
914 		fp->f_flag |= FN_VALID;
915 	}
916 
917 	if (FTOV(fp)) {
918 		VGET(FTOV(fp), lkflags, td);
919 		*vpp = FTOV(fp);
920 		ntfs_ntput(ip);
921 		return (0);
922 	}
923 
924 	error = getnewvnode(VT_NTFS, ntmp->ntm_mountp, &vp, VLKTIMEOUT, 0);
925 	if(error) {
926 		ntfs_frele(fp);
927 		ntfs_ntput(ip);
928 		return (error);
929 	}
930 	dprintf(("ntfs_vget: vnode: %p for ntnode: %d\n", vp,ino));
931 
932 	fp->f_vp = vp;
933 	vp->v_data = fp;
934 	vp->v_type = f_type;
935 
936 	if (ino == NTFS_ROOTINO)
937 		vp->v_flag |= VROOT;
938 
939 	ntfs_ntput(ip);
940 
941 	KKASSERT(lkflags & LK_TYPE_MASK);
942 	KKASSERT((lkflags & LK_INTERLOCK) == 0);
943 	/* XXX leave vnode locked exclusively from getnewvnode */
944 	*vpp = vp;
945 	return (0);
946 
947 }
948 
949 static int
950 ntfs_vget(struct mount *mp, ino_t ino, struct vnode **vpp)
951 {
952 	return ntfs_vgetex(mp, ino, NTFS_A_DATA, NULL,
953 			LK_EXCLUSIVE | LK_RETRY, 0, curthread, vpp);
954 }
955 
956 #if defined(__DragonFly__)
957 static struct vfsops ntfs_vfsops = {
958 	ntfs_mount,
959 	vfs_stdstart,
960 	ntfs_unmount,
961 	ntfs_root,
962 	vfs_stdquotactl,
963 	ntfs_statfs,
964 	vfs_stdsync,
965 	ntfs_vget,
966 	ntfs_fhtovp,
967 	ntfs_checkexp,
968 	ntfs_vptofh,
969 	ntfs_init,
970 	ntfs_nthash_uninit, /* see ntfs_ihash.c */
971 	vfs_stdextattrctl,
972 };
973 VFS_SET(ntfs_vfsops, ntfs, 0);
974 #elif defined(__NetBSD__)
975 extern struct vnodeopv_desc ntfs_vnodeop_opv_desc;
976 
977 struct vnodeopv_desc *ntfs_vnodeopv_descs[] = {
978 	&ntfs_vnodeop_opv_desc,
979 	NULL,
980 };
981 
982 struct vfsops ntfs_vfsops = {
983 	MOUNT_NTFS,
984 	ntfs_mount,
985 	ntfs_start,
986 	ntfs_unmount,
987 	ntfs_root,
988 	ntfs_quotactl,
989 	ntfs_statfs,
990 	ntfs_sync,
991 	ntfs_vget,
992 	ntfs_fhtovp,
993 	ntfs_vptofh,
994 	ntfs_init,
995 	ntfs_sysctl,
996 	ntfs_mountroot,
997 	ntfs_checkexp,
998 	ntfs_vnodeopv_descs,
999 };
1000 #else /* !NetBSD && !FreeBSD */
1001 static struct vfsops ntfs_vfsops = {
1002 	ntfs_mount,
1003 	ntfs_start,
1004 	ntfs_unmount,
1005 	ntfs_root,
1006 	ntfs_quotactl,
1007 	ntfs_statfs,
1008 	ntfs_sync,
1009 	ntfs_vget,
1010 	ntfs_fhtovp,
1011 	ntfs_vptofh,
1012 	ntfs_init,
1013 };
1014 VFS_SET(ntfs_vfsops, ntfs, MOUNT_NTFS, 0);
1015 #endif
1016 
1017 
1018