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 *dev)
 537 {
 538         struct thandle *th;
 539
 540         th = dt_trans_create(env, dt2lod_dev(dev)->lod_child);
 541         if (IS_ERR(th))
 542                 return th;
 543
 544         return th;
 545 }
 546
 547 /**
 548  * Implementation of dt_device_operations::dt_trans_start() for LOD
 549  *
 550  * Starts the set of local transactions using the targets involved
 551  * in declare phase. Initial support for the distributed transactions.
 552  *
 553  * see include/dt_object.h for the details.
 554  */
 555 static int lod_trans_start(const struct lu_env *env, struct dt_device *dev,
 556                            struct thandle *th)
 557 {
 558         struct lod_device *lod = dt2lod_dev((struct dt_device *) dev);
 559         int rc = 0;
 560
 561         if (unlikely(th->th_update != NULL)) {
 562                 struct thandle_update *tu = th->th_update;
 563                 struct dt_update_request *update;
 564
 565                 list_for_each_entry(update, &tu->tu_remote_update_list,
 566                                     dur_list) {
 567                         LASSERT(update->dur_dt != NULL);
 568                         rc = dt_trans_start(env, update->dur_dt, th);
 569                         if (rc != 0)
 570                                 return rc;
 571                 }
 572         }
 573         return dt_trans_start(env, lod->lod_child, th);
 574 }
 575
 576 /**
 577  * Implementation of dt_device_operations::dt_trans_stop() for LOD
 578  *
 579  * Stops the set of local transactions using the targets involved
 580  * in declare phase. Initial support for the distributed transactions.
 581  *
 582  * see include/dt_object.h for the details.
 583  */
 584 static int lod_trans_stop(const struct lu_env *env, struct dt_device *dt,
 585                           struct thandle *th)
 586 {
 587         struct thandle_update           *tu = th->th_update;
 588         struct dt_update_request        *update;
 589         struct dt_update_request        *tmp;
 590         int                             rc2 = 0;
 591         int                             rc;
 592         ENTRY;
 593
 594         thandle_get(th);
 595         rc = dt_trans_stop(env, th->th_dev, th);
 596         if (likely(tu == NULL)) {
 597                 thandle_put(th);
 598                 RETURN(rc);
 599         }
 600
 601         list_for_each_entry_safe(update, tmp,
 602                                  &tu->tu_remote_update_list,
 603                                  dur_list) {
 604                 /* update will be freed inside dt_trans_stop */
 605                 rc2 = dt_trans_stop(env, update->dur_dt, th);
 606                 if (unlikely(rc2 != 0 && rc == 0))
 607                         rc = rc2;
 608         }
 609         thandle_put(th);
 610
 611         RETURN(rc);
 612 }
 613
 614 /**
 615  * Implementation of dt_device_operations::dt_conf_get() for LOD
 616  *
 617  * Currently returns the configuration provided by the local OSD.
 618  *
 619  * see include/dt_object.h for the details.
 620  */
 621 static void lod_conf_get(const struct lu_env *env,
 622                          const struct dt_device *dev,
 623                          struct dt_device_param *param)
 624 {
 625         dt_conf_get(env, dt2lod_dev((struct dt_device *)dev)->lod_child, param);
 626 }
 627
 628 /**
 629  * Implementation of dt_device_operations::dt_sync() for LOD
 630  *
 631  * Syncs all known OST targets. Very very expensive and used
 632  * rarely by LFSCK now. Should not be used in general.
 633  *
 634  * see include/dt_object.h for the details.
 635  */
 636 static int lod_sync(const struct lu_env *env, struct dt_device *dev)
 637 {
 638         struct lod_device   *lod = dt2lod_dev(dev);
 639         struct lod_ost_desc *ost;
 640         unsigned int         i;
 641         int                  rc = 0;
 642         ENTRY;
 643
 644         lod_getref(&lod->lod_ost_descs);
 645         lod_foreach_ost(lod, i) {
 646                 ost = OST_TGT(lod, i);
 647                 LASSERT(ost && ost->ltd_ost);
 648                 rc = dt_sync(env, ost->ltd_ost);
 649                 if (rc) {
 650                         CERROR("%s: can't sync %u: %d\n",
 651                                lod2obd(lod)->obd_name, i, rc);
 652                         break;
 653                 }
 654         }
 655         lod_putref(lod, &lod->lod_ost_descs);
 656         if (rc == 0)
 657                 rc = dt_sync(env, lod->lod_child);
 658
 659         RETURN(rc);
 660 }
 661
 662 /**
 663  * Implementation of dt_device_operations::dt_ro() for LOD
 664  *
 665  * Turns local OSD read-only, used for the testing only.
 666  *
 667  * see include/dt_object.h for the details.
 668  */
 669 static int lod_ro(const struct lu_env *env, struct dt_device *dev)
 670 {
 671         return dt_ro(env, dt2lod_dev(dev)->lod_child);
 672 }
 673
 674 /**
 675  * Implementation of dt_device_operations::dt_commit_async() for LOD
 676  *
 677  * Asks local OSD to commit sooner.
 678  *
 679  * see include/dt_object.h for the details.
 680  */
 681 static int lod_commit_async(const struct lu_env *env, struct dt_device *dev)
 682 {
 683         return dt_commit_async(env, dt2lod_dev(dev)->lod_child);
 684 }
 685
 686 /**
 687  * Not used
 688  */
 689 static int lod_init_capa_ctxt(const struct lu_env *env, struct dt_device *dev,
 690                               int mode, unsigned long timeout,
 691                               __u32 alg, struct lustre_capa_key *keys)
 692 {
 693         struct dt_device *next = dt2lod_dev(dev)->lod_child;
 694         return dt_init_capa_ctxt(env, next, mode, timeout, alg, keys);
 695 }
 696
 697 static const struct dt_device_operations lod_dt_ops = {
 698         .dt_root_get         = lod_root_get,
 699         .dt_statfs           = lod_statfs,
 700         .dt_trans_create     = lod_trans_create,
 701         .dt_trans_start      = lod_trans_start,
 702         .dt_trans_stop       = lod_trans_stop,
 703         .dt_conf_get         = lod_conf_get,
 704         .dt_sync             = lod_sync,
 705         .dt_ro               = lod_ro,
 706         .dt_commit_async     = lod_commit_async,
 707         .dt_init_capa_ctxt   = lod_init_capa_ctxt,
 708 };
 709
 710 /**
 711  * Connect to a local OSD.
 712  *
 713  * Used to connect to the local OSD at mount. OSD name is taken from the
 714  * configuration command passed. This connection is used to identify LU
 715  * site and pin the OSD from early removal.
 716  *
 717  * \param[in] env               LU environment provided by the caller
 718  * \param[in] lod               lod device
 719  * \param[in] cfg               configuration command to apply
 720  *
 721  * \retval 0                    on success
 722  * \retval negative             negated errno on error
 723  **/
 724 static int lod_connect_to_osd(const struct lu_env *env, struct lod_device *lod,
 725                               struct lustre_cfg *cfg)
 726 {
 727         struct obd_connect_data *data = NULL;
 728         struct obd_device       *obd;
 729         char                    *nextdev = NULL, *p, *s;
 730         int                      rc, len = 0;
 731         ENTRY;
 732
 733         LASSERT(cfg);
 734         LASSERT(lod->lod_child_exp == NULL);
 735
 736         /* compatibility hack: we still use old config logs
 737          * which specify LOV, but we need to learn underlying
 738          * OSD device, which is supposed to be:
 739          *  <fsname>-MDTxxxx-osd
 740          *
 741          * 2.x MGS generates lines like the following:
 742          *   #03 (176)lov_setup 0:lustre-MDT0000-mdtlov  1:(struct lov_desc)
 743          * 1.8 MGS generates lines like the following:
 744          *   #03 (168)lov_setup 0:lustre-mdtlov  1:(struct lov_desc)
 745          *
 746          * we use "-MDT" to differentiate 2.x from 1.8 */
 747
 748         if ((p = lustre_cfg_string(cfg, 0)) && strstr(p, "-mdtlov")) {
 749                 len = strlen(p) + 1;
 750                 OBD_ALLOC(nextdev, len);
 751                 if (nextdev == NULL)
 752                         GOTO(out, rc = -ENOMEM);
 753
 754                 strcpy(nextdev, p);
 755                 s = strstr(nextdev, "-mdtlov");
 756                 if (unlikely(s == NULL)) {
 757                         CERROR("unable to parse device name %s\n",
 758                                lustre_cfg_string(cfg, 0));
 759                         GOTO(out, rc = -EINVAL);
 760                 }
 761
 762                 if (strstr(nextdev, "-MDT")) {
 763                         /* 2.x config */
 764                         strcpy(s, "-osd");
 765                 } else {
 766                         /* 1.8 config */
 767                         strcpy(s, "-MDT0000-osd");
 768                 }
 769         } else {
 770                 CERROR("unable to parse device name %s\n",
 771                        lustre_cfg_string(cfg, 0));
 772                 GOTO(out, rc = -EINVAL);
 773         }
 774
 775         OBD_ALLOC_PTR(data);
 776         if (data == NULL)
 777                 GOTO(out, rc = -ENOMEM);
 778
 779         obd = class_name2obd(nextdev);
 780         if (obd == NULL) {
 781                 CERROR("can not locate next device: %s\n", nextdev);
 782                 GOTO(out, rc = -ENOTCONN);
 783         }
 784
 785         data->ocd_connect_flags = OBD_CONNECT_VERSION;
 786         data->ocd_version = LUSTRE_VERSION_CODE;
 787
 788         rc = obd_connect(env, &lod->lod_child_exp, obd, &obd->obd_uuid,
 789                          data, NULL);
 790         if (rc) {
 791                 CERROR("cannot connect to next dev %s (%d)\n", nextdev, rc);
 792                 GOTO(out, rc);
 793         }
 794
 795         lod->lod_dt_dev.dd_lu_dev.ld_site =
 796                 lod->lod_child_exp->exp_obd->obd_lu_dev->ld_site;
 797         LASSERT(lod->lod_dt_dev.dd_lu_dev.ld_site);
 798         lod->lod_child = lu2dt_dev(lod->lod_child_exp->exp_obd->obd_lu_dev);
 799
 800 out:
 801         if (data)
 802                 OBD_FREE_PTR(data);
 803         if (nextdev)
 804                 OBD_FREE(nextdev, len);
 805         RETURN(rc);
 806 }
 807
 808 /**
 809  * Allocate and initialize target table.
 810  *
 811  * A helper function to initialize the target table and allocate
 812  * a bitmap of the available targets.
 813  *
 814  * \param[in] ltd               target's table to initialize
 815  *
 816  * \retval 0                    on success
 817  * \retval negative             negated errno on error
 818  **/
 819 static int lod_tgt_desc_init(struct lod_tgt_descs *ltd)
 820 {
 821         mutex_init(&ltd->ltd_mutex);
 822         init_rwsem(&ltd->ltd_rw_sem);
 823
 824         /* the OST array and bitmap are allocated/grown dynamically as OSTs are
 825          * added to the LOD, see lod_add_device() */
 826         ltd->ltd_tgt_bitmap = CFS_ALLOCATE_BITMAP(32);
 827         if (ltd->ltd_tgt_bitmap == NULL)
 828                 RETURN(-ENOMEM);
 829
 830         ltd->ltd_tgts_size  = 32;
 831         ltd->ltd_tgtnr      = 0;
 832
 833         ltd->ltd_death_row = 0;
 834         ltd->ltd_refcount  = 0;
 835         return 0;
 836 }
 837
 838 /**
 839  * Initialize LOD device at setup.
 840  *
 841  * Initializes the given LOD device using the original configuration command.
 842  * The function initiates a connection to the local OSD and initializes few
 843  * internal structures like pools, target tables, etc.
 844  *
 845  * \param[in] env               LU environment provided by the caller
 846  * \param[in] lod               lod device
 847  * \param[in] ldt               not used
 848  * \param[in] cfg               configuration command
 849  *
 850  * \retval 0                    on success
 851  * \retval negative             negated errno on error
 852  **/
 853 static int lod_init0(const struct lu_env *env, struct lod_device *lod,
 854                      struct lu_device_type *ldt, struct lustre_cfg *cfg)
 855 {
 856         struct dt_device_param ddp;
 857         struct obd_device     *obd;
 858         int                    rc;
 859         ENTRY;
 860
 861         obd = class_name2obd(lustre_cfg_string(cfg, 0));
 862         if (obd == NULL) {
 863                 CERROR("Cannot find obd with name %s\n",
 864                        lustre_cfg_string(cfg, 0));
 865                 RETURN(-ENODEV);
 866         }
 867
 868         obd->obd_lu_dev = &lod->lod_dt_dev.dd_lu_dev;
 869         lod->lod_dt_dev.dd_lu_dev.ld_obd = obd;
 870         lod->lod_dt_dev.dd_lu_dev.ld_ops = &lod_lu_ops;
 871         lod->lod_dt_dev.dd_ops = &lod_dt_ops;
 872
 873         rc = lod_connect_to_osd(env, lod, cfg);
 874         if (rc)
 875                 RETURN(rc);
 876
 877         dt_conf_get(env, &lod->lod_dt_dev, &ddp);
 878         lod->lod_osd_max_easize = ddp.ddp_max_ea_size;
 879
 880         /* setup obd to be used with old lov code */
 881         rc = lod_pools_init(lod, cfg);
 882         if (rc)
 883                 GOTO(out_disconnect, rc);
 884
 885         rc = lod_procfs_init(lod);
 886         if (rc)
 887                 GOTO(out_pools, rc);
 888
 889         spin_lock_init(&lod->lod_desc_lock);
 890         spin_lock_init(&lod->lod_connects_lock);
 891         lod_tgt_desc_init(&lod->lod_mdt_descs);
 892         lod_tgt_desc_init(&lod->lod_ost_descs);
 893
 894         RETURN(0);
 895
 896 out_pools:
 897         lod_pools_fini(lod);
 898 out_disconnect:
 899         obd_disconnect(lod->lod_child_exp);
 900         RETURN(rc);
 901 }
 902
 903 /**
 904  * Implementation of lu_device_type_operations::ldto_device_free() for LOD
 905  *
 906  * Releases the memory allocated for LOD device.
 907  *
 908  * see include/lu_object.h for the details.
 909  */
 910 static struct lu_device *lod_device_free(const struct lu_env *env,
 911                                          struct lu_device *lu)
 912 {
 913         struct lod_device *lod = lu2lod_dev(lu);
 914         struct lu_device  *next = &lod->lod_child->dd_lu_dev;
 915         ENTRY;
 916
 917         LASSERT(atomic_read(&lu->ld_ref) == 0);
 918         dt_device_fini(&lod->lod_dt_dev);
 919         OBD_FREE_PTR(lod);
 920         RETURN(next);
 921 }
 922
 923 /**
 924  * Implementation of lu_device_type_operations::ldto_device_alloc() for LOD
 925  *
 926  * Allocates LOD device and calls the helpers to initialize it.
 927  *
 928  * see include/lu_object.h for the details.
 929  */
 930 static struct lu_device *lod_device_alloc(const struct lu_env *env,
 931                                           struct lu_device_type *type,
 932                                           struct lustre_cfg *lcfg)
 933 {
 934         struct lod_device *lod;
 935         struct lu_device  *lu_dev;
 936
 937         OBD_ALLOC_PTR(lod);
 938         if (lod == NULL) {
 939                 lu_dev = ERR_PTR(-ENOMEM);
 940         } else {
 941                 int rc;
 942
 943                 lu_dev = lod2lu_dev(lod);
 944                 dt_device_init(&lod->lod_dt_dev, type);
 945                 rc = lod_init0(env, lod, type, lcfg);
 946                 if (rc != 0) {
 947                         lod_device_free(env, lu_dev);
 948                         lu_dev = ERR_PTR(rc);
 949                 }
 950         }
 951
 952         return lu_dev;
 953 }
 954
 955 /**
 956  * Implementation of lu_device_type_operations::ldto_device_fini() for LOD
 957  *
 958  * Releases the internal resources used by LOD device.
 959  *
 960  * see include/lu_object.h for the details.
 961  */
 962 static struct lu_device *lod_device_fini(const struct lu_env *env,
 963                                          struct lu_device *d)
 964 {
 965         struct lod_device *lod = lu2lod_dev(d);
 966         int                rc;
 967         ENTRY;
 968
 969         lod_pools_fini(lod);
 970
 971         lod_procfs_fini(lod);
 972
 973         rc = lod_fini_tgt(env, lod, &lod->lod_ost_descs, true);
 974         if (rc)
 975                 CERROR("%s:can not fini ost descs %d\n",
 976                         lod2obd(lod)->obd_name, rc);
 977
 978         rc = lod_fini_tgt(env, lod, &lod->lod_mdt_descs, false);
 979         if (rc)
 980                 CERROR("%s:can not fini mdt descs %d\n",
 981                         lod2obd(lod)->obd_name, rc);
 982
 983         RETURN(NULL);
 984 }
 985
 986 /**
 987  * Implementation of obd_ops::o_connect() for LOD
 988  *
 989  * Used to track all the users of this specific LOD device,
 990  * so the device stays up until the last user disconnected.
 991  *
 992  * \param[in] env               LU environment provided by the caller
 993  * \param[out] exp              export the caller will be using to access LOD
 994  * \param[in] obd               OBD device representing LOD device
 995  * \param[in] cluuid            unique identifier of the caller
 996  * \param[in] data              not used
 997  * \param[in] localdata         not used
 998  *
 999  * \retval 0                    on success
1000  * \retval negative             negated errno on error
1001  **/
1002 static int lod_obd_connect(const struct lu_env *env, struct obd_export **exp,
1003                            struct obd_device *obd, struct obd_uuid *cluuid,
1004                            struct obd_connect_data *data, void *localdata)
1005 {
1006         struct lod_device    *lod = lu2lod_dev(obd->obd_lu_dev);
1007         struct lustre_handle  conn;
1008         int                   rc;
1009         ENTRY;
1010
1011         CDEBUG(D_CONFIG, "connect #%d\n", lod->lod_connects);
1012
1013         rc = class_connect(&conn, obd, cluuid);
1014         if (rc)
1015                 RETURN(rc);
1016
1017         *exp = class_conn2export(&conn);
1018
1019         spin_lock(&lod->lod_connects_lock);
1020         lod->lod_connects++;
1021         /* at the moment we expect the only user */
1022         LASSERT(lod->lod_connects == 1);
1023         spin_unlock(&lod->lod_connects_lock);
1024
1025         RETURN(0);
1026 }
1027
1028 /**
1029  *
1030  * Implementation of obd_ops::o_disconnect() for LOD
1031  *
1032  * When the caller doesn't need to use this LOD instance, it calls
1033  * obd_disconnect() and LOD releases corresponding export/reference count.
1034  * Once all the users gone, LOD device is released.
1035  *
1036  * \param[in] exp               export provided to the caller in obd_connect()
1037  *
1038  * \retval 0                    on success
1039  * \retval negative             negated errno on error
1040  **/
1041 static int lod_obd_disconnect(struct obd_export *exp)
1042 {
1043         struct obd_device *obd = exp->exp_obd;
1044         struct lod_device *lod = lu2lod_dev(obd->obd_lu_dev);
1045         int                rc, release = 0;
1046         ENTRY;
1047
1048         /* Only disconnect the underlying layers on the final disconnect. */
1049         spin_lock(&lod->lod_connects_lock);
1050         lod->lod_connects--;
1051         if (lod->lod_connects != 0) {
1052                 /* why should there be more than 1 connect? */
1053                 spin_unlock(&lod->lod_connects_lock);
1054                 CERROR("%s: disconnect #%d\n", exp->exp_obd->obd_name,
1055                        lod->lod_connects);
1056                 goto out;
1057         }
1058         spin_unlock(&lod->lod_connects_lock);
1059
1060         /* the last user of lod has gone, let's release the device */
1061         release = 1;
1062
1063 out:
1064         rc = class_disconnect(exp); /* bz 9811 */
1065
1066         if (rc == 0 && release)
1067                 class_manual_cleanup(obd);
1068         RETURN(rc);
1069 }
1070
1071 LU_KEY_INIT(lod, struct lod_thread_info);
1072
1073 static void lod_key_fini(const struct lu_context *ctx,
1074                 struct lu_context_key *key, void *data)
1075 {
1076         struct lod_thread_info *info = data;
1077         /* allocated in lod_get_lov_ea
1078          * XXX: this is overload, a tread may have such store but used only
1079          * once. Probably better would be pool of such stores per LOD.
1080          */
1081         if (info->lti_ea_store) {
1082                 OBD_FREE_LARGE(info->lti_ea_store, info->lti_ea_store_size);
1083                 info->lti_ea_store = NULL;
1084                 info->lti_ea_store_size = 0;
1085         }
1086         lu_buf_free(&info->lti_linkea_buf);
1087         OBD_FREE_PTR(info);
1088 }
1089
1090 /* context key: lod_thread_key */
1091 LU_CONTEXT_KEY_DEFINE(lod, LCT_MD_THREAD);
1092
1093 LU_TYPE_INIT_FINI(lod, &lod_thread_key);
1094
1095 static struct lu_device_type_operations lod_device_type_ops = {
1096         .ldto_init           = lod_type_init,
1097         .ldto_fini           = lod_type_fini,
1098
1099         .ldto_start          = lod_type_start,
1100         .ldto_stop           = lod_type_stop,
1101
1102         .ldto_device_alloc   = lod_device_alloc,
1103         .ldto_device_free    = lod_device_free,
1104
1105         .ldto_device_fini    = lod_device_fini
1106 };
1107
1108 static struct lu_device_type lod_device_type = {
1109         .ldt_tags     = LU_DEVICE_DT,
1110         .ldt_name     = LUSTRE_LOD_NAME,
1111         .ldt_ops      = &lod_device_type_ops,
1112         .ldt_ctx_tags = LCT_MD_THREAD,
1113 };
1114
1115 /**
1116  * Implementation of obd_ops::o_get_info() for LOD
1117  *
1118  * Currently, there is only one supported key: KEY_OSP_CONNECTED , to provide
1119  * the caller binary status whether LOD has seen connection to any OST target.
1120  *
1121  * \param[in] env               LU environment provided by the caller
1122  * \param[in] exp               export of the caller
1123  * \param[in] keylen            len of the key
1124  * \param[in] key               the key
1125  * \param[in] vallen            not used
1126  * \param[in] val               not used
1127  * \param[in] lsm               not used
1128  *
1129  * \retval                      0 if a connection was seen
1130  * \retval                      -EAGAIN if LOD isn't running yet or no
1131  *                              connection has been seen yet
1132  * \retval                      -EINVAL if not supported key is requested
1133  **/
1134 static int lod_obd_get_info(const struct lu_env *env, struct obd_export *exp,
1135                             __u32 keylen, void *key, __u32 *vallen, void *val,
1136                             struct lov_stripe_md *lsm)
1137 {
1138         int rc = -EINVAL;
1139
1140         if (KEY_IS(KEY_OSP_CONNECTED)) {
1141                 struct obd_device       *obd = exp->exp_obd;
1142                 struct lod_device       *d;
1143                 struct lod_ost_desc     *ost;
1144                 unsigned int            i;
1145                 int                     rc = 1;
1146
1147                 if (!obd->obd_set_up || obd->obd_stopping)
1148                         RETURN(-EAGAIN);
1149
1150                 d = lu2lod_dev(obd->obd_lu_dev);
1151                 lod_getref(&d->lod_ost_descs);
1152                 lod_foreach_ost(d, i) {
1153                         ost = OST_TGT(d, i);
1154                         LASSERT(ost && ost->ltd_ost);
1155
1156                         rc = obd_get_info(env, ost->ltd_exp, keylen, key,
1157                                           vallen, val, lsm);
1158                         /* one healthy device is enough */
1159                         if (rc == 0)
1160                                 break;
1161                 }
1162                 lod_putref(d, &d->lod_ost_descs);
1163                 RETURN(rc);
1164         }
1165
1166         RETURN(rc);
1167 }
1168
1169 static struct obd_ops lod_obd_device_ops = {
1170         .o_owner        = THIS_MODULE,
1171         .o_connect      = lod_obd_connect,
1172         .o_disconnect   = lod_obd_disconnect,
1173         .o_get_info     = lod_obd_get_info,
1174         .o_pool_new     = lod_pool_new,
1175         .o_pool_rem     = lod_pool_remove,
1176         .o_pool_add     = lod_pool_add,
1177         .o_pool_del     = lod_pool_del,
1178 };
1179
1180 static int __init lod_mod_init(void)
1181 {
1182         struct obd_type *type;
1183         int rc;
1184
1185         rc = lu_kmem_init(lod_caches);
1186         if (rc)
1187                 return rc;
1188
1189         rc = class_register_type(&lod_obd_device_ops, NULL, true, NULL,
1190                                  LUSTRE_LOD_NAME, &lod_device_type);
1191         if (rc) {
1192                 lu_kmem_fini(lod_caches);
1193                 return rc;
1194         }
1195
1196         /* create "lov" entry in procfs for compatibility purposes */
1197         type = class_search_type(LUSTRE_LOV_NAME);
1198         if (type != NULL && type->typ_procroot != NULL)
1199                 return rc;
1200
1201         type = class_search_type(LUSTRE_LOD_NAME);
1202         type->typ_procsym = lprocfs_register("lov", proc_lustre_root,
1203                                              NULL, NULL);
1204         if (IS_ERR(type->typ_procsym)) {
1205                 CERROR("lod: can't create compat entry \"lov\": %d\n",
1206                        (int)PTR_ERR(type->typ_procsym));
1207                 type->typ_procsym = NULL;
1208         }
1209         return rc;
1210 }
1211
1212 static void __exit lod_mod_exit(void)
1213 {
1214         class_unregister_type(LUSTRE_LOD_NAME);
1215         lu_kmem_fini(lod_caches);
1216 }
1217
1218 MODULE_AUTHOR("Whamcloud, Inc. <http://www.whamcloud.com/>");
1219 MODULE_DESCRIPTION("Lustre Logical Object Device ("LUSTRE_LOD_NAME")");
1220 MODULE_LICENSE("GPL");
1221
1222 module_init(lod_mod_init);
1223 module_exit(lod_mod_exit);
1224