fs/open.c

   1 /*
   2  *  linux/fs/open.c
   3  *
   4  *  Copyright (C) 1991, 1992  Linus Torvalds
   5  */
   6
   7 #include <linux/string.h>
   8 #include <linux/mm.h>
   9 #include <linux/file.h>
  10 #include <linux/fdtable.h>
  11 #include <linux/fsnotify.h>
  12 #include <linux/module.h>
  13 #include <linux/tty.h>
  14 #include <linux/namei.h>
  15 #include <linux/backing-dev.h>
  16 #include <linux/capability.h>
  17 #include <linux/securebits.h>
  18 #include <linux/security.h>
  19 #include <linux/mount.h>
  20 #include <linux/fcntl.h>
  21 #include <linux/slab.h>
  22 #include <asm/uaccess.h>
  23 #include <linux/fs.h>
  24 #include <linux/personality.h>
  25 #include <linux/pagemap.h>
  26 #include <linux/syscalls.h>
  27 #include <linux/rcupdate.h>
  28 #include <linux/audit.h>
  29 #include <linux/falloc.h>
  30 #include <linux/fs_struct.h>
  31 #include <linux/ima.h>
  32 #include <linux/dnotify.h>
  33 #include <linux/compat.h>
  34
  35 #include "internal.h"
  36
  37 int do_truncate2(struct vfsmount *mnt, struct dentry *dentry, loff_t length,
  38                 unsigned int time_attrs, struct file *filp)
  39 {
  40         int ret;
  41         struct iattr newattrs;
  42
  43         /* Not pretty: "inode->i_size" shouldn't really be signed. But it is. */
  44         if (length < 0)
  45                 return -EINVAL;
  46
  47         newattrs.ia_size = length;
  48         newattrs.ia_valid = ATTR_SIZE | time_attrs;
  49         if (filp) {
  50                 newattrs.ia_file = filp;
  51                 newattrs.ia_valid |= ATTR_FILE;
  52         }
  53
  54         /* Remove suid, sgid, and file capabilities on truncate too */
  55         ret = dentry_needs_remove_privs(dentry);
  56         if (ret < 0)
  57                 return ret;
  58         if (ret)
  59                 newattrs.ia_valid |= ret | ATTR_FORCE;
  60
  61         mutex_lock(&dentry->d_inode->i_mutex);
  62         /* Note any delegations or leases have already been broken: */
  63         ret = notify_change2(mnt, dentry, &newattrs, NULL);
  64         mutex_unlock(&dentry->d_inode->i_mutex);
  65         return ret;
  66 }
  67 int do_truncate(struct dentry *dentry, loff_t length, unsigned int time_attrs,
  68         struct file *filp)
  69 {
  70         return do_truncate2(NULL, dentry, length, time_attrs, filp);
  71 }
  72
  73 long vfs_truncate(struct path *path, loff_t length)
  74 {
  75         struct inode *inode;
  76         struct vfsmount *mnt;
  77         long error;
  78
  79         inode = path->dentry->d_inode;
  80         mnt = path->mnt;
  81
  82         /* For directories it's -EISDIR, for other non-regulars - -EINVAL */
  83         if (S_ISDIR(inode->i_mode))
  84                 return -EISDIR;
  85         if (!S_ISREG(inode->i_mode))
  86                 return -EINVAL;
  87
  88         error = mnt_want_write(path->mnt);
  89         if (error)
  90                 goto out;
  91
  92         error = inode_permission2(mnt, inode, MAY_WRITE);
  93         if (error)
  94                 goto mnt_drop_write_and_out;
  95
  96         error = -EPERM;
  97         if (IS_APPEND(inode))
  98                 goto mnt_drop_write_and_out;
  99
 100         error = get_write_access(inode);
 101         if (error)
 102                 goto mnt_drop_write_and_out;
 103
 104         /*
 105          * Make sure that there are no leases.  get_write_access() protects
 106          * against the truncate racing with a lease-granting setlease().
 107          */
 108         error = break_lease(inode, O_WRONLY);
 109         if (error)
 110                 goto put_write_and_out;
 111
 112         error = locks_verify_truncate(inode, NULL, length);
 113         if (!error)
 114                 error = security_path_truncate(path);
 115         if (!error)
 116                 error = do_truncate2(mnt, path->dentry, length, 0, NULL);
 117
 118 put_write_and_out:
 119         put_write_access(inode);
 120 mnt_drop_write_and_out:
 121         mnt_drop_write(path->mnt);
 122 out:
 123         return error;
 124 }
 125 EXPORT_SYMBOL_GPL(vfs_truncate);
 126
 127 static long do_sys_truncate(const char __user *pathname, loff_t length)
 128 {
 129         unsigned int lookup_flags = LOOKUP_FOLLOW;
 130         struct path path;
 131         int error;
 132
 133         if (length < 0) /* sorry, but loff_t says... */
 134                 return -EINVAL;
 135
 136 retry:
 137         error = user_path_at(AT_FDCWD, pathname, lookup_flags, &path);
 138         if (!error) {
 139                 error = vfs_truncate(&path, length);
 140                 path_put(&path);
 141         }
 142         if (retry_estale(error, lookup_flags)) {
 143                 lookup_flags |= LOOKUP_REVAL;
 144                 goto retry;
 145         }
 146         return error;
 147 }
 148
 149 SYSCALL_DEFINE2(truncate, const char __user *, path, long, length)
 150 {
 151         return do_sys_truncate(path, length);
 152 }
 153
 154 #ifdef CONFIG_COMPAT
 155 COMPAT_SYSCALL_DEFINE2(truncate, const char __user *, path, compat_off_t, length)
 156 {
 157         return do_sys_truncate(path, length);
 158 }
 159 #endif
 160
 161 static long do_sys_ftruncate(unsigned int fd, loff_t length, int small)
 162 {
 163         struct inode *inode;
 164         struct dentry *dentry;
 165         struct vfsmount *mnt;
 166         struct fd f;
 167         int error;
 168
 169         error = -EINVAL;
 170         if (length < 0)
 171                 goto out;
 172         error = -EBADF;
 173         f = fdget(fd);
 174         if (!f.file)
 175                 goto out;
 176
 177         /* explicitly opened as large or we are on 64-bit box */
 178         if (f.file->f_flags & O_LARGEFILE)
 179                 small = 0;
 180
 181         dentry = f.file->f_path.dentry;
 182         mnt = f.file->f_path.mnt;
 183         inode = dentry->d_inode;
 184         error = -EINVAL;
 185         if (!S_ISREG(inode->i_mode) || !(f.file->f_mode & FMODE_WRITE))
 186                 goto out_putf;
 187
 188         error = -EINVAL;
 189         /* Cannot ftruncate over 2^31 bytes without large file support */
 190         if (small && length > MAX_NON_LFS)
 191                 goto out_putf;
 192
 193         error = -EPERM;
 194         if (IS_APPEND(inode))
 195                 goto out_putf;
 196
 197         sb_start_write(inode->i_sb);
 198         error = locks_verify_truncate(inode, f.file, length);
 199         if (!error)
 200                 error = security_path_truncate(&f.file->f_path);
 201         if (!error)
 202                 error = do_truncate2(mnt, dentry, length, ATTR_MTIME|ATTR_CTIME, f.file);
 203         sb_end_write(inode->i_sb);
 204 out_putf:
 205         fdput(f);
 206 out:
 207         return error;
 208 }
 209
 210 SYSCALL_DEFINE2(ftruncate, unsigned int, fd, unsigned long, length)
 211 {
 212         return do_sys_ftruncate(fd, length, 1);
 213 }
 214
 215 #ifdef CONFIG_COMPAT
 216 COMPAT_SYSCALL_DEFINE2(ftruncate, unsigned int, fd, compat_ulong_t, length)
 217 {
 218         return do_sys_ftruncate(fd, length, 1);
 219 }
 220 #endif
 221
 222 /* LFS versions of truncate are only needed on 32 bit machines */
 223 #if BITS_PER_LONG == 32
 224 SYSCALL_DEFINE2(truncate64, const char __user *, path, loff_t, length)
 225 {
 226         return do_sys_truncate(path, length);
 227 }
 228
 229 SYSCALL_DEFINE2(ftruncate64, unsigned int, fd, loff_t, length)
 230 {
 231         return do_sys_ftruncate(fd, length, 0);
 232 }
 233 #endif /* BITS_PER_LONG == 32 */
 234
 235
 236 int vfs_fallocate(struct file *file, int mode, loff_t offset, loff_t len)
 237 {
 238         struct inode *inode = file_inode(file);
 239         long ret;
 240
 241         if (offset < 0 || len <= 0)
 242                 return -EINVAL;
 243
 244         /* Return error if mode is not supported */
 245         if (mode & ~FALLOC_FL_SUPPORTED_MASK)
 246                 return -EOPNOTSUPP;
 247
 248         /* Punch hole and zero range are mutually exclusive */
 249         if ((mode & (FALLOC_FL_PUNCH_HOLE | FALLOC_FL_ZERO_RANGE)) ==
 250             (FALLOC_FL_PUNCH_HOLE | FALLOC_FL_ZERO_RANGE))
 251                 return -EOPNOTSUPP;
 252
 253         /* Punch hole must have keep size set */
 254         if ((mode & FALLOC_FL_PUNCH_HOLE) &&
 255             !(mode & FALLOC_FL_KEEP_SIZE))
 256                 return -EOPNOTSUPP;
 257
 258         /* Collapse range should only be used exclusively. */
 259         if ((mode & FALLOC_FL_COLLAPSE_RANGE) &&
 260             (mode & ~FALLOC_FL_COLLAPSE_RANGE))
 261                 return -EINVAL;
 262
 263         /* Insert range should only be used exclusively. */
 264         if ((mode & FALLOC_FL_INSERT_RANGE) &&
 265             (mode & ~FALLOC_FL_INSERT_RANGE))
 266                 return -EINVAL;
 267
 268         if (!(file->f_mode & FMODE_WRITE))
 269                 return -EBADF;
 270
 271         /*
 272          * We can only allow pure fallocate on append only files
 273          */
 274         if ((mode & ~FALLOC_FL_KEEP_SIZE) && IS_APPEND(inode))
 275                 return -EPERM;
 276
 277         if (IS_IMMUTABLE(inode))
 278                 return -EPERM;
 279
 280         /*
 281          * We cannot allow any fallocate operation on an active swapfile
 282          */
 283         if (IS_SWAPFILE(inode))
 284                 return -ETXTBSY;
 285
 286         /*
 287          * Revalidate the write permissions, in case security policy has
 288          * changed since the files were opened.
 289          */
 290         ret = security_file_permission(file, MAY_WRITE);
 291         if (ret)
 292                 return ret;
 293
 294         if (S_ISFIFO(inode->i_mode))
 295                 return -ESPIPE;
 296
 297         /*
 298          * Let individual file system decide if it supports preallocation
 299          * for directories or not.
 300          */
 301         if (!S_ISREG(inode->i_mode) && !S_ISDIR(inode->i_mode))
 302                 return -ENODEV;
 303
 304         /* Check for wrap through zero too */
 305         if (((offset + len) > inode->i_sb->s_maxbytes) || ((offset + len) < 0))
 306                 return -EFBIG;
 307
 308         if (!file->f_op->fallocate)
 309                 return -EOPNOTSUPP;
 310
 311         sb_start_write(inode->i_sb);
 312         ret = file->f_op->fallocate(file, mode, offset, len);
 313
 314         /*
 315          * Create inotify and fanotify events.
 316          *
 317          * To keep the logic simple always create events if fallocate succeeds.
 318          * This implies that events are even created if the file size remains
 319          * unchanged, e.g. when using flag FALLOC_FL_KEEP_SIZE.
 320          */
 321         if (ret == 0)
 322                 fsnotify_modify(file);
 323
 324         sb_end_write(inode->i_sb);
 325         return ret;
 326 }
 327 EXPORT_SYMBOL_GPL(vfs_fallocate);
 328
 329 SYSCALL_DEFINE4(fallocate, int, fd, int, mode, loff_t, offset, loff_t, len)
 330 {
 331         struct fd f = fdget(fd);
 332         int error = -EBADF;
 333
 334         if (f.file) {
 335                 error = vfs_fallocate(f.file, mode, offset, len);
 336                 fdput(f);
 337         }
 338         return error;
 339 }
 340
 341 /*
 342  * access() needs to use the real uid/gid, not the effective uid/gid.
 343  * We do this by temporarily clearing all FS-related capabilities and
 344  * switching the fsuid/fsgid around to the real ones.
 345  */
 346 SYSCALL_DEFINE3(faccessat, int, dfd, const char __user *, filename, int, mode)
 347 {
 348         const struct cred *old_cred;
 349         struct cred *override_cred;
 350         struct path path;
 351         struct inode *inode;
 352         struct vfsmount *mnt;
 353         int res;
 354         unsigned int lookup_flags = LOOKUP_FOLLOW;
 355
 356         if (mode & ~S_IRWXO)    /* where's F_OK, X_OK, W_OK, R_OK? */
 357                 return -EINVAL;
 358
 359         override_cred = prepare_creds();
 360         if (!override_cred)
 361                 return -ENOMEM;
 362
 363         override_cred->fsuid = override_cred->uid;
 364         override_cred->fsgid = override_cred->gid;
 365
 366         if (!issecure(SECURE_NO_SETUID_FIXUP)) {
 367                 /* Clear the capabilities if we switch to a non-root user */
 368                 kuid_t root_uid = make_kuid(override_cred->user_ns, 0);
 369                 if (!uid_eq(override_cred->uid, root_uid))
 370                         cap_clear(override_cred->cap_effective);
 371                 else
 372                         override_cred->cap_effective =
 373                                 override_cred->cap_permitted;
 374         }
 375
 376         /*
 377          * The new set of credentials can *only* be used in
 378          * task-synchronous circumstances, and does not need
 379          * RCU freeing, unless somebody then takes a separate
 380          * reference to it.
 381          *
 382          * NOTE! This is _only_ true because this credential
 383          * is used purely for override_creds() that installs
 384          * it as the subjective cred. Other threads will be
 385          * accessing ->real_cred, not the subjective cred.
 386          *
 387          * If somebody _does_ make a copy of this (using the
 388          * 'get_current_cred()' function), that will clear the
 389          * non_rcu field, because now that other user may be
 390          * expecting RCU freeing. But normal thread-synchronous
 391          * cred accesses will keep things non-RCY.
 392          */
 393         override_cred->non_rcu = 1;
 394
 395         old_cred = override_creds(override_cred);
 396 retry:
 397         res = user_path_at(dfd, filename, lookup_flags, &path);
 398         if (res)
 399                 goto out;
 400
 401         inode = d_backing_inode(path.dentry);
 402         mnt = path.mnt;
 403
 404         if ((mode & MAY_EXEC) && S_ISREG(inode->i_mode)) {
 405                 /*
 406                  * MAY_EXEC on regular files is denied if the fs is mounted
 407                  * with the "noexec" flag.
 408                  */
 409                 res = -EACCES;
 410                 if (path_noexec(&path))
 411                         goto out_path_release;
 412         }
 413
 414         res = inode_permission2(mnt, inode, mode | MAY_ACCESS);
 415         /* SuS v2 requires we report a read only fs too */
 416         if (res || !(mode & S_IWOTH) || special_file(inode->i_mode))
 417                 goto out_path_release;
 418         /*
 419          * This is a rare case where using __mnt_is_readonly()
 420          * is OK without a mnt_want/drop_write() pair.  Since
 421          * no actual write to the fs is performed here, we do
 422          * not need to telegraph to that to anyone.
 423          *
 424          * By doing this, we accept that this access is
 425          * inherently racy and know that the fs may change
 426          * state before we even see this result.
 427          */
 428         if (__mnt_is_readonly(path.mnt))
 429                 res = -EROFS;
 430
 431 out_path_release:
 432         path_put(&path);
 433         if (retry_estale(res, lookup_flags)) {
 434                 lookup_flags |= LOOKUP_REVAL;
 435                 goto retry;
 436         }
 437 out:
 438         revert_creds(old_cred);
 439         put_cred(override_cred);
 440         return res;
 441 }
 442
 443 SYSCALL_DEFINE2(access, const char __user *, filename, int, mode)
 444 {
 445         return sys_faccessat(AT_FDCWD, filename, mode);
 446 }
 447
 448 SYSCALL_DEFINE1(chdir, const char __user *, filename)
 449 {
 450         struct path path;
 451         int error;
 452         unsigned int lookup_flags = LOOKUP_FOLLOW | LOOKUP_DIRECTORY;
 453 retry:
 454         error = user_path_at(AT_FDCWD, filename, lookup_flags, &path);
 455         if (error)
 456                 goto out;
 457
 458         error = inode_permission2(path.mnt, path.dentry->d_inode, MAY_EXEC | MAY_CHDIR);
 459         if (error)
 460                 goto dput_and_out;
 461
 462         set_fs_pwd(current->fs, &path);
 463
 464 dput_and_out:
 465         path_put(&path);
 466         if (retry_estale(error, lookup_flags)) {
 467                 lookup_flags |= LOOKUP_REVAL;
 468                 goto retry;
 469         }
 470 out:
 471         return error;
 472 }
 473
 474 SYSCALL_DEFINE1(fchdir, unsigned int, fd)
 475 {
 476         struct fd f = fdget_raw(fd);
 477         struct inode *inode;
 478         struct vfsmount *mnt;
 479         int error = -EBADF;
 480
 481         error = -EBADF;
 482         if (!f.file)
 483                 goto out;
 484
 485         inode = file_inode(f.file);
 486         mnt = f.file->f_path.mnt;
 487
 488         error = -ENOTDIR;
 489         if (!S_ISDIR(inode->i_mode))
 490                 goto out_putf;
 491
 492         error = inode_permission2(mnt, inode, MAY_EXEC | MAY_CHDIR);
 493         if (!error)
 494                 set_fs_pwd(current->fs, &f.file->f_path);
 495 out_putf:
 496         fdput(f);
 497 out:
 498         return error;
 499 }
 500
 501 SYSCALL_DEFINE1(chroot, const char __user *, filename)
 502 {
 503         struct path path;
 504         int error;
 505         unsigned int lookup_flags = LOOKUP_FOLLOW | LOOKUP_DIRECTORY;
 506 retry:
 507         error = user_path_at(AT_FDCWD, filename, lookup_flags, &path);
 508         if (error)
 509                 goto out;
 510
 511         error = inode_permission2(path.mnt, path.dentry->d_inode, MAY_EXEC | MAY_CHDIR);
 512         if (error)
 513                 goto dput_and_out;
 514
 515         error = -EPERM;
 516         if (!ns_capable(current_user_ns(), CAP_SYS_CHROOT))
 517                 goto dput_and_out;
 518         error = security_path_chroot(&path);
 519         if (error)
 520                 goto dput_and_out;
 521
 522         set_fs_root(current->fs, &path);
 523         error = 0;
 524 dput_and_out:
 525         path_put(&path);
 526         if (retry_estale(error, lookup_flags)) {
 527                 lookup_flags |= LOOKUP_REVAL;
 528                 goto retry;
 529         }
 530 out:
 531         return error;
 532 }
 533
 534 static int chmod_common(struct path *path, umode_t mode)
 535 {
 536         struct inode *inode = path->dentry->d_inode;
 537         struct inode *delegated_inode = NULL;
 538         struct iattr newattrs;
 539         int error;
 540
 541         error = mnt_want_write(path->mnt);
 542         if (error)
 543                 return error;
 544 retry_deleg:
 545         mutex_lock(&inode->i_mutex);
 546         error = security_path_chmod(path, mode);
 547         if (error)
 548                 goto out_unlock;
 549         newattrs.ia_mode = (mode & S_IALLUGO) | (inode->i_mode & ~S_IALLUGO);
 550         newattrs.ia_valid = ATTR_MODE | ATTR_CTIME;
 551         error = notify_change2(path->mnt, path->dentry, &newattrs, &delegated_inode);
 552 out_unlock:
 553         mutex_unlock(&inode->i_mutex);
 554         if (delegated_inode) {
 555                 error = break_deleg_wait(&delegated_inode);
 556                 if (!error)
 557                         goto retry_deleg;
 558         }
 559         mnt_drop_write(path->mnt);
 560         return error;
 561 }
 562
 563 SYSCALL_DEFINE2(fchmod, unsigned int, fd, umode_t, mode)
 564 {
 565         struct fd f = fdget(fd);
 566         int err = -EBADF;
 567
 568         if (f.file) {
 569                 audit_file(f.file);
 570                 err = chmod_common(&f.file->f_path, mode);
 571                 fdput(f);
 572         }
 573         return err;
 574 }
 575
 576 SYSCALL_DEFINE3(fchmodat, int, dfd, const char __user *, filename, umode_t, mode)
 577 {
 578         struct path path;
 579         int error;
 580         unsigned int lookup_flags = LOOKUP_FOLLOW;
 581 retry:
 582         error = user_path_at(dfd, filename, lookup_flags, &path);
 583         if (!error) {
 584                 error = chmod_common(&path, mode);
 585                 path_put(&path);
 586                 if (retry_estale(error, lookup_flags)) {
 587                         lookup_flags |= LOOKUP_REVAL;
 588                         goto retry;
 589                 }
 590         }
 591         return error;
 592 }
 593
 594 SYSCALL_DEFINE2(chmod, const char __user *, filename, umode_t, mode)
 595 {
 596         return sys_fchmodat(AT_FDCWD, filename, mode);
 597 }
 598
 599 static int chown_common(struct path *path, uid_t user, gid_t group)
 600 {
 601         struct inode *inode = path->dentry->d_inode;
 602         struct inode *delegated_inode = NULL;
 603         int error;
 604         struct iattr newattrs;
 605         kuid_t uid;
 606         kgid_t gid;
 607
 608         uid = make_kuid(current_user_ns(), user);
 609         gid = make_kgid(current_user_ns(), group);
 610
 611 retry_deleg:
 612         newattrs.ia_valid =  ATTR_CTIME;
 613         if (user != (uid_t) -1) {
 614                 if (!uid_valid(uid))
 615                         return -EINVAL;
 616                 newattrs.ia_valid |= ATTR_UID;
 617                 newattrs.ia_uid = uid;
 618         }
 619         if (group != (gid_t) -1) {
 620                 if (!gid_valid(gid))
 621                         return -EINVAL;
 622                 newattrs.ia_valid |= ATTR_GID;
 623                 newattrs.ia_gid = gid;
 624         }
 625         if (!S_ISDIR(inode->i_mode))
 626                 newattrs.ia_valid |=
 627                         ATTR_KILL_SUID | ATTR_KILL_SGID | ATTR_KILL_PRIV;
 628         mutex_lock(&inode->i_mutex);
 629         error = security_path_chown(path, uid, gid);
 630         if (!error)
 631                 error = notify_change2(path->mnt, path->dentry, &newattrs, &delegated_inode);
 632         mutex_unlock(&inode->i_mutex);
 633         if (delegated_inode) {
 634                 error = break_deleg_wait(&delegated_inode);
 635                 if (!error)
 636                         goto retry_deleg;
 637         }
 638         return error;
 639 }
 640
 641 SYSCALL_DEFINE5(fchownat, int, dfd, const char __user *, filename, uid_t, user,
 642                 gid_t, group, int, flag)
 643 {
 644         struct path path;
 645         int error = -EINVAL;
 646         int lookup_flags;
 647
 648         if ((flag & ~(AT_SYMLINK_NOFOLLOW | AT_EMPTY_PATH)) != 0)
 649                 goto out;
 650
 651         lookup_flags = (flag & AT_SYMLINK_NOFOLLOW) ? 0 : LOOKUP_FOLLOW;
 652         if (flag & AT_EMPTY_PATH)
 653                 lookup_flags |= LOOKUP_EMPTY;
 654 retry:
 655         error = user_path_at(dfd, filename, lookup_flags, &path);
 656         if (error)
 657                 goto out;
 658         error = mnt_want_write(path.mnt);
 659         if (error)
 660                 goto out_release;
 661         error = chown_common(&path, user, group);
 662         mnt_drop_write(path.mnt);
 663 out_release:
 664         path_put(&path);
 665         if (retry_estale(error, lookup_flags)) {
 666                 lookup_flags |= LOOKUP_REVAL;
 667                 goto retry;
 668         }
 669 out:
 670         return error;
 671 }
 672
 673 SYSCALL_DEFINE3(chown, const char __user *, filename, uid_t, user, gid_t, group)
 674 {
 675         return sys_fchownat(AT_FDCWD, filename, user, group, 0);
 676 }
 677
 678 SYSCALL_DEFINE3(lchown, const char __user *, filename, uid_t, user, gid_t, group)
 679 {
 680         return sys_fchownat(AT_FDCWD, filename, user, group,
 681                             AT_SYMLINK_NOFOLLOW);
 682 }
 683
 684 SYSCALL_DEFINE3(fchown, unsigned int, fd, uid_t, user, gid_t, group)
 685 {
 686         struct fd f = fdget(fd);
 687         int error = -EBADF;
 688
 689         if (!f.file)
 690                 goto out;
 691
 692         error = mnt_want_write_file(f.file);
 693         if (error)
 694                 goto out_fput;
 695         audit_file(f.file);
 696         error = chown_common(&f.file->f_path, user, group);
 697         mnt_drop_write_file(f.file);
 698 out_fput:
 699         fdput(f);
 700 out:
 701         return error;
 702 }
 703
 704 int open_check_o_direct(struct file *f)
 705 {
 706         /* NB: we're sure to have correct a_ops only after f_op->open */
 707         if (f->f_flags & O_DIRECT) {
 708                 if (!f->f_mapping->a_ops || !f->f_mapping->a_ops->direct_IO)
 709                         return -EINVAL;
 710         }
 711         return 0;
 712 }
 713
 714 static int do_dentry_open(struct file *f,
 715                           struct inode *inode,
 716                           int (*open)(struct inode *, struct file *),
 717                           const struct cred *cred)
 718 {
 719         static const struct file_operations empty_fops = {};
 720         int error;
 721
 722         f->f_mode = OPEN_FMODE(f->f_flags) | FMODE_LSEEK |
 723                                 FMODE_PREAD | FMODE_PWRITE;
 724
 725         path_get(&f->f_path);
 726         f->f_inode = inode;
 727         f->f_mapping = inode->i_mapping;
 728
 729         if (unlikely(f->f_flags & O_PATH)) {
 730                 f->f_mode = FMODE_PATH;
 731                 f->f_op = &empty_fops;
 732                 return 0;
 733         }
 734
 735         if (f->f_mode & FMODE_WRITE && !special_file(inode->i_mode)) {
 736                 error = get_write_access(inode);
 737                 if (unlikely(error))
 738                         goto cleanup_file;
 739                 error = __mnt_want_write(f->f_path.mnt);
 740                 if (unlikely(error)) {
 741                         put_write_access(inode);
 742                         goto cleanup_file;
 743                 }
 744                 f->f_mode |= FMODE_WRITER;
 745         }
 746
 747         /* POSIX.1-2008/SUSv4 Section XSI 2.9.7 */
 748         if (S_ISREG(inode->i_mode))
 749                 f->f_mode |= FMODE_ATOMIC_POS;
 750
 751         f->f_op = fops_get(inode->i_fop);
 752         if (unlikely(WARN_ON(!f->f_op))) {
 753                 error = -ENODEV;
 754                 goto cleanup_all;
 755         }
 756
 757         error = security_file_open(f, cred);
 758         if (error)
 759                 goto cleanup_all;
 760
 761         error = break_lease(inode, f->f_flags);
 762         if (error)
 763                 goto cleanup_all;
 764
 765         if (!open)
 766                 open = f->f_op->open;
 767         if (open) {
 768                 error = open(inode, f);
 769                 if (error)
 770                         goto cleanup_all;
 771         }
 772         if ((f->f_mode & (FMODE_READ | FMODE_WRITE)) == FMODE_READ)
 773                 i_readcount_inc(inode);
 774         if ((f->f_mode & FMODE_READ) &&
 775              likely(f->f_op->read || f->f_op->read_iter))
 776                 f->f_mode |= FMODE_CAN_READ;
 777         if ((f->f_mode & FMODE_WRITE) &&
 778              likely(f->f_op->write || f->f_op->write_iter))
 779                 f->f_mode |= FMODE_CAN_WRITE;
 780
 781         f->f_flags &= ~(O_CREAT | O_EXCL | O_NOCTTY | O_TRUNC);
 782
 783         file_ra_state_init(&f->f_ra, f->f_mapping->host->i_mapping);
 784
 785         return 0;
 786
 787 cleanup_all:
 788         fops_put(f->f_op);
 789         if (f->f_mode & FMODE_WRITER) {
 790                 put_write_access(inode);
 791                 __mnt_drop_write(f->f_path.mnt);
 792         }
 793 cleanup_file:
 794         path_put(&f->f_path);
 795         f->f_path.mnt = NULL;
 796         f->f_path.dentry = NULL;
 797         f->f_inode = NULL;
 798         return error;
 799 }
 800
 801 /**
 802  * finish_open - finish opening a file
 803  * @file: file pointer
 804  * @dentry: pointer to dentry
 805  * @open: open callback
 806  * @opened: state of open
 807  *
 808  * This can be used to finish opening a file passed to i_op->atomic_open().
 809  *
 810  * If the open callback is set to NULL, then the standard f_op->open()
 811  * filesystem callback is substituted.
 812  *
 813  * NB: the dentry reference is _not_ consumed.  If, for example, the dentry is
 814  * the return value of d_splice_alias(), then the caller needs to perform dput()
 815  * on it after finish_open().
 816  *
 817  * On successful return @file is a fully instantiated open file.  After this, if
 818  * an error occurs in ->atomic_open(), it needs to clean up with fput().
 819  *
 820  * Returns zero on success or -errno if the open failed.
 821  */
 822 int finish_open(struct file *file, struct dentry *dentry,
 823                 int (*open)(struct inode *, struct file *),
 824                 int *opened)
 825 {
 826         int error;
 827         BUG_ON(*opened & FILE_OPENED); /* once it's opened, it's opened */
 828
 829         file->f_path.dentry = dentry;
 830         error = do_dentry_open(file, d_backing_inode(dentry), open,
 831                                current_cred());
 832         if (!error)
 833                 *opened |= FILE_OPENED;
 834
 835         return error;
 836 }
 837 EXPORT_SYMBOL(finish_open);
 838
 839 /**
 840  * finish_no_open - finish ->atomic_open() without opening the file
 841  *
 842  * @file: file pointer
 843  * @dentry: dentry or NULL (as returned from ->lookup())
 844  *
 845  * This can be used to set the result of a successful lookup in ->atomic_open().
 846  *
 847  * NB: unlike finish_open() this function does consume the dentry reference and
 848  * the caller need not dput() it.
 849  *
 850  * Returns "1" which must be the return value of ->atomic_open() after having
 851  * called this function.
 852  */
 853 int finish_no_open(struct file *file, struct dentry *dentry)
 854 {
 855         file->f_path.dentry = dentry;
 856         return 1;
 857 }
 858 EXPORT_SYMBOL(finish_no_open);
 859
 860 char *file_path(struct file *filp, char *buf, int buflen)
 861 {
 862         return d_path(&filp->f_path, buf, buflen);
 863 }
 864 EXPORT_SYMBOL(file_path);
 865
 866 /**
 867  * vfs_open - open the file at the given path
 868  * @path: path to open
 869  * @file: newly allocated file with f_flag initialized
 870  * @cred: credentials to use
 871  */
 872 int vfs_open(const struct path *path, struct file *file,
 873              const struct cred *cred)
 874 {
 875         struct inode *inode = vfs_select_inode(path->dentry, file->f_flags);
 876
 877         if (IS_ERR(inode))
 878                 return PTR_ERR(inode);
 879
 880         file->f_path = *path;
 881         return do_dentry_open(file, inode, NULL, cred);
 882 }
 883
 884 struct file *dentry_open(const struct path *path, int flags,
 885                          const struct cred *cred)
 886 {
 887         int error;
 888         struct file *f;
 889
 890         validate_creds(cred);
 891
 892         /* We must always pass in a valid mount pointer. */
 893         BUG_ON(!path->mnt);
 894
 895         f = get_empty_filp();
 896         if (!IS_ERR(f)) {
 897                 f->f_flags = flags;
 898                 error = vfs_open(path, f, cred);
 899                 if (!error) {
 900                         /* from now on we need fput() to dispose of f */
 901                         error = open_check_o_direct(f);
 902                         if (error) {
 903                                 fput(f);
 904                                 f = ERR_PTR(error);
 905                         }
 906                 } else {
 907                         put_filp(f);
 908                         f = ERR_PTR(error);
 909                 }
 910         }
 911         return f;
 912 }
 913 EXPORT_SYMBOL(dentry_open);
 914
 915 static inline int build_open_flags(int flags, umode_t mode, struct open_flags *op)
 916 {
 917         int lookup_flags = 0;
 918         int acc_mode;
 919
 920         /*
 921          * Clear out all open flags we don't know about so that we don't report
 922          * them in fcntl(F_GETFD) or similar interfaces.
 923          */
 924         flags &= VALID_OPEN_FLAGS;
 925
 926         if (flags & (O_CREAT | __O_TMPFILE))
 927                 op->mode = (mode & S_IALLUGO) | S_IFREG;
 928         else
 929                 op->mode = 0;
 930
 931         /* Must never be set by userspace */
 932         flags &= ~FMODE_NONOTIFY & ~O_CLOEXEC;
 933
 934         /*
 935          * O_SYNC is implemented as __O_SYNC|O_DSYNC.  As many places only
 936          * check for O_DSYNC if the need any syncing at all we enforce it's
 937          * always set instead of having to deal with possibly weird behaviour
 938          * for malicious applications setting only __O_SYNC.
 939          */
 940         if (flags & __O_SYNC)
 941                 flags |= O_DSYNC;
 942
 943         if (flags & __O_TMPFILE) {
 944                 if ((flags & O_TMPFILE_MASK) != O_TMPFILE)
 945                         return -EINVAL;
 946                 acc_mode = MAY_OPEN | ACC_MODE(flags);
 947                 if (!(acc_mode & MAY_WRITE))
 948                         return -EINVAL;
 949         } else if (flags & O_PATH) {
 950                 /*
 951                  * If we have O_PATH in the open flag. Then we
 952                  * cannot have anything other than the below set of flags
 953                  */
 954                 flags &= O_DIRECTORY | O_NOFOLLOW | O_PATH;
 955                 acc_mode = 0;
 956         } else {
 957                 acc_mode = MAY_OPEN | ACC_MODE(flags);
 958         }
 959
 960         op->open_flag = flags;
 961
 962         /* O_TRUNC implies we need access checks for write permissions */
 963         if (flags & O_TRUNC)
 964                 acc_mode |= MAY_WRITE;
 965
 966         /* Allow the LSM permission hook to distinguish append
 967            access from general write access. */
 968         if (flags & O_APPEND)
 969                 acc_mode |= MAY_APPEND;
 970
 971         op->acc_mode = acc_mode;
 972
 973         op->intent = flags & O_PATH ? 0 : LOOKUP_OPEN;
 974
 975         if (flags & O_CREAT) {
 976                 op->intent |= LOOKUP_CREATE;
 977                 if (flags & O_EXCL)
 978                         op->intent |= LOOKUP_EXCL;
 979         }
 980
 981         if (flags & O_DIRECTORY)
 982                 lookup_flags |= LOOKUP_DIRECTORY;
 983         if (!(flags & O_NOFOLLOW))
 984                 lookup_flags |= LOOKUP_FOLLOW;
 985         op->lookup_flags = lookup_flags;
 986         return 0;
 987 }
 988
 989 /**
 990  * file_open_name - open file and return file pointer
 991  *
 992  * @name:       struct filename containing path to open
 993  * @flags:      open flags as per the open(2) second argument
 994  * @mode:       mode for the new file if O_CREAT is set, else ignored
 995  *
 996  * This is the helper to open a file from kernelspace if you really
 997  * have to.  But in generally you should not do this, so please move
 998  * along, nothing to see here..
 999  */
1000 struct file *file_open_name(struct filename *name, int flags, umode_t mode)
1001 {
1002         struct open_flags op;
1003         int err = build_open_flags(flags, mode, &op);
1004         return err ? ERR_PTR(err) : do_filp_open(AT_FDCWD, name, &op);
1005 }
1006
1007 /**
1008  * filp_open - open file and return file pointer
1009  *
1010  * @filename:   path to open
1011  * @flags:      open flags as per the open(2) second argument
1012  * @mode:       mode for the new file if O_CREAT is set, else ignored
1013  *
1014  * This is the helper to open a file from kernelspace if you really
1015  * have to.  But in generally you should not do this, so please move
1016  * along, nothing to see here..
1017  */
1018 struct file *filp_open(const char *filename, int flags, umode_t mode)
1019 {
1020         struct filename *name = getname_kernel(filename);
1021         struct file *file = ERR_CAST(name);
1022
1023         if (!IS_ERR(name)) {
1024                 file = file_open_name(name, flags, mode);
1025                 putname(name);
1026         }
1027         return file;
1028 }
1029 EXPORT_SYMBOL(filp_open);
1030
1031 struct file *file_open_root(struct dentry *dentry, struct vfsmount *mnt,
1032                             const char *filename, int flags, umode_t mode)
1033 {
1034         struct open_flags op;
1035         int err = build_open_flags(flags, mode, &op);
1036         if (err)
1037                 return ERR_PTR(err);
1038         return do_file_open_root(dentry, mnt, filename, &op);
1039 }
1040 EXPORT_SYMBOL(file_open_root);
1041
1042 long do_sys_open(int dfd, const char __user *filename, int flags, umode_t mode)
1043 {
1044         struct open_flags op;
1045         int fd = build_open_flags(flags, mode, &op);
1046         struct filename *tmp;
1047
1048         if (fd)
1049                 return fd;
1050
1051         tmp = getname(filename);
1052         if (IS_ERR(tmp))
1053                 return PTR_ERR(tmp);
1054
1055         fd = get_unused_fd_flags(flags);
1056         if (fd >= 0) {
1057                 struct file *f = do_filp_open(dfd, tmp, &op);
1058                 if (IS_ERR(f)) {
1059                         put_unused_fd(fd);
1060                         fd = PTR_ERR(f);
1061                 } else {
1062                         fsnotify_open(f);
1063                         fd_install(fd, f);
1064                 }
1065         }
1066         putname(tmp);
1067         return fd;
1068 }
1069
1070 SYSCALL_DEFINE3(open, const char __user *, filename, int, flags, umode_t, mode)
1071 {
1072         if (force_o_largefile())
1073                 flags |= O_LARGEFILE;
1074
1075         return do_sys_open(AT_FDCWD, filename, flags, mode);
1076 }
1077
1078 SYSCALL_DEFINE4(openat, int, dfd, const char __user *, filename, int, flags,
1079                 umode_t, mode)
1080 {
1081         if (force_o_largefile())
1082                 flags |= O_LARGEFILE;
1083
1084         return do_sys_open(dfd, filename, flags, mode);
1085 }
1086
1087 #ifndef __alpha__
1088
1089 /*
1090  * For backward compatibility?  Maybe this should be moved
1091  * into arch/i386 instead?
1092  */
1093 SYSCALL_DEFINE2(creat, const char __user *, pathname, umode_t, mode)
1094 {
1095         return sys_open(pathname, O_CREAT | O_WRONLY | O_TRUNC, mode);
1096 }
1097
1098 #endif
1099
1100 /*
1101  * "id" is the POSIX thread ID. We use the
1102  * files pointer for this..
1103  */
1104 int filp_close(struct file *filp, fl_owner_t id)
1105 {
1106         int retval = 0;
1107
1108         if (!file_count(filp)) {
1109                 printk(KERN_ERR "VFS: Close: file count is 0\n");
1110                 return 0;
1111         }
1112
1113         if (filp->f_op->flush)
1114                 retval = filp->f_op->flush(filp, id);
1115
1116         if (likely(!(filp->f_mode & FMODE_PATH))) {
1117                 dnotify_flush(filp, id);
1118                 locks_remove_posix(filp, id);
1119         }
1120         fput(filp);
1121         return retval;
1122 }
1123
1124 EXPORT_SYMBOL(filp_close);
1125
1126 /*
1127  * Careful here! We test whether the file pointer is NULL before
1128  * releasing the fd. This ensures that one clone task can't release
1129  * an fd while another clone is opening it.
1130  */
1131 SYSCALL_DEFINE1(close, unsigned int, fd)
1132 {
1133         int retval = __close_fd(current->files, fd);
1134
1135         /* can't restart close syscall because file table entry was cleared */
1136         if (unlikely(retval == -ERESTARTSYS ||
1137                      retval == -ERESTARTNOINTR ||
1138                      retval == -ERESTARTNOHAND ||
1139                      retval == -ERESTART_RESTARTBLOCK))
1140                 retval = -EINTR;
1141
1142         return retval;
1143 }
1144 EXPORT_SYMBOL(sys_close);
1145
1146 /*
1147  * This routine simulates a hangup on the tty, to arrange that users
1148  * are given clean terminals at login time.
1149  */
1150 SYSCALL_DEFINE0(vhangup)
1151 {
1152         if (capable(CAP_SYS_TTY_CONFIG)) {
1153                 tty_vhangup_self();
1154                 return 0;
1155         }
1156         return -EPERM;
1157 }
1158
1159 /*
1160  * Called when an inode is about to be open.
1161  * We use this to disallow opening large files on 32bit systems if
1162  * the caller didn't specify O_LARGEFILE.  On 64bit systems we force
1163  * on this flag in sys_open.
1164  */
1165 int generic_file_open(struct inode * inode, struct file * filp)
1166 {
1167         if (!(filp->f_flags & O_LARGEFILE) && i_size_read(inode) > MAX_NON_LFS)
1168                 return -EOVERFLOW;
1169         return 0;
1170 }
1171
1172 EXPORT_SYMBOL(generic_file_open);
1173
1174 /*
1175  * This is used by subsystems that don't want seekable
1176  * file descriptors. The function is not supposed to ever fail, the only
1177  * reason it returns an 'int' and not 'void' is so that it can be plugged
1178  * directly into file_operations structure.
1179  */
1180 int nonseekable_open(struct inode *inode, struct file *filp)
1181 {
1182         filp->f_mode &= ~(FMODE_LSEEK | FMODE_PREAD | FMODE_PWRITE);
1183         return 0;
1184 }
1185
1186 EXPORT_SYMBOL(nonseekable_open);
1187
1188 /*
1189  * stream_open is used by subsystems that want stream-like file descriptors.
1190  * Such file descriptors are not seekable and don't have notion of position
1191  * (file.f_pos is always 0). Contrary to file descriptors of other regular
1192  * files, .read() and .write() can run simultaneously.
1193  *
1194  * stream_open never fails and is marked to return int so that it could be
1195  * directly used as file_operations.open .
1196  */
1197 int stream_open(struct inode *inode, struct file *filp)
1198 {
1199         filp->f_mode &= ~(FMODE_LSEEK | FMODE_PREAD | FMODE_PWRITE | FMODE_ATOMIC_POS);
1200         filp->f_mode |= FMODE_STREAM;
1201         return 0;
1202 }
1203
1204 EXPORT_SYMBOL(stream_open);