sys/vfs/tmpfs/tmpfs_subr.c

   1 /*      $NetBSD: tmpfs_subr.c,v 1.35 2007/07/09 21:10:50 ad Exp $       */
   2
   3 /*-
   4  * Copyright (c) 2005 The NetBSD Foundation, Inc.
   5  * All rights reserved.
   6  *
   7  * This code is derived from software contributed to The NetBSD Foundation
   8  * by Julio M. Merino Vidal, developed as part of Google's Summer of Code
   9  * 2005 program.
  10  *
  11  * Redistribution and use in source and binary forms, with or without
  12  * modification, are permitted provided that the following conditions
  13  * are met:
  14  * 1. Redistributions of source code must retain the above copyright
  15  *    notice, this list of conditions and the following disclaimer.
  16  * 2. Redistributions in binary form must reproduce the above copyright
  17  *    notice, this list of conditions and the following disclaimer in the
  18  *    documentation and/or other materials provided with the distribution.
  19  *
  20  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
  21  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
  22  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  23  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
  24  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  25  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
  26  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
  27  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
  28  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  29  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  30  * POSSIBILITY OF SUCH DAMAGE.
  31  */
  32
  33 /*
  34  * Efficient memory file system supporting functions.
  35  */
  36 #include <sys/cdefs.h>
  37
  38 #include <sys/kernel.h>
  39 #include <sys/param.h>
  40 #include <sys/namei.h>
  41 #include <sys/priv.h>
  42 #include <sys/proc.h>
  43 #include <sys/spinlock2.h>
  44 #include <sys/stat.h>
  45 #include <sys/systm.h>
  46 #include <sys/vnode.h>
  47 #include <sys/vmmeter.h>
  48
  49 #include <sys/mplock2.h>
  50
  51 #include <vm/vm.h>
  52 #include <vm/vm_object.h>
  53 #include <vm/vm_page.h>
  54 #include <vm/vm_pager.h>
  55 #include <vm/vm_extern.h>
  56
  57 #include <vfs/tmpfs/tmpfs.h>
  58 #include <vfs/tmpfs/tmpfs_fifoops.h>
  59 #include <vfs/tmpfs/tmpfs_vnops.h>
  60
  61 static ino_t t_ino = 2;
  62 static struct spinlock  ino_lock;
  63 static ino_t tmpfs_fetch_ino(void);
  64
  65 /* --------------------------------------------------------------------- */
  66
  67 /*
  68  * Allocates a new node of type 'type' inside the 'tmp' mount point, with
  69  * its owner set to 'uid', its group to 'gid' and its mode set to 'mode',
  70  * using the credentials of the process 'p'.
  71  *
  72  * If the node type is set to 'VDIR', then the parent parameter must point
  73  * to the parent directory of the node being created.  It may only be NULL
  74  * while allocating the root node.
  75  *
  76  * If the node type is set to 'VBLK' or 'VCHR', then the rdev parameter
  77  * specifies the device the node represents.
  78  *
  79  * If the node type is set to 'VLNK', then the parameter target specifies
  80  * the file name of the target file for the symbolic link that is being
  81  * created.
  82  *
  83  * Note that new nodes are retrieved from the available list if it has
  84  * items or, if it is empty, from the node pool as long as there is enough
  85  * space to create them.
  86  *
  87  * Returns zero on success or an appropriate error code on failure.
  88  */
  89 int
  90 tmpfs_alloc_node(struct tmpfs_mount *tmp, enum vtype type,
  91     uid_t uid, gid_t gid, mode_t mode, struct tmpfs_node *parent,
  92     char *target, int rmajor, int rminor, struct tmpfs_node **node)
  93 {
  94         struct tmpfs_node *nnode;
  95         struct timespec ts;
  96         udev_t rdev;
  97
  98         /* If the root directory of the 'tmp' file system is not yet
  99          * allocated, this must be the request to do it. */
 100         KKASSERT(IMPLIES(tmp->tm_root == NULL, parent == NULL && type == VDIR));
 101
 102         KKASSERT(IFF(type == VLNK, target != NULL));
 103         KKASSERT(IFF(type == VBLK || type == VCHR, rmajor != VNOVAL));
 104
 105         if (tmp->tm_nodes_inuse > tmp->tm_nodes_max)
 106                 return (ENOSPC);
 107
 108         nnode = (struct tmpfs_node *)objcache_get(tmp->tm_node_pool, M_WAITOK);
 109
 110         /* Generic initialization. */
 111         nnode->tn_type = type;
 112         vfs_timestamp(&ts);
 113         nnode->tn_ctime = nnode->tn_mtime = nnode->tn_atime
 114                 = ts.tv_sec;
 115         nnode->tn_ctimensec = nnode->tn_mtimensec = nnode->tn_atimensec
 116                 = ts.tv_nsec;
 117         nnode->tn_uid = uid;
 118         nnode->tn_gid = gid;
 119         nnode->tn_mode = mode;
 120         nnode->tn_id = tmpfs_fetch_ino();
 121
 122         /* Type-specific initialization. */
 123         switch (nnode->tn_type) {
 124         case VBLK:
 125         case VCHR:
 126                 rdev = makeudev(rmajor, rminor);
 127                 if (rdev == NOUDEV) {
 128                         return(EINVAL);
 129                 }
 130                 nnode->tn_rdev = rdev;
 131                 break;
 132
 133         case VDIR:
 134                 TAILQ_INIT(&nnode->tn_dir.tn_dirhead);
 135                 KKASSERT(parent != nnode);
 136                 KKASSERT(IMPLIES(parent == NULL, tmp->tm_root == NULL));
 137                 nnode->tn_dir.tn_parent = parent;
 138                 nnode->tn_dir.tn_readdir_lastn = 0;
 139                 nnode->tn_dir.tn_readdir_lastp = NULL;
 140                 nnode->tn_links++;
 141                 nnode->tn_size = 0;
 142                 if (parent) {
 143                         TMPFS_NODE_LOCK(parent);
 144                         parent->tn_links++;
 145                         TMPFS_NODE_UNLOCK(parent);
 146                 }
 147                 break;
 148
 149         case VFIFO:
 150                 /* FALLTHROUGH */
 151         case VSOCK:
 152                 break;
 153
 154         case VLNK:
 155                 KKASSERT((strlen(target) +1) < MAXPATHLEN);
 156                 nnode->tn_size = strlen(target);
 157                 nnode->tn_link = kmalloc(nnode->tn_size + 1, M_TMPFSNAME,
 158                     M_WAITOK);
 159                 bcopy(target, nnode->tn_link, nnode->tn_size);
 160                 nnode->tn_link[nnode->tn_size] = '\0';
 161                 break;
 162
 163         case VREG:
 164                 nnode->tn_reg.tn_aobj =
 165                     vm_pager_allocate(OBJT_SWAP, NULL, 0, VM_PROT_DEFAULT, 0);
 166                 nnode->tn_reg.tn_aobj_pages = 0;
 167                 nnode->tn_size = 0;
 168                 break;
 169
 170         default:
 171                 panic("tmpfs_alloc_node: type %p %d", nnode, (int)nnode->tn_type);
 172         }
 173
 174         TMPFS_NODE_LOCK(nnode);
 175         TMPFS_LOCK(tmp);
 176         LIST_INSERT_HEAD(&tmp->tm_nodes_used, nnode, tn_entries);
 177         tmp->tm_nodes_inuse++;
 178         TMPFS_UNLOCK(tmp);
 179         TMPFS_NODE_UNLOCK(nnode);
 180
 181         *node = nnode;
 182         return 0;
 183 }
 184
 185 /* --------------------------------------------------------------------- */
 186
 187 /*
 188  * Destroys the node pointed to by node from the file system 'tmp'.
 189  * If the node does not belong to the given mount point, the results are
 190  * unpredicted.
 191  *
 192  * If the node references a directory; no entries are allowed because
 193  * their removal could need a recursive algorithm, something forbidden in
 194  * kernel space.  Furthermore, there is not need to provide such
 195  * functionality (recursive removal) because the only primitives offered
 196  * to the user are the removal of empty directories and the deletion of
 197  * individual files.
 198  *
 199  * Note that nodes are not really deleted; in fact, when a node has been
 200  * allocated, it cannot be deleted during the whole life of the file
 201  * system.  Instead, they are moved to the available list and remain there
 202  * until reused.
 203  */
 204 void
 205 tmpfs_free_node(struct tmpfs_mount *tmp, struct tmpfs_node *node)
 206 {
 207         size_t pages = 0;
 208
 209 #ifdef INVARIANTS
 210         TMPFS_ASSERT_ELOCKED(node);
 211         KKASSERT(node->tn_vnode == NULL);
 212         KKASSERT((node->tn_vpstate & TMPFS_VNODE_ALLOCATING) == 0);
 213 #endif
 214
 215         TMPFS_LOCK(tmp);
 216         LIST_REMOVE(node, tn_entries);
 217         tmp->tm_nodes_inuse--;
 218         TMPFS_UNLOCK(tmp);
 219         TMPFS_NODE_UNLOCK(node);
 220
 221         switch (node->tn_type) {
 222         case VNON:
 223                 /* Do not do anything.  VNON is provided to let the
 224                  * allocation routine clean itself easily by avoiding
 225                  * duplicating code in it. */
 226                 /* FALLTHROUGH */
 227         case VBLK:
 228                 /* FALLTHROUGH */
 229         case VCHR:
 230                 /* FALLTHROUGH */
 231                 break;
 232         case VDIR:
 233                 /*
 234                  * The parent link can be NULL if this is the root
 235                  * node.
 236                  */
 237                 node->tn_links--;
 238                 node->tn_size = 0;
 239                 KKASSERT(node->tn_dir.tn_parent || node == tmp->tm_root);
 240                 if (node->tn_dir.tn_parent) {
 241                         TMPFS_NODE_LOCK(node->tn_dir.tn_parent);
 242                         node->tn_dir.tn_parent->tn_links--;
 243
 244                         /*
 245                          * If the parent directory has no more links and
 246                          * no vnode ref nothing is going to come along
 247                          * and clean it up unless we do it here.
 248                          */
 249                         if (node->tn_dir.tn_parent->tn_links == 0 &&
 250                             node->tn_dir.tn_parent->tn_vnode == NULL) {
 251                                 tmpfs_free_node(tmp, node->tn_dir.tn_parent);
 252                                 /* eats parent lock */
 253                         } else {
 254                                 TMPFS_NODE_UNLOCK(node->tn_dir.tn_parent);
 255                         }
 256                         node->tn_dir.tn_parent = NULL;
 257                 }
 258
 259                 /*
 260                  * If the root node is being destroyed don't leave a
 261                  * dangling pointer in tmpfs_mount.
 262                  */
 263                 if (node == tmp->tm_root)
 264                         tmp->tm_root = NULL;
 265                 break;
 266         case VFIFO:
 267                 /* FALLTHROUGH */
 268         case VSOCK:
 269                 break;
 270
 271         case VLNK:
 272                 kfree(node->tn_link, M_TMPFSNAME);
 273                 node->tn_link = NULL;
 274                 break;
 275
 276         case VREG:
 277                 if (node->tn_reg.tn_aobj != NULL)
 278                         vm_pager_deallocate(node->tn_reg.tn_aobj);
 279                 node->tn_reg.tn_aobj = NULL;
 280                 pages = node->tn_reg.tn_aobj_pages;
 281                 break;
 282
 283         default:
 284                 panic("tmpfs_free_node: type %p %d", node, (int)node->tn_type);
 285         }
 286
 287         /*
 288          * Clean up fields for the next allocation.  The objcache only ctors
 289          * new allocations.
 290          */
 291         tmpfs_node_ctor(node, NULL, 0);
 292         objcache_put(tmp->tm_node_pool, node);
 293         /* node is now invalid */
 294
 295         TMPFS_LOCK(tmp);
 296         tmp->tm_pages_used -= pages;
 297         TMPFS_UNLOCK(tmp);
 298 }
 299
 300 /* --------------------------------------------------------------------- */
 301
 302 /*
 303  * Allocates a new directory entry for the node node with a name of name.
 304  * The new directory entry is returned in *de.
 305  *
 306  * The link count of node is increased by one to reflect the new object
 307  * referencing it.
 308  *
 309  * Returns zero on success or an appropriate error code on failure.
 310  */
 311 int
 312 tmpfs_alloc_dirent(struct tmpfs_mount *tmp, struct tmpfs_node *node,
 313     const char *name, uint16_t len, struct tmpfs_dirent **de)
 314 {
 315         struct tmpfs_dirent *nde;
 316
 317
 318         nde = (struct tmpfs_dirent *)objcache_get(tmp->tm_dirent_pool, M_WAITOK);
 319         nde->td_name = kmalloc(len + 1, M_TMPFSNAME, M_WAITOK);
 320         nde->td_namelen = len;
 321         bcopy(name, nde->td_name, len);
 322         nde->td_name[len] = '\0';
 323
 324         nde->td_node = node;
 325
 326         TMPFS_NODE_LOCK(node);
 327         node->tn_links++;
 328         TMPFS_NODE_UNLOCK(node);
 329
 330         *de = nde;
 331
 332         return 0;
 333 }
 334
 335 /* --------------------------------------------------------------------- */
 336
 337 /*
 338  * Frees a directory entry.  It is the caller's responsibility to destroy
 339  * the node referenced by it if needed.
 340  *
 341  * The link count of node is decreased by one to reflect the removal of an
 342  * object that referenced it.  This only happens if 'node_exists' is true;
 343  * otherwise the function will not access the node referred to by the
 344  * directory entry, as it may already have been released from the outside.
 345  */
 346 void
 347 tmpfs_free_dirent(struct tmpfs_mount *tmp, struct tmpfs_dirent *de)
 348 {
 349         struct tmpfs_node *node;
 350
 351         node = de->td_node;
 352
 353         TMPFS_NODE_LOCK(node);
 354         TMPFS_ASSERT_ELOCKED(node);
 355         KKASSERT(node->tn_links > 0);
 356         node->tn_links--;
 357         TMPFS_NODE_UNLOCK(node);
 358
 359         kfree(de->td_name, M_TMPFSNAME);
 360         de->td_namelen = 0;
 361         de->td_name = NULL;
 362         de->td_node = NULL;
 363         objcache_put(tmp->tm_dirent_pool, de);
 364 }
 365
 366 /* --------------------------------------------------------------------- */
 367
 368 /*
 369  * Allocates a new vnode for the node node or returns a new reference to
 370  * an existing one if the node had already a vnode referencing it.  The
 371  * resulting locked vnode is returned in *vpp.
 372  *
 373  * Returns zero on success or an appropriate error code on failure.
 374  */
 375 int
 376 tmpfs_alloc_vp(struct mount *mp, struct tmpfs_node *node, int lkflag,
 377     struct vnode **vpp)
 378 {
 379         int error = 0;
 380         struct vnode *vp;
 381
 382 loop:
 383         TMPFS_NODE_LOCK(node);
 384         if ((vp = node->tn_vnode) != NULL) {
 385                 KKASSERT((node->tn_vpstate & TMPFS_VNODE_DOOMED) == 0);
 386                 TMPFS_NODE_UNLOCK(node);
 387                 (void) vget(vp, lkflag | LK_EXCLUSIVE | LK_RETRY);
 388
 389                 /*
 390                  * Make sure the vnode is still there after
 391                  * getting the interlock to avoid racing a free.
 392                  */
 393                 if (node->tn_vnode == NULL || node->tn_vnode != vp) {
 394                         vput(vp);
 395                         goto loop;
 396                 }
 397
 398                 goto out;
 399         }
 400
 401         /*
 402          * This should never happen.
 403          */
 404         if (node->tn_vpstate & TMPFS_VNODE_DOOMED) {
 405                 TMPFS_NODE_UNLOCK(node);
 406                 error = ENOENT;
 407                 vp = NULL;
 408                 goto out;
 409         }
 410
 411         /*
 412          * otherwise lock the vp list while we call getnewvnode
 413          * since that can block.
 414          */
 415         if (node->tn_vpstate & TMPFS_VNODE_ALLOCATING) {
 416                 node->tn_vpstate |= TMPFS_VNODE_WANT;
 417                 error = tsleep((caddr_t) &node->tn_vpstate,
 418                     PINTERLOCKED | PCATCH, "tmpfs_alloc_vp", 0);
 419                 TMPFS_NODE_UNLOCK(node);
 420                 if (error)
 421                         return error;
 422
 423                 goto loop;
 424         } else
 425                 node->tn_vpstate |= TMPFS_VNODE_ALLOCATING;
 426
 427         TMPFS_NODE_UNLOCK(node);
 428
 429         /* Get a new vnode and associate it with our node. */
 430         error = getnewvnode(VT_TMPFS, mp, &vp, VLKTIMEOUT, LK_CANRECURSE);
 431         if (error != 0)
 432                 goto unlock;
 433         KKASSERT(vp != NULL);
 434
 435         vp->v_data = node;
 436         vp->v_type = node->tn_type;
 437
 438         /* Type-specific initialization. */
 439         switch (node->tn_type) {
 440         case VBLK:
 441                 /* FALLTHROUGH */
 442         case VCHR:
 443                 /* FALLTHROUGH */
 444         case VSOCK:
 445                 break;
 446         case VREG:
 447                 vinitvmio(vp, node->tn_size);
 448                 break;
 449         case VLNK:
 450                 if (node->tn_size >= vp->v_mount->mnt_maxsymlinklen)
 451                         vinitvmio(vp, node->tn_size);
 452                 break;
 453         case VFIFO:
 454                 vp->v_ops = &mp->mnt_vn_fifo_ops;
 455                 break;
 456         case VDIR:
 457                 vinitvmio(vp, node->tn_size);
 458                 break;
 459
 460         default:
 461                 panic("tmpfs_alloc_vp: type %p %d", node, (int)node->tn_type);
 462         }
 463
 464         insmntque(vp, mp);
 465
 466 unlock:
 467         TMPFS_NODE_LOCK(node);
 468
 469         KKASSERT(node->tn_vpstate & TMPFS_VNODE_ALLOCATING);
 470         node->tn_vpstate &= ~TMPFS_VNODE_ALLOCATING;
 471         node->tn_vnode = vp;
 472
 473         if (node->tn_vpstate & TMPFS_VNODE_WANT) {
 474                 node->tn_vpstate &= ~TMPFS_VNODE_WANT;
 475                 TMPFS_NODE_UNLOCK(node);
 476                 wakeup((caddr_t) &node->tn_vpstate);
 477         } else
 478                 TMPFS_NODE_UNLOCK(node);
 479
 480 out:
 481         *vpp = vp;
 482
 483         KKASSERT(IFF(error == 0, *vpp != NULL && vn_islocked(*vpp)));
 484 #ifdef INVARIANTS
 485         TMPFS_NODE_LOCK(node);
 486         KKASSERT(*vpp == node->tn_vnode);
 487         TMPFS_NODE_UNLOCK(node);
 488 #endif
 489
 490         return error;
 491 }
 492
 493 /* --------------------------------------------------------------------- */
 494
 495 /*
 496  * Destroys the association between the vnode vp and the node it
 497  * references.
 498  */
 499 void
 500 tmpfs_free_vp(struct vnode *vp)
 501 {
 502         struct tmpfs_node *node;
 503
 504         node = VP_TO_TMPFS_NODE(vp);
 505
 506         TMPFS_NODE_LOCK(node);
 507         KKASSERT(lockcount(TMPFS_NODE_MTX(node)) > 0);
 508         node->tn_vnode = NULL;
 509         TMPFS_NODE_UNLOCK(node);
 510         vp->v_data = NULL;
 511 }
 512
 513 /* --------------------------------------------------------------------- */
 514
 515 /*
 516  * Allocates a new file of type 'type' and adds it to the parent directory
 517  * 'dvp'; this addition is done using the component name given in 'cnp'.
 518  * The ownership of the new file is automatically assigned based on the
 519  * credentials of the caller (through 'cnp'), the group is set based on
 520  * the parent directory and the mode is determined from the 'vap' argument.
 521  * If successful, *vpp holds a vnode to the newly created file and zero
 522  * is returned.  Otherwise *vpp is NULL and the function returns an
 523  * appropriate error code.
 524  */
 525 int
 526 tmpfs_alloc_file(struct vnode *dvp, struct vnode **vpp, struct vattr *vap,
 527     struct namecache *ncp, struct ucred *cred, char *target)
 528 {
 529         int error;
 530         struct tmpfs_dirent *de;
 531         struct tmpfs_mount *tmp;
 532         struct tmpfs_node *dnode;
 533         struct tmpfs_node *node;
 534         struct tmpfs_node *parent;
 535
 536         tmp = VFS_TO_TMPFS(dvp->v_mount);
 537         dnode = VP_TO_TMPFS_DIR(dvp);
 538         *vpp = NULL;
 539
 540         /* If the entry we are creating is a directory, we cannot overflow
 541          * the number of links of its parent, because it will get a new
 542          * link. */
 543         if (vap->va_type == VDIR) {
 544                 /* Ensure that we do not overflow the maximum number of links
 545                  * imposed by the system. */
 546                 KKASSERT(dnode->tn_links <= LINK_MAX);
 547                 if (dnode->tn_links == LINK_MAX) {
 548                         return EMLINK;
 549                 }
 550
 551                 parent = dnode;
 552                 KKASSERT(parent != NULL);
 553         } else
 554                 parent = NULL;
 555
 556         /* Allocate a node that represents the new file. */
 557         error = tmpfs_alloc_node(tmp, vap->va_type, cred->cr_uid,
 558             dnode->tn_gid, vap->va_mode, parent, target, vap->va_rmajor, vap->va_rminor, &node);
 559         if (error != 0)
 560                 return error;
 561         TMPFS_NODE_LOCK(node);
 562
 563         /* Allocate a directory entry that points to the new file. */
 564         error = tmpfs_alloc_dirent(tmp, node, ncp->nc_name, ncp->nc_nlen, &de);
 565         if (error != 0) {
 566                 tmpfs_free_node(tmp, node);
 567                 /* eats node lock */
 568                 return error;
 569         }
 570
 571         /* Allocate a vnode for the new file. */
 572         error = tmpfs_alloc_vp(dvp->v_mount, node, LK_EXCLUSIVE, vpp);
 573         if (error != 0) {
 574                 tmpfs_free_dirent(tmp, de);
 575                 tmpfs_free_node(tmp, node);
 576                 /* eats node lock */
 577                 return error;
 578         }
 579
 580         /* Now that all required items are allocated, we can proceed to
 581          * insert the new node into the directory, an operation that
 582          * cannot fail. */
 583         tmpfs_dir_attach(dvp, de);
 584         TMPFS_NODE_UNLOCK(node);
 585
 586         return error;
 587 }
 588
 589 /* --------------------------------------------------------------------- */
 590
 591 /*
 592  * Attaches the directory entry de to the directory represented by vp.
 593  * Note that this does not change the link count of the node pointed by
 594  * the directory entry, as this is done by tmpfs_alloc_dirent.
 595  */
 596 void
 597 tmpfs_dir_attach(struct vnode *vp, struct tmpfs_dirent *de)
 598 {
 599         struct tmpfs_node *dnode;
 600
 601         dnode = VP_TO_TMPFS_DIR(vp);
 602
 603         TAILQ_INSERT_TAIL(&dnode->tn_dir.tn_dirhead, de, td_entries);
 604
 605         TMPFS_NODE_LOCK(dnode);
 606         TMPFS_ASSERT_ELOCKED(dnode);
 607         dnode->tn_size += sizeof(struct tmpfs_dirent);
 608         dnode->tn_status |= TMPFS_NODE_ACCESSED | TMPFS_NODE_CHANGED | \
 609             TMPFS_NODE_MODIFIED;
 610         TMPFS_NODE_UNLOCK(dnode);
 611 }
 612
 613 /* --------------------------------------------------------------------- */
 614
 615 /*
 616  * Detaches the directory entry de from the directory represented by vp.
 617  * Note that this does not change the link count of the node pointed by
 618  * the directory entry, as this is done by tmpfs_free_dirent.
 619  */
 620 void
 621 tmpfs_dir_detach(struct vnode *vp, struct tmpfs_dirent *de)
 622 {
 623         struct tmpfs_node *dnode;
 624
 625         dnode = VP_TO_TMPFS_DIR(vp);
 626
 627
 628         if (dnode->tn_dir.tn_readdir_lastp == de) {
 629                 dnode->tn_dir.tn_readdir_lastn = 0;
 630                 dnode->tn_dir.tn_readdir_lastp = NULL;
 631         }
 632         TAILQ_REMOVE(&dnode->tn_dir.tn_dirhead, de, td_entries);
 633
 634         TMPFS_NODE_LOCK(dnode);
 635         TMPFS_ASSERT_ELOCKED(dnode);
 636         dnode->tn_size -= sizeof(struct tmpfs_dirent);
 637         dnode->tn_status |= TMPFS_NODE_ACCESSED | TMPFS_NODE_CHANGED | \
 638             TMPFS_NODE_MODIFIED;
 639         TMPFS_NODE_UNLOCK(dnode);
 640 }
 641
 642 /* --------------------------------------------------------------------- */
 643
 644 /*
 645  * Looks for a directory entry in the directory represented by node.
 646  * 'ncp' describes the name of the entry to look for.  Note that the .
 647  * and .. components are not allowed as they do not physically exist
 648  * within directories.
 649  *
 650  * Returns a pointer to the entry when found, otherwise NULL.
 651  */
 652 struct tmpfs_dirent *
 653 tmpfs_dir_lookup(struct tmpfs_node *node, struct tmpfs_node *f,
 654     struct namecache *ncp)
 655 {
 656         struct tmpfs_dirent *de;
 657         int len = ncp->nc_nlen;
 658
 659         TMPFS_VALIDATE_DIR(node);
 660
 661         TAILQ_FOREACH(de, &node->tn_dir.tn_dirhead, td_entries) {
 662                 if (f != NULL && de->td_node != f)
 663                     continue;
 664                 if (len == de->td_namelen) {
 665                         if (!memcmp(ncp->nc_name, de->td_name, len))
 666                                 break;
 667                 }
 668         }
 669
 670         TMPFS_NODE_LOCK(node);
 671         node->tn_status |= TMPFS_NODE_ACCESSED;
 672         TMPFS_NODE_UNLOCK(node);
 673
 674         return de;
 675 }
 676
 677 /* --------------------------------------------------------------------- */
 678
 679 /*
 680  * Helper function for tmpfs_readdir.  Creates a '.' entry for the given
 681  * directory and returns it in the uio space.  The function returns 0
 682  * on success, -1 if there was not enough space in the uio structure to
 683  * hold the directory entry or an appropriate error code if another
 684  * error happens.
 685  */
 686 int
 687 tmpfs_dir_getdotdent(struct tmpfs_node *node, struct uio *uio)
 688 {
 689         int error;
 690         struct dirent dent;
 691         int dirsize;
 692
 693         TMPFS_VALIDATE_DIR(node);
 694         KKASSERT(uio->uio_offset == TMPFS_DIRCOOKIE_DOT);
 695
 696         dent.d_ino = node->tn_id;
 697         dent.d_type = DT_DIR;
 698         dent.d_namlen = 1;
 699         dent.d_name[0] = '.';
 700         dent.d_name[1] = '\0';
 701         dirsize = _DIRENT_DIRSIZ(&dent);
 702
 703         if (dirsize > uio->uio_resid)
 704                 error = -1;
 705         else {
 706                 error = uiomove((caddr_t)&dent, dirsize, uio);
 707                 if (error == 0)
 708                         uio->uio_offset = TMPFS_DIRCOOKIE_DOTDOT;
 709         }
 710
 711         node->tn_status |= TMPFS_NODE_ACCESSED;
 712
 713         return error;
 714 }
 715
 716 /* --------------------------------------------------------------------- */
 717
 718 /*
 719  * Helper function for tmpfs_readdir.  Creates a '..' entry for the given
 720  * directory and returns it in the uio space.  The function returns 0
 721  * on success, -1 if there was not enough space in the uio structure to
 722  * hold the directory entry or an appropriate error code if another
 723  * error happens.
 724  */
 725 int
 726 tmpfs_dir_getdotdotdent(struct tmpfs_node *node, struct uio *uio)
 727 {
 728         int error;
 729         struct dirent dent;
 730         int dirsize;
 731
 732         TMPFS_VALIDATE_DIR(node);
 733         KKASSERT(uio->uio_offset == TMPFS_DIRCOOKIE_DOTDOT);
 734
 735         /*
 736          * Return ENOENT if the current node is already removed.
 737          */
 738         if (node->tn_dir.tn_parent == NULL) {
 739                 return (ENOENT);
 740         }
 741
 742         TMPFS_NODE_LOCK(node->tn_dir.tn_parent);
 743         dent.d_ino = node->tn_dir.tn_parent->tn_id;
 744         TMPFS_NODE_UNLOCK(node->tn_dir.tn_parent);
 745
 746         dent.d_type = DT_DIR;
 747         dent.d_namlen = 2;
 748         dent.d_name[0] = '.';
 749         dent.d_name[1] = '.';
 750         dent.d_name[2] = '\0';
 751         dirsize = _DIRENT_DIRSIZ(&dent);
 752
 753         if (dirsize > uio->uio_resid)
 754                 error = -1;
 755         else {
 756                 error = uiomove((caddr_t)&dent, dirsize, uio);
 757                 if (error == 0) {
 758                         struct tmpfs_dirent *de;
 759
 760                         de = TAILQ_FIRST(&node->tn_dir.tn_dirhead);
 761                         if (de == NULL)
 762                                 uio->uio_offset = TMPFS_DIRCOOKIE_EOF;
 763                         else
 764                                 uio->uio_offset = tmpfs_dircookie(de);
 765                 }
 766         }
 767
 768         node->tn_status |= TMPFS_NODE_ACCESSED;
 769
 770         return error;
 771 }
 772
 773 /* --------------------------------------------------------------------- */
 774
 775 /*
 776  * Lookup a directory entry by its associated cookie.
 777  */
 778 struct tmpfs_dirent *
 779 tmpfs_dir_lookupbycookie(struct tmpfs_node *node, off_t cookie)
 780 {
 781         struct tmpfs_dirent *de;
 782
 783         if (cookie == node->tn_dir.tn_readdir_lastn &&
 784             node->tn_dir.tn_readdir_lastp != NULL) {
 785                 return node->tn_dir.tn_readdir_lastp;
 786         }
 787
 788         TAILQ_FOREACH(de, &node->tn_dir.tn_dirhead, td_entries) {
 789                 if (tmpfs_dircookie(de) == cookie) {
 790                         break;
 791                 }
 792         }
 793
 794         return de;
 795 }
 796
 797 /* --------------------------------------------------------------------- */
 798
 799 /*
 800  * Helper function for tmpfs_readdir.  Returns as much directory entries
 801  * as can fit in the uio space.  The read starts at uio->uio_offset.
 802  * The function returns 0 on success, -1 if there was not enough space
 803  * in the uio structure to hold the directory entry or an appropriate
 804  * error code if another error happens.
 805  */
 806 int
 807 tmpfs_dir_getdents(struct tmpfs_node *node, struct uio *uio, off_t *cntp)
 808 {
 809         int error;
 810         off_t startcookie;
 811         struct tmpfs_dirent *de;
 812
 813         TMPFS_VALIDATE_DIR(node);
 814
 815         /* Locate the first directory entry we have to return.  We have cached
 816          * the last readdir in the node, so use those values if appropriate.
 817          * Otherwise do a linear scan to find the requested entry. */
 818         startcookie = uio->uio_offset;
 819         KKASSERT(startcookie != TMPFS_DIRCOOKIE_DOT);
 820         KKASSERT(startcookie != TMPFS_DIRCOOKIE_DOTDOT);
 821         if (startcookie == TMPFS_DIRCOOKIE_EOF) {
 822                 return 0;
 823         } else {
 824                 de = tmpfs_dir_lookupbycookie(node, startcookie);
 825         }
 826         if (de == NULL) {
 827                 return EINVAL;
 828         }
 829
 830         /* Read as much entries as possible; i.e., until we reach the end of
 831          * the directory or we exhaust uio space. */
 832         do {
 833                 struct dirent d;
 834                 int reclen;
 835
 836                 /* Create a dirent structure representing the current
 837                  * tmpfs_node and fill it. */
 838                 d.d_ino = de->td_node->tn_id;
 839                 switch (de->td_node->tn_type) {
 840                 case VBLK:
 841                         d.d_type = DT_BLK;
 842                         break;
 843
 844                 case VCHR:
 845                         d.d_type = DT_CHR;
 846                         break;
 847
 848                 case VDIR:
 849                         d.d_type = DT_DIR;
 850                         break;
 851
 852                 case VFIFO:
 853                         d.d_type = DT_FIFO;
 854                         break;
 855
 856                 case VLNK:
 857                         d.d_type = DT_LNK;
 858                         break;
 859
 860                 case VREG:
 861                         d.d_type = DT_REG;
 862                         break;
 863
 864                 case VSOCK:
 865                         d.d_type = DT_SOCK;
 866                         break;
 867
 868                 default:
 869                         panic("tmpfs_dir_getdents: type %p %d",
 870                             de->td_node, (int)de->td_node->tn_type);
 871                 }
 872                 d.d_namlen = de->td_namelen;
 873                 KKASSERT(de->td_namelen < sizeof(d.d_name));
 874                 bcopy(de->td_name, d.d_name, d.d_namlen);
 875                 d.d_name[d.d_namlen] = '\0';
 876                 reclen = _DIRENT_RECLEN(d.d_namlen);
 877
 878                 /* Stop reading if the directory entry we are treating is
 879                  * bigger than the amount of data that can be returned. */
 880                 if (reclen > uio->uio_resid) {
 881                         error = -1;
 882                         break;
 883                 }
 884
 885                 /* Copy the new dirent structure into the output buffer and
 886                  * advance pointers. */
 887                 error = uiomove((caddr_t)&d, reclen, uio);
 888
 889                 (*cntp)++;
 890                 de = TAILQ_NEXT(de, td_entries);
 891         } while (error == 0 && uio->uio_resid > 0 && de != NULL);
 892
 893         /* Update the offset and cache. */
 894         if (de == NULL) {
 895                 uio->uio_offset = TMPFS_DIRCOOKIE_EOF;
 896                 node->tn_dir.tn_readdir_lastn = 0;
 897                 node->tn_dir.tn_readdir_lastp = NULL;
 898         } else {
 899                 node->tn_dir.tn_readdir_lastn = uio->uio_offset = tmpfs_dircookie(de);
 900                 node->tn_dir.tn_readdir_lastp = de;
 901         }
 902         node->tn_status |= TMPFS_NODE_ACCESSED;
 903
 904         return error;
 905 }
 906
 907 /* --------------------------------------------------------------------- */
 908
 909 /*
 910  * Resizes the aobj associated to the regular file pointed to by vp to
 911  * the size newsize.  'vp' must point to a vnode that represents a regular
 912  * file.  'newsize' must be positive.
 913  *
 914  * pass trivial as 1 when buf content will be overwritten, otherwise set 0
 915  * to be zero filled.
 916  *
 917  * Returns zero on success or an appropriate error code on failure.
 918  */
 919 int
 920 tmpfs_reg_resize(struct vnode *vp, off_t newsize, int trivial)
 921 {
 922         int error;
 923         size_t newpages, oldpages;
 924         struct tmpfs_mount *tmp;
 925         struct tmpfs_node *node;
 926         off_t oldsize;
 927
 928 #ifdef INVARIANTS
 929         KKASSERT(vp->v_type == VREG);
 930         KKASSERT(newsize >= 0);
 931 #endif
 932
 933         node = VP_TO_TMPFS_NODE(vp);
 934         tmp = VFS_TO_TMPFS(vp->v_mount);
 935
 936         /* Convert the old and new sizes to the number of pages needed to
 937          * store them.  It may happen that we do not need to do anything
 938          * because the last allocated page can accommodate the change on
 939          * its own. */
 940         oldsize = node->tn_size;
 941         oldpages = round_page(oldsize) / PAGE_SIZE;
 942         KKASSERT(oldpages == node->tn_reg.tn_aobj_pages);
 943         newpages = round_page(newsize) / PAGE_SIZE;
 944
 945         if (newpages > oldpages &&
 946             newpages - oldpages > TMPFS_PAGES_AVAIL(tmp)) {
 947                 error = ENOSPC;
 948                 goto out;
 949         }
 950
 951         TMPFS_LOCK(tmp);
 952         tmp->tm_pages_used += (newpages - oldpages);
 953         TMPFS_UNLOCK(tmp);
 954
 955         TMPFS_NODE_LOCK(node);
 956         node->tn_reg.tn_aobj_pages = newpages;
 957         node->tn_size = newsize;
 958         TMPFS_NODE_UNLOCK(node);
 959
 960         /*
 961          * When adjusting the vnode filesize and its VM object we must
 962          * also adjust our backing VM object (aobj).  The blocksize
 963          * used must match the block sized we use for the buffer cache.
 964          */
 965         if (newsize < oldsize) {
 966                 vm_pindex_t osize;
 967                 vm_object_t aobj;
 968
 969                 error = nvtruncbuf(vp, newsize, BSIZE, -1);
 970                 aobj = node->tn_reg.tn_aobj;
 971                 if (aobj) {
 972                         osize = aobj->size;
 973                         if (osize > vp->v_object->size) {
 974                                 aobj->size = osize;
 975                                 vm_object_page_remove(aobj, vp->v_object->size,
 976                                                       osize, FALSE);
 977                         }
 978                 }
 979         } else {
 980                 vm_object_t aobj;
 981
 982                 error = nvextendbuf(vp, oldsize, newsize, BSIZE, BSIZE,
 983                                     -1, -1, trivial);
 984                 aobj = node->tn_reg.tn_aobj;
 985                 if (aobj)
 986                         aobj->size = vp->v_object->size;
 987         }
 988
 989 out:
 990         return error;
 991 }
 992
 993 /* --------------------------------------------------------------------- */
 994
 995 /*
 996  * Change flags of the given vnode.
 997  * Caller should execute tmpfs_update on vp after a successful execution.
 998  * The vnode must be locked on entry and remain locked on exit.
 999  */
1000 int
1001 tmpfs_chflags(struct vnode *vp, int flags, struct ucred *cred)
1002 {
1003         int error;
1004         struct tmpfs_node *node;
1005         int fmode, mode;
1006
1007         KKASSERT(vn_islocked(vp));
1008
1009         node = VP_TO_TMPFS_NODE(vp);
1010
1011         /* Disallow this operation if the file system is mounted read-only. */
1012         if (vp->v_mount->mnt_flag & MNT_RDONLY)
1013                 return EROFS;
1014
1015         fmode = FFLAGS(node->tn_flags);
1016         mode = 0;
1017         if (((fmode & (FREAD | FWRITE)) == 0) || (fmode & O_CREAT))
1018                 return EINVAL;
1019         if (fmode & (FWRITE | O_TRUNC)) {
1020                 if (vp->v_type == VDIR) {
1021                         return EISDIR;
1022                 }
1023                 error = vn_writechk(vp, NULL);
1024                 if (error)
1025                         return (error);
1026
1027                 mode |= VWRITE;
1028         }
1029         if (fmode & FREAD)
1030                 mode |= VREAD;
1031         if (mode) {
1032                 error = VOP_ACCESS(vp, mode, cred);
1033                 if (error)
1034                         return (error);
1035         }
1036         /*
1037          * Unprivileged processes are not permitted to unset system
1038          * flags, or modify flags if any system flags are set.
1039          */
1040         TMPFS_NODE_LOCK(node);
1041         if (!priv_check_cred(cred, PRIV_VFS_SYSFLAGS, 0)) {
1042 #if 0
1043                 if (node->tn_flags
1044                   & (SF_NOUNLINK | SF_IMMUTABLE | SF_APPEND)) {
1045                         error = securelevel_gt(cred, 0);
1046                         if (error)
1047                                 return (error);
1048                 }
1049                 /* Snapshot flag cannot be set or cleared */
1050                 if (((flags & SF_SNAPSHOT) != 0 &&
1051                   (node->tn_flags & SF_SNAPSHOT) == 0) ||
1052                   ((flags & SF_SNAPSHOT) == 0 &&
1053                   (node->tn_flags & SF_SNAPSHOT) != 0))
1054                         return (EPERM);
1055 #endif
1056                 node->tn_flags = flags;
1057         } else {
1058                 if (node->tn_flags
1059                   & (SF_NOUNLINK | SF_IMMUTABLE | SF_APPEND) ||
1060                   (flags & UF_SETTABLE) != flags)
1061                         return (EPERM);
1062                 node->tn_flags &= SF_SETTABLE;
1063                 node->tn_flags |= (flags & UF_SETTABLE);
1064         }
1065         node->tn_status |= TMPFS_NODE_CHANGED;
1066         TMPFS_NODE_UNLOCK(node);
1067
1068         KKASSERT(vn_islocked(vp));
1069
1070         return 0;
1071 }
1072
1073 /* --------------------------------------------------------------------- */
1074
1075 /*
1076  * Change access mode on the given vnode.
1077  * Caller should execute tmpfs_update on vp after a successful execution.
1078  * The vnode must be locked on entry and remain locked on exit.
1079  */
1080 int
1081 tmpfs_chmod(struct vnode *vp, mode_t mode, struct ucred *cred)
1082 {
1083         int error;
1084         struct tmpfs_node *node;
1085         int fmode, accmode;
1086
1087         KKASSERT(vn_islocked(vp));
1088
1089         node = VP_TO_TMPFS_NODE(vp);
1090
1091         /* Disallow this operation if the file system is mounted read-only. */
1092         if (vp->v_mount->mnt_flag & MNT_RDONLY)
1093                 return EROFS;
1094
1095         /* Immutable or append-only files cannot be modified, either. */
1096         if (node->tn_flags & (IMMUTABLE | APPEND))
1097                 return EPERM;
1098
1099         fmode = FFLAGS(node->tn_flags);
1100         accmode = 0;
1101         if (((fmode & (FREAD | FWRITE)) == 0) || (fmode & O_CREAT))
1102                 return EINVAL;
1103         if (fmode & (FWRITE | O_TRUNC)) {
1104                 if (vp->v_type == VDIR) {
1105                         return EISDIR;
1106                 }
1107                 error = vn_writechk(vp, NULL);
1108                 if (error)
1109                         return (error);
1110
1111                 accmode |= VWRITE;
1112         }
1113         if (fmode & FREAD)
1114                 accmode |= VREAD;
1115         if (accmode) {
1116                 error = VOP_ACCESS(vp, accmode, cred);
1117                 if (error)
1118                         return (error);
1119         }
1120
1121         /*
1122          * Privileged processes may set the sticky bit on non-directories,
1123          * as well as set the setgid bit on a file with a group that the
1124          * process is not a member of.
1125          */
1126         if (vp->v_type != VDIR && (mode & S_ISTXT)) {
1127                 if (priv_check_cred(cred, PRIV_VFS_STICKYFILE, 0))
1128                         return (EFTYPE);
1129         }
1130         if (!groupmember(node->tn_gid, cred) && (mode & S_ISGID)) {
1131                 error = priv_check_cred(cred, PRIV_VFS_SETGID, 0);
1132                 if (error)
1133                         return (error);
1134         }
1135
1136
1137         TMPFS_NODE_LOCK(node);
1138         node->tn_mode &= ~ALLPERMS;
1139         node->tn_mode |= mode & ALLPERMS;
1140
1141         node->tn_status |= TMPFS_NODE_CHANGED;
1142         TMPFS_NODE_UNLOCK(node);
1143
1144         KKASSERT(vn_islocked(vp));
1145
1146         return 0;
1147 }
1148
1149 /* --------------------------------------------------------------------- */
1150
1151 /*
1152  * Change ownership of the given vnode.  At least one of uid or gid must
1153  * be different than VNOVAL.  If one is set to that value, the attribute
1154  * is unchanged.
1155  * Caller should execute tmpfs_update on vp after a successful execution.
1156  * The vnode must be locked on entry and remain locked on exit.
1157  */
1158 int
1159 tmpfs_chown(struct vnode *vp, uid_t uid, gid_t gid, struct ucred *cred)
1160 {
1161         int error;
1162         struct tmpfs_node *node;
1163         uid_t ouid;
1164         gid_t ogid;
1165         int fmode, mode;
1166
1167         KKASSERT(vn_islocked(vp));
1168
1169         node = VP_TO_TMPFS_NODE(vp);
1170
1171         /* Assign default values if they are unknown. */
1172         KKASSERT(uid != VNOVAL || gid != VNOVAL);
1173         if (uid == VNOVAL)
1174                 uid = node->tn_uid;
1175         if (gid == VNOVAL)
1176                 gid = node->tn_gid;
1177         KKASSERT(uid != VNOVAL && gid != VNOVAL);
1178
1179         /* Disallow this operation if the file system is mounted read-only. */
1180         if (vp->v_mount->mnt_flag & MNT_RDONLY)
1181                 return EROFS;
1182
1183         /* Immutable or append-only files cannot be modified, either. */
1184         if (node->tn_flags & (IMMUTABLE | APPEND))
1185                 return EPERM;
1186
1187         fmode = FFLAGS(node->tn_flags);
1188         mode = 0;
1189         if (((fmode & (FREAD | FWRITE)) == 0) || (fmode & O_CREAT))
1190                 return EINVAL;
1191         if (fmode & (FWRITE | O_TRUNC)) {
1192                 if (vp->v_type == VDIR) {
1193                         return EISDIR;
1194                 }
1195                 error = vn_writechk(vp, NULL);
1196                 if (error)
1197                         return (error);
1198
1199                 mode |= VWRITE;
1200         }
1201         if (fmode & FREAD)
1202                 mode |= VREAD;
1203         if (mode) {
1204                 error = VOP_ACCESS(vp, mode, cred);
1205                 if (error)
1206                         return (error);
1207         }
1208
1209         /*
1210          * To change the owner of a file, or change the group of a file to a
1211          * group of which we are not a member, the caller must have
1212          * privilege.
1213          */
1214         if ((uid != node->tn_uid ||
1215             (gid != node->tn_gid && !groupmember(gid, cred))) &&
1216             (error = priv_check_cred(cred, PRIV_VFS_CHOWN, 0)))
1217                 return (error);
1218
1219         ogid = node->tn_gid;
1220         ouid = node->tn_uid;
1221
1222         TMPFS_NODE_LOCK(node);
1223         node->tn_uid = uid;
1224         node->tn_gid = gid;
1225
1226         node->tn_status |= TMPFS_NODE_CHANGED;
1227
1228         if ((node->tn_mode & (S_ISUID | S_ISGID)) && (ouid != uid || ogid != gid)) {
1229                 if (priv_check_cred(cred, PRIV_VFS_RETAINSUGID, 0))
1230                         node->tn_mode &= ~(S_ISUID | S_ISGID);
1231         }
1232         TMPFS_NODE_UNLOCK(node);
1233
1234         KKASSERT(vn_islocked(vp));
1235
1236         return 0;
1237 }
1238
1239 /* --------------------------------------------------------------------- */
1240
1241 /*
1242  * Change size of the given vnode.
1243  * Caller should execute tmpfs_update on vp after a successful execution.
1244  * The vnode must be locked on entry and remain locked on exit.
1245  */
1246 int
1247 tmpfs_chsize(struct vnode *vp, u_quad_t size, struct ucred *cred)
1248 {
1249         int error;
1250         struct tmpfs_node *node;
1251
1252         KKASSERT(vn_islocked(vp));
1253
1254         node = VP_TO_TMPFS_NODE(vp);
1255
1256         /* Decide whether this is a valid operation based on the file type. */
1257         error = 0;
1258         switch (vp->v_type) {
1259         case VDIR:
1260                 return EISDIR;
1261
1262         case VREG:
1263                 if (vp->v_mount->mnt_flag & MNT_RDONLY)
1264                         return EROFS;
1265                 break;
1266
1267         case VBLK:
1268                 /* FALLTHROUGH */
1269         case VCHR:
1270                 /* FALLTHROUGH */
1271         case VFIFO:
1272                 /* Allow modifications of special files even if in the file
1273                  * system is mounted read-only (we are not modifying the
1274                  * files themselves, but the objects they represent). */
1275                 return 0;
1276
1277         default:
1278                 /* Anything else is unsupported. */
1279                 return EOPNOTSUPP;
1280         }
1281
1282         /* Immutable or append-only files cannot be modified, either. */
1283         if (node->tn_flags & (IMMUTABLE | APPEND))
1284                 return EPERM;
1285
1286         error = tmpfs_truncate(vp, size);
1287         /* tmpfs_truncate will raise the NOTE_EXTEND and NOTE_ATTRIB kevents
1288          * for us, as will update tn_status; no need to do that here. */
1289
1290         KKASSERT(vn_islocked(vp));
1291
1292         return error;
1293 }
1294
1295 /* --------------------------------------------------------------------- */
1296
1297 /*
1298  * Change access and modification times of the given vnode.
1299  * Caller should execute tmpfs_update on vp after a successful execution.
1300  * The vnode must be locked on entry and remain locked on exit.
1301  */
1302 int
1303 tmpfs_chtimes(struct vnode *vp, struct timespec *atime, struct timespec *mtime,
1304         int vaflags, struct ucred *cred)
1305 {
1306         int error;
1307         struct tmpfs_node *node;
1308         int fmode, mode;
1309
1310         KKASSERT(vn_islocked(vp));
1311
1312         node = VP_TO_TMPFS_NODE(vp);
1313
1314         /* Disallow this operation if the file system is mounted read-only. */
1315         if (vp->v_mount->mnt_flag & MNT_RDONLY)
1316                 return EROFS;
1317
1318         /* Immutable or append-only files cannot be modified, either. */
1319         if (node->tn_flags & (IMMUTABLE | APPEND))
1320                 return EPERM;
1321
1322         /* Determine if the user have proper privilege to update time. */
1323         fmode = FFLAGS(node->tn_flags);
1324         mode = 0;
1325         if (((fmode & (FREAD | FWRITE)) == 0) || (fmode & O_CREAT))
1326                 return EINVAL;
1327         if (fmode & (FWRITE | O_TRUNC)) {
1328                 if (vp->v_type == VDIR) {
1329                         return EISDIR;
1330                 }
1331                 error = vn_writechk(vp, NULL);
1332                 if (error)
1333                         return (error);
1334
1335                 mode |= VWRITE;
1336         }
1337         if (fmode & FREAD)
1338                 mode |= VREAD;
1339
1340         if (mode) {
1341                 if (vaflags & VA_UTIMES_NULL) {
1342                         error = VOP_ACCESS(vp, mode, cred);
1343                         if (error)
1344                                 error = VOP_ACCESS(vp, VWRITE, cred);
1345                 } else
1346                         error = VOP_ACCESS(vp, mode, cred);
1347                 if (error)
1348                         return (error);
1349         }
1350
1351         TMPFS_NODE_LOCK(node);
1352         if (atime->tv_sec != VNOVAL && atime->tv_nsec != VNOVAL)
1353                 node->tn_status |= TMPFS_NODE_ACCESSED;
1354
1355         if (mtime->tv_sec != VNOVAL && mtime->tv_nsec != VNOVAL)
1356                 node->tn_status |= TMPFS_NODE_MODIFIED;
1357
1358         TMPFS_NODE_UNLOCK(node);
1359
1360         tmpfs_itimes(vp, atime, mtime);
1361
1362         KKASSERT(vn_islocked(vp));
1363
1364         return 0;
1365 }
1366
1367 /* --------------------------------------------------------------------- */
1368 /* Sync timestamps */
1369 void
1370 tmpfs_itimes(struct vnode *vp, const struct timespec *acc,
1371     const struct timespec *mod)
1372 {
1373         struct tmpfs_node *node;
1374         struct timespec now;
1375
1376         node = VP_TO_TMPFS_NODE(vp);
1377
1378         if ((node->tn_status & (TMPFS_NODE_ACCESSED | TMPFS_NODE_MODIFIED |
1379             TMPFS_NODE_CHANGED)) == 0)
1380                 return;
1381
1382         vfs_timestamp(&now);
1383
1384         TMPFS_NODE_LOCK(node);
1385         if (node->tn_status & TMPFS_NODE_ACCESSED) {
1386                 if (acc == NULL)
1387                          acc = &now;
1388                 node->tn_atime = acc->tv_sec;
1389                 node->tn_atimensec = acc->tv_nsec;
1390         }
1391         if (node->tn_status & TMPFS_NODE_MODIFIED) {
1392                 if (mod == NULL)
1393                         mod = &now;
1394                 node->tn_mtime = mod->tv_sec;
1395                 node->tn_mtimensec = mod->tv_nsec;
1396         }
1397         if (node->tn_status & TMPFS_NODE_CHANGED) {
1398                 node->tn_ctime = now.tv_sec;
1399                 node->tn_ctimensec = now.tv_nsec;
1400         }
1401         node->tn_status &=
1402             ~(TMPFS_NODE_ACCESSED | TMPFS_NODE_MODIFIED | TMPFS_NODE_CHANGED);
1403         TMPFS_NODE_UNLOCK(node);
1404 }
1405
1406 /* --------------------------------------------------------------------- */
1407
1408 void
1409 tmpfs_update(struct vnode *vp)
1410 {
1411
1412         tmpfs_itimes(vp, NULL, NULL);
1413 }
1414
1415 /* --------------------------------------------------------------------- */
1416
1417 int
1418 tmpfs_truncate(struct vnode *vp, off_t length)
1419 {
1420         int error;
1421         struct tmpfs_node *node;
1422
1423         node = VP_TO_TMPFS_NODE(vp);
1424
1425         if (length < 0) {
1426                 error = EINVAL;
1427                 goto out;
1428         }
1429
1430         if (node->tn_size == length) {
1431                 error = 0;
1432                 goto out;
1433         }
1434
1435         if (length > VFS_TO_TMPFS(vp->v_mount)->tm_maxfilesize)
1436                 return (EFBIG);
1437
1438
1439         error = tmpfs_reg_resize(vp, length, 1);
1440
1441         if (error == 0) {
1442                 TMPFS_NODE_LOCK(node);
1443                 node->tn_status |= TMPFS_NODE_CHANGED | TMPFS_NODE_MODIFIED;
1444                 TMPFS_NODE_UNLOCK(node);
1445         }
1446
1447 out:
1448         tmpfs_update(vp);
1449
1450         return error;
1451 }
1452
1453 /* --------------------------------------------------------------------- */
1454
1455 static ino_t
1456 tmpfs_fetch_ino(void)
1457 {
1458         ino_t   ret;
1459
1460         spin_lock_wr(&ino_lock);
1461         ret = t_ino++;
1462         spin_unlock_wr(&ino_lock);
1463
1464         return ret;
1465 }