fs/overlayfs/copy_up.c

   1 /*
   2  *
   3  * Copyright (C) 2011 Novell Inc.
   4  *
   5  * This program is free software; you can redistribute it and/or modify it
   6  * under the terms of the GNU General Public License version 2 as published by
   7  * the Free Software Foundation.
   8  */
   9
  10 #include <linux/module.h>
  11 #include <linux/fs.h>
  12 #include <linux/slab.h>
  13 #include <linux/file.h>
  14 #include <linux/splice.h>
  15 #include <linux/xattr.h>
  16 #include <linux/security.h>
  17 #include <linux/uaccess.h>
  18 #include <linux/sched/signal.h>
  19 #include <linux/cred.h>
  20 #include <linux/namei.h>
  21 #include <linux/fdtable.h>
  22 #include <linux/ratelimit.h>
  23 #include <linux/exportfs.h>
  24 #include "overlayfs.h"
  25 #include "ovl_entry.h"
  26
  27 #define OVL_COPY_UP_CHUNK_SIZE (1 << 20)
  28
  29 static bool __read_mostly ovl_check_copy_up;
  30 module_param_named(check_copy_up, ovl_check_copy_up, bool,
  31                    S_IWUSR | S_IRUGO);
  32 MODULE_PARM_DESC(ovl_check_copy_up,
  33                  "Warn on copy-up when causing process also has a R/O fd open");
  34
  35 static int ovl_check_fd(const void *data, struct file *f, unsigned int fd)
  36 {
  37         const struct dentry *dentry = data;
  38
  39         if (file_inode(f) == d_inode(dentry))
  40                 pr_warn_ratelimited("overlayfs: Warning: Copying up %pD, but open R/O on fd %u which will cease to be coherent [pid=%d %s]\n",
  41                                     f, fd, current->pid, current->comm);
  42         return 0;
  43 }
  44
  45 /*
  46  * Check the fds open by this process and warn if something like the following
  47  * scenario is about to occur:
  48  *
  49  *      fd1 = open("foo", O_RDONLY);
  50  *      fd2 = open("foo", O_RDWR);
  51  */
  52 static void ovl_do_check_copy_up(struct dentry *dentry)
  53 {
  54         if (ovl_check_copy_up)
  55                 iterate_fd(current->files, 0, ovl_check_fd, dentry);
  56 }
  57
  58 int ovl_copy_xattr(struct dentry *old, struct dentry *new)
  59 {
  60         ssize_t list_size, size, value_size = 0;
  61         char *buf, *name, *value = NULL;
  62         int uninitialized_var(error);
  63         size_t slen;
  64
  65         if (!(old->d_inode->i_opflags & IOP_XATTR) ||
  66             !(new->d_inode->i_opflags & IOP_XATTR))
  67                 return 0;
  68
  69         list_size = vfs_listxattr(old, NULL, 0);
  70         if (list_size <= 0) {
  71                 if (list_size == -EOPNOTSUPP)
  72                         return 0;
  73                 return list_size;
  74         }
  75
  76         buf = kzalloc(list_size, GFP_KERNEL);
  77         if (!buf)
  78                 return -ENOMEM;
  79
  80         list_size = vfs_listxattr(old, buf, list_size);
  81         if (list_size <= 0) {
  82                 error = list_size;
  83                 goto out;
  84         }
  85
  86         for (name = buf; list_size; name += slen) {
  87                 slen = strnlen(name, list_size) + 1;
  88
  89                 /* underlying fs providing us with an broken xattr list? */
  90                 if (WARN_ON(slen > list_size)) {
  91                         error = -EIO;
  92                         break;
  93                 }
  94                 list_size -= slen;
  95
  96                 if (ovl_is_private_xattr(name))
  97                         continue;
  98 retry:
  99                 size = vfs_getxattr(old, name, value, value_size);
 100                 if (size == -ERANGE)
 101                         size = vfs_getxattr(old, name, NULL, 0);
 102
 103                 if (size < 0) {
 104                         error = size;
 105                         break;
 106                 }
 107
 108                 if (size > value_size) {
 109                         void *new;
 110
 111                         new = krealloc(value, size, GFP_KERNEL);
 112                         if (!new) {
 113                                 error = -ENOMEM;
 114                                 break;
 115                         }
 116                         value = new;
 117                         value_size = size;
 118                         goto retry;
 119                 }
 120
 121                 error = security_inode_copy_up_xattr(name);
 122                 if (error < 0 && error != -EOPNOTSUPP)
 123                         break;
 124                 if (error == 1) {
 125                         error = 0;
 126                         continue; /* Discard */
 127                 }
 128                 error = vfs_setxattr(new, name, value, size, 0);
 129                 if (error)
 130                         break;
 131         }
 132         kfree(value);
 133 out:
 134         kfree(buf);
 135         return error;
 136 }
 137
 138 static int ovl_copy_up_data(struct path *old, struct path *new, loff_t len)
 139 {
 140         struct file *old_file;
 141         struct file *new_file;
 142         loff_t old_pos = 0;
 143         loff_t new_pos = 0;
 144         int error = 0;
 145
 146         if (len == 0)
 147                 return 0;
 148
 149         old_file = ovl_path_open(old, O_LARGEFILE | O_RDONLY);
 150         if (IS_ERR(old_file))
 151                 return PTR_ERR(old_file);
 152
 153         new_file = ovl_path_open(new, O_LARGEFILE | O_WRONLY);
 154         if (IS_ERR(new_file)) {
 155                 error = PTR_ERR(new_file);
 156                 goto out_fput;
 157         }
 158
 159         /* Try to use clone_file_range to clone up within the same fs */
 160         error = vfs_clone_file_range(old_file, 0, new_file, 0, len);
 161         if (!error)
 162                 goto out;
 163         /* Couldn't clone, so now we try to copy the data */
 164         error = 0;
 165
 166         /* FIXME: copy up sparse files efficiently */
 167         while (len) {
 168                 size_t this_len = OVL_COPY_UP_CHUNK_SIZE;
 169                 long bytes;
 170
 171                 if (len < this_len)
 172                         this_len = len;
 173
 174                 if (signal_pending_state(TASK_KILLABLE, current)) {
 175                         error = -EINTR;
 176                         break;
 177                 }
 178
 179                 bytes = do_splice_direct(old_file, &old_pos,
 180                                          new_file, &new_pos,
 181                                          this_len, SPLICE_F_MOVE);
 182                 if (bytes <= 0) {
 183                         error = bytes;
 184                         break;
 185                 }
 186                 WARN_ON(old_pos != new_pos);
 187
 188                 len -= bytes;
 189         }
 190 out:
 191         if (!error)
 192                 error = vfs_fsync(new_file, 0);
 193         fput(new_file);
 194 out_fput:
 195         fput(old_file);
 196         return error;
 197 }
 198
 199 static int ovl_set_timestamps(struct dentry *upperdentry, struct kstat *stat)
 200 {
 201         struct iattr attr = {
 202                 .ia_valid =
 203                      ATTR_ATIME | ATTR_MTIME | ATTR_ATIME_SET | ATTR_MTIME_SET,
 204                 .ia_atime = stat->atime,
 205                 .ia_mtime = stat->mtime,
 206         };
 207
 208         return notify_change(upperdentry, &attr, NULL);
 209 }
 210
 211 int ovl_set_attr(struct dentry *upperdentry, struct kstat *stat)
 212 {
 213         int err = 0;
 214
 215         if (!S_ISLNK(stat->mode)) {
 216                 struct iattr attr = {
 217                         .ia_valid = ATTR_MODE,
 218                         .ia_mode = stat->mode,
 219                 };
 220                 err = notify_change(upperdentry, &attr, NULL);
 221         }
 222         if (!err) {
 223                 struct iattr attr = {
 224                         .ia_valid = ATTR_UID | ATTR_GID,
 225                         .ia_uid = stat->uid,
 226                         .ia_gid = stat->gid,
 227                 };
 228                 err = notify_change(upperdentry, &attr, NULL);
 229         }
 230         if (!err)
 231                 ovl_set_timestamps(upperdentry, stat);
 232
 233         return err;
 234 }
 235
 236 struct ovl_fh *ovl_encode_fh(struct dentry *lower, bool is_upper)
 237 {
 238         struct ovl_fh *fh;
 239         int fh_type, fh_len, dwords;
 240         void *buf;
 241         int buflen = MAX_HANDLE_SZ;
 242         uuid_t *uuid = &lower->d_sb->s_uuid;
 243
 244         buf = kmalloc(buflen, GFP_TEMPORARY);
 245         if (!buf)
 246                 return ERR_PTR(-ENOMEM);
 247
 248         /*
 249          * We encode a non-connectable file handle for non-dir, because we
 250          * only need to find the lower inode number and we don't want to pay
 251          * the price or reconnecting the dentry.
 252          */
 253         dwords = buflen >> 2;
 254         fh_type = exportfs_encode_fh(lower, buf, &dwords, 0);
 255         buflen = (dwords << 2);
 256
 257         fh = ERR_PTR(-EIO);
 258         if (WARN_ON(fh_type < 0) ||
 259             WARN_ON(buflen > MAX_HANDLE_SZ) ||
 260             WARN_ON(fh_type == FILEID_INVALID))
 261                 goto out;
 262
 263         BUILD_BUG_ON(MAX_HANDLE_SZ + offsetof(struct ovl_fh, fid) > 255);
 264         fh_len = offsetof(struct ovl_fh, fid) + buflen;
 265         fh = kmalloc(fh_len, GFP_KERNEL);
 266         if (!fh) {
 267                 fh = ERR_PTR(-ENOMEM);
 268                 goto out;
 269         }
 270
 271         fh->version = OVL_FH_VERSION;
 272         fh->magic = OVL_FH_MAGIC;
 273         fh->type = fh_type;
 274         fh->flags = OVL_FH_FLAG_CPU_ENDIAN;
 275         /*
 276          * When we will want to decode an overlay dentry from this handle
 277          * and all layers are on the same fs, if we get a disconncted real
 278          * dentry when we decode fid, the only way to tell if we should assign
 279          * it to upperdentry or to lowerstack is by checking this flag.
 280          */
 281         if (is_upper)
 282                 fh->flags |= OVL_FH_FLAG_PATH_UPPER;
 283         fh->len = fh_len;
 284         fh->uuid = *uuid;
 285         memcpy(fh->fid, buf, buflen);
 286
 287 out:
 288         kfree(buf);
 289         return fh;
 290 }
 291
 292 static int ovl_set_origin(struct dentry *dentry, struct dentry *lower,
 293                           struct dentry *upper)
 294 {
 295         const struct ovl_fh *fh = NULL;
 296         int err;
 297
 298         /*
 299          * When lower layer doesn't support export operations store a 'null' fh,
 300          * so we can use the overlay.origin xattr to distignuish between a copy
 301          * up and a pure upper inode.
 302          */
 303         if (ovl_can_decode_fh(lower->d_sb)) {
 304                 fh = ovl_encode_fh(lower, false);
 305                 if (IS_ERR(fh))
 306                         return PTR_ERR(fh);
 307         }
 308
 309         /*
 310          * Do not fail when upper doesn't support xattrs.
 311          */
 312         err = ovl_check_setxattr(dentry, upper, OVL_XATTR_ORIGIN, fh,
 313                                  fh ? fh->len : 0, 0);
 314         kfree(fh);
 315
 316         return err;
 317 }
 318
 319 struct ovl_copy_up_ctx {
 320         struct dentry *dentry;
 321         struct path lowerpath;
 322         struct kstat stat;
 323         struct kstat pstat;
 324         const char *link;
 325         struct dentry *upperdir;
 326         struct dentry *workdir;
 327         bool tmpfile;
 328 };
 329
 330 static int ovl_install_temp(struct ovl_copy_up_ctx *c, struct dentry *temp,
 331                             struct dentry **newdentry)
 332 {
 333         int err;
 334         struct dentry *upper;
 335         struct inode *udir = d_inode(c->upperdir);
 336
 337         upper = lookup_one_len(c->dentry->d_name.name, c->upperdir,
 338                                c->dentry->d_name.len);
 339         if (IS_ERR(upper))
 340                 return PTR_ERR(upper);
 341
 342         if (c->tmpfile)
 343                 err = ovl_do_link(temp, udir, upper, true);
 344         else
 345                 err = ovl_do_rename(d_inode(c->workdir), temp, udir, upper, 0);
 346
 347         /* Restore timestamps on parent (best effort) */
 348         if (!err) {
 349                 ovl_set_timestamps(c->upperdir, &c->pstat);
 350                 *newdentry = dget(c->tmpfile ? upper : temp);
 351         }
 352         dput(upper);
 353
 354         return err;
 355 }
 356
 357 static int ovl_get_tmpfile(struct ovl_copy_up_ctx *c, struct dentry **tempp)
 358 {
 359         int err;
 360         struct dentry *temp;
 361         const struct cred *old_creds = NULL;
 362         struct cred *new_creds = NULL;
 363         struct cattr cattr = {
 364                 /* Can't properly set mode on creation because of the umask */
 365                 .mode = c->stat.mode & S_IFMT,
 366                 .rdev = c->stat.rdev,
 367                 .link = c->link
 368         };
 369
 370         err = security_inode_copy_up(c->dentry, &new_creds);
 371         if (err < 0)
 372                 goto out;
 373
 374         if (new_creds)
 375                 old_creds = override_creds(new_creds);
 376
 377         if (c->tmpfile) {
 378                 temp = ovl_do_tmpfile(c->workdir, c->stat.mode);
 379                 if (IS_ERR(temp))
 380                         goto temp_err;
 381         } else {
 382                 temp = ovl_lookup_temp(c->workdir);
 383                 if (IS_ERR(temp))
 384                         goto temp_err;
 385
 386                 err = ovl_create_real(d_inode(c->workdir), temp, &cattr,
 387                                       NULL, true);
 388                 if (err) {
 389                         dput(temp);
 390                         goto out;
 391                 }
 392         }
 393         err = 0;
 394         *tempp = temp;
 395 out:
 396         if (new_creds) {
 397                 revert_creds(old_creds);
 398                 put_cred(new_creds);
 399         }
 400
 401         return err;
 402
 403 temp_err:
 404         err = PTR_ERR(temp);
 405         goto out;
 406 }
 407
 408 static int ovl_copy_up_inode(struct ovl_copy_up_ctx *c, struct dentry *temp)
 409 {
 410         int err;
 411
 412         if (S_ISREG(c->stat.mode)) {
 413                 struct path upperpath;
 414
 415                 ovl_path_upper(c->dentry, &upperpath);
 416                 BUG_ON(upperpath.dentry != NULL);
 417                 upperpath.dentry = temp;
 418
 419                 err = ovl_copy_up_data(&c->lowerpath, &upperpath, c->stat.size);
 420                 if (err)
 421                         return err;
 422         }
 423
 424         err = ovl_copy_xattr(c->lowerpath.dentry, temp);
 425         if (err)
 426                 return err;
 427
 428         inode_lock(temp->d_inode);
 429         err = ovl_set_attr(temp, &c->stat);
 430         inode_unlock(temp->d_inode);
 431         if (err)
 432                 return err;
 433
 434         /*
 435          * Store identifier of lower inode in upper inode xattr to
 436          * allow lookup of the copy up origin inode.
 437          *
 438          * Don't set origin when we are breaking the association with a lower
 439          * hard link.
 440          */
 441         if (S_ISDIR(c->stat.mode) || c->stat.nlink == 1) {
 442                 err = ovl_set_origin(c->dentry, c->lowerpath.dentry, temp);
 443                 if (err)
 444                         return err;
 445         }
 446
 447         return 0;
 448 }
 449
 450 static int ovl_copy_up_locked(struct ovl_copy_up_ctx *c)
 451 {
 452         struct inode *udir = c->upperdir->d_inode;
 453         struct dentry *newdentry = NULL;
 454         struct dentry *temp = NULL;
 455         int err;
 456
 457         err = ovl_get_tmpfile(c, &temp);
 458         if (err)
 459                 goto out;
 460
 461         err = ovl_copy_up_inode(c, temp);
 462         if (err)
 463                 goto out_cleanup;
 464
 465         if (c->tmpfile) {
 466                 inode_lock_nested(udir, I_MUTEX_PARENT);
 467                 err = ovl_install_temp(c, temp, &newdentry);
 468                 inode_unlock(udir);
 469         } else {
 470                 err = ovl_install_temp(c, temp, &newdentry);
 471         }
 472         if (err)
 473                 goto out_cleanup;
 474
 475         ovl_inode_update(d_inode(c->dentry), newdentry);
 476 out:
 477         dput(temp);
 478         return err;
 479
 480 out_cleanup:
 481         if (!c->tmpfile)
 482                 ovl_cleanup(d_inode(c->workdir), temp);
 483         goto out;
 484 }
 485
 486 /*
 487  * Copy up a single dentry
 488  *
 489  * All renames start with copy up of source if necessary.  The actual
 490  * rename will only proceed once the copy up was successful.  Copy up uses
 491  * upper parent i_mutex for exclusion.  Since rename can change d_parent it
 492  * is possible that the copy up will lock the old parent.  At that point
 493  * the file will have already been copied up anyway.
 494  */
 495 static int ovl_copy_up_one(struct dentry *parent, struct ovl_copy_up_ctx *c)
 496 {
 497         DEFINE_DELAYED_CALL(done);
 498         int err;
 499         struct path parentpath;
 500         struct dentry *lowerdentry = c->lowerpath.dentry;
 501         struct ovl_fs *ofs = c->dentry->d_sb->s_fs_info;
 502
 503         c->workdir = ovl_workdir(c->dentry);
 504         if (WARN_ON(!c->workdir))
 505                 return -EROFS;
 506
 507         ovl_do_check_copy_up(lowerdentry);
 508
 509         ovl_path_upper(parent, &parentpath);
 510         c->upperdir = parentpath.dentry;
 511
 512         /* Mark parent "impure" because it may now contain non-pure upper */
 513         err = ovl_set_impure(parent, c->upperdir);
 514         if (err)
 515                 return err;
 516
 517         err = vfs_getattr(&parentpath, &c->pstat,
 518                           STATX_ATIME | STATX_MTIME, AT_STATX_SYNC_AS_STAT);
 519         if (err)
 520                 return err;
 521
 522         if (S_ISLNK(c->stat.mode)) {
 523                 c->link = vfs_get_link(lowerdentry, &done);
 524                 if (IS_ERR(c->link))
 525                         return PTR_ERR(c->link);
 526         }
 527
 528         /* Should we copyup with O_TMPFILE or with workdir? */
 529         if (S_ISREG(c->stat.mode) && ofs->tmpfile) {
 530                 err = ovl_copy_up_start(c->dentry);
 531                 /* err < 0: interrupted, err > 0: raced with another copy-up */
 532                 if (unlikely(err)) {
 533                         pr_debug("ovl_copy_up_start(%pd2) = %i\n", c->dentry,
 534                                  err);
 535                         if (err > 0)
 536                                 err = 0;
 537                         goto out_done;
 538                 }
 539                 c->tmpfile = true;
 540                 err = ovl_copy_up_locked(c);
 541                 ovl_copy_up_end(c->dentry);
 542                 goto out_done;
 543         }
 544
 545         err = -EIO;
 546         if (lock_rename(c->workdir, c->upperdir) != NULL) {
 547                 pr_err("overlayfs: failed to lock workdir+upperdir\n");
 548                 goto out_unlock;
 549         }
 550         if (ovl_dentry_upper(c->dentry)) {
 551                 /* Raced with another copy-up?  Nothing to do, then... */
 552                 err = 0;
 553                 goto out_unlock;
 554         }
 555
 556         err = ovl_copy_up_locked(c);
 557 out_unlock:
 558         unlock_rename(c->workdir, c->upperdir);
 559 out_done:
 560         do_delayed_call(&done);
 561
 562         return err;
 563 }
 564
 565 int ovl_copy_up_flags(struct dentry *dentry, int flags)
 566 {
 567         int err = 0;
 568         const struct cred *old_cred = ovl_override_creds(dentry->d_sb);
 569
 570         while (!err) {
 571                 struct dentry *next;
 572                 struct dentry *parent;
 573                 struct ovl_copy_up_ctx ctx = { };
 574                 enum ovl_path_type type = ovl_path_type(dentry);
 575
 576                 if (OVL_TYPE_UPPER(type))
 577                         break;
 578
 579                 next = dget(dentry);
 580                 /* find the topmost dentry not yet copied up */
 581                 for (;;) {
 582                         parent = dget_parent(next);
 583
 584                         type = ovl_path_type(parent);
 585                         if (OVL_TYPE_UPPER(type))
 586                                 break;
 587
 588                         dput(next);
 589                         next = parent;
 590                 }
 591
 592                 ovl_path_lower(next, &ctx.lowerpath);
 593                 err = vfs_getattr(&ctx.lowerpath, &ctx.stat,
 594                                   STATX_BASIC_STATS, AT_STATX_SYNC_AS_STAT);
 595                 /* maybe truncate regular file. this has no effect on dirs */
 596                 if (flags & O_TRUNC)
 597                         ctx.stat.size = 0;
 598                 if (!err) {
 599                         ctx.dentry = next;
 600                         err = ovl_copy_up_one(parent, &ctx);
 601                 }
 602
 603                 dput(parent);
 604                 dput(next);
 605         }
 606         revert_creds(old_cred);
 607
 608         return err;
 609 }
 610
 611 int ovl_copy_up(struct dentry *dentry)
 612 {
 613         return ovl_copy_up_flags(dentry, 0);
 614 }