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