fs/cachefiles/namei.c

   1 /* CacheFiles path walking and related routines
   2  *
   3  * Copyright (C) 2007 Red Hat, Inc. All Rights Reserved.
   4  * Written by David Howells (dhowells@redhat.com)
   5  *
   6  * This program is free software; you can redistribute it and/or
   7  * modify it under the terms of the GNU General Public Licence
   8  * as published by the Free Software Foundation; either version
   9  * 2 of the Licence, or (at your option) any later version.
  10  */
  11
  12 #include <linux/module.h>
  13 #include <linux/sched.h>
  14 #include <linux/file.h>
  15 #include <linux/fs.h>
  16 #include <linux/fsnotify.h>
  17 #include <linux/quotaops.h>
  18 #include <linux/xattr.h>
  19 #include <linux/mount.h>
  20 #include <linux/namei.h>
  21 #include <linux/security.h>
  22 #include <linux/slab.h>
  23 #include <linux/xattr.h>
  24 #include "internal.h"
  25
  26 #define CACHEFILES_KEYBUF_SIZE 512
  27
  28 /*
  29  * dump debugging info about an object
  30  */
  31 static noinline
  32 void __cachefiles_printk_object(struct cachefiles_object *object,
  33                                 const char *prefix,
  34                                 u8 *keybuf)
  35 {
  36         struct fscache_cookie *cookie;
  37         unsigned keylen, loop;
  38
  39         pr_err("%sobject: OBJ%x\n", prefix, object->fscache.debug_id);
  40         pr_err("%sobjstate=%s fl=%lx wbusy=%x ev=%lx[%lx]\n",
  41                prefix, object->fscache.state->name,
  42                object->fscache.flags, work_busy(&object->fscache.work),
  43                object->fscache.events, object->fscache.event_mask);
  44         pr_err("%sops=%u inp=%u exc=%u\n",
  45                prefix, object->fscache.n_ops, object->fscache.n_in_progress,
  46                object->fscache.n_exclusive);
  47         pr_err("%sparent=%p\n",
  48                prefix, object->fscache.parent);
  49
  50         spin_lock(&object->fscache.lock);
  51         cookie = object->fscache.cookie;
  52         if (cookie) {
  53                 pr_err("%scookie=%p [pr=%p nd=%p fl=%lx]\n",
  54                        prefix,
  55                        object->fscache.cookie,
  56                        object->fscache.cookie->parent,
  57                        object->fscache.cookie->netfs_data,
  58                        object->fscache.cookie->flags);
  59                 if (keybuf && cookie->def)
  60                         keylen = cookie->def->get_key(cookie->netfs_data, keybuf,
  61                                                       CACHEFILES_KEYBUF_SIZE);
  62                 else
  63                         keylen = 0;
  64         } else {
  65                 pr_err("%scookie=NULL\n", prefix);
  66                 keylen = 0;
  67         }
  68         spin_unlock(&object->fscache.lock);
  69
  70         if (keylen) {
  71                 pr_err("%skey=[%u] '", prefix, keylen);
  72                 for (loop = 0; loop < keylen; loop++)
  73                         pr_cont("%02x", keybuf[loop]);
  74                 pr_cont("'\n");
  75         }
  76 }
  77
  78 /*
  79  * dump debugging info about a pair of objects
  80  */
  81 static noinline void cachefiles_printk_object(struct cachefiles_object *object,
  82                                               struct cachefiles_object *xobject)
  83 {
  84         u8 *keybuf;
  85
  86         keybuf = kmalloc(CACHEFILES_KEYBUF_SIZE, GFP_NOIO);
  87         if (object)
  88                 __cachefiles_printk_object(object, "", keybuf);
  89         if (xobject)
  90                 __cachefiles_printk_object(xobject, "x", keybuf);
  91         kfree(keybuf);
  92 }
  93
  94 /*
  95  * mark the owner of a dentry, if there is one, to indicate that that dentry
  96  * has been preemptively deleted
  97  * - the caller must hold the i_mutex on the dentry's parent as required to
  98  *   call vfs_unlink(), vfs_rmdir() or vfs_rename()
  99  */
 100 static void cachefiles_mark_object_buried(struct cachefiles_cache *cache,
 101                                           struct dentry *dentry,
 102                                           enum fscache_why_object_killed why)
 103 {
 104         struct cachefiles_object *object;
 105         struct rb_node *p;
 106
 107         _enter(",'%pd'", dentry);
 108
 109         write_lock(&cache->active_lock);
 110
 111         p = cache->active_nodes.rb_node;
 112         while (p) {
 113                 object = rb_entry(p, struct cachefiles_object, active_node);
 114                 if (object->dentry > dentry)
 115                         p = p->rb_left;
 116                 else if (object->dentry < dentry)
 117                         p = p->rb_right;
 118                 else
 119                         goto found_dentry;
 120         }
 121
 122         write_unlock(&cache->active_lock);
 123         _leave(" [no owner]");
 124         return;
 125
 126         /* found the dentry for  */
 127 found_dentry:
 128         kdebug("preemptive burial: OBJ%x [%s] %p",
 129                object->fscache.debug_id,
 130                object->fscache.state->name,
 131                dentry);
 132
 133         if (fscache_object_is_live(&object->fscache)) {
 134                 pr_err("\n");
 135                 pr_err("Error: Can't preemptively bury live object\n");
 136                 cachefiles_printk_object(object, NULL);
 137         } else {
 138                 if (why != FSCACHE_OBJECT_IS_STALE)
 139                         fscache_object_mark_killed(&object->fscache, why);
 140         }
 141
 142         write_unlock(&cache->active_lock);
 143         _leave(" [owner marked]");
 144 }
 145
 146 /*
 147  * record the fact that an object is now active
 148  */
 149 static int cachefiles_mark_object_active(struct cachefiles_cache *cache,
 150                                          struct cachefiles_object *object)
 151 {
 152         struct cachefiles_object *xobject;
 153         struct rb_node **_p, *_parent = NULL;
 154         struct dentry *dentry;
 155
 156         _enter(",%p", object);
 157
 158 try_again:
 159         write_lock(&cache->active_lock);
 160
 161         if (test_and_set_bit(CACHEFILES_OBJECT_ACTIVE, &object->flags)) {
 162                 pr_err("Error: Object already active\n");
 163                 cachefiles_printk_object(object, NULL);
 164                 BUG();
 165         }
 166
 167         dentry = object->dentry;
 168         _p = &cache->active_nodes.rb_node;
 169         while (*_p) {
 170                 _parent = *_p;
 171                 xobject = rb_entry(_parent,
 172                                    struct cachefiles_object, active_node);
 173
 174                 ASSERT(xobject != object);
 175
 176                 if (xobject->dentry > dentry)
 177                         _p = &(*_p)->rb_left;
 178                 else if (xobject->dentry < dentry)
 179                         _p = &(*_p)->rb_right;
 180                 else
 181                         goto wait_for_old_object;
 182         }
 183
 184         rb_link_node(&object->active_node, _parent, _p);
 185         rb_insert_color(&object->active_node, &cache->active_nodes);
 186
 187         write_unlock(&cache->active_lock);
 188         _leave(" = 0");
 189         return 0;
 190
 191         /* an old object from a previous incarnation is hogging the slot - we
 192          * need to wait for it to be destroyed */
 193 wait_for_old_object:
 194         if (fscache_object_is_live(&xobject->fscache)) {
 195                 pr_err("\n");
 196                 pr_err("Error: Unexpected object collision\n");
 197                 cachefiles_printk_object(object, xobject);
 198                 BUG();
 199         }
 200         atomic_inc(&xobject->usage);
 201         write_unlock(&cache->active_lock);
 202
 203         if (test_bit(CACHEFILES_OBJECT_ACTIVE, &xobject->flags)) {
 204                 wait_queue_head_t *wq;
 205
 206                 signed long timeout = 60 * HZ;
 207                 wait_queue_entry_t wait;
 208                 bool requeue;
 209
 210                 /* if the object we're waiting for is queued for processing,
 211                  * then just put ourselves on the queue behind it */
 212                 if (work_pending(&xobject->fscache.work)) {
 213                         _debug("queue OBJ%x behind OBJ%x immediately",
 214                                object->fscache.debug_id,
 215                                xobject->fscache.debug_id);
 216                         goto requeue;
 217                 }
 218
 219                 /* otherwise we sleep until either the object we're waiting for
 220                  * is done, or the fscache_object is congested */
 221                 wq = bit_waitqueue(&xobject->flags, CACHEFILES_OBJECT_ACTIVE);
 222                 init_wait(&wait);
 223                 requeue = false;
 224                 do {
 225                         prepare_to_wait(wq, &wait, TASK_UNINTERRUPTIBLE);
 226                         if (!test_bit(CACHEFILES_OBJECT_ACTIVE, &xobject->flags))
 227                                 break;
 228
 229                         requeue = fscache_object_sleep_till_congested(&timeout);
 230                 } while (timeout > 0 && !requeue);
 231                 finish_wait(wq, &wait);
 232
 233                 if (requeue &&
 234                     test_bit(CACHEFILES_OBJECT_ACTIVE, &xobject->flags)) {
 235                         _debug("queue OBJ%x behind OBJ%x after wait",
 236                                object->fscache.debug_id,
 237                                xobject->fscache.debug_id);
 238                         goto requeue;
 239                 }
 240
 241                 if (timeout <= 0) {
 242                         pr_err("\n");
 243                         pr_err("Error: Overlong wait for old active object to go away\n");
 244                         cachefiles_printk_object(object, xobject);
 245                         goto requeue;
 246                 }
 247         }
 248
 249         ASSERT(!test_bit(CACHEFILES_OBJECT_ACTIVE, &xobject->flags));
 250
 251         cache->cache.ops->put_object(&xobject->fscache);
 252         goto try_again;
 253
 254 requeue:
 255         clear_bit(CACHEFILES_OBJECT_ACTIVE, &object->flags);
 256         cache->cache.ops->put_object(&xobject->fscache);
 257         _leave(" = -ETIMEDOUT");
 258         return -ETIMEDOUT;
 259 }
 260
 261 /*
 262  * Mark an object as being inactive.
 263  */
 264 void cachefiles_mark_object_inactive(struct cachefiles_cache *cache,
 265                                      struct cachefiles_object *object,
 266                                      blkcnt_t i_blocks)
 267 {
 268         write_lock(&cache->active_lock);
 269         rb_erase(&object->active_node, &cache->active_nodes);
 270         clear_bit(CACHEFILES_OBJECT_ACTIVE, &object->flags);
 271         write_unlock(&cache->active_lock);
 272
 273         wake_up_bit(&object->flags, CACHEFILES_OBJECT_ACTIVE);
 274
 275         /* This object can now be culled, so we need to let the daemon know
 276          * that there is something it can remove if it needs to.
 277          */
 278         atomic_long_add(i_blocks, &cache->b_released);
 279         if (atomic_inc_return(&cache->f_released))
 280                 cachefiles_state_changed(cache);
 281 }
 282
 283 /*
 284  * delete an object representation from the cache
 285  * - file backed objects are unlinked
 286  * - directory backed objects are stuffed into the graveyard for userspace to
 287  *   delete
 288  * - unlocks the directory mutex
 289  */
 290 static int cachefiles_bury_object(struct cachefiles_cache *cache,
 291                                   struct dentry *dir,
 292                                   struct dentry *rep,
 293                                   bool preemptive,
 294                                   enum fscache_why_object_killed why)
 295 {
 296         struct dentry *grave, *trap;
 297         struct path path, path_to_graveyard;
 298         char nbuffer[8 + 8 + 1];
 299         int ret;
 300
 301         _enter(",'%pd','%pd'", dir, rep);
 302
 303         _debug("remove %p from %p", rep, dir);
 304
 305         /* non-directories can just be unlinked */
 306         if (!d_is_dir(rep)) {
 307                 _debug("unlink stale object");
 308
 309                 path.mnt = cache->mnt;
 310                 path.dentry = dir;
 311                 ret = security_path_unlink(&path, rep);
 312                 if (ret < 0) {
 313                         cachefiles_io_error(cache, "Unlink security error");
 314                 } else {
 315                         ret = vfs_unlink(d_inode(dir), rep, NULL);
 316
 317                         if (preemptive)
 318                                 cachefiles_mark_object_buried(cache, rep, why);
 319                 }
 320
 321                 inode_unlock(d_inode(dir));
 322
 323                 if (ret == -EIO)
 324                         cachefiles_io_error(cache, "Unlink failed");
 325
 326                 _leave(" = %d", ret);
 327                 return ret;
 328         }
 329
 330         /* directories have to be moved to the graveyard */
 331         _debug("move stale object to graveyard");
 332         inode_unlock(d_inode(dir));
 333
 334 try_again:
 335         /* first step is to make up a grave dentry in the graveyard */
 336         sprintf(nbuffer, "%08x%08x",
 337                 (uint32_t) get_seconds(),
 338                 (uint32_t) atomic_inc_return(&cache->gravecounter));
 339
 340         /* do the multiway lock magic */
 341         trap = lock_rename(cache->graveyard, dir);
 342
 343         /* do some checks before getting the grave dentry */
 344         if (rep->d_parent != dir) {
 345                 /* the entry was probably culled when we dropped the parent dir
 346                  * lock */
 347                 unlock_rename(cache->graveyard, dir);
 348                 _leave(" = 0 [culled?]");
 349                 return 0;
 350         }
 351
 352         if (!d_can_lookup(cache->graveyard)) {
 353                 unlock_rename(cache->graveyard, dir);
 354                 cachefiles_io_error(cache, "Graveyard no longer a directory");
 355                 return -EIO;
 356         }
 357
 358         if (trap == rep) {
 359                 unlock_rename(cache->graveyard, dir);
 360                 cachefiles_io_error(cache, "May not make directory loop");
 361                 return -EIO;
 362         }
 363
 364         if (d_mountpoint(rep)) {
 365                 unlock_rename(cache->graveyard, dir);
 366                 cachefiles_io_error(cache, "Mountpoint in cache");
 367                 return -EIO;
 368         }
 369
 370         grave = lookup_one_len(nbuffer, cache->graveyard, strlen(nbuffer));
 371         if (IS_ERR(grave)) {
 372                 unlock_rename(cache->graveyard, dir);
 373
 374                 if (PTR_ERR(grave) == -ENOMEM) {
 375                         _leave(" = -ENOMEM");
 376                         return -ENOMEM;
 377                 }
 378
 379                 cachefiles_io_error(cache, "Lookup error %ld",
 380                                     PTR_ERR(grave));
 381                 return -EIO;
 382         }
 383
 384         if (d_is_positive(grave)) {
 385                 unlock_rename(cache->graveyard, dir);
 386                 dput(grave);
 387                 grave = NULL;
 388                 cond_resched();
 389                 goto try_again;
 390         }
 391
 392         if (d_mountpoint(grave)) {
 393                 unlock_rename(cache->graveyard, dir);
 394                 dput(grave);
 395                 cachefiles_io_error(cache, "Mountpoint in graveyard");
 396                 return -EIO;
 397         }
 398
 399         /* target should not be an ancestor of source */
 400         if (trap == grave) {
 401                 unlock_rename(cache->graveyard, dir);
 402                 dput(grave);
 403                 cachefiles_io_error(cache, "May not make directory loop");
 404                 return -EIO;
 405         }
 406
 407         /* attempt the rename */
 408         path.mnt = cache->mnt;
 409         path.dentry = dir;
 410         path_to_graveyard.mnt = cache->mnt;
 411         path_to_graveyard.dentry = cache->graveyard;
 412         ret = security_path_rename(&path, rep, &path_to_graveyard, grave, 0);
 413         if (ret < 0) {
 414                 cachefiles_io_error(cache, "Rename security error %d", ret);
 415         } else {
 416                 ret = vfs_rename(d_inode(dir), rep,
 417                                  d_inode(cache->graveyard), grave, NULL, 0);
 418                 if (ret != 0 && ret != -ENOMEM)
 419                         cachefiles_io_error(cache,
 420                                             "Rename failed with error %d", ret);
 421
 422                 if (preemptive)
 423                         cachefiles_mark_object_buried(cache, rep, why);
 424         }
 425
 426         unlock_rename(cache->graveyard, dir);
 427         dput(grave);
 428         _leave(" = 0");
 429         return 0;
 430 }
 431
 432 /*
 433  * delete an object representation from the cache
 434  */
 435 int cachefiles_delete_object(struct cachefiles_cache *cache,
 436                              struct cachefiles_object *object)
 437 {
 438         struct dentry *dir;
 439         int ret;
 440
 441         _enter(",OBJ%x{%p}", object->fscache.debug_id, object->dentry);
 442
 443         ASSERT(object->dentry);
 444         ASSERT(d_backing_inode(object->dentry));
 445         ASSERT(object->dentry->d_parent);
 446
 447         dir = dget_parent(object->dentry);
 448
 449         inode_lock_nested(d_inode(dir), I_MUTEX_PARENT);
 450
 451         if (test_bit(FSCACHE_OBJECT_KILLED_BY_CACHE, &object->fscache.flags)) {
 452                 /* object allocation for the same key preemptively deleted this
 453                  * object's file so that it could create its own file */
 454                 _debug("object preemptively buried");
 455                 inode_unlock(d_inode(dir));
 456                 ret = 0;
 457         } else {
 458                 /* we need to check that our parent is _still_ our parent - it
 459                  * may have been renamed */
 460                 if (dir == object->dentry->d_parent) {
 461                         ret = cachefiles_bury_object(cache, dir,
 462                                                      object->dentry, false,
 463                                                      FSCACHE_OBJECT_WAS_RETIRED);
 464                 } else {
 465                         /* it got moved, presumably by cachefilesd culling it,
 466                          * so it's no longer in the key path and we can ignore
 467                          * it */
 468                         inode_unlock(d_inode(dir));
 469                         ret = 0;
 470                 }
 471         }
 472
 473         dput(dir);
 474         _leave(" = %d", ret);
 475         return ret;
 476 }
 477
 478 /*
 479  * walk from the parent object to the child object through the backing
 480  * filesystem, creating directories as we go
 481  */
 482 int cachefiles_walk_to_object(struct cachefiles_object *parent,
 483                               struct cachefiles_object *object,
 484                               const char *key,
 485                               struct cachefiles_xattr *auxdata)
 486 {
 487         struct cachefiles_cache *cache;
 488         struct dentry *dir, *next = NULL;
 489         struct path path;
 490         unsigned long start;
 491         const char *name;
 492         int ret, nlen;
 493
 494         _enter("OBJ%x{%p},OBJ%x,%s,",
 495                parent->fscache.debug_id, parent->dentry,
 496                object->fscache.debug_id, key);
 497
 498         cache = container_of(parent->fscache.cache,
 499                              struct cachefiles_cache, cache);
 500         path.mnt = cache->mnt;
 501
 502         ASSERT(parent->dentry);
 503         ASSERT(d_backing_inode(parent->dentry));
 504
 505         if (!(d_is_dir(parent->dentry))) {
 506                 // TODO: convert file to dir
 507                 _leave("looking up in none directory");
 508                 return -ENOBUFS;
 509         }
 510
 511         dir = dget(parent->dentry);
 512
 513 advance:
 514         /* attempt to transit the first directory component */
 515         name = key;
 516         nlen = strlen(key);
 517
 518         /* key ends in a double NUL */
 519         key = key + nlen + 1;
 520         if (!*key)
 521                 key = NULL;
 522
 523 lookup_again:
 524         /* search the current directory for the element name */
 525         _debug("lookup '%s'", name);
 526
 527         inode_lock_nested(d_inode(dir), I_MUTEX_PARENT);
 528
 529         start = jiffies;
 530         next = lookup_one_len(name, dir, nlen);
 531         cachefiles_hist(cachefiles_lookup_histogram, start);
 532         if (IS_ERR(next))
 533                 goto lookup_error;
 534
 535         _debug("next -> %p %s", next, d_backing_inode(next) ? "positive" : "negative");
 536
 537         if (!key)
 538                 object->new = !d_backing_inode(next);
 539
 540         /* if this element of the path doesn't exist, then the lookup phase
 541          * failed, and we can release any readers in the certain knowledge that
 542          * there's nothing for them to actually read */
 543         if (d_is_negative(next))
 544                 fscache_object_lookup_negative(&object->fscache);
 545
 546         /* we need to create the object if it's negative */
 547         if (key || object->type == FSCACHE_COOKIE_TYPE_INDEX) {
 548                 /* index objects and intervening tree levels must be subdirs */
 549                 if (d_is_negative(next)) {
 550                         ret = cachefiles_has_space(cache, 1, 0);
 551                         if (ret < 0)
 552                                 goto no_space_error;
 553
 554                         path.dentry = dir;
 555                         ret = security_path_mkdir(&path, next, 0);
 556                         if (ret < 0)
 557                                 goto create_error;
 558                         start = jiffies;
 559                         ret = vfs_mkdir(d_inode(dir), next, 0);
 560                         cachefiles_hist(cachefiles_mkdir_histogram, start);
 561                         if (ret < 0)
 562                                 goto create_error;
 563
 564                         ASSERT(d_backing_inode(next));
 565
 566                         _debug("mkdir -> %p{%p{ino=%lu}}",
 567                                next, d_backing_inode(next), d_backing_inode(next)->i_ino);
 568
 569                 } else if (!d_can_lookup(next)) {
 570                         pr_err("inode %lu is not a directory\n",
 571                                d_backing_inode(next)->i_ino);
 572                         ret = -ENOBUFS;
 573                         goto error;
 574                 }
 575
 576         } else {
 577                 /* non-index objects start out life as files */
 578                 if (d_is_negative(next)) {
 579                         ret = cachefiles_has_space(cache, 1, 0);
 580                         if (ret < 0)
 581                                 goto no_space_error;
 582
 583                         path.dentry = dir;
 584                         ret = security_path_mknod(&path, next, S_IFREG, 0);
 585                         if (ret < 0)
 586                                 goto create_error;
 587                         start = jiffies;
 588                         ret = vfs_create(d_inode(dir), next, S_IFREG, true);
 589                         cachefiles_hist(cachefiles_create_histogram, start);
 590                         if (ret < 0)
 591                                 goto create_error;
 592
 593                         ASSERT(d_backing_inode(next));
 594
 595                         _debug("create -> %p{%p{ino=%lu}}",
 596                                next, d_backing_inode(next), d_backing_inode(next)->i_ino);
 597
 598                 } else if (!d_can_lookup(next) &&
 599                            !d_is_reg(next)
 600                            ) {
 601                         pr_err("inode %lu is not a file or directory\n",
 602                                d_backing_inode(next)->i_ino);
 603                         ret = -ENOBUFS;
 604                         goto error;
 605                 }
 606         }
 607
 608         /* process the next component */
 609         if (key) {
 610                 _debug("advance");
 611                 inode_unlock(d_inode(dir));
 612                 dput(dir);
 613                 dir = next;
 614                 next = NULL;
 615                 goto advance;
 616         }
 617
 618         /* we've found the object we were looking for */
 619         object->dentry = next;
 620
 621         /* if we've found that the terminal object exists, then we need to
 622          * check its attributes and delete it if it's out of date */
 623         if (!object->new) {
 624                 _debug("validate '%pd'", next);
 625
 626                 ret = cachefiles_check_object_xattr(object, auxdata);
 627                 if (ret == -ESTALE) {
 628                         /* delete the object (the deleter drops the directory
 629                          * mutex) */
 630                         object->dentry = NULL;
 631
 632                         ret = cachefiles_bury_object(cache, dir, next, true,
 633                                                      FSCACHE_OBJECT_IS_STALE);
 634                         dput(next);
 635                         next = NULL;
 636
 637                         if (ret < 0)
 638                                 goto delete_error;
 639
 640                         _debug("redo lookup");
 641                         fscache_object_retrying_stale(&object->fscache);
 642                         goto lookup_again;
 643                 }
 644         }
 645
 646         /* note that we're now using this object */
 647         ret = cachefiles_mark_object_active(cache, object);
 648
 649         inode_unlock(d_inode(dir));
 650         dput(dir);
 651         dir = NULL;
 652
 653         if (ret == -ETIMEDOUT)
 654                 goto mark_active_timed_out;
 655
 656         _debug("=== OBTAINED_OBJECT ===");
 657
 658         if (object->new) {
 659                 /* attach data to a newly constructed terminal object */
 660                 ret = cachefiles_set_object_xattr(object, auxdata);
 661                 if (ret < 0)
 662                         goto check_error;
 663         } else {
 664                 /* always update the atime on an object we've just looked up
 665                  * (this is used to keep track of culling, and atimes are only
 666                  * updated by read, write and readdir but not lookup or
 667                  * open) */
 668                 path.dentry = next;
 669                 touch_atime(&path);
 670         }
 671
 672         /* open a file interface onto a data file */
 673         if (object->type != FSCACHE_COOKIE_TYPE_INDEX) {
 674                 if (d_is_reg(object->dentry)) {
 675                         const struct address_space_operations *aops;
 676
 677                         ret = -EPERM;
 678                         aops = d_backing_inode(object->dentry)->i_mapping->a_ops;
 679                         if (!aops->bmap)
 680                                 goto check_error;
 681                         if (object->dentry->d_sb->s_blocksize > PAGE_SIZE)
 682                                 goto check_error;
 683
 684                         object->backer = object->dentry;
 685                 } else {
 686                         BUG(); // TODO: open file in data-class subdir
 687                 }
 688         }
 689
 690         object->new = 0;
 691         fscache_obtained_object(&object->fscache);
 692
 693         _leave(" = 0 [%lu]", d_backing_inode(object->dentry)->i_ino);
 694         return 0;
 695
 696 no_space_error:
 697         fscache_object_mark_killed(&object->fscache, FSCACHE_OBJECT_NO_SPACE);
 698 create_error:
 699         _debug("create error %d", ret);
 700         if (ret == -EIO)
 701                 cachefiles_io_error(cache, "Create/mkdir failed");
 702         goto error;
 703
 704 mark_active_timed_out:
 705         _debug("mark active timed out");
 706         goto release_dentry;
 707
 708 check_error:
 709         _debug("check error %d", ret);
 710         cachefiles_mark_object_inactive(
 711                 cache, object, d_backing_inode(object->dentry)->i_blocks);
 712 release_dentry:
 713         dput(object->dentry);
 714         object->dentry = NULL;
 715         goto error_out;
 716
 717 delete_error:
 718         _debug("delete error %d", ret);
 719         goto error_out2;
 720
 721 lookup_error:
 722         _debug("lookup error %ld", PTR_ERR(next));
 723         ret = PTR_ERR(next);
 724         if (ret == -EIO)
 725                 cachefiles_io_error(cache, "Lookup failed");
 726         next = NULL;
 727 error:
 728         inode_unlock(d_inode(dir));
 729         dput(next);
 730 error_out2:
 731         dput(dir);
 732 error_out:
 733         _leave(" = error %d", -ret);
 734         return ret;
 735 }
 736
 737 /*
 738  * get a subdirectory
 739  */
 740 struct dentry *cachefiles_get_directory(struct cachefiles_cache *cache,
 741                                         struct dentry *dir,
 742                                         const char *dirname)
 743 {
 744         struct dentry *subdir;
 745         unsigned long start;
 746         struct path path;
 747         int ret;
 748
 749         _enter(",,%s", dirname);
 750
 751         /* search the current directory for the element name */
 752         inode_lock(d_inode(dir));
 753
 754         start = jiffies;
 755         subdir = lookup_one_len(dirname, dir, strlen(dirname));
 756         cachefiles_hist(cachefiles_lookup_histogram, start);
 757         if (IS_ERR(subdir)) {
 758                 if (PTR_ERR(subdir) == -ENOMEM)
 759                         goto nomem_d_alloc;
 760                 goto lookup_error;
 761         }
 762
 763         _debug("subdir -> %p %s",
 764                subdir, d_backing_inode(subdir) ? "positive" : "negative");
 765
 766         /* we need to create the subdir if it doesn't exist yet */
 767         if (d_is_negative(subdir)) {
 768                 ret = cachefiles_has_space(cache, 1, 0);
 769                 if (ret < 0)
 770                         goto mkdir_error;
 771
 772                 _debug("attempt mkdir");
 773
 774                 path.mnt = cache->mnt;
 775                 path.dentry = dir;
 776                 ret = security_path_mkdir(&path, subdir, 0700);
 777                 if (ret < 0)
 778                         goto mkdir_error;
 779                 ret = vfs_mkdir(d_inode(dir), subdir, 0700);
 780                 if (ret < 0)
 781                         goto mkdir_error;
 782
 783                 ASSERT(d_backing_inode(subdir));
 784
 785                 _debug("mkdir -> %p{%p{ino=%lu}}",
 786                        subdir,
 787                        d_backing_inode(subdir),
 788                        d_backing_inode(subdir)->i_ino);
 789         }
 790
 791         inode_unlock(d_inode(dir));
 792
 793         /* we need to make sure the subdir is a directory */
 794         ASSERT(d_backing_inode(subdir));
 795
 796         if (!d_can_lookup(subdir)) {
 797                 pr_err("%s is not a directory\n", dirname);
 798                 ret = -EIO;
 799                 goto check_error;
 800         }
 801
 802         ret = -EPERM;
 803         if (!(d_backing_inode(subdir)->i_opflags & IOP_XATTR) ||
 804             !d_backing_inode(subdir)->i_op->lookup ||
 805             !d_backing_inode(subdir)->i_op->mkdir ||
 806             !d_backing_inode(subdir)->i_op->create ||
 807             !d_backing_inode(subdir)->i_op->rename ||
 808             !d_backing_inode(subdir)->i_op->rmdir ||
 809             !d_backing_inode(subdir)->i_op->unlink)
 810                 goto check_error;
 811
 812         _leave(" = [%lu]", d_backing_inode(subdir)->i_ino);
 813         return subdir;
 814
 815 check_error:
 816         dput(subdir);
 817         _leave(" = %d [check]", ret);
 818         return ERR_PTR(ret);
 819
 820 mkdir_error:
 821         inode_unlock(d_inode(dir));
 822         dput(subdir);
 823         pr_err("mkdir %s failed with error %d\n", dirname, ret);
 824         return ERR_PTR(ret);
 825
 826 lookup_error:
 827         inode_unlock(d_inode(dir));
 828         ret = PTR_ERR(subdir);
 829         pr_err("Lookup %s failed with error %d\n", dirname, ret);
 830         return ERR_PTR(ret);
 831
 832 nomem_d_alloc:
 833         inode_unlock(d_inode(dir));
 834         _leave(" = -ENOMEM");
 835         return ERR_PTR(-ENOMEM);
 836 }
 837
 838 /*
 839  * find out if an object is in use or not
 840  * - if finds object and it's not in use:
 841  *   - returns a pointer to the object and a reference on it
 842  *   - returns with the directory locked
 843  */
 844 static struct dentry *cachefiles_check_active(struct cachefiles_cache *cache,
 845                                               struct dentry *dir,
 846                                               char *filename)
 847 {
 848         struct cachefiles_object *object;
 849         struct rb_node *_n;
 850         struct dentry *victim;
 851         unsigned long start;
 852         int ret;
 853
 854         //_enter(",%pd/,%s",
 855         //       dir, filename);
 856
 857         /* look up the victim */
 858         inode_lock_nested(d_inode(dir), I_MUTEX_PARENT);
 859
 860         start = jiffies;
 861         victim = lookup_one_len(filename, dir, strlen(filename));
 862         cachefiles_hist(cachefiles_lookup_histogram, start);
 863         if (IS_ERR(victim))
 864                 goto lookup_error;
 865
 866         //_debug("victim -> %p %s",
 867         //       victim, d_backing_inode(victim) ? "positive" : "negative");
 868
 869         /* if the object is no longer there then we probably retired the object
 870          * at the netfs's request whilst the cull was in progress
 871          */
 872         if (d_is_negative(victim)) {
 873                 inode_unlock(d_inode(dir));
 874                 dput(victim);
 875                 _leave(" = -ENOENT [absent]");
 876                 return ERR_PTR(-ENOENT);
 877         }
 878
 879         /* check to see if we're using this object */
 880         read_lock(&cache->active_lock);
 881
 882         _n = cache->active_nodes.rb_node;
 883
 884         while (_n) {
 885                 object = rb_entry(_n, struct cachefiles_object, active_node);
 886
 887                 if (object->dentry > victim)
 888                         _n = _n->rb_left;
 889                 else if (object->dentry < victim)
 890                         _n = _n->rb_right;
 891                 else
 892                         goto object_in_use;
 893         }
 894
 895         read_unlock(&cache->active_lock);
 896
 897         //_leave(" = %p", victim);
 898         return victim;
 899
 900 object_in_use:
 901         read_unlock(&cache->active_lock);
 902         inode_unlock(d_inode(dir));
 903         dput(victim);
 904         //_leave(" = -EBUSY [in use]");
 905         return ERR_PTR(-EBUSY);
 906
 907 lookup_error:
 908         inode_unlock(d_inode(dir));
 909         ret = PTR_ERR(victim);
 910         if (ret == -ENOENT) {
 911                 /* file or dir now absent - probably retired by netfs */
 912                 _leave(" = -ESTALE [absent]");
 913                 return ERR_PTR(-ESTALE);
 914         }
 915
 916         if (ret == -EIO) {
 917                 cachefiles_io_error(cache, "Lookup failed");
 918         } else if (ret != -ENOMEM) {
 919                 pr_err("Internal error: %d\n", ret);
 920                 ret = -EIO;
 921         }
 922
 923         _leave(" = %d", ret);
 924         return ERR_PTR(ret);
 925 }
 926
 927 /*
 928  * cull an object if it's not in use
 929  * - called only by cache manager daemon
 930  */
 931 int cachefiles_cull(struct cachefiles_cache *cache, struct dentry *dir,
 932                     char *filename)
 933 {
 934         struct dentry *victim;
 935         int ret;
 936
 937         _enter(",%pd/,%s", dir, filename);
 938
 939         victim = cachefiles_check_active(cache, dir, filename);
 940         if (IS_ERR(victim))
 941                 return PTR_ERR(victim);
 942
 943         _debug("victim -> %p %s",
 944                victim, d_backing_inode(victim) ? "positive" : "negative");
 945
 946         /* okay... the victim is not being used so we can cull it
 947          * - start by marking it as stale
 948          */
 949         _debug("victim is cullable");
 950
 951         ret = cachefiles_remove_object_xattr(cache, victim);
 952         if (ret < 0)
 953                 goto error_unlock;
 954
 955         /*  actually remove the victim (drops the dir mutex) */
 956         _debug("bury");
 957
 958         ret = cachefiles_bury_object(cache, dir, victim, false,
 959                                      FSCACHE_OBJECT_WAS_CULLED);
 960         if (ret < 0)
 961                 goto error;
 962
 963         dput(victim);
 964         _leave(" = 0");
 965         return 0;
 966
 967 error_unlock:
 968         inode_unlock(d_inode(dir));
 969 error:
 970         dput(victim);
 971         if (ret == -ENOENT) {
 972                 /* file or dir now absent - probably retired by netfs */
 973                 _leave(" = -ESTALE [absent]");
 974                 return -ESTALE;
 975         }
 976
 977         if (ret != -ENOMEM) {
 978                 pr_err("Internal error: %d\n", ret);
 979                 ret = -EIO;
 980         }
 981
 982         _leave(" = %d", ret);
 983         return ret;
 984 }
 985
 986 /*
 987  * find out if an object is in use or not
 988  * - called only by cache manager daemon
 989  * - returns -EBUSY or 0 to indicate whether an object is in use or not
 990  */
 991 int cachefiles_check_in_use(struct cachefiles_cache *cache, struct dentry *dir,
 992                             char *filename)
 993 {
 994         struct dentry *victim;
 995
 996         //_enter(",%pd/,%s",
 997         //       dir, filename);
 998
 999         victim = cachefiles_check_active(cache, dir, filename);
1000         if (IS_ERR(victim))
1001                 return PTR_ERR(victim);
1002
1003         inode_unlock(d_inode(dir));
1004         dput(victim);
1005         //_leave(" = 0");
1006         return 0;
1007 }