lustre/lov/lov_obd.c

   1 /*
   2  * GPL HEADER START
   3  *
   4  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   5  *
   6  * This program is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License version 2 only,
   8  * as published by the Free Software Foundation.
   9  *
  10  * This program is distributed in the hope that it will be useful, but
  11  * WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13  * General Public License version 2 for more details (a copy is included
  14  * in the LICENSE file that accompanied this code).
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * version 2 along with this program; If not, see
  18  * http://www.sun.com/software/products/lustre/docs/GPLv2.pdf
  19  *
  20  * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
  21  * CA 95054 USA or visit www.sun.com if you need additional information or
  22  * have any questions.
  23  *
  24  * GPL HEADER END
  25  */
  26 /*
  27  * Copyright (c) 2002, 2010, Oracle and/or its affiliates. All rights reserved.
  28  * Use is subject to license terms.
  29  *
  30  * Copyright (c) 2011, 2014, Intel Corporation.
  31  */
  32 /*
  33  * This file is part of Lustre, http://www.lustre.org/
  34  * Lustre is a trademark of Sun Microsystems, Inc.
  35  *
  36  * lustre/lov/lov_obd.c
  37  *
  38  * Author: Phil Schwan <phil@clusterfs.com>
  39  * Author: Peter Braam <braam@clusterfs.com>
  40  * Author: Mike Shaver <shaver@clusterfs.com>
  41  * Author: Nathan Rutman <nathan@clusterfs.com>
  42  */
  43
  44 #define DEBUG_SUBSYSTEM S_LOV
  45 #include <libcfs/libcfs.h>
  46
  47 #include <obd_support.h>
  48 #include <lustre_ioctl.h>
  49 #include <lustre_lib.h>
  50 #include <lustre_net.h>
  51 #include <lustre/lustre_idl.h>
  52 #include <lustre_dlm.h>
  53 #include <lustre_mds.h>
  54 #include <obd_class.h>
  55 #include <lprocfs_status.h>
  56 #include <lustre_param.h>
  57 #include <cl_object.h>
  58 #include <lustre/ll_fiemap.h>
  59 #include <lustre_fid.h>
  60
  61 #include "lov_internal.h"
  62
  63 /* Keep a refcount of lov->tgt usage to prevent racing with addition/deletion.
  64    Any function that expects lov_tgts to remain stationary must take a ref. */
  65 static void lov_getref(struct obd_device *obd)
  66 {
  67         struct lov_obd *lov = &obd->u.lov;
  68
  69         /* nobody gets through here until lov_putref is done */
  70         mutex_lock(&lov->lov_lock);
  71         atomic_inc(&lov->lov_refcount);
  72         mutex_unlock(&lov->lov_lock);
  73         return;
  74 }
  75
  76 static void __lov_del_obd(struct obd_device *obd, struct lov_tgt_desc *tgt);
  77
  78 static void lov_putref(struct obd_device *obd)
  79 {
  80         struct lov_obd *lov = &obd->u.lov;
  81
  82         mutex_lock(&lov->lov_lock);
  83         /* ok to dec to 0 more than once -- ltd_exp's will be null */
  84         if (atomic_dec_and_test(&lov->lov_refcount) && lov->lov_death_row) {
  85                 struct list_head kill = LIST_HEAD_INIT(kill);
  86                 struct lov_tgt_desc *tgt, *n;
  87                 int i;
  88
  89                 CDEBUG(D_CONFIG, "destroying %d lov targets\n",
  90                        lov->lov_death_row);
  91                 for (i = 0; i < lov->desc.ld_tgt_count; i++) {
  92                         tgt = lov->lov_tgts[i];
  93
  94                         if (!tgt || !tgt->ltd_reap)
  95                                 continue;
  96                         list_add(&tgt->ltd_kill, &kill);
  97                         /* XXX - right now there is a dependency on ld_tgt_count
  98                          * being the maximum tgt index for computing the
  99                          * mds_max_easize. So we can't shrink it. */
 100                         lov_ost_pool_remove(&lov->lov_packed, i);
 101                         lov->lov_tgts[i] = NULL;
 102                         lov->lov_death_row--;
 103                 }
 104                 mutex_unlock(&lov->lov_lock);
 105
 106                 list_for_each_entry_safe(tgt, n, &kill, ltd_kill) {
 107                         list_del(&tgt->ltd_kill);
 108                         /* Disconnect */
 109                         __lov_del_obd(obd, tgt);
 110                 }
 111         } else {
 112                 mutex_unlock(&lov->lov_lock);
 113         }
 114 }
 115
 116 static int lov_set_osc_active(struct obd_device *obd, struct obd_uuid *uuid,
 117                               enum obd_notify_event ev);
 118 static int lov_notify(struct obd_device *obd, struct obd_device *watched,
 119                       enum obd_notify_event ev, void *data);
 120
 121 int lov_connect_obd(struct obd_device *obd, __u32 index, int activate,
 122                     struct obd_connect_data *data)
 123 {
 124         struct lov_obd *lov = &obd->u.lov;
 125         struct obd_uuid *tgt_uuid;
 126         struct obd_device *tgt_obd;
 127         static struct obd_uuid lov_osc_uuid = { "LOV_OSC_UUID" };
 128         struct obd_import *imp;
 129         int rc;
 130         ENTRY;
 131
 132         if (lov->lov_tgts[index] == NULL)
 133                 RETURN(-EINVAL);
 134
 135         tgt_uuid = &lov->lov_tgts[index]->ltd_uuid;
 136         tgt_obd = lov->lov_tgts[index]->ltd_obd;
 137
 138         if (!tgt_obd->obd_set_up) {
 139                 CERROR("Target %s not set up\n", obd_uuid2str(tgt_uuid));
 140                 RETURN(-EINVAL);
 141         }
 142
 143         /* override the sp_me from lov */
 144         tgt_obd->u.cli.cl_sp_me = lov->lov_sp_me;
 145
 146         if (data && (data->ocd_connect_flags & OBD_CONNECT_INDEX))
 147                 data->ocd_index = index;
 148
 149         /*
 150          * Divine LOV knows that OBDs under it are OSCs.
 151          */
 152         imp = tgt_obd->u.cli.cl_import;
 153
 154         if (activate) {
 155                 tgt_obd->obd_no_recov = 0;
 156                 /* FIXME this is probably supposed to be
 157                    ptlrpc_set_import_active.  Horrible naming. */
 158                 ptlrpc_activate_import(imp);
 159         }
 160
 161         rc = obd_register_observer(tgt_obd, obd);
 162         if (rc) {
 163                 CERROR("Target %s register_observer error %d\n",
 164                        obd_uuid2str(tgt_uuid), rc);
 165                 RETURN(rc);
 166         }
 167
 168
 169         if (imp->imp_invalid) {
 170                 CDEBUG(D_CONFIG, "not connecting OSC %s; administratively "
 171                        "disabled\n", obd_uuid2str(tgt_uuid));
 172                 RETURN(0);
 173         }
 174
 175         rc = obd_connect(NULL, &lov->lov_tgts[index]->ltd_exp, tgt_obd,
 176                          &lov_osc_uuid, data, NULL);
 177         if (rc || !lov->lov_tgts[index]->ltd_exp) {
 178                 CERROR("Target %s connect error %d\n",
 179                        obd_uuid2str(tgt_uuid), rc);
 180                 RETURN(-ENODEV);
 181         }
 182
 183         lov->lov_tgts[index]->ltd_reap = 0;
 184
 185         CDEBUG(D_CONFIG, "Connected tgt idx %d %s (%s) %sactive\n", index,
 186                obd_uuid2str(tgt_uuid), tgt_obd->obd_name, activate ? "":"in");
 187
 188         if (lov->targets_proc_entry != NULL) {
 189                 struct proc_dir_entry *osc_symlink;
 190                 struct obd_device *osc_obd;
 191
 192                 osc_obd = lov->lov_tgts[index]->ltd_exp->exp_obd;
 193
 194                 LASSERT(osc_obd != NULL);
 195                 LASSERT(osc_obd->obd_magic == OBD_DEVICE_MAGIC);
 196                 LASSERT(osc_obd->obd_type->typ_name != NULL);
 197
 198                 osc_symlink = lprocfs_add_symlink(osc_obd->obd_name,
 199                                                   lov->targets_proc_entry,
 200                                                   "../../../%s/%s",
 201                                                   osc_obd->obd_type->typ_name,
 202                                                   osc_obd->obd_name);
 203                 if (osc_symlink == NULL) {
 204                         CERROR("cannot register LOV target "
 205                                "/proc/fs/lustre/%s/%s/target_obds/%s\n",
 206                                obd->obd_type->typ_name, obd->obd_name,
 207                                osc_obd->obd_name);
 208                 }
 209         }
 210         RETURN(0);
 211 }
 212
 213 static int lov_connect(const struct lu_env *env,
 214                        struct obd_export **exp, struct obd_device *obd,
 215                        struct obd_uuid *cluuid, struct obd_connect_data *data,
 216                        void *localdata)
 217 {
 218         struct lov_obd *lov = &obd->u.lov;
 219         struct lov_tgt_desc *tgt;
 220         struct lustre_handle conn;
 221         int i, rc;
 222         ENTRY;
 223
 224         CDEBUG(D_CONFIG, "connect #%d\n", lov->lov_connects);
 225
 226         rc = class_connect(&conn, obd, cluuid);
 227         if (rc)
 228                 RETURN(rc);
 229
 230         *exp = class_conn2export(&conn);
 231
 232         /* Why should there ever be more than 1 connect? */
 233         lov->lov_connects++;
 234         LASSERT(lov->lov_connects == 1);
 235
 236         memset(&lov->lov_ocd, 0, sizeof(lov->lov_ocd));
 237         if (data)
 238                 lov->lov_ocd = *data;
 239
 240         lov->targets_proc_entry = lprocfs_seq_register("target_obds",
 241                                                        obd->obd_proc_entry,
 242                                                        NULL, NULL);
 243         if (IS_ERR(lov->targets_proc_entry)) {
 244                 CERROR("%s: cannot register "
 245                        "/proc/fs/lustre/%s/%s/target_obds\n",
 246                        obd->obd_name, obd->obd_type->typ_name, obd->obd_name);
 247                 lov->targets_proc_entry = NULL;
 248         }
 249
 250         obd_getref(obd);
 251         for (i = 0; i < lov->desc.ld_tgt_count; i++) {
 252                 tgt = lov->lov_tgts[i];
 253                 if (!tgt || obd_uuid_empty(&tgt->ltd_uuid))
 254                         continue;
 255                 /* Flags will be lowest common denominator */
 256                 rc = lov_connect_obd(obd, i, tgt->ltd_activate, &lov->lov_ocd);
 257                 if (rc) {
 258                         CERROR("%s: lov connect tgt %d failed: %d\n",
 259                                obd->obd_name, i, rc);
 260                         continue;
 261                 }
 262                 /* connect to administrative disabled ost */
 263                 if (!lov->lov_tgts[i]->ltd_exp)
 264                         continue;
 265
 266                 rc = lov_notify(obd, lov->lov_tgts[i]->ltd_exp->exp_obd,
 267                                 OBD_NOTIFY_CONNECT, (void *)&i);
 268                 if (rc) {
 269                         CERROR("%s error sending notify %d\n",
 270                                obd->obd_name, rc);
 271                 }
 272         }
 273         obd_putref(obd);
 274
 275         RETURN(0);
 276 }
 277
 278 static int lov_disconnect_obd(struct obd_device *obd, struct lov_tgt_desc *tgt)
 279 {
 280         struct lov_obd *lov = &obd->u.lov;
 281         struct obd_device *osc_obd;
 282         int rc;
 283         ENTRY;
 284
 285         osc_obd = class_exp2obd(tgt->ltd_exp);
 286         CDEBUG(D_CONFIG, "%s: disconnecting target %s\n",
 287                obd->obd_name, osc_obd->obd_name);
 288
 289         if (tgt->ltd_active) {
 290                 tgt->ltd_active = 0;
 291                 lov->desc.ld_active_tgt_count--;
 292                 tgt->ltd_exp->exp_obd->obd_inactive = 1;
 293         }
 294
 295         if (osc_obd) {
 296                 /* Pass it on to our clients.
 297                  * XXX This should be an argument to disconnect,
 298                  * XXX not a back-door flag on the OBD.  Ah well.
 299                  */
 300                 osc_obd->obd_force = obd->obd_force;
 301                 osc_obd->obd_fail = obd->obd_fail;
 302                 osc_obd->obd_no_recov = obd->obd_no_recov;
 303
 304                 if (lov->targets_proc_entry != NULL)
 305                         lprocfs_remove_proc_entry(osc_obd->obd_name,
 306                                                   lov->targets_proc_entry);
 307         }
 308
 309         obd_register_observer(osc_obd, NULL);
 310
 311         rc = obd_disconnect(tgt->ltd_exp);
 312         if (rc) {
 313                 CERROR("Target %s disconnect error %d\n",
 314                        tgt->ltd_uuid.uuid, rc);
 315                 rc = 0;
 316         }
 317
 318         tgt->ltd_exp = NULL;
 319         RETURN(0);
 320 }
 321
 322 static int lov_disconnect(struct obd_export *exp)
 323 {
 324         struct obd_device *obd = class_exp2obd(exp);
 325         struct lov_obd *lov = &obd->u.lov;
 326         int i, rc;
 327         ENTRY;
 328
 329         if (!lov->lov_tgts)
 330                 goto out;
 331
 332         /* Only disconnect the underlying layers on the final disconnect. */
 333         lov->lov_connects--;
 334         if (lov->lov_connects != 0) {
 335                 /* why should there be more than 1 connect? */
 336                 CERROR("disconnect #%d\n", lov->lov_connects);
 337                 goto out;
 338         }
 339
 340         /* Let's hold another reference so lov_del_obd doesn't spin through
 341            putref every time */
 342         obd_getref(obd);
 343
 344         for (i = 0; i < lov->desc.ld_tgt_count; i++) {
 345                 if (lov->lov_tgts[i] && lov->lov_tgts[i]->ltd_exp) {
 346                         /* Disconnection is the last we know about an obd */
 347                         lov_del_target(obd, i, 0, lov->lov_tgts[i]->ltd_gen);
 348                 }
 349         }
 350         obd_putref(obd);
 351
 352         if (lov->targets_proc_entry != NULL)
 353                 lprocfs_remove(&lov->targets_proc_entry);
 354
 355 out:
 356         rc = class_disconnect(exp); /* bz 9811 */
 357         RETURN(rc);
 358 }
 359
 360 /* Error codes:
 361  *
 362  *  -EINVAL  : UUID can't be found in the LOV's target list
 363  *  -ENOTCONN: The UUID is found, but the target connection is bad (!)
 364  *  -EBADF   : The UUID is found, but the OBD is the wrong type (!)
 365  *  any >= 0 : is log target index
 366  */
 367 static int lov_set_osc_active(struct obd_device *obd, struct obd_uuid *uuid,
 368                               enum obd_notify_event ev)
 369 {
 370         struct lov_obd *lov = &obd->u.lov;
 371         struct lov_tgt_desc *tgt;
 372         int index, activate, active;
 373         ENTRY;
 374
 375         CDEBUG(D_INFO, "Searching in lov %p for uuid %s event(%d)\n",
 376                lov, uuid->uuid, ev);
 377
 378         obd_getref(obd);
 379         for (index = 0; index < lov->desc.ld_tgt_count; index++) {
 380                 tgt = lov->lov_tgts[index];
 381                 if (!tgt)
 382                         continue;
 383                 /*
 384                  * LU-642, initially inactive OSC could miss the obd_connect,
 385                  * we make up for it here.
 386                  */
 387                 if (ev == OBD_NOTIFY_ACTIVATE && tgt->ltd_exp == NULL &&
 388                     obd_uuid_equals(uuid, &tgt->ltd_uuid)) {
 389                         struct obd_uuid lov_osc_uuid = {"LOV_OSC_UUID"};
 390
 391                         obd_connect(NULL, &tgt->ltd_exp, tgt->ltd_obd,
 392                                     &lov_osc_uuid, &lov->lov_ocd, NULL);
 393                 }
 394                 if (!tgt->ltd_exp)
 395                         continue;
 396
 397                 CDEBUG(D_INFO, "lov idx %d is %s conn "LPX64"\n",
 398                        index, obd_uuid2str(&tgt->ltd_uuid),
 399                        tgt->ltd_exp->exp_handle.h_cookie);
 400                 if (obd_uuid_equals(uuid, &tgt->ltd_uuid))
 401                         break;
 402         }
 403
 404         if (index == lov->desc.ld_tgt_count)
 405                 GOTO(out, index = -EINVAL);
 406
 407         if (ev == OBD_NOTIFY_DEACTIVATE || ev == OBD_NOTIFY_ACTIVATE) {
 408                 activate = (ev == OBD_NOTIFY_ACTIVATE) ? 1 : 0;
 409
 410                 if (lov->lov_tgts[index]->ltd_activate == activate) {
 411                         CDEBUG(D_INFO, "OSC %s already %sactivate!\n",
 412                                uuid->uuid, activate ? "" : "de");
 413                 } else {
 414                         lov->lov_tgts[index]->ltd_activate = activate;
 415                         CDEBUG(D_CONFIG, "%sactivate OSC %s\n",
 416                                activate ? "" : "de", obd_uuid2str(uuid));
 417                 }
 418
 419         } else if (ev == OBD_NOTIFY_INACTIVE || ev == OBD_NOTIFY_ACTIVE) {
 420                 active = (ev == OBD_NOTIFY_ACTIVE) ? 1 : 0;
 421
 422                 if (lov->lov_tgts[index]->ltd_active == active) {
 423                         CDEBUG(D_INFO, "OSC %s already %sactive!\n",
 424                                uuid->uuid, active ? "" : "in");
 425                         GOTO(out, index);
 426                 } else {
 427                         CDEBUG(D_CONFIG, "Marking OSC %s %sactive\n",
 428                                obd_uuid2str(uuid), active ? "" : "in");
 429                 }
 430
 431                 lov->lov_tgts[index]->ltd_active = active;
 432                 if (active) {
 433                         lov->desc.ld_active_tgt_count++;
 434                         lov->lov_tgts[index]->ltd_exp->exp_obd->obd_inactive = 0;
 435                 } else {
 436                         lov->desc.ld_active_tgt_count--;
 437                         lov->lov_tgts[index]->ltd_exp->exp_obd->obd_inactive = 1;
 438                 }
 439         } else {
 440                 CERROR("%s: unknown event %d for uuid %s\n", obd->obd_name,
 441                        ev, uuid->uuid);
 442         }
 443
 444  out:
 445         obd_putref(obd);
 446         RETURN(index);
 447 }
 448
 449 static int lov_notify(struct obd_device *obd, struct obd_device *watched,
 450                       enum obd_notify_event ev, void *data)
 451 {
 452         int rc = 0;
 453         struct lov_obd *lov = &obd->u.lov;
 454         ENTRY;
 455
 456         down_read(&lov->lov_notify_lock);
 457         if (!lov->lov_connects) {
 458                 up_read(&lov->lov_notify_lock);
 459                 RETURN(rc);
 460         }
 461
 462         if (ev == OBD_NOTIFY_ACTIVE || ev == OBD_NOTIFY_INACTIVE ||
 463             ev == OBD_NOTIFY_ACTIVATE || ev == OBD_NOTIFY_DEACTIVATE) {
 464                 struct obd_uuid *uuid;
 465
 466                 LASSERT(watched);
 467
 468                 if (strcmp(watched->obd_type->typ_name, LUSTRE_OSC_NAME)) {
 469                         up_read(&lov->lov_notify_lock);
 470                         CERROR("unexpected notification of %s %s!\n",
 471                                watched->obd_type->typ_name,
 472                                watched->obd_name);
 473                         RETURN(-EINVAL);
 474                 }
 475                 uuid = &watched->u.cli.cl_target_uuid;
 476
 477                 /* Set OSC as active before notifying the observer, so the
 478                  * observer can use the OSC normally.
 479                  */
 480                 rc = lov_set_osc_active(obd, uuid, ev);
 481                 if (rc < 0) {
 482                         up_read(&lov->lov_notify_lock);
 483                         CERROR("event(%d) of %s failed: %d\n", ev,
 484                                obd_uuid2str(uuid), rc);
 485                         RETURN(rc);
 486                 }
 487                 /* active event should be pass lov target index as data */
 488                 data = &rc;
 489         }
 490
 491         /* Pass the notification up the chain. */
 492         if (watched) {
 493                 rc = obd_notify_observer(obd, watched, ev, data);
 494         } else {
 495                 /* NULL watched means all osc's in the lov (only for syncs) */
 496                 /* sync event should be send lov idx as data */
 497                 struct lov_obd *lov = &obd->u.lov;
 498                 int i, is_sync;
 499
 500                 data = &i;
 501                 is_sync = (ev == OBD_NOTIFY_SYNC) ||
 502                           (ev == OBD_NOTIFY_SYNC_NONBLOCK);
 503
 504                 obd_getref(obd);
 505                 for (i = 0; i < lov->desc.ld_tgt_count; i++) {
 506                         if (!lov->lov_tgts[i])
 507                                 continue;
 508
 509                         /* don't send sync event if target not
 510                          * connected/activated */
 511                         if (is_sync &&  !lov->lov_tgts[i]->ltd_active)
 512                                 continue;
 513
 514                         rc = obd_notify_observer(obd, lov->lov_tgts[i]->ltd_obd,
 515                                                  ev, data);
 516                         if (rc) {
 517                                 CERROR("%s: notify %s of %s failed %d\n",
 518                                        obd->obd_name,
 519                                        obd->obd_observer->obd_name,
 520                                        lov->lov_tgts[i]->ltd_obd->obd_name,
 521                                        rc);
 522                         }
 523                 }
 524                 obd_putref(obd);
 525         }
 526
 527         up_read(&lov->lov_notify_lock);
 528         RETURN(rc);
 529 }
 530
 531 static int lov_add_target(struct obd_device *obd, struct obd_uuid *uuidp,
 532                           __u32 index, int gen, int active)
 533 {
 534         struct lov_obd *lov = &obd->u.lov;
 535         struct lov_tgt_desc *tgt;
 536         struct obd_device *tgt_obd;
 537         int rc;
 538         ENTRY;
 539
 540         CDEBUG(D_CONFIG, "uuid:%s idx:%d gen:%d active:%d\n",
 541                uuidp->uuid, index, gen, active);
 542
 543         if (gen <= 0) {
 544                 CERROR("request to add OBD %s with invalid generation: %d\n",
 545                        uuidp->uuid, gen);
 546                 RETURN(-EINVAL);
 547         }
 548
 549         tgt_obd = class_find_client_obd(uuidp, LUSTRE_OSC_NAME,
 550                                         &obd->obd_uuid);
 551         if (tgt_obd == NULL)
 552                 RETURN(-EINVAL);
 553
 554         mutex_lock(&lov->lov_lock);
 555
 556         if ((index < lov->lov_tgt_size) && (lov->lov_tgts[index] != NULL)) {
 557                 tgt = lov->lov_tgts[index];
 558                 CERROR("UUID %s already assigned at LOV target index %d\n",
 559                        obd_uuid2str(&tgt->ltd_uuid), index);
 560                 mutex_unlock(&lov->lov_lock);
 561                 RETURN(-EEXIST);
 562         }
 563
 564         if (index >= lov->lov_tgt_size) {
 565                 /* We need to reallocate the lov target array. */
 566                 struct lov_tgt_desc **newtgts, **old = NULL;
 567                 __u32 newsize, oldsize = 0;
 568
 569                 newsize = max(lov->lov_tgt_size, (__u32)2);
 570                 while (newsize < index + 1)
 571                         newsize = newsize << 1;
 572                 OBD_ALLOC(newtgts, sizeof(*newtgts) * newsize);
 573                 if (newtgts == NULL) {
 574                         mutex_unlock(&lov->lov_lock);
 575                         RETURN(-ENOMEM);
 576                 }
 577
 578                 if (lov->lov_tgt_size) {
 579                         memcpy(newtgts, lov->lov_tgts, sizeof(*newtgts) *
 580                                lov->lov_tgt_size);
 581                         old = lov->lov_tgts;
 582                         oldsize = lov->lov_tgt_size;
 583                 }
 584
 585                 lov->lov_tgts = newtgts;
 586                 lov->lov_tgt_size = newsize;
 587                 smp_rmb();
 588                 if (old)
 589                         OBD_FREE(old, sizeof(*old) * oldsize);
 590
 591                 CDEBUG(D_CONFIG, "tgts: %p size: %d\n",
 592                        lov->lov_tgts, lov->lov_tgt_size);
 593         }
 594
 595         OBD_ALLOC_PTR(tgt);
 596         if (!tgt) {
 597                 mutex_unlock(&lov->lov_lock);
 598                 RETURN(-ENOMEM);
 599         }
 600
 601         rc = lov_ost_pool_add(&lov->lov_packed, index, lov->lov_tgt_size);
 602         if (rc) {
 603                 mutex_unlock(&lov->lov_lock);
 604                 OBD_FREE_PTR(tgt);
 605                 RETURN(rc);
 606         }
 607
 608         tgt->ltd_uuid = *uuidp;
 609         tgt->ltd_obd = tgt_obd;
 610         /* XXX - add a sanity check on the generation number. */
 611         tgt->ltd_gen = gen;
 612         tgt->ltd_index = index;
 613         tgt->ltd_activate = active;
 614         lov->lov_tgts[index] = tgt;
 615         if (index >= lov->desc.ld_tgt_count)
 616                 lov->desc.ld_tgt_count = index + 1;
 617
 618         mutex_unlock(&lov->lov_lock);
 619
 620         CDEBUG(D_CONFIG, "idx=%d ltd_gen=%d ld_tgt_count=%d\n",
 621                 index, tgt->ltd_gen, lov->desc.ld_tgt_count);
 622
 623         rc = obd_notify(obd, tgt_obd, OBD_NOTIFY_CREATE, &index);
 624
 625         if (lov->lov_connects == 0) {
 626                 /* lov_connect hasn't been called yet. We'll do the
 627                    lov_connect_obd on this target when that fn first runs,
 628                    because we don't know the connect flags yet. */
 629                 RETURN(0);
 630         }
 631
 632         obd_getref(obd);
 633
 634         rc = lov_connect_obd(obd, index, active, &lov->lov_ocd);
 635         if (rc)
 636                 GOTO(out, rc);
 637
 638         /* connect to administrative disabled ost */
 639         if (!tgt->ltd_exp)
 640                 GOTO(out, rc = 0);
 641
 642         if (lov->lov_cache != NULL) {
 643                 rc = obd_set_info_async(NULL, tgt->ltd_exp,
 644                                 sizeof(KEY_CACHE_SET), KEY_CACHE_SET,
 645                                 sizeof(struct cl_client_cache), lov->lov_cache,
 646                                 NULL);
 647                 if (rc < 0)
 648                         GOTO(out, rc);
 649         }
 650
 651         rc = lov_notify(obd, tgt->ltd_exp->exp_obd,
 652                         active ? OBD_NOTIFY_CONNECT : OBD_NOTIFY_INACTIVE,
 653                         (void *)&index);
 654
 655 out:
 656         if (rc) {
 657                 CERROR("add failed (%d), deleting %s\n", rc,
 658                        obd_uuid2str(&tgt->ltd_uuid));
 659                 lov_del_target(obd, index, 0, 0);
 660         }
 661         obd_putref(obd);
 662         RETURN(rc);
 663 }
 664
 665 /* Schedule a target for deletion */
 666 int lov_del_target(struct obd_device *obd, __u32 index,
 667                    struct obd_uuid *uuidp, int gen)
 668 {
 669         struct lov_obd *lov = &obd->u.lov;
 670         int count = lov->desc.ld_tgt_count;
 671         int rc = 0;
 672         ENTRY;
 673
 674         if (index >= count) {
 675                 CERROR("LOV target index %d >= number of LOV OBDs %d.\n",
 676                        index, count);
 677                 RETURN(-EINVAL);
 678         }
 679
 680         /* to make sure there's no ongoing lov_notify() now */
 681         down_write(&lov->lov_notify_lock);
 682         obd_getref(obd);
 683
 684         if (!lov->lov_tgts[index]) {
 685                 CERROR("LOV target at index %d is not setup.\n", index);
 686                 GOTO(out, rc = -EINVAL);
 687         }
 688
 689         if (uuidp && !obd_uuid_equals(uuidp, &lov->lov_tgts[index]->ltd_uuid)) {
 690                 CERROR("LOV target UUID %s at index %d doesn't match %s.\n",
 691                        lov_uuid2str(lov, index), index,
 692                        obd_uuid2str(uuidp));
 693                 GOTO(out, rc = -EINVAL);
 694         }
 695
 696         CDEBUG(D_CONFIG, "uuid: %s idx: %d gen: %d exp: %p active: %d\n",
 697                lov_uuid2str(lov, index), index,
 698                lov->lov_tgts[index]->ltd_gen, lov->lov_tgts[index]->ltd_exp,
 699                lov->lov_tgts[index]->ltd_active);
 700
 701         lov->lov_tgts[index]->ltd_reap = 1;
 702         lov->lov_death_row++;
 703         /* we really delete it from obd_putref */
 704 out:
 705         obd_putref(obd);
 706         up_write(&lov->lov_notify_lock);
 707
 708         RETURN(rc);
 709 }
 710
 711 static void __lov_del_obd(struct obd_device *obd, struct lov_tgt_desc *tgt)
 712 {
 713         struct obd_device *osc_obd;
 714
 715         LASSERT(tgt);
 716         LASSERT(tgt->ltd_reap);
 717
 718         osc_obd = class_exp2obd(tgt->ltd_exp);
 719
 720         CDEBUG(D_CONFIG, "Removing tgt %s : %s\n",
 721                tgt->ltd_uuid.uuid,
 722                osc_obd ? osc_obd->obd_name : "<no obd>");
 723
 724         if (tgt->ltd_exp)
 725                 lov_disconnect_obd(obd, tgt);
 726
 727         OBD_FREE_PTR(tgt);
 728
 729         /* Manual cleanup - no cleanup logs to clean up the osc's.  We must
 730            do it ourselves. And we can't do it from lov_cleanup,
 731            because we just lost our only reference to it. */
 732         if (osc_obd)
 733                 class_manual_cleanup(osc_obd);
 734 }
 735
 736 void lov_fix_desc_stripe_size(__u64 *val)
 737 {
 738         if (*val < LOV_MIN_STRIPE_SIZE) {
 739                 if (*val != 0)
 740                         LCONSOLE_INFO("Increasing default stripe size to "
 741                                       "minimum %u\n",
 742                                       LOV_DESC_STRIPE_SIZE_DEFAULT);
 743                 *val = LOV_DESC_STRIPE_SIZE_DEFAULT;
 744         } else if (*val & (LOV_MIN_STRIPE_SIZE - 1)) {
 745                 *val &= ~(LOV_MIN_STRIPE_SIZE - 1);
 746                 LCONSOLE_WARN("Changing default stripe size to "LPU64" (a "
 747                               "multiple of %u)\n",
 748                               *val, LOV_MIN_STRIPE_SIZE);
 749         }
 750 }
 751
 752 void lov_fix_desc_stripe_count(__u32 *val)
 753 {
 754         if (*val == 0)
 755                 *val = 1;
 756 }
 757
 758 void lov_fix_desc_pattern(__u32 *val)
 759 {
 760         /* from lov_setstripe */
 761         if ((*val != 0) && (*val != LOV_PATTERN_RAID0)) {
 762                 LCONSOLE_WARN("Unknown stripe pattern: %#x\n", *val);
 763                 *val = 0;
 764         }
 765 }
 766
 767 void lov_fix_desc_qos_maxage(__u32 *val)
 768 {
 769         if (*val == 0)
 770                 *val = LOV_DESC_QOS_MAXAGE_DEFAULT;
 771 }
 772
 773 void lov_fix_desc(struct lov_desc *desc)
 774 {
 775         lov_fix_desc_stripe_size(&desc->ld_default_stripe_size);
 776         lov_fix_desc_stripe_count(&desc->ld_default_stripe_count);
 777         lov_fix_desc_pattern(&desc->ld_pattern);
 778         lov_fix_desc_qos_maxage(&desc->ld_qos_maxage);
 779 }
 780
 781 int lov_setup(struct obd_device *obd, struct lustre_cfg *lcfg)
 782 {
 783         struct lov_desc *desc;
 784         struct lov_obd *lov = &obd->u.lov;
 785 #ifdef LPROCFS
 786         struct obd_type *type;
 787 #endif
 788         int rc;
 789         ENTRY;
 790
 791         if (LUSTRE_CFG_BUFLEN(lcfg, 1) < 1) {
 792                 CERROR("LOV setup requires a descriptor\n");
 793                 RETURN(-EINVAL);
 794         }
 795
 796         desc = (struct lov_desc *)lustre_cfg_buf(lcfg, 1);
 797
 798         if (sizeof(*desc) > LUSTRE_CFG_BUFLEN(lcfg, 1)) {
 799                 CERROR("descriptor size wrong: %d > %d\n",
 800                        (int)sizeof(*desc), LUSTRE_CFG_BUFLEN(lcfg, 1));
 801                 RETURN(-EINVAL);
 802         }
 803
 804         if (desc->ld_magic != LOV_DESC_MAGIC) {
 805                 if (desc->ld_magic == __swab32(LOV_DESC_MAGIC)) {
 806                             CDEBUG(D_OTHER, "%s: Swabbing lov desc %p\n",
 807                                    obd->obd_name, desc);
 808                             lustre_swab_lov_desc(desc);
 809                 } else {
 810                         CERROR("%s: Bad lov desc magic: %#x\n",
 811                                obd->obd_name, desc->ld_magic);
 812                         RETURN(-EINVAL);
 813                 }
 814         }
 815
 816         lov_fix_desc(desc);
 817
 818         desc->ld_active_tgt_count = 0;
 819         lov->desc = *desc;
 820         lov->lov_tgt_size = 0;
 821
 822         mutex_init(&lov->lov_lock);
 823         atomic_set(&lov->lov_refcount, 0);
 824         lov->lov_sp_me = LUSTRE_SP_CLI;
 825
 826         init_rwsem(&lov->lov_notify_lock);
 827
 828         lov->lov_pools_hash_body = cfs_hash_create("POOLS", HASH_POOLS_CUR_BITS,
 829                                                    HASH_POOLS_MAX_BITS,
 830                                                    HASH_POOLS_BKT_BITS, 0,
 831                                                    CFS_HASH_MIN_THETA,
 832                                                    CFS_HASH_MAX_THETA,
 833                                                    &pool_hash_operations,
 834                                                    CFS_HASH_DEFAULT);
 835         INIT_LIST_HEAD(&lov->lov_pool_list);
 836         lov->lov_pool_count = 0;
 837         rc = lov_ost_pool_init(&lov->lov_packed, 0);
 838         if (rc)
 839                 GOTO(out, rc);
 840
 841 #ifdef LPROCFS
 842         obd->obd_vars = lprocfs_lov_obd_vars;
 843         /* If this is true then both client (lov) and server
 844          * (lod) are on the same node. The lod layer if loaded
 845          * first will register the lov proc directory. In that
 846          * case obd->obd_type->typ_procroot will be not set.
 847          * Instead we use type->typ_procsym as the parent. */
 848         type = class_search_type(LUSTRE_LOD_NAME);
 849         if (type != NULL && type->typ_procsym != NULL) {
 850                 obd->obd_proc_entry = lprocfs_seq_register(obd->obd_name,
 851                                                            type->typ_procsym,
 852                                                            obd->obd_vars, obd);
 853                 if (IS_ERR(obd->obd_proc_entry)) {
 854                         rc = PTR_ERR(obd->obd_proc_entry);
 855                         CERROR("error %d setting up lprocfs for %s\n", rc,
 856                                obd->obd_name);
 857                         obd->obd_proc_entry = NULL;
 858                 }
 859         } else {
 860                 rc = lprocfs_obd_setup(obd);
 861         }
 862
 863         if (rc == 0) {
 864                 rc = lprocfs_seq_create(obd->obd_proc_entry, "target_obd",
 865                                         0444, &lov_proc_target_fops, obd);
 866                 if (rc)
 867                         CWARN("Error adding the target_obd file\n");
 868
 869                 lov->lov_pool_proc_entry = lprocfs_seq_register("pools",
 870                                                         obd->obd_proc_entry,
 871                                                         NULL, NULL);
 872                 if (IS_ERR(lov->lov_pool_proc_entry)) {
 873                         rc = PTR_ERR(lov->lov_pool_proc_entry);
 874                         CERROR("error %d setting up lprocfs for pools\n", rc);
 875                         lov->lov_pool_proc_entry = NULL;
 876                 }
 877         }
 878 #endif
 879         RETURN(0);
 880
 881 out:
 882         return rc;
 883 }
 884
 885 static int lov_precleanup(struct obd_device *obd, enum obd_cleanup_stage stage)
 886 {
 887         int rc = 0;
 888         struct lov_obd *lov = &obd->u.lov;
 889
 890         ENTRY;
 891
 892         switch (stage) {
 893         case OBD_CLEANUP_EARLY: {
 894                 int i;
 895                 for (i = 0; i < lov->desc.ld_tgt_count; i++) {
 896                         if (!lov->lov_tgts[i] || !lov->lov_tgts[i]->ltd_active)
 897                                 continue;
 898                         obd_precleanup(class_exp2obd(lov->lov_tgts[i]->ltd_exp),
 899                                        OBD_CLEANUP_EARLY);
 900                 }
 901                 break;
 902         }
 903         default:
 904                 break;
 905         }
 906
 907         RETURN(rc);
 908 }
 909
 910 static int lov_cleanup(struct obd_device *obd)
 911 {
 912         struct lov_obd *lov = &obd->u.lov;
 913         struct list_head *pos, *tmp;
 914         struct pool_desc *pool;
 915         ENTRY;
 916
 917         list_for_each_safe(pos, tmp, &lov->lov_pool_list) {
 918                 pool = list_entry(pos, struct pool_desc, pool_list);
 919                 /* free pool structs */
 920                 CDEBUG(D_INFO, "delete pool %p\n", pool);
 921                 /* In the function below, .hs_keycmp resolves to
 922                  * pool_hashkey_keycmp() */
 923                 /* coverity[overrun-buffer-val] */
 924                 lov_pool_del(obd, pool->pool_name);
 925         }
 926         cfs_hash_putref(lov->lov_pools_hash_body);
 927         lov_ost_pool_free(&lov->lov_packed);
 928
 929         lprocfs_obd_cleanup(obd);
 930         if (lov->lov_tgts) {
 931                 int i;
 932                 obd_getref(obd);
 933                 for (i = 0; i < lov->desc.ld_tgt_count; i++) {
 934                         if (!lov->lov_tgts[i])
 935                                 continue;
 936
 937                         /* Inactive targets may never have connected */
 938                         if (lov->lov_tgts[i]->ltd_active ||
 939                             atomic_read(&lov->lov_refcount))
 940                                 /* We should never get here - these
 941                                  * should have been removed in the
 942                                  * disconnect. */
 943                                 CERROR("%s: lov tgt %d not cleaned! "
 944                                        "deathrow=%d, lovrc=%d\n",
 945                                        obd->obd_name, i, lov->lov_death_row,
 946                                        atomic_read(&lov->lov_refcount));
 947                         lov_del_target(obd, i, 0, 0);
 948                 }
 949                 obd_putref(obd);
 950                 OBD_FREE(lov->lov_tgts, sizeof(*lov->lov_tgts) *
 951                          lov->lov_tgt_size);
 952                 lov->lov_tgt_size = 0;
 953         }
 954         RETURN(0);
 955 }
 956
 957 int lov_process_config_base(struct obd_device *obd, struct lustre_cfg *lcfg,
 958                             __u32 *indexp, int *genp)
 959 {
 960         struct obd_uuid obd_uuid;
 961         int cmd;
 962         int rc = 0;
 963         ENTRY;
 964
 965         switch(cmd = lcfg->lcfg_command) {
 966         case LCFG_LOV_ADD_OBD:
 967         case LCFG_LOV_ADD_INA:
 968         case LCFG_LOV_DEL_OBD: {
 969                 __u32 index;
 970                 int gen;
 971                 /* lov_modify_tgts add  0:lov_mdsA  1:ost1_UUID  2:0  3:1 */
 972                 if (LUSTRE_CFG_BUFLEN(lcfg, 1) > sizeof(obd_uuid.uuid))
 973                         GOTO(out, rc = -EINVAL);
 974
 975                 obd_str2uuid(&obd_uuid,  lustre_cfg_buf(lcfg, 1));
 976
 977                 if (sscanf(lustre_cfg_buf(lcfg, 2), "%u", indexp) != 1)
 978                         GOTO(out, rc = -EINVAL);
 979                 if (sscanf(lustre_cfg_buf(lcfg, 3), "%d", genp) != 1)
 980                         GOTO(out, rc = -EINVAL);
 981                 index = *indexp;
 982                 gen = *genp;
 983                 if (cmd == LCFG_LOV_ADD_OBD)
 984                         rc = lov_add_target(obd, &obd_uuid, index, gen, 1);
 985                 else if (cmd == LCFG_LOV_ADD_INA)
 986                         rc = lov_add_target(obd, &obd_uuid, index, gen, 0);
 987                 else
 988                         rc = lov_del_target(obd, index, &obd_uuid, gen);
 989                 GOTO(out, rc);
 990         }
 991         case LCFG_PARAM: {
 992                 struct lov_desc *desc = &(obd->u.lov.desc);
 993
 994                 if (!desc)
 995                         GOTO(out, rc = -EINVAL);
 996
 997                 rc = class_process_proc_param(PARAM_LOV, obd->obd_vars,
 998                                               lcfg, obd);
 999                 if (rc > 0)
1000                         rc = 0;
1001                 GOTO(out, rc);
1002         }
1003         case LCFG_POOL_NEW:
1004         case LCFG_POOL_ADD:
1005         case LCFG_POOL_DEL:
1006         case LCFG_POOL_REM:
1007                 GOTO(out, rc);
1008
1009         default: {
1010                 CERROR("Unknown command: %d\n", lcfg->lcfg_command);
1011                 GOTO(out, rc = -EINVAL);
1012
1013         }
1014         }
1015 out:
1016         RETURN(rc);
1017 }
1018
1019 #define ASSERT_LSM_MAGIC(lsmp)                                                  \
1020 do {                                                                            \
1021         LASSERT((lsmp) != NULL);                                                \
1022         LASSERTF(((lsmp)->lsm_magic == LOV_MAGIC_V1 ||                          \
1023                  (lsmp)->lsm_magic == LOV_MAGIC_V3),                            \
1024                  "%p->lsm_magic=%x\n", (lsmp), (lsmp)->lsm_magic);              \
1025 } while (0)
1026
1027 static int lov_getattr_interpret(struct ptlrpc_request_set *rqset,
1028                                  void *data, int rc)
1029 {
1030         struct lov_request_set *lovset = (struct lov_request_set *)data;
1031         int err;
1032         ENTRY;
1033
1034         /* don't do attribute merge if this aysnc op failed */
1035         if (rc)
1036                 atomic_set(&lovset->set_completes, 0);
1037         err = lov_fini_getattr_set(lovset);
1038         RETURN(rc ? rc : err);
1039 }
1040
1041 static int lov_getattr_async(struct obd_export *exp, struct obd_info *oinfo,
1042                               struct ptlrpc_request_set *rqset)
1043 {
1044         struct lov_request_set *lovset;
1045         struct lov_obd *lov;
1046         struct list_head *pos;
1047         struct lov_request *req;
1048         int rc = 0, err;
1049         ENTRY;
1050
1051         LASSERT(oinfo);
1052         ASSERT_LSM_MAGIC(oinfo->oi_md);
1053
1054         if (!exp || !exp->exp_obd)
1055                 RETURN(-ENODEV);
1056
1057         lov = &exp->exp_obd->u.lov;
1058
1059         rc = lov_prep_getattr_set(exp, oinfo, &lovset);
1060         if (rc)
1061                 RETURN(rc);
1062
1063         CDEBUG(D_INFO, "objid "DOSTID": %ux%u byte stripes\n",
1064                POSTID(&oinfo->oi_md->lsm_oi), oinfo->oi_md->lsm_stripe_count,
1065                oinfo->oi_md->lsm_stripe_size);
1066
1067         list_for_each(pos, &lovset->set_list) {
1068                 req = list_entry(pos, struct lov_request, rq_link);
1069
1070                 CDEBUG(D_INFO, "objid "DOSTID"[%d] has subobj "DOSTID" at idx"
1071                        "%u\n", POSTID(&oinfo->oi_oa->o_oi), req->rq_stripe,
1072                        POSTID(&req->rq_oi.oi_oa->o_oi), req->rq_idx);
1073                 rc = obd_getattr_async(lov->lov_tgts[req->rq_idx]->ltd_exp,
1074                                        &req->rq_oi, rqset);
1075                 if (rc) {
1076                         CERROR("%s: getattr objid "DOSTID" subobj"
1077                                DOSTID" on OST idx %d: rc = %d\n",
1078                                exp->exp_obd->obd_name,
1079                                POSTID(&oinfo->oi_oa->o_oi),
1080                                POSTID(&req->rq_oi.oi_oa->o_oi),
1081                                req->rq_idx, rc);
1082                         GOTO(out, rc);
1083                 }
1084         }
1085
1086         if (!list_empty(&rqset->set_requests)) {
1087                 LASSERT(rc == 0);
1088                 LASSERT (rqset->set_interpret == NULL);
1089                 rqset->set_interpret = lov_getattr_interpret;
1090                 rqset->set_arg = (void *)lovset;
1091                 RETURN(rc);
1092         }
1093 out:
1094         if (rc)
1095                 atomic_set(&lovset->set_completes, 0);
1096         err = lov_fini_getattr_set(lovset);
1097         RETURN(rc ? rc : err);
1098 }
1099
1100 static int lov_setattr_interpret(struct ptlrpc_request_set *rqset,
1101                                  void *data, int rc)
1102 {
1103         struct lov_request_set *lovset = (struct lov_request_set *)data;
1104         int err;
1105         ENTRY;
1106
1107         if (rc)
1108                 atomic_set(&lovset->set_completes, 0);
1109         err = lov_fini_setattr_set(lovset);
1110         RETURN(rc ? rc : err);
1111 }
1112
1113 /* If @oti is given, the request goes from MDS and responses from OSTs are not
1114    needed. Otherwise, a client is waiting for responses. */
1115 static int lov_setattr_async(struct obd_export *exp, struct obd_info *oinfo,
1116                              struct obd_trans_info *oti,
1117                              struct ptlrpc_request_set *rqset)
1118 {
1119         struct lov_request_set *set;
1120         struct lov_request *req;
1121         struct list_head *pos;
1122         struct lov_obd *lov;
1123         int rc = 0;
1124         ENTRY;
1125
1126         LASSERT(oinfo);
1127         ASSERT_LSM_MAGIC(oinfo->oi_md);
1128         if (oinfo->oi_oa->o_valid & OBD_MD_FLCOOKIE) {
1129                 LASSERT(oti);
1130                 LASSERT(oti->oti_logcookies);
1131         }
1132
1133         if (!exp || !exp->exp_obd)
1134                 RETURN(-ENODEV);
1135
1136         lov = &exp->exp_obd->u.lov;
1137         rc = lov_prep_setattr_set(exp, oinfo, oti, &set);
1138         if (rc)
1139                 RETURN(rc);
1140
1141         CDEBUG(D_INFO, "objid "DOSTID": %ux%u byte stripes\n",
1142                POSTID(&oinfo->oi_md->lsm_oi),
1143                oinfo->oi_md->lsm_stripe_count,
1144                oinfo->oi_md->lsm_stripe_size);
1145
1146         list_for_each(pos, &set->set_list) {
1147                 req = list_entry(pos, struct lov_request, rq_link);
1148
1149                 if (oinfo->oi_oa->o_valid & OBD_MD_FLCOOKIE)
1150                         oti->oti_logcookies = set->set_cookies + req->rq_stripe;
1151
1152                 CDEBUG(D_INFO, "objid "DOSTID"[%d] has subobj "DOSTID" at idx"
1153                        "%u\n", POSTID(&oinfo->oi_oa->o_oi), req->rq_stripe,
1154                        POSTID(&req->rq_oi.oi_oa->o_oi), req->rq_idx);
1155
1156                 rc = obd_setattr_async(lov->lov_tgts[req->rq_idx]->ltd_exp,
1157                                        &req->rq_oi, oti, rqset);
1158                 if (rc) {
1159                         CERROR("error: setattr objid "DOSTID" subobj"
1160                                DOSTID" on OST idx %d: rc = %d\n",
1161                                POSTID(&set->set_oi->oi_oa->o_oi),
1162                                POSTID(&req->rq_oi.oi_oa->o_oi),
1163                                req->rq_idx, rc);
1164                         break;
1165                 }
1166         }
1167
1168         /* If we are not waiting for responses on async requests, return. */
1169         if (rc || !rqset || list_empty(&rqset->set_requests)) {
1170                 int err;
1171                 if (rc)
1172                         atomic_set(&set->set_completes, 0);
1173                 err = lov_fini_setattr_set(set);
1174                 RETURN(rc ? rc : err);
1175         }
1176
1177         LASSERT(rqset->set_interpret == NULL);
1178         rqset->set_interpret = lov_setattr_interpret;
1179         rqset->set_arg = (void *)set;
1180
1181         RETURN(0);
1182 }
1183
1184 static int lov_change_cbdata(struct obd_export *exp,
1185                              struct lov_stripe_md *lsm, ldlm_iterator_t it,
1186                              void *data)
1187 {
1188         struct lov_obd *lov;
1189         int rc = 0, i;
1190         ENTRY;
1191
1192         ASSERT_LSM_MAGIC(lsm);
1193
1194         if (!exp || !exp->exp_obd)
1195                 RETURN(-ENODEV);
1196
1197         lov = &exp->exp_obd->u.lov;
1198         for (i = 0; i < lsm->lsm_stripe_count; i++) {
1199                 struct lov_stripe_md submd;
1200                 struct lov_oinfo *loi = lsm->lsm_oinfo[i];
1201
1202                 if (lov_oinfo_is_dummy(loi))
1203                         continue;
1204
1205                 if (!lov->lov_tgts[loi->loi_ost_idx]) {
1206                         CDEBUG(D_HA, "lov idx %d NULL\n", loi->loi_ost_idx);
1207                         continue;
1208                 }
1209
1210                 submd.lsm_oi = loi->loi_oi;
1211                 submd.lsm_stripe_count = 0;
1212                 rc = obd_change_cbdata(lov->lov_tgts[loi->loi_ost_idx]->ltd_exp,
1213                                        &submd, it, data);
1214         }
1215         RETURN(rc);
1216 }
1217
1218 /* find any ldlm lock of the inode in lov
1219  * return 0    not find
1220  *        1    find one
1221  *      < 0    error */
1222 static int lov_find_cbdata(struct obd_export *exp,
1223                            struct lov_stripe_md *lsm, ldlm_iterator_t it,
1224                            void *data)
1225 {
1226         struct lov_obd *lov;
1227         int rc = 0, i;
1228         ENTRY;
1229
1230         ASSERT_LSM_MAGIC(lsm);
1231
1232         if (!exp || !exp->exp_obd)
1233                 RETURN(-ENODEV);
1234
1235         lov = &exp->exp_obd->u.lov;
1236         for (i = 0; i < lsm->lsm_stripe_count; i++) {
1237                 struct lov_stripe_md submd;
1238                 struct lov_oinfo *loi = lsm->lsm_oinfo[i];
1239
1240                 if (lov_oinfo_is_dummy(loi))
1241                         continue;
1242
1243                 if (!lov->lov_tgts[loi->loi_ost_idx]) {
1244                         CDEBUG(D_HA, "lov idx %d NULL\n", loi->loi_ost_idx);
1245                         continue;
1246                 }
1247
1248                 submd.lsm_oi = loi->loi_oi;
1249                 submd.lsm_stripe_count = 0;
1250                 rc = obd_find_cbdata(lov->lov_tgts[loi->loi_ost_idx]->ltd_exp,
1251                                      &submd, it, data);
1252                 if (rc != 0)
1253                         RETURN(rc);
1254         }
1255         RETURN(rc);
1256 }
1257
1258 int lov_statfs_interpret(struct ptlrpc_request_set *rqset, void *data, int rc)
1259 {
1260         struct lov_request_set *lovset = (struct lov_request_set *)data;
1261         int err;
1262         ENTRY;
1263
1264         if (rc)
1265                 atomic_set(&lovset->set_completes, 0);
1266
1267         err = lov_fini_statfs_set(lovset);
1268         RETURN(rc ? rc : err);
1269 }
1270
1271 static int lov_statfs_async(struct obd_export *exp, struct obd_info *oinfo,
1272                             __u64 max_age, struct ptlrpc_request_set *rqset)
1273 {
1274         struct obd_device      *obd = class_exp2obd(exp);
1275         struct lov_request_set *set;
1276         struct lov_request *req;
1277         struct list_head *pos;
1278         struct lov_obd *lov;
1279         int rc = 0;
1280         ENTRY;
1281
1282         LASSERT(oinfo != NULL);
1283         LASSERT(oinfo->oi_osfs != NULL);
1284
1285         lov = &obd->u.lov;
1286         rc = lov_prep_statfs_set(obd, oinfo, &set);
1287         if (rc)
1288                 RETURN(rc);
1289
1290         list_for_each(pos, &set->set_list) {
1291                 req = list_entry(pos, struct lov_request, rq_link);
1292                 rc = obd_statfs_async(lov->lov_tgts[req->rq_idx]->ltd_exp,
1293                                       &req->rq_oi, max_age, rqset);
1294                 if (rc)
1295                         break;
1296         }
1297
1298         if (rc || list_empty(&rqset->set_requests)) {
1299                 int err;
1300                 if (rc)
1301                         atomic_set(&set->set_completes, 0);
1302                 err = lov_fini_statfs_set(set);
1303                 RETURN(rc ? rc : err);
1304         }
1305
1306         LASSERT(rqset->set_interpret == NULL);
1307         rqset->set_interpret = lov_statfs_interpret;
1308         rqset->set_arg = (void *)set;
1309         RETURN(0);
1310 }
1311
1312 static int lov_statfs(const struct lu_env *env, struct obd_export *exp,
1313                       struct obd_statfs *osfs, __u64 max_age, __u32 flags)
1314 {
1315         struct ptlrpc_request_set *set = NULL;
1316         struct obd_info oinfo = { { { 0 } } };
1317         int rc = 0;
1318         ENTRY;
1319
1320
1321         /* for obdclass we forbid using obd_statfs_rqset, but prefer using async
1322          * statfs requests */
1323         set = ptlrpc_prep_set();
1324         if (set == NULL)
1325                 RETURN(-ENOMEM);
1326
1327         oinfo.oi_osfs = osfs;
1328         oinfo.oi_flags = flags;
1329         rc = lov_statfs_async(exp, &oinfo, max_age, set);
1330         if (rc == 0)
1331                 rc = ptlrpc_set_wait(set);
1332         ptlrpc_set_destroy(set);
1333
1334         RETURN(rc);
1335 }
1336
1337 static int lov_iocontrol(unsigned int cmd, struct obd_export *exp, int len,
1338                          void *karg, void __user *uarg)
1339 {
1340         struct obd_device *obddev = class_exp2obd(exp);
1341         struct lov_obd *lov = &obddev->u.lov;
1342         int i = 0, rc = 0, count = lov->desc.ld_tgt_count;
1343         struct obd_uuid *uuidp;
1344         ENTRY;
1345
1346         switch (cmd) {
1347         case IOC_OBD_STATFS: {
1348                 struct obd_ioctl_data *data = karg;
1349                 struct obd_device *osc_obd;
1350                 struct obd_statfs stat_buf = {0};
1351                 __u32 index;
1352                 __u32 flags;
1353
1354                 memcpy(&index, data->ioc_inlbuf2, sizeof(__u32));
1355                 if ((index >= count))
1356                         RETURN(-ENODEV);
1357
1358                 if (!lov->lov_tgts[index])
1359                         /* Try again with the next index */
1360                         RETURN(-EAGAIN);
1361                 if (!lov->lov_tgts[index]->ltd_active)
1362                         RETURN(-ENODATA);
1363
1364                 osc_obd = class_exp2obd(lov->lov_tgts[index]->ltd_exp);
1365                 if (!osc_obd)
1366                         RETURN(-EINVAL);
1367
1368                 /* copy UUID */
1369                 if (copy_to_user(data->ioc_pbuf2, obd2cli_tgt(osc_obd),
1370                                  min((int)data->ioc_plen2,
1371                                      (int)sizeof(struct obd_uuid))))
1372                         RETURN(-EFAULT);
1373
1374                 flags = uarg ? *(__u32 __user *)uarg : 0;
1375                 /* got statfs data */
1376                 rc = obd_statfs(NULL, lov->lov_tgts[index]->ltd_exp, &stat_buf,
1377                                 cfs_time_shift_64(-OBD_STATFS_CACHE_SECONDS),
1378                                 flags);
1379                 if (rc)
1380                         RETURN(rc);
1381                 if (copy_to_user(data->ioc_pbuf1, &stat_buf,
1382                                      min((int) data->ioc_plen1,
1383                                          (int) sizeof(stat_buf))))
1384                         RETURN(-EFAULT);
1385                 break;
1386         }
1387         case OBD_IOC_LOV_GET_CONFIG: {
1388                 struct obd_ioctl_data *data;
1389                 struct lov_desc *desc;
1390                 char *buf = NULL;
1391                 __u32 *genp;
1392
1393                 len = 0;
1394                 if (obd_ioctl_getdata(&buf, &len, uarg))
1395                         RETURN(-EINVAL);
1396
1397                 data = (struct obd_ioctl_data *)buf;
1398
1399                 if (sizeof(*desc) > data->ioc_inllen1) {
1400                         obd_ioctl_freedata(buf, len);
1401                         RETURN(-EINVAL);
1402                 }
1403
1404                 if (sizeof(uuidp->uuid) * count > data->ioc_inllen2) {
1405                         obd_ioctl_freedata(buf, len);
1406                         RETURN(-EINVAL);
1407                 }
1408
1409                 if (sizeof(__u32) * count > data->ioc_inllen3) {
1410                         obd_ioctl_freedata(buf, len);
1411                         RETURN(-EINVAL);
1412                 }
1413
1414                 desc = (struct lov_desc *)data->ioc_inlbuf1;
1415                 memcpy(desc, &(lov->desc), sizeof(*desc));
1416
1417                 uuidp = (struct obd_uuid *)data->ioc_inlbuf2;
1418                 genp = (__u32 *)data->ioc_inlbuf3;
1419                 /* the uuid will be empty for deleted OSTs */
1420                 for (i = 0; i < count; i++, uuidp++, genp++) {
1421                         if (!lov->lov_tgts[i])
1422                                 continue;
1423                         *uuidp = lov->lov_tgts[i]->ltd_uuid;
1424                         *genp = lov->lov_tgts[i]->ltd_gen;
1425                 }
1426
1427                 if (copy_to_user(uarg, buf, len))
1428                         rc = -EFAULT;
1429                 obd_ioctl_freedata(buf, len);
1430                 break;
1431         }
1432         case OBD_IOC_QUOTACTL: {
1433                 struct if_quotactl *qctl = karg;
1434                 struct lov_tgt_desc *tgt = NULL;
1435                 struct obd_quotactl *oqctl;
1436
1437                 if (qctl->qc_valid == QC_OSTIDX) {
1438                         if (count <= qctl->qc_idx)
1439                                 RETURN(-EINVAL);
1440
1441                         tgt = lov->lov_tgts[qctl->qc_idx];
1442                         if (!tgt || !tgt->ltd_exp)
1443                                 RETURN(-EINVAL);
1444                 } else if (qctl->qc_valid == QC_UUID) {
1445                         for (i = 0; i < count; i++) {
1446                                 tgt = lov->lov_tgts[i];
1447                                 if (!tgt ||
1448                                     !obd_uuid_equals(&tgt->ltd_uuid,
1449                                                      &qctl->obd_uuid))
1450                                         continue;
1451
1452                                 if (tgt->ltd_exp == NULL)
1453                                         RETURN(-EINVAL);
1454
1455                                 break;
1456                         }
1457                 } else {
1458                         RETURN(-EINVAL);
1459                 }
1460
1461                 if (i >= count)
1462                         RETURN(-EAGAIN);
1463
1464                 LASSERT(tgt && tgt->ltd_exp);
1465                 OBD_ALLOC_PTR(oqctl);
1466                 if (!oqctl)
1467                         RETURN(-ENOMEM);
1468
1469                 QCTL_COPY(oqctl, qctl);
1470                 rc = obd_quotactl(tgt->ltd_exp, oqctl);
1471                 if (rc == 0) {
1472                         QCTL_COPY(qctl, oqctl);
1473                         qctl->qc_valid = QC_OSTIDX;
1474                         qctl->obd_uuid = tgt->ltd_uuid;
1475                 }
1476                 OBD_FREE_PTR(oqctl);
1477                 break;
1478         }
1479         default: {
1480                 int set = 0;
1481
1482                 if (count == 0)
1483                         RETURN(-ENOTTY);
1484
1485                 for (i = 0; i < count; i++) {
1486                         int err;
1487                         struct obd_device *osc_obd;
1488
1489                         /* OST was disconnected */
1490                         if (!lov->lov_tgts[i] || !lov->lov_tgts[i]->ltd_exp)
1491                                 continue;
1492
1493                         /* ll_umount_begin() sets force flag but for lov, not
1494                          * osc. Let's pass it through */
1495                         osc_obd = class_exp2obd(lov->lov_tgts[i]->ltd_exp);
1496                         osc_obd->obd_force = obddev->obd_force;
1497                         err = obd_iocontrol(cmd, lov->lov_tgts[i]->ltd_exp,
1498                                             len, karg, uarg);
1499                         if (err == -ENODATA && cmd == OBD_IOC_POLL_QUOTACHECK) {
1500                                 RETURN(err);
1501                         } else if (err) {
1502                                 if (lov->lov_tgts[i]->ltd_active) {
1503                                         CDEBUG(err == -ENOTTY ?
1504                                                D_IOCTL : D_WARNING,
1505                                                "iocontrol OSC %s on OST "
1506                                                "idx %d cmd %x: err = %d\n",
1507                                                lov_uuid2str(lov, i),
1508                                                i, cmd, err);
1509                                         if (!rc)
1510                                                 rc = err;
1511                                 }
1512                         } else {
1513                                 set = 1;
1514                         }
1515                 }
1516                 if (!set && !rc)
1517                         rc = -EIO;
1518         }
1519         }
1520
1521         RETURN(rc);
1522 }
1523
1524 #define FIEMAP_BUFFER_SIZE 4096
1525
1526 /**
1527  * Non-zero fe_logical indicates that this is a continuation FIEMAP
1528  * call. The local end offset and the device are sent in the first
1529  * fm_extent. This function calculates the stripe number from the index.
1530  * This function returns a stripe_no on which mapping is to be restarted.
1531  *
1532  * This function returns fm_end_offset which is the in-OST offset at which
1533  * mapping should be restarted. If fm_end_offset=0 is returned then caller
1534  * will re-calculate proper offset in next stripe.
1535  * Note that the first extent is passed to lov_get_info via the value field.
1536  *
1537  * \param fiemap fiemap request header
1538  * \param lsm striping information for the file
1539  * \param fm_start logical start of mapping
1540  * \param fm_end logical end of mapping
1541  * \param start_stripe starting stripe will be returned in this
1542  */
1543 static obd_size fiemap_calc_fm_end_offset(struct ll_user_fiemap *fiemap,
1544                                           struct lov_stripe_md *lsm,
1545                                           obd_size fm_start,
1546                                           obd_size fm_end, int *start_stripe)
1547 {
1548         obd_size local_end = fiemap->fm_extents[0].fe_logical;
1549         obd_off lun_start, lun_end;
1550         obd_size fm_end_offset;
1551         int stripe_no = -1, i;
1552
1553         if (fiemap->fm_extent_count == 0 ||
1554             fiemap->fm_extents[0].fe_logical == 0)
1555                 return 0;
1556
1557         /* Find out stripe_no from ost_index saved in the fe_device */
1558         for (i = 0; i < lsm->lsm_stripe_count; i++) {
1559                 struct lov_oinfo *oinfo = lsm->lsm_oinfo[i];
1560
1561                 if (lov_oinfo_is_dummy(oinfo))
1562                         continue;
1563
1564                 if (oinfo->loi_ost_idx == fiemap->fm_extents[0].fe_device) {
1565                         stripe_no = i;
1566                         break;
1567                 }
1568         }
1569
1570         if (stripe_no == -1)
1571                 return -EINVAL;
1572
1573         /* If we have finished mapping on previous device, shift logical
1574          * offset to start of next device */
1575         if ((lov_stripe_intersects(lsm, stripe_no, fm_start, fm_end,
1576                                    &lun_start, &lun_end)) != 0 &&
1577                                    local_end < lun_end) {
1578                 fm_end_offset = local_end;
1579                 *start_stripe = stripe_no;
1580         } else {
1581                 /* This is a special value to indicate that caller should
1582                  * calculate offset in next stripe. */
1583                 fm_end_offset = 0;
1584                 *start_stripe = (stripe_no + 1) % lsm->lsm_stripe_count;
1585         }
1586
1587         return fm_end_offset;
1588 }
1589
1590 /**
1591  * We calculate on which OST the mapping will end. If the length of mapping
1592  * is greater than (stripe_size * stripe_count) then the last_stripe will
1593  * will be one just before start_stripe. Else we check if the mapping
1594  * intersects each OST and find last_stripe.
1595  * This function returns the last_stripe and also sets the stripe_count
1596  * over which the mapping is spread
1597  *
1598  * \param lsm striping information for the file
1599  * \param fm_start logical start of mapping
1600  * \param fm_end logical end of mapping
1601  * \param start_stripe starting stripe of the mapping
1602  * \param stripe_count the number of stripes across which to map is returned
1603  *
1604  * \retval last_stripe return the last stripe of the mapping
1605  */
1606 static int fiemap_calc_last_stripe(struct lov_stripe_md *lsm, obd_size fm_start,
1607                                    obd_size fm_end, int start_stripe,
1608                                    int *stripe_count)
1609 {
1610         int last_stripe;
1611         obd_off obd_start, obd_end;
1612         int i, j;
1613
1614         if (fm_end - fm_start > lsm->lsm_stripe_size * lsm->lsm_stripe_count) {
1615                 last_stripe = (start_stripe < 1 ? lsm->lsm_stripe_count - 1 :
1616                                                               start_stripe - 1);
1617                 *stripe_count = lsm->lsm_stripe_count;
1618         } else {
1619                 for (j = 0, i = start_stripe; j < lsm->lsm_stripe_count;
1620                      i = (i + 1) % lsm->lsm_stripe_count, j++) {
1621                         if ((lov_stripe_intersects(lsm, i, fm_start, fm_end,
1622                                                    &obd_start, &obd_end)) == 0)
1623                                 break;
1624                 }
1625                 *stripe_count = j;
1626                 last_stripe = (start_stripe + j - 1) %lsm->lsm_stripe_count;
1627         }
1628
1629         return last_stripe;
1630 }
1631
1632 /**
1633  * Set fe_device and copy extents from local buffer into main return buffer.
1634  *
1635  * \param fiemap fiemap request header
1636  * \param lcl_fm_ext array of local fiemap extents to be copied
1637  * \param ost_index OST index to be written into the fm_device field for each
1638                     extent
1639  * \param ext_count number of extents to be copied
1640  * \param current_extent where to start copying in main extent array
1641  */
1642 static void fiemap_prepare_and_copy_exts(struct ll_user_fiemap *fiemap,
1643                                          struct ll_fiemap_extent *lcl_fm_ext,
1644                                          int ost_index, unsigned int ext_count,
1645                                          int current_extent)
1646 {
1647         char *to;
1648         int ext;
1649
1650         for (ext = 0; ext < ext_count; ext++) {
1651                 lcl_fm_ext[ext].fe_device = ost_index;
1652                 lcl_fm_ext[ext].fe_flags |= FIEMAP_EXTENT_NET;
1653         }
1654
1655         /* Copy fm_extent's from fm_local to return buffer */
1656         to = (char *)fiemap + fiemap_count_to_size(current_extent);
1657         memcpy(to, lcl_fm_ext, ext_count * sizeof(struct ll_fiemap_extent));
1658 }
1659
1660 /**
1661  * Break down the FIEMAP request and send appropriate calls to individual OSTs.
1662  * This also handles the restarting of FIEMAP calls in case mapping overflows
1663  * the available number of extents in single call.
1664  */
1665 static int lov_fiemap(struct lov_obd *lov, __u32 keylen, void *key,
1666                       __u32 *vallen, void *val, struct lov_stripe_md *lsm)
1667 {
1668         struct ll_fiemap_info_key *fm_key = key;
1669         struct ll_user_fiemap *fiemap = val;
1670         struct ll_user_fiemap *fm_local = NULL;
1671         struct ll_fiemap_extent *lcl_fm_ext;
1672         int count_local;
1673         unsigned int get_num_extents = 0;
1674         int ost_index = 0, actual_start_stripe, start_stripe;
1675         obd_size fm_start, fm_end, fm_length, fm_end_offset;
1676         obd_size curr_loc;
1677         int current_extent = 0, rc = 0, i;
1678         /* Whether have we collected enough extents */
1679         bool enough = false;
1680         int ost_eof = 0; /* EOF for object */
1681         int ost_done = 0; /* done with required mapping for this OST? */
1682         int last_stripe;
1683         int cur_stripe = 0, cur_stripe_wrap = 0, stripe_count;
1684         unsigned int buffer_size = FIEMAP_BUFFER_SIZE;
1685
1686         if (!lsm_has_objects(lsm)) {
1687                 if (lsm && lsm_is_released(lsm) && (fm_key->fiemap.fm_start <
1688                     fm_key->oa.o_size)) {
1689                         /* released file, return a minimal FIEMAP if
1690                          * request fits in file-size.
1691                          */
1692                         fiemap->fm_mapped_extents = 1;
1693                         fiemap->fm_extents[0].fe_logical =
1694                                                 fm_key->fiemap.fm_start;
1695                         if (fm_key->fiemap.fm_start + fm_key->fiemap.fm_length <
1696                             fm_key->oa.o_size)
1697                                 fiemap->fm_extents[0].fe_length =
1698                                                 fm_key->fiemap.fm_length;
1699                         else
1700                                 fiemap->fm_extents[0].fe_length =
1701                                                 fm_key->oa.o_size -
1702                                                 fm_key->fiemap.fm_start;
1703                         fiemap->fm_extents[0].fe_flags |=
1704                                                 (FIEMAP_EXTENT_UNKNOWN |
1705                                                  FIEMAP_EXTENT_LAST);
1706                 }
1707                 GOTO(out, rc = 0);
1708         }
1709
1710         if (fiemap_count_to_size(fm_key->fiemap.fm_extent_count) < buffer_size)
1711                 buffer_size = fiemap_count_to_size(fm_key->fiemap.fm_extent_count);
1712
1713         OBD_ALLOC_LARGE(fm_local, buffer_size);
1714         if (fm_local == NULL)
1715                 GOTO(out, rc = -ENOMEM);
1716         lcl_fm_ext = &fm_local->fm_extents[0];
1717
1718         count_local = fiemap_size_to_count(buffer_size);
1719
1720         memcpy(fiemap, &fm_key->fiemap, sizeof(*fiemap));
1721         fm_start = fiemap->fm_start;
1722         fm_length = fiemap->fm_length;
1723         /* Calculate start stripe, last stripe and length of mapping */
1724         actual_start_stripe = start_stripe = lov_stripe_number(lsm, fm_start);
1725         fm_end = (fm_length == ~0ULL ? fm_key->oa.o_size :
1726                                                 fm_start + fm_length - 1);
1727         /* If fm_length != ~0ULL but fm_start+fm_length-1 exceeds file size */
1728         if (fm_end > fm_key->oa.o_size)
1729                 fm_end = fm_key->oa.o_size;
1730
1731         last_stripe = fiemap_calc_last_stripe(lsm, fm_start, fm_end,
1732                                             actual_start_stripe, &stripe_count);
1733
1734         fm_end_offset = fiemap_calc_fm_end_offset(fiemap, lsm, fm_start,
1735                                                   fm_end, &start_stripe);
1736         if (fm_end_offset == -EINVAL)
1737                 GOTO(out, rc = -EINVAL);
1738
1739         if (fiemap_count_to_size(fiemap->fm_extent_count) > *vallen)
1740                 fiemap->fm_extent_count = fiemap_size_to_count(*vallen);
1741         if (fiemap->fm_extent_count == 0) {
1742                 get_num_extents = 1;
1743                 count_local = 0;
1744         }
1745         /* Check each stripe */
1746         for (cur_stripe = start_stripe, i = 0; i < stripe_count;
1747              i++, cur_stripe = (cur_stripe + 1) % lsm->lsm_stripe_count) {
1748                 obd_size req_fm_len; /* Stores length of required mapping */
1749                 obd_size len_mapped_single_call;
1750                 obd_off lun_start, lun_end, obd_object_end;
1751                 unsigned int ext_count;
1752
1753                 cur_stripe_wrap = cur_stripe;
1754
1755                 /* Find out range of mapping on this stripe */
1756                 if ((lov_stripe_intersects(lsm, cur_stripe, fm_start, fm_end,
1757                                            &lun_start, &obd_object_end)) == 0)
1758                         continue;
1759
1760                 if (lov_oinfo_is_dummy(lsm->lsm_oinfo[cur_stripe]))
1761                         GOTO(out, rc = -EIO);
1762
1763                 /* If this is a continuation FIEMAP call and we are on
1764                  * starting stripe then lun_start needs to be set to
1765                  * fm_end_offset */
1766                 if (fm_end_offset != 0 && cur_stripe == start_stripe)
1767                         lun_start = fm_end_offset;
1768
1769                 if (fm_length != ~0ULL) {
1770                         /* Handle fm_start + fm_length overflow */
1771                         if (fm_start + fm_length < fm_start)
1772                                 fm_length = ~0ULL - fm_start;
1773                         lun_end = lov_size_to_stripe(lsm, fm_start + fm_length,
1774                                                      cur_stripe);
1775                 } else {
1776                         lun_end = ~0ULL;
1777                 }
1778
1779                 if (lun_start == lun_end)
1780                         continue;
1781
1782                 req_fm_len = obd_object_end - lun_start;
1783                 fm_local->fm_length = 0;
1784                 len_mapped_single_call = 0;
1785
1786                 /* If the output buffer is very large and the objects have many
1787                  * extents we may need to loop on a single OST repeatedly */
1788                 ost_eof = 0;
1789                 ost_done = 0;
1790                 do {
1791                         if (get_num_extents == 0) {
1792                                 /* Don't get too many extents. */
1793                                 if (current_extent + count_local >
1794                                     fiemap->fm_extent_count)
1795                                         count_local = fiemap->fm_extent_count -
1796                                                                  current_extent;
1797                         }
1798
1799                         lun_start += len_mapped_single_call;
1800                         fm_local->fm_length = req_fm_len - len_mapped_single_call;
1801                         req_fm_len = fm_local->fm_length;
1802                         fm_local->fm_extent_count = enough ? 1 : count_local;
1803                         fm_local->fm_mapped_extents = 0;
1804                         fm_local->fm_flags = fiemap->fm_flags;
1805
1806                         fm_key->oa.o_oi = lsm->lsm_oinfo[cur_stripe]->loi_oi;
1807                         ost_index = lsm->lsm_oinfo[cur_stripe]->loi_ost_idx;
1808
1809                         if (ost_index < 0 || ost_index >=lov->desc.ld_tgt_count)
1810                                 GOTO(out, rc = -EINVAL);
1811
1812                         /* If OST is inactive, return extent with UNKNOWN flag */
1813                         if (!lov->lov_tgts[ost_index]->ltd_active) {
1814                                 fm_local->fm_flags |= FIEMAP_EXTENT_LAST;
1815                                 fm_local->fm_mapped_extents = 1;
1816
1817                                 lcl_fm_ext[0].fe_logical = lun_start;
1818                                 lcl_fm_ext[0].fe_length = obd_object_end -
1819                                                                       lun_start;
1820                                 lcl_fm_ext[0].fe_flags |= FIEMAP_EXTENT_UNKNOWN;
1821
1822                                 goto inactive_tgt;
1823                         }
1824
1825                         fm_local->fm_start = lun_start;
1826                         fm_local->fm_flags &= ~FIEMAP_FLAG_DEVICE_ORDER;
1827                         memcpy(&fm_key->fiemap, fm_local, sizeof(*fm_local));
1828                         *vallen=fiemap_count_to_size(fm_local->fm_extent_count);
1829                         rc = obd_get_info(NULL,
1830                                           lov->lov_tgts[ost_index]->ltd_exp,
1831                                           keylen, key, vallen, fm_local, lsm);
1832                         if (rc != 0)
1833                                 GOTO(out, rc);
1834
1835 inactive_tgt:
1836                         ext_count = fm_local->fm_mapped_extents;
1837                         if (ext_count == 0) {
1838                                 ost_done = 1;
1839                                 /* If last stripe has hole at the end,
1840                                  * then we need to return */
1841                                 if (cur_stripe_wrap == last_stripe) {
1842                                         fiemap->fm_mapped_extents = 0;
1843                                         goto finish;
1844                                 }
1845                                 break;
1846                         } else if (enough) {
1847                                 /*
1848                                  * We've collected enough extents and there are
1849                                  * more extents after it.
1850                                  */
1851                                 goto finish;
1852                         }
1853
1854                         /* If we just need num of extents then go to next device */
1855                         if (get_num_extents) {
1856                                 current_extent += ext_count;
1857                                 break;
1858                         }
1859
1860                         len_mapped_single_call = lcl_fm_ext[ext_count-1].fe_logical -
1861                                   lun_start + lcl_fm_ext[ext_count - 1].fe_length;
1862
1863                         /* Have we finished mapping on this device? */
1864                         if (req_fm_len <= len_mapped_single_call)
1865                                 ost_done = 1;
1866
1867                         /* Clear the EXTENT_LAST flag which can be present on
1868                          * last extent */
1869                         if (lcl_fm_ext[ext_count-1].fe_flags & FIEMAP_EXTENT_LAST)
1870                                 lcl_fm_ext[ext_count - 1].fe_flags &=
1871                                                             ~FIEMAP_EXTENT_LAST;
1872
1873                         curr_loc = lov_stripe_size(lsm,
1874                                            lcl_fm_ext[ext_count - 1].fe_logical+
1875                                            lcl_fm_ext[ext_count - 1].fe_length,
1876                                            cur_stripe);
1877                         if (curr_loc >= fm_key->oa.o_size)
1878                                 ost_eof = 1;
1879
1880                         fiemap_prepare_and_copy_exts(fiemap, lcl_fm_ext,
1881                                                      ost_index, ext_count,
1882                                                      current_extent);
1883
1884                         current_extent += ext_count;
1885
1886                         /* Ran out of available extents? */
1887                         if (current_extent >= fiemap->fm_extent_count)
1888                                 enough = true;
1889                 } while (ost_done == 0 && ost_eof == 0);
1890
1891                 if (cur_stripe_wrap == last_stripe)
1892                         goto finish;
1893         }
1894
1895 finish:
1896         /* Indicate that we are returning device offsets unless file just has
1897          * single stripe */
1898         if (lsm->lsm_stripe_count > 1)
1899                 fiemap->fm_flags |= FIEMAP_FLAG_DEVICE_ORDER;
1900
1901         if (get_num_extents)
1902                 goto skip_last_device_calc;
1903
1904         /* Check if we have reached the last stripe and whether mapping for that
1905          * stripe is done. */
1906         if (cur_stripe_wrap == last_stripe) {
1907                 if (ost_done || ost_eof)
1908                         fiemap->fm_extents[current_extent - 1].fe_flags |=
1909                                                              FIEMAP_EXTENT_LAST;
1910         }
1911
1912 skip_last_device_calc:
1913         fiemap->fm_mapped_extents = current_extent;
1914
1915 out:
1916         if (fm_local)
1917                 OBD_FREE_LARGE(fm_local, buffer_size);
1918         return rc;
1919 }
1920
1921 static int lov_get_info(const struct lu_env *env, struct obd_export *exp,
1922                         __u32 keylen, void *key, __u32 *vallen, void *val,
1923                         struct lov_stripe_md *lsm)
1924 {
1925         struct obd_device *obddev = class_exp2obd(exp);
1926         struct lov_obd *lov = &obddev->u.lov;
1927         int rc;
1928         ENTRY;
1929
1930         if (!vallen || !val)
1931                 RETURN(-EFAULT);
1932
1933         obd_getref(obddev);
1934
1935         if (KEY_IS(KEY_LOVDESC)) {
1936                 struct lov_desc *desc_ret = val;
1937                 *desc_ret = lov->desc;
1938
1939                 GOTO(out, rc = 0);
1940         } else if (KEY_IS(KEY_FIEMAP)) {
1941                 rc = lov_fiemap(lov, keylen, key, vallen, val, lsm);
1942                 GOTO(out, rc);
1943         } else if (KEY_IS(KEY_TGT_COUNT)) {
1944                 *((int *)val) = lov->desc.ld_tgt_count;
1945                 GOTO(out, rc = 0);
1946         }
1947
1948         rc = -EINVAL;
1949
1950 out:
1951         obd_putref(obddev);
1952         RETURN(rc);
1953 }
1954
1955 static int lov_set_info_async(const struct lu_env *env, struct obd_export *exp,
1956                               obd_count keylen, void *key, obd_count vallen,
1957                               void *val, struct ptlrpc_request_set *set)
1958 {
1959         struct obd_device *obddev = class_exp2obd(exp);
1960         struct lov_obd *lov = &obddev->u.lov;
1961         obd_count count;
1962         int i, rc = 0, err;
1963         struct lov_tgt_desc *tgt;
1964         int do_inactive = 0;
1965         int no_set = 0;
1966         ENTRY;
1967
1968         if (set == NULL) {
1969                 no_set = 1;
1970                 set = ptlrpc_prep_set();
1971                 if (!set)
1972                         RETURN(-ENOMEM);
1973         }
1974
1975         obd_getref(obddev);
1976         count = lov->desc.ld_tgt_count;
1977
1978         if (KEY_IS(KEY_CHECKSUM)) {
1979                 do_inactive = 1;
1980         } else if (KEY_IS(KEY_CACHE_SET)) {
1981                 LASSERT(lov->lov_cache == NULL);
1982                 lov->lov_cache = val;
1983                 do_inactive = 1;
1984         }
1985
1986         for (i = 0; i < count; i++) {
1987                 tgt = lov->lov_tgts[i];
1988
1989                 /* OST was disconnected */
1990                 if (!tgt || !tgt->ltd_exp)
1991                         continue;
1992
1993                 /* OST is inactive and we don't want inactive OSCs */
1994                 if (!tgt->ltd_active && !do_inactive)
1995                         continue;
1996
1997                 err = obd_set_info_async(env, tgt->ltd_exp, keylen, key,
1998                                          vallen, val, set);
1999                 if (!rc)
2000                         rc = err;
2001         }
2002
2003         obd_putref(obddev);
2004         if (no_set) {
2005                 err = ptlrpc_set_wait(set);
2006                 if (!rc)
2007                         rc = err;
2008                 ptlrpc_set_destroy(set);
2009         }
2010         RETURN(rc);
2011 }
2012
2013 void lov_stripe_lock(struct lov_stripe_md *md)
2014 __acquires(&md->lsm_lock)
2015 {
2016         LASSERT(md->lsm_lock_owner != current_pid());
2017         spin_lock(&md->lsm_lock);
2018         LASSERT(md->lsm_lock_owner == 0);
2019         md->lsm_lock_owner = current_pid();
2020 }
2021
2022 void lov_stripe_unlock(struct lov_stripe_md *md)
2023 __releases(&md->lsm_lock)
2024 {
2025         LASSERT(md->lsm_lock_owner == current_pid());
2026         md->lsm_lock_owner = 0;
2027         spin_unlock(&md->lsm_lock);
2028 }
2029
2030 static int lov_quotactl(struct obd_device *obd, struct obd_export *exp,
2031                         struct obd_quotactl *oqctl)
2032 {
2033         struct lov_obd      *lov = &obd->u.lov;
2034         struct lov_tgt_desc *tgt;
2035         __u64                curspace = 0;
2036         __u64                bhardlimit = 0;
2037         int                  i, rc = 0;
2038         ENTRY;
2039
2040         if (oqctl->qc_cmd != LUSTRE_Q_QUOTAON &&
2041             oqctl->qc_cmd != LUSTRE_Q_QUOTAOFF &&
2042             oqctl->qc_cmd != Q_GETOQUOTA &&
2043             oqctl->qc_cmd != Q_INITQUOTA &&
2044             oqctl->qc_cmd != LUSTRE_Q_SETQUOTA &&
2045             oqctl->qc_cmd != Q_FINVALIDATE) {
2046                 CERROR("%s: bad quota opc %x for lov obd\n",
2047                        obd->obd_name, oqctl->qc_cmd);
2048                 RETURN(-EFAULT);
2049         }
2050
2051         /* for lov tgt */
2052         obd_getref(obd);
2053         for (i = 0; i < lov->desc.ld_tgt_count; i++) {
2054                 int err;
2055
2056                 tgt = lov->lov_tgts[i];
2057
2058                 if (!tgt)
2059                         continue;
2060
2061                 if (!tgt->ltd_active || tgt->ltd_reap) {
2062                         if (oqctl->qc_cmd == Q_GETOQUOTA &&
2063                             lov->lov_tgts[i]->ltd_activate) {
2064                                 rc = -ENETDOWN;
2065                                 CERROR("ost %d is inactive\n", i);
2066                         } else {
2067                                 CDEBUG(D_HA, "ost %d is inactive\n", i);
2068                         }
2069                         continue;
2070                 }
2071
2072                 err = obd_quotactl(tgt->ltd_exp, oqctl);
2073                 if (err) {
2074                         if (tgt->ltd_active && !rc)
2075                                 rc = err;
2076                         continue;
2077                 }
2078
2079                 if (oqctl->qc_cmd == Q_GETOQUOTA) {
2080                         curspace += oqctl->qc_dqblk.dqb_curspace;
2081                         bhardlimit += oqctl->qc_dqblk.dqb_bhardlimit;
2082                 }
2083         }
2084         obd_putref(obd);
2085
2086         if (oqctl->qc_cmd == Q_GETOQUOTA) {
2087                 oqctl->qc_dqblk.dqb_curspace = curspace;
2088                 oqctl->qc_dqblk.dqb_bhardlimit = bhardlimit;
2089         }
2090         RETURN(rc);
2091 }
2092
2093 static int lov_quotacheck(struct obd_device *obd, struct obd_export *exp,
2094                           struct obd_quotactl *oqctl)
2095 {
2096         struct lov_obd *lov = &obd->u.lov;
2097         int             i, rc = 0;
2098         ENTRY;
2099
2100         obd_getref(obd);
2101
2102         for (i = 0; i < lov->desc.ld_tgt_count; i++) {
2103                 if (!lov->lov_tgts[i])
2104                         continue;
2105
2106                 /* Skip quota check on the administratively disabled OSTs. */
2107                 if (!lov->lov_tgts[i]->ltd_activate) {
2108                         CWARN("lov idx %d was administratively disabled, "
2109                               "skip quotacheck on it.\n", i);
2110                         continue;
2111                 }
2112
2113                 if (!lov->lov_tgts[i]->ltd_active) {
2114                         CERROR("lov idx %d inactive\n", i);
2115                         rc = -EIO;
2116                         goto out;
2117                 }
2118         }
2119
2120         for (i = 0; i < lov->desc.ld_tgt_count; i++) {
2121                 int err;
2122
2123                 if (!lov->lov_tgts[i] || !lov->lov_tgts[i]->ltd_activate)
2124                         continue;
2125
2126                 err = obd_quotacheck(lov->lov_tgts[i]->ltd_exp, oqctl);
2127                 if (err && !rc)
2128                         rc = err;
2129         }
2130
2131 out:
2132         obd_putref(obd);
2133
2134         RETURN(rc);
2135 }
2136
2137 static struct obd_ops lov_obd_ops = {
2138         .o_owner                = THIS_MODULE,
2139         .o_setup                = lov_setup,
2140         .o_precleanup           = lov_precleanup,
2141         .o_cleanup              = lov_cleanup,
2142         .o_connect              = lov_connect,
2143         .o_disconnect           = lov_disconnect,
2144         .o_statfs               = lov_statfs,
2145         .o_statfs_async         = lov_statfs_async,
2146         .o_packmd               = lov_packmd,
2147         .o_unpackmd             = lov_unpackmd,
2148         .o_getattr_async        = lov_getattr_async,
2149         .o_setattr_async        = lov_setattr_async,
2150         .o_change_cbdata        = lov_change_cbdata,
2151         .o_find_cbdata          = lov_find_cbdata,
2152         .o_iocontrol            = lov_iocontrol,
2153         .o_get_info             = lov_get_info,
2154         .o_set_info_async       = lov_set_info_async,
2155         .o_notify               = lov_notify,
2156         .o_pool_new             = lov_pool_new,
2157         .o_pool_rem             = lov_pool_remove,
2158         .o_pool_add             = lov_pool_add,
2159         .o_pool_del             = lov_pool_del,
2160         .o_getref               = lov_getref,
2161         .o_putref               = lov_putref,
2162         .o_quotactl             = lov_quotactl,
2163         .o_quotacheck           = lov_quotacheck,
2164 };
2165
2166 struct kmem_cache *lov_oinfo_slab;
2167
2168 static int __init lov_init(void)
2169 {
2170         bool enable_proc = true;
2171         struct obd_type *type;
2172         int rc;
2173         ENTRY;
2174
2175         /* print an address of _any_ initialized kernel symbol from this
2176          * module, to allow debugging with gdb that doesn't support data
2177          * symbols from modules.*/
2178         CDEBUG(D_INFO, "Lustre LOV module (%p).\n", &lov_caches);
2179
2180         rc = lu_kmem_init(lov_caches);
2181         if (rc)
2182                 return rc;
2183
2184         lov_oinfo_slab = kmem_cache_create("lov_oinfo",
2185                                            sizeof(struct lov_oinfo), 0,
2186                                            SLAB_HWCACHE_ALIGN, NULL);
2187         if (lov_oinfo_slab == NULL) {
2188                 lu_kmem_fini(lov_caches);
2189                 return -ENOMEM;
2190         }
2191
2192         type = class_search_type(LUSTRE_LOD_NAME);
2193         if (type != NULL && type->typ_procsym != NULL)
2194                 enable_proc = false;
2195
2196         rc = class_register_type(&lov_obd_ops, NULL, enable_proc, NULL,
2197                                  LUSTRE_LOV_NAME, &lov_device_type);
2198
2199         if (rc) {
2200                 kmem_cache_destroy(lov_oinfo_slab);
2201                 lu_kmem_fini(lov_caches);
2202         }
2203
2204         RETURN(rc);
2205 }
2206
2207 static void /*__exit*/ lov_exit(void)
2208 {
2209         class_unregister_type(LUSTRE_LOV_NAME);
2210         kmem_cache_destroy(lov_oinfo_slab);
2211         lu_kmem_fini(lov_caches);
2212 }
2213
2214 MODULE_AUTHOR("Sun Microsystems, Inc. <http://www.lustre.org/>");
2215 MODULE_DESCRIPTION("Lustre Logical Object Volume OBD driver");
2216 MODULE_LICENSE("GPL");
2217
2218 cfs_module(lov, LUSTRE_VERSION_STRING, lov_init, lov_exit);