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
  34 #include "internal.h"
  35
  36 int do_truncate(struct dentry *dentry, loff_t length, unsigned int time_attrs,
  37         struct file *filp)
  38 {
  39         int ret;
  40         struct iattr newattrs;
  41
  42         /* Not pretty: "inode->i_size" shouldn't really be signed. But it is. */
  43         if (length < 0)
  44                 return -EINVAL;
  45
  46         newattrs.ia_size = length;
  47         newattrs.ia_valid = ATTR_SIZE | time_attrs;
  48         if (filp) {
  49                 newattrs.ia_file = filp;
  50                 newattrs.ia_valid |= ATTR_FILE;
  51         }
  52
  53         /* Remove suid/sgid on truncate too */
  54         ret = should_remove_suid(dentry);
  55         if (ret)
  56                 newattrs.ia_valid |= ret | ATTR_FORCE;
  57
  58         mutex_lock(&dentry->d_inode->i_mutex);
  59         ret = notify_change(dentry, &newattrs);
  60         mutex_unlock(&dentry->d_inode->i_mutex);
  61         return ret;
  62 }
  63
  64 static long do_sys_truncate(const char __user *pathname, loff_t length)
  65 {
  66         struct path path;
  67         struct inode *inode;
  68         int error;
  69
  70         error = -EINVAL;
  71         if (length < 0) /* sorry, but loff_t says... */
  72                 goto out;
  73
  74         error = user_path(pathname, &path);
  75         if (error)
  76                 goto out;
  77         inode = path.dentry->d_inode;
  78
  79         /* For directories it's -EISDIR, for other non-regulars - -EINVAL */
  80         error = -EISDIR;
  81         if (S_ISDIR(inode->i_mode))
  82                 goto dput_and_out;
  83
  84         error = -EINVAL;
  85         if (!S_ISREG(inode->i_mode))
  86                 goto dput_and_out;
  87
  88         error = mnt_want_write(path.mnt);
  89         if (error)
  90                 goto dput_and_out;
  91
  92         error = inode_permission(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_truncate(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 dput_and_out:
 123         path_put(&path);
 124 out:
 125         return error;
 126 }
 127
 128 SYSCALL_DEFINE2(truncate, const char __user *, path, long, length)
 129 {
 130         return do_sys_truncate(path, length);
 131 }
 132
 133 static long do_sys_ftruncate(unsigned int fd, loff_t length, int small)
 134 {
 135         struct inode * inode;
 136         struct dentry *dentry;
 137         struct file * file;
 138         int error;
 139
 140         error = -EINVAL;
 141         if (length < 0)
 142                 goto out;
 143         error = -EBADF;
 144         file = fget(fd);
 145         if (!file)
 146                 goto out;
 147
 148         /* explicitly opened as large or we are on 64-bit box */
 149         if (file->f_flags & O_LARGEFILE)
 150                 small = 0;
 151
 152         dentry = file->f_path.dentry;
 153         inode = dentry->d_inode;
 154         error = -EINVAL;
 155         if (!S_ISREG(inode->i_mode) || !(file->f_mode & FMODE_WRITE))
 156                 goto out_putf;
 157
 158         error = -EINVAL;
 159         /* Cannot ftruncate over 2^31 bytes without large file support */
 160         if (small && length > MAX_NON_LFS)
 161                 goto out_putf;
 162
 163         error = -EPERM;
 164         if (IS_APPEND(inode))
 165                 goto out_putf;
 166
 167         error = locks_verify_truncate(inode, file, length);
 168         if (!error)
 169                 error = security_path_truncate(&file->f_path);
 170         if (!error)
 171                 error = do_truncate(dentry, length, ATTR_MTIME|ATTR_CTIME, file);
 172 out_putf:
 173         fput(file);
 174 out:
 175         return error;
 176 }
 177
 178 SYSCALL_DEFINE2(ftruncate, unsigned int, fd, unsigned long, length)
 179 {
 180         long ret = do_sys_ftruncate(fd, length, 1);
 181         /* avoid REGPARM breakage on x86: */
 182         asmlinkage_protect(2, ret, fd, length);
 183         return ret;
 184 }
 185
 186 /* LFS versions of truncate are only needed on 32 bit machines */
 187 #if BITS_PER_LONG == 32
 188 SYSCALL_DEFINE(truncate64)(const char __user * path, loff_t length)
 189 {
 190         return do_sys_truncate(path, length);
 191 }
 192 #ifdef CONFIG_HAVE_SYSCALL_WRAPPERS
 193 asmlinkage long SyS_truncate64(long path, loff_t length)
 194 {
 195         return SYSC_truncate64((const char __user *) path, length);
 196 }
 197 SYSCALL_ALIAS(sys_truncate64, SyS_truncate64);
 198 #endif
 199
 200 SYSCALL_DEFINE(ftruncate64)(unsigned int fd, loff_t length)
 201 {
 202         long ret = do_sys_ftruncate(fd, length, 0);
 203         /* avoid REGPARM breakage on x86: */
 204         asmlinkage_protect(2, ret, fd, length);
 205         return ret;
 206 }
 207 #ifdef CONFIG_HAVE_SYSCALL_WRAPPERS
 208 asmlinkage long SyS_ftruncate64(long fd, loff_t length)
 209 {
 210         return SYSC_ftruncate64((unsigned int) fd, length);
 211 }
 212 SYSCALL_ALIAS(sys_ftruncate64, SyS_ftruncate64);
 213 #endif
 214 #endif /* BITS_PER_LONG == 32 */
 215
 216
 217 int do_fallocate(struct file *file, int mode, loff_t offset, loff_t len)
 218 {
 219         struct inode *inode = file->f_path.dentry->d_inode;
 220         long ret;
 221
 222         if (offset < 0 || len <= 0)
 223                 return -EINVAL;
 224
 225         /* Return error if mode is not supported */
 226         if (mode && !(mode & FALLOC_FL_KEEP_SIZE))
 227                 return -EOPNOTSUPP;
 228
 229         if (!(file->f_mode & FMODE_WRITE))
 230                 return -EBADF;
 231         /*
 232          * Revalidate the write permissions, in case security policy has
 233          * changed since the files were opened.
 234          */
 235         ret = security_file_permission(file, MAY_WRITE);
 236         if (ret)
 237                 return ret;
 238
 239         if (S_ISFIFO(inode->i_mode))
 240                 return -ESPIPE;
 241
 242         /*
 243          * Let individual file system decide if it supports preallocation
 244          * for directories or not.
 245          */
 246         if (!S_ISREG(inode->i_mode) && !S_ISDIR(inode->i_mode))
 247                 return -ENODEV;
 248
 249         /* Check for wrap through zero too */
 250         if (((offset + len) > inode->i_sb->s_maxbytes) || ((offset + len) < 0))
 251                 return -EFBIG;
 252
 253         if (!inode->i_op->fallocate)
 254                 return -EOPNOTSUPP;
 255
 256         return inode->i_op->fallocate(inode, mode, offset, len);
 257 }
 258
 259 SYSCALL_DEFINE(fallocate)(int fd, int mode, loff_t offset, loff_t len)
 260 {
 261         struct file *file;
 262         int error = -EBADF;
 263
 264         file = fget(fd);
 265         if (file) {
 266                 error = do_fallocate(file, mode, offset, len);
 267                 fput(file);
 268         }
 269
 270         return error;
 271 }
 272
 273 #ifdef CONFIG_HAVE_SYSCALL_WRAPPERS
 274 asmlinkage long SyS_fallocate(long fd, long mode, loff_t offset, loff_t len)
 275 {
 276         return SYSC_fallocate((int)fd, (int)mode, offset, len);
 277 }
 278 SYSCALL_ALIAS(sys_fallocate, SyS_fallocate);
 279 #endif
 280
 281 /*
 282  * access() needs to use the real uid/gid, not the effective uid/gid.
 283  * We do this by temporarily clearing all FS-related capabilities and
 284  * switching the fsuid/fsgid around to the real ones.
 285  */
 286 SYSCALL_DEFINE3(faccessat, int, dfd, const char __user *, filename, int, mode)
 287 {
 288         const struct cred *old_cred;
 289         struct cred *override_cred;
 290         struct path path;
 291         struct inode *inode;
 292         int res;
 293
 294         if (mode & ~S_IRWXO)    /* where's F_OK, X_OK, W_OK, R_OK? */
 295                 return -EINVAL;
 296
 297         override_cred = prepare_creds();
 298         if (!override_cred)
 299                 return -ENOMEM;
 300
 301         override_cred->fsuid = override_cred->uid;
 302         override_cred->fsgid = override_cred->gid;
 303
 304         if (!issecure(SECURE_NO_SETUID_FIXUP)) {
 305                 /* Clear the capabilities if we switch to a non-root user */
 306                 if (override_cred->uid)
 307                         cap_clear(override_cred->cap_effective);
 308                 else
 309                         override_cred->cap_effective =
 310                                 override_cred->cap_permitted;
 311         }
 312
 313         old_cred = override_creds(override_cred);
 314
 315         res = user_path_at(dfd, filename, LOOKUP_FOLLOW, &path);
 316         if (res)
 317                 goto out;
 318
 319         inode = path.dentry->d_inode;
 320
 321         if ((mode & MAY_EXEC) && S_ISREG(inode->i_mode)) {
 322                 /*
 323                  * MAY_EXEC on regular files is denied if the fs is mounted
 324                  * with the "noexec" flag.
 325                  */
 326                 res = -EACCES;
 327                 if (path.mnt->mnt_flags & MNT_NOEXEC)
 328                         goto out_path_release;
 329         }
 330
 331         res = inode_permission(inode, mode | MAY_ACCESS);
 332         /* SuS v2 requires we report a read only fs too */
 333         if (res || !(mode & S_IWOTH) || special_file(inode->i_mode))
 334                 goto out_path_release;
 335         /*
 336          * This is a rare case where using __mnt_is_readonly()
 337          * is OK without a mnt_want/drop_write() pair.  Since
 338          * no actual write to the fs is performed here, we do
 339          * not need to telegraph to that to anyone.
 340          *
 341          * By doing this, we accept that this access is
 342          * inherently racy and know that the fs may change
 343          * state before we even see this result.
 344          */
 345         if (__mnt_is_readonly(path.mnt))
 346                 res = -EROFS;
 347
 348 out_path_release:
 349         path_put(&path);
 350 out:
 351         revert_creds(old_cred);
 352         put_cred(override_cred);
 353         return res;
 354 }
 355
 356 SYSCALL_DEFINE2(access, const char __user *, filename, int, mode)
 357 {
 358         return sys_faccessat(AT_FDCWD, filename, mode);
 359 }
 360
 361 SYSCALL_DEFINE1(chdir, const char __user *, filename)
 362 {
 363         struct path path;
 364         int error;
 365
 366         error = user_path_dir(filename, &path);
 367         if (error)
 368                 goto out;
 369
 370         error = inode_permission(path.dentry->d_inode, MAY_EXEC | MAY_CHDIR);
 371         if (error)
 372                 goto dput_and_out;
 373
 374         set_fs_pwd(current->fs, &path);
 375
 376 dput_and_out:
 377         path_put(&path);
 378 out:
 379         return error;
 380 }
 381
 382 SYSCALL_DEFINE1(fchdir, unsigned int, fd)
 383 {
 384         struct file *file;
 385         struct inode *inode;
 386         int error;
 387
 388         error = -EBADF;
 389         file = fget(fd);
 390         if (!file)
 391                 goto out;
 392
 393         inode = file->f_path.dentry->d_inode;
 394
 395         error = -ENOTDIR;
 396         if (!S_ISDIR(inode->i_mode))
 397                 goto out_putf;
 398
 399         error = inode_permission(inode, MAY_EXEC | MAY_CHDIR);
 400         if (!error)
 401                 set_fs_pwd(current->fs, &file->f_path);
 402 out_putf:
 403         fput(file);
 404 out:
 405         return error;
 406 }
 407
 408 SYSCALL_DEFINE1(chroot, const char __user *, filename)
 409 {
 410         struct path path;
 411         int error;
 412
 413         error = user_path_dir(filename, &path);
 414         if (error)
 415                 goto out;
 416
 417         error = inode_permission(path.dentry->d_inode, MAY_EXEC | MAY_CHDIR);
 418         if (error)
 419                 goto dput_and_out;
 420
 421         error = -EPERM;
 422         if (!capable(CAP_SYS_CHROOT))
 423                 goto dput_and_out;
 424         error = security_path_chroot(&path);
 425         if (error)
 426                 goto dput_and_out;
 427
 428         set_fs_root(current->fs, &path);
 429         error = 0;
 430 dput_and_out:
 431         path_put(&path);
 432 out:
 433         return error;
 434 }
 435
 436 SYSCALL_DEFINE2(fchmod, unsigned int, fd, mode_t, mode)
 437 {
 438         struct inode * inode;
 439         struct dentry * dentry;
 440         struct file * file;
 441         int err = -EBADF;
 442         struct iattr newattrs;
 443
 444         file = fget(fd);
 445         if (!file)
 446                 goto out;
 447
 448         dentry = file->f_path.dentry;
 449         inode = dentry->d_inode;
 450
 451         audit_inode(NULL, dentry);
 452
 453         err = mnt_want_write_file(file);
 454         if (err)
 455                 goto out_putf;
 456         mutex_lock(&inode->i_mutex);
 457         err = security_path_chmod(dentry, file->f_vfsmnt, mode);
 458         if (err)
 459                 goto out_unlock;
 460         if (mode == (mode_t) -1)
 461                 mode = inode->i_mode;
 462         newattrs.ia_mode = (mode & S_IALLUGO) | (inode->i_mode & ~S_IALLUGO);
 463         newattrs.ia_valid = ATTR_MODE | ATTR_CTIME;
 464         err = notify_change(dentry, &newattrs);
 465 out_unlock:
 466         mutex_unlock(&inode->i_mutex);
 467         mnt_drop_write(file->f_path.mnt);
 468 out_putf:
 469         fput(file);
 470 out:
 471         return err;
 472 }
 473
 474 SYSCALL_DEFINE3(fchmodat, int, dfd, const char __user *, filename, mode_t, mode)
 475 {
 476         struct path path;
 477         struct inode *inode;
 478         int error;
 479         struct iattr newattrs;
 480
 481         error = user_path_at(dfd, filename, LOOKUP_FOLLOW, &path);
 482         if (error)
 483                 goto out;
 484         inode = path.dentry->d_inode;
 485
 486         error = mnt_want_write(path.mnt);
 487         if (error)
 488                 goto dput_and_out;
 489         mutex_lock(&inode->i_mutex);
 490         error = security_path_chmod(path.dentry, path.mnt, mode);
 491         if (error)
 492                 goto out_unlock;
 493         if (mode == (mode_t) -1)
 494                 mode = inode->i_mode;
 495         newattrs.ia_mode = (mode & S_IALLUGO) | (inode->i_mode & ~S_IALLUGO);
 496         newattrs.ia_valid = ATTR_MODE | ATTR_CTIME;
 497         error = notify_change(path.dentry, &newattrs);
 498 out_unlock:
 499         mutex_unlock(&inode->i_mutex);
 500         mnt_drop_write(path.mnt);
 501 dput_and_out:
 502         path_put(&path);
 503 out:
 504         return error;
 505 }
 506
 507 SYSCALL_DEFINE2(chmod, const char __user *, filename, mode_t, mode)
 508 {
 509         return sys_fchmodat(AT_FDCWD, filename, mode);
 510 }
 511
 512 static int chown_common(struct path *path, uid_t user, gid_t group)
 513 {
 514         struct inode *inode = path->dentry->d_inode;
 515         int error;
 516         struct iattr newattrs;
 517
 518         newattrs.ia_valid =  ATTR_CTIME;
 519         if (user != (uid_t) -1) {
 520                 newattrs.ia_valid |= ATTR_UID;
 521                 newattrs.ia_uid = user;
 522         }
 523         if (group != (gid_t) -1) {
 524                 newattrs.ia_valid |= ATTR_GID;
 525                 newattrs.ia_gid = group;
 526         }
 527         if (!S_ISDIR(inode->i_mode))
 528                 newattrs.ia_valid |=
 529                         ATTR_KILL_SUID | ATTR_KILL_SGID | ATTR_KILL_PRIV;
 530         mutex_lock(&inode->i_mutex);
 531         error = security_path_chown(path, user, group);
 532         if (!error)
 533                 error = notify_change(path->dentry, &newattrs);
 534         mutex_unlock(&inode->i_mutex);
 535
 536         return error;
 537 }
 538
 539 SYSCALL_DEFINE3(chown, const char __user *, filename, uid_t, user, gid_t, group)
 540 {
 541         struct path path;
 542         int error;
 543
 544         error = user_path(filename, &path);
 545         if (error)
 546                 goto out;
 547         error = mnt_want_write(path.mnt);
 548         if (error)
 549                 goto out_release;
 550         error = chown_common(&path, user, group);
 551         mnt_drop_write(path.mnt);
 552 out_release:
 553         path_put(&path);
 554 out:
 555         return error;
 556 }
 557
 558 SYSCALL_DEFINE5(fchownat, int, dfd, const char __user *, filename, uid_t, user,
 559                 gid_t, group, int, flag)
 560 {
 561         struct path path;
 562         int error = -EINVAL;
 563         int follow;
 564
 565         if ((flag & ~AT_SYMLINK_NOFOLLOW) != 0)
 566                 goto out;
 567
 568         follow = (flag & AT_SYMLINK_NOFOLLOW) ? 0 : LOOKUP_FOLLOW;
 569         error = user_path_at(dfd, filename, follow, &path);
 570         if (error)
 571                 goto out;
 572         error = mnt_want_write(path.mnt);
 573         if (error)
 574                 goto out_release;
 575         error = chown_common(&path, user, group);
 576         mnt_drop_write(path.mnt);
 577 out_release:
 578         path_put(&path);
 579 out:
 580         return error;
 581 }
 582
 583 SYSCALL_DEFINE3(lchown, const char __user *, filename, uid_t, user, gid_t, group)
 584 {
 585         struct path path;
 586         int error;
 587
 588         error = user_lpath(filename, &path);
 589         if (error)
 590                 goto out;
 591         error = mnt_want_write(path.mnt);
 592         if (error)
 593                 goto out_release;
 594         error = chown_common(&path, user, group);
 595         mnt_drop_write(path.mnt);
 596 out_release:
 597         path_put(&path);
 598 out:
 599         return error;
 600 }
 601
 602 SYSCALL_DEFINE3(fchown, unsigned int, fd, uid_t, user, gid_t, group)
 603 {
 604         struct file * file;
 605         int error = -EBADF;
 606         struct dentry * dentry;
 607
 608         file = fget(fd);
 609         if (!file)
 610                 goto out;
 611
 612         error = mnt_want_write_file(file);
 613         if (error)
 614                 goto out_fput;
 615         dentry = file->f_path.dentry;
 616         audit_inode(NULL, dentry);
 617         error = chown_common(&file->f_path, user, group);
 618         mnt_drop_write(file->f_path.mnt);
 619 out_fput:
 620         fput(file);
 621 out:
 622         return error;
 623 }
 624
 625 /*
 626  * You have to be very careful that these write
 627  * counts get cleaned up in error cases and
 628  * upon __fput().  This should probably never
 629  * be called outside of __dentry_open().
 630  */
 631 static inline int __get_file_write_access(struct inode *inode,
 632                                           struct vfsmount *mnt)
 633 {
 634         int error;
 635         error = get_write_access(inode);
 636         if (error)
 637                 return error;
 638         /*
 639          * Do not take mount writer counts on
 640          * special files since no writes to
 641          * the mount itself will occur.
 642          */
 643         if (!special_file(inode->i_mode)) {
 644                 /*
 645                  * Balanced in __fput()
 646                  */
 647                 error = mnt_want_write(mnt);
 648                 if (error)
 649                         put_write_access(inode);
 650         }
 651         return error;
 652 }
 653
 654 static struct file *__dentry_open(struct dentry *dentry, struct vfsmount *mnt,
 655                                         struct file *f,
 656                                         int (*open)(struct inode *, struct file *),
 657                                         const struct cred *cred)
 658 {
 659         struct inode *inode;
 660         int error;
 661
 662         f->f_mode = OPEN_FMODE(f->f_flags) | FMODE_LSEEK |
 663                                 FMODE_PREAD | FMODE_PWRITE;
 664         inode = dentry->d_inode;
 665         if (f->f_mode & FMODE_WRITE) {
 666                 error = __get_file_write_access(inode, mnt);
 667                 if (error)
 668                         goto cleanup_file;
 669                 if (!special_file(inode->i_mode))
 670                         file_take_write(f);
 671         }
 672
 673         f->f_mapping = inode->i_mapping;
 674         f->f_path.dentry = dentry;
 675         f->f_path.mnt = mnt;
 676         f->f_pos = 0;
 677         f->f_op = fops_get(inode->i_fop);
 678         file_sb_list_add(f, inode->i_sb);
 679
 680         error = security_dentry_open(f, cred);
 681         if (error)
 682                 goto cleanup_all;
 683
 684         if (!open && f->f_op)
 685                 open = f->f_op->open;
 686         if (open) {
 687                 error = open(inode, f);
 688                 if (error)
 689                         goto cleanup_all;
 690         }
 691         if ((f->f_mode & (FMODE_READ | FMODE_WRITE)) == FMODE_READ)
 692                 i_readcount_inc(inode);
 693
 694         f->f_flags &= ~(O_CREAT | O_EXCL | O_NOCTTY | O_TRUNC);
 695
 696         file_ra_state_init(&f->f_ra, f->f_mapping->host->i_mapping);
 697
 698         /* NB: we're sure to have correct a_ops only after f_op->open */
 699         if (f->f_flags & O_DIRECT) {
 700                 if (!f->f_mapping->a_ops ||
 701                     ((!f->f_mapping->a_ops->direct_IO) &&
 702                     (!f->f_mapping->a_ops->get_xip_mem))) {
 703                         fput(f);
 704                         f = ERR_PTR(-EINVAL);
 705                 }
 706         }
 707
 708         return f;
 709
 710 cleanup_all:
 711         fops_put(f->f_op);
 712         if (f->f_mode & FMODE_WRITE) {
 713                 put_write_access(inode);
 714                 if (!special_file(inode->i_mode)) {
 715                         /*
 716                          * We don't consider this a real
 717                          * mnt_want/drop_write() pair
 718                          * because it all happenend right
 719                          * here, so just reset the state.
 720                          */
 721                         file_reset_write(f);
 722                         mnt_drop_write(mnt);
 723                 }
 724         }
 725         file_sb_list_del(f);
 726         f->f_path.dentry = NULL;
 727         f->f_path.mnt = NULL;
 728 cleanup_file:
 729         put_filp(f);
 730         dput(dentry);
 731         mntput(mnt);
 732         return ERR_PTR(error);
 733 }
 734
 735 /**
 736  * lookup_instantiate_filp - instantiates the open intent filp
 737  * @nd: pointer to nameidata
 738  * @dentry: pointer to dentry
 739  * @open: open callback
 740  *
 741  * Helper for filesystems that want to use lookup open intents and pass back
 742  * a fully instantiated struct file to the caller.
 743  * This function is meant to be called from within a filesystem's
 744  * lookup method.
 745  * Beware of calling it for non-regular files! Those ->open methods might block
 746  * (e.g. in fifo_open), leaving you with parent locked (and in case of fifo,
 747  * leading to a deadlock, as nobody can open that fifo anymore, because
 748  * another process to open fifo will block on locked parent when doing lookup).
 749  * Note that in case of error, nd->intent.open.file is destroyed, but the
 750  * path information remains valid.
 751  * If the open callback is set to NULL, then the standard f_op->open()
 752  * filesystem callback is substituted.
 753  */
 754 struct file *lookup_instantiate_filp(struct nameidata *nd, struct dentry *dentry,
 755                 int (*open)(struct inode *, struct file *))
 756 {
 757         const struct cred *cred = current_cred();
 758
 759         if (IS_ERR(nd->intent.open.file))
 760                 goto out;
 761         if (IS_ERR(dentry))
 762                 goto out_err;
 763         nd->intent.open.file = __dentry_open(dget(dentry), mntget(nd->path.mnt),
 764                                              nd->intent.open.file,
 765                                              open, cred);
 766 out:
 767         return nd->intent.open.file;
 768 out_err:
 769         release_open_intent(nd);
 770         nd->intent.open.file = (struct file *)dentry;
 771         goto out;
 772 }
 773 EXPORT_SYMBOL_GPL(lookup_instantiate_filp);
 774
 775 /**
 776  * nameidata_to_filp - convert a nameidata to an open filp.
 777  * @nd: pointer to nameidata
 778  * @flags: open flags
 779  *
 780  * Note that this function destroys the original nameidata
 781  */
 782 struct file *nameidata_to_filp(struct nameidata *nd)
 783 {
 784         const struct cred *cred = current_cred();
 785         struct file *filp;
 786
 787         /* Pick up the filp from the open intent */
 788         filp = nd->intent.open.file;
 789         /* Has the filesystem initialised the file for us? */
 790         if (filp->f_path.dentry == NULL) {
 791                 path_get(&nd->path);
 792                 filp = __dentry_open(nd->path.dentry, nd->path.mnt, filp,
 793                                      NULL, cred);
 794         }
 795         return filp;
 796 }
 797
 798 /*
 799  * dentry_open() will have done dput(dentry) and mntput(mnt) if it returns an
 800  * error.
 801  */
 802 struct file *dentry_open(struct dentry *dentry, struct vfsmount *mnt, int flags,
 803                          const struct cred *cred)
 804 {
 805         int error;
 806         struct file *f;
 807
 808         validate_creds(cred);
 809
 810         /*
 811          * We must always pass in a valid mount pointer.   Historically
 812          * callers got away with not passing it, but we must enforce this at
 813          * the earliest possible point now to avoid strange problems deep in the
 814          * filesystem stack.
 815          */
 816         if (!mnt) {
 817                 printk(KERN_WARNING "%s called with NULL vfsmount\n", __func__);
 818                 dump_stack();
 819                 return ERR_PTR(-EINVAL);
 820         }
 821
 822         error = -ENFILE;
 823         f = get_empty_filp();
 824         if (f == NULL) {
 825                 dput(dentry);
 826                 mntput(mnt);
 827                 return ERR_PTR(error);
 828         }
 829
 830         f->f_flags = flags;
 831         return __dentry_open(dentry, mnt, f, NULL, cred);
 832 }
 833 EXPORT_SYMBOL(dentry_open);
 834
 835 static void __put_unused_fd(struct files_struct *files, unsigned int fd)
 836 {
 837         struct fdtable *fdt = files_fdtable(files);
 838         __FD_CLR(fd, fdt->open_fds);
 839         if (fd < files->next_fd)
 840                 files->next_fd = fd;
 841 }
 842
 843 void put_unused_fd(unsigned int fd)
 844 {
 845         struct files_struct *files = current->files;
 846         spin_lock(&files->file_lock);
 847         __put_unused_fd(files, fd);
 848         spin_unlock(&files->file_lock);
 849 }
 850
 851 EXPORT_SYMBOL(put_unused_fd);
 852
 853 /*
 854  * Install a file pointer in the fd array.
 855  *
 856  * The VFS is full of places where we drop the files lock between
 857  * setting the open_fds bitmap and installing the file in the file
 858  * array.  At any such point, we are vulnerable to a dup2() race
 859  * installing a file in the array before us.  We need to detect this and
 860  * fput() the struct file we are about to overwrite in this case.
 861  *
 862  * It should never happen - if we allow dup2() do it, _really_ bad things
 863  * will follow.
 864  */
 865
 866 void fd_install(unsigned int fd, struct file *file)
 867 {
 868         struct files_struct *files = current->files;
 869         struct fdtable *fdt;
 870         spin_lock(&files->file_lock);
 871         fdt = files_fdtable(files);
 872         BUG_ON(fdt->fd[fd] != NULL);
 873         rcu_assign_pointer(fdt->fd[fd], file);
 874         spin_unlock(&files->file_lock);
 875 }
 876
 877 EXPORT_SYMBOL(fd_install);
 878
 879 long do_sys_open(int dfd, const char __user *filename, int flags, int mode)
 880 {
 881         char *tmp = getname(filename);
 882         int fd = PTR_ERR(tmp);
 883
 884         if (!IS_ERR(tmp)) {
 885                 fd = get_unused_fd_flags(flags);
 886                 if (fd >= 0) {
 887                         struct file *f = do_filp_open(dfd, tmp, flags, mode, 0);
 888                         if (IS_ERR(f)) {
 889                                 put_unused_fd(fd);
 890                                 fd = PTR_ERR(f);
 891                         } else {
 892                                 fsnotify_open(f);
 893                                 fd_install(fd, f);
 894                         }
 895                 }
 896                 putname(tmp);
 897         }
 898         return fd;
 899 }
 900
 901 SYSCALL_DEFINE3(open, const char __user *, filename, int, flags, int, mode)
 902 {
 903         long ret;
 904
 905         if (force_o_largefile())
 906                 flags |= O_LARGEFILE;
 907
 908         ret = do_sys_open(AT_FDCWD, filename, flags, mode);
 909         /* avoid REGPARM breakage on x86: */
 910         asmlinkage_protect(3, ret, filename, flags, mode);
 911         return ret;
 912 }
 913
 914 SYSCALL_DEFINE4(openat, int, dfd, const char __user *, filename, int, flags,
 915                 int, mode)
 916 {
 917         long ret;
 918
 919         if (force_o_largefile())
 920                 flags |= O_LARGEFILE;
 921
 922         ret = do_sys_open(dfd, filename, flags, mode);
 923         /* avoid REGPARM breakage on x86: */
 924         asmlinkage_protect(4, ret, dfd, filename, flags, mode);
 925         return ret;
 926 }
 927
 928 #ifndef __alpha__
 929
 930 /*
 931  * For backward compatibility?  Maybe this should be moved
 932  * into arch/i386 instead?
 933  */
 934 SYSCALL_DEFINE2(creat, const char __user *, pathname, int, mode)
 935 {
 936         return sys_open(pathname, O_CREAT | O_WRONLY | O_TRUNC, mode);
 937 }
 938
 939 #endif
 940
 941 /*
 942  * "id" is the POSIX thread ID. We use the
 943  * files pointer for this..
 944  */
 945 int filp_close(struct file *filp, fl_owner_t id)
 946 {
 947         int retval = 0;
 948
 949         if (!file_count(filp)) {
 950                 printk(KERN_ERR "VFS: Close: file count is 0\n");
 951                 return 0;
 952         }
 953
 954         if (filp->f_op && filp->f_op->flush)
 955                 retval = filp->f_op->flush(filp, id);
 956
 957         dnotify_flush(filp, id);
 958         locks_remove_posix(filp, id);
 959         fput(filp);
 960         return retval;
 961 }
 962
 963 EXPORT_SYMBOL(filp_close);
 964
 965 /*
 966  * Careful here! We test whether the file pointer is NULL before
 967  * releasing the fd. This ensures that one clone task can't release
 968  * an fd while another clone is opening it.
 969  */
 970 SYSCALL_DEFINE1(close, unsigned int, fd)
 971 {
 972         struct file * filp;
 973         struct files_struct *files = current->files;
 974         struct fdtable *fdt;
 975         int retval;
 976
 977         spin_lock(&files->file_lock);
 978         fdt = files_fdtable(files);
 979         if (fd >= fdt->max_fds)
 980                 goto out_unlock;
 981         filp = fdt->fd[fd];
 982         if (!filp)
 983                 goto out_unlock;
 984         rcu_assign_pointer(fdt->fd[fd], NULL);
 985         FD_CLR(fd, fdt->close_on_exec);
 986         __put_unused_fd(files, fd);
 987         spin_unlock(&files->file_lock);
 988         retval = filp_close(filp, files);
 989
 990         /* can't restart close syscall because file table entry was cleared */
 991         if (unlikely(retval == -ERESTARTSYS ||
 992                      retval == -ERESTARTNOINTR ||
 993                      retval == -ERESTARTNOHAND ||
 994                      retval == -ERESTART_RESTARTBLOCK))
 995                 retval = -EINTR;
 996
 997         return retval;
 998
 999 out_unlock:
1000         spin_unlock(&files->file_lock);
1001         return -EBADF;
1002 }
1003 EXPORT_SYMBOL(sys_close);
1004
1005 /*
1006  * This routine simulates a hangup on the tty, to arrange that users
1007  * are given clean terminals at login time.
1008  */
1009 SYSCALL_DEFINE0(vhangup)
1010 {
1011         if (capable(CAP_SYS_TTY_CONFIG)) {
1012                 tty_vhangup_self();
1013                 return 0;
1014         }
1015         return -EPERM;
1016 }
1017
1018 /*
1019  * Called when an inode is about to be open.
1020  * We use this to disallow opening large files on 32bit systems if
1021  * the caller didn't specify O_LARGEFILE.  On 64bit systems we force
1022  * on this flag in sys_open.
1023  */
1024 int generic_file_open(struct inode * inode, struct file * filp)
1025 {
1026         if (!(filp->f_flags & O_LARGEFILE) && i_size_read(inode) > MAX_NON_LFS)
1027                 return -EOVERFLOW;
1028         return 0;
1029 }
1030
1031 EXPORT_SYMBOL(generic_file_open);
1032
1033 /*
1034  * This is used by subsystems that don't want seekable
1035  * file descriptors. The function is not supposed to ever fail, the only
1036  * reason it returns an 'int' and not 'void' is so that it can be plugged
1037  * directly into file_operations structure.
1038  */
1039 int nonseekable_open(struct inode *inode, struct file *filp)
1040 {
1041         filp->f_mode &= ~(FMODE_LSEEK | FMODE_PREAD | FMODE_PWRITE);
1042         return 0;
1043 }
1044
1045 EXPORT_SYMBOL(nonseekable_open);