lustre/obdclass/obd_config.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) 2003, 2010, Oracle and/or its affiliates. All rights reserved.
  28  * Use is subject to license terms.
  29  *
  30  * Copyright (c) 2011, 2013, 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/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 #include <lustre_disk.h>
  46 #else
  47 #include <liblustre.h>
  48 #include <string.h>
  49 #include <obd_class.h>
  50 #include <obd.h>
  51 #endif
  52 #include <lustre_log.h>
  53 #include <lprocfs_status.h>
  54 #include <lustre_param.h>
  55
  56 #include "llog_internal.h"
  57
  58 static cfs_hash_ops_t uuid_hash_ops;
  59 static cfs_hash_ops_t nid_hash_ops;
  60 static cfs_hash_ops_t nid_stat_hash_ops;
  61
  62 /*********** string parsing utils *********/
  63
  64 /* returns 0 if we find this key in the buffer, else 1 */
  65 int class_find_param(char *buf, char *key, char **valp)
  66 {
  67         char *ptr;
  68
  69         if (!buf)
  70                 return 1;
  71
  72         if ((ptr = strstr(buf, key)) == NULL)
  73                 return 1;
  74
  75         if (valp)
  76                 *valp = ptr + strlen(key);
  77
  78         return 0;
  79 }
  80 EXPORT_SYMBOL(class_find_param);
  81
  82 /**
  83  * Check whether the proc parameter \a param is an old parameter or not from
  84  * the array \a ptr which contains the mapping from old parameters to new ones.
  85  * If it's an old one, then return the pointer to the cfg_interop_param struc-
  86  * ture which contains both the old and new parameters.
  87  *
  88  * \param param                 proc parameter
  89  * \param ptr                   an array which contains the mapping from
  90  *                              old parameters to new ones
  91  *
  92  * \retval valid-pointer        pointer to the cfg_interop_param structure
  93  *                              which contains the old and new parameters
  94  * \retval NULL                 \a param or \a ptr is NULL,
  95  *                              or \a param is not an old parameter
  96  */
  97 struct cfg_interop_param *class_find_old_param(const char *param,
  98                                                struct cfg_interop_param *ptr)
  99 {
 100         char *value = NULL;
 101         int   name_len = 0;
 102
 103         if (param == NULL || ptr == NULL)
 104                 RETURN(NULL);
 105
 106         value = strchr(param, '=');
 107         if (value == NULL)
 108                 name_len = strlen(param);
 109         else
 110                 name_len = value - param;
 111
 112         while (ptr->old_param != NULL) {
 113                 if (strncmp(param, ptr->old_param, name_len) == 0 &&
 114                     name_len == strlen(ptr->old_param))
 115                         RETURN(ptr);
 116                 ptr++;
 117         }
 118
 119         RETURN(NULL);
 120 }
 121 EXPORT_SYMBOL(class_find_old_param);
 122
 123 /**
 124  * Finds a parameter in \a params and copies it to \a copy.
 125  *
 126  * Leading spaces are skipped. Next space or end of string is the
 127  * parameter terminator with the exception that spaces inside single or double
 128  * quotes get included into a parameter. The parameter is copied into \a copy
 129  * which has to be allocated big enough by a caller, quotes are stripped in
 130  * the copy and the copy is terminated by 0.
 131  *
 132  * On return \a params is set to next parameter or to NULL if last
 133  * parameter is returned.
 134  *
 135  * \retval 0 if parameter is returned in \a copy
 136  * \retval 1 otherwise
 137  * \retval -EINVAL if unbalanced quota is found
 138  */
 139 int class_get_next_param(char **params, char *copy)
 140 {
 141         char *q1, *q2, *str;
 142         int len;
 143
 144         str = *params;
 145         while (*str == ' ')
 146                 str++;
 147
 148         if (*str == '\0') {
 149                 *params = NULL;
 150                 return 1;
 151         }
 152
 153         while (1) {
 154                 q1 = strpbrk(str, " '\"");
 155                 if (q1 == NULL) {
 156                         len = strlen(str);
 157                         memcpy(copy, str, len);
 158                         copy[len] = '\0';
 159                         *params = NULL;
 160                         return 0;
 161                 }
 162                 len = q1 - str;
 163                 if (*q1 == ' ') {
 164                         memcpy(copy, str, len);
 165                         copy[len] = '\0';
 166                         *params = str + len;
 167                         return 0;
 168                 }
 169
 170                 memcpy(copy, str, len);
 171                 copy += len;
 172
 173                 /* search for the matching closing quote */
 174                 str = q1 + 1;
 175                 q2 = strchr(str, *q1);
 176                 if (q2 == NULL) {
 177                         CERROR("Unbalanced quota in parameters: \"%s\"\n",
 178                                *params);
 179                         return -EINVAL;
 180                 }
 181                 len = q2 - str;
 182                 memcpy(copy, str, len);
 183                 copy += len;
 184                 str = q2 + 1;
 185         }
 186         return 1;
 187 }
 188 EXPORT_SYMBOL(class_get_next_param);
 189
 190 /* returns 0 if this is the first key in the buffer, else 1.
 191    valp points to first char after key. */
 192 int class_match_param(char *buf, char *key, char **valp)
 193 {
 194         if (!buf)
 195                 return 1;
 196
 197         if (memcmp(buf, key, strlen(key)) != 0)
 198                 return 1;
 199
 200         if (valp)
 201                 *valp = buf + strlen(key);
 202
 203         return 0;
 204 }
 205 EXPORT_SYMBOL(class_match_param);
 206
 207 static int parse_nid(char *buf, void *value, int quiet)
 208 {
 209         lnet_nid_t *nid = (lnet_nid_t *)value;
 210
 211         *nid = libcfs_str2nid(buf);
 212         if (*nid != LNET_NID_ANY)
 213                 return 0;
 214
 215         if (!quiet)
 216                 LCONSOLE_ERROR_MSG(0x159, "Can't parse NID '%s'\n", buf);
 217         return -EINVAL;
 218 }
 219
 220 static int parse_net(char *buf, void *value)
 221 {
 222         __u32 *net = (__u32 *)value;
 223
 224         *net = libcfs_str2net(buf);
 225         CDEBUG(D_INFO, "Net %s\n", libcfs_net2str(*net));
 226         return 0;
 227 }
 228
 229 enum {
 230         CLASS_PARSE_NID = 1,
 231         CLASS_PARSE_NET,
 232 };
 233
 234 /* 0 is good nid,
 235    1 not found
 236    < 0 error
 237    endh is set to next separator */
 238 static int class_parse_value(char *buf, int opc, void *value, char **endh,
 239                              int quiet)
 240 {
 241         char *endp;
 242         char  tmp;
 243         int   rc = 0;
 244
 245         if (!buf)
 246                 return 1;
 247         while (*buf == ',' || *buf == ':')
 248                 buf++;
 249         if (*buf == ' ' || *buf == '/' || *buf == '\0')
 250                 return 1;
 251
 252         /* nid separators or end of nids */
 253         endp = strpbrk(buf, ",: /");
 254         if (endp == NULL)
 255                 endp = buf + strlen(buf);
 256
 257         tmp = *endp;
 258         *endp = '\0';
 259         switch (opc) {
 260         default:
 261                 LBUG();
 262         case CLASS_PARSE_NID:
 263                 rc = parse_nid(buf, value, quiet);
 264                 break;
 265         case CLASS_PARSE_NET:
 266                 rc = parse_net(buf, value);
 267                 break;
 268         }
 269         *endp = tmp;
 270         if (rc != 0)
 271                 return rc;
 272         if (endh)
 273                 *endh = endp;
 274         return 0;
 275 }
 276
 277 int class_parse_nid(char *buf, lnet_nid_t *nid, char **endh)
 278 {
 279         return class_parse_value(buf, CLASS_PARSE_NID, (void *)nid, endh, 0);
 280 }
 281 EXPORT_SYMBOL(class_parse_nid);
 282
 283 int class_parse_nid_quiet(char *buf, lnet_nid_t *nid, char **endh)
 284 {
 285         return class_parse_value(buf, CLASS_PARSE_NID, (void *)nid, endh, 1);
 286 }
 287 EXPORT_SYMBOL(class_parse_nid_quiet);
 288
 289 int class_parse_net(char *buf, __u32 *net, char **endh)
 290 {
 291         return class_parse_value(buf, CLASS_PARSE_NET, (void *)net, endh, 0);
 292 }
 293 EXPORT_SYMBOL(class_parse_net);
 294
 295 /* 1 param contains key and match
 296  * 0 param contains key and not match
 297  * -1 param does not contain key
 298  */
 299 int class_match_nid(char *buf, char *key, lnet_nid_t nid)
 300 {
 301         lnet_nid_t tmp;
 302         int   rc = -1;
 303
 304         while (class_find_param(buf, key, &buf) == 0) {
 305                 /* please restrict to the nids pertaining to
 306                  * the specified nids */
 307                 while (class_parse_nid(buf, &tmp, &buf) == 0) {
 308                         if (tmp == nid)
 309                                 return 1;
 310                 }
 311                 rc = 0;
 312         }
 313         return rc;
 314 }
 315 EXPORT_SYMBOL(class_match_nid);
 316
 317 int class_match_net(char *buf, char *key, __u32 net)
 318 {
 319         __u32 tmp;
 320         int   rc = -1;
 321
 322         while (class_find_param(buf, key, &buf) == 0) {
 323                 /* please restrict to the nids pertaining to
 324                  * the specified networks */
 325                 while (class_parse_net(buf, &tmp, &buf) == 0) {
 326                         if (tmp == net)
 327                                 return 1;
 328                 }
 329                 rc = 0;
 330         }
 331         return rc;
 332 }
 333 EXPORT_SYMBOL(class_match_net);
 334
 335 /********************** class fns **********************/
 336
 337 /**
 338  * Create a new obd device and set the type, name and uuid.  If successful,
 339  * the new device can be accessed by either name or uuid.
 340  */
 341 int class_attach(struct lustre_cfg *lcfg)
 342 {
 343         struct obd_device *obd = NULL;
 344         char *typename, *name, *uuid;
 345         int rc, len;
 346         ENTRY;
 347
 348         if (!LUSTRE_CFG_BUFLEN(lcfg, 1)) {
 349                 CERROR("No type passed!\n");
 350                 RETURN(-EINVAL);
 351         }
 352         typename = lustre_cfg_string(lcfg, 1);
 353
 354         if (!LUSTRE_CFG_BUFLEN(lcfg, 0)) {
 355                 CERROR("No name passed!\n");
 356                 RETURN(-EINVAL);
 357         }
 358         name = lustre_cfg_string(lcfg, 0);
 359
 360         if (!LUSTRE_CFG_BUFLEN(lcfg, 2)) {
 361                 CERROR("No UUID passed!\n");
 362                 RETURN(-EINVAL);
 363         }
 364         uuid = lustre_cfg_string(lcfg, 2);
 365
 366         CDEBUG(D_IOCTL, "attach type %s name: %s uuid: %s\n",
 367                MKSTR(typename), MKSTR(name), MKSTR(uuid));
 368
 369         obd = class_newdev(typename, name);
 370         if (IS_ERR(obd)) {
 371                 /* Already exists or out of obds */
 372                 rc = PTR_ERR(obd);
 373                 obd = NULL;
 374                 CERROR("Cannot create device %s of type %s : %d\n",
 375                        name, typename, rc);
 376                 GOTO(out, rc);
 377         }
 378         LASSERTF(obd != NULL, "Cannot get obd device %s of type %s\n",
 379                  name, typename);
 380         LASSERTF(obd->obd_magic == OBD_DEVICE_MAGIC,
 381                  "obd %p obd_magic %08X != %08X\n",
 382                  obd, obd->obd_magic, OBD_DEVICE_MAGIC);
 383         LASSERTF(strncmp(obd->obd_name, name, strlen(name)) == 0,
 384                  "%p obd_name %s != %s\n", obd, obd->obd_name, name);
 385
 386         rwlock_init(&obd->obd_pool_lock);
 387         obd->obd_pool_limit = 0;
 388         obd->obd_pool_slv = 0;
 389
 390         CFS_INIT_LIST_HEAD(&obd->obd_exports);
 391         CFS_INIT_LIST_HEAD(&obd->obd_unlinked_exports);
 392         CFS_INIT_LIST_HEAD(&obd->obd_delayed_exports);
 393         CFS_INIT_LIST_HEAD(&obd->obd_exports_timed);
 394         CFS_INIT_LIST_HEAD(&obd->obd_nid_stats);
 395         spin_lock_init(&obd->obd_nid_lock);
 396         spin_lock_init(&obd->obd_dev_lock);
 397         mutex_init(&obd->obd_dev_mutex);
 398         spin_lock_init(&obd->obd_osfs_lock);
 399         /* obd->obd_osfs_age must be set to a value in the distant
 400          * past to guarantee a fresh statfs is fetched on mount. */
 401         obd->obd_osfs_age = cfs_time_shift_64(-1000);
 402
 403         /* XXX belongs in setup not attach  */
 404         init_rwsem(&obd->obd_observer_link_sem);
 405         /* recovery data */
 406         cfs_init_timer(&obd->obd_recovery_timer);
 407         spin_lock_init(&obd->obd_recovery_task_lock);
 408         init_waitqueue_head(&obd->obd_next_transno_waitq);
 409         init_waitqueue_head(&obd->obd_evict_inprogress_waitq);
 410         CFS_INIT_LIST_HEAD(&obd->obd_req_replay_queue);
 411         CFS_INIT_LIST_HEAD(&obd->obd_lock_replay_queue);
 412         CFS_INIT_LIST_HEAD(&obd->obd_final_req_queue);
 413         CFS_INIT_LIST_HEAD(&obd->obd_evict_list);
 414         INIT_LIST_HEAD(&obd->obd_lwp_list);
 415
 416         llog_group_init(&obd->obd_olg, FID_SEQ_LLOG);
 417
 418         obd->obd_conn_inprogress = 0;
 419
 420         len = strlen(uuid);
 421         if (len >= sizeof(obd->obd_uuid)) {
 422                 CERROR("uuid must be < %d bytes long\n",
 423                        (int)sizeof(obd->obd_uuid));
 424                 GOTO(out, rc = -EINVAL);
 425         }
 426         memcpy(obd->obd_uuid.uuid, uuid, len);
 427
 428         /* do the attach */
 429         if (OBP(obd, attach)) {
 430                 rc = OBP(obd,attach)(obd, sizeof *lcfg, lcfg);
 431                 if (rc)
 432                         GOTO(out, rc = -EINVAL);
 433         }
 434
 435         /* Detach drops this */
 436         spin_lock(&obd->obd_dev_lock);
 437         atomic_set(&obd->obd_refcount, 1);
 438         spin_unlock(&obd->obd_dev_lock);
 439         lu_ref_init(&obd->obd_reference);
 440         lu_ref_add(&obd->obd_reference, "attach", obd);
 441
 442         obd->obd_attached = 1;
 443         CDEBUG(D_IOCTL, "OBD: dev %d attached type %s with refcount %d\n",
 444                obd->obd_minor, typename, atomic_read(&obd->obd_refcount));
 445         RETURN(0);
 446  out:
 447         if (obd != NULL) {
 448                 class_release_dev(obd);
 449         }
 450         return rc;
 451 }
 452 EXPORT_SYMBOL(class_attach);
 453
 454 /** Create hashes, self-export, and call type-specific setup.
 455  * Setup is effectively the "start this obd" call.
 456  */
 457 int class_setup(struct obd_device *obd, struct lustre_cfg *lcfg)
 458 {
 459         int err = 0;
 460         struct obd_export *exp;
 461         ENTRY;
 462
 463         LASSERT(obd != NULL);
 464         LASSERTF(obd == class_num2obd(obd->obd_minor),
 465                  "obd %p != obd_devs[%d] %p\n",
 466                  obd, obd->obd_minor, class_num2obd(obd->obd_minor));
 467         LASSERTF(obd->obd_magic == OBD_DEVICE_MAGIC,
 468                  "obd %p obd_magic %08x != %08x\n",
 469                  obd, obd->obd_magic, OBD_DEVICE_MAGIC);
 470
 471         /* have we attached a type to this device? */
 472         if (!obd->obd_attached) {
 473                 CERROR("Device %d not attached\n", obd->obd_minor);
 474                 RETURN(-ENODEV);
 475         }
 476
 477         if (obd->obd_set_up) {
 478                 CERROR("Device %d already setup (type %s)\n",
 479                        obd->obd_minor, obd->obd_type->typ_name);
 480                 RETURN(-EEXIST);
 481         }
 482
 483         /* is someone else setting us up right now? (attach inits spinlock) */
 484         spin_lock(&obd->obd_dev_lock);
 485         if (obd->obd_starting) {
 486                 spin_unlock(&obd->obd_dev_lock);
 487                 CERROR("Device %d setup in progress (type %s)\n",
 488                        obd->obd_minor, obd->obd_type->typ_name);
 489                 RETURN(-EEXIST);
 490         }
 491         /* just leave this on forever.  I can't use obd_set_up here because
 492            other fns check that status, and we're not actually set up yet. */
 493         obd->obd_starting = 1;
 494         obd->obd_uuid_hash = NULL;
 495         obd->obd_nid_hash = NULL;
 496         obd->obd_nid_stats_hash = NULL;
 497         spin_unlock(&obd->obd_dev_lock);
 498
 499         /* create an uuid-export lustre hash */
 500         obd->obd_uuid_hash = cfs_hash_create("UUID_HASH",
 501                                              HASH_UUID_CUR_BITS,
 502                                              HASH_UUID_MAX_BITS,
 503                                              HASH_UUID_BKT_BITS, 0,
 504                                              CFS_HASH_MIN_THETA,
 505                                              CFS_HASH_MAX_THETA,
 506                                              &uuid_hash_ops, CFS_HASH_DEFAULT);
 507         if (!obd->obd_uuid_hash)
 508                 GOTO(err_hash, err = -ENOMEM);
 509
 510         /* create a nid-export lustre hash */
 511         obd->obd_nid_hash = cfs_hash_create("NID_HASH",
 512                                             HASH_NID_CUR_BITS,
 513                                             HASH_NID_MAX_BITS,
 514                                             HASH_NID_BKT_BITS, 0,
 515                                             CFS_HASH_MIN_THETA,
 516                                             CFS_HASH_MAX_THETA,
 517                                             &nid_hash_ops, CFS_HASH_DEFAULT);
 518         if (!obd->obd_nid_hash)
 519                 GOTO(err_hash, err = -ENOMEM);
 520
 521         /* create a nid-stats lustre hash */
 522         obd->obd_nid_stats_hash = cfs_hash_create("NID_STATS",
 523                                                   HASH_NID_STATS_CUR_BITS,
 524                                                   HASH_NID_STATS_MAX_BITS,
 525                                                   HASH_NID_STATS_BKT_BITS, 0,
 526                                                   CFS_HASH_MIN_THETA,
 527                                                   CFS_HASH_MAX_THETA,
 528                                                   &nid_stat_hash_ops, CFS_HASH_DEFAULT);
 529         if (!obd->obd_nid_stats_hash)
 530                 GOTO(err_hash, err = -ENOMEM);
 531
 532         exp = class_new_export(obd, &obd->obd_uuid);
 533         if (IS_ERR(exp))
 534                 GOTO(err_hash, err = PTR_ERR(exp));
 535
 536         obd->obd_self_export = exp;
 537         cfs_list_del_init(&exp->exp_obd_chain_timed);
 538         class_export_put(exp);
 539
 540         err = obd_setup(obd, lcfg);
 541         if (err)
 542                 GOTO(err_exp, err);
 543
 544         obd->obd_set_up = 1;
 545
 546         spin_lock(&obd->obd_dev_lock);
 547         /* cleanup drops this */
 548         class_incref(obd, "setup", obd);
 549         spin_unlock(&obd->obd_dev_lock);
 550
 551         CDEBUG(D_IOCTL, "finished setup of obd %s (uuid %s)\n",
 552                obd->obd_name, obd->obd_uuid.uuid);
 553
 554         RETURN(0);
 555 err_exp:
 556         if (obd->obd_self_export) {
 557                 class_unlink_export(obd->obd_self_export);
 558                 obd->obd_self_export = NULL;
 559         }
 560 err_hash:
 561         if (obd->obd_uuid_hash) {
 562                 cfs_hash_putref(obd->obd_uuid_hash);
 563                 obd->obd_uuid_hash = NULL;
 564         }
 565         if (obd->obd_nid_hash) {
 566                 cfs_hash_putref(obd->obd_nid_hash);
 567                 obd->obd_nid_hash = NULL;
 568         }
 569         if (obd->obd_nid_stats_hash) {
 570                 cfs_hash_putref(obd->obd_nid_stats_hash);
 571                 obd->obd_nid_stats_hash = NULL;
 572         }
 573         obd->obd_starting = 0;
 574         CERROR("setup %s failed (%d)\n", obd->obd_name, err);
 575         return err;
 576 }
 577 EXPORT_SYMBOL(class_setup);
 578
 579 /** We have finished using this obd and are ready to destroy it.
 580  * There can be no more references to this obd.
 581  */
 582 int class_detach(struct obd_device *obd, struct lustre_cfg *lcfg)
 583 {
 584         ENTRY;
 585
 586         if (obd->obd_set_up) {
 587                 CERROR("OBD device %d still set up\n", obd->obd_minor);
 588                 RETURN(-EBUSY);
 589         }
 590
 591         spin_lock(&obd->obd_dev_lock);
 592         if (!obd->obd_attached) {
 593                 spin_unlock(&obd->obd_dev_lock);
 594                 CERROR("OBD device %d not attached\n", obd->obd_minor);
 595                 RETURN(-ENODEV);
 596         }
 597         obd->obd_attached = 0;
 598         spin_unlock(&obd->obd_dev_lock);
 599
 600         CDEBUG(D_IOCTL, "detach on obd %s (uuid %s)\n",
 601                obd->obd_name, obd->obd_uuid.uuid);
 602
 603         class_decref(obd, "attach", obd);
 604         RETURN(0);
 605 }
 606 EXPORT_SYMBOL(class_detach);
 607
 608 /** Start shutting down the obd.  There may be in-progess ops when
 609  * this is called.  We tell them to start shutting down with a call
 610  * to class_disconnect_exports().
 611  */
 612 int class_cleanup(struct obd_device *obd, struct lustre_cfg *lcfg)
 613 {
 614         int err = 0;
 615         char *flag;
 616         ENTRY;
 617
 618         OBD_RACE(OBD_FAIL_LDLM_RECOV_CLIENTS);
 619
 620         if (!obd->obd_set_up) {
 621                 CERROR("Device %d not setup\n", obd->obd_minor);
 622                 RETURN(-ENODEV);
 623         }
 624
 625         spin_lock(&obd->obd_dev_lock);
 626         if (obd->obd_stopping) {
 627                 spin_unlock(&obd->obd_dev_lock);
 628                 CERROR("OBD %d already stopping\n", obd->obd_minor);
 629                 RETURN(-ENODEV);
 630         }
 631         /* Leave this on forever */
 632         obd->obd_stopping = 1;
 633
 634         /* wait for already-arrived-connections to finish. */
 635         while (obd->obd_conn_inprogress > 0) {
 636                 spin_unlock(&obd->obd_dev_lock);
 637
 638                 cond_resched();
 639
 640                 spin_lock(&obd->obd_dev_lock);
 641         }
 642         spin_unlock(&obd->obd_dev_lock);
 643
 644         if (lcfg->lcfg_bufcount >= 2 && LUSTRE_CFG_BUFLEN(lcfg, 1) > 0) {
 645                 for (flag = lustre_cfg_string(lcfg, 1); *flag != 0; flag++)
 646                         switch (*flag) {
 647                         case 'F':
 648                                 obd->obd_force = 1;
 649                                 break;
 650                         case 'A':
 651                                 LCONSOLE_WARN("Failing over %s\n",
 652                                               obd->obd_name);
 653                                 obd->obd_fail = 1;
 654                                 obd->obd_no_transno = 1;
 655                                 obd->obd_no_recov = 1;
 656                                 if (OBP(obd, iocontrol)) {
 657                                         obd_iocontrol(OBD_IOC_SYNC,
 658                                                       obd->obd_self_export,
 659                                                       0, NULL, NULL);
 660                                 }
 661                                 break;
 662                         default:
 663                                 CERROR("Unrecognised flag '%c'\n", *flag);
 664                         }
 665         }
 666
 667         LASSERT(obd->obd_self_export);
 668
 669         /* The three references that should be remaining are the
 670          * obd_self_export and the attach and setup references. */
 671         if (atomic_read(&obd->obd_refcount) > 3) {
 672                 /* refcounf - 3 might be the number of real exports
 673                    (excluding self export). But class_incref is called
 674                    by other things as well, so don't count on it. */
 675                 CDEBUG(D_IOCTL, "%s: forcing exports to disconnect: %d\n",
 676                        obd->obd_name, atomic_read(&obd->obd_refcount) - 3);
 677                 dump_exports(obd, 0);
 678                 class_disconnect_exports(obd);
 679         }
 680
 681         /* Precleanup, we must make sure all exports get destroyed. */
 682         err = obd_precleanup(obd, OBD_CLEANUP_EXPORTS);
 683         if (err)
 684                 CERROR("Precleanup %s returned %d\n",
 685                        obd->obd_name, err);
 686
 687         /* destroy an uuid-export hash body */
 688         if (obd->obd_uuid_hash) {
 689                 cfs_hash_putref(obd->obd_uuid_hash);
 690                 obd->obd_uuid_hash = NULL;
 691         }
 692
 693         /* destroy a nid-export hash body */
 694         if (obd->obd_nid_hash) {
 695                 cfs_hash_putref(obd->obd_nid_hash);
 696                 obd->obd_nid_hash = NULL;
 697         }
 698
 699         /* destroy a nid-stats hash body */
 700         if (obd->obd_nid_stats_hash) {
 701                 cfs_hash_putref(obd->obd_nid_stats_hash);
 702                 obd->obd_nid_stats_hash = NULL;
 703         }
 704
 705         class_decref(obd, "setup", obd);
 706         obd->obd_set_up = 0;
 707
 708         RETURN(0);
 709 }
 710 EXPORT_SYMBOL(class_cleanup);
 711
 712 struct obd_device *class_incref(struct obd_device *obd,
 713                                 const char *scope, const void *source)
 714 {
 715         lu_ref_add_atomic(&obd->obd_reference, scope, source);
 716         atomic_inc(&obd->obd_refcount);
 717         CDEBUG(D_INFO, "incref %s (%p) now %d\n", obd->obd_name, obd,
 718                atomic_read(&obd->obd_refcount));
 719
 720         return obd;
 721 }
 722 EXPORT_SYMBOL(class_incref);
 723
 724 void class_decref(struct obd_device *obd, const char *scope, const void *source)
 725 {
 726         int err;
 727         int refs;
 728
 729         spin_lock(&obd->obd_dev_lock);
 730         atomic_dec(&obd->obd_refcount);
 731         refs = atomic_read(&obd->obd_refcount);
 732         spin_unlock(&obd->obd_dev_lock);
 733         lu_ref_del(&obd->obd_reference, scope, source);
 734
 735         CDEBUG(D_INFO, "Decref %s (%p) now %d\n", obd->obd_name, obd, refs);
 736
 737         if ((refs == 1) && obd->obd_stopping) {
 738                 /* All exports have been destroyed; there should
 739                    be no more in-progress ops by this point.*/
 740
 741                 spin_lock(&obd->obd_self_export->exp_lock);
 742                 obd->obd_self_export->exp_flags |= exp_flags_from_obd(obd);
 743                 spin_unlock(&obd->obd_self_export->exp_lock);
 744
 745                 /* note that we'll recurse into class_decref again */
 746                 class_unlink_export(obd->obd_self_export);
 747                 return;
 748         }
 749
 750         if (refs == 0) {
 751                 CDEBUG(D_CONFIG, "finishing cleanup of obd %s (%s)\n",
 752                        obd->obd_name, obd->obd_uuid.uuid);
 753                 LASSERT(!obd->obd_attached);
 754                 if (obd->obd_stopping) {
 755                         /* If we're not stopping, we were never set up */
 756                         err = obd_cleanup(obd);
 757                         if (err)
 758                                 CERROR("Cleanup %s returned %d\n",
 759                                        obd->obd_name, err);
 760                 }
 761                 if (OBP(obd, detach)) {
 762                         err = OBP(obd, detach)(obd);
 763                         if (err)
 764                                 CERROR("Detach returned %d\n", err);
 765                 }
 766                 class_release_dev(obd);
 767         }
 768 }
 769 EXPORT_SYMBOL(class_decref);
 770
 771 /** Add a failover nid location.
 772  * Client obd types contact server obd types using this nid list.
 773  */
 774 int class_add_conn(struct obd_device *obd, struct lustre_cfg *lcfg)
 775 {
 776         struct obd_import *imp;
 777         struct obd_uuid uuid;
 778         int rc;
 779         ENTRY;
 780
 781         if (LUSTRE_CFG_BUFLEN(lcfg, 1) < 1 ||
 782             LUSTRE_CFG_BUFLEN(lcfg, 1) > sizeof(struct obd_uuid)) {
 783                 CERROR("invalid conn_uuid\n");
 784                 RETURN(-EINVAL);
 785         }
 786         if (strcmp(obd->obd_type->typ_name, LUSTRE_MDC_NAME) &&
 787             strcmp(obd->obd_type->typ_name, LUSTRE_OSC_NAME) &&
 788             strcmp(obd->obd_type->typ_name, LUSTRE_OSP_NAME) &&
 789             strcmp(obd->obd_type->typ_name, LUSTRE_LWP_NAME) &&
 790             strcmp(obd->obd_type->typ_name, LUSTRE_MGC_NAME)) {
 791                 CERROR("can't add connection on non-client dev\n");
 792                 RETURN(-EINVAL);
 793         }
 794
 795         imp = obd->u.cli.cl_import;
 796         if (!imp) {
 797                 CERROR("try to add conn on immature client dev\n");
 798                 RETURN(-EINVAL);
 799         }
 800
 801         obd_str2uuid(&uuid, lustre_cfg_string(lcfg, 1));
 802         rc = obd_add_conn(imp, &uuid, lcfg->lcfg_num);
 803
 804         RETURN(rc);
 805 }
 806 EXPORT_SYMBOL(class_add_conn);
 807
 808 /** Remove a failover nid location.
 809  */
 810 int class_del_conn(struct obd_device *obd, struct lustre_cfg *lcfg)
 811 {
 812         struct obd_import *imp;
 813         struct obd_uuid uuid;
 814         int rc;
 815         ENTRY;
 816
 817         if (LUSTRE_CFG_BUFLEN(lcfg, 1) < 1 ||
 818             LUSTRE_CFG_BUFLEN(lcfg, 1) > sizeof(struct obd_uuid)) {
 819                 CERROR("invalid conn_uuid\n");
 820                 RETURN(-EINVAL);
 821         }
 822         if (strcmp(obd->obd_type->typ_name, LUSTRE_MDC_NAME) &&
 823             strcmp(obd->obd_type->typ_name, LUSTRE_OSC_NAME)) {
 824                 CERROR("can't del connection on non-client dev\n");
 825                 RETURN(-EINVAL);
 826         }
 827
 828         imp = obd->u.cli.cl_import;
 829         if (!imp) {
 830                 CERROR("try to del conn on immature client dev\n");
 831                 RETURN(-EINVAL);
 832         }
 833
 834         obd_str2uuid(&uuid, lustre_cfg_string(lcfg, 1));
 835         rc = obd_del_conn(imp, &uuid);
 836
 837         RETURN(rc);
 838 }
 839
 840 CFS_LIST_HEAD(lustre_profile_list);
 841
 842 struct lustre_profile *class_get_profile(const char * prof)
 843 {
 844         struct lustre_profile *lprof;
 845
 846         ENTRY;
 847         cfs_list_for_each_entry(lprof, &lustre_profile_list, lp_list) {
 848                 if (!strcmp(lprof->lp_profile, prof)) {
 849                         RETURN(lprof);
 850                 }
 851         }
 852         RETURN(NULL);
 853 }
 854 EXPORT_SYMBOL(class_get_profile);
 855
 856 /** Create a named "profile".
 857  * This defines the mdc and osc names to use for a client.
 858  * This also is used to define the lov to be used by a mdt.
 859  */
 860 int class_add_profile(int proflen, char *prof, int osclen, char *osc,
 861                       int mdclen, char *mdc)
 862 {
 863         struct lustre_profile *lprof;
 864         int err = 0;
 865         ENTRY;
 866
 867         CDEBUG(D_CONFIG, "Add profile %s\n", prof);
 868
 869         OBD_ALLOC(lprof, sizeof(*lprof));
 870         if (lprof == NULL)
 871                 RETURN(-ENOMEM);
 872         CFS_INIT_LIST_HEAD(&lprof->lp_list);
 873
 874         LASSERT(proflen == (strlen(prof) + 1));
 875         OBD_ALLOC(lprof->lp_profile, proflen);
 876         if (lprof->lp_profile == NULL)
 877                 GOTO(out, err = -ENOMEM);
 878         memcpy(lprof->lp_profile, prof, proflen);
 879
 880         LASSERT(osclen == (strlen(osc) + 1));
 881         OBD_ALLOC(lprof->lp_dt, osclen);
 882         if (lprof->lp_dt == NULL)
 883                 GOTO(out, err = -ENOMEM);
 884         memcpy(lprof->lp_dt, osc, osclen);
 885
 886         if (mdclen > 0) {
 887                 LASSERT(mdclen == (strlen(mdc) + 1));
 888                 OBD_ALLOC(lprof->lp_md, mdclen);
 889                 if (lprof->lp_md == NULL)
 890                         GOTO(out, err = -ENOMEM);
 891                 memcpy(lprof->lp_md, mdc, mdclen);
 892         }
 893
 894         cfs_list_add(&lprof->lp_list, &lustre_profile_list);
 895         RETURN(err);
 896
 897 out:
 898         if (lprof->lp_md)
 899                 OBD_FREE(lprof->lp_md, mdclen);
 900         if (lprof->lp_dt)
 901                 OBD_FREE(lprof->lp_dt, osclen);
 902         if (lprof->lp_profile)
 903                 OBD_FREE(lprof->lp_profile, proflen);
 904         OBD_FREE(lprof, sizeof(*lprof));
 905         RETURN(err);
 906 }
 907
 908 void class_del_profile(const char *prof)
 909 {
 910         struct lustre_profile *lprof;
 911         ENTRY;
 912
 913         CDEBUG(D_CONFIG, "Del profile %s\n", prof);
 914
 915         lprof = class_get_profile(prof);
 916         if (lprof) {
 917                 cfs_list_del(&lprof->lp_list);
 918                 OBD_FREE(lprof->lp_profile, strlen(lprof->lp_profile) + 1);
 919                 OBD_FREE(lprof->lp_dt, strlen(lprof->lp_dt) + 1);
 920                 if (lprof->lp_md)
 921                         OBD_FREE(lprof->lp_md, strlen(lprof->lp_md) + 1);
 922                 OBD_FREE(lprof, sizeof *lprof);
 923         }
 924         EXIT;
 925 }
 926 EXPORT_SYMBOL(class_del_profile);
 927
 928 /* COMPAT_146 */
 929 void class_del_profiles(void)
 930 {
 931         struct lustre_profile *lprof, *n;
 932         ENTRY;
 933
 934         cfs_list_for_each_entry_safe(lprof, n, &lustre_profile_list, lp_list) {
 935                 cfs_list_del(&lprof->lp_list);
 936                 OBD_FREE(lprof->lp_profile, strlen(lprof->lp_profile) + 1);
 937                 OBD_FREE(lprof->lp_dt, strlen(lprof->lp_dt) + 1);
 938                 if (lprof->lp_md)
 939                         OBD_FREE(lprof->lp_md, strlen(lprof->lp_md) + 1);
 940                 OBD_FREE(lprof, sizeof *lprof);
 941         }
 942         EXIT;
 943 }
 944 EXPORT_SYMBOL(class_del_profiles);
 945
 946 static int class_set_global(char *ptr, int val, struct lustre_cfg *lcfg)
 947 {
 948         ENTRY;
 949         if (class_match_param(ptr, PARAM_AT_MIN, NULL) == 0)
 950                 at_min = val;
 951         else if (class_match_param(ptr, PARAM_AT_MAX, NULL) == 0)
 952                 at_max = val;
 953         else if (class_match_param(ptr, PARAM_AT_EXTRA, NULL) == 0)
 954                 at_extra = val;
 955         else if (class_match_param(ptr, PARAM_AT_EARLY_MARGIN, NULL) == 0)
 956                 at_early_margin = val;
 957         else if (class_match_param(ptr, PARAM_AT_HISTORY, NULL) == 0)
 958                 at_history = val;
 959         else if (class_match_param(ptr, PARAM_JOBID_VAR, NULL) == 0)
 960                 strlcpy(obd_jobid_var, lustre_cfg_string(lcfg, 2),
 961                         JOBSTATS_JOBID_VAR_MAX_LEN + 1);
 962         else
 963                 RETURN(-EINVAL);
 964
 965         CDEBUG(D_IOCTL, "global %s = %d\n", ptr, val);
 966         RETURN(0);
 967 }
 968
 969
 970 /* We can't call ll_process_config or lquota_process_config directly because
 971  * it lives in a module that must be loaded after this one. */
 972 static int (*client_process_config)(struct lustre_cfg *lcfg) = NULL;
 973 static int (*quota_process_config)(struct lustre_cfg *lcfg) = NULL;
 974
 975 void lustre_register_client_process_config(int (*cpc)(struct lustre_cfg *lcfg))
 976 {
 977         client_process_config = cpc;
 978 }
 979 EXPORT_SYMBOL(lustre_register_client_process_config);
 980
 981 /**
 982  * Rename the proc parameter in \a cfg with a new name \a new_name.
 983  *
 984  * \param cfg      config structure which contains the proc parameter
 985  * \param new_name new name of the proc parameter
 986  *
 987  * \retval valid-pointer    pointer to the newly-allocated config structure
 988  *                          which contains the renamed proc parameter
 989  * \retval ERR_PTR(-EINVAL) if \a cfg or \a new_name is NULL, or \a cfg does
 990  *                          not contain a proc parameter
 991  * \retval ERR_PTR(-ENOMEM) if memory allocation failure occurs
 992  */
 993 struct lustre_cfg *lustre_cfg_rename(struct lustre_cfg *cfg,
 994                                      const char *new_name)
 995 {
 996         struct lustre_cfg_bufs  *bufs = NULL;
 997         struct lustre_cfg       *new_cfg = NULL;
 998         char                    *param = NULL;
 999         char                    *new_param = NULL;
1000         char                    *value = NULL;
1001         int                      name_len = 0;
1002         int                      new_len = 0;
1003         ENTRY;
1004
1005         if (cfg == NULL || new_name == NULL)
1006                 RETURN(ERR_PTR(-EINVAL));
1007
1008         param = lustre_cfg_string(cfg, 1);
1009         if (param == NULL)
1010                 RETURN(ERR_PTR(-EINVAL));
1011
1012         value = strchr(param, '=');
1013         if (value == NULL)
1014                 name_len = strlen(param);
1015         else
1016                 name_len = value - param;
1017
1018         new_len = LUSTRE_CFG_BUFLEN(cfg, 1) + strlen(new_name) - name_len;
1019
1020         OBD_ALLOC(new_param, new_len);
1021         if (new_param == NULL)
1022                 RETURN(ERR_PTR(-ENOMEM));
1023
1024         strcpy(new_param, new_name);
1025         if (value != NULL)
1026                 strcat(new_param, value);
1027
1028         OBD_ALLOC_PTR(bufs);
1029         if (bufs == NULL) {
1030                 OBD_FREE(new_param, new_len);
1031                 RETURN(ERR_PTR(-ENOMEM));
1032         }
1033
1034         lustre_cfg_bufs_reset(bufs, NULL);
1035         lustre_cfg_bufs_init(bufs, cfg);
1036         lustre_cfg_bufs_set_string(bufs, 1, new_param);
1037
1038         new_cfg = lustre_cfg_new(cfg->lcfg_command, bufs);
1039
1040         OBD_FREE(new_param, new_len);
1041         OBD_FREE_PTR(bufs);
1042         if (new_cfg == NULL)
1043                 RETURN(ERR_PTR(-ENOMEM));
1044
1045         new_cfg->lcfg_num = cfg->lcfg_num;
1046         new_cfg->lcfg_flags = cfg->lcfg_flags;
1047         new_cfg->lcfg_nid = cfg->lcfg_nid;
1048         new_cfg->lcfg_nal = cfg->lcfg_nal;
1049
1050         RETURN(new_cfg);
1051 }
1052 EXPORT_SYMBOL(lustre_cfg_rename);
1053
1054 static int process_param2_config(struct lustre_cfg *lcfg)
1055 {
1056         char *param = lustre_cfg_string(lcfg, 1);
1057         char *upcall = lustre_cfg_string(lcfg, 2);
1058         char *argv[] = {
1059                 [0] = "/usr/sbin/lctl",
1060                 [1] = "set_param",
1061                 [2] = param,
1062                 [3] = NULL
1063         };
1064         struct timeval  start;
1065         struct timeval  end;
1066         int             rc;
1067         ENTRY;
1068
1069         /* Add upcall processing here. Now only lctl is supported */
1070         if (strcmp(upcall, LCTL_UPCALL) != 0) {
1071                 CERROR("Unsupported upcall %s\n", upcall);
1072                 RETURN(-EINVAL);
1073         }
1074
1075         do_gettimeofday(&start);
1076         rc = call_usermodehelper(argv[0], argv, NULL, 0);
1077         do_gettimeofday(&end);
1078
1079         if (rc < 0) {
1080                 CERROR("lctl: error invoking upcall %s %s %s: rc = %d; "
1081                        "time %ldus\n", argv[0], argv[1], argv[2], rc,
1082                        cfs_timeval_sub(&end, &start, NULL));
1083         } else {
1084                 CDEBUG(D_HA, "lctl: invoked upcall %s %s %s, time %ldus\n",
1085                        argv[0], argv[1], argv[2],
1086                        cfs_timeval_sub(&end, &start, NULL));
1087                        rc = 0;
1088         }
1089
1090         RETURN(rc);
1091 }
1092
1093 void lustre_register_quota_process_config(int (*qpc)(struct lustre_cfg *lcfg))
1094 {
1095         quota_process_config = qpc;
1096 }
1097 EXPORT_SYMBOL(lustre_register_quota_process_config);
1098
1099 /** Process configuration commands given in lustre_cfg form.
1100  * These may come from direct calls (e.g. class_manual_cleanup)
1101  * or processing the config llog, or ioctl from lctl.
1102  */
1103 int class_process_config(struct lustre_cfg *lcfg)
1104 {
1105         struct obd_device *obd;
1106         int err;
1107
1108         LASSERT(lcfg && !IS_ERR(lcfg));
1109         CDEBUG(D_IOCTL, "processing cmd: %x\n", lcfg->lcfg_command);
1110
1111         /* Commands that don't need a device */
1112         switch(lcfg->lcfg_command) {
1113         case LCFG_ATTACH: {
1114                 err = class_attach(lcfg);
1115                 GOTO(out, err);
1116         }
1117         case LCFG_ADD_UUID: {
1118                 CDEBUG(D_IOCTL, "adding mapping from uuid %s to nid "LPX64
1119                        " (%s)\n", lustre_cfg_string(lcfg, 1),
1120                        lcfg->lcfg_nid, libcfs_nid2str(lcfg->lcfg_nid));
1121
1122                 err = class_add_uuid(lustre_cfg_string(lcfg, 1), lcfg->lcfg_nid);
1123                 GOTO(out, err);
1124         }
1125         case LCFG_DEL_UUID: {
1126                 CDEBUG(D_IOCTL, "removing mappings for uuid %s\n",
1127                        (lcfg->lcfg_bufcount < 2 || LUSTRE_CFG_BUFLEN(lcfg, 1) == 0)
1128                        ? "<all uuids>" : lustre_cfg_string(lcfg, 1));
1129
1130                 err = class_del_uuid(lustre_cfg_string(lcfg, 1));
1131                 GOTO(out, err);
1132         }
1133         case LCFG_MOUNTOPT: {
1134                 CDEBUG(D_IOCTL, "mountopt: profile %s osc %s mdc %s\n",
1135                        lustre_cfg_string(lcfg, 1),
1136                        lustre_cfg_string(lcfg, 2),
1137                        lustre_cfg_string(lcfg, 3));
1138                 /* set these mount options somewhere, so ll_fill_super
1139                  * can find them. */
1140                 err = class_add_profile(LUSTRE_CFG_BUFLEN(lcfg, 1),
1141                                         lustre_cfg_string(lcfg, 1),
1142                                         LUSTRE_CFG_BUFLEN(lcfg, 2),
1143                                         lustre_cfg_string(lcfg, 2),
1144                                         LUSTRE_CFG_BUFLEN(lcfg, 3),
1145                                         lustre_cfg_string(lcfg, 3));
1146                 GOTO(out, err);
1147         }
1148         case LCFG_DEL_MOUNTOPT: {
1149                 CDEBUG(D_IOCTL, "mountopt: profile %s\n",
1150                        lustre_cfg_string(lcfg, 1));
1151                 class_del_profile(lustre_cfg_string(lcfg, 1));
1152                 GOTO(out, err = 0);
1153         }
1154         case LCFG_SET_TIMEOUT: {
1155                 CDEBUG(D_IOCTL, "changing lustre timeout from %d to %d\n",
1156                        obd_timeout, lcfg->lcfg_num);
1157                 obd_timeout = max(lcfg->lcfg_num, 1U);
1158                 obd_timeout_set = 1;
1159                 GOTO(out, err = 0);
1160         }
1161         case LCFG_SET_LDLM_TIMEOUT: {
1162                 CDEBUG(D_IOCTL, "changing lustre ldlm_timeout from %d to %d\n",
1163                        ldlm_timeout, lcfg->lcfg_num);
1164                 ldlm_timeout = max(lcfg->lcfg_num, 1U);
1165                 if (ldlm_timeout >= obd_timeout)
1166                         ldlm_timeout = max(obd_timeout / 3, 1U);
1167                 ldlm_timeout_set = 1;
1168                 GOTO(out, err = 0);
1169         }
1170         case LCFG_SET_UPCALL: {
1171                 LCONSOLE_ERROR_MSG(0x15a, "recovery upcall is deprecated\n");
1172                 /* COMPAT_146 Don't fail on old configs */
1173                 GOTO(out, err = 0);
1174         }
1175         case LCFG_MARKER: {
1176                 struct cfg_marker *marker;
1177                 marker = lustre_cfg_buf(lcfg, 1);
1178                 CDEBUG(D_IOCTL, "marker %d (%#x) %.16s %s\n", marker->cm_step,
1179                        marker->cm_flags, marker->cm_tgtname, marker->cm_comment);
1180                 GOTO(out, err = 0);
1181         }
1182         case LCFG_PARAM: {
1183                 char *tmp;
1184                 /* llite has no obd */
1185                 if ((class_match_param(lustre_cfg_string(lcfg, 1),
1186                                        PARAM_LLITE, 0) == 0) &&
1187                     client_process_config) {
1188                         err = (*client_process_config)(lcfg);
1189                         GOTO(out, err);
1190                 } else if ((class_match_param(lustre_cfg_string(lcfg, 1),
1191                                               PARAM_SYS, &tmp) == 0)) {
1192                         /* Global param settings */
1193                         err = class_set_global(tmp, lcfg->lcfg_num, lcfg);
1194                         /*
1195                          * Client or server should not fail to mount if
1196                          * it hits an unknown configuration parameter.
1197                          */
1198                         if (err != 0)
1199                                 CWARN("Ignoring unknown param %s\n", tmp);
1200
1201                         GOTO(out, err = 0);
1202                 } else if ((class_match_param(lustre_cfg_string(lcfg, 1),
1203                                               PARAM_QUOTA, &tmp) == 0) &&
1204                            quota_process_config) {
1205                         err = (*quota_process_config)(lcfg);
1206                         GOTO(out, err);
1207                 }
1208
1209                 break;
1210         }
1211         case LCFG_SET_PARAM: {
1212                 err = process_param2_config(lcfg);
1213                 GOTO(out, err = 0);
1214         }
1215         }
1216         /* Commands that require a device */
1217         obd = class_name2obd(lustre_cfg_string(lcfg, 0));
1218         if (obd == NULL) {
1219                 if (!LUSTRE_CFG_BUFLEN(lcfg, 0))
1220                         CERROR("this lcfg command requires a device name\n");
1221                 else
1222                         CERROR("no device for: %s\n",
1223                                lustre_cfg_string(lcfg, 0));
1224
1225                 GOTO(out, err = -EINVAL);
1226         }
1227
1228         switch(lcfg->lcfg_command) {
1229         case LCFG_SETUP: {
1230                 err = class_setup(obd, lcfg);
1231                 GOTO(out, err);
1232         }
1233         case LCFG_DETACH: {
1234                 err = class_detach(obd, lcfg);
1235                 GOTO(out, err = 0);
1236         }
1237         case LCFG_CLEANUP: {
1238                 err = class_cleanup(obd, lcfg);
1239                 GOTO(out, err = 0);
1240         }
1241         case LCFG_ADD_CONN: {
1242                 err = class_add_conn(obd, lcfg);
1243                 GOTO(out, err = 0);
1244         }
1245         case LCFG_DEL_CONN: {
1246                 err = class_del_conn(obd, lcfg);
1247                 GOTO(out, err = 0);
1248         }
1249         case LCFG_POOL_NEW: {
1250                 err = obd_pool_new(obd, lustre_cfg_string(lcfg, 2));
1251                 GOTO(out, err = 0);
1252         }
1253         case LCFG_POOL_ADD: {
1254                 err = obd_pool_add(obd, lustre_cfg_string(lcfg, 2),
1255                                    lustre_cfg_string(lcfg, 3));
1256                 GOTO(out, err = 0);
1257         }
1258         case LCFG_POOL_REM: {
1259                 err = obd_pool_rem(obd, lustre_cfg_string(lcfg, 2),
1260                                    lustre_cfg_string(lcfg, 3));
1261                 GOTO(out, err = 0);
1262         }
1263         case LCFG_POOL_DEL: {
1264                 err = obd_pool_del(obd, lustre_cfg_string(lcfg, 2));
1265                 GOTO(out, err = 0);
1266         }
1267         default: {
1268                 err = obd_process_config(obd, sizeof(*lcfg), lcfg);
1269                 GOTO(out, err);
1270
1271         }
1272         }
1273 out:
1274         if ((err < 0) && !(lcfg->lcfg_command & LCFG_REQUIRED)) {
1275                 CWARN("Ignoring error %d on optional command %#x\n", err,
1276                       lcfg->lcfg_command);
1277                 err = 0;
1278         }
1279         return err;
1280 }
1281 EXPORT_SYMBOL(class_process_config);
1282
1283 #ifndef HAVE_ONLY_PROCFS_SEQ
1284 int class_process_proc_param(char *prefix, struct lprocfs_vars *lvars,
1285                              struct lustre_cfg *lcfg, void *data)
1286 {
1287 #ifdef __KERNEL__
1288         struct lprocfs_vars *var;
1289         char *key, *sval;
1290         int i, keylen, vallen;
1291         int matched = 0, j = 0;
1292         int rc = 0;
1293         int skip = 0;
1294         ENTRY;
1295
1296         if (lcfg->lcfg_command != LCFG_PARAM) {
1297                 CERROR("Unknown command: %d\n", lcfg->lcfg_command);
1298                 RETURN(-EINVAL);
1299         }
1300
1301         /* e.g. tunefs.lustre --param mdt.group_upcall=foo /r/tmp/lustre-mdt
1302            or   lctl conf_param lustre-MDT0000.mdt.group_upcall=bar
1303            or   lctl conf_param lustre-OST0000.osc.max_dirty_mb=36 */
1304         for (i = 1; i < lcfg->lcfg_bufcount; i++) {
1305                 key = lustre_cfg_buf(lcfg, i);
1306                 /* Strip off prefix */
1307                 if (class_match_param(key, prefix, &key))
1308                         /* If the prefix doesn't match, return error so we
1309                          * can pass it down the stack */
1310                         RETURN(-ENOSYS);
1311                 sval = strchr(key, '=');
1312                 if (!sval || (*(sval + 1) == 0)) {
1313                         CERROR("Can't parse param %s (missing '=')\n", key);
1314                         /* rc = -EINVAL;        continue parsing other params */
1315                         continue;
1316                 }
1317                 keylen = sval - key;
1318                 sval++;
1319                 vallen = strlen(sval);
1320                 matched = 0;
1321                 j = 0;
1322                 /* Search proc entries */
1323                 while (lvars[j].name) {
1324                         var = &lvars[j];
1325                         if (class_match_param(key, (char *)var->name, 0) == 0 &&
1326                             keylen == strlen(var->name)) {
1327                                 matched++;
1328                                 rc = -EROFS;
1329
1330                                 if (var->write_fptr) {
1331                                         mm_segment_t oldfs;
1332                                         oldfs = get_fs();
1333                                         set_fs(KERNEL_DS);
1334                                         rc = (var->write_fptr)(NULL, sval,
1335                                                                 vallen, data);
1336                                         set_fs(oldfs);
1337                                 }
1338                                 break;
1339                         }
1340                         j++;
1341                 }
1342                 if (!matched) {
1343                         CERROR("%.*s: %s unknown param %s\n",
1344                                (int)strlen(prefix) - 1, prefix,
1345                                (char *)lustre_cfg_string(lcfg, 0), key);
1346                         /* rc = -EINVAL;        continue parsing other params */
1347                         skip++;
1348                 } else if (rc < 0) {
1349                         CERROR("%s: error writing proc entry '%s': rc = %d\n",
1350                                prefix, var->name, rc);
1351                         rc = 0;
1352                 } else {
1353                         CDEBUG(D_CONFIG, "%s.%.*s: Set parameter %.*s=%s\n",
1354                                          lustre_cfg_string(lcfg, 0),
1355                                          (int)strlen(prefix) - 1, prefix,
1356                                          (int)(sval - key - 1), key, sval);
1357                 }
1358         }
1359
1360         if (rc > 0)
1361                 rc = 0;
1362         if (!rc && skip)
1363                 rc = skip;
1364         RETURN(rc);
1365 #else
1366         CDEBUG(D_CONFIG, "liblustre can't process params.\n");
1367         /* Don't throw config error */
1368         RETURN(0);
1369 #endif
1370 }
1371 EXPORT_SYMBOL(class_process_proc_param);
1372 #endif
1373
1374 int class_process_proc_seq_param(char *prefix, struct lprocfs_seq_vars *lvars,
1375                                  struct lustre_cfg *lcfg, void *data)
1376 {
1377 #ifdef __KERNEL__
1378         struct lprocfs_seq_vars *var;
1379         struct file fakefile;
1380         struct seq_file fake_seqfile;
1381         char *key, *sval;
1382         int i, keylen, vallen;
1383         int matched = 0, j = 0;
1384         int rc = 0;
1385         int skip = 0;
1386         ENTRY;
1387
1388         if (lcfg->lcfg_command != LCFG_PARAM) {
1389                 CERROR("Unknown command: %d\n", lcfg->lcfg_command);
1390                 RETURN(-EINVAL);
1391         }
1392
1393         /* fake a seq file so that var->fops->write can work... */
1394         fakefile.private_data = &fake_seqfile;
1395         fake_seqfile.private = data;
1396         /* e.g. tunefs.lustre --param mdt.group_upcall=foo /r/tmp/lustre-mdt
1397            or   lctl conf_param lustre-MDT0000.mdt.group_upcall=bar
1398            or   lctl conf_param lustre-OST0000.osc.max_dirty_mb=36 */
1399         for (i = 1; i < lcfg->lcfg_bufcount; i++) {
1400                 key = lustre_cfg_buf(lcfg, i);
1401                 /* Strip off prefix */
1402                 if (class_match_param(key, prefix, &key))
1403                         /* If the prefix doesn't match, return error so we
1404                          * can pass it down the stack */
1405                         RETURN(-ENOSYS);
1406                 sval = strchr(key, '=');
1407                 if (!sval || (*(sval + 1) == 0)) {
1408                         CERROR("Can't parse param %s (missing '=')\n", key);
1409                         /* rc = -EINVAL;        continue parsing other params */
1410                         continue;
1411                 }
1412                 keylen = sval - key;
1413                 sval++;
1414                 vallen = strlen(sval);
1415                 matched = 0;
1416                 j = 0;
1417                 /* Search proc entries */
1418                 while (lvars[j].name) {
1419                         var = &lvars[j];
1420                         if (class_match_param(key, (char *)var->name, 0) == 0 &&
1421                             keylen == strlen(var->name)) {
1422                                 matched++;
1423                                 rc = -EROFS;
1424
1425                                 if (var->fops && var->fops->write) {
1426                                         mm_segment_t oldfs;
1427                                         oldfs = get_fs();
1428                                         set_fs(KERNEL_DS);
1429                                         rc = (var->fops->write)(&fakefile, sval,
1430                                                                 vallen, NULL);
1431                                         set_fs(oldfs);
1432                                 }
1433                                 break;
1434                         }
1435                         j++;
1436                 }
1437                 if (!matched) {
1438                         CERROR("%.*s: %s unknown param %s\n",
1439                                (int)strlen(prefix) - 1, prefix,
1440                                (char *)lustre_cfg_string(lcfg, 0), key);
1441                         /* rc = -EINVAL;        continue parsing other params */
1442                         skip++;
1443                 } else if (rc < 0) {
1444                         CERROR("%s: error writing proc entry '%s': rc = %d\n",
1445                                prefix, var->name, rc);
1446                         rc = 0;
1447                 } else {
1448                         CDEBUG(D_CONFIG, "%s.%.*s: Set parameter %.*s=%s\n",
1449                                          lustre_cfg_string(lcfg, 0),
1450                                          (int)strlen(prefix) - 1, prefix,
1451                                          (int)(sval - key - 1), key, sval);
1452                 }
1453         }
1454
1455         if (rc > 0)
1456                 rc = 0;
1457         if (!rc && skip)
1458                 rc = skip;
1459         RETURN(rc);
1460 #else
1461         CDEBUG(D_CONFIG, "liblustre can't process params.\n");
1462         /* Don't throw config error */
1463         RETURN(0);
1464 #endif
1465 }
1466 EXPORT_SYMBOL(class_process_proc_seq_param);
1467
1468 #ifdef __KERNEL__
1469 extern int lustre_check_exclusion(struct super_block *sb, char *svname);
1470 #else
1471 #define lustre_check_exclusion(a,b)  0
1472 #endif
1473
1474 /** Parse a configuration llog, doing various manipulations on them
1475  * for various reasons, (modifications for compatibility, skip obsolete
1476  * records, change uuids, etc), then class_process_config() resulting
1477  * net records.
1478  */
1479 int class_config_llog_handler(const struct lu_env *env,
1480                               struct llog_handle *handle,
1481                               struct llog_rec_hdr *rec, void *data)
1482 {
1483         struct config_llog_instance *clli = data;
1484         int cfg_len = rec->lrh_len;
1485         char *cfg_buf = (char*) (rec + 1);
1486         int rc = 0;
1487         ENTRY;
1488
1489         //class_config_dump_handler(handle, rec, data);
1490
1491         switch (rec->lrh_type) {
1492         case OBD_CFG_REC: {
1493                 struct lustre_cfg *lcfg, *lcfg_new;
1494                 struct lustre_cfg_bufs bufs;
1495                 char *inst_name = NULL;
1496                 int inst_len = 0;
1497                 int inst = 0, swab = 0;
1498
1499                 lcfg = (struct lustre_cfg *)cfg_buf;
1500                 if (lcfg->lcfg_version == __swab32(LUSTRE_CFG_VERSION)) {
1501                         lustre_swab_lustre_cfg(lcfg);
1502                         swab = 1;
1503                 }
1504
1505                 rc = lustre_cfg_sanity_check(cfg_buf, cfg_len);
1506                 if (rc)
1507                         GOTO(out, rc);
1508
1509                 /* Figure out config state info */
1510                 if (lcfg->lcfg_command == LCFG_MARKER) {
1511                         struct cfg_marker *marker = lustre_cfg_buf(lcfg, 1);
1512                         lustre_swab_cfg_marker(marker, swab,
1513                                                LUSTRE_CFG_BUFLEN(lcfg, 1));
1514                         CDEBUG(D_CONFIG, "Marker, inst_flg=%#x mark_flg=%#x\n",
1515                                clli->cfg_flags, marker->cm_flags);
1516                         if (marker->cm_flags & CM_START) {
1517                                 /* all previous flags off */
1518                                 clli->cfg_flags = CFG_F_MARKER;
1519                                 server_name2index(marker->cm_tgtname,
1520                                                   &clli->cfg_lwp_idx, NULL);
1521                                 if (marker->cm_flags & CM_SKIP) {
1522                                         clli->cfg_flags |= CFG_F_SKIP;
1523                                         CDEBUG(D_CONFIG, "SKIP #%d\n",
1524                                                marker->cm_step);
1525                                 } else if ((marker->cm_flags & CM_EXCLUDE) ||
1526                                            (clli->cfg_sb &&
1527                                             lustre_check_exclusion(clli->cfg_sb,
1528                                                          marker->cm_tgtname))) {
1529                                         clli->cfg_flags |= CFG_F_EXCLUDE;
1530                                         CDEBUG(D_CONFIG, "EXCLUDE %d\n",
1531                                                marker->cm_step);
1532                                 }
1533                         } else if (marker->cm_flags & CM_END) {
1534                                 clli->cfg_flags = 0;
1535                         }
1536                 }
1537                 /* A config command without a start marker before it is
1538                    illegal (post 146) */
1539                 if (!(clli->cfg_flags & CFG_F_COMPAT146) &&
1540                     !(clli->cfg_flags & CFG_F_MARKER) &&
1541                     (lcfg->lcfg_command != LCFG_MARKER)) {
1542                         CWARN("Config not inside markers, ignoring! "
1543                               "(inst: %p, uuid: %s, flags: %#x)\n",
1544                               clli->cfg_instance,
1545                               clli->cfg_uuid.uuid, clli->cfg_flags);
1546                         clli->cfg_flags |= CFG_F_SKIP;
1547                 }
1548                 if (clli->cfg_flags & CFG_F_SKIP) {
1549                         CDEBUG(D_CONFIG, "skipping %#x\n",
1550                                clli->cfg_flags);
1551                         rc = 0;
1552                         /* No processing! */
1553                         break;
1554                 }
1555
1556                 /*
1557                  * For interoperability between 1.8 and 2.0,
1558                  * rename "mds" obd device type to "mdt".
1559                  */
1560                 {
1561                         char *typename = lustre_cfg_string(lcfg, 1);
1562                         char *index = lustre_cfg_string(lcfg, 2);
1563
1564                         if ((lcfg->lcfg_command == LCFG_ATTACH && typename &&
1565                              strcmp(typename, "mds") == 0)) {
1566                                 CWARN("For 1.8 interoperability, rename obd "
1567                                        "type from mds to mdt\n");
1568                                 typename[2] = 't';
1569                         }
1570                         if ((lcfg->lcfg_command == LCFG_SETUP && index &&
1571                              strcmp(index, "type") == 0)) {
1572                                 CDEBUG(D_INFO, "For 1.8 interoperability, "
1573                                        "set this index to '0'\n");
1574                                 index[0] = '0';
1575                                 index[1] = 0;
1576                         }
1577                 }
1578
1579 #if defined(HAVE_SERVER_SUPPORT) && defined(__KERNEL__)
1580                 /* newer MDS replaces LOV/OSC with LOD/OSP */
1581                 {
1582                         char *typename = lustre_cfg_string(lcfg, 1);
1583
1584                         if ((lcfg->lcfg_command == LCFG_ATTACH && typename &&
1585                             strcmp(typename, LUSTRE_LOV_NAME) == 0) &&
1586                             IS_MDT(s2lsi(clli->cfg_sb))) {
1587                                 CDEBUG(D_CONFIG,
1588                                        "For 2.x interoperability, rename obd "
1589                                        "type from lov to lod (%s)\n",
1590                                        s2lsi(clli->cfg_sb)->lsi_svname);
1591                                 strcpy(typename, LUSTRE_LOD_NAME);
1592                         }
1593                         if ((lcfg->lcfg_command == LCFG_ATTACH && typename &&
1594                             strcmp(typename, LUSTRE_OSC_NAME) == 0) &&
1595                             IS_MDT(s2lsi(clli->cfg_sb))) {
1596                                 CDEBUG(D_CONFIG,
1597                                        "For 2.x interoperability, rename obd "
1598                                        "type from osc to osp (%s)\n",
1599                                        s2lsi(clli->cfg_sb)->lsi_svname);
1600                                 strcpy(typename, LUSTRE_OSP_NAME);
1601                         }
1602                 }
1603 #endif
1604
1605                 if (clli->cfg_flags & CFG_F_EXCLUDE) {
1606                         CDEBUG(D_CONFIG, "cmd: %x marked EXCLUDED\n",
1607                                lcfg->lcfg_command);
1608                         if (lcfg->lcfg_command == LCFG_LOV_ADD_OBD)
1609                                 /* Add inactive instead */
1610                                 lcfg->lcfg_command = LCFG_LOV_ADD_INA;
1611                 }
1612
1613                 lustre_cfg_bufs_init(&bufs, lcfg);
1614
1615                 if (clli && clli->cfg_instance &&
1616                     LUSTRE_CFG_BUFLEN(lcfg, 0) > 0){
1617                         inst = 1;
1618                         inst_len = LUSTRE_CFG_BUFLEN(lcfg, 0) +
1619                                    sizeof(clli->cfg_instance) * 2 + 4;
1620                         OBD_ALLOC(inst_name, inst_len);
1621                         if (inst_name == NULL)
1622                                 GOTO(out, rc = -ENOMEM);
1623                         sprintf(inst_name, "%s-%p",
1624                                 lustre_cfg_string(lcfg, 0),
1625                                 clli->cfg_instance);
1626                         lustre_cfg_bufs_set_string(&bufs, 0, inst_name);
1627                         CDEBUG(D_CONFIG, "cmd %x, instance name: %s\n",
1628                                lcfg->lcfg_command, inst_name);
1629                 }
1630
1631                 /* we override the llog's uuid for clients, to insure they
1632                 are unique */
1633                 if (clli && clli->cfg_instance != NULL &&
1634                     lcfg->lcfg_command == LCFG_ATTACH) {
1635                         lustre_cfg_bufs_set_string(&bufs, 2,
1636                                                    clli->cfg_uuid.uuid);
1637                 }
1638                 /*
1639                  * sptlrpc config record, we expect 2 data segments:
1640                  *  [0]: fs_name/target_name,
1641                  *  [1]: rule string
1642                  * moving them to index [1] and [2], and insert MGC's
1643                  * obdname at index [0].
1644                  */
1645                 if (clli && clli->cfg_instance == NULL &&
1646                     lcfg->lcfg_command == LCFG_SPTLRPC_CONF) {
1647                         lustre_cfg_bufs_set(&bufs, 2, bufs.lcfg_buf[1],
1648                                             bufs.lcfg_buflen[1]);
1649                         lustre_cfg_bufs_set(&bufs, 1, bufs.lcfg_buf[0],
1650                                             bufs.lcfg_buflen[0]);
1651                         lustre_cfg_bufs_set_string(&bufs, 0,
1652                                                    clli->cfg_obdname);
1653                 }
1654
1655                 lcfg_new = lustre_cfg_new(lcfg->lcfg_command, &bufs);
1656
1657                 lcfg_new->lcfg_num   = lcfg->lcfg_num;
1658                 lcfg_new->lcfg_flags = lcfg->lcfg_flags;
1659
1660                 /* XXX Hack to try to remain binary compatible with
1661                  * pre-newconfig logs */
1662                 if (lcfg->lcfg_nal != 0 &&      /* pre-newconfig log? */
1663                     (lcfg->lcfg_nid >> 32) == 0) {
1664                         __u32 addr = (__u32)(lcfg->lcfg_nid & 0xffffffff);
1665
1666                         lcfg_new->lcfg_nid =
1667                                 LNET_MKNID(LNET_MKNET(lcfg->lcfg_nal, 0), addr);
1668                         CWARN("Converted pre-newconfig NAL %d NID %x to %s\n",
1669                               lcfg->lcfg_nal, addr,
1670                               libcfs_nid2str(lcfg_new->lcfg_nid));
1671                 } else {
1672                         lcfg_new->lcfg_nid = lcfg->lcfg_nid;
1673                 }
1674
1675                 lcfg_new->lcfg_nal = 0; /* illegal value for obsolete field */
1676
1677                 rc = class_process_config(lcfg_new);
1678                 lustre_cfg_free(lcfg_new);
1679
1680                 if (inst)
1681                         OBD_FREE(inst_name, inst_len);
1682                 break;
1683         }
1684         default:
1685                 CERROR("Unknown llog record type %#x encountered\n",
1686                        rec->lrh_type);
1687                 break;
1688         }
1689 out:
1690         if (rc) {
1691                 CERROR("%s: cfg command failed: rc = %d\n",
1692                        handle->lgh_ctxt->loc_obd->obd_name, rc);
1693                 class_config_dump_handler(NULL, handle, rec, data);
1694         }
1695         RETURN(rc);
1696 }
1697 EXPORT_SYMBOL(class_config_llog_handler);
1698
1699 int class_config_parse_llog(const struct lu_env *env, struct llog_ctxt *ctxt,
1700                             char *name, struct config_llog_instance *cfg)
1701 {
1702         struct llog_process_cat_data     cd = {0, 0};
1703         struct llog_handle              *llh;
1704         llog_cb_t                        callback;
1705         int                              rc;
1706         ENTRY;
1707
1708         CDEBUG(D_INFO, "looking up llog %s\n", name);
1709         rc = llog_open(env, ctxt, &llh, NULL, name, LLOG_OPEN_EXISTS);
1710         if (rc)
1711                 RETURN(rc);
1712
1713         rc = llog_init_handle(env, llh, LLOG_F_IS_PLAIN, NULL);
1714         if (rc)
1715                 GOTO(parse_out, rc);
1716
1717         /* continue processing from where we last stopped to end-of-log */
1718         if (cfg) {
1719                 cd.lpcd_first_idx = cfg->cfg_last_idx;
1720                 callback = cfg->cfg_callback;
1721                 LASSERT(callback != NULL);
1722         } else {
1723                 callback = class_config_llog_handler;
1724         }
1725
1726         cd.lpcd_last_idx = 0;
1727
1728         rc = llog_process(env, llh, callback, cfg, &cd);
1729
1730         CDEBUG(D_CONFIG, "Processed log %s gen %d-%d (rc=%d)\n", name,
1731                cd.lpcd_first_idx + 1, cd.lpcd_last_idx, rc);
1732         if (cfg)
1733                 cfg->cfg_last_idx = cd.lpcd_last_idx;
1734
1735 parse_out:
1736         llog_close(env, llh);
1737         RETURN(rc);
1738 }
1739 EXPORT_SYMBOL(class_config_parse_llog);
1740
1741 struct lcfg_type_data {
1742         __u32    ltd_type;
1743         char    *ltd_name;
1744         char    *ltd_bufs[4];
1745 } lcfg_data_table[] = {
1746         { LCFG_ATTACH, "attach", { "type", "UUID", "3", "4" } },
1747         { LCFG_DETACH, "detach", { "1", "2", "3", "4" } },
1748         { LCFG_SETUP, "setup", { "UUID", "node", "options", "failout" } },
1749         { LCFG_CLEANUP, "cleanup", { "1", "2", "3", "4" } },
1750         { LCFG_ADD_UUID, "add_uuid", { "node", "2", "3", "4" }  },
1751         { LCFG_DEL_UUID, "del_uuid", { "1", "2", "3", "4" }  },
1752         { LCFG_MOUNTOPT, "new_profile", { "name", "lov", "lmv", "4" }  },
1753         { LCFG_DEL_MOUNTOPT, "del_mountopt", { "1", "2", "3", "4" } , },
1754         { LCFG_SET_TIMEOUT, "set_timeout", { "parameter", "2", "3", "4" }  },
1755         { LCFG_SET_UPCALL, "set_upcall", { "1", "2", "3", "4" }  },
1756         { LCFG_ADD_CONN, "add_conn", { "node", "2", "3", "4" }  },
1757         { LCFG_DEL_CONN, "del_conn", { "1", "2", "3", "4" }  },
1758         { LCFG_LOV_ADD_OBD, "add_osc", { "ost", "index", "gen", "UUID" } },
1759         { LCFG_LOV_DEL_OBD, "del_osc", { "1", "2", "3", "4" } },
1760         { LCFG_PARAM, "set_param", { "parameter", "value", "3", "4" } },
1761         { LCFG_MARKER, "marker", { "1", "2", "3", "4" } },
1762         { LCFG_LOG_START, "log_start", { "1", "2", "3", "4" } },
1763         { LCFG_LOG_END, "log_end", { "1", "2", "3", "4" } },
1764         { LCFG_LOV_ADD_INA, "add_osc_inactive", { "1", "2", "3", "4" }  },
1765         { LCFG_ADD_MDC, "add_mdc", { "mdt", "index", "gen", "UUID" } },
1766         { LCFG_DEL_MDC, "del_mdc", { "1", "2", "3", "4" } },
1767         { LCFG_SPTLRPC_CONF, "security", { "parameter", "2", "3", "4" } },
1768         { LCFG_POOL_NEW, "new_pool", { "fsname", "pool", "3", "4" }  },
1769         { LCFG_POOL_ADD, "add_pool", { "fsname", "pool", "ost", "4" } },
1770         { LCFG_POOL_REM, "remove_pool", { "fsname", "pool", "ost", "4" } },
1771         { LCFG_POOL_DEL, "del_pool", { "fsname", "pool", "3", "4" } },
1772         { LCFG_SET_LDLM_TIMEOUT, "set_ldlm_timeout",
1773           { "parameter", "2", "3", "4" } },
1774         { 0, NULL, { NULL, NULL, NULL, NULL } }
1775 };
1776
1777 static struct lcfg_type_data *lcfg_cmd2data(__u32 cmd)
1778 {
1779         int i = 0;
1780
1781         while (lcfg_data_table[i].ltd_type != 0) {
1782                 if (lcfg_data_table[i].ltd_type == cmd)
1783                         return &lcfg_data_table[i];
1784                 i++;
1785         }
1786         return NULL;
1787 }
1788
1789 /**
1790  * parse config record and output dump in supplied buffer.
1791  * This is separated from class_config_dump_handler() to use
1792  * for ioctl needs as well
1793  *
1794  * Sample Output:
1795  * - { event: attach, device: lustrewt-clilov, type: lov, UUID:
1796  *     lustrewt-clilov_UUID }
1797  */
1798 int class_config_yaml_output(struct llog_rec_hdr *rec, char *buf, int size)
1799 {
1800         struct lustre_cfg       *lcfg = (struct lustre_cfg *)(rec + 1);
1801         char                    *ptr = buf;
1802         char                    *end = buf + size;
1803         int                      rc = 0, i;
1804         struct lcfg_type_data   *ldata;
1805
1806         LASSERT(rec->lrh_type == OBD_CFG_REC);
1807         rc = lustre_cfg_sanity_check(lcfg, rec->lrh_len);
1808         if (rc < 0)
1809                 return rc;
1810
1811         ldata = lcfg_cmd2data(lcfg->lcfg_command);
1812         if (ldata == NULL)
1813                 return -ENOTTY;
1814
1815         if (lcfg->lcfg_command == LCFG_MARKER)
1816                 return 0;
1817
1818         /* form YAML entity */
1819         ptr += snprintf(ptr, end - ptr, "- { event: %s", ldata->ltd_name);
1820
1821         if (lcfg->lcfg_flags)
1822                 ptr += snprintf(ptr, end - ptr, ", flags: %#08x",
1823                                 lcfg->lcfg_flags);
1824         if (lcfg->lcfg_num)
1825                 ptr += snprintf(ptr, end - ptr, ", num: %#08x",
1826                                 lcfg->lcfg_num);
1827         if (lcfg->lcfg_nid)
1828                 ptr += snprintf(ptr, end - ptr, ", nid: %s("LPX64")",
1829                                 libcfs_nid2str(lcfg->lcfg_nid),
1830                                 lcfg->lcfg_nid);
1831
1832         if (LUSTRE_CFG_BUFLEN(lcfg, 0) > 0)
1833                 ptr += snprintf(ptr, end - ptr, ", device: %s",
1834                                 lustre_cfg_string(lcfg, 0));
1835
1836         for (i = 1; i < lcfg->lcfg_bufcount; i++) {
1837                 if (LUSTRE_CFG_BUFLEN(lcfg, i) > 0)
1838                         ptr += snprintf(ptr, end - ptr, ", %s: %s",
1839                                         ldata->ltd_bufs[i - 1],
1840                                         lustre_cfg_string(lcfg, i));
1841         }
1842
1843         ptr += snprintf(ptr, end - ptr, " }\n");
1844         /* return consumed bytes */
1845         rc = ptr - buf;
1846         return rc;
1847 }
1848
1849 /**
1850  * parse config record and output dump in supplied buffer.
1851  * This is separated from class_config_dump_handler() to use
1852  * for ioctl needs as well
1853  */
1854 int class_config_parse_rec(struct llog_rec_hdr *rec, char *buf, int size)
1855 {
1856         struct lustre_cfg       *lcfg = (struct lustre_cfg *)(rec + 1);
1857         char                    *ptr = buf;
1858         char                    *end = buf + size;
1859         int                      rc = 0;
1860
1861         ENTRY;
1862
1863         LASSERT(rec->lrh_type == OBD_CFG_REC);
1864         rc = lustre_cfg_sanity_check(lcfg, rec->lrh_len);
1865         if (rc < 0)
1866                 RETURN(rc);
1867
1868         ptr += snprintf(ptr, end-ptr, "cmd=%05x ", lcfg->lcfg_command);
1869         if (lcfg->lcfg_flags)
1870                 ptr += snprintf(ptr, end-ptr, "flags=%#08x ",
1871                                 lcfg->lcfg_flags);
1872
1873         if (lcfg->lcfg_num)
1874                 ptr += snprintf(ptr, end-ptr, "num=%#08x ", lcfg->lcfg_num);
1875
1876         if (lcfg->lcfg_nid)
1877                 ptr += snprintf(ptr, end-ptr, "nid=%s("LPX64")\n     ",
1878                                 libcfs_nid2str(lcfg->lcfg_nid),
1879                                 lcfg->lcfg_nid);
1880
1881         if (lcfg->lcfg_command == LCFG_MARKER) {
1882                 struct cfg_marker *marker = lustre_cfg_buf(lcfg, 1);
1883
1884                 ptr += snprintf(ptr, end-ptr, "marker=%d(%#x)%s '%s'",
1885                                 marker->cm_step, marker->cm_flags,
1886                                 marker->cm_tgtname, marker->cm_comment);
1887         } else {
1888                 int i;
1889
1890                 for (i = 0; i <  lcfg->lcfg_bufcount; i++) {
1891                         ptr += snprintf(ptr, end-ptr, "%d:%s  ", i,
1892                                         lustre_cfg_string(lcfg, i));
1893                 }
1894         }
1895         ptr += snprintf(ptr, end - ptr, "\n");
1896         /* return consumed bytes */
1897         rc = ptr - buf;
1898         RETURN(rc);
1899 }
1900
1901 int class_config_dump_handler(const struct lu_env *env,
1902                               struct llog_handle *handle,
1903                               struct llog_rec_hdr *rec, void *data)
1904 {
1905         char    *outstr;
1906         int      rc = 0;
1907
1908         ENTRY;
1909
1910         OBD_ALLOC(outstr, 256);
1911         if (outstr == NULL)
1912                 RETURN(-ENOMEM);
1913
1914         if (rec->lrh_type == OBD_CFG_REC) {
1915                 class_config_parse_rec(rec, outstr, 256);
1916                 LCONSOLE(D_WARNING, "   %s", outstr);
1917         } else {
1918                 LCONSOLE(D_WARNING, "unhandled lrh_type: %#x\n", rec->lrh_type);
1919                 rc = -EINVAL;
1920         }
1921
1922         OBD_FREE(outstr, 256);
1923         RETURN(rc);
1924 }
1925
1926 int class_config_dump_llog(const struct lu_env *env, struct llog_ctxt *ctxt,
1927                            char *name, struct config_llog_instance *cfg)
1928 {
1929         struct llog_handle      *llh;
1930         int                      rc;
1931
1932         ENTRY;
1933
1934         LCONSOLE_INFO("Dumping config log %s\n", name);
1935
1936         rc = llog_open(env, ctxt, &llh, NULL, name, LLOG_OPEN_EXISTS);
1937         if (rc)
1938                 RETURN(rc);
1939
1940         rc = llog_init_handle(env, llh, LLOG_F_IS_PLAIN, NULL);
1941         if (rc)
1942                 GOTO(parse_out, rc);
1943
1944         rc = llog_process(env, llh, class_config_dump_handler, cfg, NULL);
1945 parse_out:
1946         llog_close(env, llh);
1947
1948         LCONSOLE_INFO("End config log %s\n", name);
1949         RETURN(rc);
1950 }
1951 EXPORT_SYMBOL(class_config_dump_llog);
1952
1953 /** Call class_cleanup and class_detach.
1954  * "Manual" only in the sense that we're faking lcfg commands.
1955  */
1956 int class_manual_cleanup(struct obd_device *obd)
1957 {
1958         char                    flags[3] = "";
1959         struct lustre_cfg      *lcfg;
1960         struct lustre_cfg_bufs  bufs;
1961         int                     rc;
1962         ENTRY;
1963
1964         if (!obd) {
1965                 CERROR("empty cleanup\n");
1966                 RETURN(-EALREADY);
1967         }
1968
1969         if (obd->obd_force)
1970                 strcat(flags, "F");
1971         if (obd->obd_fail)
1972                 strcat(flags, "A");
1973
1974         CDEBUG(D_CONFIG, "Manual cleanup of %s (flags='%s')\n",
1975                obd->obd_name, flags);
1976
1977         lustre_cfg_bufs_reset(&bufs, obd->obd_name);
1978         lustre_cfg_bufs_set_string(&bufs, 1, flags);
1979         lcfg = lustre_cfg_new(LCFG_CLEANUP, &bufs);
1980         if (!lcfg)
1981                 RETURN(-ENOMEM);
1982
1983         rc = class_process_config(lcfg);
1984         if (rc) {
1985                 CERROR("cleanup failed %d: %s\n", rc, obd->obd_name);
1986                 GOTO(out, rc);
1987         }
1988
1989         /* the lcfg is almost the same for both ops */
1990         lcfg->lcfg_command = LCFG_DETACH;
1991         rc = class_process_config(lcfg);
1992         if (rc)
1993                 CERROR("detach failed %d: %s\n", rc, obd->obd_name);
1994 out:
1995         lustre_cfg_free(lcfg);
1996         RETURN(rc);
1997 }
1998 EXPORT_SYMBOL(class_manual_cleanup);
1999
2000 /*
2001  * uuid<->export lustre hash operations
2002  */
2003
2004 static unsigned
2005 uuid_hash(cfs_hash_t *hs, const void *key, unsigned mask)
2006 {
2007         return cfs_hash_djb2_hash(((struct obd_uuid *)key)->uuid,
2008                                   sizeof(((struct obd_uuid *)key)->uuid), mask);
2009 }
2010
2011 static void *
2012 uuid_key(cfs_hlist_node_t *hnode)
2013 {
2014         struct obd_export *exp;
2015
2016         exp = cfs_hlist_entry(hnode, struct obd_export, exp_uuid_hash);
2017
2018         return &exp->exp_client_uuid;
2019 }
2020
2021 /*
2022  * NOTE: It is impossible to find an export that is in failed
2023  *       state with this function
2024  */
2025 static int
2026 uuid_keycmp(const void *key, cfs_hlist_node_t *hnode)
2027 {
2028         struct obd_export *exp;
2029
2030         LASSERT(key);
2031         exp = cfs_hlist_entry(hnode, struct obd_export, exp_uuid_hash);
2032
2033         return obd_uuid_equals(key, &exp->exp_client_uuid) &&
2034                !exp->exp_failed;
2035 }
2036
2037 static void *
2038 uuid_export_object(cfs_hlist_node_t *hnode)
2039 {
2040         return cfs_hlist_entry(hnode, struct obd_export, exp_uuid_hash);
2041 }
2042
2043 static void
2044 uuid_export_get(cfs_hash_t *hs, cfs_hlist_node_t *hnode)
2045 {
2046         struct obd_export *exp;
2047
2048         exp = cfs_hlist_entry(hnode, struct obd_export, exp_uuid_hash);
2049         class_export_get(exp);
2050 }
2051
2052 static void
2053 uuid_export_put_locked(cfs_hash_t *hs, cfs_hlist_node_t *hnode)
2054 {
2055         struct obd_export *exp;
2056
2057         exp = cfs_hlist_entry(hnode, struct obd_export, exp_uuid_hash);
2058         class_export_put(exp);
2059 }
2060
2061 static cfs_hash_ops_t uuid_hash_ops = {
2062         .hs_hash        = uuid_hash,
2063         .hs_key         = uuid_key,
2064         .hs_keycmp      = uuid_keycmp,
2065         .hs_object      = uuid_export_object,
2066         .hs_get         = uuid_export_get,
2067         .hs_put_locked  = uuid_export_put_locked,
2068 };
2069
2070
2071 /*
2072  * nid<->export hash operations
2073  */
2074
2075 static unsigned
2076 nid_hash(cfs_hash_t *hs, const void *key, unsigned mask)
2077 {
2078         return cfs_hash_djb2_hash(key, sizeof(lnet_nid_t), mask);
2079 }
2080
2081 static void *
2082 nid_key(cfs_hlist_node_t *hnode)
2083 {
2084         struct obd_export *exp;
2085
2086         exp = cfs_hlist_entry(hnode, struct obd_export, exp_nid_hash);
2087
2088         RETURN(&exp->exp_connection->c_peer.nid);
2089 }
2090
2091 /*
2092  * NOTE: It is impossible to find an export that is in failed
2093  *       state with this function
2094  */
2095 static int
2096 nid_kepcmp(const void *key, cfs_hlist_node_t *hnode)
2097 {
2098         struct obd_export *exp;
2099
2100         LASSERT(key);
2101         exp = cfs_hlist_entry(hnode, struct obd_export, exp_nid_hash);
2102
2103         RETURN(exp->exp_connection->c_peer.nid == *(lnet_nid_t *)key &&
2104                !exp->exp_failed);
2105 }
2106
2107 static void *
2108 nid_export_object(cfs_hlist_node_t *hnode)
2109 {
2110         return cfs_hlist_entry(hnode, struct obd_export, exp_nid_hash);
2111 }
2112
2113 static void
2114 nid_export_get(cfs_hash_t *hs, cfs_hlist_node_t *hnode)
2115 {
2116         struct obd_export *exp;
2117
2118         exp = cfs_hlist_entry(hnode, struct obd_export, exp_nid_hash);
2119         class_export_get(exp);
2120 }
2121
2122 static void
2123 nid_export_put_locked(cfs_hash_t *hs, cfs_hlist_node_t *hnode)
2124 {
2125         struct obd_export *exp;
2126
2127         exp = cfs_hlist_entry(hnode, struct obd_export, exp_nid_hash);
2128         class_export_put(exp);
2129 }
2130
2131 static cfs_hash_ops_t nid_hash_ops = {
2132         .hs_hash        = nid_hash,
2133         .hs_key         = nid_key,
2134         .hs_keycmp      = nid_kepcmp,
2135         .hs_object      = nid_export_object,
2136         .hs_get         = nid_export_get,
2137         .hs_put_locked  = nid_export_put_locked,
2138 };
2139
2140
2141 /*
2142  * nid<->nidstats hash operations
2143  */
2144
2145 static void *
2146 nidstats_key(cfs_hlist_node_t *hnode)
2147 {
2148         struct nid_stat *ns;
2149
2150         ns = cfs_hlist_entry(hnode, struct nid_stat, nid_hash);
2151
2152         return &ns->nid;
2153 }
2154
2155 static int
2156 nidstats_keycmp(const void *key, cfs_hlist_node_t *hnode)
2157 {
2158         return *(lnet_nid_t *)nidstats_key(hnode) == *(lnet_nid_t *)key;
2159 }
2160
2161 static void *
2162 nidstats_object(cfs_hlist_node_t *hnode)
2163 {
2164         return cfs_hlist_entry(hnode, struct nid_stat, nid_hash);
2165 }
2166
2167 static void
2168 nidstats_get(cfs_hash_t *hs, cfs_hlist_node_t *hnode)
2169 {
2170         struct nid_stat *ns;
2171
2172         ns = cfs_hlist_entry(hnode, struct nid_stat, nid_hash);
2173         nidstat_getref(ns);
2174 }
2175
2176 static void
2177 nidstats_put_locked(cfs_hash_t *hs, cfs_hlist_node_t *hnode)
2178 {
2179         struct nid_stat *ns;
2180
2181         ns = cfs_hlist_entry(hnode, struct nid_stat, nid_hash);
2182         nidstat_putref(ns);
2183 }
2184
2185 static cfs_hash_ops_t nid_stat_hash_ops = {
2186         .hs_hash        = nid_hash,
2187         .hs_key         = nidstats_key,
2188         .hs_keycmp      = nidstats_keycmp,
2189         .hs_object      = nidstats_object,
2190         .hs_get         = nidstats_get,
2191         .hs_put_locked  = nidstats_put_locked,
2192 };