sys/vfs/ntfs/ntfs_vfsops.c

   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