lustre/obdclass/obd_config.c

   1 /* -*- mode: c; c-basic-offset: 8; indent-tabs-mode: nil; -*-
   2  * vim:expandtab:shiftwidth=8:tabstop=8:
   3  *
   4  * GPL HEADER START
   5  *
   6  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   7  *
   8  * This program is free software; you can redistribute it and/or modify
   9  * it under the terms of the GNU General Public License version 2 only,
  10  * as published by the Free Software Foundation.
  11  *
  12  * This program is distributed in the hope that it will be useful, but
  13  * WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * General Public License version 2 for more details (a copy is included
  16  * in the LICENSE file that accompanied this code).
  17  *
  18  * You should have received a copy of the GNU General Public License
  19  * version 2 along with this program; If not, see
  20  * http://www.sun.com/software/products/lustre/docs/GPLv2.pdf
  21  *
  22  * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
  23  * CA 95054 USA or visit www.sun.com if you need additional information or
  24  * have any questions.
  25  *
  26  * GPL HEADER END
  27  */
  28 /*
  29  * Copyright  2008 Sun Microsystems, Inc. All rights reserved
  30  * Use is subject to license terms.
  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/obdclass/obd_config.c
  37  *
  38  * Config API
  39  */
  40
  41 #define DEBUG_SUBSYSTEM S_CLASS
  42 #ifdef __KERNEL__
  43 #include <obd_class.h>
  44 #include <linux/string.h>
  45 #else
  46 #include <liblustre.h>
  47 #include <obd_class.h>
  48 #include <obd.h>
  49 #endif
  50 #include <lustre_log.h>
  51 #include <lprocfs_status.h>
  52 #include <libcfs/list.h>
  53 #include <lustre_param.h>
  54 #include <class_hash.h>
  55
  56 static lustre_hash_ops_t uuid_hash_ops;
  57 static lustre_hash_ops_t nid_hash_ops;
  58 static lustre_hash_ops_t nid_stat_hash_ops;
  59
  60 /*********** string parsing utils *********/
  61
  62 /* returns 0 if we find this key in the buffer, else 1 */
  63 int class_find_param(char *buf, char *key, char **valp)
  64 {
  65         char *ptr;
  66
  67         if (!buf)
  68                 return 1;
  69
  70         if ((ptr = strstr(buf, key)) == NULL)
  71                 return 1;
  72
  73         if (valp)
  74                 *valp = ptr + strlen(key);
  75
  76         return 0;
  77 }
  78
  79 /**
  80  * Finds a parameter in \a params and copies it to \a copy.
  81  *
  82  * Leading spaces are skipped. Next space or end of string is the
  83  * parameter terminator with the exception that spaces inside single or double
  84  * quotes get included into a parameter. The parameter is copied into \a copy
  85  * which has to be allocated big enough by a caller, quotes are stripped in
  86  * the copy and the copy is terminated by 0.
  87  *
  88  * On return \a params is set to next parameter or to NULL if last
  89  * parameter is returned.
  90  *
  91  * \retval 0 if parameter is returned in \a copy
  92  * \retval 1 otherwise
  93  * \retval -EINVAL if unbalanced quota is found
  94  */
  95 int class_get_next_param(char **params, char *copy)
  96 {
  97         char *q1, *q2, *str;
  98         int len;
  99
 100         str = *params;
 101         while (*str == ' ')
 102                 str++;
 103
 104         if (*str == '\0') {
 105                 *params = NULL;
 106                 return 1;
 107         }
 108
 109         while (1) {
 110                 q1 = strpbrk(str, " '\"");
 111                 if (q1 == NULL) {
 112                         len = strlen(str);
 113                         memcpy(copy, str, len);
 114                         copy[len] = '\0';
 115                         *params = NULL;
 116                         return 0;
 117                 }
 118                 len = q1 - str;
 119                 if (*q1 == ' ') {
 120                         memcpy(copy, str, len);
 121                         copy[len] = '\0';
 122                         *params = str + len;
 123                         return 0;
 124                 }
 125
 126                 memcpy(copy, str, len);
 127                 copy += len;
 128
 129                 /* search for the matching closing quote */
 130                 str = q1 + 1;
 131                 q2 = strchr(str, *q1);
 132                 if (q2 == NULL) {
 133                         CERROR("Unbalanced quota in parameters: \"%s\"\n",
 134                                *params);
 135                         return -EINVAL;
 136                 }
 137                 len = q2 - str;
 138                 memcpy(copy, str, len);
 139                 copy += len;
 140                 str = q2 + 1;
 141         }
 142         return 1;
 143 }
 144
 145 /* returns 0 if this is the first key in the buffer, else 1.
 146    valp points to first char after key. */
 147 int class_match_param(char *buf, char *key, char **valp)
 148 {
 149         if (!buf)
 150                 return 1;
 151
 152         if (memcmp(buf, key, strlen(key)) != 0)
 153                 return 1;
 154
 155         if (valp)
 156                 *valp = buf + strlen(key);
 157
 158         return 0;
 159 }
 160
 161 /* 0 is good nid,
 162    1 not found
 163    < 0 error
 164    endh is set to next separator */
 165 int class_parse_nid(char *buf, lnet_nid_t *nid, char **endh)
 166 {
 167         char tmp, *endp;
 168
 169         if (!buf)
 170                 return 1;
 171         while (*buf == ',' || *buf == ':')
 172                 buf++;
 173         if (*buf == ' ' || *buf == '/' || *buf == '\0')
 174                 return 1;
 175
 176         /* nid separators or end of nids */
 177         endp = strpbrk(buf, ",: /");
 178         if (endp == NULL)
 179                 endp = buf + strlen(buf);
 180
 181         tmp = *endp;
 182         *endp = '\0';
 183         *nid = libcfs_str2nid(buf);
 184         if (*nid == LNET_NID_ANY) {
 185                 LCONSOLE_ERROR_MSG(0x159, "Can't parse NID '%s'\n", buf);
 186                 *endp = tmp;
 187                 return -EINVAL;
 188         }
 189         *endp = tmp;
 190
 191         if (endh)
 192                 *endh = endp;
 193         CDEBUG(D_INFO, "Nid %s\n", libcfs_nid2str(*nid));
 194         return 0;
 195 }
 196
 197 EXPORT_SYMBOL(class_find_param);
 198 EXPORT_SYMBOL(class_get_next_param);
 199 EXPORT_SYMBOL(class_match_param);
 200 EXPORT_SYMBOL(class_parse_nid);
 201
 202 /********************** class fns **********************/
 203
 204 /**
 205  * Create a new device and set the type, name and uuid.  If successful, the new
 206  * device can be accessed by either name or uuid.
 207  */
 208 int class_attach(struct lustre_cfg *lcfg)
 209 {
 210         struct obd_device *obd = NULL;
 211         char *typename, *name, *uuid;
 212         int rc, len;
 213         ENTRY;
 214
 215         if (!LUSTRE_CFG_BUFLEN(lcfg, 1)) {
 216                 CERROR("No type passed!\n");
 217                 RETURN(-EINVAL);
 218         }
 219         typename = lustre_cfg_string(lcfg, 1);
 220
 221         if (!LUSTRE_CFG_BUFLEN(lcfg, 0)) {
 222                 CERROR("No name passed!\n");
 223                 RETURN(-EINVAL);
 224         }
 225         name = lustre_cfg_string(lcfg, 0);
 226
 227         if (!LUSTRE_CFG_BUFLEN(lcfg, 2)) {
 228                 CERROR("No UUID passed!\n");
 229                 RETURN(-EINVAL);
 230         }
 231         uuid = lustre_cfg_string(lcfg, 2);
 232
 233         CDEBUG(D_IOCTL, "attach type %s name: %s uuid: %s\n",
 234                MKSTR(typename), MKSTR(name), MKSTR(uuid));
 235
 236         obd = class_newdev(typename, name);
 237         if (IS_ERR(obd)) {
 238                 /* Already exists or out of obds */
 239                 rc = PTR_ERR(obd);
 240                 obd = NULL;
 241                 CERROR("Cannot create device %s of type %s : %d\n",
 242                        name, typename, rc);
 243                 GOTO(out, rc);
 244         }
 245         LASSERTF(obd != NULL, "Cannot get obd device %s of type %s\n",
 246                  name, typename);
 247         LASSERTF(obd->obd_magic == OBD_DEVICE_MAGIC,
 248                  "obd %p obd_magic %08X != %08X\n",
 249                  obd, obd->obd_magic, OBD_DEVICE_MAGIC);
 250         LASSERTF(strncmp(obd->obd_name, name, strlen(name)) == 0, "%p obd_name %s != %s\n",
 251                  obd, obd->obd_name, name);
 252
 253         rwlock_init(&obd->obd_pool_lock);
 254         obd->obd_pool_limit = 0;
 255         obd->obd_pool_slv = 0;
 256
 257         CFS_INIT_LIST_HEAD(&obd->obd_exports);
 258         CFS_INIT_LIST_HEAD(&obd->obd_exports_timed);
 259         CFS_INIT_LIST_HEAD(&obd->obd_nid_stats);
 260         spin_lock_init(&obd->obd_nid_lock);
 261         spin_lock_init(&obd->obd_dev_lock);
 262         sema_init(&obd->obd_dev_sem, 1);
 263         spin_lock_init(&obd->obd_osfs_lock);
 264         /* obd->obd_osfs_age must be set to a value in the distant
 265          * past to guarantee a fresh statfs is fetched on mount. */
 266         obd->obd_osfs_age = cfs_time_shift_64(-1000);
 267
 268         /* XXX belongs in setup not attach  */
 269         /* recovery data */
 270         cfs_init_timer(&obd->obd_recovery_timer);
 271         spin_lock_init(&obd->obd_processing_task_lock);
 272         cfs_waitq_init(&obd->obd_next_transno_waitq);
 273         cfs_waitq_init(&obd->obd_evict_inprogress_waitq);
 274         CFS_INIT_LIST_HEAD(&obd->obd_req_replay_queue);
 275         CFS_INIT_LIST_HEAD(&obd->obd_lock_replay_queue);
 276         CFS_INIT_LIST_HEAD(&obd->obd_final_req_queue);
 277
 278         llog_group_init(&obd->obd_olg, FILTER_GROUP_LLOG);
 279
 280         spin_lock_init(&obd->obd_uncommitted_replies_lock);
 281         CFS_INIT_LIST_HEAD(&obd->obd_uncommitted_replies);
 282
 283         len = strlen(uuid);
 284         if (len >= sizeof(obd->obd_uuid)) {
 285                 CERROR("uuid must be < %d bytes long\n",
 286                        (int)sizeof(obd->obd_uuid));
 287                 GOTO(out, rc = -EINVAL);
 288         }
 289         memcpy(obd->obd_uuid.uuid, uuid, len);
 290
 291         /* do the attach */
 292         if (OBP(obd, attach)) {
 293                 rc = OBP(obd,attach)(obd, sizeof *lcfg, lcfg);
 294                 if (rc)
 295                         GOTO(out, rc = -EINVAL);
 296         }
 297
 298         /* Detach drops this */
 299         spin_lock(&obd->obd_dev_lock);
 300         atomic_set(&obd->obd_refcount, 1);
 301         spin_unlock(&obd->obd_dev_lock);
 302         lu_ref_init(&obd->obd_reference);
 303         lu_ref_add(&obd->obd_reference, "attach", obd);
 304
 305         obd->obd_attached = 1;
 306         CDEBUG(D_IOCTL, "OBD: dev %d attached type %s with refcount %d\n",
 307                obd->obd_minor, typename, atomic_read(&obd->obd_refcount));
 308         RETURN(0);
 309  out:
 310         if (obd != NULL) {
 311                 class_release_dev(obd);
 312         }
 313         return rc;
 314 }
 315
 316 int class_setup(struct obd_device *obd, struct lustre_cfg *lcfg)
 317 {
 318         int err = 0;
 319         struct obd_export *exp;
 320         ENTRY;
 321
 322         LASSERT(obd != NULL);
 323         LASSERTF(obd == class_num2obd(obd->obd_minor),
 324                  "obd %p != obd_devs[%d] %p\n",
 325                  obd, obd->obd_minor, class_num2obd(obd->obd_minor));
 326         LASSERTF(obd->obd_magic == OBD_DEVICE_MAGIC,
 327                  "obd %p obd_magic %08x != %08x\n",
 328                  obd, obd->obd_magic, OBD_DEVICE_MAGIC);
 329
 330         /* have we attached a type to this device? */
 331         if (!obd->obd_attached) {
 332                 CERROR("Device %d not attached\n", obd->obd_minor);
 333                 RETURN(-ENODEV);
 334         }
 335
 336         if (obd->obd_set_up) {
 337                 CERROR("Device %d already setup (type %s)\n",
 338                        obd->obd_minor, obd->obd_type->typ_name);
 339                 RETURN(-EEXIST);
 340         }
 341
 342         /* is someone else setting us up right now? (attach inits spinlock) */
 343         spin_lock(&obd->obd_dev_lock);
 344         if (obd->obd_starting) {
 345                 spin_unlock(&obd->obd_dev_lock);
 346                 CERROR("Device %d setup in progress (type %s)\n",
 347                        obd->obd_minor, obd->obd_type->typ_name);
 348                 RETURN(-EEXIST);
 349         }
 350         /* just leave this on forever.  I can't use obd_set_up here because
 351            other fns check that status, and we're not actually set up yet. */
 352         obd->obd_starting = 1;
 353         obd->obd_uuid_hash = NULL;
 354         obd->obd_nid_hash = NULL;
 355         obd->obd_nid_stats_hash = NULL;
 356         spin_unlock(&obd->obd_dev_lock);
 357
 358         /* create an uuid-export lustre hash */
 359         obd->obd_uuid_hash = lustre_hash_init("UUID_HASH", 7, 7,
 360                                               &uuid_hash_ops, 0);
 361         if (!obd->obd_uuid_hash)
 362                 GOTO(err_hash, err = -ENOMEM);
 363
 364         /* create a nid-export lustre hash */
 365         obd->obd_nid_hash = lustre_hash_init("NID_HASH", 7, 7,
 366                                              &nid_hash_ops, 0);
 367         if (!obd->obd_nid_hash)
 368                 GOTO(err_hash, err = -ENOMEM);
 369
 370         /* create a nid-stats lustre hash */
 371         obd->obd_nid_stats_hash = lustre_hash_init("NID_STATS", 7, 7,
 372                                                    &nid_stat_hash_ops, 0);
 373         if (!obd->obd_nid_stats_hash)
 374                 GOTO(err_hash, err = -ENOMEM);
 375
 376         exp = class_new_export(obd, &obd->obd_uuid);
 377         if (IS_ERR(exp))
 378                 GOTO(err_hash, err = PTR_ERR(exp));
 379
 380         obd->obd_self_export = exp;
 381         list_del_init(&exp->exp_obd_chain_timed);
 382         class_export_put(exp);
 383
 384         err = obd_setup(obd, lcfg);
 385         if (err)
 386                 GOTO(err_exp, err);
 387
 388         obd->obd_set_up = 1;
 389
 390         spin_lock(&obd->obd_dev_lock);
 391         /* cleanup drops this */
 392         class_incref(obd, "setup", obd);
 393         spin_unlock(&obd->obd_dev_lock);
 394
 395         CDEBUG(D_IOCTL, "finished setup of obd %s (uuid %s)\n",
 396                obd->obd_name, obd->obd_uuid.uuid);
 397
 398         RETURN(0);
 399 err_exp:
 400         if (obd->obd_self_export) {
 401                 class_unlink_export(obd->obd_self_export);
 402                 obd->obd_self_export = NULL;
 403         }
 404 err_hash:
 405         if (obd->obd_uuid_hash) {
 406                 lustre_hash_exit(obd->obd_uuid_hash);
 407                 obd->obd_uuid_hash = NULL;
 408         }
 409         if (obd->obd_nid_hash) {
 410                 lustre_hash_exit(obd->obd_nid_hash);
 411                 obd->obd_nid_hash = NULL;
 412         }
 413         if (obd->obd_nid_stats_hash) {
 414                 lustre_hash_exit(obd->obd_nid_stats_hash);
 415                 obd->obd_nid_stats_hash = NULL;
 416         }
 417         obd->obd_starting = 0;
 418         CERROR("setup %s failed (%d)\n", obd->obd_name, err);
 419         return err;
 420 }
 421
 422 int class_detach(struct obd_device *obd, struct lustre_cfg *lcfg)
 423 {
 424         ENTRY;
 425
 426         if (obd->obd_set_up) {
 427                 CERROR("OBD device %d still set up\n", obd->obd_minor);
 428                 RETURN(-EBUSY);
 429         }
 430
 431         spin_lock(&obd->obd_dev_lock);
 432         if (!obd->obd_attached) {
 433                 spin_unlock(&obd->obd_dev_lock);
 434                 CERROR("OBD device %d not attached\n", obd->obd_minor);
 435                 RETURN(-ENODEV);
 436         }
 437         obd->obd_attached = 0;
 438         spin_unlock(&obd->obd_dev_lock);
 439
 440         CDEBUG(D_IOCTL, "detach on obd %s (uuid %s)\n",
 441                obd->obd_name, obd->obd_uuid.uuid);
 442
 443         class_decref(obd, "attach", obd);
 444
 445         /* not strictly necessary, but cleans up eagerly */
 446         obd_zombie_impexp_cull();
 447
 448         RETURN(0);
 449 }
 450
 451 static void dump_exports(struct obd_device *obd)
 452 {
 453         struct obd_export *exp;
 454
 455         spin_lock(&obd->obd_dev_lock);
 456         list_for_each_entry(exp, &obd->obd_exports, exp_obd_chain) {
 457                 struct ptlrpc_reply_state *rs;
 458                 struct ptlrpc_reply_state *first_reply = NULL;
 459                 int                        nreplies = 0;
 460
 461                 spin_lock(&exp->exp_lock);
 462                 list_for_each_entry (rs, &exp->exp_outstanding_replies,
 463                                      rs_exp_list) {
 464                         if (nreplies == 0)
 465                                 first_reply = rs;
 466                         nreplies++;
 467                 }
 468                 spin_unlock(&exp->exp_lock);
 469
 470                 CDEBUG(D_IOCTL, "%s: %p %s %s %d %d %d: %p %s\n",
 471                        obd->obd_name, exp, exp->exp_client_uuid.uuid,
 472                        obd_export_nid2str(exp),
 473                        atomic_read(&exp->exp_refcount),
 474                        exp->exp_failed, nreplies, first_reply,
 475                        nreplies > 3 ? "..." : "");
 476         }
 477         spin_unlock(&obd->obd_dev_lock);
 478 }
 479
 480 int class_cleanup(struct obd_device *obd, struct lustre_cfg *lcfg)
 481 {
 482         int err = 0;
 483         char *flag;
 484         ENTRY;
 485
 486         OBD_RACE(OBD_FAIL_LDLM_RECOV_CLIENTS);
 487
 488         if (!obd->obd_set_up) {
 489                 CERROR("Device %d not setup\n", obd->obd_minor);
 490                 RETURN(-ENODEV);
 491         }
 492
 493         spin_lock(&obd->obd_dev_lock);
 494         if (obd->obd_stopping) {
 495                 spin_unlock(&obd->obd_dev_lock);
 496                 CERROR("OBD %d already stopping\n", obd->obd_minor);
 497                 RETURN(-ENODEV);
 498         }
 499         /* Leave this on forever */
 500         obd->obd_stopping = 1;
 501         spin_unlock(&obd->obd_dev_lock);
 502
 503         if (lcfg->lcfg_bufcount >= 2 && LUSTRE_CFG_BUFLEN(lcfg, 1) > 0) {
 504                 for (flag = lustre_cfg_string(lcfg, 1); *flag != 0; flag++)
 505                         switch (*flag) {
 506                         case 'F':
 507                                 obd->obd_force = 1;
 508                                 break;
 509                         case 'A':
 510                                 LCONSOLE_WARN("Failing over %s\n",
 511                                               obd->obd_name);
 512                                 obd->obd_fail = 1;
 513                                 obd->obd_no_transno = 1;
 514                                 obd->obd_no_recov = 1;
 515                                 if (OBP(obd, iocontrol)) {
 516                                         obd_iocontrol(OBD_IOC_SYNC,
 517                                                       obd->obd_self_export,
 518                                                       0, NULL, NULL);
 519                                         /* Set the obd readonly if we can */
 520                                         obd_iocontrol(OBD_IOC_SET_READONLY,
 521                                                       obd->obd_self_export,
 522                                                       0, NULL, NULL);
 523                                 }
 524                                 break;
 525                         default:
 526                                 CERROR("Unrecognised flag '%c'\n", *flag);
 527                         }
 528         }
 529
 530         LASSERT(obd->obd_self_export);
 531
 532         /* The three references that should be remaining are the
 533          * obd_self_export and the attach and setup references. */
 534         if (atomic_read(&obd->obd_refcount) > 3) {
 535                 /* refcounf - 3 might be the number of real exports
 536                    (excluding self export). But class_incref is called
 537                    by other things as well, so don't count on it. */
 538                 CDEBUG(D_IOCTL, "%s: forcing exports to disconnect: %d\n",
 539                        obd->obd_name, atomic_read(&obd->obd_refcount) - 3);
 540                 dump_exports(obd);
 541                 class_disconnect_exports(obd);
 542         }
 543
 544         /* destroy an uuid-export hash body */
 545         if (obd->obd_uuid_hash) {
 546                 lustre_hash_exit(obd->obd_uuid_hash);
 547                 obd->obd_uuid_hash = NULL;
 548         }
 549
 550         /* destroy a nid-export hash body */
 551         if (obd->obd_nid_hash) {
 552                 lustre_hash_exit(obd->obd_nid_hash);
 553                 obd->obd_nid_hash = NULL;
 554         }
 555
 556         /* destroy a nid-stats hash body */
 557         if (obd->obd_nid_stats_hash) {
 558                 lustre_hash_exit(obd->obd_nid_stats_hash);
 559                 obd->obd_nid_stats_hash = NULL;
 560         }
 561
 562         /* Precleanup, we must make sure all exports get destroyed. */
 563         err = obd_precleanup(obd, OBD_CLEANUP_EXPORTS);
 564         if (err)
 565                 CERROR("Precleanup %s returned %d\n",
 566                        obd->obd_name, err);
 567         class_decref(obd, "setup", obd);
 568         obd->obd_set_up = 0;
 569         RETURN(0);
 570 }
 571
 572 struct obd_device *class_incref(struct obd_device *obd,
 573                                 const char *scope, const void *source)
 574 {
 575         lu_ref_add_atomic(&obd->obd_reference, scope, source);
 576         atomic_inc(&obd->obd_refcount);
 577         CDEBUG(D_INFO, "incref %s (%p) now %d\n", obd->obd_name, obd,
 578                atomic_read(&obd->obd_refcount));
 579
 580         return obd;
 581 }
 582
 583 void class_decref(struct obd_device *obd, const char *scope, const void *source)
 584 {
 585         int err;
 586         int refs;
 587
 588         spin_lock(&obd->obd_dev_lock);
 589         atomic_dec(&obd->obd_refcount);
 590         refs = atomic_read(&obd->obd_refcount);
 591         spin_unlock(&obd->obd_dev_lock);
 592         lu_ref_del(&obd->obd_reference, scope, source);
 593
 594         CDEBUG(D_INFO, "Decref %s (%p) now %d\n", obd->obd_name, obd, refs);
 595
 596         if ((refs == 1) && obd->obd_stopping) {
 597                 /* All exports have been destroyed; there should
 598                    be no more in-progress ops by this point.*/
 599
 600                 spin_lock(&obd->obd_self_export->exp_lock);
 601                 obd->obd_self_export->exp_flags |=
 602                         (obd->obd_fail ? OBD_OPT_FAILOVER : 0) |
 603                         (obd->obd_force ? OBD_OPT_FORCE : 0);
 604                 spin_unlock(&obd->obd_self_export->exp_lock);
 605
 606                 /* note that we'll recurse into class_decref again */
 607                 class_unlink_export(obd->obd_self_export);
 608                 return;
 609         }
 610
 611         if (refs == 0) {
 612                 CDEBUG(D_CONFIG, "finishing cleanup of obd %s (%s)\n",
 613                        obd->obd_name, obd->obd_uuid.uuid);
 614                 LASSERT(!obd->obd_attached);
 615                 if (obd->obd_stopping) {
 616                         /* If we're not stopping, we were never set up */
 617                         err = obd_cleanup(obd);
 618                         if (err)
 619                                 CERROR("Cleanup %s returned %d\n",
 620                                        obd->obd_name, err);
 621                 }
 622                 if (OBP(obd, detach)) {
 623                         err = OBP(obd, detach)(obd);
 624                         if (err)
 625                                 CERROR("Detach returned %d\n", err);
 626                 }
 627                 class_release_dev(obd);
 628         }
 629 }
 630
 631 int class_add_conn(struct obd_device *obd, struct lustre_cfg *lcfg)
 632 {
 633         struct obd_import *imp;
 634         struct obd_uuid uuid;
 635         int rc;
 636         ENTRY;
 637
 638         if (LUSTRE_CFG_BUFLEN(lcfg, 1) < 1 ||
 639             LUSTRE_CFG_BUFLEN(lcfg, 1) > sizeof(struct obd_uuid)) {
 640                 CERROR("invalid conn_uuid\n");
 641                 RETURN(-EINVAL);
 642         }
 643         if (strcmp(obd->obd_type->typ_name, LUSTRE_MDC_NAME) &&
 644             strcmp(obd->obd_type->typ_name, LUSTRE_OSC_NAME) &&
 645             strcmp(obd->obd_type->typ_name, LUSTRE_MGC_NAME)) {
 646                 CERROR("can't add connection on non-client dev\n");
 647                 RETURN(-EINVAL);
 648         }
 649
 650         imp = obd->u.cli.cl_import;
 651         if (!imp) {
 652                 CERROR("try to add conn on immature client dev\n");
 653                 RETURN(-EINVAL);
 654         }
 655
 656         obd_str2uuid(&uuid, lustre_cfg_string(lcfg, 1));
 657         rc = obd_add_conn(imp, &uuid, lcfg->lcfg_num);
 658
 659         RETURN(rc);
 660 }
 661
 662 int class_del_conn(struct obd_device *obd, struct lustre_cfg *lcfg)
 663 {
 664         struct obd_import *imp;
 665         struct obd_uuid uuid;
 666         int rc;
 667         ENTRY;
 668
 669         if (LUSTRE_CFG_BUFLEN(lcfg, 1) < 1 ||
 670             LUSTRE_CFG_BUFLEN(lcfg, 1) > sizeof(struct obd_uuid)) {
 671                 CERROR("invalid conn_uuid\n");
 672                 RETURN(-EINVAL);
 673         }
 674         if (strcmp(obd->obd_type->typ_name, LUSTRE_MDC_NAME) &&
 675             strcmp(obd->obd_type->typ_name, LUSTRE_OSC_NAME)) {
 676                 CERROR("can't del connection on non-client dev\n");
 677                 RETURN(-EINVAL);
 678         }
 679
 680         imp = obd->u.cli.cl_import;
 681         if (!imp) {
 682                 CERROR("try to del conn on immature client dev\n");
 683                 RETURN(-EINVAL);
 684         }
 685
 686         obd_str2uuid(&uuid, lustre_cfg_string(lcfg, 1));
 687         rc = obd_del_conn(imp, &uuid);
 688
 689         RETURN(rc);
 690 }
 691
 692 CFS_LIST_HEAD(lustre_profile_list);
 693
 694 struct lustre_profile *class_get_profile(const char * prof)
 695 {
 696         struct lustre_profile *lprof;
 697
 698         ENTRY;
 699         list_for_each_entry(lprof, &lustre_profile_list, lp_list) {
 700                 if (!strcmp(lprof->lp_profile, prof)) {
 701                         RETURN(lprof);
 702                 }
 703         }
 704         RETURN(NULL);
 705 }
 706
 707 int class_add_profile(int proflen, char *prof, int osclen, char *osc,
 708                       int mdclen, char *mdc)
 709 {
 710         struct lustre_profile *lprof;
 711         int err = 0;
 712         ENTRY;
 713
 714         CDEBUG(D_CONFIG, "Add profile %s\n", prof);
 715
 716         OBD_ALLOC(lprof, sizeof(*lprof));
 717         if (lprof == NULL)
 718                 RETURN(-ENOMEM);
 719         CFS_INIT_LIST_HEAD(&lprof->lp_list);
 720
 721         LASSERT(proflen == (strlen(prof) + 1));
 722         OBD_ALLOC(lprof->lp_profile, proflen);
 723         if (lprof->lp_profile == NULL)
 724                 GOTO(out, err = -ENOMEM);
 725         memcpy(lprof->lp_profile, prof, proflen);
 726
 727         LASSERT(osclen == (strlen(osc) + 1));
 728         OBD_ALLOC(lprof->lp_dt, osclen);
 729         if (lprof->lp_dt == NULL)
 730                 GOTO(out, err = -ENOMEM);
 731         memcpy(lprof->lp_dt, osc, osclen);
 732
 733         if (mdclen > 0) {
 734                 LASSERT(mdclen == (strlen(mdc) + 1));
 735                 OBD_ALLOC(lprof->lp_md, mdclen);
 736                 if (lprof->lp_md == NULL)
 737                         GOTO(out, err = -ENOMEM);
 738                 memcpy(lprof->lp_md, mdc, mdclen);
 739         }
 740
 741         list_add(&lprof->lp_list, &lustre_profile_list);
 742         RETURN(err);
 743
 744 out:
 745         if (lprof->lp_md)
 746                 OBD_FREE(lprof->lp_md, mdclen);
 747         if (lprof->lp_dt)
 748                 OBD_FREE(lprof->lp_dt, osclen);
 749         if (lprof->lp_profile)
 750                 OBD_FREE(lprof->lp_profile, proflen);
 751         OBD_FREE(lprof, sizeof(*lprof));
 752         RETURN(err);
 753 }
 754
 755 void class_del_profile(const char *prof)
 756 {
 757         struct lustre_profile *lprof;
 758         ENTRY;
 759
 760         CDEBUG(D_CONFIG, "Del profile %s\n", prof);
 761
 762         lprof = class_get_profile(prof);
 763         if (lprof) {
 764                 list_del(&lprof->lp_list);
 765                 OBD_FREE(lprof->lp_profile, strlen(lprof->lp_profile) + 1);
 766                 OBD_FREE(lprof->lp_dt, strlen(lprof->lp_dt) + 1);
 767                 if (lprof->lp_md)
 768                         OBD_FREE(lprof->lp_md, strlen(lprof->lp_md) + 1);
 769                 OBD_FREE(lprof, sizeof *lprof);
 770         }
 771         EXIT;
 772 }
 773
 774 /* COMPAT_146 */
 775 void class_del_profiles(void)
 776 {
 777         struct lustre_profile *lprof, *n;
 778         ENTRY;
 779
 780         list_for_each_entry_safe(lprof, n, &lustre_profile_list, lp_list) {
 781                 list_del(&lprof->lp_list);
 782                 OBD_FREE(lprof->lp_profile, strlen(lprof->lp_profile) + 1);
 783                 OBD_FREE(lprof->lp_dt, strlen(lprof->lp_dt) + 1);
 784                 if (lprof->lp_md)
 785                         OBD_FREE(lprof->lp_md, strlen(lprof->lp_md) + 1);
 786                 OBD_FREE(lprof, sizeof *lprof);
 787         }
 788         EXIT;
 789 }
 790
 791 /* We can't call ll_process_config directly because it lives in a module that
 792    must be loaded after this one. */
 793 static int (*client_process_config)(struct lustre_cfg *lcfg) = NULL;
 794
 795 void lustre_register_client_process_config(int (*cpc)(struct lustre_cfg *lcfg))
 796 {
 797         client_process_config = cpc;
 798 }
 799 EXPORT_SYMBOL(lustre_register_client_process_config);
 800
 801 int class_process_config(struct lustre_cfg *lcfg)
 802 {
 803         struct obd_device *obd;
 804         int err;
 805
 806         LASSERT(lcfg && !IS_ERR(lcfg));
 807         CDEBUG(D_IOCTL, "processing cmd: %x\n", lcfg->lcfg_command);
 808
 809         /* Commands that don't need a device */
 810         switch(lcfg->lcfg_command) {
 811         case LCFG_ATTACH: {
 812                 err = class_attach(lcfg);
 813                 GOTO(out, err);
 814         }
 815         case LCFG_ADD_UUID: {
 816                 CDEBUG(D_IOCTL, "adding mapping from uuid %s to nid "LPX64
 817                        " (%s)\n", lustre_cfg_string(lcfg, 1),
 818                        lcfg->lcfg_nid, libcfs_nid2str(lcfg->lcfg_nid));
 819
 820                 err = class_add_uuid(lustre_cfg_string(lcfg, 1), lcfg->lcfg_nid);
 821                 GOTO(out, err);
 822         }
 823         case LCFG_DEL_UUID: {
 824                 CDEBUG(D_IOCTL, "removing mappings for uuid %s\n",
 825                        (lcfg->lcfg_bufcount < 2 || LUSTRE_CFG_BUFLEN(lcfg, 1) == 0)
 826                        ? "<all uuids>" : lustre_cfg_string(lcfg, 1));
 827
 828                 err = class_del_uuid(lustre_cfg_string(lcfg, 1));
 829                 GOTO(out, err);
 830         }
 831         case LCFG_MOUNTOPT: {
 832                 CDEBUG(D_IOCTL, "mountopt: profile %s osc %s mdc %s\n",
 833                        lustre_cfg_string(lcfg, 1),
 834                        lustre_cfg_string(lcfg, 2),
 835                        lustre_cfg_string(lcfg, 3));
 836                 /* set these mount options somewhere, so ll_fill_super
 837                  * can find them. */
 838                 err = class_add_profile(LUSTRE_CFG_BUFLEN(lcfg, 1),
 839                                         lustre_cfg_string(lcfg, 1),
 840                                         LUSTRE_CFG_BUFLEN(lcfg, 2),
 841                                         lustre_cfg_string(lcfg, 2),
 842                                         LUSTRE_CFG_BUFLEN(lcfg, 3),
 843                                         lustre_cfg_string(lcfg, 3));
 844                 GOTO(out, err);
 845         }
 846         case LCFG_DEL_MOUNTOPT: {
 847                 CDEBUG(D_IOCTL, "mountopt: profile %s\n",
 848                        lustre_cfg_string(lcfg, 1));
 849                 class_del_profile(lustre_cfg_string(lcfg, 1));
 850                 GOTO(out, err = 0);
 851         }
 852         case LCFG_SET_TIMEOUT: {
 853                 CDEBUG(D_IOCTL, "changing lustre obd_timeout from %d to %d\n",
 854                        obd_timeout, lcfg->lcfg_num);
 855                 obd_timeout = max(lcfg->lcfg_num, 1U);
 856                 GOTO(out, err = 0);
 857         }
 858         case LCFG_SET_LDLM_TIMEOUT: {
 859                 CDEBUG(D_IOCTL, "changing lustre ldlm_timeout from %d to %d\n",
 860                        ldlm_timeout, lcfg->lcfg_num);
 861                 ldlm_timeout = max(lcfg->lcfg_num, 1U);
 862                 if (ldlm_timeout > obd_timeout)
 863                         ldlm_timeout = max(obd_timeout / 3, 1U);
 864
 865                 GOTO(out, err = 0);
 866         }
 867         case LCFG_SET_UPCALL: {
 868                 LCONSOLE_ERROR_MSG(0x15a, "recovery upcall is deprecated\n");
 869                 /* COMPAT_146 Don't fail on old configs */
 870                 GOTO(out, err = 0);
 871         }
 872         case LCFG_MARKER: {
 873                 struct cfg_marker *marker;
 874                 marker = lustre_cfg_buf(lcfg, 1);
 875                 CDEBUG(D_IOCTL, "marker %d (%#x) %.16s %s\n", marker->cm_step,
 876                        marker->cm_flags, marker->cm_tgtname, marker->cm_comment);
 877                 GOTO(out, err = 0);
 878         }
 879         case LCFG_PARAM: {
 880                 /* llite has no obd */
 881                 if ((class_match_param(lustre_cfg_string(lcfg, 1),
 882                                        PARAM_LLITE, 0) == 0) &&
 883                     client_process_config) {
 884                         err = (*client_process_config)(lcfg);
 885                         GOTO(out, err);
 886                 }
 887                 /* Fall through */
 888                 break;
 889         }
 890         }
 891
 892         /* Commands that require a device */
 893         obd = class_name2obd(lustre_cfg_string(lcfg, 0));
 894         if (obd == NULL) {
 895                 if (!LUSTRE_CFG_BUFLEN(lcfg, 0))
 896                         CERROR("this lcfg command requires a device name\n");
 897                 else
 898                         CERROR("no device for: %s\n",
 899                                lustre_cfg_string(lcfg, 0));
 900
 901                 GOTO(out, err = -EINVAL);
 902         }
 903
 904         switch(lcfg->lcfg_command) {
 905         case LCFG_SETUP: {
 906                 err = class_setup(obd, lcfg);
 907                 GOTO(out, err);
 908         }
 909         case LCFG_DETACH: {
 910                 err = class_detach(obd, lcfg);
 911                 GOTO(out, err = 0);
 912         }
 913         case LCFG_CLEANUP: {
 914                 err = class_cleanup(obd, lcfg);
 915                 GOTO(out, err = 0);
 916         }
 917         case LCFG_ADD_CONN: {
 918                 err = class_add_conn(obd, lcfg);
 919                 GOTO(out, err = 0);
 920         }
 921         case LCFG_DEL_CONN: {
 922                 err = class_del_conn(obd, lcfg);
 923                 GOTO(out, err = 0);
 924         }
 925         case LCFG_POOL_NEW: {
 926                 err = obd_pool_new(obd, lustre_cfg_string(lcfg, 2));
 927                 GOTO(out, err = 0);
 928                 break;
 929         }
 930         case LCFG_POOL_ADD: {
 931                 err = obd_pool_add(obd, lustre_cfg_string(lcfg, 2),
 932                                    lustre_cfg_string(lcfg, 3));
 933                 GOTO(out, err = 0);
 934                 break;
 935         }
 936         case LCFG_POOL_REM: {
 937                 err = obd_pool_rem(obd, lustre_cfg_string(lcfg, 2),
 938                                    lustre_cfg_string(lcfg, 3));
 939                 GOTO(out, err = 0);
 940                 break;
 941         }
 942         case LCFG_POOL_DEL: {
 943                 err = obd_pool_del(obd, lustre_cfg_string(lcfg, 2));
 944                 GOTO(out, err = 0);
 945                 break;
 946         }
 947         default: {
 948                 err = obd_process_config(obd, sizeof(*lcfg), lcfg);
 949                 GOTO(out, err);
 950
 951         }
 952         }
 953 out:
 954         if ((err < 0) && !(lcfg->lcfg_command & LCFG_REQUIRED)) {
 955                 CWARN("Ignoring error %d on optional command %#x\n", err,
 956                       lcfg->lcfg_command);
 957                 err = 0;
 958         }
 959         return err;
 960 }
 961
 962 int class_process_proc_param(char *prefix, struct lprocfs_vars *lvars,
 963                              struct lustre_cfg *lcfg, void *data)
 964 {
 965 #ifdef __KERNEL__
 966         struct lprocfs_vars *var;
 967         char *key, *sval;
 968         int i, keylen, vallen;
 969         int matched = 0, j = 0;
 970         int rc = 0;
 971         int skip = 0;
 972         ENTRY;
 973
 974         if (lcfg->lcfg_command != LCFG_PARAM) {
 975                 CERROR("Unknown command: %d\n", lcfg->lcfg_command);
 976                 RETURN(-EINVAL);
 977         }
 978
 979         /* e.g. tunefs.lustre --param mdt.group_upcall=foo /r/tmp/lustre-mdt
 980            or   lctl conf_param lustre-MDT0000.mdt.group_upcall=bar
 981            or   lctl conf_param lustre-OST0000.osc.max_dirty_mb=36 */
 982         for (i = 1; i < lcfg->lcfg_bufcount; i++) {
 983                 key = lustre_cfg_buf(lcfg, i);
 984                 /* Strip off prefix */
 985                 class_match_param(key, prefix, &key);
 986                 sval = strchr(key, '=');
 987                 if (!sval || (*(sval + 1) == 0)) {
 988                         CERROR("Can't parse param %s (missing '=')\n", key);
 989                         /* rc = -EINVAL; continue parsing other params */
 990                         continue;
 991                 }
 992                 keylen = sval - key;
 993                 sval++;
 994                 vallen = strlen(sval);
 995                 matched = 0;
 996                 j = 0;
 997                 /* Search proc entries */
 998                 while (lvars[j].name) {
 999                         var = &lvars[j];
1000                         if (class_match_param(key, (char *)var->name, 0) == 0 &&
1001                             keylen == strlen(var->name)) {
1002                                 matched++;
1003                                 rc = -EROFS;
1004                                 if (var->write_fptr) {
1005                                         mm_segment_t oldfs;
1006                                         oldfs = get_fs();
1007                                         set_fs(KERNEL_DS);
1008                                         rc = (var->write_fptr)(NULL, sval,
1009                                                                vallen, data);
1010                                         set_fs(oldfs);
1011                                 }
1012                                 if (rc < 0)
1013                                         CERROR("writing proc entry %s err %d\n",
1014                                                var->name, rc);
1015                                 break;
1016                         }
1017                         j++;
1018                 }
1019                 if (!matched) {
1020                         /* If the prefix doesn't match, return error so we
1021                            can pass it down the stack */
1022                         if (strnchr(key, keylen, '.'))
1023                             RETURN(-ENOSYS);
1024                         CERROR("%s: unknown param %s\n",
1025                                (char *)lustre_cfg_string(lcfg, 0), key);
1026                         /* rc = -EINVAL;        continue parsing other params */
1027                         skip++;
1028                 } else {
1029                         LCONSOLE_INFO("%s.%.*s: set parameter %.*s=%s\n",
1030                                       lustre_cfg_string(lcfg, 0),
1031                                       (int)strlen(prefix) - 1, prefix,
1032                                       (int)(sval - key - 1), key, sval);
1033                 }
1034         }
1035
1036         if (rc > 0)
1037                 rc = 0;
1038         if (!rc && skip)
1039                 rc = skip;
1040         RETURN(rc);
1041 #else
1042         CDEBUG(D_CONFIG, "liblustre can't process params.\n");
1043         /* Don't throw config error */
1044         RETURN(0);
1045 #endif
1046 }
1047
1048 int class_config_dump_handler(struct llog_handle * handle,
1049                               struct llog_rec_hdr *rec, void *data);
1050
1051 #ifdef __KERNEL__
1052 extern int lustre_check_exclusion(struct super_block *sb, char *svname);
1053 #else
1054 #define lustre_check_exclusion(a,b)  0
1055 #endif
1056
1057 static int class_config_llog_handler(struct llog_handle * handle,
1058                                      struct llog_rec_hdr *rec, void *data)
1059 {
1060         struct config_llog_instance *clli = data;
1061         int cfg_len = rec->lrh_len;
1062         char *cfg_buf = (char*) (rec + 1);
1063         int rc = 0;
1064         ENTRY;
1065
1066         //class_config_dump_handler(handle, rec, data);
1067
1068         switch (rec->lrh_type) {
1069         case OBD_CFG_REC: {
1070                 struct lustre_cfg *lcfg, *lcfg_new;
1071                 struct lustre_cfg_bufs bufs;
1072                 char *inst_name = NULL;
1073                 int inst_len = 0;
1074                 int inst = 0, swab = 0;
1075
1076                 lcfg = (struct lustre_cfg *)cfg_buf;
1077                 if (lcfg->lcfg_version == __swab32(LUSTRE_CFG_VERSION)) {
1078                         lustre_swab_lustre_cfg(lcfg);
1079                         swab = 1;
1080                 }
1081
1082                 rc = lustre_cfg_sanity_check(cfg_buf, cfg_len);
1083                 if (rc)
1084                         GOTO(out, rc);
1085
1086                 /* Figure out config state info */
1087                 if (lcfg->lcfg_command == LCFG_MARKER) {
1088                         struct cfg_marker *marker = lustre_cfg_buf(lcfg, 1);
1089                         lustre_swab_cfg_marker(marker, swab,
1090                                                LUSTRE_CFG_BUFLEN(lcfg, 1));
1091                         CDEBUG(D_CONFIG, "Marker, inst_flg=%#x mark_flg=%#x\n",
1092                                clli->cfg_flags, marker->cm_flags);
1093                         if (marker->cm_flags & CM_START) {
1094                                 /* all previous flags off */
1095                                 clli->cfg_flags = CFG_F_MARKER;
1096                                 if (marker->cm_flags & CM_SKIP) {
1097                                         clli->cfg_flags |= CFG_F_SKIP;
1098                                         CDEBUG(D_CONFIG, "SKIP #%d\n",
1099                                                marker->cm_step);
1100                                 } else if ((marker->cm_flags & CM_EXCLUDE) ||
1101                                            (clli->cfg_sb &&
1102                                             lustre_check_exclusion(clli->cfg_sb,
1103                                                          marker->cm_tgtname))) {
1104                                         clli->cfg_flags |= CFG_F_EXCLUDE;
1105                                         CDEBUG(D_CONFIG, "EXCLUDE %d\n",
1106                                                marker->cm_step);
1107                                 }
1108                         } else if (marker->cm_flags & CM_END) {
1109                                 clli->cfg_flags = 0;
1110                         }
1111                 }
1112                 /* A config command without a start marker before it is
1113                    illegal (post 146) */
1114                 if (!(clli->cfg_flags & CFG_F_COMPAT146) &&
1115                     !(clli->cfg_flags & CFG_F_MARKER) &&
1116                     (lcfg->lcfg_command != LCFG_MARKER)) {
1117                         CWARN("Config not inside markers, ignoring! "
1118                               "(inst: %s, uuid: %s, flags: %#x)\n",
1119                               clli->cfg_instance ? clli->cfg_instance : "<null>",
1120                               clli->cfg_uuid.uuid, clli->cfg_flags);
1121                         clli->cfg_flags |= CFG_F_SKIP;
1122                 }
1123                 if (clli->cfg_flags & CFG_F_SKIP) {
1124                         CDEBUG(D_CONFIG, "skipping %#x\n",
1125                                clli->cfg_flags);
1126                         rc = 0;
1127                         /* No processing! */
1128                         break;
1129                 }
1130
1131                 /*
1132                  * For interoperability between 1.8 and 2.0,
1133                  * rename "mds" obd device type to "mdt".
1134                  */
1135                 {
1136                         char *typename = lustre_cfg_string(lcfg, 1);
1137                         char *index = lustre_cfg_string(lcfg, 2);
1138
1139                         if ((lcfg->lcfg_command == LCFG_ATTACH && typename &&
1140                              strcmp(typename, "mds") == 0)) {
1141                                 CWARN("For 1.8 interoperability, rename obd "
1142                                        "type from mds to mdt\n");
1143                                 typename[2] = 't';
1144                         }
1145                         if ((lcfg->lcfg_command == LCFG_SETUP && index &&
1146                              strcmp(index, "type") == 0)) {
1147                                 CDEBUG(D_INFO, "For 1.8 interoperability, "
1148                                        "set this index to '0'\n");
1149                                 index[0] = '0';
1150                                 index[1] = 0;
1151                         }
1152                 }
1153
1154                 if ((clli->cfg_flags & CFG_F_EXCLUDE) &&
1155                     (lcfg->lcfg_command == LCFG_LOV_ADD_OBD))
1156                         /* Add inactive instead */
1157                         lcfg->lcfg_command = LCFG_LOV_ADD_INA;
1158
1159                 lustre_cfg_bufs_init(&bufs, lcfg);
1160
1161                 if (clli && clli->cfg_instance &&
1162                     LUSTRE_CFG_BUFLEN(lcfg, 0) > 0){
1163                         inst = 1;
1164                         inst_len = LUSTRE_CFG_BUFLEN(lcfg, 0) +
1165                                 strlen(clli->cfg_instance) + 1;
1166                         OBD_ALLOC(inst_name, inst_len);
1167                         if (inst_name == NULL)
1168                                 GOTO(out, rc = -ENOMEM);
1169                         sprintf(inst_name, "%s-%s",
1170                                 lustre_cfg_string(lcfg, 0),
1171                                 clli->cfg_instance);
1172                         lustre_cfg_bufs_set_string(&bufs, 0, inst_name);
1173                         CDEBUG(D_CONFIG, "cmd %x, instance name: %s\n",
1174                                lcfg->lcfg_command, inst_name);
1175                 }
1176
1177                 /* we override the llog's uuid for clients, to insure they
1178                 are unique */
1179                 if (clli && clli->cfg_instance &&
1180                     lcfg->lcfg_command == LCFG_ATTACH) {
1181                         lustre_cfg_bufs_set_string(&bufs, 2,
1182                                                    clli->cfg_uuid.uuid);
1183                 }
1184                 /*
1185                  * sptlrpc config record, we expect 2 data segments:
1186                  *  [0]: fs_name/target_name,
1187                  *  [1]: rule string
1188                  * moving them to index [1] and [2], and insert MGC's
1189                  * obdname at index [0].
1190                  */
1191                 if (clli && clli->cfg_instance == NULL &&
1192                     lcfg->lcfg_command == LCFG_SPTLRPC_CONF) {
1193                         lustre_cfg_bufs_set(&bufs, 2, bufs.lcfg_buf[1],
1194                                             bufs.lcfg_buflen[1]);
1195                         lustre_cfg_bufs_set(&bufs, 1, bufs.lcfg_buf[0],
1196                                             bufs.lcfg_buflen[0]);
1197                         lustre_cfg_bufs_set_string(&bufs, 0,
1198                                                    clli->cfg_obdname);
1199                 }
1200
1201                 lcfg_new = lustre_cfg_new(lcfg->lcfg_command, &bufs);
1202
1203                 lcfg_new->lcfg_num   = lcfg->lcfg_num;
1204                 lcfg_new->lcfg_flags = lcfg->lcfg_flags;
1205
1206                 /* XXX Hack to try to remain binary compatible with
1207                  * pre-newconfig logs */
1208                 if (lcfg->lcfg_nal != 0 &&      /* pre-newconfig log? */
1209                     (lcfg->lcfg_nid >> 32) == 0) {
1210                         __u32 addr = (__u32)(lcfg->lcfg_nid & 0xffffffff);
1211
1212                         lcfg_new->lcfg_nid =
1213                                 LNET_MKNID(LNET_MKNET(lcfg->lcfg_nal, 0), addr);
1214                         CWARN("Converted pre-newconfig NAL %d NID %x to %s\n",
1215                               lcfg->lcfg_nal, addr,
1216                               libcfs_nid2str(lcfg_new->lcfg_nid));
1217                 } else {
1218                         lcfg_new->lcfg_nid = lcfg->lcfg_nid;
1219                 }
1220
1221                 lcfg_new->lcfg_nal = 0; /* illegal value for obsolete field */
1222
1223                 rc = class_process_config(lcfg_new);
1224                 lustre_cfg_free(lcfg_new);
1225
1226                 if (inst)
1227                         OBD_FREE(inst_name, inst_len);
1228                 break;
1229         }
1230         default:
1231                 CERROR("Unknown llog record type %#x encountered\n",
1232                        rec->lrh_type);
1233                 break;
1234         }
1235 out:
1236         if (rc) {
1237                 CERROR("Err %d on cfg command:\n", rc);
1238                 class_config_dump_handler(handle, rec, data);
1239         }
1240         RETURN(rc);
1241 }
1242
1243 int class_config_parse_llog(struct llog_ctxt *ctxt, char *name,
1244                             struct config_llog_instance *cfg)
1245 {
1246         struct llog_process_cat_data cd = {0, 0};
1247         struct llog_handle *llh;
1248         int rc, rc2;
1249         ENTRY;
1250
1251         CDEBUG(D_INFO, "looking up llog %s\n", name);
1252         rc = llog_create(ctxt, &llh, NULL, name);
1253         if (rc)
1254                 RETURN(rc);
1255
1256         rc = llog_init_handle(llh, LLOG_F_IS_PLAIN, NULL);
1257         if (rc)
1258                 GOTO(parse_out, rc);
1259
1260         /* continue processing from where we last stopped to end-of-log */
1261         if (cfg)
1262                 cd.lpcd_first_idx = cfg->cfg_last_idx;
1263         cd.lpcd_last_idx = 0;
1264
1265         rc = llog_process(llh, class_config_llog_handler, cfg, &cd);
1266
1267         CDEBUG(D_CONFIG, "Processed log %s gen %d-%d (rc=%d)\n", name,
1268                cd.lpcd_first_idx + 1, cd.lpcd_last_idx, rc);
1269
1270         if (cfg)
1271                 cfg->cfg_last_idx = cd.lpcd_last_idx;
1272
1273 parse_out:
1274         rc2 = llog_close(llh);
1275         if (rc == 0)
1276                 rc = rc2;
1277
1278         RETURN(rc);
1279 }
1280
1281 int class_config_dump_handler(struct llog_handle * handle,
1282                               struct llog_rec_hdr *rec, void *data)
1283 {
1284         int cfg_len = rec->lrh_len;
1285         char *cfg_buf = (char*) (rec + 1);
1286         char *outstr, *ptr, *end;
1287         int rc = 0;
1288         ENTRY;
1289
1290         OBD_ALLOC(outstr, 256);
1291         end = outstr + 256;
1292         ptr = outstr;
1293         if (!outstr) {
1294                 RETURN(-ENOMEM);
1295         }
1296         if (rec->lrh_type == OBD_CFG_REC) {
1297                 struct lustre_cfg *lcfg;
1298                 int i;
1299
1300                 rc = lustre_cfg_sanity_check(cfg_buf, cfg_len);
1301                 if (rc)
1302                         GOTO(out, rc);
1303                 lcfg = (struct lustre_cfg *)cfg_buf;
1304
1305                 ptr += snprintf(ptr, end-ptr, "cmd=%05x ",
1306                                 lcfg->lcfg_command);
1307                 if (lcfg->lcfg_flags) {
1308                         ptr += snprintf(ptr, end-ptr, "flags=%#08x ",
1309                                         lcfg->lcfg_flags);
1310                 }
1311                 if (lcfg->lcfg_num) {
1312                         ptr += snprintf(ptr, end-ptr, "num=%#08x ",
1313                                         lcfg->lcfg_num);
1314                 }
1315                 if (lcfg->lcfg_nid) {
1316                         ptr += snprintf(ptr, end-ptr, "nid=%s("LPX64")\n     ",
1317                                         libcfs_nid2str(lcfg->lcfg_nid),
1318                                         lcfg->lcfg_nid);
1319                 }
1320                 if (lcfg->lcfg_command == LCFG_MARKER) {
1321                         struct cfg_marker *marker = lustre_cfg_buf(lcfg, 1);
1322                         ptr += snprintf(ptr, end-ptr, "marker=%d(%#x)%s '%s'",
1323                                         marker->cm_step, marker->cm_flags,
1324                                         marker->cm_tgtname, marker->cm_comment);
1325                 } else {
1326                         for (i = 0; i <  lcfg->lcfg_bufcount; i++) {
1327                                 ptr += snprintf(ptr, end-ptr, "%d:%s  ", i,
1328                                                 lustre_cfg_string(lcfg, i));
1329                         }
1330                 }
1331                 LCONSOLE(D_WARNING, "   %s\n", outstr);
1332         } else {
1333                 LCONSOLE(D_WARNING, "unhandled lrh_type: %#x\n", rec->lrh_type);
1334                 rc = -EINVAL;
1335         }
1336 out:
1337         OBD_FREE(outstr, 256);
1338         RETURN(rc);
1339 }
1340
1341 int class_config_dump_llog(struct llog_ctxt *ctxt, char *name,
1342                            struct config_llog_instance *cfg)
1343 {
1344         struct llog_handle *llh;
1345         int rc, rc2;
1346         ENTRY;
1347
1348         LCONSOLE_INFO("Dumping config log %s\n", name);
1349
1350         rc = llog_create(ctxt, &llh, NULL, name);
1351         if (rc)
1352                 RETURN(rc);
1353
1354         rc = llog_init_handle(llh, LLOG_F_IS_PLAIN, NULL);
1355         if (rc)
1356                 GOTO(parse_out, rc);
1357
1358         rc = llog_process(llh, class_config_dump_handler, cfg, NULL);
1359 parse_out:
1360         rc2 = llog_close(llh);
1361         if (rc == 0)
1362                 rc = rc2;
1363
1364         LCONSOLE_INFO("End config log %s\n", name);
1365         RETURN(rc);
1366
1367 }
1368
1369 /* Cleanup and detach */
1370 int class_manual_cleanup(struct obd_device *obd)
1371 {
1372         char                    flags[3] = "";
1373         struct lustre_cfg      *lcfg;
1374         struct lustre_cfg_bufs  bufs;
1375         int                     rc;
1376         ENTRY;
1377
1378         if (!obd) {
1379                 CERROR("empty cleanup\n");
1380                 RETURN(-EALREADY);
1381         }
1382
1383         if (obd->obd_force)
1384                 strcat(flags, "F");
1385         if (obd->obd_fail)
1386                 strcat(flags, "A");
1387
1388         CDEBUG(D_CONFIG, "Manual cleanup of %s (flags='%s')\n",
1389                obd->obd_name, flags);
1390
1391         lustre_cfg_bufs_reset(&bufs, obd->obd_name);
1392         lustre_cfg_bufs_set_string(&bufs, 1, flags);
1393         lcfg = lustre_cfg_new(LCFG_CLEANUP, &bufs);
1394         if (!lcfg)
1395                 RETURN(-ENOMEM);
1396
1397         rc = class_process_config(lcfg);
1398         if (rc) {
1399                 CERROR("cleanup failed %d: %s\n", rc, obd->obd_name);
1400                 GOTO(out, rc);
1401         }
1402
1403         /* the lcfg is almost the same for both ops */
1404         lcfg->lcfg_command = LCFG_DETACH;
1405         rc = class_process_config(lcfg);
1406         if (rc)
1407                 CERROR("detach failed %d: %s\n", rc, obd->obd_name);
1408 out:
1409         lustre_cfg_free(lcfg);
1410         RETURN(rc);
1411 }
1412
1413 /*
1414  * uuid<->export lustre hash operations
1415  */
1416
1417 static unsigned
1418 uuid_hash(lustre_hash_t *lh,  void *key, unsigned mask)
1419 {
1420         return lh_djb2_hash(((struct obd_uuid *)key)->uuid,
1421                             sizeof(((struct obd_uuid *)key)->uuid), mask);
1422 }
1423
1424 static void *
1425 uuid_key(struct hlist_node *hnode)
1426 {
1427         struct obd_export *exp;
1428
1429         exp = hlist_entry(hnode, struct obd_export, exp_uuid_hash);
1430
1431         RETURN(&exp->exp_client_uuid);
1432 }
1433
1434 /*
1435  * NOTE: It is impossible to find an export that is in failed
1436  *       state with this function
1437  */
1438 static int
1439 uuid_compare(void *key, struct hlist_node *hnode)
1440 {
1441         struct obd_export *exp;
1442
1443         LASSERT(key);
1444         exp = hlist_entry(hnode, struct obd_export, exp_uuid_hash);
1445
1446         RETURN(obd_uuid_equals((struct obd_uuid *)key,&exp->exp_client_uuid) &&
1447                !exp->exp_failed);
1448 }
1449
1450 static void *
1451 uuid_export_get(struct hlist_node *hnode)
1452 {
1453         struct obd_export *exp;
1454
1455         exp = hlist_entry(hnode, struct obd_export, exp_uuid_hash);
1456         class_export_get(exp);
1457
1458         RETURN(exp);
1459 }
1460
1461 static void *
1462 uuid_export_put(struct hlist_node *hnode)
1463 {
1464         struct obd_export *exp;
1465
1466         exp = hlist_entry(hnode, struct obd_export, exp_uuid_hash);
1467         class_export_put(exp);
1468
1469         RETURN(exp);
1470 }
1471
1472 static lustre_hash_ops_t uuid_hash_ops = {
1473         .lh_hash    = uuid_hash,
1474         .lh_key     = uuid_key,
1475         .lh_compare = uuid_compare,
1476         .lh_get     = uuid_export_get,
1477         .lh_put     = uuid_export_put,
1478 };
1479
1480
1481 /*
1482  * nid<->export hash operations
1483  */
1484
1485 static unsigned
1486 nid_hash(lustre_hash_t *lh,  void *key, unsigned mask)
1487 {
1488         return lh_djb2_hash(key, sizeof(lnet_nid_t), mask);
1489 }
1490
1491 static void *
1492 nid_key(struct hlist_node *hnode)
1493 {
1494         struct obd_export *exp;
1495
1496         exp = hlist_entry(hnode, struct obd_export, exp_nid_hash);
1497
1498         RETURN(&exp->exp_connection->c_peer.nid);
1499 }
1500
1501 /*
1502  * NOTE: It is impossible to find an export that is in failed
1503  *       state with this function
1504  */
1505 static int
1506 nid_compare(void *key, struct hlist_node *hnode)
1507 {
1508         struct obd_export *exp;
1509
1510         LASSERT(key);
1511         exp = hlist_entry(hnode, struct obd_export, exp_nid_hash);
1512
1513         RETURN(exp->exp_connection->c_peer.nid == *(lnet_nid_t *)key &&
1514                !exp->exp_failed);
1515 }
1516
1517 static void *
1518 nid_export_get(struct hlist_node *hnode)
1519 {
1520         struct obd_export *exp;
1521
1522         exp = hlist_entry(hnode, struct obd_export, exp_nid_hash);
1523         class_export_get(exp);
1524
1525         RETURN(exp);
1526 }
1527
1528 static void *
1529 nid_export_put(struct hlist_node *hnode)
1530 {
1531         struct obd_export *exp;
1532
1533         exp = hlist_entry(hnode, struct obd_export, exp_nid_hash);
1534         class_export_put(exp);
1535
1536         RETURN(exp);
1537 }
1538
1539 static lustre_hash_ops_t nid_hash_ops = {
1540         .lh_hash    = nid_hash,
1541         .lh_key     = nid_key,
1542         .lh_compare = nid_compare,
1543         .lh_get     = nid_export_get,
1544         .lh_put     = nid_export_put,
1545 };
1546
1547
1548 /*
1549  * nid<->nidstats hash operations
1550  */
1551
1552 static void *
1553 nidstats_key(struct hlist_node *hnode)
1554 {
1555         struct nid_stat *ns;
1556
1557         ns = hlist_entry(hnode, struct nid_stat, nid_hash);
1558
1559         RETURN(&ns->nid);
1560 }
1561
1562 static int
1563 nidstats_compare(void *key, struct hlist_node *hnode)
1564 {
1565         RETURN(*(lnet_nid_t *)nidstats_key(hnode) == *(lnet_nid_t *)key);
1566 }
1567
1568 static void *
1569 nidstats_get(struct hlist_node *hnode)
1570 {
1571         struct nid_stat *ns;
1572
1573         ns = hlist_entry(hnode, struct nid_stat, nid_hash);
1574         ns->nid_exp_ref_count++;
1575
1576         RETURN(ns);
1577 }
1578
1579 static void *
1580 nidstats_put(struct hlist_node *hnode)
1581 {
1582         struct nid_stat *ns;
1583
1584         ns = hlist_entry(hnode, struct nid_stat, nid_hash);
1585         ns->nid_exp_ref_count--;
1586
1587         RETURN(ns);
1588 }
1589
1590 static lustre_hash_ops_t nid_stat_hash_ops = {
1591         .lh_hash    = nid_hash,
1592         .lh_key     = nidstats_key,
1593         .lh_compare = nidstats_compare,
1594         .lh_get     = nidstats_get,
1595         .lh_put     = nidstats_put,
1596 };