Whamcloud - gitweb
LU-17744 ldiskfs: mballoc stats fixes
[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.gnu.org/licenses/gpl-2.0.html
19  *
20  * GPL HEADER END
21  */
22 /*
23  * Copyright (c) 2003, 2010, Oracle and/or its affiliates. All rights reserved.
24  * Use is subject to license terms.
25  *
26  * Copyright (c) 2011, 2017, Intel Corporation.
27  */
28 /*
29  * This file is part of Lustre, http://www.lustre.org/
30  *
31  * lustre/obdclass/obd_config.c
32  *
33  * Config API
34  */
35
36 #define DEBUG_SUBSYSTEM S_CLASS
37
38 #include <linux/kobject.h>
39 #include <linux/string.h>
40
41 #include <llog_swab.h>
42 #include <lprocfs_status.h>
43 #include <lustre_disk.h>
44 #include <uapi/linux/lustre/lustre_ioctl.h>
45 #include <lustre_log.h>
46 #include <uapi/linux/lustre/lustre_param.h>
47 #include <obd_class.h>
48
49 #include "llog_internal.h"
50
51 #ifdef HAVE_SERVER_SUPPORT
52 static struct cfs_hash_ops nid_stat_hash_ops;
53 static struct cfs_hash_ops gen_hash_ops;
54 #endif /* HAVE_SERVER_SUPPORT */
55
56 /*
57  * uuid<->export lustre hash operations
58  */
59 /*
60  * NOTE: It is impossible to find an export that is in failed
61  *      state with this function
62  */
63 static int
64 uuid_keycmp(struct rhashtable_compare_arg *arg, const void *obj)
65 {
66         const struct obd_uuid *uuid = arg->key;
67         const struct obd_export *exp = obj;
68
69         if (obd_uuid_equals(uuid, &exp->exp_client_uuid) &&
70             !exp->exp_failed)
71                 return 0;
72         return -ESRCH;
73 }
74
75 static void
76 obd_export_exit(void *vexport, void *data)
77 {
78         struct obd_export *exp = vexport;
79
80         class_export_put(exp);
81 }
82
83 static const struct rhashtable_params uuid_hash_params = {
84         .key_len        = sizeof(struct obd_uuid),
85         .key_offset     = offsetof(struct obd_export, exp_client_uuid),
86         .head_offset    = offsetof(struct obd_export, exp_uuid_hash),
87         .obj_cmpfn      = uuid_keycmp,
88         .automatic_shrinking = true,
89 };
90
91 int obd_uuid_add(struct obd_device *obd, struct obd_export *export)
92 {
93         int rc;
94
95         class_export_get(export);
96         rcu_read_lock();
97         rc = rhashtable_lookup_insert_fast(&obd->obd_uuid_hash,
98                                            &export->exp_uuid_hash,
99                                            uuid_hash_params);
100         if (rc) {
101                 class_export_put(export);
102                 if (rc != -EEXIST) {
103                         /* map obscure error codes to -ENOMEM */
104                         rc = -ENOMEM;
105                 } else {
106                         rc = -EALREADY;
107                 }
108         }
109         rcu_read_unlock();
110
111         return rc;
112 }
113 EXPORT_SYMBOL(obd_uuid_add);
114
115 void obd_uuid_del(struct obd_device *obd, struct obd_export *export)
116 {
117         int rc;
118
119         rcu_read_lock();
120         rc = rhashtable_remove_fast(&obd->obd_uuid_hash,
121                                     &export->exp_uuid_hash,
122                                     uuid_hash_params);
123         if (!rc)
124                 class_export_put(export);
125         rcu_read_unlock();
126 }
127 EXPORT_SYMBOL(obd_uuid_del);
128
129 #ifdef HAVE_SERVER_SUPPORT
130 /* obd_uuid_lookup() is used only server side by target_handle_connect(),
131  * mdt_hsm_agent_send(), and obd_export_evict_by_uuid().
132  */
133 struct obd_export *obd_uuid_lookup(struct obd_device *obd,
134                                    struct obd_uuid *uuid)
135 {
136         struct obd_export *export = NULL;
137
138         rcu_read_lock();
139         export = rhashtable_lookup_fast(&obd->obd_uuid_hash, uuid,
140                                         uuid_hash_params);
141         if (export && !refcount_inc_not_zero(&export->exp_handle.h_ref))
142                 export = NULL;
143         rcu_read_unlock();
144
145         return export;
146 }
147 EXPORT_SYMBOL(obd_uuid_lookup);
148
149 /*
150  * nid<->export hash operations
151  */
152 static u32 nid_keyhash(const void *data, u32 key_len, u32 seed)
153 {
154         const struct obd_export *exp = data;
155         void *key;
156
157         if (!exp->exp_connection)
158                 return 0;
159
160         key = &exp->exp_connection->c_peer.nid;
161         return jhash2(key, key_len / sizeof(u32), seed);
162 }
163
164 /*
165  * NOTE: It is impossible to find an export that is in failed
166  *       state with this function
167  */
168 static int
169 nid_keycmp(struct rhashtable_compare_arg *arg, const void *obj)
170 {
171         const struct lnet_nid *nid = arg->key;
172         const struct obd_export *exp = obj;
173
174         if (nid_same(&exp->exp_connection->c_peer.nid, nid))
175                 return 0;
176
177         return -ESRCH;
178 }
179
180 static void
181 nid_export_exit(void *vexport, void *data)
182 {
183         struct obd_export *exp = vexport;
184
185         class_export_put(exp);
186 }
187
188 static const struct rhashtable_params nid_hash_params = {
189         .key_len                = sizeof(struct lnet_nid),
190         .head_offset            = offsetof(struct obd_export, exp_nid_hash),
191         .obj_hashfn             = nid_keyhash,
192         .obj_cmpfn              = nid_keycmp,
193         .automatic_shrinking    = true,
194 };
195
196 int obd_nid_add(struct obd_device *obd, struct obd_export *exp)
197 {
198         int rc;
199
200         if (exp == exp->exp_obd->obd_self_export || exp->exp_hashed)
201                 return 0;
202
203         class_export_get(exp);
204         rc = rhltable_insert_key(&obd->obd_nid_hash,
205                                  &exp->exp_connection->c_peer.nid,
206                                  &exp->exp_nid_hash,
207                                  nid_hash_params);
208         if (rc) {
209                 class_export_put(exp);
210                 /* map obscure error codes to -ENOMEM */
211                 rc = -ENOMEM;
212         } else {
213                 exp->exp_hashed = 1;
214         }
215         return rc;
216 }
217 EXPORT_SYMBOL(obd_nid_add);
218
219 void obd_nid_del(struct obd_device *obd, struct obd_export *exp)
220 {
221         int rc;
222
223         if (exp == exp->exp_obd->obd_self_export || !exp->exp_hashed)
224                 return;
225
226         rc = rhltable_remove(&obd->obd_nid_hash, &exp->exp_nid_hash,
227                              nid_hash_params);
228         if (rc == 0) {
229                 class_export_put(exp);
230                 exp->exp_hashed = 0;
231         }
232 }
233 EXPORT_SYMBOL(obd_nid_del);
234
235 int obd_nid_export_for_each(struct obd_device *obd, struct lnet_nid *nid,
236                             int cb(struct obd_export *exp, void *data),
237                             void *data)
238 {
239         struct rhlist_head *exports, *tmp;
240         struct obd_export *exp;
241         int ret = 0;
242
243         rcu_read_lock();
244         exports = rhltable_lookup(&obd->obd_nid_hash, nid, nid_hash_params);
245         if (!exports) {
246                 ret = -ENODEV;
247                 goto out_unlock;
248         }
249
250         rhl_for_each_entry_rcu(exp, tmp, exports, exp_nid_hash) {
251                 if (!exp->exp_failed && cb(exp, data))
252                         ret++;
253         }
254
255 out_unlock:
256         rcu_read_unlock();
257         return ret;
258 }
259 EXPORT_SYMBOL(obd_nid_export_for_each);
260 #endif /* HAVE_SERVER_SUPPORT */
261
262 /*********** string parsing utils *********/
263
264 /* returns 0 if we find this key in the buffer, else 1 */
265 int class_find_param(char *buf, char *key, char **valp)
266 {
267         char *ptr;
268
269         if (!buf)
270                 return 1;
271
272         ptr = strstr(buf, key);
273         if (!ptr)
274                 return 1;
275
276         if (valp)
277                 *valp = ptr + strlen(key);
278
279         return 0;
280 }
281 EXPORT_SYMBOL(class_find_param);
282
283 /**
284  * Check whether the proc parameter \a param is an old parameter or not from
285  * the array \a ptr which contains the mapping from old parameters to new ones.
286  * If it's an old one, then return the pointer to the cfg_interop_param struc-
287  * ture which contains both the old and new parameters.
288  *
289  * \param param                 proc parameter
290  * \param ptr                   an array which contains the mapping from
291  *                              old parameters to new ones
292  *
293  * \retval valid-pointer        pointer to the cfg_interop_param structure
294  *                              which contains the old and new parameters
295  * \retval NULL                 \a param or \a ptr is NULL,
296  *                              or \a param is not an old parameter
297  */
298 struct cfg_interop_param *class_find_old_param(const char *param,
299                                                struct cfg_interop_param *ptr)
300 {
301         char *value = NULL;
302         int   name_len = 0;
303
304         if (!param || !ptr)
305                 RETURN(NULL);
306
307         value = strchr(param, '=');
308         if (value)
309                 name_len = value - param;
310         else
311                 name_len = strlen(param);
312
313         while (ptr->old_param) {
314                 if (strncmp(param, ptr->old_param, name_len) == 0 &&
315                     name_len == strlen(ptr->old_param))
316                         RETURN(ptr);
317                 ptr++;
318         }
319
320         RETURN(NULL);
321 }
322 EXPORT_SYMBOL(class_find_old_param);
323
324 /**
325  * Finds a parameter in \a params and copies it to \a copy.
326  *
327  * Leading spaces are skipped. Next space or end of string is the
328  * parameter terminator with the exception that spaces inside single or double
329  * quotes get included into a parameter. The parameter is copied into \a copy
330  * which has to be allocated big enough by a caller, quotes are stripped in
331  * the copy and the copy is terminated by 0.
332  *
333  * On return \a params is set to next parameter or to NULL if last
334  * parameter is returned.
335  *
336  * \retval 0 if parameter is returned in \a copy
337  * \retval 1 otherwise
338  * \retval -EINVAL if unbalanced quota is found
339  */
340 int class_get_next_param(char **params, char *copy)
341 {
342         char *q1, *q2, *str;
343         int len;
344
345         str = *params;
346         while (*str == ' ')
347                 str++;
348
349         if (*str == '\0') {
350                 *params = NULL;
351                 return 1;
352         }
353
354         while (1) {
355                 q1 = strpbrk(str, " '\"");
356                 if (!q1) {
357                         len = strlen(str);
358                         memcpy(copy, str, len);
359                         copy[len] = '\0';
360                         *params = NULL;
361                         return 0;
362                 }
363                 len = q1 - str;
364                 if (*q1 == ' ') {
365                         memcpy(copy, str, len);
366                         copy[len] = '\0';
367                         *params = str + len;
368                         return 0;
369                 }
370
371                 memcpy(copy, str, len);
372                 copy += len;
373
374                 /* search for the matching closing quote */
375                 str = q1 + 1;
376                 q2 = strchr(str, *q1);
377                 if (!q2) {
378                         CERROR("Unbalanced quota in parameters: \"%s\"\n",
379                                *params);
380                         return -EINVAL;
381                 }
382                 len = q2 - str;
383                 memcpy(copy, str, len);
384                 copy += len;
385                 str = q2 + 1;
386         }
387         return 1;
388 }
389 EXPORT_SYMBOL(class_get_next_param);
390
391 /*
392  * returns 0 if this is the first key in the buffer, else 1.
393  * valp points to first char after key.
394  */
395 int class_match_param(char *buf, const char *key, char **valp)
396 {
397         if (!buf)
398                 return 1;
399
400         if (memcmp(buf, key, strlen(key)) != 0)
401                 return 1;
402
403         if (valp)
404                 *valp = buf + strlen(key);
405
406         return 0;
407 }
408 EXPORT_SYMBOL(class_match_param);
409
410 static int parse_nid(char *buf, void *value, int quiet)
411 {
412         struct lnet_nid *nid = value;
413
414         if (libcfs_strnid(nid, buf) == 0)
415                 return 0;
416
417         if (!quiet)
418                 LCONSOLE_ERROR_MSG(0x159, "Can't parse NID '%s'\n", buf);
419         return -EINVAL;
420 }
421
422 static int parse_net(char *buf, void *value)
423 {
424         __u32 *net = (__u32 *)value;
425
426         *net = libcfs_str2net(buf);
427         CDEBUG(D_INFO, "Net %s\n", libcfs_net2str(*net));
428         return 0;
429 }
430
431 enum {
432         CLASS_PARSE_NID = 1,
433         CLASS_PARSE_NET,
434 };
435
436 /*
437  * 0 is good NID,
438  * 1 not found
439  * < 0 error
440  * endh is set to next separator
441  */
442 static int class_parse_value(char *buf, int opc, void *value, char **endh,
443                              int quiet)
444 {
445         char *endp;
446         char tmp;
447         int rc = 0;
448         int ncolons = 0;
449
450         if (!buf)
451                 return 1;
452
453         while (*buf == ',' || *buf == ':') {
454                 if (*buf == ':')
455                         ncolons++;
456                 else
457                         ncolons = 0;
458                 buf++;
459         }
460
461         /* IPv6 addresses can start with '::' */
462         if (opc == CLASS_PARSE_NID && ncolons >= 2)
463                 buf = buf - 2;
464
465         if (*buf == ' ' || *buf == '/' || *buf == '\0')
466                 return 1;
467
468         /* NID separators or end of NIDs. Large NIDs can contain ':' so
469          * skip ahead to @ and then look for one of the delimiters.
470          */
471         if (opc == CLASS_PARSE_NID) {
472                 endp = strchr(buf, '@');
473                 if (!endp)
474                         return 1;
475
476                 endp = strpbrk(endp, ",: /");
477         } else {
478                 endp = strpbrk(buf, ",: /");
479         }
480
481         if (!endp)
482                 endp = buf + strlen(buf);
483
484         tmp = *endp;
485         *endp = '\0';
486         switch (opc) {
487         default:
488                 LBUG();
489         case CLASS_PARSE_NID:
490                 rc = parse_nid(buf, value, quiet);
491                 break;
492         case CLASS_PARSE_NET:
493                 rc = parse_net(buf, value);
494                 break;
495         }
496         *endp = tmp;
497         if (rc != 0)
498                 return rc;
499         if (endh)
500                 *endh = endp;
501         return 0;
502 }
503
504 int class_parse_nid(char *buf, struct lnet_nid *nid, char **endh)
505 {
506         return class_parse_value(buf, CLASS_PARSE_NID, (void *)nid, endh, 0);
507 }
508 EXPORT_SYMBOL(class_parse_nid);
509
510 int class_parse_nid_quiet(char *buf, struct lnet_nid *nid, char **endh)
511 {
512         return class_parse_value(buf, CLASS_PARSE_NID, (void *)nid, endh, 1);
513 }
514 EXPORT_SYMBOL(class_parse_nid_quiet);
515
516 int class_parse_net(char *buf, __u32 *net, char **endh)
517 {
518         return class_parse_value(buf, CLASS_PARSE_NET, (void *)net, endh, 0);
519 }
520
521 /*
522  * 1 param contains key and match
523  * 0 param contains key and not match
524  * -1 param does not contain key
525  */
526 int class_match_nid(char *buf, char *key, struct lnet_nid *nid)
527 {
528         struct lnet_nid tmp;
529         int rc = -1;
530
531         while (class_find_param(buf, key, &buf) == 0) {
532                 /*
533                  * please restrict to the NIDs pertaining to
534                  * the specified NIDs
535                  */
536                 while (class_parse_nid(buf, &tmp, &buf) == 0) {
537                         if (nid_same(&tmp, nid))
538                                 return 1;
539                 }
540                 rc = 0;
541         }
542         return rc;
543 }
544 EXPORT_SYMBOL(class_match_nid);
545
546 int class_match_net(char *buf, char *key, __u32 net)
547 {
548         __u32 tmp;
549         int rc = -1;
550
551         while (class_find_param(buf, key, &buf) == 0) {
552                 /*
553                  * please restrict to the NIDs pertaining to
554                  * the specified networks
555                  */
556                 while (class_parse_net(buf, &tmp, &buf) == 0) {
557                         if (tmp == net)
558                                 return 1;
559                 }
560                 rc = 0;
561         }
562         return rc;
563 }
564 EXPORT_SYMBOL(class_match_net);
565
566 char *lustre_cfg_string(struct lustre_cfg *lcfg, u32 index)
567 {
568         char *s;
569
570         if (!lcfg->lcfg_buflens[index])
571                 return NULL;
572
573         s = lustre_cfg_buf(lcfg, index);
574         if (!s)
575                 return NULL;
576
577         /*
578          * make sure it's NULL terminated, even if this kills a char
579          * of data.  Try to use the padding first though.
580          */
581         if (s[lcfg->lcfg_buflens[index] - 1] != '\0') {
582                 size_t last = ALIGN(lcfg->lcfg_buflens[index], 8) - 1;
583                 char lost;
584
585                 /* Use the smaller value */
586                 if (last > lcfg->lcfg_buflens[index])
587                         last = lcfg->lcfg_buflens[index];
588
589                 lost = s[last];
590                 s[last] = '\0';
591                 if (lost != '\0') {
592                         CWARN("Truncated buf %d to '%s' (lost '%c'...)\n",
593                               index, s, lost);
594                 }
595         }
596         return s;
597 }
598 EXPORT_SYMBOL(lustre_cfg_string);
599
600 /********************** class fns **********************/
601
602 /**
603  * Create a new OBD device and set the type, name and uuid.  If successful,
604  * the new device can be accessed by either name or uuid.
605  */
606 int class_attach(struct lustre_cfg *lcfg)
607 {
608         struct obd_export *exp;
609         struct obd_device *obd = NULL;
610         char *typename, *name, *uuid;
611         int rc, len;
612
613         ENTRY;
614
615         if (!LUSTRE_CFG_BUFLEN(lcfg, 1)) {
616                 CERROR("No type passed!\n");
617                 RETURN(-EINVAL);
618         }
619         typename = lustre_cfg_string(lcfg, 1);
620
621         if (!LUSTRE_CFG_BUFLEN(lcfg, 0)) {
622                 CERROR("No name passed!\n");
623                 RETURN(-EINVAL);
624         }
625         name = lustre_cfg_string(lcfg, 0);
626         if (!LUSTRE_CFG_BUFLEN(lcfg, 2)) {
627                 CERROR("No UUID passed!\n");
628                 RETURN(-EINVAL);
629         }
630
631         uuid = lustre_cfg_string(lcfg, 2);
632         len = strlen(uuid);
633         if (len >= sizeof(obd->obd_uuid)) {
634                 CERROR("%s: uuid must be < %d bytes long\n",
635                        name, (int)sizeof(obd->obd_uuid));
636                 RETURN(-EINVAL);
637         }
638
639         obd = class_newdev(typename, name, uuid);
640         if (IS_ERR(obd)) { /* Already exists or out of obds */
641                 rc = PTR_ERR(obd);
642                 CERROR("Cannot create device %s of type %s : %d\n",
643                        name, typename, rc);
644                 RETURN(rc);
645         }
646         LASSERTF(obd->obd_magic == OBD_DEVICE_MAGIC,
647                  "obd %px obd_magic %08X != %08X\n",
648                  obd, obd->obd_magic, OBD_DEVICE_MAGIC);
649         LASSERTF(strncmp(obd->obd_name, name, strlen(name)) == 0,
650                  "%px obd_name %s != %s\n", obd, obd->obd_name, name);
651
652         exp = class_new_export_self(obd, &obd->obd_uuid);
653         if (IS_ERR(exp)) {
654                 rc = PTR_ERR(exp);
655                 class_free_dev(obd);
656                 RETURN(rc);
657         }
658
659         obd->obd_self_export = exp;
660         list_del_init(&exp->exp_obd_chain_timed);
661         class_export_put(exp);
662
663         rc = class_register_device(obd);
664         if (rc != 0) {
665                 class_decref(obd, "newdev", obd);
666                 RETURN(rc);
667         }
668
669         obd->obd_attached = 1;
670         CDEBUG(D_IOCTL, "OBD: dev %d attached type %s with refcount %d\n",
671                obd->obd_minor, typename, kref_read(&obd->obd_refcount));
672
673         RETURN(0);
674 }
675 EXPORT_SYMBOL(class_attach);
676
677 /**
678  * Create hashes, self-export, and call type-specific setup.
679  * Setup is effectively the "start this obd" call.
680  */
681 int class_setup(struct obd_device *obd, struct lustre_cfg *lcfg)
682 {
683         int err = 0;
684
685         ENTRY;
686
687         LASSERT(obd != NULL);
688         LASSERTF(obd == class_num2obd(obd->obd_minor),
689                  "obd %px != obd_devs[%d] %px\n",
690                  obd, obd->obd_minor, class_num2obd(obd->obd_minor));
691         LASSERTF(obd->obd_magic == OBD_DEVICE_MAGIC,
692                  "obd %px obd_magic %08x != %08x\n",
693                  obd, obd->obd_magic, OBD_DEVICE_MAGIC);
694
695         /* have we attached a type to this device? */
696         if (!obd->obd_attached) {
697                 CERROR("Device %d not attached\n", obd->obd_minor);
698                 RETURN(-ENODEV);
699         }
700
701         if (obd->obd_set_up) {
702                 CERROR("Device %d already setup (type %s)\n",
703                        obd->obd_minor, obd->obd_type->typ_name);
704                 RETURN(-EEXIST);
705         }
706
707         /* is someone else setting us up right now? (attach inits spinlock) */
708         spin_lock(&obd->obd_dev_lock);
709         if (obd->obd_starting) {
710                 spin_unlock(&obd->obd_dev_lock);
711                 CERROR("Device %d setup in progress (type %s)\n",
712                        obd->obd_minor, obd->obd_type->typ_name);
713                 RETURN(-EEXIST);
714         }
715         /*
716          * just leave this on forever.  I can't use obd_set_up here because
717          * other fns check that status, and we're not actually set up yet.
718          */
719         obd->obd_starting = 1;
720         obd->obd_nid_stats_hash = NULL;
721         obd->obd_gen_hash = NULL;
722         spin_unlock(&obd->obd_dev_lock);
723
724         /* create an uuid-export lustre hash */
725         err = rhashtable_init(&obd->obd_uuid_hash, &uuid_hash_params);
726         if (err)
727                 GOTO(err_starting, err);
728
729 #ifdef HAVE_SERVER_SUPPORT
730         /* create a nid-export lustre hash */
731         err = rhltable_init(&obd->obd_nid_hash, &nid_hash_params);
732         if (err)
733                 GOTO(err_uuid_hash, err = -ENOMEM);
734
735         /* create a nid-stats lustre hash */
736         obd->obd_nid_stats_hash = cfs_hash_create("NID_STATS",
737                                                   HASH_NID_STATS_CUR_BITS,
738                                                   HASH_NID_STATS_MAX_BITS,
739                                                   HASH_NID_STATS_BKT_BITS, 0,
740                                                   CFS_HASH_MIN_THETA,
741                                                   CFS_HASH_MAX_THETA,
742                                                   &nid_stat_hash_ops,
743                                                   CFS_HASH_DEFAULT);
744         if (!obd->obd_nid_stats_hash)
745                 GOTO(err_nid_hash, err = -ENOMEM);
746
747         /* create a client_generation-export lustre hash */
748         obd->obd_gen_hash = cfs_hash_create("UUID_HASH",
749                                             HASH_GEN_CUR_BITS,
750                                             HASH_GEN_MAX_BITS,
751                                             HASH_GEN_BKT_BITS, 0,
752                                             CFS_HASH_MIN_THETA,
753                                             CFS_HASH_MAX_THETA,
754                                             &gen_hash_ops, CFS_HASH_DEFAULT);
755         if (!obd->obd_gen_hash)
756                 GOTO(err_nid_stats_hash, err = -ENOMEM);
757 #endif /* HAVE_SERVER_SUPPORT */
758
759         err = obd_setup(obd, lcfg);
760         if (err)
761 #ifdef HAVE_SERVER_SUPPORT
762                 GOTO(err_gen_hash, err);
763 #else
764                 GOTO(err_uuid_hash, err);
765 #endif /* ! HAVE_SERVER_SUPPORT */
766
767         obd->obd_set_up = 1;
768
769         spin_lock(&obd->obd_dev_lock);
770         /* cleanup drops this */
771         class_incref(obd, "setup", obd);
772         spin_unlock(&obd->obd_dev_lock);
773
774         CDEBUG(D_IOCTL, "finished setup of obd %s (uuid %s)\n",
775                obd->obd_name, obd->obd_uuid.uuid);
776
777         RETURN(0);
778
779 #ifdef HAVE_SERVER_SUPPORT
780 err_gen_hash:
781         if (obd->obd_gen_hash) {
782                 cfs_hash_putref(obd->obd_gen_hash);
783                 obd->obd_gen_hash = NULL;
784         }
785 err_nid_stats_hash:
786         if (obd->obd_nid_stats_hash) {
787                 cfs_hash_putref(obd->obd_nid_stats_hash);
788                 obd->obd_nid_stats_hash = NULL;
789         }
790 err_nid_hash:
791         rhltable_destroy(&obd->obd_nid_hash);
792 #endif /* HAVE_SERVER_SUPPORT */
793 err_uuid_hash:
794         rhashtable_destroy(&obd->obd_uuid_hash);
795 err_starting:
796         obd->obd_starting = 0;
797         CERROR("setup %s failed (%d)\n", obd->obd_name, err);
798         return err;
799 }
800 EXPORT_SYMBOL(class_setup);
801
802 /**
803  * We have finished using this OBD and are ready to destroy it.
804  * There can be no more references to this obd.
805  */
806 int class_detach(struct obd_device *obd, struct lustre_cfg *lcfg)
807 {
808         ENTRY;
809
810         if (obd->obd_set_up) {
811                 CERROR("OBD device %d still set up\n", obd->obd_minor);
812                 RETURN(-EBUSY);
813         }
814
815         spin_lock(&obd->obd_dev_lock);
816         if (!obd->obd_attached) {
817                 spin_unlock(&obd->obd_dev_lock);
818                 CERROR("OBD device %d not attached\n", obd->obd_minor);
819                 RETURN(-ENODEV);
820         }
821         obd->obd_attached = 0;
822
823         /* cleanup in progress. we don't like to find this device after now */
824         class_unregister_device(obd);
825         spin_unlock(&obd->obd_dev_lock);
826
827         CDEBUG(D_IOCTL, "detach on obd %s (uuid %s)\n",
828                obd->obd_name, obd->obd_uuid.uuid);
829
830         class_decref(obd, "newdev", obd);
831
832         RETURN(0);
833 }
834 EXPORT_SYMBOL(class_detach);
835
836 /**
837  * Start shutting down the OBD.  There may be in-progess ops when
838  * this is called.  We tell them to start shutting down with a call
839  * to class_disconnect_exports().
840  */
841 int class_cleanup(struct obd_device *obd, struct lustre_cfg *lcfg)
842 {
843         int err = 0;
844         char *flag;
845         ENTRY;
846
847         CFS_RACE(OBD_FAIL_LDLM_RECOV_CLIENTS);
848
849         if (!obd->obd_set_up) {
850                 CERROR("Device %d not setup\n", obd->obd_minor);
851                 RETURN(-ENODEV);
852         }
853
854         spin_lock(&obd->obd_dev_lock);
855         if (obd->obd_stopping) {
856                 spin_unlock(&obd->obd_dev_lock);
857                 CERROR("OBD %d already stopping\n", obd->obd_minor);
858                 RETURN(-ENODEV);
859         }
860         /* Leave this on forever */
861         obd->obd_stopping = 1;
862         spin_unlock(&obd->obd_dev_lock);
863
864         /* wait for already-arrived-connections to finish. */
865         wait_var_event(&obd->obd_conn_inprogress,
866                        atomic_read(&obd->obd_conn_inprogress) == 0);
867         smp_rmb();
868
869         if (lcfg->lcfg_bufcount >= 2 && LUSTRE_CFG_BUFLEN(lcfg, 1) > 0) {
870                 for (flag = lustre_cfg_string(lcfg, 1); *flag != 0; flag++)
871                         switch (*flag) {
872                         case 'F':
873                                 obd->obd_force = 1;
874                                 break;
875                         case 'A':
876                                 LCONSOLE(D_WARNING, "Failing over %s\n",
877                                          obd->obd_name);
878                                 spin_lock(&obd->obd_dev_lock);
879                                 obd->obd_fail = 1;
880 #ifdef HAVE_SERVER_SUPPORT
881                                 obd->obd_no_transno = 1;
882 #endif
883                                 obd->obd_no_recov = 1;
884                                 spin_unlock(&obd->obd_dev_lock);
885                                 if (obd->obd_type->typ_dt_ops->o_iocontrol) {
886                                         obd_iocontrol(OBD_IOC_SYNC,
887                                                       obd->obd_self_export,
888                                                       0, NULL, NULL);
889                                 }
890                                 break;
891                         default:
892                                 CERROR("Unrecognised flag '%c'\n", *flag);
893                         }
894         }
895
896         LASSERT(obd->obd_self_export);
897
898         CDEBUG(D_IOCTL, "%s: forcing exports to disconnect: %d/%d\n",
899                obd->obd_name, obd->obd_num_exports,
900                kref_read(&obd->obd_refcount) - 2);
901         dump_exports(obd, 0, D_HA);
902         class_disconnect_exports(obd);
903
904         /* Precleanup, we must make sure all exports get destroyed. */
905         err = obd_precleanup(obd);
906         if (err)
907                 CERROR("Precleanup %s returned %d\n",
908                        obd->obd_name, err);
909
910         /* destroy an uuid-export hash body */
911         rhashtable_free_and_destroy(&obd->obd_uuid_hash, obd_export_exit,
912                                     NULL);
913 #ifdef HAVE_SERVER_SUPPORT
914         /* destroy a nid-export hash body */
915         rhltable_free_and_destroy(&obd->obd_nid_hash, nid_export_exit, NULL);
916
917         /* destroy a nid-stats hash body */
918         if (obd->obd_nid_stats_hash) {
919                 cfs_hash_putref(obd->obd_nid_stats_hash);
920                 obd->obd_nid_stats_hash = NULL;
921         }
922
923         /* destroy a client_generation-export hash body */
924         if (obd->obd_gen_hash) {
925                 cfs_hash_putref(obd->obd_gen_hash);
926                 obd->obd_gen_hash = NULL;
927         }
928 #endif /* HAVE_SERVER_SUPPORT */
929         class_decref(obd, "setup", obd);
930         obd->obd_set_up = 0;
931
932         RETURN(0);
933 }
934
935 struct obd_device *class_incref(struct obd_device *obd,
936                                 const char *scope,
937                                 const void *source)
938 {
939         lu_ref_add_atomic(&obd->obd_reference, scope, source);
940         kref_get(&obd->obd_refcount);
941         CDEBUG(D_INFO, "incref %s (%p) now %d - %s\n", obd->obd_name, obd,
942                kref_read(&obd->obd_refcount), scope);
943
944         return obd;
945 }
946 EXPORT_SYMBOL(class_incref);
947
948 static void class_decref_free(struct kref *kref)
949 {
950         struct obd_device *obd;
951         struct obd_export *exp;
952
953         obd = container_of(kref, struct obd_device, obd_refcount);
954         LASSERT(!obd->obd_attached);
955         /*
956          * All exports have been destroyed; there should
957          * be no more in-progress ops by this point.
958          */
959         exp = obd->obd_self_export;
960
961         if (exp) {
962                 exp->exp_flags |= exp_flags_from_obd(obd);
963                 class_unlink_export(exp);
964         }
965 }
966
967 void class_decref(struct obd_device *obd, const char *scope, const void *source)
968 {
969         CDEBUG(D_INFO, "Decref %s (%p) now %d - %s\n", obd->obd_name, obd,
970                kref_read(&obd->obd_refcount), scope);
971         LASSERT(obd->obd_num_exports >= 0);
972         kref_put(&obd->obd_refcount, class_decref_free);
973         lu_ref_del(&obd->obd_reference, scope, source);
974 }
975 EXPORT_SYMBOL(class_decref);
976
977 /**
978  * Add a failover NID location.
979  * Client OBD types contact server OBD types using this NID list.
980  */
981 int class_add_conn(struct obd_device *obd, struct lustre_cfg *lcfg)
982 {
983         struct obd_import *imp;
984         struct obd_uuid uuid;
985         int rc;
986
987         ENTRY;
988
989         if (LUSTRE_CFG_BUFLEN(lcfg, 1) < 1 ||
990             LUSTRE_CFG_BUFLEN(lcfg, 1) > sizeof(struct obd_uuid)) {
991                 CERROR("invalid conn_uuid\n");
992                 RETURN(-EINVAL);
993         }
994         if (strcmp(obd->obd_type->typ_name, LUSTRE_MDC_NAME) &&
995             strcmp(obd->obd_type->typ_name, LUSTRE_OSC_NAME) &&
996             strcmp(obd->obd_type->typ_name, LUSTRE_OSP_NAME) &&
997             strcmp(obd->obd_type->typ_name, LUSTRE_LWP_NAME) &&
998             strcmp(obd->obd_type->typ_name, LUSTRE_MGC_NAME)) {
999                 CERROR("can't add connection on non-client dev\n");
1000                 RETURN(-EINVAL);
1001         }
1002
1003         imp = obd->u.cli.cl_import;
1004         if (!imp) {
1005                 CERROR("try to add conn on immature client dev\n");
1006                 RETURN(-EINVAL);
1007         }
1008
1009         obd_str2uuid(&uuid, lustre_cfg_string(lcfg, 1));
1010         rc = obd_add_conn(imp, &uuid, lcfg->lcfg_num);
1011
1012         RETURN(rc);
1013 }
1014 EXPORT_SYMBOL(class_add_conn);
1015
1016 /** Remove a failover NID location. */
1017 static int class_del_conn(struct obd_device *obd, struct lustre_cfg *lcfg)
1018 {
1019         struct obd_import *imp;
1020         struct obd_uuid uuid;
1021         int rc;
1022
1023         ENTRY;
1024
1025         if (LUSTRE_CFG_BUFLEN(lcfg, 1) < 1 ||
1026             LUSTRE_CFG_BUFLEN(lcfg, 1) > sizeof(struct obd_uuid)) {
1027                 CERROR("invalid conn_uuid\n");
1028                 RETURN(-EINVAL);
1029         }
1030         if (strcmp(obd->obd_type->typ_name, LUSTRE_MDC_NAME) &&
1031             strcmp(obd->obd_type->typ_name, LUSTRE_OSC_NAME)) {
1032                 CERROR("can't del connection on non-client dev\n");
1033                 RETURN(-EINVAL);
1034         }
1035
1036         imp = obd->u.cli.cl_import;
1037         if (!imp) {
1038                 CERROR("try to del conn on immature client dev\n");
1039                 RETURN(-EINVAL);
1040         }
1041
1042         obd_str2uuid(&uuid, lustre_cfg_string(lcfg, 1));
1043         rc = obd_del_conn(imp, &uuid);
1044
1045         RETURN(rc);
1046 }
1047
1048 static LIST_HEAD(lustre_profile_list);
1049 static DEFINE_SPINLOCK(lustre_profile_list_lock);
1050
1051 static struct lustre_profile *class_get_profile_nolock(const char *prof)
1052 {
1053         struct lustre_profile *lprof;
1054
1055         ENTRY;
1056         list_for_each_entry(lprof, &lustre_profile_list, lp_list) {
1057                 if (strcmp(lprof->lp_profile, prof) == 0) {
1058                         lprof->lp_refs++;
1059                         RETURN(lprof);
1060                 }
1061         }
1062         RETURN(NULL);
1063 }
1064
1065 struct lustre_profile *class_get_profile(const char *prof)
1066 {
1067         struct lustre_profile *lprof;
1068
1069         ENTRY;
1070         spin_lock(&lustre_profile_list_lock);
1071         lprof = class_get_profile_nolock(prof);
1072         spin_unlock(&lustre_profile_list_lock);
1073         RETURN(lprof);
1074 }
1075 EXPORT_SYMBOL(class_get_profile);
1076
1077 /**
1078  * Create a named "profile".
1079  * This defines the MDC and OSC names to use for a client.
1080  * This also is used to define the LOV to be used by a MDT.
1081  */
1082 static int class_add_profile(int proflen, char *prof, int osclen, char *osc,
1083                              int mdclen, char *mdc)
1084 {
1085         struct lustre_profile *lprof;
1086         int err = 0;
1087
1088         ENTRY;
1089
1090         CDEBUG(D_CONFIG, "Add profile %s\n", prof);
1091
1092         OBD_ALLOC(lprof, sizeof(*lprof));
1093         if (!lprof)
1094                 RETURN(-ENOMEM);
1095         INIT_LIST_HEAD(&lprof->lp_list);
1096
1097         LASSERT(proflen == (strlen(prof) + 1));
1098         OBD_ALLOC(lprof->lp_profile, proflen);
1099         if (!lprof->lp_profile)
1100                 GOTO(out, err = -ENOMEM);
1101         memcpy(lprof->lp_profile, prof, proflen);
1102
1103         LASSERT(osclen == (strlen(osc) + 1));
1104         OBD_ALLOC(lprof->lp_dt, osclen);
1105         if (!lprof->lp_dt)
1106                 GOTO(out, err = -ENOMEM);
1107         memcpy(lprof->lp_dt, osc, osclen);
1108
1109         if (mdclen > 0) {
1110                 LASSERT(mdclen == (strlen(mdc) + 1));
1111                 OBD_ALLOC(lprof->lp_md, mdclen);
1112                 if (!lprof->lp_md)
1113                         GOTO(out, err = -ENOMEM);
1114                 memcpy(lprof->lp_md, mdc, mdclen);
1115         }
1116
1117         spin_lock(&lustre_profile_list_lock);
1118         lprof->lp_refs = 1;
1119         lprof->lp_list_deleted = false;
1120
1121         list_add(&lprof->lp_list, &lustre_profile_list);
1122         spin_unlock(&lustre_profile_list_lock);
1123         RETURN(err);
1124
1125 out:
1126         if (lprof->lp_md)
1127                 OBD_FREE(lprof->lp_md, mdclen);
1128         if (lprof->lp_dt)
1129                 OBD_FREE(lprof->lp_dt, osclen);
1130         if (lprof->lp_profile)
1131                 OBD_FREE(lprof->lp_profile, proflen);
1132         OBD_FREE(lprof, sizeof(*lprof));
1133         RETURN(err);
1134 }
1135
1136 void class_del_profile(const char *prof)
1137 {
1138         struct lustre_profile *lprof;
1139
1140         ENTRY;
1141
1142         CDEBUG(D_CONFIG, "Del profile %s\n", prof);
1143
1144         spin_lock(&lustre_profile_list_lock);
1145         lprof = class_get_profile_nolock(prof);
1146         if (lprof) {
1147                 /* because get profile increments the ref counter */
1148                 lprof->lp_refs--;
1149                 list_del(&lprof->lp_list);
1150                 lprof->lp_list_deleted = true;
1151                 spin_unlock(&lustre_profile_list_lock);
1152
1153                 class_put_profile(lprof);
1154         } else {
1155                 spin_unlock(&lustre_profile_list_lock);
1156         }
1157         EXIT;
1158 }
1159 EXPORT_SYMBOL(class_del_profile);
1160
1161 void class_put_profile(struct lustre_profile *lprof)
1162 {
1163         spin_lock(&lustre_profile_list_lock);
1164         if ((--lprof->lp_refs) > 0) {
1165                 LASSERT(lprof->lp_refs > 0);
1166                 spin_unlock(&lustre_profile_list_lock);
1167                 return;
1168         }
1169         spin_unlock(&lustre_profile_list_lock);
1170
1171         /* confirm not a negative number */
1172         LASSERT(lprof->lp_refs == 0);
1173
1174         /*
1175          * At least one class_del_profile/profiles must be called
1176          * on the target profile or lustre_profile_list will corrupt
1177          */
1178         LASSERT(lprof->lp_list_deleted);
1179         OBD_FREE(lprof->lp_profile, strlen(lprof->lp_profile) + 1);
1180         OBD_FREE(lprof->lp_dt, strlen(lprof->lp_dt) + 1);
1181         if (lprof->lp_md)
1182                 OBD_FREE(lprof->lp_md, strlen(lprof->lp_md) + 1);
1183         OBD_FREE(lprof, sizeof(*lprof));
1184 }
1185 EXPORT_SYMBOL(class_put_profile);
1186
1187 /* COMPAT_146 */
1188 void class_del_profiles(void)
1189 {
1190         struct lustre_profile *lprof, *n;
1191         ENTRY;
1192
1193         spin_lock(&lustre_profile_list_lock);
1194         list_for_each_entry_safe(lprof, n, &lustre_profile_list, lp_list) {
1195                 list_del(&lprof->lp_list);
1196                 lprof->lp_list_deleted = true;
1197                 spin_unlock(&lustre_profile_list_lock);
1198
1199                 class_put_profile(lprof);
1200
1201                 spin_lock(&lustre_profile_list_lock);
1202         }
1203         spin_unlock(&lustre_profile_list_lock);
1204         EXIT;
1205 }
1206 EXPORT_SYMBOL(class_del_profiles);
1207
1208 /*
1209  * We can't call lquota_process_config directly because
1210  * it lives in a module that must be loaded after this one.
1211  */
1212 #ifdef HAVE_SERVER_SUPPORT
1213 static int (*quota_process_config)(struct lustre_cfg *lcfg) = NULL;
1214 #endif /* HAVE_SERVER_SUPPORT */
1215
1216 /**
1217  * Rename the proc parameter in \a cfg with a new name \a new_name.
1218  *
1219  * \param cfg      config structure which contains the proc parameter
1220  * \param new_name new name of the proc parameter
1221  *
1222  * \retval valid-pointer    pointer to the newly-allocated config structure
1223  *                          which contains the renamed proc parameter
1224  * \retval ERR_PTR(-EINVAL) if \a cfg or \a new_name is NULL, or \a cfg does
1225  *                          not contain a proc parameter
1226  * \retval ERR_PTR(-ENOMEM) if memory allocation failure occurs
1227  */
1228 struct lustre_cfg *lustre_cfg_rename(struct lustre_cfg *cfg,
1229                                      const char *new_name)
1230 {
1231         struct lustre_cfg_bufs *bufs = NULL;
1232         struct lustre_cfg *new_cfg = NULL;
1233         char *param = NULL;
1234         char *new_param = NULL;
1235         char *value = NULL;
1236         int name_len = 0;
1237         int new_len = 0;
1238
1239         ENTRY;
1240
1241         if (!cfg || !new_name)
1242                 GOTO(out_nocfg, new_cfg = ERR_PTR(-EINVAL));
1243
1244         param = lustre_cfg_string(cfg, 1);
1245         if (!param)
1246                 GOTO(out_nocfg, new_cfg = ERR_PTR(-EINVAL));
1247
1248         value = strchr(param, '=');
1249         if (value)
1250                 name_len = value - param;
1251         else
1252                 name_len = strlen(param);
1253
1254         new_len = LUSTRE_CFG_BUFLEN(cfg, 1) + strlen(new_name) - name_len;
1255
1256         OBD_ALLOC(new_param, new_len);
1257         if (!new_param)
1258                 GOTO(out_nocfg, new_cfg = ERR_PTR(-ENOMEM));
1259
1260         strscpy(new_param, new_name, new_len);
1261         if (value)
1262                 strcat(new_param, value);
1263
1264         OBD_ALLOC_PTR(bufs);
1265         if (!bufs)
1266                 GOTO(out_free_param, new_cfg = ERR_PTR(-ENOMEM));
1267
1268         lustre_cfg_bufs_reset(bufs, NULL);
1269         lustre_cfg_bufs_init(bufs, cfg);
1270         lustre_cfg_bufs_set_string(bufs, 1, new_param);
1271
1272         OBD_ALLOC(new_cfg, lustre_cfg_len(bufs->lcfg_bufcount,
1273                                           bufs->lcfg_buflen));
1274         if (!new_cfg)
1275                 GOTO(out_free_buf, new_cfg = ERR_PTR(-ENOMEM));
1276
1277         lustre_cfg_init(new_cfg, cfg->lcfg_command, bufs);
1278
1279         new_cfg->lcfg_num = cfg->lcfg_num;
1280         new_cfg->lcfg_flags = cfg->lcfg_flags;
1281         new_cfg->lcfg_nid = cfg->lcfg_nid;
1282         new_cfg->lcfg_nal = cfg->lcfg_nal;
1283 out_free_buf:
1284         OBD_FREE_PTR(bufs);
1285 out_free_param:
1286         OBD_FREE(new_param, new_len);
1287 out_nocfg:
1288         RETURN(new_cfg);
1289 }
1290 EXPORT_SYMBOL(lustre_cfg_rename);
1291
1292 static ssize_t process_param2_config(struct lustre_cfg *lcfg)
1293 {
1294         char *param = lustre_cfg_string(lcfg, 1);
1295         char *upcall = lustre_cfg_string(lcfg, 2);
1296         struct kobject *kobj = NULL;
1297         const char *subsys = param;
1298         char *newparam = NULL;
1299         char *argv[] = {
1300                 [0] = "/usr/sbin/lctl",
1301                 [1] = "set_param",
1302                 [2] = param,
1303                 [3] = NULL
1304         };
1305         ktime_t start;
1306         ktime_t end;
1307         size_t len;
1308         int rc;
1309
1310         ENTRY;
1311         print_lustre_cfg(lcfg);
1312
1313         len = strcspn(param, ".=");
1314         if (!len)
1315                 RETURN(-EINVAL);
1316
1317         /* If we find '=' then its the top level sysfs directory */
1318         if (param[len] == '=')
1319                 RETURN(class_set_global(param));
1320
1321         subsys = kstrndup(param, len, GFP_KERNEL);
1322         if (!subsys)
1323                 RETURN(-ENOMEM);
1324
1325         kobj = kset_find_obj(lustre_kset, subsys);
1326         kfree(subsys);
1327         if (kobj) {
1328                 char *value = param;
1329                 char *envp[4];
1330                 int i;
1331
1332                 param = strsep(&value, "=");
1333                 envp[0] = kasprintf(GFP_KERNEL, "PARAM=%s", param);
1334                 envp[1] = kasprintf(GFP_KERNEL, "SETTING=%s", value);
1335                 envp[2] = kasprintf(GFP_KERNEL, "TIME=%lld",
1336                                     ktime_get_real_seconds());
1337                 envp[3] = NULL;
1338
1339                 rc = kobject_uevent_env(kobj, KOBJ_CHANGE, envp);
1340                 for (i = 0; i < ARRAY_SIZE(envp); i++)
1341                         kfree(envp[i]);
1342
1343                 kobject_put(kobj);
1344
1345                 RETURN(rc);
1346         }
1347
1348         /* Add upcall processing here. Now only lctl is supported */
1349         if (strcmp(upcall, LCTL_UPCALL) != 0) {
1350                 CERROR("Unsupported upcall %s\n", upcall);
1351                 RETURN(-EINVAL);
1352         }
1353
1354         /* root_squash and nosquash_nids settings must be applied to
1355          * global subsystem (*.) so that it is taken into account by
1356          * both client and server sides. So do the equivalent of a
1357          * 's / mdt. / *. /'.
1358          */
1359         if ((strstr(param, PARAM_NOSQUASHNIDS) ||
1360              strstr(param, PARAM_ROOTSQUASH)) &&
1361             (param[0] != '*' || param[1] != '.')) {
1362                 newparam = kmalloc(strlen(param) + 1, GFP_NOFS);
1363                 if (!newparam)
1364                         RETURN(-ENOMEM);
1365
1366                 snprintf(newparam, strlen(param) + 1, "*%s", param + len);
1367                 argv[2] = (char *)newparam;
1368         }
1369
1370         start = ktime_get();
1371         rc = call_usermodehelper(argv[0], argv, NULL, UMH_WAIT_PROC);
1372         end = ktime_get();
1373
1374         if (rc < 0) {
1375                 CERROR("lctl: error invoking upcall %s %s %s: rc = %d; "
1376                        "time %ldus\n", argv[0], argv[1], argv[2], rc,
1377                        (long)ktime_us_delta(end, start));
1378         } else {
1379                 CDEBUG(D_HA, "lctl: invoked upcall %s %s %s, time %ldus\n",
1380                        argv[0], argv[1], argv[2],
1381                        (long)ktime_us_delta(end, start));
1382                        rc = 0;
1383         }
1384
1385         kfree(newparam);
1386         RETURN(rc);
1387 }
1388
1389 #ifdef HAVE_SERVER_SUPPORT
1390 void lustre_register_quota_process_config(int (*qpc)(struct lustre_cfg *lcfg))
1391 {
1392         quota_process_config = qpc;
1393 }
1394 EXPORT_SYMBOL(lustre_register_quota_process_config);
1395 #endif /* HAVE_SERVER_SUPPORT */
1396
1397 /**
1398  * Process configuration commands given in lustre_cfg form.
1399  * These may come from direct calls (e.g. class_manual_cleanup)
1400  * or processing the config llog, or ioctl from lctl.
1401  */
1402 int class_process_config(struct lustre_cfg *lcfg)
1403 {
1404         struct obd_device *obd;
1405         struct lnet_nid nid;
1406         int err;
1407
1408         LASSERT(lcfg && !IS_ERR(lcfg));
1409         CDEBUG(D_IOCTL, "processing cmd: %x\n", lcfg->lcfg_command);
1410
1411         /* Commands that don't need a device */
1412         switch (lcfg->lcfg_command) {
1413         case LCFG_ATTACH: {
1414                 err = class_attach(lcfg);
1415                 GOTO(out, err);
1416         }
1417         case LCFG_ADD_UUID: {
1418                 CDEBUG(D_IOCTL,
1419                        "adding mapping from uuid %s to nid %#llx (%s)\n",
1420                        lustre_cfg_string(lcfg, 1), lcfg->lcfg_nid,
1421                        libcfs_nid2str(lcfg->lcfg_nid));
1422
1423                 err = 0;
1424                 if (lcfg->lcfg_nid) {
1425                         lnet_nid4_to_nid(lcfg->lcfg_nid, &nid);
1426                 } else {
1427                         char *nidstr = lustre_cfg_string(lcfg, 2);
1428
1429                         if (nidstr)
1430                                 err = libcfs_strnid(&nid, nidstr);
1431                         else
1432                                 err = -EINVAL;
1433                 }
1434                 if (!err)
1435                         err = class_add_uuid(lustre_cfg_string(lcfg, 1), &nid);
1436                 GOTO(out, err);
1437         }
1438         case LCFG_DEL_UUID: {
1439                 CDEBUG(D_IOCTL, "removing mappings for uuid %s\n",
1440                        (lcfg->lcfg_bufcount < 2 || LUSTRE_CFG_BUFLEN(lcfg, 1) ==
1441                         0) ? "<all uuids>" : lustre_cfg_string(lcfg, 1));
1442
1443                 err = class_del_uuid(lustre_cfg_string(lcfg, 1));
1444                 GOTO(out, err);
1445         }
1446         case LCFG_MOUNTOPT: {
1447                 CDEBUG(D_IOCTL, "mountopt: profile %s osc %s mdc %s\n",
1448                        lustre_cfg_string(lcfg, 1),
1449                        lustre_cfg_string(lcfg, 2),
1450                        lustre_cfg_string(lcfg, 3));
1451                 /*
1452                  * set these mount options somewhere, so ll_fill_super
1453                  * can find them.
1454                  */
1455                 err = class_add_profile(LUSTRE_CFG_BUFLEN(lcfg, 1),
1456                                         lustre_cfg_string(lcfg, 1),
1457                                         LUSTRE_CFG_BUFLEN(lcfg, 2),
1458                                         lustre_cfg_string(lcfg, 2),
1459                                         LUSTRE_CFG_BUFLEN(lcfg, 3),
1460                                         lustre_cfg_string(lcfg, 3));
1461                 GOTO(out, err);
1462         }
1463         case LCFG_DEL_MOUNTOPT: {
1464                 CDEBUG(D_IOCTL, "mountopt: profile %s\n",
1465                        lustre_cfg_string(lcfg, 1));
1466                 class_del_profile(lustre_cfg_string(lcfg, 1));
1467                 GOTO(out, err = 0);
1468         }
1469         case LCFG_SET_TIMEOUT: {
1470                 CDEBUG(D_IOCTL, "changing lustre timeout from %d to %d\n",
1471                        obd_timeout, lcfg->lcfg_num);
1472                 obd_timeout = max(lcfg->lcfg_num, 1U);
1473                 ping_interval = max(obd_timeout / 4, 1U);
1474                 obd_timeout_set = 1;
1475                 GOTO(out, err = 0);
1476         }
1477         case LCFG_SET_LDLM_TIMEOUT: {
1478                 CDEBUG(D_IOCTL, "changing lustre ldlm_timeout from %d to %d\n",
1479                        ldlm_timeout, lcfg->lcfg_num);
1480                 ldlm_timeout = max(lcfg->lcfg_num, 1U);
1481                 if (ldlm_timeout >= obd_timeout)
1482                         ldlm_timeout = max(obd_timeout / 3, 1U);
1483                 ldlm_timeout_set = 1;
1484                 GOTO(out, err = 0);
1485         }
1486         case LCFG_SET_UPCALL: {
1487                 LCONSOLE_ERROR_MSG(0x15a, "recovery upcall is deprecated\n");
1488                 /* COMPAT_146 Don't fail on old configs */
1489                 GOTO(out, err = 0);
1490         }
1491         case LCFG_MARKER: {
1492                 struct cfg_marker *marker;
1493
1494                 marker = lustre_cfg_buf(lcfg, 1);
1495                 CDEBUG(D_IOCTL, "marker %d (%#x) %.16s %s\n", marker->cm_step,
1496                        marker->cm_flags, marker->cm_tgtname,
1497                        marker->cm_comment);
1498                 GOTO(out, err = 0);
1499         }
1500         case LCFG_PARAM: {
1501                 char *tmp;
1502
1503                 /* llite has no OBD */
1504                 if (class_match_param(lustre_cfg_string(lcfg, 1),
1505                                       PARAM_LLITE, NULL) == 0) {
1506                         struct lustre_sb_info *lsi;
1507                         unsigned long addr;
1508                         ssize_t count;
1509
1510                         /*
1511                          * The instance name contains the sb:
1512                          * lustre-client-aacfe000
1513                          */
1514                         tmp = strrchr(lustre_cfg_string(lcfg, 0), '-');
1515                         if (!tmp || !*(++tmp))
1516                                 GOTO(out, err = -EINVAL);
1517
1518                         if (sscanf(tmp, "%lx", &addr) != 1)
1519                                 GOTO(out, err = -EINVAL);
1520
1521                         lsi = s2lsi((struct super_block *)addr);
1522                         /* This better be a real Lustre superblock! */
1523                         LASSERT(lsi->lsi_lmd->lmd_magic == LMD_MAGIC);
1524
1525                         count = class_modify_config(lcfg, PARAM_LLITE,
1526                                                     lsi->lsi_kobj);
1527                         err = count < 0 ? count : 0;
1528                         GOTO(out, err);
1529                 } else if ((class_match_param(lustre_cfg_string(lcfg, 1),
1530                                               PARAM_SYS, &tmp) == 0)) {
1531                         /* Global param settings */
1532                         err = class_set_global(tmp);
1533                         /*
1534                          * Client or server should not fail to mount if
1535                          * it hits an unknown configuration parameter.
1536                          */
1537                         if (err < 0)
1538                                 CWARN("Ignoring unknown param %s\n", tmp);
1539
1540                         GOTO(out, err = 0);
1541 #ifdef HAVE_SERVER_SUPPORT
1542                 } else if ((class_match_param(lustre_cfg_string(lcfg, 1),
1543                                               PARAM_QUOTA, &tmp) == 0) &&
1544                            quota_process_config) {
1545                         err = (*quota_process_config)(lcfg);
1546                         GOTO(out, err);
1547 #endif /* HAVE_SERVER_SUPPORT */
1548                 }
1549
1550                 break;
1551         }
1552         case LCFG_SET_PARAM: {
1553                 err = process_param2_config(lcfg);
1554                 GOTO(out, err = 0);
1555         }
1556         }
1557         /* Commands that require a device */
1558         obd = class_name2obd(lustre_cfg_string(lcfg, 0));
1559         if (!obd) {
1560                 if (!LUSTRE_CFG_BUFLEN(lcfg, 0))
1561                         CERROR("this lcfg command requires a device name\n");
1562                 else
1563                         CERROR("no device for: %s\n",
1564                                lustre_cfg_string(lcfg, 0));
1565
1566                 GOTO(out, err = -EINVAL);
1567         }
1568         switch(lcfg->lcfg_command) {
1569         case LCFG_SETUP: {
1570                 err = class_setup(obd, lcfg);
1571                 GOTO(out, err);
1572         }
1573         case LCFG_DETACH: {
1574                 err = class_detach(obd, lcfg);
1575                 GOTO(out, err = 0);
1576         }
1577         case LCFG_CLEANUP: {
1578                 err = class_cleanup(obd, lcfg);
1579                 GOTO(out, err = 0);
1580         }
1581         case LCFG_ADD_CONN: {
1582                 err = class_add_conn(obd, lcfg);
1583                 GOTO(out, err = 0);
1584         }
1585         case LCFG_DEL_CONN: {
1586                 err = class_del_conn(obd, lcfg);
1587                 GOTO(out, err = 0);
1588         }
1589         case LCFG_POOL_NEW: {
1590                 err = obd_pool_new(obd, lustre_cfg_string(lcfg, 2));
1591                 GOTO(out, err = 0);
1592         }
1593         case LCFG_POOL_ADD: {
1594                 err = obd_pool_add(obd, lustre_cfg_string(lcfg, 2),
1595                                    lustre_cfg_string(lcfg, 3));
1596                 GOTO(out, err = 0);
1597         }
1598         case LCFG_POOL_REM: {
1599                 err = obd_pool_rem(obd, lustre_cfg_string(lcfg, 2),
1600                                    lustre_cfg_string(lcfg, 3));
1601                 GOTO(out, err = 0);
1602         }
1603         case LCFG_POOL_DEL: {
1604                 err = obd_pool_del(obd, lustre_cfg_string(lcfg, 2));
1605                 GOTO(out, err = 0);
1606         }
1607         /*
1608          * Process config log ADD_MDC record twice to add MDC also to LOV
1609          * for Data-on-MDT:
1610          *
1611          * add 0:lustre-clilmv 1:lustre-MDT0000_UUID 2:0 3:1
1612          *     4:lustre-MDT0000-mdc_UUID
1613          */
1614         case LCFG_ADD_MDC: {
1615                 struct obd_device *lov_obd;
1616                 char *clilmv;
1617
1618                 err = obd_process_config(obd, sizeof(*lcfg), lcfg);
1619                 if (err)
1620                         GOTO(out, err);
1621
1622                 /* make sure this is client LMV log entry */
1623                 clilmv = strstr(lustre_cfg_string(lcfg, 0), "clilmv");
1624                 if (!clilmv)
1625                         GOTO(out, err);
1626
1627                 /*
1628                  * replace 'lmv' with 'lov' name to address LOV device and
1629                  * process llog record to add MDC there.
1630                  */
1631                 clilmv[4] = 'o';
1632                 lov_obd = class_name2obd(lustre_cfg_string(lcfg, 0));
1633                 if (lov_obd) {
1634                         err = obd_process_config(lov_obd, sizeof(*lcfg), lcfg);
1635                 } else {
1636                         err = -ENOENT;
1637                         CERROR("%s: Cannot find LOV by %s name, rc = %d\n",
1638                                obd->obd_name, lustre_cfg_string(lcfg, 0), err);
1639                 }
1640                 /* restore 'lmv' name */
1641                 clilmv[4] = 'm';
1642                 GOTO(out, err);
1643         }
1644         default: {
1645                 err = obd_process_config(obd, sizeof(*lcfg), lcfg);
1646                 GOTO(out, err);
1647         }
1648         }
1649         EXIT;
1650 out:
1651         if ((err < 0) && !(lcfg->lcfg_command & LCFG_REQUIRED)) {
1652                 CWARN("Ignoring error %d on optional command %#x\n", err,
1653                       lcfg->lcfg_command);
1654                 err = 0;
1655         }
1656         return err;
1657 }
1658 EXPORT_SYMBOL(class_process_config);
1659
1660 ssize_t class_modify_config(struct lustre_cfg *lcfg, const char *prefix,
1661                             struct kobject *kobj)
1662 {
1663         const struct kobj_type *typ;
1664         ssize_t count = 0;
1665         int i;
1666
1667         if (lcfg->lcfg_command != LCFG_PARAM) {
1668                 CERROR("Unknown command: %d\n", lcfg->lcfg_command);
1669                 return -EINVAL;
1670         }
1671
1672         typ = get_ktype(kobj);
1673         if (!typ || !typ->default_groups)
1674                 return -ENODEV;
1675
1676         print_lustre_cfg(lcfg);
1677
1678         /*
1679          * e.g. tunefs.lustre --param mdt.group_upcall=foo /r/tmp/lustre-mdt
1680          * or   lctl conf_param lustre-MDT0000.mdt.group_upcall=bar
1681          * or   lctl conf_param lustre-OST0000.osc.max_dirty_mb=36
1682          */
1683         for (i = 1; i < lcfg->lcfg_bufcount; i++) {
1684                 struct attribute *attr = NULL;
1685                 size_t keylen;
1686                 char *value;
1687                 char *key;
1688
1689                 key = lustre_cfg_buf(lcfg, i);
1690                 /* Strip off prefix */
1691                 if (class_match_param(key, prefix, &key))
1692                         /*
1693                          * If the prefix doesn't match, return error so we
1694                          * can pass it down the stack
1695                          */
1696                         return -EINVAL;
1697
1698                 value = strchr(key, '=');
1699                 if (!value || *(value + 1) == 0) {
1700                         CERROR("%s: can't parse param '%s' (missing '=')\n",
1701                                lustre_cfg_string(lcfg, 0),
1702                                lustre_cfg_string(lcfg, i));
1703                         /* continue parsing other params */
1704                         continue;
1705                 }
1706                 keylen = value - key;
1707                 value++;
1708
1709                 attr = get_attr_starts_with(typ, key, keylen);
1710                 if (!attr) {
1711                         char *envp[4], *param, *path;
1712
1713                         path = kobject_get_path(kobj, GFP_KERNEL);
1714                         if (!path)
1715                                 return -EINVAL;
1716
1717                         /* convert sysfs path to uevent format */
1718                         param = path;
1719                         while ((param = strchr(param, '/')) != NULL)
1720                                 *param = '.';
1721
1722                         param = strstr(path, "fs.lustre.") + 10;
1723
1724                         envp[0] = kasprintf(GFP_KERNEL, "PARAM=%s.%.*s",
1725                                             param, (int) keylen, key);
1726                         envp[1] = kasprintf(GFP_KERNEL, "SETTING=%s", value);
1727                         envp[2] = kasprintf(GFP_KERNEL, "TIME=%lld",
1728                                             ktime_get_real_seconds());
1729                         envp[3] = NULL;
1730
1731                         if (kobject_uevent_env(kobj, KOBJ_CHANGE, envp)) {
1732                                 CERROR("%s: failed to send uevent %s\n",
1733                                        kobject_name(kobj), key);
1734                         }
1735
1736                         for (i = 0; i < ARRAY_SIZE(envp); i++)
1737                                 kfree(envp[i]);
1738                         kfree(path);
1739                 } else {
1740                         count += lustre_attr_store(kobj, attr, value,
1741                                                    strlen(value));
1742                 }
1743         }
1744         return count;
1745 }
1746 EXPORT_SYMBOL(class_modify_config);
1747
1748 /*
1749  * Supplemental functions for config logs, it allocates lustre_cfg
1750  * buffers plus initialized llog record header at the beginning.
1751  */
1752 struct llog_cfg_rec *lustre_cfg_rec_new(int cmd, struct lustre_cfg_bufs *bufs)
1753 {
1754         struct llog_cfg_rec *lcr;
1755         int reclen;
1756
1757         ENTRY;
1758
1759         reclen = lustre_cfg_len(bufs->lcfg_bufcount, bufs->lcfg_buflen);
1760         reclen = llog_data_len(reclen) + sizeof(struct llog_rec_hdr) +
1761                  sizeof(struct llog_rec_tail);
1762
1763         OBD_ALLOC(lcr, reclen);
1764         if (!lcr)
1765                 RETURN(NULL);
1766
1767         lustre_cfg_init(&lcr->lcr_cfg, cmd, bufs);
1768
1769         lcr->lcr_hdr.lrh_len = reclen;
1770         lcr->lcr_hdr.lrh_type = OBD_CFG_REC;
1771
1772         RETURN(lcr);
1773 }
1774 EXPORT_SYMBOL(lustre_cfg_rec_new);
1775
1776 void lustre_cfg_rec_free(struct llog_cfg_rec *lcr)
1777 {
1778         ENTRY;
1779         OBD_FREE(lcr, lcr->lcr_hdr.lrh_len);
1780         EXIT;
1781 }
1782 EXPORT_SYMBOL(lustre_cfg_rec_free);
1783
1784 /**
1785  * Parse a configuration llog, doing various manipulations on them
1786  * for various reasons, (modifications for compatibility, skip obsolete
1787  * records, change uuids, etc), then class_process_config() resulting
1788  * net records.
1789  */
1790 int class_config_llog_handler(const struct lu_env *env,
1791                               struct llog_handle *handle,
1792                               struct llog_rec_hdr *rec, void *data)
1793 {
1794         struct config_llog_instance *cfg = data;
1795         int cfg_len = rec->lrh_len;
1796         char *cfg_buf = (char *) (rec + 1);
1797         int rc = 0;
1798         ENTRY;
1799
1800         /* class_config_dump_handler(handle, rec, data); */
1801
1802         switch (rec->lrh_type) {
1803         case OBD_CFG_REC: {
1804                 struct lustre_cfg *lcfg, *lcfg_new;
1805                 struct lustre_cfg_bufs bufs;
1806                 char *inst_name = NULL;
1807                 int inst_len = 0;
1808                 int swab = 0;
1809
1810                 lcfg = (struct lustre_cfg *)cfg_buf;
1811                 if (lcfg->lcfg_version == __swab32(LUSTRE_CFG_VERSION)) {
1812                         lustre_swab_lustre_cfg(lcfg);
1813                         swab = 1;
1814                 }
1815
1816                 rc = lustre_cfg_sanity_check(cfg_buf, cfg_len);
1817                 if (rc)
1818                         GOTO(out, rc);
1819
1820                 /* Figure out config state info */
1821                 if (lcfg->lcfg_command == LCFG_MARKER) {
1822                         struct cfg_marker *marker = lustre_cfg_buf(lcfg, 1);
1823                         lustre_swab_cfg_marker(marker, swab,
1824                                                LUSTRE_CFG_BUFLEN(lcfg, 1));
1825                         CDEBUG(D_CONFIG, "Marker, inst_flg=%#x mark_flg=%#x\n",
1826                                cfg->cfg_flags, marker->cm_flags);
1827                         if (marker->cm_flags & CM_START) {
1828                                 /* all previous flags off */
1829                                 cfg->cfg_flags = CFG_F_MARKER;
1830                                 server_name2index(marker->cm_tgtname,
1831                                                   &cfg->cfg_lwp_idx, NULL);
1832                                 if (marker->cm_flags & CM_SKIP) {
1833                                         cfg->cfg_flags |= CFG_F_SKIP;
1834                                         CDEBUG(D_CONFIG, "SKIP #%d\n",
1835                                                marker->cm_step);
1836                                 } else if ((marker->cm_flags & CM_EXCLUDE) ||
1837                                            (cfg->cfg_sb &&
1838                                            lustre_check_exclusion(cfg->cfg_sb,
1839                                                         marker->cm_tgtname))) {
1840                                         cfg->cfg_flags |= CFG_F_EXCLUDE;
1841                                         CDEBUG(D_CONFIG, "EXCLUDE %d\n",
1842                                                marker->cm_step);
1843                                 }
1844                         } else if (marker->cm_flags & CM_END) {
1845                                 cfg->cfg_flags = 0;
1846                         }
1847                 }
1848                 /*
1849                  * A config command without a start marker before it is
1850                  * illegal
1851                  */
1852                 if (!(cfg->cfg_flags & CFG_F_MARKER) &&
1853                     (lcfg->lcfg_command != LCFG_MARKER)) {
1854                         CWARN("Skip config outside markers, (inst: %016lx, uuid: %s, flags: %#x)\n",
1855                                 cfg->cfg_instance,
1856                                 cfg->cfg_uuid.uuid, cfg->cfg_flags);
1857                         cfg->cfg_flags |= CFG_F_SKIP;
1858                 }
1859                 if (cfg->cfg_flags & CFG_F_SKIP) {
1860                         CDEBUG(D_CONFIG, "skipping %#x\n",
1861                                cfg->cfg_flags);
1862                         rc = 0;
1863                         /* No processing! */
1864                         break;
1865                 }
1866
1867                 /*
1868                  * For interoperability between 1.8 and 2.0,
1869                  * rename "mds" OBD device type to "mdt".
1870                  */
1871                 {
1872                         char *typename = lustre_cfg_string(lcfg, 1);
1873                         char *index = lustre_cfg_string(lcfg, 2);
1874
1875                         if ((lcfg->lcfg_command == LCFG_ATTACH && typename &&
1876                             strcmp(typename, "mds") == 0)) {
1877                                 CWARN("For 1.8 interoperability, rename obd "
1878                                         "type from mds to mdt\n");
1879                                 typename[2] = 't';
1880                         }
1881                         if ((lcfg->lcfg_command == LCFG_SETUP && index &&
1882                             strcmp(index, "type") == 0)) {
1883                                 CDEBUG(D_INFO, "For 1.8 interoperability, "
1884                                        "set this index to '0'\n");
1885                                 index[0] = '0';
1886                                 index[1] = 0;
1887                         }
1888                 }
1889
1890 #ifdef HAVE_SERVER_SUPPORT
1891                 /* newer MDS replaces LOV/OSC with LOD/OSP */
1892                 if ((lcfg->lcfg_command == LCFG_ATTACH ||
1893                      lcfg->lcfg_command == LCFG_SET_PARAM ||
1894                      lcfg->lcfg_command == LCFG_PARAM) &&
1895                     cfg->cfg_sb && IS_MDT(s2lsi(cfg->cfg_sb))) {
1896                         char *typename = lustre_cfg_string(lcfg, 1);
1897
1898                         if (typename &&
1899                             strcmp(typename, LUSTRE_LOV_NAME) == 0) {
1900                                 CDEBUG(D_CONFIG,
1901                                        "For 2.x interoperability, rename obd "
1902                                        "type from lov to lod (%s)\n",
1903                                        s2lsi(cfg->cfg_sb)->lsi_svname);
1904                                 strcpy(typename, LUSTRE_LOD_NAME);
1905                         }
1906                         if (typename &&
1907                             strcmp(typename, LUSTRE_OSC_NAME) == 0) {
1908                                 CDEBUG(D_CONFIG,
1909                                        "For 2.x interoperability, rename obd "
1910                                        "type from osc to osp (%s)\n",
1911                                        s2lsi(cfg->cfg_sb)->lsi_svname);
1912                                 strcpy(typename, LUSTRE_OSP_NAME);
1913                         }
1914                 }
1915 #endif /* HAVE_SERVER_SUPPORT */
1916
1917                 if (cfg->cfg_flags & CFG_F_EXCLUDE) {
1918                         CDEBUG(D_CONFIG, "cmd: %x marked EXCLUDED\n",
1919                                lcfg->lcfg_command);
1920                         if (lcfg->lcfg_command == LCFG_LOV_ADD_OBD)
1921                                 /* Add inactive instead */
1922                                 lcfg->lcfg_command = LCFG_LOV_ADD_INA;
1923                 }
1924
1925                 lustre_cfg_bufs_reset(&bufs, NULL);
1926                 lustre_cfg_bufs_init(&bufs, lcfg);
1927
1928                 if (cfg->cfg_instance &&
1929                     lcfg->lcfg_command != LCFG_SPTLRPC_CONF &&
1930                     LUSTRE_CFG_BUFLEN(lcfg, 0) > 0) {
1931                         inst_len = LUSTRE_CFG_BUFLEN(lcfg, 0) +
1932                                 LUSTRE_MAXINSTANCE + 4;
1933                         OBD_ALLOC(inst_name, inst_len);
1934                         if (!inst_name)
1935                                 GOTO(out, rc = -ENOMEM);
1936                         snprintf(inst_name, inst_len, "%s-%016lx",
1937                                 lustre_cfg_string(lcfg, 0),
1938                                 cfg->cfg_instance);
1939                         lustre_cfg_bufs_set_string(&bufs, 0, inst_name);
1940                         CDEBUG(D_CONFIG, "cmd %x, instance name: %s\n",
1941                                lcfg->lcfg_command, inst_name);
1942                 }
1943
1944                 /* override llog UUID for clients, to insure they are unique */
1945                 if (cfg->cfg_instance && lcfg->lcfg_command == LCFG_ATTACH)
1946                         lustre_cfg_bufs_set_string(&bufs, 2,
1947                                                    cfg->cfg_uuid.uuid);
1948                 /*
1949                  * sptlrpc config record, we expect 2 data segments:
1950                  *  [0]: fs_name/target_name,
1951                  *  [1]: rule string
1952                  * moving them to index [1] and [2], and insert MGC's
1953                  * obdname at index [0].
1954                  */
1955                 if (cfg->cfg_instance &&
1956                     lcfg->lcfg_command == LCFG_SPTLRPC_CONF) {
1957                         /* After ASLR changes cfg_instance this needs fixing */
1958                         /* "obd" is set in config_log_find_or_add() */
1959                         struct obd_device *obd = (void *)cfg->cfg_instance;
1960
1961                         lustre_cfg_bufs_set(&bufs, 2, bufs.lcfg_buf[1],
1962                                             bufs.lcfg_buflen[1]);
1963                         lustre_cfg_bufs_set(&bufs, 1, bufs.lcfg_buf[0],
1964                                             bufs.lcfg_buflen[0]);
1965                         lustre_cfg_bufs_set_string(&bufs, 0,
1966                                                    obd->obd_name);
1967                 }
1968
1969                 /*
1970                  * Add net info to setup command
1971                  * if given on command line.
1972                  * So config log will be:
1973                  * [0]: client name
1974                  * [1]: client UUID
1975                  * [2]: server UUID
1976                  * [3]: inactive-on-startup
1977                  * [4]: restrictive net
1978                  */
1979                 if (cfg && cfg->cfg_sb && s2lsi(cfg->cfg_sb) &&
1980                     !IS_SERVER(s2lsi(cfg->cfg_sb))) {
1981                         struct lustre_sb_info *lsi = s2lsi(cfg->cfg_sb);
1982                         char *nidnet = lsi->lsi_lmd->lmd_nidnet;
1983
1984                         if (lcfg->lcfg_command == LCFG_SETUP &&
1985                             lcfg->lcfg_bufcount != 2 && nidnet) {
1986                                 CDEBUG(D_CONFIG, "Adding net %s info to setup "
1987                                        "command for client %s\n", nidnet,
1988                                        lustre_cfg_string(lcfg, 0));
1989                                 lustre_cfg_bufs_set_string(&bufs, 4, nidnet);
1990                         }
1991                 }
1992
1993                 OBD_ALLOC(lcfg_new, lustre_cfg_len(bufs.lcfg_bufcount,
1994                                                    bufs.lcfg_buflen));
1995                 if (!lcfg_new)
1996                         GOTO(out_inst, rc = -ENOMEM);
1997
1998                 lustre_cfg_init(lcfg_new, lcfg->lcfg_command, &bufs);
1999                 lcfg_new->lcfg_num   = lcfg->lcfg_num;
2000                 lcfg_new->lcfg_flags = lcfg->lcfg_flags;
2001
2002                 /*
2003                  * XXX Hack to try to remain binary compatible with
2004                  * pre-newconfig logs
2005                  */
2006                 if (lcfg->lcfg_nal != 0 &&      /* pre-newconfig log? */
2007                     (lcfg->lcfg_nid >> 32) == 0) {
2008                         __u32 addr = (__u32)(lcfg->lcfg_nid & 0xffffffff);
2009
2010                         lcfg_new->lcfg_nid =
2011                                 LNET_MKNID(LNET_MKNET(lcfg->lcfg_nal, 0), addr);
2012                         CWARN("Converted pre-newconfig NAL %d NID %x to %s\n",
2013                               lcfg->lcfg_nal, addr,
2014                               libcfs_nid2str(lcfg_new->lcfg_nid));
2015                 } else {
2016                         lcfg_new->lcfg_nid = lcfg->lcfg_nid;
2017                 }
2018
2019                 lcfg_new->lcfg_nal = 0; /* illegal value for obsolete field */
2020
2021                 rc = class_process_config(lcfg_new);
2022                 OBD_FREE(lcfg_new, lustre_cfg_len(lcfg_new->lcfg_bufcount,
2023                                                   lcfg_new->lcfg_buflens));
2024 out_inst:
2025                 if (inst_name)
2026                         OBD_FREE(inst_name, inst_len);
2027                 break;
2028         }
2029         default:
2030                 CERROR("Unknown llog record type %#x encountered\n",
2031                        rec->lrh_type);
2032                 break;
2033         }
2034 out:
2035         if (rc) {
2036                 CERROR("%s: cfg command failed: rc = %d\n",
2037                         handle->lgh_ctxt->loc_obd->obd_name, rc);
2038                 class_config_dump_handler(NULL, handle, rec, data);
2039         }
2040         RETURN(rc);
2041 }
2042 EXPORT_SYMBOL(class_config_llog_handler);
2043
2044 int class_config_parse_llog(const struct lu_env *env, struct llog_ctxt *ctxt,
2045                             char *name, struct config_llog_instance *cfg)
2046 {
2047         struct llog_process_cat_data cd = {
2048                 .lpcd_first_idx = 0,
2049                 .lpcd_read_mode = LLOG_READ_MODE_NORMAL,
2050         };
2051         struct llog_handle *llh;
2052         llog_cb_t callback;
2053         int rc;
2054         ENTRY;
2055
2056         CDEBUG(D_INFO, "looking up llog %s\n", name);
2057         rc = llog_open(env, ctxt, &llh, NULL, name, LLOG_OPEN_EXISTS);
2058         if (rc)
2059                 RETURN(rc);
2060
2061         rc = llog_init_handle(env, llh, LLOG_F_IS_PLAIN, NULL);
2062         if (rc)
2063                 GOTO(parse_out, rc);
2064
2065         /* continue processing from where we last stopped to end-of-log */
2066         if (cfg) {
2067                 cd.lpcd_first_idx = cfg->cfg_last_idx;
2068                 callback = cfg->cfg_callback;
2069                 LASSERT(callback != NULL);
2070         } else {
2071                 callback = class_config_llog_handler;
2072         }
2073
2074         cd.lpcd_last_idx = 0;
2075
2076         rc = llog_process(env, llh, callback, cfg, &cd);
2077
2078         CDEBUG(D_CONFIG, "Processed log %s gen %d-%d (rc=%d)\n", name,
2079                cd.lpcd_first_idx + 1, cd.lpcd_last_idx, rc);
2080         if (cfg)
2081                 cfg->cfg_last_idx = cd.lpcd_last_idx;
2082
2083 parse_out:
2084         llog_close(env, llh);
2085         RETURN(rc);
2086 }
2087 EXPORT_SYMBOL(class_config_parse_llog);
2088
2089 /**
2090  * Get marker cfg_flag
2091  */
2092 void llog_get_marker_cfg_flags(struct llog_rec_hdr *rec,
2093                                unsigned int *cfg_flags)
2094 {
2095         struct lustre_cfg *lcfg = (struct lustre_cfg *)(rec + 1);
2096         struct cfg_marker *marker;
2097
2098         if (lcfg->lcfg_command == LCFG_MARKER) {
2099                 marker = lustre_cfg_buf(lcfg, 1);
2100                 if (marker->cm_flags & CM_START) {
2101                         *cfg_flags = CFG_F_MARKER;
2102                         if (marker->cm_flags & CM_SKIP)
2103                                 *cfg_flags = CFG_F_SKIP;
2104                 } else if (marker->cm_flags & CM_END) {
2105                         *cfg_flags = 0;
2106                 }
2107                 CDEBUG(D_INFO, "index=%d, cm_flags=%#08x cfg_flags=%#08x\n",
2108                        rec->lrh_index, marker->cm_flags, *cfg_flags);
2109         }
2110 }
2111
2112 /**
2113  * Parse config record and output dump in supplied buffer.
2114  *
2115  * This is separated from class_config_dump_handler() to use
2116  * for ioctl needs as well
2117  *
2118  * Sample Output:
2119  * - { index: 4, event: attach, device: lustrewt-clilov, type: lov,
2120  *     UUID: lustrewt-clilov_UUID }
2121  */
2122 int class_config_yaml_output(struct llog_rec_hdr *rec, char *buf, int size,
2123                              unsigned int *cfg_flags, bool raw)
2124 {
2125         struct lustre_cfg *lcfg = (struct lustre_cfg *)(rec + 1);
2126         char *ptr = buf;
2127         char *end = buf + size;
2128         int rc = 0, i;
2129         struct lcfg_type_data *ldata;
2130         int swab = 0;
2131
2132         LASSERT(rec->lrh_type == OBD_CFG_REC);
2133
2134         if (lcfg->lcfg_version == __swab32(LUSTRE_CFG_VERSION)) {
2135                 lustre_swab_lustre_cfg(lcfg);
2136                 swab = 1;
2137         }
2138
2139         rc = lustre_cfg_sanity_check(lcfg, rec->lrh_len);
2140         if (rc < 0)
2141                 return rc;
2142
2143         ldata = lcfg_cmd2data(lcfg->lcfg_command);
2144         if (!ldata)
2145                 return -ENOTTY;
2146
2147         llog_get_marker_cfg_flags(rec, cfg_flags);
2148         if ((lcfg->lcfg_command == LCFG_MARKER) && likely(!raw))
2149                 return 0;
2150         /* entries outside marker are skipped */
2151         if (!(*cfg_flags & CFG_F_MARKER) && !raw)
2152                 return 0;
2153         /* inside skipped marker */
2154         if ((*cfg_flags & CFG_F_SKIP) && !raw)
2155                 return 0;
2156
2157         /* form YAML entity */
2158         ptr += snprintf(ptr, end - ptr, "- { index: %u, event: %s",
2159                         rec->lrh_index, ldata->ltd_name);
2160         if (end - ptr <= 0)
2161                 goto out_overflow;
2162
2163         if (lcfg->lcfg_flags) {
2164                 ptr += snprintf(ptr, end - ptr, ", flags: %#08x",
2165                                 lcfg->lcfg_flags);
2166                 if (end - ptr <= 0)
2167                         goto out_overflow;
2168         }
2169         if (lcfg->lcfg_num) {
2170                 ptr += snprintf(ptr, end - ptr, ", num: %#08x",
2171                                 lcfg->lcfg_num);
2172                 if (end - ptr <= 0)
2173                         goto out_overflow;
2174         }
2175         if (lcfg->lcfg_nid) {
2176                 char nidstr[LNET_NIDSTR_SIZE];
2177
2178                 libcfs_nid2str_r(lcfg->lcfg_nid, nidstr, sizeof(nidstr));
2179                 ptr += snprintf(ptr, end - ptr, ", nid: %s(%#llx)",
2180                                 nidstr, lcfg->lcfg_nid);
2181                 if (end - ptr <= 0)
2182                         goto out_overflow;
2183         }
2184
2185         if (LUSTRE_CFG_BUFLEN(lcfg, 0) > 0) {
2186                 ptr += snprintf(ptr, end - ptr, ", device: %s",
2187                                 lustre_cfg_string(lcfg, 0));
2188                 if (end - ptr <= 0)
2189                         goto out_overflow;
2190         }
2191
2192         if (lcfg->lcfg_command == LCFG_SET_PARAM) {
2193                 /*
2194                  * set_param -P parameters have param=val here, separate
2195                  * them through pointer magic and print them out in
2196                  * native yamlese
2197                  */
2198                 char *cfg_str = lustre_cfg_string(lcfg, 1);
2199                 char *tmp = strchr(cfg_str, '=');
2200                 size_t len;
2201
2202                 if (!tmp)
2203                         goto out_done;
2204
2205                 ptr += snprintf(ptr, end - ptr, ", %s: ", ldata->ltd_bufs[0]);
2206                 len = tmp - cfg_str + 1;
2207                 snprintf(ptr, len, "%s", cfg_str);
2208                 ptr += len - 1;
2209
2210                 ptr += snprintf(ptr, end - ptr, ", %s: ", ldata->ltd_bufs[1]);
2211                 ptr += snprintf(ptr, end - ptr, "%s", tmp + 1);
2212
2213                 goto out_done;
2214         }
2215
2216         if (lcfg->lcfg_command == LCFG_MARKER) {
2217                 struct cfg_marker *marker;
2218
2219                 marker = lustre_cfg_buf(lcfg, 1);
2220                 ptr += snprintf(ptr, end - ptr, ", flags: %#04x",
2221                                 marker->cm_flags);
2222                 ptr += snprintf(ptr, end - ptr, ", version: %d.%d.%d.%d",
2223                                 OBD_OCD_VERSION_MAJOR(marker->cm_vers),
2224                                 OBD_OCD_VERSION_MINOR(marker->cm_vers),
2225                                 OBD_OCD_VERSION_PATCH(marker->cm_vers),
2226                                 OBD_OCD_VERSION_FIX(marker->cm_vers));
2227                 ptr += snprintf(ptr, end - ptr, ", createtime: %lld",
2228                                 marker->cm_createtime);
2229                 ptr += snprintf(ptr, end - ptr, ", canceltime: %lld",
2230                                 marker->cm_canceltime);
2231
2232                 goto out_done;
2233         }
2234
2235         for (i = 1; i < lcfg->lcfg_bufcount; i++) {
2236                 if (LUSTRE_CFG_BUFLEN(lcfg, i) > 0) {
2237                         ptr += snprintf(ptr, end - ptr, ", %s: %s",
2238                                         ldata->ltd_bufs[i - 1],
2239                                         lustre_cfg_string(lcfg, i));
2240                         if (end - ptr <= 0)
2241                                 goto out_overflow;
2242                 }
2243         }
2244
2245 out_done:
2246         ptr += snprintf(ptr, end - ptr, " }\n");
2247 out_overflow:
2248         /* Return consumed bytes.  If the buffer overflowed, zero last byte */
2249         rc = ptr - buf;
2250         if (rc > size) {
2251                 rc = -EOVERFLOW;
2252                 *(end - 1) = '\0';
2253         }
2254
2255         return rc;
2256 }
2257
2258 /**
2259  * parse config record and output dump in supplied buffer.
2260  * This is separated from class_config_dump_handler() to use
2261  * for ioctl needs as well
2262  */
2263 static int class_config_parse_rec(struct llog_rec_hdr *rec, char *buf, int size)
2264 {
2265         struct lustre_cfg       *lcfg = (struct lustre_cfg *)(rec + 1);
2266         char                    *ptr = buf;
2267         char                    *end = buf + size;
2268         int                      rc = 0;
2269
2270         ENTRY;
2271
2272         LASSERT(rec->lrh_type == OBD_CFG_REC);
2273         rc = lustre_cfg_sanity_check(lcfg, rec->lrh_len);
2274         if (rc < 0)
2275                 RETURN(rc);
2276
2277         ptr += snprintf(ptr, end-ptr, "cmd=%05x ", lcfg->lcfg_command);
2278         if (lcfg->lcfg_flags)
2279                 ptr += snprintf(ptr, end-ptr, "flags=%#08x ",
2280                                 lcfg->lcfg_flags);
2281
2282         if (lcfg->lcfg_num)
2283                 ptr += snprintf(ptr, end-ptr, "num=%#08x ", lcfg->lcfg_num);
2284
2285         if (lcfg->lcfg_nid) {
2286                 char nidstr[LNET_NIDSTR_SIZE];
2287
2288                 libcfs_nid2str_r(lcfg->lcfg_nid, nidstr, sizeof(nidstr));
2289                 ptr += snprintf(ptr, end-ptr, "nid=%s(%#llx)    ",
2290                                 nidstr, lcfg->lcfg_nid);
2291         }
2292
2293         if (lcfg->lcfg_command == LCFG_MARKER) {
2294                 struct cfg_marker *marker = lustre_cfg_buf(lcfg, 1);
2295
2296                 ptr += snprintf(ptr, end-ptr, "marker=%d(%#x)%s '%s'",
2297                                 marker->cm_step, marker->cm_flags,
2298                                 marker->cm_tgtname, marker->cm_comment);
2299         } else {
2300                 int i;
2301
2302                 for (i = 0; i <  lcfg->lcfg_bufcount; i++) {
2303                         ptr += snprintf(ptr, end-ptr, "%d:%s  ", i,
2304                                         lustre_cfg_string(lcfg, i));
2305                 }
2306         }
2307         ptr += snprintf(ptr, end - ptr, "\n");
2308         /* return consumed bytes */
2309         rc = ptr - buf;
2310         RETURN(rc);
2311 }
2312
2313 int class_config_dump_handler(const struct lu_env *env,
2314                               struct llog_handle *handle,
2315                               struct llog_rec_hdr *rec, void *data)
2316 {
2317         char *outstr;
2318         int rc = 0;
2319
2320         ENTRY;
2321
2322         OBD_ALLOC(outstr, 256);
2323         if (!outstr)
2324                 RETURN(-ENOMEM);
2325
2326         if (rec->lrh_type == OBD_CFG_REC) {
2327                 class_config_parse_rec(rec, outstr, 256);
2328                 LCONSOLE(D_WARNING, "   %s\n", outstr);
2329         } else {
2330                 LCONSOLE(D_WARNING, "unhandled lrh_type: %#x\n", rec->lrh_type);
2331                 rc = -EINVAL;
2332         }
2333
2334         OBD_FREE(outstr, 256);
2335         RETURN(rc);
2336 }
2337
2338 /**
2339  * Call class_cleanup and class_detach.
2340  * "Manual" only in the sense that we're faking lcfg commands.
2341  */
2342 int class_manual_cleanup(struct obd_device *obd)
2343 {
2344         char flags[3] = "";
2345         struct lustre_cfg *lcfg;
2346         struct lustre_cfg_bufs bufs;
2347         int rc;
2348
2349         ENTRY;
2350
2351         if (!obd) {
2352                 CERROR("empty cleanup\n");
2353                 RETURN(-EALREADY);
2354         }
2355
2356         if (obd->obd_force)
2357                 strlcat(flags, "F", sizeof(flags));
2358         if (obd->obd_fail)
2359                 strlcat(flags, "A", sizeof(flags));
2360
2361         CDEBUG(D_CONFIG, "Manual cleanup of %s (flags='%s')\n",
2362                obd->obd_name, flags);
2363
2364         lustre_cfg_bufs_reset(&bufs, obd->obd_name);
2365         lustre_cfg_bufs_set_string(&bufs, 1, flags);
2366         OBD_ALLOC(lcfg, lustre_cfg_len(bufs.lcfg_bufcount, bufs.lcfg_buflen));
2367         if (!lcfg)
2368                 RETURN(-ENOMEM);
2369         lustre_cfg_init(lcfg, LCFG_CLEANUP, &bufs);
2370
2371         rc = class_process_config(lcfg);
2372         if (rc) {
2373                 CERROR("cleanup failed %d: %s\n", rc, obd->obd_name);
2374                 GOTO(out, rc);
2375         }
2376
2377         /* the lcfg is almost the same for both ops */
2378         lcfg->lcfg_command = LCFG_DETACH;
2379         rc = class_process_config(lcfg);
2380         if (rc)
2381                 CERROR("detach failed %d: %s\n", rc, obd->obd_name);
2382 out:
2383         OBD_FREE(lcfg, lustre_cfg_len(lcfg->lcfg_bufcount, lcfg->lcfg_buflens));
2384         RETURN(rc);
2385 }
2386 EXPORT_SYMBOL(class_manual_cleanup);
2387
2388 #ifdef HAVE_SERVER_SUPPORT
2389 /*
2390  * nid<->nidstats hash operations
2391  */
2392 static unsigned int
2393 nidstats_hash(struct cfs_hash *hs, const void *key, const unsigned int bits)
2394 {
2395         return cfs_hash_djb2_hash(key, sizeof(struct lnet_nid), bits);
2396 }
2397
2398 static void *
2399 nidstats_key(struct hlist_node *hnode)
2400 {
2401         struct nid_stat *ns;
2402
2403         ns = hlist_entry(hnode, struct nid_stat, nid_hash);
2404
2405         return &ns->nid;
2406 }
2407
2408 static int
2409 nidstats_keycmp(const void *key, struct hlist_node *hnode)
2410 {
2411         return nid_same((struct lnet_nid *)nidstats_key(hnode),
2412                          (struct lnet_nid *)key);
2413 }
2414
2415 static void *
2416 nidstats_object(struct hlist_node *hnode)
2417 {
2418         return hlist_entry(hnode, struct nid_stat, nid_hash);
2419 }
2420
2421 static void
2422 nidstats_get(struct cfs_hash *hs, struct hlist_node *hnode)
2423 {
2424         struct nid_stat *ns;
2425
2426         ns = hlist_entry(hnode, struct nid_stat, nid_hash);
2427         nidstat_getref(ns);
2428 }
2429
2430 static void
2431 nidstats_put_locked(struct cfs_hash *hs, struct hlist_node *hnode)
2432 {
2433         struct nid_stat *ns;
2434
2435         ns = hlist_entry(hnode, struct nid_stat, nid_hash);
2436         nidstat_putref(ns);
2437 }
2438
2439 static struct cfs_hash_ops nid_stat_hash_ops = {
2440         .hs_hash        = nidstats_hash,
2441         .hs_key         = nidstats_key,
2442         .hs_keycmp      = nidstats_keycmp,
2443         .hs_object      = nidstats_object,
2444         .hs_get         = nidstats_get,
2445         .hs_put_locked  = nidstats_put_locked,
2446 };
2447
2448 /*
2449  * client_generation<->export hash operations
2450  */
2451
2452 static unsigned int
2453 gen_hash(struct cfs_hash *hs, const void *key, const unsigned int bits)
2454 {
2455         /* XXX did hash needs ? */
2456         return cfs_hash_djb2_hash(key, sizeof(__u32), bits);
2457 }
2458
2459 static void *
2460 gen_key(struct hlist_node *hnode)
2461 {
2462         struct obd_export *exp;
2463
2464         exp = hlist_entry(hnode, struct obd_export, exp_gen_hash);
2465
2466         RETURN(&exp->exp_target_data.ted_lcd->lcd_generation);
2467 }
2468
2469 /*
2470  * NOTE: It is impossible to find an export that is in failed
2471  *       state with this function
2472  */
2473 static int
2474 gen_kepcmp(const void *key, struct hlist_node *hnode)
2475 {
2476         struct obd_export *exp;
2477
2478         LASSERT(key);
2479         exp = hlist_entry(hnode, struct obd_export, exp_gen_hash);
2480
2481         RETURN(exp->exp_target_data.ted_lcd->lcd_generation == *(__u32 *)key &&
2482                !exp->exp_failed);
2483 }
2484
2485 static void *
2486 gen_export_object(struct hlist_node *hnode)
2487 {
2488         return hlist_entry(hnode, struct obd_export, exp_gen_hash);
2489 }
2490
2491 static void
2492 gen_export_get(struct cfs_hash *hs, struct hlist_node *hnode)
2493 {
2494         struct obd_export *exp;
2495
2496         exp = hlist_entry(hnode, struct obd_export, exp_gen_hash);
2497         class_export_get(exp);
2498 }
2499
2500 static void
2501 gen_export_put_locked(struct cfs_hash *hs, struct hlist_node *hnode)
2502 {
2503         struct obd_export *exp;
2504
2505         exp = hlist_entry(hnode, struct obd_export, exp_gen_hash);
2506         class_export_put(exp);
2507 }
2508
2509 static struct cfs_hash_ops gen_hash_ops = {
2510         .hs_hash        = gen_hash,
2511         .hs_key         = gen_key,
2512         .hs_keycmp      = gen_kepcmp,
2513         .hs_object      = gen_export_object,
2514         .hs_get         = gen_export_get,
2515         .hs_put_locked  = gen_export_put_locked,
2516 };
2517
2518 #endif /* HAVE_SERVER_SUPPORT */