lustre/lod/lod_dev.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,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  13  * GNU General Public License version 2 for more details.  A copy is
  14  * included in the COPYING file that accompanied this code.
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * along with this program; if not, write to the Free Software
  18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
  19  *
  20  * GPL HEADER END
  21  */
  22 /*
  23  * Copyright  2009 Sun Microsystems, Inc. All rights reserved
  24  * Use is subject to license terms.
  25  *
  26  * Copyright (c) 2012, 2014, 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/lod/lod_dev.c
  33  *
  34  * Lustre Logical Object Device
  35  *
  36  * Author: Alex Zhuravlev <alexey.zhuravlev@intel.com>
  37  * Author: Mikhail Pershin <mike.pershin@intel.com>
  38  */
  39 /**
  40  * The Logical Object Device (LOD) layer manages access to striped
  41  * objects (both regular files and directories). It implements the DT
  42  * device and object APIs and is responsible for creating, storing,
  43  * and loading striping information as an extended attribute of the
  44  * underlying OSD object. LOD is the server side analog of the LOV and
  45  * LMV layers on the client side.
  46  *
  47  * Metadata LU object stack (layers of the same compound LU object,
  48  * all have the same FID):
  49  *
  50  *        MDT
  51  *         |      MD API
  52  *        MDD
  53  *         |      DT API
  54  *        LOD
  55  *       /   \    DT API
  56  *     OSD   OSP
  57  *
  58  * During LOD object initialization the localness or remoteness of the
  59  * object FID dictates the choice between OSD and OSP.
  60  *
  61  * An LOD object (file or directory) with N stripes (each has a
  62  * different FID):
  63  *
  64  *          LOD
  65  *           |
  66  *   +---+---+---+...+
  67  *   |   |   |   |   |
  68  *   S0  S1  S2  S3  S(N-1)  OS[DP] objects, seen as DT objects by LOD
  69  *
  70  * When upper layers must access an object's stripes (which are
  71  * themselves OST or MDT LU objects) LOD finds these objects by their
  72  * FIDs and stores them as an array of DT object pointers on the
  73  * object. Declarations and operations on LOD objects are received by
  74  * LOD (as DT object operations) and performed on the underlying
  75  * OS[DP] object and (as needed) on the stripes. From the perspective
  76  * of LOD, a stripe-less file (created by mknod() or open with
  77  * O_LOV_DELAY_CREATE) is an object which does not yet have stripes,
  78  * while a non-striped directory (created by mkdir()) is an object
  79  * which will never have stripes.
  80  *
  81  * The LOD layer also implements a small subset of the OBD device API
  82  * to support MDT stack initialization and finalization (an MDD device
  83  * connects and disconnects itself to and from the underlying LOD
  84  * device), and pool management. In turn LOD uses the OBD device API
  85  * to connect it self to the underlying OSD, and to connect itself to
  86  * OSP devices representing the MDTs and OSTs that bear the stripes of
  87  * its objects.
  88  */
  89
  90 #define DEBUG_SUBSYSTEM S_MDS
  91
  92 #include <obd_class.h>
  93 #include <md_object.h>
  94 #include <lustre_fid.h>
  95 #include <lustre_param.h>
  96 #include <lustre_update.h>
  97
  98 #include "lod_internal.h"
  99
 100 /*
 101  * Lookup target by FID.
 102  *
 103  * Lookup MDT/OST target index by FID. Type of the target can be
 104  * specific or any.
 105  *
 106  * \param[in] env               LU environment provided by the caller
 107  * \param[in] lod               lod device
 108  * \param[in] fid               FID
 109  * \param[out] tgt              result target index
 110  * \param[in] type              expected type of the target:
 111  *                              LU_SEQ_RANGE_{MDT,OST,ANY}
 112  *
 113  * \retval 0                    on success
 114  * \retval negative             negated errno on error
 115  **/
 116 int lod_fld_lookup(const struct lu_env *env, struct lod_device *lod,
 117                    const struct lu_fid *fid, __u32 *tgt, int *type)
 118 {
 119         struct lu_seq_range     range = { 0 };
 120         struct lu_server_fld    *server_fld;
 121         int rc;
 122         ENTRY;
 123
 124         if (!fid_is_sane(fid)) {
 125                 CERROR("%s: invalid FID "DFID"\n", lod2obd(lod)->obd_name,
 126                        PFID(fid));
 127                 RETURN(-EIO);
 128         }
 129
 130         if (fid_is_idif(fid)) {
 131                 *tgt = fid_idif_ost_idx(fid);
 132                 *type = LU_SEQ_RANGE_OST;
 133                 RETURN(0);
 134         }
 135
 136         if (!lod->lod_initialized || (!fid_seq_in_fldb(fid_seq(fid)))) {
 137                 LASSERT(lu_site2seq(lod2lu_dev(lod)->ld_site) != NULL);
 138
 139                 *tgt = lu_site2seq(lod2lu_dev(lod)->ld_site)->ss_node_id;
 140                 *type = LU_SEQ_RANGE_MDT;
 141                 RETURN(0);
 142         }
 143
 144         server_fld = lu_site2seq(lod2lu_dev(lod)->ld_site)->ss_server_fld;
 145         fld_range_set_type(&range, *type);
 146         rc = fld_server_lookup(env, server_fld, fid_seq(fid), &range);
 147         if (rc != 0)
 148                 RETURN(rc);
 149
 150         *tgt = range.lsr_index;
 151         *type = range.lsr_flags;
 152
 153         CDEBUG(D_INFO, "%s: got tgt %x for sequence: "LPX64"\n",
 154                lod2obd(lod)->obd_name, *tgt, fid_seq(fid));
 155
 156         RETURN(0);
 157 }
 158
 159 /* Slab for OSD object allocation */
 160 struct kmem_cache *lod_object_kmem;
 161
 162 static struct lu_kmem_descr lod_caches[] = {
 163         {
 164                 .ckd_cache = &lod_object_kmem,
 165                 .ckd_name  = "lod_obj",
 166                 .ckd_size  = sizeof(struct lod_object)
 167         },
 168         {
 169                 .ckd_cache = NULL
 170         }
 171 };
 172
 173 static struct lu_device *lod_device_fini(const struct lu_env *env,
 174                                          struct lu_device *d);
 175
 176 /**
 177  * Implementation of lu_device_operations::ldo_object_alloc() for LOD
 178  *
 179  * Allocates and initializes LOD's slice in the given object.
 180  *
 181  * see include/lu_object.h for the details.
 182  */
 183 static struct lu_object *lod_object_alloc(const struct lu_env *env,
 184                                           const struct lu_object_header *hdr,
 185                                           struct lu_device *dev)
 186 {
 187         struct lod_object       *lod_obj;
 188         struct lu_object        *lu_obj;
 189         ENTRY;
 190
 191         OBD_SLAB_ALLOC_PTR_GFP(lod_obj, lod_object_kmem, GFP_NOFS);
 192         if (lod_obj == NULL)
 193                 RETURN(ERR_PTR(-ENOMEM));
 194
 195         lu_obj = lod2lu_obj(lod_obj);
 196         dt_object_init(&lod_obj->ldo_obj, NULL, dev);
 197         lod_obj->ldo_obj.do_ops = &lod_obj_ops;
 198         lu_obj->lo_ops = &lod_lu_obj_ops;
 199
 200         RETURN(lu_obj);
 201 }
 202
 203 /**
 204  * Cleanup table of target's descriptors.
 205  *
 206  * The function goes through all the targets in the given table
 207  * and apply given configuration command on to the targets.
 208  * Used to cleanup the targets at unmount.
 209  *
 210  * \param[in] env               LU environment provided by the caller
 211  * \param[in] lod               lod device
 212  * \param[in] ltd               target's table to go through
 213  * \param[in] lcfg              configuration command to apply
 214  *
 215  * \retval 0                    on success
 216  * \retval negative             negated errno on error
 217  **/
 218 static int lod_cleanup_desc_tgts(const struct lu_env *env,
 219                                  struct lod_device *lod,
 220                                  struct lod_tgt_descs *ltd,
 221                                  struct lustre_cfg *lcfg)
 222 {
 223         struct lu_device  *next;
 224         int rc = 0;
 225         unsigned int i;
 226
 227         lod_getref(ltd);
 228         if (ltd->ltd_tgts_size <= 0) {
 229                 lod_putref(lod, ltd);
 230                 return 0;
 231         }
 232         cfs_foreach_bit(ltd->ltd_tgt_bitmap, i) {
 233                 struct lod_tgt_desc *tgt;
 234                 int rc1;
 235
 236                 tgt = LTD_TGT(ltd, i);
 237                 LASSERT(tgt && tgt->ltd_tgt);
 238                 next = &tgt->ltd_tgt->dd_lu_dev;
 239                 rc1 = next->ld_ops->ldo_process_config(env, next, lcfg);
 240                 if (rc1) {
 241                         CERROR("%s: error cleaning up LOD index %u: cmd %#x"
 242                                ": rc = %d\n", lod2obd(lod)->obd_name, i,
 243                                lcfg->lcfg_command, rc1);
 244                         rc = rc1;
 245                 }
 246         }
 247         lod_putref(lod, ltd);
 248         return rc;
 249 }
 250
 251 /**
 252  * Extract MDT target index from a device name.
 253  *
 254  * a helper function to extract index from the given device name
 255  * like "fsname-MDTxxxx-mdtlov"
 256  *
 257  * \param[in] lodname   device name
 258  * \param[out] index    extracted index
 259  *
 260  * \retval 0            on success
 261  * \retval -EINVAL      if the name is invalid
 262  */
 263 static int lodname2mdt_index(char *lodname, long *index)
 264 {
 265         char *ptr, *tmp;
 266
 267         ptr = strrchr(lodname, '-');
 268         if (ptr == NULL) {
 269                 CERROR("invalid MDT index in '%s'\n", lodname);
 270                 return -EINVAL;
 271         }
 272
 273         if (strncmp(ptr, "-mdtlov", 7) != 0) {
 274                 CERROR("invalid MDT index in '%s'\n", lodname);
 275                 return -EINVAL;
 276         }
 277
 278         if ((unsigned long)ptr - (unsigned long)lodname <= 8) {
 279                 CERROR("invalid MDT index in '%s'\n", lodname);
 280                 return -EINVAL;
 281         }
 282
 283         if (strncmp(ptr - 8, "-MDT", 4) != 0) {
 284                 CERROR("invalid MDT index in '%s'\n", lodname);
 285                 return -EINVAL;
 286         }
 287
 288         *index = simple_strtol(ptr - 4, &tmp, 16);
 289         if (*tmp != '-' || *index > INT_MAX || *index < 0) {
 290                 CERROR("invalid MDT index in '%s'\n", lodname);
 291                 return -EINVAL;
 292         }
 293         return 0;
 294 }
 295
 296 /**
 297  * Implementation of lu_device_operations::ldo_process_config() for LOD
 298  *
 299  * The method is called by the configuration subsystem during setup,
 300  * cleanup and when the configuration changes. The method processes
 301  * few specific commands like adding/removing the targets, changing
 302  * the runtime parameters.
 303
 304  * \param[in] env               LU environment provided by the caller
 305  * \param[in] dev               lod device
 306  * \param[in] lcfg              configuration command to apply
 307  *
 308  * \retval 0                    on success
 309  * \retval negative             negated errno on error
 310  *
 311  * The examples are below.
 312  *
 313  * Add osc config log:
 314  * marker  20 (flags=0x01, v2.2.49.56) lustre-OST0001  'add osc'
 315  * add_uuid  nid=192.168.122.162@tcp(0x20000c0a87aa2)  0:  1:nidxxx
 316  * attach    0:lustre-OST0001-osc-MDT0001  1:osc  2:lustre-MDT0001-mdtlov_UUID
 317  * setup     0:lustre-OST0001-osc-MDT0001  1:lustre-OST0001_UUID  2:nid
 318  * lov_modify_tgts add 0:lustre-MDT0001-mdtlov  1:lustre-OST0001_UUID  2:1  3:1
 319  * marker  20 (flags=0x02, v2.2.49.56) lustre-OST0001  'add osc'
 320  *
 321  * Add mdc config log:
 322  * marker  10 (flags=0x01, v2.2.49.56) lustre-MDT0000  'add osp'
 323  * add_uuid  nid=192.168.122.162@tcp(0x20000c0a87aa2)  0:  1:nid
 324  * attach 0:lustre-MDT0000-osp-MDT0001  1:osp  2:lustre-MDT0001-mdtlov_UUID
 325  * setup     0:lustre-MDT0000-osp-MDT0001  1:lustre-MDT0000_UUID  2:nid
 326  * modify_mdc_tgts add 0:lustre-MDT0001  1:lustre-MDT0000_UUID  2:0  3:1
 327  * marker  10 (flags=0x02, v2.2.49.56) lustre-MDT0000_UUID  'add osp'
 328  */
 329 static int lod_process_config(const struct lu_env *env,
 330                               struct lu_device *dev,
 331                               struct lustre_cfg *lcfg)
 332 {
 333         struct lod_device *lod = lu2lod_dev(dev);
 334         struct lu_device  *next = &lod->lod_child->dd_lu_dev;
 335         char              *arg1;
 336         int                rc = 0;
 337         ENTRY;
 338
 339         switch(lcfg->lcfg_command) {
 340         case LCFG_LOV_DEL_OBD:
 341         case LCFG_LOV_ADD_INA:
 342         case LCFG_LOV_ADD_OBD:
 343         case LCFG_ADD_MDC: {
 344                 __u32 index;
 345                 __u32 mdt_index;
 346                 int gen;
 347                 /* lov_modify_tgts add  0:lov_mdsA  1:osp  2:0  3:1
 348                  * modify_mdc_tgts add  0:lustre-MDT0001
 349                  *                    1:lustre-MDT0001-mdc0002
 350                  *                    2:2  3:1*/
 351                 arg1 = lustre_cfg_string(lcfg, 1);
 352
 353                 if (sscanf(lustre_cfg_buf(lcfg, 2), "%d", &index) != 1)
 354                         GOTO(out, rc = -EINVAL);
 355                 if (sscanf(lustre_cfg_buf(lcfg, 3), "%d", &gen) != 1)
 356                         GOTO(out, rc = -EINVAL);
 357
 358                 if (lcfg->lcfg_command == LCFG_LOV_ADD_OBD) {
 359                         char *mdt;
 360                         mdt = strstr(lustre_cfg_string(lcfg, 0), "-MDT");
 361                         /* 1.8 configs don't have "-MDT0000" at the end */
 362                         if (mdt == NULL) {
 363                                 mdt_index = 0;
 364                         } else {
 365                                 long long_index;
 366                                 rc = lodname2mdt_index(
 367                                         lustre_cfg_string(lcfg, 0),
 368                                         &long_index);
 369                                 if (rc != 0)
 370                                         GOTO(out, rc);
 371                                 mdt_index = long_index;
 372                         }
 373                         rc = lod_add_device(env, lod, arg1, index, gen,
 374                                             mdt_index, LUSTRE_OSC_NAME, 1);
 375                 } else if (lcfg->lcfg_command == LCFG_ADD_MDC) {
 376                         mdt_index = index;
 377                         rc = lod_add_device(env, lod, arg1, index, gen,
 378                                             mdt_index, LUSTRE_MDC_NAME, 1);
 379                 } else if (lcfg->lcfg_command == LCFG_LOV_ADD_INA) {
 380                         /*FIXME: Add mdt_index for LCFG_LOV_ADD_INA*/
 381                         mdt_index = 0;
 382                         rc = lod_add_device(env, lod, arg1, index, gen,
 383                                             mdt_index, LUSTRE_OSC_NAME, 0);
 384                 } else {
 385                         rc = lod_del_device(env, lod,
 386                                             &lod->lod_ost_descs,
 387                                             arg1, index, gen, true);
 388                 }
 389
 390                 break;
 391         }
 392
 393         case LCFG_PARAM: {
 394                 struct obd_device *obd = lod2obd(lod);
 395
 396                 rc = class_process_proc_param(PARAM_LOV, obd->obd_vars,
 397                                               lcfg, obd);
 398                 if (rc > 0)
 399                         rc = 0;
 400                 GOTO(out, rc);
 401         }
 402         case LCFG_CLEANUP:
 403         case LCFG_PRE_CLEANUP: {
 404                 lu_dev_del_linkage(dev->ld_site, dev);
 405                 lod_cleanup_desc_tgts(env, lod, &lod->lod_mdt_descs, lcfg);
 406                 lod_cleanup_desc_tgts(env, lod, &lod->lod_ost_descs, lcfg);
 407                 if (lcfg->lcfg_command == LCFG_PRE_CLEANUP)
 408                         break;
 409                 /*
 410                  * do cleanup on underlying storage only when
 411                  * all OSPs are cleaned up, as they use that OSD as well
 412                  */
 413                 next = &lod->lod_child->dd_lu_dev;
 414                 rc = next->ld_ops->ldo_process_config(env, next, lcfg);
 415                 if (rc)
 416                         CERROR("%s: can't process %u: %d\n",
 417                                lod2obd(lod)->obd_name, lcfg->lcfg_command, rc);
 418
 419                 rc = obd_disconnect(lod->lod_child_exp);
 420                 if (rc)
 421                         CERROR("error in disconnect from storage: %d\n", rc);
 422                 break;
 423         }
 424         default:
 425                CERROR("%s: unknown command %u\n", lod2obd(lod)->obd_name,
 426                       lcfg->lcfg_command);
 427                rc = -EINVAL;
 428                break;
 429         }
 430
 431 out:
 432         RETURN(rc);
 433 }
 434
 435 /**
 436  * Implementation of lu_device_operations::ldo_recovery_complete() for LOD
 437  *
 438  * The method is called once the recovery is complete. This implementation
 439  * distributes the notification to all the known targets.
 440  *
 441  * see include/lu_object.h for the details
 442  */
 443 static int lod_recovery_complete(const struct lu_env *env,
 444                                  struct lu_device *dev)
 445 {
 446         struct lod_device   *lod = lu2lod_dev(dev);
 447         struct lu_device    *next = &lod->lod_child->dd_lu_dev;
 448         unsigned int         i;
 449         int                  rc;
 450         ENTRY;
 451
 452         LASSERT(lod->lod_recovery_completed == 0);
 453         lod->lod_recovery_completed = 1;
 454
 455         rc = next->ld_ops->ldo_recovery_complete(env, next);
 456
 457         lod_getref(&lod->lod_ost_descs);
 458         if (lod->lod_osts_size > 0) {
 459                 cfs_foreach_bit(lod->lod_ost_bitmap, i) {
 460                         struct lod_tgt_desc *tgt;
 461                         tgt = OST_TGT(lod, i);
 462                         LASSERT(tgt && tgt->ltd_tgt);
 463                         next = &tgt->ltd_ost->dd_lu_dev;
 464                         rc = next->ld_ops->ldo_recovery_complete(env, next);
 465                         if (rc)
 466                                 CERROR("%s: can't complete recovery on #%d:"
 467                                         "%d\n", lod2obd(lod)->obd_name, i, rc);
 468                 }
 469         }
 470         lod_putref(lod, &lod->lod_ost_descs);
 471         RETURN(rc);
 472 }
 473
 474 /**
 475  * Implementation of lu_device_operations::ldo_prepare() for LOD
 476  *
 477  * see include/lu_object.h for the details.
 478  */
 479 static int lod_prepare(const struct lu_env *env, struct lu_device *pdev,
 480                        struct lu_device *cdev)
 481 {
 482         struct lod_device   *lod = lu2lod_dev(cdev);
 483         struct lu_device    *next = &lod->lod_child->dd_lu_dev;
 484         int                  rc;
 485         ENTRY;
 486
 487         rc = next->ld_ops->ldo_prepare(env, pdev, next);
 488         if (rc != 0) {
 489                 CERROR("%s: prepare bottom error: rc = %d\n",
 490                        lod2obd(lod)->obd_name, rc);
 491                 RETURN(rc);
 492         }
 493
 494         lod->lod_initialized = 1;
 495
 496         RETURN(rc);
 497 }
 498
 499 const struct lu_device_operations lod_lu_ops = {
 500         .ldo_object_alloc       = lod_object_alloc,
 501         .ldo_process_config     = lod_process_config,
 502         .ldo_recovery_complete  = lod_recovery_complete,
 503         .ldo_prepare            = lod_prepare,
 504 };
 505
 506 /**
 507  * Implementation of dt_device_operations::dt_root_get() for LOD
 508  *
 509  * see include/dt_object.h for the details.
 510  */
 511 static int lod_root_get(const struct lu_env *env,
 512                         struct dt_device *dev, struct lu_fid *f)
 513 {
 514         return dt_root_get(env, dt2lod_dev(dev)->lod_child, f);
 515 }
 516
 517 /**
 518  * Implementation of dt_device_operations::dt_statfs() for LOD
 519  *
 520  * see include/dt_object.h for the details.
 521  */
 522 static int lod_statfs(const struct lu_env *env,
 523                       struct dt_device *dev, struct obd_statfs *sfs)
 524 {
 525         return dt_statfs(env, dt2lod_dev(dev)->lod_child, sfs);
 526 }
 527
 528 /**
 529  * Implementation of dt_device_operations::dt_trans_create() for LOD
 530  *
 531  * Creates a transaction using local (to this node) OSD.
 532  *
 533  * see include/dt_object.h for the details.
 534  */
 535 static struct thandle *lod_trans_create(const struct lu_env *env,
 536                                         struct dt_device *dt)
 537 {
 538         struct thandle *th;
 539
 540         th = top_trans_create(env, dt2lod_dev(dt)->lod_child);
 541         if (IS_ERR(th))
 542                 return th;
 543
 544         th->th_dev = dt;
 545
 546         return th;
 547 }
 548
 549 /**
 550  * Implementation of dt_device_operations::dt_trans_start() for LOD
 551  *
 552  * Starts the set of local transactions using the targets involved
 553  * in declare phase. Initial support for the distributed transactions.
 554  *
 555  * see include/dt_object.h for the details.
 556  */
 557 static int lod_trans_start(const struct lu_env *env, struct dt_device *dt,
 558                            struct thandle *th)
 559 {
 560         return top_trans_start(env, dt2lod_dev(dt)->lod_child, th);
 561 }
 562
 563 /**
 564  * Implementation of dt_device_operations::dt_trans_stop() for LOD
 565  *
 566  * Stops the set of local transactions using the targets involved
 567  * in declare phase. Initial support for the distributed transactions.
 568  *
 569  * see include/dt_object.h for the details.
 570  */
 571 static int lod_trans_stop(const struct lu_env *env, struct dt_device *dt,
 572                           struct thandle *th)
 573 {
 574         return top_trans_stop(env, dt2lod_dev(dt)->lod_child, th);
 575 }
 576
 577 /**
 578  * Implementation of dt_device_operations::dt_conf_get() for LOD
 579  *
 580  * Currently returns the configuration provided by the local OSD.
 581  *
 582  * see include/dt_object.h for the details.
 583  */
 584 static void lod_conf_get(const struct lu_env *env,
 585                          const struct dt_device *dev,
 586                          struct dt_device_param *param)
 587 {
 588         dt_conf_get(env, dt2lod_dev((struct dt_device *)dev)->lod_child, param);
 589 }
 590
 591 /**
 592  * Implementation of dt_device_operations::dt_sync() for LOD
 593  *
 594  * Syncs all known OST targets. Very very expensive and used
 595  * rarely by LFSCK now. Should not be used in general.
 596  *
 597  * see include/dt_object.h for the details.
 598  */
 599 static int lod_sync(const struct lu_env *env, struct dt_device *dev)
 600 {
 601         struct lod_device   *lod = dt2lod_dev(dev);
 602         struct lod_ost_desc *ost;
 603         unsigned int         i;
 604         int                  rc = 0;
 605         ENTRY;
 606
 607         lod_getref(&lod->lod_ost_descs);
 608         lod_foreach_ost(lod, i) {
 609                 ost = OST_TGT(lod, i);
 610                 LASSERT(ost && ost->ltd_ost);
 611                 rc = dt_sync(env, ost->ltd_ost);
 612                 if (rc) {
 613                         CERROR("%s: can't sync %u: %d\n",
 614                                lod2obd(lod)->obd_name, i, rc);
 615                         break;
 616                 }
 617         }
 618         lod_putref(lod, &lod->lod_ost_descs);
 619         if (rc == 0)
 620                 rc = dt_sync(env, lod->lod_child);
 621
 622         RETURN(rc);
 623 }
 624
 625 /**
 626  * Implementation of dt_device_operations::dt_ro() for LOD
 627  *
 628  * Turns local OSD read-only, used for the testing only.
 629  *
 630  * see include/dt_object.h for the details.
 631  */
 632 static int lod_ro(const struct lu_env *env, struct dt_device *dev)
 633 {
 634         return dt_ro(env, dt2lod_dev(dev)->lod_child);
 635 }
 636
 637 /**
 638  * Implementation of dt_device_operations::dt_commit_async() for LOD
 639  *
 640  * Asks local OSD to commit sooner.
 641  *
 642  * see include/dt_object.h for the details.
 643  */
 644 static int lod_commit_async(const struct lu_env *env, struct dt_device *dev)
 645 {
 646         return dt_commit_async(env, dt2lod_dev(dev)->lod_child);
 647 }
 648
 649 static const struct dt_device_operations lod_dt_ops = {
 650         .dt_root_get         = lod_root_get,
 651         .dt_statfs           = lod_statfs,
 652         .dt_trans_create     = lod_trans_create,
 653         .dt_trans_start      = lod_trans_start,
 654         .dt_trans_stop       = lod_trans_stop,
 655         .dt_conf_get         = lod_conf_get,
 656         .dt_sync             = lod_sync,
 657         .dt_ro               = lod_ro,
 658         .dt_commit_async     = lod_commit_async,
 659 };
 660
 661 /**
 662  * Connect to a local OSD.
 663  *
 664  * Used to connect to the local OSD at mount. OSD name is taken from the
 665  * configuration command passed. This connection is used to identify LU
 666  * site and pin the OSD from early removal.
 667  *
 668  * \param[in] env               LU environment provided by the caller
 669  * \param[in] lod               lod device
 670  * \param[in] cfg               configuration command to apply
 671  *
 672  * \retval 0                    on success
 673  * \retval negative             negated errno on error
 674  **/
 675 static int lod_connect_to_osd(const struct lu_env *env, struct lod_device *lod,
 676                               struct lustre_cfg *cfg)
 677 {
 678         struct obd_connect_data *data = NULL;
 679         struct obd_device       *obd;
 680         char                    *nextdev = NULL, *p, *s;
 681         int                      rc, len = 0;
 682         ENTRY;
 683
 684         LASSERT(cfg);
 685         LASSERT(lod->lod_child_exp == NULL);
 686
 687         /* compatibility hack: we still use old config logs
 688          * which specify LOV, but we need to learn underlying
 689          * OSD device, which is supposed to be:
 690          *  <fsname>-MDTxxxx-osd
 691          *
 692          * 2.x MGS generates lines like the following:
 693          *   #03 (176)lov_setup 0:lustre-MDT0000-mdtlov  1:(struct lov_desc)
 694          * 1.8 MGS generates lines like the following:
 695          *   #03 (168)lov_setup 0:lustre-mdtlov  1:(struct lov_desc)
 696          *
 697          * we use "-MDT" to differentiate 2.x from 1.8 */
 698
 699         if ((p = lustre_cfg_string(cfg, 0)) && strstr(p, "-mdtlov")) {
 700                 len = strlen(p) + 1;
 701                 OBD_ALLOC(nextdev, len);
 702                 if (nextdev == NULL)
 703                         GOTO(out, rc = -ENOMEM);
 704
 705                 strcpy(nextdev, p);
 706                 s = strstr(nextdev, "-mdtlov");
 707                 if (unlikely(s == NULL)) {
 708                         CERROR("unable to parse device name %s\n",
 709                                lustre_cfg_string(cfg, 0));
 710                         GOTO(out, rc = -EINVAL);
 711                 }
 712
 713                 if (strstr(nextdev, "-MDT")) {
 714                         /* 2.x config */
 715                         strcpy(s, "-osd");
 716                 } else {
 717                         /* 1.8 config */
 718                         strcpy(s, "-MDT0000-osd");
 719                 }
 720         } else {
 721                 CERROR("unable to parse device name %s\n",
 722                        lustre_cfg_string(cfg, 0));
 723                 GOTO(out, rc = -EINVAL);
 724         }
 725
 726         OBD_ALLOC_PTR(data);
 727         if (data == NULL)
 728                 GOTO(out, rc = -ENOMEM);
 729
 730         obd = class_name2obd(nextdev);
 731         if (obd == NULL) {
 732                 CERROR("can not locate next device: %s\n", nextdev);
 733                 GOTO(out, rc = -ENOTCONN);
 734         }
 735
 736         data->ocd_connect_flags = OBD_CONNECT_VERSION;
 737         data->ocd_version = LUSTRE_VERSION_CODE;
 738
 739         rc = obd_connect(env, &lod->lod_child_exp, obd, &obd->obd_uuid,
 740                          data, NULL);
 741         if (rc) {
 742                 CERROR("cannot connect to next dev %s (%d)\n", nextdev, rc);
 743                 GOTO(out, rc);
 744         }
 745
 746         lod->lod_dt_dev.dd_lu_dev.ld_site =
 747                 lod->lod_child_exp->exp_obd->obd_lu_dev->ld_site;
 748         LASSERT(lod->lod_dt_dev.dd_lu_dev.ld_site);
 749         lod->lod_child = lu2dt_dev(lod->lod_child_exp->exp_obd->obd_lu_dev);
 750
 751 out:
 752         if (data)
 753                 OBD_FREE_PTR(data);
 754         if (nextdev)
 755                 OBD_FREE(nextdev, len);
 756         RETURN(rc);
 757 }
 758
 759 /**
 760  * Allocate and initialize target table.
 761  *
 762  * A helper function to initialize the target table and allocate
 763  * a bitmap of the available targets.
 764  *
 765  * \param[in] ltd               target's table to initialize
 766  *
 767  * \retval 0                    on success
 768  * \retval negative             negated errno on error
 769  **/
 770 static int lod_tgt_desc_init(struct lod_tgt_descs *ltd)
 771 {
 772         mutex_init(&ltd->ltd_mutex);
 773         init_rwsem(&ltd->ltd_rw_sem);
 774
 775         /* the OST array and bitmap are allocated/grown dynamically as OSTs are
 776          * added to the LOD, see lod_add_device() */
 777         ltd->ltd_tgt_bitmap = CFS_ALLOCATE_BITMAP(32);
 778         if (ltd->ltd_tgt_bitmap == NULL)
 779                 RETURN(-ENOMEM);
 780
 781         ltd->ltd_tgts_size  = 32;
 782         ltd->ltd_tgtnr      = 0;
 783
 784         ltd->ltd_death_row = 0;
 785         ltd->ltd_refcount  = 0;
 786         return 0;
 787 }
 788
 789 /**
 790  * Initialize LOD device at setup.
 791  *
 792  * Initializes the given LOD device using the original configuration command.
 793  * The function initiates a connection to the local OSD and initializes few
 794  * internal structures like pools, target tables, etc.
 795  *
 796  * \param[in] env               LU environment provided by the caller
 797  * \param[in] lod               lod device
 798  * \param[in] ldt               not used
 799  * \param[in] cfg               configuration command
 800  *
 801  * \retval 0                    on success
 802  * \retval negative             negated errno on error
 803  **/
 804 static int lod_init0(const struct lu_env *env, struct lod_device *lod,
 805                      struct lu_device_type *ldt, struct lustre_cfg *cfg)
 806 {
 807         struct dt_device_param ddp;
 808         struct obd_device     *obd;
 809         int                    rc;
 810         ENTRY;
 811
 812         obd = class_name2obd(lustre_cfg_string(cfg, 0));
 813         if (obd == NULL) {
 814                 CERROR("Cannot find obd with name %s\n",
 815                        lustre_cfg_string(cfg, 0));
 816                 RETURN(-ENODEV);
 817         }
 818
 819         obd->obd_lu_dev = &lod->lod_dt_dev.dd_lu_dev;
 820         lod->lod_dt_dev.dd_lu_dev.ld_obd = obd;
 821         lod->lod_dt_dev.dd_lu_dev.ld_ops = &lod_lu_ops;
 822         lod->lod_dt_dev.dd_ops = &lod_dt_ops;
 823
 824         rc = lod_connect_to_osd(env, lod, cfg);
 825         if (rc)
 826                 RETURN(rc);
 827
 828         dt_conf_get(env, &lod->lod_dt_dev, &ddp);
 829         lod->lod_osd_max_easize = ddp.ddp_max_ea_size;
 830
 831         /* setup obd to be used with old lov code */
 832         rc = lod_pools_init(lod, cfg);
 833         if (rc)
 834                 GOTO(out_disconnect, rc);
 835
 836         rc = lod_procfs_init(lod);
 837         if (rc)
 838                 GOTO(out_pools, rc);
 839
 840         spin_lock_init(&lod->lod_desc_lock);
 841         spin_lock_init(&lod->lod_connects_lock);
 842         lod_tgt_desc_init(&lod->lod_mdt_descs);
 843         lod_tgt_desc_init(&lod->lod_ost_descs);
 844
 845         RETURN(0);
 846
 847 out_pools:
 848         lod_pools_fini(lod);
 849 out_disconnect:
 850         obd_disconnect(lod->lod_child_exp);
 851         RETURN(rc);
 852 }
 853
 854 /**
 855  * Implementation of lu_device_type_operations::ldto_device_free() for LOD
 856  *
 857  * Releases the memory allocated for LOD device.
 858  *
 859  * see include/lu_object.h for the details.
 860  */
 861 static struct lu_device *lod_device_free(const struct lu_env *env,
 862                                          struct lu_device *lu)
 863 {
 864         struct lod_device *lod = lu2lod_dev(lu);
 865         struct lu_device  *next = &lod->lod_child->dd_lu_dev;
 866         ENTRY;
 867
 868         LASSERT(atomic_read(&lu->ld_ref) == 0);
 869         dt_device_fini(&lod->lod_dt_dev);
 870         OBD_FREE_PTR(lod);
 871         RETURN(next);
 872 }
 873
 874 /**
 875  * Implementation of lu_device_type_operations::ldto_device_alloc() for LOD
 876  *
 877  * Allocates LOD device and calls the helpers to initialize it.
 878  *
 879  * see include/lu_object.h for the details.
 880  */
 881 static struct lu_device *lod_device_alloc(const struct lu_env *env,
 882                                           struct lu_device_type *type,
 883                                           struct lustre_cfg *lcfg)
 884 {
 885         struct lod_device *lod;
 886         struct lu_device  *lu_dev;
 887
 888         OBD_ALLOC_PTR(lod);
 889         if (lod == NULL) {
 890                 lu_dev = ERR_PTR(-ENOMEM);
 891         } else {
 892                 int rc;
 893
 894                 lu_dev = lod2lu_dev(lod);
 895                 dt_device_init(&lod->lod_dt_dev, type);
 896                 rc = lod_init0(env, lod, type, lcfg);
 897                 if (rc != 0) {
 898                         lod_device_free(env, lu_dev);
 899                         lu_dev = ERR_PTR(rc);
 900                 }
 901         }
 902
 903         return lu_dev;
 904 }
 905
 906 /**
 907  * Implementation of lu_device_type_operations::ldto_device_fini() for LOD
 908  *
 909  * Releases the internal resources used by LOD device.
 910  *
 911  * see include/lu_object.h for the details.
 912  */
 913 static struct lu_device *lod_device_fini(const struct lu_env *env,
 914                                          struct lu_device *d)
 915 {
 916         struct lod_device *lod = lu2lod_dev(d);
 917         int                rc;
 918         ENTRY;
 919
 920         lod_pools_fini(lod);
 921
 922         lod_procfs_fini(lod);
 923
 924         rc = lod_fini_tgt(env, lod, &lod->lod_ost_descs, true);
 925         if (rc)
 926                 CERROR("%s:can not fini ost descs %d\n",
 927                         lod2obd(lod)->obd_name, rc);
 928
 929         rc = lod_fini_tgt(env, lod, &lod->lod_mdt_descs, false);
 930         if (rc)
 931                 CERROR("%s:can not fini mdt descs %d\n",
 932                         lod2obd(lod)->obd_name, rc);
 933
 934         RETURN(NULL);
 935 }
 936
 937 /**
 938  * Implementation of obd_ops::o_connect() for LOD
 939  *
 940  * Used to track all the users of this specific LOD device,
 941  * so the device stays up until the last user disconnected.
 942  *
 943  * \param[in] env               LU environment provided by the caller
 944  * \param[out] exp              export the caller will be using to access LOD
 945  * \param[in] obd               OBD device representing LOD device
 946  * \param[in] cluuid            unique identifier of the caller
 947  * \param[in] data              not used
 948  * \param[in] localdata         not used
 949  *
 950  * \retval 0                    on success
 951  * \retval negative             negated errno on error
 952  **/
 953 static int lod_obd_connect(const struct lu_env *env, struct obd_export **exp,
 954                            struct obd_device *obd, struct obd_uuid *cluuid,
 955                            struct obd_connect_data *data, void *localdata)
 956 {
 957         struct lod_device    *lod = lu2lod_dev(obd->obd_lu_dev);
 958         struct lustre_handle  conn;
 959         int                   rc;
 960         ENTRY;
 961
 962         CDEBUG(D_CONFIG, "connect #%d\n", lod->lod_connects);
 963
 964         rc = class_connect(&conn, obd, cluuid);
 965         if (rc)
 966                 RETURN(rc);
 967
 968         *exp = class_conn2export(&conn);
 969
 970         spin_lock(&lod->lod_connects_lock);
 971         lod->lod_connects++;
 972         /* at the moment we expect the only user */
 973         LASSERT(lod->lod_connects == 1);
 974         spin_unlock(&lod->lod_connects_lock);
 975
 976         RETURN(0);
 977 }
 978
 979 /**
 980  *
 981  * Implementation of obd_ops::o_disconnect() for LOD
 982  *
 983  * When the caller doesn't need to use this LOD instance, it calls
 984  * obd_disconnect() and LOD releases corresponding export/reference count.
 985  * Once all the users gone, LOD device is released.
 986  *
 987  * \param[in] exp               export provided to the caller in obd_connect()
 988  *
 989  * \retval 0                    on success
 990  * \retval negative             negated errno on error
 991  **/
 992 static int lod_obd_disconnect(struct obd_export *exp)
 993 {
 994         struct obd_device *obd = exp->exp_obd;
 995         struct lod_device *lod = lu2lod_dev(obd->obd_lu_dev);
 996         int                rc, release = 0;
 997         ENTRY;
 998
 999         /* Only disconnect the underlying layers on the final disconnect. */
1000         spin_lock(&lod->lod_connects_lock);
1001         lod->lod_connects--;
1002         if (lod->lod_connects != 0) {
1003                 /* why should there be more than 1 connect? */
1004                 spin_unlock(&lod->lod_connects_lock);
1005                 CERROR("%s: disconnect #%d\n", exp->exp_obd->obd_name,
1006                        lod->lod_connects);
1007                 goto out;
1008         }
1009         spin_unlock(&lod->lod_connects_lock);
1010
1011         /* the last user of lod has gone, let's release the device */
1012         release = 1;
1013
1014 out:
1015         rc = class_disconnect(exp); /* bz 9811 */
1016
1017         if (rc == 0 && release)
1018                 class_manual_cleanup(obd);
1019         RETURN(rc);
1020 }
1021
1022 LU_KEY_INIT(lod, struct lod_thread_info);
1023
1024 static void lod_key_fini(const struct lu_context *ctx,
1025                 struct lu_context_key *key, void *data)
1026 {
1027         struct lod_thread_info *info = data;
1028         /* allocated in lod_get_lov_ea
1029          * XXX: this is overload, a tread may have such store but used only
1030          * once. Probably better would be pool of such stores per LOD.
1031          */
1032         if (info->lti_ea_store) {
1033                 OBD_FREE_LARGE(info->lti_ea_store, info->lti_ea_store_size);
1034                 info->lti_ea_store = NULL;
1035                 info->lti_ea_store_size = 0;
1036         }
1037         lu_buf_free(&info->lti_linkea_buf);
1038         OBD_FREE_PTR(info);
1039 }
1040
1041 /* context key: lod_thread_key */
1042 LU_CONTEXT_KEY_DEFINE(lod, LCT_MD_THREAD);
1043
1044 LU_TYPE_INIT_FINI(lod, &lod_thread_key);
1045
1046 static struct lu_device_type_operations lod_device_type_ops = {
1047         .ldto_init           = lod_type_init,
1048         .ldto_fini           = lod_type_fini,
1049
1050         .ldto_start          = lod_type_start,
1051         .ldto_stop           = lod_type_stop,
1052
1053         .ldto_device_alloc   = lod_device_alloc,
1054         .ldto_device_free    = lod_device_free,
1055
1056         .ldto_device_fini    = lod_device_fini
1057 };
1058
1059 static struct lu_device_type lod_device_type = {
1060         .ldt_tags     = LU_DEVICE_DT,
1061         .ldt_name     = LUSTRE_LOD_NAME,
1062         .ldt_ops      = &lod_device_type_ops,
1063         .ldt_ctx_tags = LCT_MD_THREAD,
1064 };
1065
1066 /**
1067  * Implementation of obd_ops::o_get_info() for LOD
1068  *
1069  * Currently, there is only one supported key: KEY_OSP_CONNECTED , to provide
1070  * the caller binary status whether LOD has seen connection to any OST target.
1071  *
1072  * \param[in] env               LU environment provided by the caller
1073  * \param[in] exp               export of the caller
1074  * \param[in] keylen            len of the key
1075  * \param[in] key               the key
1076  * \param[in] vallen            not used
1077  * \param[in] val               not used
1078  * \param[in] lsm               not used
1079  *
1080  * \retval                      0 if a connection was seen
1081  * \retval                      -EAGAIN if LOD isn't running yet or no
1082  *                              connection has been seen yet
1083  * \retval                      -EINVAL if not supported key is requested
1084  **/
1085 static int lod_obd_get_info(const struct lu_env *env, struct obd_export *exp,
1086                             __u32 keylen, void *key, __u32 *vallen, void *val,
1087                             struct lov_stripe_md *lsm)
1088 {
1089         int rc = -EINVAL;
1090
1091         if (KEY_IS(KEY_OSP_CONNECTED)) {
1092                 struct obd_device       *obd = exp->exp_obd;
1093                 struct lod_device       *d;
1094                 struct lod_ost_desc     *ost;
1095                 unsigned int            i;
1096                 int                     rc = 1;
1097
1098                 if (!obd->obd_set_up || obd->obd_stopping)
1099                         RETURN(-EAGAIN);
1100
1101                 d = lu2lod_dev(obd->obd_lu_dev);
1102                 lod_getref(&d->lod_ost_descs);
1103                 lod_foreach_ost(d, i) {
1104                         ost = OST_TGT(d, i);
1105                         LASSERT(ost && ost->ltd_ost);
1106
1107                         rc = obd_get_info(env, ost->ltd_exp, keylen, key,
1108                                           vallen, val, lsm);
1109                         /* one healthy device is enough */
1110                         if (rc == 0)
1111                                 break;
1112                 }
1113                 lod_putref(d, &d->lod_ost_descs);
1114                 RETURN(rc);
1115         }
1116
1117         RETURN(rc);
1118 }
1119
1120 static struct obd_ops lod_obd_device_ops = {
1121         .o_owner        = THIS_MODULE,
1122         .o_connect      = lod_obd_connect,
1123         .o_disconnect   = lod_obd_disconnect,
1124         .o_get_info     = lod_obd_get_info,
1125         .o_pool_new     = lod_pool_new,
1126         .o_pool_rem     = lod_pool_remove,
1127         .o_pool_add     = lod_pool_add,
1128         .o_pool_del     = lod_pool_del,
1129 };
1130
1131 static int __init lod_mod_init(void)
1132 {
1133         struct obd_type *type;
1134         int rc;
1135
1136         rc = lu_kmem_init(lod_caches);
1137         if (rc)
1138                 return rc;
1139
1140         rc = class_register_type(&lod_obd_device_ops, NULL, true, NULL,
1141                                  LUSTRE_LOD_NAME, &lod_device_type);
1142         if (rc) {
1143                 lu_kmem_fini(lod_caches);
1144                 return rc;
1145         }
1146
1147         /* create "lov" entry in procfs for compatibility purposes */
1148         type = class_search_type(LUSTRE_LOV_NAME);
1149         if (type != NULL && type->typ_procroot != NULL)
1150                 return rc;
1151
1152         type = class_search_type(LUSTRE_LOD_NAME);
1153         type->typ_procsym = lprocfs_register("lov", proc_lustre_root,
1154                                              NULL, NULL);
1155         if (IS_ERR(type->typ_procsym)) {
1156                 CERROR("lod: can't create compat entry \"lov\": %d\n",
1157                        (int)PTR_ERR(type->typ_procsym));
1158                 type->typ_procsym = NULL;
1159         }
1160         return rc;
1161 }
1162
1163 static void __exit lod_mod_exit(void)
1164 {
1165         class_unregister_type(LUSTRE_LOD_NAME);
1166         lu_kmem_fini(lod_caches);
1167 }
1168
1169 MODULE_AUTHOR("Whamcloud, Inc. <http://www.whamcloud.com/>");
1170 MODULE_DESCRIPTION("Lustre Logical Object Device ("LUSTRE_LOD_NAME")");
1171 MODULE_LICENSE("GPL");
1172
1173 module_init(lod_mod_init);
1174 module_exit(lod_mod_exit);
1175