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