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