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