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