lustre/mdd/mdd_orphans.c

   1 /*
   2  * GPL HEADER START
   3  *
   4  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   5  *
   6  * This program is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License version 2 only,
   8  * as published by the Free Software Foundation.
   9  *
  10  * This program is distributed in the hope that it will be useful, but
  11  * WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13  * General Public License version 2 for more details (a copy is included
  14  * in the LICENSE file that accompanied this code).
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * version 2 along with this program; If not, see
  18  * http://www.gnu.org/licenses/gpl-2.0.html
  19  *
  20  * GPL HEADER END
  21  */
  22 /*
  23  * Copyright (c) 2007, 2010, Oracle and/or its affiliates. All rights reserved.
  24  * Use is subject to license terms.
  25  *
  26  * Copyright (c) 2011, 2017, Intel Corporation.
  27  */
  28 /*
  29  * This file is part of Lustre, http://www.lustre.org/
  30  * Lustre is a trademark of Sun Microsystems, Inc.
  31  *
  32  * lustre/mdd/mdd_orphans.c
  33  *
  34  * Orphan handling code
  35  *
  36  * Author: Mike Pershin <tappro@clusterfs.com>
  37  *         Pravin B Shelar <pravin.shelar@sun.com>
  38  */
  39
  40 #define DEBUG_SUBSYSTEM S_MDS
  41
  42 #include <obd.h>
  43 #include <obd_class.h>
  44 #include <obd_support.h>
  45 #include <lustre_fid.h>
  46 #include "mdd_internal.h"
  47
  48 static const char mdd_orphan_index_name[] = MDT_ORPHAN_DIR;
  49 static const char dotdot[] = "..";
  50
  51 enum {
  52         ORPH_OP_UNLINK,
  53 };
  54
  55 /* obsolete after 2.11, needed for upgrades from older 2.x versions */
  56 #define ORPHAN_FILE_NAME_FORMAT_20      "%016llx:%08x:%08x:%2x"
  57
  58 static struct dt_key *mdd_orphan_key_fill(const struct lu_env *env,
  59                                           const struct lu_fid *lf)
  60 {
  61         char *key = mdd_env_info(env)->mti_key;
  62
  63         LASSERT(key);
  64         snprintf(key, sizeof(mdd_env_info(env)->mti_key),
  65                  DFID_NOBRACE, PFID(lf));
  66
  67         return (struct dt_key *)key;
  68 }
  69
  70 /* compatibility with orphan files created in versions before 2.11 */
  71 static struct dt_key *mdd_orphan_key_fill_20(const struct lu_env *env,
  72                                              const struct lu_fid *lf)
  73 {
  74         char *key = mdd_env_info(env)->mti_key;
  75
  76         LASSERT(key);
  77         snprintf(key, sizeof(mdd_env_info(env)->mti_key),
  78                  ORPHAN_FILE_NAME_FORMAT_20,
  79                  fid_seq(lf), fid_oid(lf), fid_ver(lf), ORPH_OP_UNLINK);
  80
  81         return (struct dt_key *)key;
  82 }
  83
  84 static inline int mdd_orphan_insert_obj(const struct lu_env *env,
  85                                         struct mdd_device *mdd,
  86                                         struct mdd_object *obj,
  87                                         struct thandle *th)
  88 {
  89         struct dt_insert_rec *rec = &mdd_env_info(env)->mti_dt_rec;
  90         struct dt_object *dor = mdd->mdd_orphans;
  91         const struct lu_fid *lf = mdo2fid(obj);
  92         struct dt_key *key = mdd_orphan_key_fill(env, lf);
  93
  94         rec->rec_fid = lf;
  95         rec->rec_type = mdd_object_type(obj);
  96
  97         return dt_insert(env, dor, (const struct dt_rec *)rec, key, th);
  98 }
  99
 100 int mdd_orphan_declare_insert(const struct lu_env *env, struct mdd_object *obj,
 101                               umode_t mode, struct thandle *th)
 102 {
 103         struct dt_insert_rec *rec = &mdd_env_info(env)->mti_dt_rec;
 104         struct mdd_device *mdd = mdo2mdd(&obj->mod_obj);
 105         struct dt_key *key;
 106         int rc;
 107
 108         key = mdd_orphan_key_fill(env, mdo2fid(obj));
 109
 110         rec->rec_fid = mdo2fid(obj);
 111         rec->rec_type = mode;
 112         rc = dt_declare_insert(env, mdd->mdd_orphans,
 113                                (const struct dt_rec *)rec, key, th);
 114         if (rc != 0)
 115                 return rc;
 116
 117         rc = mdo_declare_ref_add(env, obj, th);
 118         if (rc)
 119                 return rc;
 120
 121         if (!S_ISDIR(mode))
 122                 return 0;
 123
 124         rc = mdo_declare_ref_add(env, obj, th);
 125         if (rc)
 126                 return rc;
 127
 128         rc = dt_declare_ref_add(env, mdd->mdd_orphans, th);
 129         if (rc)
 130                 return rc;
 131
 132         rc = mdo_declare_index_delete(env, obj, dotdot, th);
 133         if (rc)
 134                 return rc;
 135
 136         rc = mdo_declare_index_insert(env, obj,
 137                                       lu_object_fid(&mdd->mdd_orphans->do_lu),
 138                                       S_IFDIR, dotdot, th);
 139
 140         return rc;
 141 }
 142
 143 /**
 144  *  add an orphan \a obj to the orphan index.
 145  *  \param obj file or directory.
 146  *  \param th  transaction for index insert.
 147  *
 148  *  \pre obj nlink == 0 && obj->mod_count != 0
 149  *
 150  *  \retval 0  success
 151  *  \retval  -ve index operation error.
 152  */
 153 int mdd_orphan_insert(const struct lu_env *env, struct mdd_object *obj,
 154                       struct thandle *th)
 155 {
 156         struct mdd_device *mdd = mdo2mdd(&obj->mod_obj);
 157         struct dt_object *dor = mdd->mdd_orphans;
 158         const struct lu_fid *lf_dor = lu_object_fid(&dor->do_lu);
 159         struct dt_object *next = mdd_object_child(obj);
 160         struct dt_insert_rec *rec = &mdd_env_info(env)->mti_dt_rec;
 161         int rc;
 162         ENTRY;
 163
 164         LASSERT(mdd_write_locked(env, obj) != 0);
 165         LASSERT(!(obj->mod_flags & ORPHAN_OBJ));
 166
 167         dt_write_lock(env, mdd->mdd_orphans, MOR_TGT_ORPHAN);
 168
 169         rc = mdd_orphan_insert_obj(env, mdd, obj, th);
 170         if (rc)
 171                 GOTO(out, rc);
 172
 173         mdo_ref_add(env, obj, th);
 174         if (!S_ISDIR(mdd_object_type(obj)))
 175                 GOTO(out, rc = 0);
 176
 177         mdo_ref_add(env, obj, th);
 178         dt_ref_add(env, mdd->mdd_orphans, th);
 179
 180         /* try best to fixup directory, do not return errors from here */
 181         if (!dt_try_as_dir(env, next))
 182                 GOTO(out, rc = 0);
 183
 184         dt_delete(env, next, (const struct dt_key *)dotdot, th);
 185
 186         rec->rec_fid = lf_dor;
 187         rec->rec_type = S_IFDIR;
 188         dt_insert(env, next, (const struct dt_rec *)rec,
 189                   (const struct dt_key *)dotdot, th);
 190
 191 out:
 192         if (rc == 0)
 193                 obj->mod_flags |= ORPHAN_OBJ;
 194
 195         dt_write_unlock(env, mdd->mdd_orphans);
 196
 197         RETURN(rc);
 198 }
 199
 200 int mdd_orphan_declare_delete(const struct lu_env *env, struct mdd_object *obj,
 201                               struct thandle *th)
 202 {
 203         struct mdd_device *mdd = mdo2mdd(&obj->mod_obj);
 204         struct dt_key *key;
 205         int rc;
 206
 207         key = mdd_orphan_key_fill(env, mdo2fid(obj));
 208
 209         rc = dt_declare_delete(env, mdd->mdd_orphans, key, th);
 210         if (rc)
 211                 return rc;
 212
 213         if (!mdd_object_exists(obj))
 214                 return -ENOENT;
 215
 216         rc = mdo_declare_ref_del(env, obj, th);
 217         if (rc)
 218                 return rc;
 219
 220         if (S_ISDIR(mdd_object_type(obj))) {
 221                 rc = mdo_declare_ref_del(env, obj, th);
 222                 if (rc)
 223                         return rc;
 224
 225                 rc = dt_declare_ref_del(env, mdd->mdd_orphans, th);
 226         }
 227
 228         return rc;
 229 }
 230
 231 /**
 232  *  delete an orphan \a obj from orphan index.
 233  *  \param obj file or directory.
 234  *  \param th  transaction for index deletion and object destruction.
 235  *
 236  *  \pre obj->mod_count == 0 && ORPHAN_OBJ is set for obj.
 237  *
 238  *  \retval 0  success
 239  *  \retval  -ve index operation error.
 240  */
 241 int mdd_orphan_delete(const struct lu_env *env, struct mdd_object *obj,
 242                       struct thandle *th)
 243 {
 244         struct mdd_device *mdd = mdo2mdd(&obj->mod_obj);
 245         struct dt_object *dor = mdd->mdd_orphans;
 246         struct dt_key *key;
 247         int rc = 0;
 248
 249         ENTRY;
 250
 251         LASSERT(mdd_write_locked(env, obj) != 0);
 252         LASSERT(obj->mod_flags & ORPHAN_OBJ);
 253         LASSERT(obj->mod_count == 0);
 254
 255         LASSERT(dor);
 256
 257         key = mdd_orphan_key_fill(env, mdo2fid(obj));
 258         dt_write_lock(env, mdd->mdd_orphans, MOR_TGT_ORPHAN);
 259
 260         if (OBD_FAIL_CHECK(OBD_FAIL_MDS_ORPHAN_DELETE))
 261                 goto ref_del;
 262
 263         rc = dt_delete(env, mdd->mdd_orphans, key, th);
 264         if (rc == -ENOENT) {
 265                 key = mdd_orphan_key_fill_20(env, mdo2fid(obj));
 266                 rc = dt_delete(env, mdd->mdd_orphans, key, th);
 267         }
 268
 269 ref_del:
 270         if (!rc) {
 271                 /* lov objects will be destroyed by caller */
 272                 mdo_ref_del(env, obj, th);
 273                 if (S_ISDIR(mdd_object_type(obj))) {
 274                         mdo_ref_del(env, obj, th);
 275                         dt_ref_del(env, mdd->mdd_orphans, th);
 276                 }
 277                 obj->mod_flags &= ~ORPHAN_OBJ;
 278         } else {
 279                 CERROR("%s: could not delete orphan object "DFID": rc = %d\n",
 280                        mdd2obd_dev(mdd)->obd_name, PFID(mdo2fid(obj)), rc);
 281         }
 282
 283         dt_write_unlock(env, mdd->mdd_orphans);
 284         RETURN(rc);
 285 }
 286
 287
 288 static int mdd_orphan_destroy(const struct lu_env *env, struct mdd_object *obj,
 289                               struct dt_key *key)
 290 {
 291         struct thandle *th = NULL;
 292         struct mdd_device *mdd = mdo2mdd(&obj->mod_obj);
 293         bool orphan_exists = true;
 294         int rc = 0;
 295         ENTRY;
 296
 297         th = mdd_trans_create(env, mdd);
 298         if (IS_ERR(th)) {
 299                 rc = PTR_ERR(th);
 300                 if (rc != -EINPROGRESS)
 301                         CERROR("%s: cannot get orphan thandle: rc = %d\n",
 302                                mdd2obd_dev(mdd)->obd_name, rc);
 303                 RETURN(rc);
 304         }
 305
 306         mdd_write_lock(env, obj, MOR_TGT_CHILD);
 307         rc = mdd_orphan_declare_delete(env, obj, th);
 308         if (rc == -ENOENT)
 309                 orphan_exists = false;
 310         else if (rc)
 311                 GOTO(unlock, rc);
 312
 313         if (orphan_exists) {
 314                 rc = mdo_declare_destroy(env, obj, th);
 315                 if (rc)
 316                         GOTO(unlock, rc);
 317         }
 318
 319         rc = mdd_trans_start(env, mdd, th);
 320         if (rc)
 321                 GOTO(unlock, rc);
 322
 323         if (likely(obj->mod_count == 0)) {
 324                 dt_write_lock(env, mdd->mdd_orphans, MOR_TGT_ORPHAN);
 325                 rc = dt_delete(env, mdd->mdd_orphans, key, th);
 326                 if (rc) {
 327                         CERROR("%s: could not delete orphan "DFID": rc = %d\n",
 328                                mdd2obd_dev(mdd)->obd_name, PFID(mdo2fid(obj)),
 329                                rc);
 330                 } else if (orphan_exists) {
 331                         mdo_ref_del(env, obj, th);
 332                         if (S_ISDIR(mdd_object_type(obj))) {
 333                                 mdo_ref_del(env, obj, th);
 334                                 dt_ref_del(env, mdd->mdd_orphans, th);
 335                         }
 336                         rc = mdo_destroy(env, obj, th);
 337                 } else {
 338                         CWARN("%s: orphan %s "DFID" doesn't exist\n",
 339                               mdd2obd_dev(mdd)->obd_name, (char *)key,
 340                               PFID(mdo2fid(obj)));
 341                 }
 342                 dt_write_unlock(env, mdd->mdd_orphans);
 343         }
 344 unlock:
 345         mdd_write_unlock(env, obj);
 346
 347         rc = mdd_trans_stop(env, mdd, 0, th);
 348
 349         RETURN(rc);
 350 }
 351
 352 /**
 353  * Delete unused orphan with FID \a lf from PENDING directory
 354  *
 355  * \param mdd  MDD device finishing recovery
 356  * \param lf   FID of file or directory to delete
 357  * \param key  cookie for this entry in index iterator
 358  *
 359  * \retval 0   success
 360  * \retval -ve error
 361  */
 362 static int mdd_orphan_key_test_and_delete(const struct lu_env *env,
 363                                           struct mdd_device *mdd,
 364                                           struct lu_fid *lf, struct dt_key *key)
 365 {
 366         struct mdd_object *mdo;
 367         int rc;
 368
 369         mdo = mdd_object_find(env, mdd, lf);
 370
 371         if (IS_ERR(mdo))
 372                 return PTR_ERR(mdo);
 373
 374         rc = -EBUSY;
 375         if (mdo->mod_count == 0) {
 376                 CDEBUG(D_HA, "Found orphan "DFID", delete it\n", PFID(lf));
 377                 rc = mdd_orphan_destroy(env, mdo, key);
 378                 if (rc) /* so replay-single.sh test_37 works */
 379                         CERROR("%s: error unlinking orphan "DFID": rc = %d\n",
 380                                mdd2obd_dev(mdd)->obd_name, PFID(lf), rc);
 381         } else {
 382                 mdd_write_lock(env, mdo, MOR_TGT_CHILD);
 383                 if (likely(mdo->mod_count > 0)) {
 384                         CDEBUG(D_HA, "Found orphan "DFID" count %d, skip it\n",
 385                                PFID(lf), mdo->mod_count);
 386                         mdo->mod_flags |= ORPHAN_OBJ;
 387                 }
 388                 mdd_write_unlock(env, mdo);
 389         }
 390
 391         mdd_object_put(env, mdo);
 392         return rc;
 393 }
 394
 395 /**
 396  * delete unreferenced files and directories in the PENDING directory
 397  *
 398  * Files that remain in PENDING after client->MDS recovery has completed
 399  * have to be referenced (opened) by some client during recovery, or they
 400  * will be deleted here (for clients that did not complete recovery).
 401  *
 402  * \param thread  info about orphan cleanup thread
 403  *
 404  * \retval 0   success
 405  * \retval -ve error
 406  */
 407 static int mdd_orphan_index_iterate(const struct lu_env *env,
 408                                     struct mdd_generic_thread *thread)
 409 {
 410         struct mdd_device *mdd = (struct mdd_device *)thread->mgt_data;
 411         struct dt_object *dor = mdd->mdd_orphans;
 412         struct lu_dirent *ent = &mdd_env_info(env)->mti_ent;
 413         const struct dt_it_ops *iops;
 414         struct dt_it *it;
 415         struct lu_fid fid;
 416         int key_sz = 0;
 417         int rc;
 418         __u64 cookie;
 419         ENTRY;
 420
 421         iops = &dor->do_index_ops->dio_it;
 422         it = iops->init(env, dor, LUDA_64BITHASH);
 423         if (IS_ERR(it)) {
 424                 rc = PTR_ERR(it);
 425                 CERROR("%s: cannot clean '%s': rc = %d\n",
 426                        mdd2obd_dev(mdd)->obd_name, mdd_orphan_index_name, rc);
 427                 GOTO(out, rc);
 428         }
 429
 430         rc = iops->load(env, it, 0);
 431         if (rc < 0)
 432                 GOTO(out_put, rc);
 433         if (rc == 0) {
 434                 CERROR("%s: error loading iterator to clean '%s'\n",
 435                        mdd2obd_dev(mdd)->obd_name, mdd_orphan_index_name);
 436                 /* Index contains no zero key? */
 437                 GOTO(out_put, rc = -EIO);
 438         }
 439
 440         do {
 441                 if (thread->mgt_abort)
 442                         break;
 443
 444                 key_sz = iops->key_size(env, it);
 445                 /* filter out "." and ".." entries from PENDING dir. */
 446                 if (key_sz < 8)
 447                         goto next;
 448
 449                 rc = iops->rec(env, it, (struct dt_rec *)ent, LUDA_64BITHASH);
 450                 if (rc != 0) {
 451                         CERROR("%s: fail to get FID for orphan it: rc = %d\n",
 452                                mdd2obd_dev(mdd)->obd_name, rc);
 453                         goto next;
 454                 }
 455
 456                 fid_le_to_cpu(&fid, &ent->lde_fid);
 457                 if (!fid_is_sane(&fid)) {
 458                         CERROR("%s: bad FID "DFID" cleaning '%s'\n",
 459                                mdd2obd_dev(mdd)->obd_name, PFID(&fid),
 460                                mdd_orphan_index_name);
 461                         goto next;
 462                 }
 463
 464                 /* kill orphan object */
 465                 cookie = iops->store(env, it);
 466                 iops->put(env, it);
 467                 rc = mdd_orphan_key_test_and_delete(env, mdd, &fid,
 468                                                 (struct dt_key *)ent->lde_name);
 469
 470                 /* after index delete reset iterator */
 471                 if (rc == 0)
 472                         rc = iops->get(env, it, (const void *)"");
 473                 else
 474                         rc = iops->load(env, it, cookie);
 475 next:
 476                 rc = iops->next(env, it);
 477         } while (rc == 0);
 478
 479         GOTO(out_put, rc = 0);
 480 out_put:
 481         iops->put(env, it);
 482         iops->fini(env, it);
 483
 484 out:
 485         return rc;
 486 }
 487
 488 /**
 489  * open the PENDING directory for device \a mdd
 490  *
 491  * The PENDING directory persistently tracks files and directories that were
 492  * unlinked from the namespace (nlink == 0) but are still held open by clients.
 493  * Those inodes shouldn't be deleted if the MDS crashes, because the clients
 494  * would not be able to recover and reopen those files.  Instead, these inodes
 495  * are linked into the PENDING directory on disk, and only deleted if all
 496  * clients close them, or the MDS finishes client recovery without any client
 497  * reopening them (i.e. former clients didn't join recovery).
 498  *  \param d   mdd device being started.
 499  *
 500  *  \retval 0  success
 501  *  \retval  -ve index operation error.
 502  *
 503  */
 504 int mdd_orphan_index_init(const struct lu_env *env, struct mdd_device *mdd)
 505 {
 506         struct lu_fid fid;
 507         struct dt_object *d;
 508         int rc = 0;
 509
 510         ENTRY;
 511
 512         /* create PENDING dir */
 513         fid_zero(&fid);
 514         rc = mdd_local_file_create(env, mdd, &mdd->mdd_local_root_fid,
 515                                    mdd_orphan_index_name, S_IFDIR | S_IRUGO |
 516                                    S_IWUSR | S_IXUGO, &fid);
 517         if (rc < 0)
 518                 RETURN(rc);
 519
 520         d = dt_locate(env, mdd->mdd_child, &fid);
 521         if (IS_ERR(d))
 522                 RETURN(PTR_ERR(d));
 523         LASSERT(lu_object_exists(&d->do_lu));
 524         if (!dt_try_as_dir(env, d)) {
 525                 CERROR("%s: orphan dir '%s' is not an index: rc = %d\n",
 526                        mdd2obd_dev(mdd)->obd_name, mdd_orphan_index_name, rc);
 527                 dt_object_put(env, d);
 528                 RETURN(-ENOTDIR);
 529         }
 530         mdd->mdd_orphans = d;
 531         RETURN(0);
 532 }
 533
 534 void mdd_orphan_index_fini(const struct lu_env *env, struct mdd_device *mdd)
 535 {
 536         ENTRY;
 537         if (mdd->mdd_orphans != NULL) {
 538                 dt_object_put(env, mdd->mdd_orphans);
 539                 mdd->mdd_orphans = NULL;
 540         }
 541         EXIT;
 542 }
 543
 544 static int mdd_orphan_cleanup_thread(void *args)
 545 {
 546         struct mdd_generic_thread *thread = (struct mdd_generic_thread *)args;
 547         struct lu_env *env = NULL;
 548         int rc;
 549         ENTRY;
 550
 551         complete(&thread->mgt_started);
 552
 553         OBD_ALLOC_PTR(env);
 554         if (env == NULL)
 555                 GOTO(out, rc = -ENOMEM);
 556
 557         rc = lu_env_init(env, LCT_MD_THREAD);
 558         if (rc)
 559                 GOTO(out, rc);
 560
 561         rc = mdd_orphan_index_iterate(env, thread);
 562
 563         lu_env_fini(env);
 564         GOTO(out, rc);
 565 out:
 566         if (env)
 567                 OBD_FREE_PTR(env);
 568         complete(&thread->mgt_finished);
 569         return rc;
 570 }
 571
 572 /**
 573  *  Iterate orphan index to cleanup orphan objects after recovery is done.
 574  *  \param d   mdd device in recovery.
 575  */
 576 int mdd_orphan_cleanup(const struct lu_env *env, struct mdd_device *d)
 577 {
 578         int rc = -ENOMEM;
 579         char *name = NULL;
 580
 581         OBD_ALLOC(name, MTI_NAME_MAXLEN);
 582         if (name == NULL)
 583                 goto out;
 584
 585         snprintf(name, MTI_NAME_MAXLEN, "orph_%s", mdd2obd_dev(d)->obd_name);
 586
 587         rc = mdd_generic_thread_start(&d->mdd_orphan_cleanup_thread,
 588                                       mdd_orphan_cleanup_thread, d, name);
 589 out:
 590         if (rc)
 591                 CERROR("%s: start orphan cleanup thread failed: rc = %d\n",
 592                        mdd2obd_dev(d)->obd_name, rc);
 593         if (name)
 594                 OBD_FREE(name, MTI_NAME_MAXLEN);
 595
 596         return rc;
 597 }