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_fid.h>
  59
  60 #include "lov_internal.h"
  61
  62 /* Keep a refcount of lov->tgt usage to prevent racing with addition/deletion.
  63    Any function that expects lov_tgts to remain stationary must take a ref. */
  64 static void lov_getref(struct obd_device *obd)
  65 {
  66         struct lov_obd *lov = &obd->u.lov;
  67
  68         /* nobody gets through here until lov_putref is done */
  69         mutex_lock(&lov->lov_lock);
  70         atomic_inc(&lov->lov_refcount);
  71         mutex_unlock(&lov->lov_lock);
  72         return;
  73 }
  74
  75 static void __lov_del_obd(struct obd_device *obd, struct lov_tgt_desc *tgt);
  76
  77 static void lov_putref(struct obd_device *obd)
  78 {
  79         struct lov_obd *lov = &obd->u.lov;
  80
  81         mutex_lock(&lov->lov_lock);
  82         /* ok to dec to 0 more than once -- ltd_exp's will be null */
  83         if (atomic_dec_and_test(&lov->lov_refcount) && lov->lov_death_row) {
  84                 struct list_head kill = LIST_HEAD_INIT(kill);
  85                 struct lov_tgt_desc *tgt, *n;
  86                 int i;
  87
  88                 CDEBUG(D_CONFIG, "destroying %d lov targets\n",
  89                        lov->lov_death_row);
  90                 for (i = 0; i < lov->desc.ld_tgt_count; i++) {
  91                         tgt = lov->lov_tgts[i];
  92
  93                         if (!tgt || !tgt->ltd_reap)
  94                                 continue;
  95                         list_add(&tgt->ltd_kill, &kill);
  96                         /* XXX - right now there is a dependency on ld_tgt_count
  97                          * being the maximum tgt index for computing the
  98                          * mds_max_easize. So we can't shrink it. */
  99                         lov_ost_pool_remove(&lov->lov_packed, i);
 100                         lov->lov_tgts[i] = NULL;
 101                         lov->lov_death_row--;
 102                 }
 103                 mutex_unlock(&lov->lov_lock);
 104
 105                 list_for_each_entry_safe(tgt, n, &kill, ltd_kill) {
 106                         list_del(&tgt->ltd_kill);
 107                         /* Disconnect */
 108                         __lov_del_obd(obd, tgt);
 109                 }
 110         } else {
 111                 mutex_unlock(&lov->lov_lock);
 112         }
 113 }
 114
 115 static int lov_set_osc_active(struct obd_device *obd, struct obd_uuid *uuid,
 116                               enum obd_notify_event ev);
 117 static int lov_notify(struct obd_device *obd, struct obd_device *watched,
 118                       enum obd_notify_event ev, void *data);
 119
 120 int lov_connect_obd(struct obd_device *obd, __u32 index, int activate,
 121                     struct obd_connect_data *data)
 122 {
 123         struct lov_obd *lov = &obd->u.lov;
 124         struct obd_uuid *tgt_uuid;
 125         struct obd_device *tgt_obd;
 126         static struct obd_uuid lov_osc_uuid = { "LOV_OSC_UUID" };
 127         struct obd_import *imp;
 128         int rc;
 129         ENTRY;
 130
 131         if (lov->lov_tgts[index] == NULL)
 132                 RETURN(-EINVAL);
 133
 134         tgt_uuid = &lov->lov_tgts[index]->ltd_uuid;
 135         tgt_obd = lov->lov_tgts[index]->ltd_obd;
 136
 137         if (!tgt_obd->obd_set_up) {
 138                 CERROR("Target %s not set up\n", obd_uuid2str(tgt_uuid));
 139                 RETURN(-EINVAL);
 140         }
 141
 142         /* override the sp_me from lov */
 143         tgt_obd->u.cli.cl_sp_me = lov->lov_sp_me;
 144
 145         if (data && (data->ocd_connect_flags & OBD_CONNECT_INDEX))
 146                 data->ocd_index = index;
 147
 148         /*
 149          * Divine LOV knows that OBDs under it are OSCs.
 150          */
 151         imp = tgt_obd->u.cli.cl_import;
 152
 153         if (activate) {
 154                 tgt_obd->obd_no_recov = 0;
 155                 /* FIXME this is probably supposed to be
 156                    ptlrpc_set_import_active.  Horrible naming. */
 157                 ptlrpc_activate_import(imp);
 158         }
 159
 160         rc = obd_register_observer(tgt_obd, obd);
 161         if (rc) {
 162                 CERROR("Target %s register_observer error %d\n",
 163                        obd_uuid2str(tgt_uuid), rc);
 164                 RETURN(rc);
 165         }
 166
 167
 168         if (imp->imp_invalid) {
 169                 CDEBUG(D_CONFIG, "not connecting OSC %s; administratively "
 170                        "disabled\n", obd_uuid2str(tgt_uuid));
 171                 RETURN(0);
 172         }
 173
 174         rc = obd_connect(NULL, &lov->lov_tgts[index]->ltd_exp, tgt_obd,
 175                          &lov_osc_uuid, data, NULL);
 176         if (rc || !lov->lov_tgts[index]->ltd_exp) {
 177                 CERROR("Target %s connect error %d\n",
 178                        obd_uuid2str(tgt_uuid), rc);
 179                 RETURN(-ENODEV);
 180         }
 181
 182         lov->lov_tgts[index]->ltd_reap = 0;
 183
 184         CDEBUG(D_CONFIG, "Connected tgt idx %d %s (%s) %sactive\n", index,
 185                obd_uuid2str(tgt_uuid), tgt_obd->obd_name, activate ? "":"in");
 186
 187         if (lov->targets_proc_entry != NULL) {
 188                 struct proc_dir_entry *osc_symlink;
 189                 struct obd_device *osc_obd;
 190
 191                 osc_obd = lov->lov_tgts[index]->ltd_exp->exp_obd;
 192
 193                 LASSERT(osc_obd != NULL);
 194                 LASSERT(osc_obd->obd_magic == OBD_DEVICE_MAGIC);
 195                 LASSERT(osc_obd->obd_type->typ_name != NULL);
 196
 197                 osc_symlink = lprocfs_add_symlink(osc_obd->obd_name,
 198                                                   lov->targets_proc_entry,
 199                                                   "../../../%s/%s",
 200                                                   osc_obd->obd_type->typ_name,
 201                                                   osc_obd->obd_name);
 202                 if (osc_symlink == NULL) {
 203                         CERROR("cannot register LOV target "
 204                                "/proc/fs/lustre/%s/%s/target_obds/%s\n",
 205                                obd->obd_type->typ_name, obd->obd_name,
 206                                osc_obd->obd_name);
 207                 }
 208         }
 209         RETURN(0);
 210 }
 211
 212 static int lov_connect(const struct lu_env *env,
 213                        struct obd_export **exp, struct obd_device *obd,
 214                        struct obd_uuid *cluuid, struct obd_connect_data *data,
 215                        void *localdata)
 216 {
 217         struct lov_obd *lov = &obd->u.lov;
 218         struct lov_tgt_desc *tgt;
 219         struct lustre_handle conn;
 220         int i, rc;
 221         ENTRY;
 222
 223         CDEBUG(D_CONFIG, "connect #%d\n", lov->lov_connects);
 224
 225         rc = class_connect(&conn, obd, cluuid);
 226         if (rc)
 227                 RETURN(rc);
 228
 229         *exp = class_conn2export(&conn);
 230
 231         /* Why should there ever be more than 1 connect? */
 232         lov->lov_connects++;
 233         LASSERT(lov->lov_connects == 1);
 234
 235         memset(&lov->lov_ocd, 0, sizeof(lov->lov_ocd));
 236         if (data)
 237                 lov->lov_ocd = *data;
 238
 239         lov->targets_proc_entry = lprocfs_register("target_obds",
 240                                                    obd->obd_proc_entry,
 241                                                    NULL, NULL);
 242         if (IS_ERR(lov->targets_proc_entry)) {
 243                 CERROR("%s: cannot register "
 244                        "/proc/fs/lustre/%s/%s/target_obds\n",
 245                        obd->obd_name, obd->obd_type->typ_name, obd->obd_name);
 246                 lov->targets_proc_entry = NULL;
 247         }
 248
 249         obd_getref(obd);
 250         for (i = 0; i < lov->desc.ld_tgt_count; i++) {
 251                 tgt = lov->lov_tgts[i];
 252                 if (!tgt || obd_uuid_empty(&tgt->ltd_uuid))
 253                         continue;
 254                 /* Flags will be lowest common denominator */
 255                 rc = lov_connect_obd(obd, i, tgt->ltd_activate, &lov->lov_ocd);
 256                 if (rc) {
 257                         CERROR("%s: lov connect tgt %d failed: %d\n",
 258                                obd->obd_name, i, rc);
 259                         continue;
 260                 }
 261                 /* connect to administrative disabled ost */
 262                 if (!lov->lov_tgts[i]->ltd_exp)
 263                         continue;
 264
 265                 rc = lov_notify(obd, lov->lov_tgts[i]->ltd_exp->exp_obd,
 266                                 OBD_NOTIFY_CONNECT, (void *)&i);
 267                 if (rc) {
 268                         CERROR("%s error sending notify %d\n",
 269                                obd->obd_name, rc);
 270                 }
 271         }
 272         obd_putref(obd);
 273
 274         RETURN(0);
 275 }
 276
 277 static int lov_disconnect_obd(struct obd_device *obd, struct lov_tgt_desc *tgt)
 278 {
 279         struct lov_obd *lov = &obd->u.lov;
 280         struct obd_device *osc_obd;
 281         int rc;
 282         ENTRY;
 283
 284         osc_obd = class_exp2obd(tgt->ltd_exp);
 285         CDEBUG(D_CONFIG, "%s: disconnecting target %s\n",
 286                obd->obd_name, osc_obd->obd_name);
 287
 288         if (tgt->ltd_active) {
 289                 tgt->ltd_active = 0;
 290                 lov->desc.ld_active_tgt_count--;
 291                 tgt->ltd_exp->exp_obd->obd_inactive = 1;
 292         }
 293
 294         if (osc_obd) {
 295                 /* Pass it on to our clients.
 296                  * XXX This should be an argument to disconnect,
 297                  * XXX not a back-door flag on the OBD.  Ah well.
 298                  */
 299                 osc_obd->obd_force = obd->obd_force;
 300                 osc_obd->obd_fail = obd->obd_fail;
 301                 osc_obd->obd_no_recov = obd->obd_no_recov;
 302
 303                 if (lov->targets_proc_entry != NULL)
 304                         lprocfs_remove_proc_entry(osc_obd->obd_name,
 305                                                   lov->targets_proc_entry);
 306         }
 307
 308         obd_register_observer(osc_obd, NULL);
 309
 310         rc = obd_disconnect(tgt->ltd_exp);
 311         if (rc) {
 312                 CERROR("Target %s disconnect error %d\n",
 313                        tgt->ltd_uuid.uuid, rc);
 314                 rc = 0;
 315         }
 316
 317         tgt->ltd_exp = NULL;
 318         RETURN(0);
 319 }
 320
 321 static int lov_disconnect(struct obd_export *exp)
 322 {
 323         struct obd_device *obd = class_exp2obd(exp);
 324         struct lov_obd *lov = &obd->u.lov;
 325         int i, rc;
 326         ENTRY;
 327
 328         if (!lov->lov_tgts)
 329                 goto out;
 330
 331         /* Only disconnect the underlying layers on the final disconnect. */
 332         lov->lov_connects--;
 333         if (lov->lov_connects != 0) {
 334                 /* why should there be more than 1 connect? */
 335                 CERROR("disconnect #%d\n", lov->lov_connects);
 336                 goto out;
 337         }
 338
 339         /* Let's hold another reference so lov_del_obd doesn't spin through
 340            putref every time */
 341         obd_getref(obd);
 342
 343         for (i = 0; i < lov->desc.ld_tgt_count; i++) {
 344                 if (lov->lov_tgts[i] && lov->lov_tgts[i]->ltd_exp) {
 345                         /* Disconnection is the last we know about an obd */
 346                         lov_del_target(obd, i, NULL, lov->lov_tgts[i]->ltd_gen);
 347                 }
 348         }
 349         obd_putref(obd);
 350
 351         if (lov->targets_proc_entry != NULL)
 352                 lprocfs_remove(&lov->targets_proc_entry);
 353
 354 out:
 355         rc = class_disconnect(exp); /* bz 9811 */
 356         RETURN(rc);
 357 }
 358
 359 /* Error codes:
 360  *
 361  *  -EINVAL  : UUID can't be found in the LOV's target list
 362  *  -ENOTCONN: The UUID is found, but the target connection is bad (!)
 363  *  -EBADF   : The UUID is found, but the OBD is the wrong type (!)
 364  *  any >= 0 : is log target index
 365  */
 366 static int lov_set_osc_active(struct obd_device *obd, struct obd_uuid *uuid,
 367                               enum obd_notify_event ev)
 368 {
 369         struct lov_obd *lov = &obd->u.lov;
 370         struct lov_tgt_desc *tgt;
 371         int index, activate, active;
 372         ENTRY;
 373
 374         CDEBUG(D_INFO, "Searching in lov %p for uuid %s event(%d)\n",
 375                lov, uuid->uuid, ev);
 376
 377         obd_getref(obd);
 378         for (index = 0; index < lov->desc.ld_tgt_count; index++) {
 379                 tgt = lov->lov_tgts[index];
 380                 if (!tgt)
 381                         continue;
 382                 /*
 383                  * LU-642, initially inactive OSC could miss the obd_connect,
 384                  * we make up for it here.
 385                  */
 386                 if (ev == OBD_NOTIFY_ACTIVATE && tgt->ltd_exp == NULL &&
 387                     obd_uuid_equals(uuid, &tgt->ltd_uuid)) {
 388                         struct obd_uuid lov_osc_uuid = {"LOV_OSC_UUID"};
 389
 390                         obd_connect(NULL, &tgt->ltd_exp, tgt->ltd_obd,
 391                                     &lov_osc_uuid, &lov->lov_ocd, NULL);
 392                 }
 393                 if (!tgt->ltd_exp)
 394                         continue;
 395
 396                 CDEBUG(D_INFO, "lov idx %d is %s conn "LPX64"\n",
 397                        index, obd_uuid2str(&tgt->ltd_uuid),
 398                        tgt->ltd_exp->exp_handle.h_cookie);
 399                 if (obd_uuid_equals(uuid, &tgt->ltd_uuid))
 400                         break;
 401         }
 402
 403         if (index == lov->desc.ld_tgt_count)
 404                 GOTO(out, index = -EINVAL);
 405
 406         if (ev == OBD_NOTIFY_DEACTIVATE || ev == OBD_NOTIFY_ACTIVATE) {
 407                 activate = (ev == OBD_NOTIFY_ACTIVATE) ? 1 : 0;
 408
 409                 if (lov->lov_tgts[index]->ltd_activate == activate) {
 410                         CDEBUG(D_INFO, "OSC %s already %sactivate!\n",
 411                                uuid->uuid, activate ? "" : "de");
 412                 } else {
 413                         lov->lov_tgts[index]->ltd_activate = activate;
 414                         CDEBUG(D_CONFIG, "%sactivate OSC %s\n",
 415                                activate ? "" : "de", obd_uuid2str(uuid));
 416                 }
 417
 418         } else if (ev == OBD_NOTIFY_INACTIVE || ev == OBD_NOTIFY_ACTIVE) {
 419                 active = (ev == OBD_NOTIFY_ACTIVE) ? 1 : 0;
 420
 421                 if (lov->lov_tgts[index]->ltd_active == active) {
 422                         CDEBUG(D_INFO, "OSC %s already %sactive!\n",
 423                                uuid->uuid, active ? "" : "in");
 424                         GOTO(out, index);
 425                 } else {
 426                         CDEBUG(D_CONFIG, "Marking OSC %s %sactive\n",
 427                                obd_uuid2str(uuid), active ? "" : "in");
 428                 }
 429
 430                 lov->lov_tgts[index]->ltd_active = active;
 431                 if (active) {
 432                         lov->desc.ld_active_tgt_count++;
 433                         lov->lov_tgts[index]->ltd_exp->exp_obd->obd_inactive = 0;
 434                 } else {
 435                         lov->desc.ld_active_tgt_count--;
 436                         lov->lov_tgts[index]->ltd_exp->exp_obd->obd_inactive = 1;
 437                 }
 438         } else {
 439                 CERROR("%s: unknown event %d for uuid %s\n", obd->obd_name,
 440                        ev, uuid->uuid);
 441         }
 442
 443  out:
 444         obd_putref(obd);
 445         RETURN(index);
 446 }
 447
 448 static int lov_notify(struct obd_device *obd, struct obd_device *watched,
 449                       enum obd_notify_event ev, void *data)
 450 {
 451         int rc = 0;
 452         struct lov_obd *lov = &obd->u.lov;
 453         ENTRY;
 454
 455         down_read(&lov->lov_notify_lock);
 456         if (!lov->lov_connects) {
 457                 up_read(&lov->lov_notify_lock);
 458                 RETURN(rc);
 459         }
 460
 461         if (ev == OBD_NOTIFY_ACTIVE || ev == OBD_NOTIFY_INACTIVE ||
 462             ev == OBD_NOTIFY_ACTIVATE || ev == OBD_NOTIFY_DEACTIVATE) {
 463                 struct obd_uuid *uuid;
 464
 465                 LASSERT(watched);
 466
 467                 if (strcmp(watched->obd_type->typ_name, LUSTRE_OSC_NAME)) {
 468                         up_read(&lov->lov_notify_lock);
 469                         CERROR("unexpected notification of %s %s!\n",
 470                                watched->obd_type->typ_name,
 471                                watched->obd_name);
 472                         RETURN(-EINVAL);
 473                 }
 474                 uuid = &watched->u.cli.cl_target_uuid;
 475
 476                 /* Set OSC as active before notifying the observer, so the
 477                  * observer can use the OSC normally.
 478                  */
 479                 rc = lov_set_osc_active(obd, uuid, ev);
 480                 if (rc < 0) {
 481                         up_read(&lov->lov_notify_lock);
 482                         CERROR("event(%d) of %s failed: %d\n", ev,
 483                                obd_uuid2str(uuid), rc);
 484                         RETURN(rc);
 485                 }
 486                 /* active event should be pass lov target index as data */
 487                 data = &rc;
 488         }
 489
 490         /* Pass the notification up the chain. */
 491         if (watched) {
 492                 rc = obd_notify_observer(obd, watched, ev, data);
 493         } else {
 494                 /* NULL watched means all osc's in the lov (only for syncs) */
 495                 /* sync event should be send lov idx as data */
 496                 struct lov_obd *lov = &obd->u.lov;
 497                 int i, is_sync;
 498
 499                 data = &i;
 500                 is_sync = (ev == OBD_NOTIFY_SYNC) ||
 501                           (ev == OBD_NOTIFY_SYNC_NONBLOCK);
 502
 503                 obd_getref(obd);
 504                 for (i = 0; i < lov->desc.ld_tgt_count; i++) {
 505                         if (!lov->lov_tgts[i])
 506                                 continue;
 507
 508                         /* don't send sync event if target not
 509                          * connected/activated */
 510                         if (is_sync &&  !lov->lov_tgts[i]->ltd_active)
 511                                 continue;
 512
 513                         rc = obd_notify_observer(obd, lov->lov_tgts[i]->ltd_obd,
 514                                                  ev, data);
 515                         if (rc) {
 516                                 CERROR("%s: notify %s of %s failed %d\n",
 517                                        obd->obd_name,
 518                                        obd->obd_observer->obd_name,
 519                                        lov->lov_tgts[i]->ltd_obd->obd_name,
 520                                        rc);
 521                         }
 522                 }
 523                 obd_putref(obd);
 524         }
 525
 526         up_read(&lov->lov_notify_lock);
 527         RETURN(rc);
 528 }
 529
 530 static int lov_add_target(struct obd_device *obd, struct obd_uuid *uuidp,
 531                           __u32 index, int gen, int active)
 532 {
 533         struct lov_obd *lov = &obd->u.lov;
 534         struct lov_tgt_desc *tgt;
 535         struct obd_device *tgt_obd;
 536         int rc;
 537         ENTRY;
 538
 539         CDEBUG(D_CONFIG, "uuid:%s idx:%d gen:%d active:%d\n",
 540                uuidp->uuid, index, gen, active);
 541
 542         if (gen <= 0) {
 543                 CERROR("request to add OBD %s with invalid generation: %d\n",
 544                        uuidp->uuid, gen);
 545                 RETURN(-EINVAL);
 546         }
 547
 548         tgt_obd = class_find_client_obd(uuidp, LUSTRE_OSC_NAME,
 549                                         &obd->obd_uuid);
 550         if (tgt_obd == NULL)
 551                 RETURN(-EINVAL);
 552
 553         mutex_lock(&lov->lov_lock);
 554
 555         if ((index < lov->lov_tgt_size) && (lov->lov_tgts[index] != NULL)) {
 556                 tgt = lov->lov_tgts[index];
 557                 CERROR("UUID %s already assigned at LOV target index %d\n",
 558                        obd_uuid2str(&tgt->ltd_uuid), index);
 559                 mutex_unlock(&lov->lov_lock);
 560                 RETURN(-EEXIST);
 561         }
 562
 563         if (index >= lov->lov_tgt_size) {
 564                 /* We need to reallocate the lov target array. */
 565                 struct lov_tgt_desc **newtgts, **old = NULL;
 566                 __u32 newsize, oldsize = 0;
 567
 568                 newsize = max(lov->lov_tgt_size, (__u32)2);
 569                 while (newsize < index + 1)
 570                         newsize = newsize << 1;
 571                 OBD_ALLOC(newtgts, sizeof(*newtgts) * newsize);
 572                 if (newtgts == NULL) {
 573                         mutex_unlock(&lov->lov_lock);
 574                         RETURN(-ENOMEM);
 575                 }
 576
 577                 if (lov->lov_tgt_size) {
 578                         memcpy(newtgts, lov->lov_tgts, sizeof(*newtgts) *
 579                                lov->lov_tgt_size);
 580                         old = lov->lov_tgts;
 581                         oldsize = lov->lov_tgt_size;
 582                 }
 583
 584                 lov->lov_tgts = newtgts;
 585                 lov->lov_tgt_size = newsize;
 586                 smp_rmb();
 587                 if (old)
 588                         OBD_FREE(old, sizeof(*old) * oldsize);
 589
 590                 CDEBUG(D_CONFIG, "tgts: %p size: %d\n",
 591                        lov->lov_tgts, lov->lov_tgt_size);
 592         }
 593
 594         OBD_ALLOC_PTR(tgt);
 595         if (!tgt) {
 596                 mutex_unlock(&lov->lov_lock);
 597                 RETURN(-ENOMEM);
 598         }
 599
 600         rc = lov_ost_pool_add(&lov->lov_packed, index, lov->lov_tgt_size);
 601         if (rc) {
 602                 mutex_unlock(&lov->lov_lock);
 603                 OBD_FREE_PTR(tgt);
 604                 RETURN(rc);
 605         }
 606
 607         tgt->ltd_uuid = *uuidp;
 608         tgt->ltd_obd = tgt_obd;
 609         /* XXX - add a sanity check on the generation number. */
 610         tgt->ltd_gen = gen;
 611         tgt->ltd_index = index;
 612         tgt->ltd_activate = active;
 613         lov->lov_tgts[index] = tgt;
 614         if (index >= lov->desc.ld_tgt_count)
 615                 lov->desc.ld_tgt_count = index + 1;
 616
 617         mutex_unlock(&lov->lov_lock);
 618
 619         CDEBUG(D_CONFIG, "idx=%d ltd_gen=%d ld_tgt_count=%d\n",
 620                 index, tgt->ltd_gen, lov->desc.ld_tgt_count);
 621
 622         rc = obd_notify(obd, tgt_obd, OBD_NOTIFY_CREATE, &index);
 623
 624         if (lov->lov_connects == 0) {
 625                 /* lov_connect hasn't been called yet. We'll do the
 626                    lov_connect_obd on this target when that fn first runs,
 627                    because we don't know the connect flags yet. */
 628                 RETURN(0);
 629         }
 630
 631         obd_getref(obd);
 632
 633         rc = lov_connect_obd(obd, index, active, &lov->lov_ocd);
 634         if (rc)
 635                 GOTO(out, rc);
 636
 637         /* connect to administrative disabled ost */
 638         if (!tgt->ltd_exp)
 639                 GOTO(out, rc = 0);
 640
 641         if (lov->lov_cache != NULL) {
 642                 rc = obd_set_info_async(NULL, tgt->ltd_exp,
 643                                 sizeof(KEY_CACHE_SET), KEY_CACHE_SET,
 644                                 sizeof(struct cl_client_cache), lov->lov_cache,
 645                                 NULL);
 646                 if (rc < 0)
 647                         GOTO(out, rc);
 648         }
 649
 650         rc = lov_notify(obd, tgt->ltd_exp->exp_obd,
 651                         active ? OBD_NOTIFY_CONNECT : OBD_NOTIFY_INACTIVE,
 652                         (void *)&index);
 653
 654 out:
 655         if (rc) {
 656                 CERROR("add failed (%d), deleting %s\n", rc,
 657                        obd_uuid2str(&tgt->ltd_uuid));
 658                 lov_del_target(obd, index, NULL, 0);
 659         }
 660         obd_putref(obd);
 661         RETURN(rc);
 662 }
 663
 664 /* Schedule a target for deletion */
 665 int lov_del_target(struct obd_device *obd, __u32 index,
 666                    struct obd_uuid *uuidp, int gen)
 667 {
 668         struct lov_obd *lov = &obd->u.lov;
 669         int count = lov->desc.ld_tgt_count;
 670         int rc = 0;
 671         ENTRY;
 672
 673         if (index >= count) {
 674                 CERROR("LOV target index %d >= number of LOV OBDs %d.\n",
 675                        index, count);
 676                 RETURN(-EINVAL);
 677         }
 678
 679         /* to make sure there's no ongoing lov_notify() now */
 680         down_write(&lov->lov_notify_lock);
 681         obd_getref(obd);
 682
 683         if (!lov->lov_tgts[index]) {
 684                 CERROR("LOV target at index %d is not setup.\n", index);
 685                 GOTO(out, rc = -EINVAL);
 686         }
 687
 688         if (uuidp && !obd_uuid_equals(uuidp, &lov->lov_tgts[index]->ltd_uuid)) {
 689                 CERROR("LOV target UUID %s at index %d doesn't match %s.\n",
 690                        lov_uuid2str(lov, index), index,
 691                        obd_uuid2str(uuidp));
 692                 GOTO(out, rc = -EINVAL);
 693         }
 694
 695         CDEBUG(D_CONFIG, "uuid: %s idx: %d gen: %d exp: %p active: %d\n",
 696                lov_uuid2str(lov, index), index,
 697                lov->lov_tgts[index]->ltd_gen, lov->lov_tgts[index]->ltd_exp,
 698                lov->lov_tgts[index]->ltd_active);
 699
 700         lov->lov_tgts[index]->ltd_reap = 1;
 701         lov->lov_death_row++;
 702         /* we really delete it from obd_putref */
 703 out:
 704         obd_putref(obd);
 705         up_write(&lov->lov_notify_lock);
 706
 707         RETURN(rc);
 708 }
 709
 710 static void __lov_del_obd(struct obd_device *obd, struct lov_tgt_desc *tgt)
 711 {
 712         struct obd_device *osc_obd;
 713
 714         LASSERT(tgt);
 715         LASSERT(tgt->ltd_reap);
 716
 717         osc_obd = class_exp2obd(tgt->ltd_exp);
 718
 719         CDEBUG(D_CONFIG, "Removing tgt %s : %s\n",
 720                tgt->ltd_uuid.uuid,
 721                osc_obd ? osc_obd->obd_name : "<no obd>");
 722
 723         if (tgt->ltd_exp)
 724                 lov_disconnect_obd(obd, tgt);
 725
 726         OBD_FREE_PTR(tgt);
 727
 728         /* Manual cleanup - no cleanup logs to clean up the osc's.  We must
 729            do it ourselves. And we can't do it from lov_cleanup,
 730            because we just lost our only reference to it. */
 731         if (osc_obd)
 732                 class_manual_cleanup(osc_obd);
 733 }
 734
 735 void lov_fix_desc_stripe_size(__u64 *val)
 736 {
 737         if (*val < LOV_MIN_STRIPE_SIZE) {
 738                 if (*val != 0)
 739                         LCONSOLE_INFO("Increasing default stripe size to "
 740                                       "minimum %u\n",
 741                                       LOV_DESC_STRIPE_SIZE_DEFAULT);
 742                 *val = LOV_DESC_STRIPE_SIZE_DEFAULT;
 743         } else if (*val & (LOV_MIN_STRIPE_SIZE - 1)) {
 744                 *val &= ~(LOV_MIN_STRIPE_SIZE - 1);
 745                 LCONSOLE_WARN("Changing default stripe size to "LPU64" (a "
 746                               "multiple of %u)\n",
 747                               *val, LOV_MIN_STRIPE_SIZE);
 748         }
 749 }
 750
 751 void lov_fix_desc_stripe_count(__u32 *val)
 752 {
 753         if (*val == 0)
 754                 *val = 1;
 755 }
 756
 757 void lov_fix_desc_pattern(__u32 *val)
 758 {
 759         /* from lov_setstripe */
 760         if ((*val != 0) && (*val != LOV_PATTERN_RAID0)) {
 761                 LCONSOLE_WARN("Unknown stripe pattern: %#x\n", *val);
 762                 *val = 0;
 763         }
 764 }
 765
 766 void lov_fix_desc_qos_maxage(__u32 *val)
 767 {
 768         if (*val == 0)
 769                 *val = LOV_DESC_QOS_MAXAGE_DEFAULT;
 770 }
 771
 772 void lov_fix_desc(struct lov_desc *desc)
 773 {
 774         lov_fix_desc_stripe_size(&desc->ld_default_stripe_size);
 775         lov_fix_desc_stripe_count(&desc->ld_default_stripe_count);
 776         lov_fix_desc_pattern(&desc->ld_pattern);
 777         lov_fix_desc_qos_maxage(&desc->ld_qos_maxage);
 778 }
 779
 780 int lov_setup(struct obd_device *obd, struct lustre_cfg *lcfg)
 781 {
 782         struct lov_desc *desc;
 783         struct lov_obd *lov = &obd->u.lov;
 784 #ifdef CONFIG_PROC_FS
 785         struct obd_type *type;
 786 #endif
 787         int rc;
 788         ENTRY;
 789
 790         if (LUSTRE_CFG_BUFLEN(lcfg, 1) < 1) {
 791                 CERROR("LOV setup requires a descriptor\n");
 792                 RETURN(-EINVAL);
 793         }
 794
 795         desc = (struct lov_desc *)lustre_cfg_buf(lcfg, 1);
 796
 797         if (sizeof(*desc) > LUSTRE_CFG_BUFLEN(lcfg, 1)) {
 798                 CERROR("descriptor size wrong: %d > %d\n",
 799                        (int)sizeof(*desc), LUSTRE_CFG_BUFLEN(lcfg, 1));
 800                 RETURN(-EINVAL);
 801         }
 802
 803         if (desc->ld_magic != LOV_DESC_MAGIC) {
 804                 if (desc->ld_magic == __swab32(LOV_DESC_MAGIC)) {
 805                             CDEBUG(D_OTHER, "%s: Swabbing lov desc %p\n",
 806                                    obd->obd_name, desc);
 807                             lustre_swab_lov_desc(desc);
 808                 } else {
 809                         CERROR("%s: Bad lov desc magic: %#x\n",
 810                                obd->obd_name, desc->ld_magic);
 811                         RETURN(-EINVAL);
 812                 }
 813         }
 814
 815         lov_fix_desc(desc);
 816
 817         desc->ld_active_tgt_count = 0;
 818         lov->desc = *desc;
 819         lov->lov_tgt_size = 0;
 820
 821         mutex_init(&lov->lov_lock);
 822         atomic_set(&lov->lov_refcount, 0);
 823         lov->lov_sp_me = LUSTRE_SP_CLI;
 824
 825         init_rwsem(&lov->lov_notify_lock);
 826
 827         lov->lov_pools_hash_body = cfs_hash_create("POOLS", HASH_POOLS_CUR_BITS,
 828                                                    HASH_POOLS_MAX_BITS,
 829                                                    HASH_POOLS_BKT_BITS, 0,
 830                                                    CFS_HASH_MIN_THETA,
 831                                                    CFS_HASH_MAX_THETA,
 832                                                    &pool_hash_operations,
 833                                                    CFS_HASH_DEFAULT);
 834         INIT_LIST_HEAD(&lov->lov_pool_list);
 835         lov->lov_pool_count = 0;
 836         rc = lov_ost_pool_init(&lov->lov_packed, 0);
 837         if (rc)
 838                 GOTO(out, rc);
 839
 840 #ifdef CONFIG_PROC_FS
 841         obd->obd_vars = lprocfs_lov_obd_vars;
 842         /* If this is true then both client (lov) and server
 843          * (lod) are on the same node. The lod layer if loaded
 844          * first will register the lov proc directory. In that
 845          * case obd->obd_type->typ_procroot will be not set.
 846          * Instead we use type->typ_procsym as the parent. */
 847         type = class_search_type(LUSTRE_LOD_NAME);
 848         if (type != NULL && type->typ_procsym != NULL) {
 849                 obd->obd_proc_entry = lprocfs_register(obd->obd_name,
 850                                                        type->typ_procsym,
 851                                                        obd->obd_vars, obd);
 852                 if (IS_ERR(obd->obd_proc_entry)) {
 853                         rc = PTR_ERR(obd->obd_proc_entry);
 854                         CERROR("error %d setting up lprocfs for %s\n", rc,
 855                                obd->obd_name);
 856                         obd->obd_proc_entry = NULL;
 857                 }
 858         } else {
 859                 rc = lprocfs_obd_setup(obd);
 860         }
 861
 862         if (rc == 0) {
 863                 rc = lprocfs_seq_create(obd->obd_proc_entry, "target_obd",
 864                                         0444, &lov_proc_target_fops, obd);
 865                 if (rc)
 866                         CWARN("Error adding the target_obd file\n");
 867
 868                 lov->lov_pool_proc_entry = lprocfs_register("pools",
 869                                                             obd->obd_proc_entry,
 870                                                             NULL, NULL);
 871                 if (IS_ERR(lov->lov_pool_proc_entry)) {
 872                         rc = PTR_ERR(lov->lov_pool_proc_entry);
 873                         CERROR("error %d setting up lprocfs for pools\n", rc);
 874                         lov->lov_pool_proc_entry = NULL;
 875                 }
 876         }
 877 #endif
 878         RETURN(0);
 879
 880 out:
 881         return rc;
 882 }
 883
 884 static int lov_precleanup(struct obd_device *obd, enum obd_cleanup_stage stage)
 885 {
 886         int rc = 0;
 887         struct lov_obd *lov = &obd->u.lov;
 888
 889         ENTRY;
 890
 891         switch (stage) {
 892         case OBD_CLEANUP_EARLY: {
 893                 int i;
 894                 for (i = 0; i < lov->desc.ld_tgt_count; i++) {
 895                         if (!lov->lov_tgts[i] || !lov->lov_tgts[i]->ltd_active)
 896                                 continue;
 897                         obd_precleanup(class_exp2obd(lov->lov_tgts[i]->ltd_exp),
 898                                        OBD_CLEANUP_EARLY);
 899                 }
 900                 break;
 901         }
 902         default:
 903                 break;
 904         }
 905
 906         RETURN(rc);
 907 }
 908
 909 static int lov_cleanup(struct obd_device *obd)
 910 {
 911         struct lov_obd *lov = &obd->u.lov;
 912         struct list_head *pos, *tmp;
 913         struct pool_desc *pool;
 914         ENTRY;
 915
 916         list_for_each_safe(pos, tmp, &lov->lov_pool_list) {
 917                 pool = list_entry(pos, struct pool_desc, pool_list);
 918                 /* free pool structs */
 919                 CDEBUG(D_INFO, "delete pool %p\n", pool);
 920                 /* In the function below, .hs_keycmp resolves to
 921                  * pool_hashkey_keycmp() */
 922                 /* coverity[overrun-buffer-val] */
 923                 lov_pool_del(obd, pool->pool_name);
 924         }
 925         cfs_hash_putref(lov->lov_pools_hash_body);
 926         lov_ost_pool_free(&lov->lov_packed);
 927
 928         lprocfs_obd_cleanup(obd);
 929         if (lov->lov_tgts) {
 930                 int i;
 931                 obd_getref(obd);
 932                 for (i = 0; i < lov->desc.ld_tgt_count; i++) {
 933                         if (!lov->lov_tgts[i])
 934                                 continue;
 935
 936                         /* Inactive targets may never have connected */
 937                         if (lov->lov_tgts[i]->ltd_active ||
 938                             atomic_read(&lov->lov_refcount))
 939                                 /* We should never get here - these
 940                                  * should have been removed in the
 941                                  * disconnect. */
 942                                 CERROR("%s: lov tgt %d not cleaned! "
 943                                        "deathrow=%d, lovrc=%d\n",
 944                                        obd->obd_name, i, lov->lov_death_row,
 945                                        atomic_read(&lov->lov_refcount));
 946                         lov_del_target(obd, i, NULL, 0);
 947                 }
 948                 obd_putref(obd);
 949                 OBD_FREE(lov->lov_tgts, sizeof(*lov->lov_tgts) *
 950                          lov->lov_tgt_size);
 951                 lov->lov_tgt_size = 0;
 952         }
 953
 954         if (lov->lov_cache != NULL) {
 955                 cl_cache_decref(lov->lov_cache);
 956                 lov->lov_cache = NULL;
 957         }
 958
 959         RETURN(0);
 960 }
 961
 962 int lov_process_config_base(struct obd_device *obd, struct lustre_cfg *lcfg,
 963                             __u32 *indexp, int *genp)
 964 {
 965         struct obd_uuid obd_uuid;
 966         int cmd;
 967         int rc = 0;
 968         ENTRY;
 969
 970         switch(cmd = lcfg->lcfg_command) {
 971         case LCFG_LOV_ADD_OBD:
 972         case LCFG_LOV_ADD_INA:
 973         case LCFG_LOV_DEL_OBD: {
 974                 __u32 index;
 975                 int gen;
 976                 /* lov_modify_tgts add  0:lov_mdsA  1:ost1_UUID  2:0  3:1 */
 977                 if (LUSTRE_CFG_BUFLEN(lcfg, 1) > sizeof(obd_uuid.uuid))
 978                         GOTO(out, rc = -EINVAL);
 979
 980                 obd_str2uuid(&obd_uuid,  lustre_cfg_buf(lcfg, 1));
 981
 982                 if (sscanf(lustre_cfg_buf(lcfg, 2), "%u", indexp) != 1)
 983                         GOTO(out, rc = -EINVAL);
 984                 if (sscanf(lustre_cfg_buf(lcfg, 3), "%d", genp) != 1)
 985                         GOTO(out, rc = -EINVAL);
 986                 index = *indexp;
 987                 gen = *genp;
 988                 if (cmd == LCFG_LOV_ADD_OBD)
 989                         rc = lov_add_target(obd, &obd_uuid, index, gen, 1);
 990                 else if (cmd == LCFG_LOV_ADD_INA)
 991                         rc = lov_add_target(obd, &obd_uuid, index, gen, 0);
 992                 else
 993                         rc = lov_del_target(obd, index, &obd_uuid, gen);
 994                 GOTO(out, rc);
 995         }
 996         case LCFG_PARAM: {
 997                 struct lov_desc *desc = &(obd->u.lov.desc);
 998
 999                 if (!desc)
1000                         GOTO(out, rc = -EINVAL);
1001
1002                 rc = class_process_proc_param(PARAM_LOV, obd->obd_vars,
1003                                               lcfg, obd);
1004                 if (rc > 0)
1005                         rc = 0;
1006                 GOTO(out, rc);
1007         }
1008         case LCFG_POOL_NEW:
1009         case LCFG_POOL_ADD:
1010         case LCFG_POOL_DEL:
1011         case LCFG_POOL_REM:
1012                 GOTO(out, rc);
1013
1014         default: {
1015                 CERROR("Unknown command: %d\n", lcfg->lcfg_command);
1016                 GOTO(out, rc = -EINVAL);
1017
1018         }
1019         }
1020 out:
1021         RETURN(rc);
1022 }
1023
1024 #define ASSERT_LSM_MAGIC(lsmp)                                                  \
1025 do {                                                                            \
1026         LASSERT((lsmp) != NULL);                                                \
1027         LASSERTF(((lsmp)->lsm_magic == LOV_MAGIC_V1 ||                          \
1028                  (lsmp)->lsm_magic == LOV_MAGIC_V3),                            \
1029                  "%p->lsm_magic=%x\n", (lsmp), (lsmp)->lsm_magic);              \
1030 } while (0)
1031
1032 int lov_getattr_interpret(struct ptlrpc_request_set *rqset, void *data, int rc)
1033 {
1034         struct lov_request_set *lovset = (struct lov_request_set *)data;
1035         int err;
1036         ENTRY;
1037
1038         /* don't do attribute merge if this aysnc op failed */
1039         if (rc)
1040                 atomic_set(&lovset->set_completes, 0);
1041         err = lov_fini_getattr_set(lovset);
1042         RETURN(rc ? rc : err);
1043 }
1044
1045 int lov_statfs_interpret(struct ptlrpc_request_set *rqset, void *data, int rc)
1046 {
1047         struct lov_request_set *lovset = (struct lov_request_set *)data;
1048         int err;
1049         ENTRY;
1050
1051         if (rc)
1052                 atomic_set(&lovset->set_completes, 0);
1053
1054         err = lov_fini_statfs_set(lovset);
1055         RETURN(rc ? rc : err);
1056 }
1057
1058 static int lov_statfs_async(struct obd_export *exp, struct obd_info *oinfo,
1059                             __u64 max_age, struct ptlrpc_request_set *rqset)
1060 {
1061         struct obd_device      *obd = class_exp2obd(exp);
1062         struct lov_request_set *set;
1063         struct lov_request *req;
1064         struct list_head *pos;
1065         struct lov_obd *lov;
1066         int rc = 0;
1067         ENTRY;
1068
1069         LASSERT(oinfo != NULL);
1070         LASSERT(oinfo->oi_osfs != NULL);
1071
1072         lov = &obd->u.lov;
1073         rc = lov_prep_statfs_set(obd, oinfo, &set);
1074         if (rc)
1075                 RETURN(rc);
1076
1077         list_for_each(pos, &set->set_list) {
1078                 req = list_entry(pos, struct lov_request, rq_link);
1079                 rc = obd_statfs_async(lov->lov_tgts[req->rq_idx]->ltd_exp,
1080                                       &req->rq_oi, max_age, rqset);
1081                 if (rc)
1082                         break;
1083         }
1084
1085         if (rc || list_empty(&rqset->set_requests)) {
1086                 int err;
1087                 if (rc)
1088                         atomic_set(&set->set_completes, 0);
1089                 err = lov_fini_statfs_set(set);
1090                 RETURN(rc ? rc : err);
1091         }
1092
1093         LASSERT(rqset->set_interpret == NULL);
1094         rqset->set_interpret = lov_statfs_interpret;
1095         rqset->set_arg = (void *)set;
1096         RETURN(0);
1097 }
1098
1099 static int lov_statfs(const struct lu_env *env, struct obd_export *exp,
1100                       struct obd_statfs *osfs, __u64 max_age, __u32 flags)
1101 {
1102         struct ptlrpc_request_set *set = NULL;
1103         struct obd_info oinfo = { { { 0 } } };
1104         int rc = 0;
1105         ENTRY;
1106
1107
1108         /* for obdclass we forbid using obd_statfs_rqset, but prefer using async
1109          * statfs requests */
1110         set = ptlrpc_prep_set();
1111         if (set == NULL)
1112                 RETURN(-ENOMEM);
1113
1114         oinfo.oi_osfs = osfs;
1115         oinfo.oi_flags = flags;
1116         rc = lov_statfs_async(exp, &oinfo, max_age, set);
1117         if (rc == 0)
1118                 rc = ptlrpc_set_wait(set);
1119         ptlrpc_set_destroy(set);
1120
1121         RETURN(rc);
1122 }
1123
1124 static int lov_iocontrol(unsigned int cmd, struct obd_export *exp, int len,
1125                          void *karg, void __user *uarg)
1126 {
1127         struct obd_device *obddev = class_exp2obd(exp);
1128         struct lov_obd *lov = &obddev->u.lov;
1129         int i = 0, rc = 0, count = lov->desc.ld_tgt_count;
1130         struct obd_uuid *uuidp;
1131         ENTRY;
1132
1133         switch (cmd) {
1134         case IOC_OBD_STATFS: {
1135                 struct obd_ioctl_data *data = karg;
1136                 struct obd_device *osc_obd;
1137                 struct obd_statfs stat_buf = {0};
1138                 __u32 index;
1139                 __u32 flags;
1140
1141                 memcpy(&index, data->ioc_inlbuf2, sizeof(__u32));
1142                 if ((index >= count))
1143                         RETURN(-ENODEV);
1144
1145                 if (!lov->lov_tgts[index])
1146                         /* Try again with the next index */
1147                         RETURN(-EAGAIN);
1148                 if (!lov->lov_tgts[index]->ltd_active)
1149                         RETURN(-ENODATA);
1150
1151                 osc_obd = class_exp2obd(lov->lov_tgts[index]->ltd_exp);
1152                 if (!osc_obd)
1153                         RETURN(-EINVAL);
1154
1155                 /* copy UUID */
1156                 if (copy_to_user(data->ioc_pbuf2, obd2cli_tgt(osc_obd),
1157                                  min((int)data->ioc_plen2,
1158                                      (int)sizeof(struct obd_uuid))))
1159                         RETURN(-EFAULT);
1160
1161                 flags = uarg ? *(__u32 __user *)uarg : 0;
1162                 /* got statfs data */
1163                 rc = obd_statfs(NULL, lov->lov_tgts[index]->ltd_exp, &stat_buf,
1164                                 cfs_time_shift_64(-OBD_STATFS_CACHE_SECONDS),
1165                                 flags);
1166                 if (rc)
1167                         RETURN(rc);
1168                 if (copy_to_user(data->ioc_pbuf1, &stat_buf,
1169                                      min((int) data->ioc_plen1,
1170                                          (int) sizeof(stat_buf))))
1171                         RETURN(-EFAULT);
1172                 break;
1173         }
1174         case OBD_IOC_LOV_GET_CONFIG: {
1175                 struct obd_ioctl_data *data;
1176                 struct lov_desc *desc;
1177                 char *buf = NULL;
1178                 __u32 *genp;
1179
1180                 len = 0;
1181                 if (obd_ioctl_getdata(&buf, &len, uarg))
1182                         RETURN(-EINVAL);
1183
1184                 data = (struct obd_ioctl_data *)buf;
1185
1186                 if (sizeof(*desc) > data->ioc_inllen1) {
1187                         obd_ioctl_freedata(buf, len);
1188                         RETURN(-EINVAL);
1189                 }
1190
1191                 if (sizeof(uuidp->uuid) * count > data->ioc_inllen2) {
1192                         obd_ioctl_freedata(buf, len);
1193                         RETURN(-EINVAL);
1194                 }
1195
1196                 if (sizeof(__u32) * count > data->ioc_inllen3) {
1197                         obd_ioctl_freedata(buf, len);
1198                         RETURN(-EINVAL);
1199                 }
1200
1201                 desc = (struct lov_desc *)data->ioc_inlbuf1;
1202                 memcpy(desc, &(lov->desc), sizeof(*desc));
1203
1204                 uuidp = (struct obd_uuid *)data->ioc_inlbuf2;
1205                 genp = (__u32 *)data->ioc_inlbuf3;
1206                 /* the uuid will be empty for deleted OSTs */
1207                 for (i = 0; i < count; i++, uuidp++, genp++) {
1208                         if (!lov->lov_tgts[i])
1209                                 continue;
1210                         *uuidp = lov->lov_tgts[i]->ltd_uuid;
1211                         *genp = lov->lov_tgts[i]->ltd_gen;
1212                 }
1213
1214                 if (copy_to_user(uarg, buf, len))
1215                         rc = -EFAULT;
1216                 obd_ioctl_freedata(buf, len);
1217                 break;
1218         }
1219         case OBD_IOC_QUOTACTL: {
1220                 struct if_quotactl *qctl = karg;
1221                 struct lov_tgt_desc *tgt = NULL;
1222                 struct obd_quotactl *oqctl;
1223
1224                 if (qctl->qc_valid == QC_OSTIDX) {
1225                         if (count <= qctl->qc_idx)
1226                                 RETURN(-EINVAL);
1227
1228                         tgt = lov->lov_tgts[qctl->qc_idx];
1229                         if (!tgt || !tgt->ltd_exp)
1230                                 RETURN(-EINVAL);
1231                 } else if (qctl->qc_valid == QC_UUID) {
1232                         for (i = 0; i < count; i++) {
1233                                 tgt = lov->lov_tgts[i];
1234                                 if (!tgt ||
1235                                     !obd_uuid_equals(&tgt->ltd_uuid,
1236                                                      &qctl->obd_uuid))
1237                                         continue;
1238
1239                                 if (tgt->ltd_exp == NULL)
1240                                         RETURN(-EINVAL);
1241
1242                                 break;
1243                         }
1244                 } else {
1245                         RETURN(-EINVAL);
1246                 }
1247
1248                 if (i >= count)
1249                         RETURN(-EAGAIN);
1250
1251                 LASSERT(tgt && tgt->ltd_exp);
1252                 OBD_ALLOC_PTR(oqctl);
1253                 if (!oqctl)
1254                         RETURN(-ENOMEM);
1255
1256                 QCTL_COPY(oqctl, qctl);
1257                 rc = obd_quotactl(tgt->ltd_exp, oqctl);
1258                 if (rc == 0) {
1259                         QCTL_COPY(qctl, oqctl);
1260                         qctl->qc_valid = QC_OSTIDX;
1261                         qctl->obd_uuid = tgt->ltd_uuid;
1262                 }
1263                 OBD_FREE_PTR(oqctl);
1264                 break;
1265         }
1266         default: {
1267                 int set = 0;
1268
1269                 if (count == 0)
1270                         RETURN(-ENOTTY);
1271
1272                 for (i = 0; i < count; i++) {
1273                         int err;
1274                         struct obd_device *osc_obd;
1275
1276                         /* OST was disconnected */
1277                         if (!lov->lov_tgts[i] || !lov->lov_tgts[i]->ltd_exp)
1278                                 continue;
1279
1280                         /* ll_umount_begin() sets force flag but for lov, not
1281                          * osc. Let's pass it through */
1282                         osc_obd = class_exp2obd(lov->lov_tgts[i]->ltd_exp);
1283                         osc_obd->obd_force = obddev->obd_force;
1284                         err = obd_iocontrol(cmd, lov->lov_tgts[i]->ltd_exp,
1285                                             len, karg, uarg);
1286                         if (err == -ENODATA && cmd == OBD_IOC_POLL_QUOTACHECK) {
1287                                 RETURN(err);
1288                         } else if (err) {
1289                                 if (lov->lov_tgts[i]->ltd_active) {
1290                                         CDEBUG(err == -ENOTTY ?
1291                                                D_IOCTL : D_WARNING,
1292                                                "iocontrol OSC %s on OST "
1293                                                "idx %d cmd %x: err = %d\n",
1294                                                lov_uuid2str(lov, i),
1295                                                i, cmd, err);
1296                                         if (!rc)
1297                                                 rc = err;
1298                                 }
1299                         } else {
1300                                 set = 1;
1301                         }
1302                 }
1303                 if (!set && !rc)
1304                         rc = -EIO;
1305         }
1306         }
1307
1308         RETURN(rc);
1309 }
1310
1311 static int lov_get_info(const struct lu_env *env, struct obd_export *exp,
1312                         __u32 keylen, void *key,
1313                         __u32 *vallen, void *val,
1314                         struct lov_stripe_md *lsm)
1315 {
1316         struct obd_device *obddev = class_exp2obd(exp);
1317         struct lov_obd *lov = &obddev->u.lov;
1318         int rc;
1319         ENTRY;
1320
1321         if (!vallen || !val)
1322                 RETURN(-EFAULT);
1323
1324         obd_getref(obddev);
1325
1326         if (KEY_IS(KEY_LOVDESC)) {
1327                 struct lov_desc *desc_ret = val;
1328                 *desc_ret = lov->desc;
1329
1330                 GOTO(out, rc = 0);
1331         } else if (KEY_IS(KEY_TGT_COUNT)) {
1332                 *((int *)val) = lov->desc.ld_tgt_count;
1333                 GOTO(out, rc = 0);
1334         }
1335
1336         rc = -EINVAL;
1337
1338 out:
1339         obd_putref(obddev);
1340         RETURN(rc);
1341 }
1342
1343 static int lov_set_info_async(const struct lu_env *env, struct obd_export *exp,
1344                               __u32 keylen, void *key,
1345                               __u32 vallen, void *val,
1346                               struct ptlrpc_request_set *set)
1347 {
1348         struct obd_device *obddev = class_exp2obd(exp);
1349         struct lov_obd *lov = &obddev->u.lov;
1350         struct lov_tgt_desc *tgt;
1351         int do_inactive = 0;
1352         int no_set = 0;
1353         u32 count;
1354         u32 i;
1355         int rc = 0;
1356         int err;
1357         ENTRY;
1358
1359         if (set == NULL) {
1360                 no_set = 1;
1361                 set = ptlrpc_prep_set();
1362                 if (!set)
1363                         RETURN(-ENOMEM);
1364         }
1365
1366         obd_getref(obddev);
1367         count = lov->desc.ld_tgt_count;
1368
1369         if (KEY_IS(KEY_CHECKSUM)) {
1370                 do_inactive = 1;
1371         } else if (KEY_IS(KEY_CACHE_SET)) {
1372                 LASSERT(lov->lov_cache == NULL);
1373                 lov->lov_cache = val;
1374                 do_inactive = 1;
1375                 cl_cache_incref(lov->lov_cache);
1376         }
1377
1378         for (i = 0; i < count; i++) {
1379                 tgt = lov->lov_tgts[i];
1380
1381                 /* OST was disconnected */
1382                 if (!tgt || !tgt->ltd_exp)
1383                         continue;
1384
1385                 /* OST is inactive and we don't want inactive OSCs */
1386                 if (!tgt->ltd_active && !do_inactive)
1387                         continue;
1388
1389                 err = obd_set_info_async(env, tgt->ltd_exp, keylen, key,
1390                                          vallen, val, set);
1391                 if (!rc)
1392                         rc = err;
1393         }
1394
1395         obd_putref(obddev);
1396         if (no_set) {
1397                 err = ptlrpc_set_wait(set);
1398                 if (!rc)
1399                         rc = err;
1400                 ptlrpc_set_destroy(set);
1401         }
1402         RETURN(rc);
1403 }
1404
1405 void lov_stripe_lock(struct lov_stripe_md *md)
1406 __acquires(&md->lsm_lock)
1407 {
1408         LASSERT(md->lsm_lock_owner != current_pid());
1409         spin_lock(&md->lsm_lock);
1410         LASSERT(md->lsm_lock_owner == 0);
1411         md->lsm_lock_owner = current_pid();
1412 }
1413
1414 void lov_stripe_unlock(struct lov_stripe_md *md)
1415 __releases(&md->lsm_lock)
1416 {
1417         LASSERT(md->lsm_lock_owner == current_pid());
1418         md->lsm_lock_owner = 0;
1419         spin_unlock(&md->lsm_lock);
1420 }
1421
1422 static int lov_quotactl(struct obd_device *obd, struct obd_export *exp,
1423                         struct obd_quotactl *oqctl)
1424 {
1425         struct lov_obd      *lov = &obd->u.lov;
1426         struct lov_tgt_desc *tgt;
1427         __u64                curspace = 0;
1428         __u64                bhardlimit = 0;
1429         int                  i, rc = 0;
1430         ENTRY;
1431
1432         if (oqctl->qc_cmd != LUSTRE_Q_QUOTAON &&
1433             oqctl->qc_cmd != LUSTRE_Q_QUOTAOFF &&
1434             oqctl->qc_cmd != Q_GETOQUOTA &&
1435             oqctl->qc_cmd != Q_INITQUOTA &&
1436             oqctl->qc_cmd != LUSTRE_Q_SETQUOTA &&
1437             oqctl->qc_cmd != Q_FINVALIDATE) {
1438                 CERROR("%s: bad quota opc %x for lov obd\n",
1439                        obd->obd_name, oqctl->qc_cmd);
1440                 RETURN(-EFAULT);
1441         }
1442
1443         /* for lov tgt */
1444         obd_getref(obd);
1445         for (i = 0; i < lov->desc.ld_tgt_count; i++) {
1446                 int err;
1447
1448                 tgt = lov->lov_tgts[i];
1449
1450                 if (!tgt)
1451                         continue;
1452
1453                 if (!tgt->ltd_active || tgt->ltd_reap) {
1454                         if (oqctl->qc_cmd == Q_GETOQUOTA &&
1455                             lov->lov_tgts[i]->ltd_activate) {
1456                                 rc = -ENETDOWN;
1457                                 CERROR("ost %d is inactive\n", i);
1458                         } else {
1459                                 CDEBUG(D_HA, "ost %d is inactive\n", i);
1460                         }
1461                         continue;
1462                 }
1463
1464                 err = obd_quotactl(tgt->ltd_exp, oqctl);
1465                 if (err) {
1466                         if (tgt->ltd_active && !rc)
1467                                 rc = err;
1468                         continue;
1469                 }
1470
1471                 if (oqctl->qc_cmd == Q_GETOQUOTA) {
1472                         curspace += oqctl->qc_dqblk.dqb_curspace;
1473                         bhardlimit += oqctl->qc_dqblk.dqb_bhardlimit;
1474                 }
1475         }
1476         obd_putref(obd);
1477
1478         if (oqctl->qc_cmd == Q_GETOQUOTA) {
1479                 oqctl->qc_dqblk.dqb_curspace = curspace;
1480                 oqctl->qc_dqblk.dqb_bhardlimit = bhardlimit;
1481         }
1482         RETURN(rc);
1483 }
1484
1485 static int lov_quotacheck(struct obd_device *obd, struct obd_export *exp,
1486                           struct obd_quotactl *oqctl)
1487 {
1488         struct lov_obd *lov = &obd->u.lov;
1489         int             i, rc = 0;
1490         ENTRY;
1491
1492         obd_getref(obd);
1493
1494         for (i = 0; i < lov->desc.ld_tgt_count; i++) {
1495                 if (!lov->lov_tgts[i])
1496                         continue;
1497
1498                 /* Skip quota check on the administratively disabled OSTs. */
1499                 if (!lov->lov_tgts[i]->ltd_activate) {
1500                         CWARN("lov idx %d was administratively disabled, "
1501                               "skip quotacheck on it.\n", i);
1502                         continue;
1503                 }
1504
1505                 if (!lov->lov_tgts[i]->ltd_active) {
1506                         CERROR("lov idx %d inactive\n", i);
1507                         rc = -EIO;
1508                         goto out;
1509                 }
1510         }
1511
1512         for (i = 0; i < lov->desc.ld_tgt_count; i++) {
1513                 int err;
1514
1515                 if (!lov->lov_tgts[i] || !lov->lov_tgts[i]->ltd_activate)
1516                         continue;
1517
1518                 err = obd_quotacheck(lov->lov_tgts[i]->ltd_exp, oqctl);
1519                 if (err && !rc)
1520                         rc = err;
1521         }
1522
1523 out:
1524         obd_putref(obd);
1525
1526         RETURN(rc);
1527 }
1528
1529 static struct obd_ops lov_obd_ops = {
1530         .o_owner                = THIS_MODULE,
1531         .o_setup                = lov_setup,
1532         .o_precleanup           = lov_precleanup,
1533         .o_cleanup              = lov_cleanup,
1534         .o_connect              = lov_connect,
1535         .o_disconnect           = lov_disconnect,
1536         .o_statfs               = lov_statfs,
1537         .o_statfs_async         = lov_statfs_async,
1538         .o_packmd               = lov_packmd,
1539         .o_unpackmd             = lov_unpackmd,
1540         .o_iocontrol            = lov_iocontrol,
1541         .o_get_info             = lov_get_info,
1542         .o_set_info_async       = lov_set_info_async,
1543         .o_notify               = lov_notify,
1544         .o_pool_new             = lov_pool_new,
1545         .o_pool_rem             = lov_pool_remove,
1546         .o_pool_add             = lov_pool_add,
1547         .o_pool_del             = lov_pool_del,
1548         .o_getref               = lov_getref,
1549         .o_putref               = lov_putref,
1550         .o_quotactl             = lov_quotactl,
1551         .o_quotacheck           = lov_quotacheck,
1552 };
1553
1554 struct kmem_cache *lov_oinfo_slab;
1555
1556 static int __init lov_init(void)
1557 {
1558         bool enable_proc = true;
1559         struct obd_type *type;
1560         int rc;
1561         ENTRY;
1562
1563         /* print an address of _any_ initialized kernel symbol from this
1564          * module, to allow debugging with gdb that doesn't support data
1565          * symbols from modules.*/
1566         CDEBUG(D_INFO, "Lustre LOV module (%p).\n", &lov_caches);
1567
1568         rc = lu_kmem_init(lov_caches);
1569         if (rc)
1570                 return rc;
1571
1572         lov_oinfo_slab = kmem_cache_create("lov_oinfo",
1573                                            sizeof(struct lov_oinfo), 0,
1574                                            SLAB_HWCACHE_ALIGN, NULL);
1575         if (lov_oinfo_slab == NULL) {
1576                 lu_kmem_fini(lov_caches);
1577                 return -ENOMEM;
1578         }
1579
1580         type = class_search_type(LUSTRE_LOD_NAME);
1581         if (type != NULL && type->typ_procsym != NULL)
1582                 enable_proc = false;
1583
1584         rc = class_register_type(&lov_obd_ops, NULL, enable_proc, NULL,
1585                                  LUSTRE_LOV_NAME, &lov_device_type);
1586
1587         if (rc) {
1588                 kmem_cache_destroy(lov_oinfo_slab);
1589                 lu_kmem_fini(lov_caches);
1590         }
1591
1592         RETURN(rc);
1593 }
1594
1595 static void /*__exit*/ lov_exit(void)
1596 {
1597         class_unregister_type(LUSTRE_LOV_NAME);
1598         kmem_cache_destroy(lov_oinfo_slab);
1599         lu_kmem_fini(lov_caches);
1600 }
1601
1602 MODULE_AUTHOR("Sun Microsystems, Inc. <http://www.lustre.org/>");
1603 MODULE_DESCRIPTION("Lustre Logical Object Volume OBD driver");
1604 MODULE_VERSION(LUSTRE_VERSION_STRING);
1605 MODULE_LICENSE("GPL");
1606
1607 module_init(lov_init);
1608 module_exit(lov_exit);