Whamcloud - gitweb
LU-9679 lustre: use LIST_HEAD() for local lists.
[fs/lustre-release.git] / lustre / ptlrpc / sec_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) 2008, 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  * Lustre is a trademark of Sun Microsystems, Inc.
31  */
32
33 #define DEBUG_SUBSYSTEM S_SEC
34
35 #include <libcfs/libcfs.h>
36 #include <linux/crypto.h>
37 #include <linux/key.h>
38
39 #include <obd.h>
40 #include <obd_class.h>
41 #include <obd_support.h>
42 #include <lustre_net.h>
43 #include <lustre_import.h>
44 #include <lustre_log.h>
45 #include <lustre_disk.h>
46 #include <lustre_dlm.h>
47 #include <uapi/linux/lustre/lustre_param.h>
48 #include <lustre_sec.h>
49
50 #include "ptlrpc_internal.h"
51
52 const char *sptlrpc_part2name(enum lustre_sec_part part)
53 {
54         switch (part) {
55         case LUSTRE_SP_CLI:
56                 return "cli";
57         case LUSTRE_SP_MDT:
58                 return "mdt";
59         case LUSTRE_SP_OST:
60                 return "ost";
61         case LUSTRE_SP_MGC:
62                 return "mgc";
63         case LUSTRE_SP_MGS:
64                 return "mgs";
65         case LUSTRE_SP_ANY:
66                 return "any";
67         default:
68                 return "err";
69         }
70 }
71 EXPORT_SYMBOL(sptlrpc_part2name);
72
73 enum lustre_sec_part sptlrpc_target_sec_part(struct obd_device *obd)
74 {
75         const char *type = obd->obd_type->typ_name;
76
77         if (!strcmp(type, LUSTRE_MDT_NAME))
78                 return LUSTRE_SP_MDT;
79         if (!strcmp(type, LUSTRE_OST_NAME))
80                 return LUSTRE_SP_OST;
81         if (!strcmp(type, LUSTRE_MGS_NAME))
82                 return LUSTRE_SP_MGS;
83
84         CERROR("unknown target %p(%s)\n", obd, type);
85         return LUSTRE_SP_ANY;
86 }
87
88 /****************************************
89  * user supplied flavor string parsing  *
90  ****************************************/
91
92 /*
93  * format: <base_flavor>[-<bulk_type:alg_spec>]
94  */
95 int sptlrpc_parse_flavor(const char *str, struct sptlrpc_flavor *flvr)
96 {
97         char            buf[32];
98         char           *bulk, *alg;
99
100         memset(flvr, 0, sizeof(*flvr));
101
102         if (str == NULL || str[0] == '\0') {
103                 flvr->sf_rpc = SPTLRPC_FLVR_INVALID;
104                 return 0;
105         }
106
107         strlcpy(buf, str, sizeof(buf));
108
109         bulk = strchr(buf, '-');
110         if (bulk)
111                 *bulk++ = '\0';
112
113         flvr->sf_rpc = sptlrpc_name2flavor_base(buf);
114         if (flvr->sf_rpc == SPTLRPC_FLVR_INVALID)
115                 goto err_out;
116
117         /*
118          * currently only base flavor "plain" can have bulk specification.
119          */
120         if (flvr->sf_rpc == SPTLRPC_FLVR_PLAIN) {
121                 flvr->u_bulk.hash.hash_alg = BULK_HASH_ALG_ADLER32;
122                 if (bulk) {
123                         /*
124                          * format: plain-hash:<hash_alg>
125                          */
126                         alg = strchr(bulk, ':');
127                         if (alg == NULL)
128                                 goto err_out;
129                         *alg++ = '\0';
130
131                         if (strcmp(bulk, "hash"))
132                                 goto err_out;
133
134                         flvr->u_bulk.hash.hash_alg = sptlrpc_get_hash_alg(alg);
135                         if (flvr->u_bulk.hash.hash_alg >= BULK_HASH_ALG_MAX)
136                                 goto err_out;
137                 }
138
139                 if (flvr->u_bulk.hash.hash_alg == BULK_HASH_ALG_NULL)
140                         flvr_set_bulk_svc(&flvr->sf_rpc, SPTLRPC_BULK_SVC_NULL);
141                 else
142                         flvr_set_bulk_svc(&flvr->sf_rpc, SPTLRPC_BULK_SVC_INTG);
143         } else {
144                 if (bulk)
145                         goto err_out;
146         }
147
148         flvr->sf_flags = 0;
149         return 0;
150
151 err_out:
152         CERROR("invalid flavor string: %s\n", str);
153         return -EINVAL;
154 }
155 EXPORT_SYMBOL(sptlrpc_parse_flavor);
156
157 /****************************************
158  * configure rules                      *
159  ****************************************/
160
161 static void get_default_flavor(struct sptlrpc_flavor *sf)
162 {
163         memset(sf, 0, sizeof(*sf));
164
165         sf->sf_rpc = SPTLRPC_FLVR_NULL;
166         sf->sf_flags = 0;
167 }
168
169 static void sptlrpc_rule_init(struct sptlrpc_rule *rule)
170 {
171         rule->sr_netid = LNET_NIDNET(LNET_NID_ANY);
172         rule->sr_from = LUSTRE_SP_ANY;
173         rule->sr_to = LUSTRE_SP_ANY;
174         rule->sr_padding = 0;
175
176         get_default_flavor(&rule->sr_flvr);
177 }
178
179 /*
180  * format: network[.direction]=flavor
181  */
182 int sptlrpc_parse_rule(char *param, struct sptlrpc_rule *rule)
183 {
184         char           *flavor, *dir;
185         int             rc;
186
187         sptlrpc_rule_init(rule);
188
189         flavor = strchr(param, '=');
190         if (flavor == NULL) {
191                 CERROR("invalid param, no '='\n");
192                 RETURN(-EINVAL);
193         }
194         *flavor++ = '\0';
195
196         dir = strchr(param, '.');
197         if (dir)
198                 *dir++ = '\0';
199
200         /* 1.1 network */
201         if (strcmp(param, "default")) {
202                 rule->sr_netid = libcfs_str2net(param);
203                 if (rule->sr_netid == LNET_NIDNET(LNET_NID_ANY)) {
204                         CERROR("invalid network name: %s\n", param);
205                         RETURN(-EINVAL);
206                 }
207         }
208
209         /* 1.2 direction */
210         if (dir) {
211                 if (!strcmp(dir, "mdt2ost")) {
212                         rule->sr_from = LUSTRE_SP_MDT;
213                         rule->sr_to = LUSTRE_SP_OST;
214                 } else if (!strcmp(dir, "mdt2mdt")) {
215                         rule->sr_from = LUSTRE_SP_MDT;
216                         rule->sr_to = LUSTRE_SP_MDT;
217                 } else if (!strcmp(dir, "cli2ost")) {
218                         rule->sr_from = LUSTRE_SP_CLI;
219                         rule->sr_to = LUSTRE_SP_OST;
220                 } else if (!strcmp(dir, "cli2mdt")) {
221                         rule->sr_from = LUSTRE_SP_CLI;
222                         rule->sr_to = LUSTRE_SP_MDT;
223                 } else {
224                         CERROR("invalid rule dir segment: %s\n", dir);
225                         RETURN(-EINVAL);
226                 }
227         }
228
229         /* 2.1 flavor */
230         rc = sptlrpc_parse_flavor(flavor, &rule->sr_flvr);
231         if (rc)
232                 RETURN(-EINVAL);
233
234         RETURN(0);
235 }
236 EXPORT_SYMBOL(sptlrpc_parse_rule);
237
238 void sptlrpc_rule_set_free(struct sptlrpc_rule_set *rset)
239 {
240         LASSERT(rset->srs_nslot ||
241                 (rset->srs_nrule == 0 && rset->srs_rules == NULL));
242
243         if (rset->srs_nslot) {
244                 OBD_FREE(rset->srs_rules,
245                          rset->srs_nslot * sizeof(*rset->srs_rules));
246                 sptlrpc_rule_set_init(rset);
247         }
248 }
249 EXPORT_SYMBOL(sptlrpc_rule_set_free);
250
251 /*
252  * return 0 if the rule set could accomodate one more rule.
253  */
254 int sptlrpc_rule_set_expand(struct sptlrpc_rule_set *rset)
255 {
256         struct sptlrpc_rule *rules;
257         int nslot;
258
259         might_sleep();
260
261         if (rset->srs_nrule < rset->srs_nslot)
262                 return 0;
263
264         nslot = rset->srs_nslot + 8;
265
266         /* better use realloc() if available */
267         OBD_ALLOC(rules, nslot * sizeof(*rset->srs_rules));
268         if (rules == NULL)
269                 return -ENOMEM;
270
271         if (rset->srs_nrule) {
272                 LASSERT(rset->srs_nslot && rset->srs_rules);
273                 memcpy(rules, rset->srs_rules,
274                        rset->srs_nrule * sizeof(*rset->srs_rules));
275
276                 OBD_FREE(rset->srs_rules,
277                          rset->srs_nslot * sizeof(*rset->srs_rules));
278         }
279
280         rset->srs_rules = rules;
281         rset->srs_nslot = nslot;
282         return 0;
283 }
284
285 static inline int rule_spec_dir(struct sptlrpc_rule *rule)
286 {
287         return (rule->sr_from != LUSTRE_SP_ANY ||
288                 rule->sr_to != LUSTRE_SP_ANY);
289 }
290 static inline int rule_spec_net(struct sptlrpc_rule *rule)
291 {
292         return (rule->sr_netid != LNET_NIDNET(LNET_NID_ANY));
293 }
294 static inline int rule_match_dir(struct sptlrpc_rule *r1,
295                                  struct sptlrpc_rule *r2)
296 {
297         return (r1->sr_from == r2->sr_from && r1->sr_to == r2->sr_to);
298 }
299 static inline int rule_match_net(struct sptlrpc_rule *r1,
300                                  struct sptlrpc_rule *r2)
301 {
302         return (r1->sr_netid == r2->sr_netid);
303 }
304
305 /*
306  * merge @rule into @rset.
307  * the @rset slots might be expanded.
308  */
309 int sptlrpc_rule_set_merge(struct sptlrpc_rule_set *rset, 
310                            struct sptlrpc_rule *rule)
311 {
312         struct sptlrpc_rule      *p = rset->srs_rules;
313         int                       spec_dir, spec_net;
314         int                       rc, n, match = 0;
315
316         might_sleep();
317
318         spec_net = rule_spec_net(rule);
319         spec_dir = rule_spec_dir(rule);
320
321         for (n = 0; n < rset->srs_nrule; n++) {
322                 p = &rset->srs_rules[n]; 
323
324                 /* test network match, if failed:
325                  * - spec rule: skip rules which is also spec rule match, until
326                  *   we hit a wild rule, which means no more chance
327                  * - wild rule: skip until reach the one which is also wild
328                  *   and matches
329                  */
330                 if (!rule_match_net(p, rule)) {
331                         if (spec_net) {
332                                 if (rule_spec_net(p))
333                                         continue;
334                                 else
335                                         break;
336                         } else {
337                                 continue;
338                         }
339                 }
340
341                 /* test dir match, same logic as net matching */
342                 if (!rule_match_dir(p, rule)) {
343                         if (spec_dir) {
344                                 if (rule_spec_dir(p))
345                                         continue;
346                                 else
347                                         break;
348                         } else {
349                                 continue;
350                         }
351                 }
352
353                 /* find a match */
354                 match = 1;
355                 break;
356         }
357
358         if (match) {
359                 LASSERT(n >= 0 && n < rset->srs_nrule);
360
361                 if (rule->sr_flvr.sf_rpc == SPTLRPC_FLVR_INVALID) {
362                         /* remove this rule */
363                         if (n < rset->srs_nrule - 1)
364                                 memmove(&rset->srs_rules[n],
365                                         &rset->srs_rules[n + 1],
366                                         (rset->srs_nrule - n - 1) *
367                                         sizeof(*rule));
368                         rset->srs_nrule--;
369                 } else {
370                         /* override the rule */
371                         memcpy(&rset->srs_rules[n], rule, sizeof(*rule));
372                 }
373         } else {
374                 LASSERT(n >= 0 && n <= rset->srs_nrule);
375
376                 if (rule->sr_flvr.sf_rpc != SPTLRPC_FLVR_INVALID) {
377                         rc = sptlrpc_rule_set_expand(rset);
378                         if (rc)
379                                 return rc;
380
381                         if (n < rset->srs_nrule)
382                                 memmove(&rset->srs_rules[n + 1],
383                                         &rset->srs_rules[n],
384                                         (rset->srs_nrule - n) * sizeof(*rule));
385                         memcpy(&rset->srs_rules[n], rule, sizeof(*rule));
386                         rset->srs_nrule++;
387                 } else {
388                         CDEBUG(D_CONFIG, "ignore the unmatched deletion\n");
389                 }
390         }
391
392         return 0;
393 }
394 EXPORT_SYMBOL(sptlrpc_rule_set_merge);
395
396 /**
397  * given from/to/nid, determine a matching flavor in ruleset.
398  * return 1 if a match found, otherwise return 0.
399  */
400 int sptlrpc_rule_set_choose(struct sptlrpc_rule_set *rset,
401                             enum lustre_sec_part from,
402                             enum lustre_sec_part to,
403                             lnet_nid_t nid,
404                             struct sptlrpc_flavor *sf)
405 {
406         struct sptlrpc_rule    *r;
407         int                     n;
408
409         for (n = 0; n < rset->srs_nrule; n++) {
410                 r = &rset->srs_rules[n];
411
412                 if (LNET_NIDNET(nid) != LNET_NIDNET(LNET_NID_ANY) &&
413                     r->sr_netid != LNET_NIDNET(LNET_NID_ANY) &&
414                     LNET_NIDNET(nid) != r->sr_netid)
415                         continue;
416
417                 if (from != LUSTRE_SP_ANY && r->sr_from != LUSTRE_SP_ANY &&
418                     from != r->sr_from)
419                         continue;
420
421                 if (to != LUSTRE_SP_ANY && r->sr_to != LUSTRE_SP_ANY &&
422                     to != r->sr_to)
423                         continue;
424
425                 *sf = r->sr_flvr;
426                 return 1;
427         }
428
429         return 0;
430 }
431
432 void sptlrpc_rule_set_dump(struct sptlrpc_rule_set *rset)
433 {
434         struct sptlrpc_rule *r;
435         int     n;
436
437         for (n = 0; n < rset->srs_nrule; n++) {
438                 r = &rset->srs_rules[n];
439                 CDEBUG(D_SEC, "<%02d> from %x to %x, net %x, rpc %x\n", n,
440                        r->sr_from, r->sr_to, r->sr_netid, r->sr_flvr.sf_rpc);
441         }
442 }
443
444 static int sptlrpc_rule_set_extract(struct sptlrpc_rule_set *gen,
445                                     struct sptlrpc_rule_set *tgt,
446                                     enum lustre_sec_part from,
447                                     enum lustre_sec_part to,
448                                     struct sptlrpc_rule_set *rset)
449 {
450         struct sptlrpc_rule_set *src[2] = { gen, tgt };
451         struct sptlrpc_rule     *rule;
452         int                      i, n, rc;
453
454         might_sleep();
455
456         /* merge general rules firstly, then target-specific rules */
457         for (i = 0; i < 2; i++) {
458                 if (src[i] == NULL)
459                         continue;
460
461                 for (n = 0; n < src[i]->srs_nrule; n++) {
462                         rule = &src[i]->srs_rules[n];
463
464                         if (from != LUSTRE_SP_ANY &&
465                             rule->sr_from != LUSTRE_SP_ANY &&
466                             rule->sr_from != from)
467                                 continue;
468                         if (to != LUSTRE_SP_ANY &&
469                             rule->sr_to != LUSTRE_SP_ANY &&
470                             rule->sr_to != to)
471                                 continue;
472
473                         rc = sptlrpc_rule_set_merge(rset, rule);
474                         if (rc) {
475                                 CERROR("can't merge: %d\n", rc);
476                                 return rc;
477                         }
478                 }
479         }
480
481         return 0;
482 }
483
484 /**********************************
485  * sptlrpc configuration support  *
486  **********************************/
487
488 struct sptlrpc_conf_tgt {
489         struct list_head              sct_list;
490         char                    sct_name[MAX_OBD_NAME];
491         struct sptlrpc_rule_set sct_rset;
492 };
493
494 struct sptlrpc_conf {
495         struct list_head        sc_list;
496         char                    sc_fsname[MTI_NAME_MAXLEN];
497         unsigned int            sc_modified;    /* modified during updating */
498         unsigned int            sc_updated:1,   /* updated copy from MGS */
499                                 sc_local:1;     /* local copy from target */
500         struct sptlrpc_rule_set sc_rset;        /* fs general rules */
501         struct list_head        sc_tgts;        /* target-specific rules */
502 };
503
504 static struct mutex sptlrpc_conf_lock;
505 static LIST_HEAD(sptlrpc_confs);
506
507 static void sptlrpc_conf_free_rsets(struct sptlrpc_conf *conf)
508 {
509         struct sptlrpc_conf_tgt *conf_tgt, *conf_tgt_next;
510
511         sptlrpc_rule_set_free(&conf->sc_rset);
512
513         list_for_each_entry_safe(conf_tgt, conf_tgt_next,
514                                  &conf->sc_tgts, sct_list) {
515                 sptlrpc_rule_set_free(&conf_tgt->sct_rset);
516                 list_del(&conf_tgt->sct_list);
517                 OBD_FREE_PTR(conf_tgt);
518         }
519         LASSERT(list_empty(&conf->sc_tgts));
520
521         conf->sc_updated = 0;
522         conf->sc_local = 0;
523 }
524
525 static void sptlrpc_conf_free(struct sptlrpc_conf *conf)
526 {
527         CDEBUG(D_SEC, "free sptlrpc conf %s\n", conf->sc_fsname);
528
529         sptlrpc_conf_free_rsets(conf);
530         list_del(&conf->sc_list);
531         OBD_FREE_PTR(conf);
532 }
533
534 static
535 struct sptlrpc_conf_tgt *sptlrpc_conf_get_tgt(struct sptlrpc_conf *conf,
536                                               const char *name,
537                                               int create)
538 {
539         struct sptlrpc_conf_tgt *conf_tgt;
540
541         list_for_each_entry(conf_tgt, &conf->sc_tgts, sct_list) {
542                 if (strcmp(conf_tgt->sct_name, name) == 0)
543                         return conf_tgt;
544         }
545
546         if (!create)
547                 return NULL;
548
549         OBD_ALLOC_PTR(conf_tgt);
550         if (conf_tgt) {
551                 strlcpy(conf_tgt->sct_name, name, sizeof(conf_tgt->sct_name));
552                 sptlrpc_rule_set_init(&conf_tgt->sct_rset);
553                 list_add(&conf_tgt->sct_list, &conf->sc_tgts);
554         }
555
556         return conf_tgt;
557 }
558
559 static
560 struct sptlrpc_conf *sptlrpc_conf_get(const char *fsname,
561                                       int create)
562 {
563         struct sptlrpc_conf *conf;
564
565         list_for_each_entry(conf, &sptlrpc_confs, sc_list) {
566                 if (strcmp(conf->sc_fsname, fsname) == 0)
567                         return conf;
568         }
569
570         if (!create)
571                 return NULL;
572
573         OBD_ALLOC_PTR(conf);
574         if (conf == NULL)
575                 return NULL;
576
577         if (strlcpy(conf->sc_fsname, fsname, sizeof(conf->sc_fsname)) >=
578             sizeof(conf->sc_fsname)) {
579                 OBD_FREE_PTR(conf);
580                 return NULL;
581         }
582         sptlrpc_rule_set_init(&conf->sc_rset);
583         INIT_LIST_HEAD(&conf->sc_tgts);
584         list_add(&conf->sc_list, &sptlrpc_confs);
585
586         CDEBUG(D_SEC, "create sptlrpc conf %s\n", conf->sc_fsname);
587         return conf;
588 }
589
590 /**
591  * caller must hold conf_lock already.
592  */
593 static int sptlrpc_conf_merge_rule(struct sptlrpc_conf *conf,
594                                    const char *target,
595                                    struct sptlrpc_rule *rule)
596 {
597         struct sptlrpc_conf_tgt  *conf_tgt;
598         struct sptlrpc_rule_set  *rule_set;
599
600         /* fsname == target means general rules for the whole fs */
601         if (strcmp(conf->sc_fsname, target) == 0) {
602                 rule_set = &conf->sc_rset;
603         } else {
604                 conf_tgt = sptlrpc_conf_get_tgt(conf, target, 1);
605                 if (conf_tgt) {
606                         rule_set = &conf_tgt->sct_rset;
607                 } else {
608                         CERROR("out of memory, can't merge rule!\n");
609                         return -ENOMEM;
610                 }
611         }
612
613         return sptlrpc_rule_set_merge(rule_set, rule);
614 }
615
616 /**
617  * process one LCFG_SPTLRPC_CONF record. if \a conf is NULL, we
618  * find one through the target name in the record inside conf_lock;
619  * otherwise means caller already hold conf_lock.
620  */
621 static int __sptlrpc_process_config(char *target, const char *fsname,
622                                     struct sptlrpc_rule *rule,
623                                     struct sptlrpc_conf *conf)
624 {
625         int rc;
626
627         ENTRY;
628         if (!conf) {
629                 if (!fsname)
630                         return -ENODEV;
631
632                 mutex_lock(&sptlrpc_conf_lock);
633                 conf = sptlrpc_conf_get(fsname, 0);
634                 if (!conf) {
635                         CERROR("can't find conf\n");
636                         rc = -ENOMEM;
637                 } else {
638                         rc = sptlrpc_conf_merge_rule(conf, target, rule);
639                 }
640                 mutex_unlock(&sptlrpc_conf_lock);
641         } else {
642                 LASSERT(mutex_is_locked(&sptlrpc_conf_lock));
643                 rc = sptlrpc_conf_merge_rule(conf, target, rule);
644         }
645
646         if (!rc)
647                 conf->sc_modified++;
648
649         RETURN(rc);
650 }
651
652 int sptlrpc_process_config(struct lustre_cfg *lcfg)
653 {
654         char fsname[MTI_NAME_MAXLEN];
655         struct sptlrpc_rule rule;
656         char *target, *param;
657         int rc;
658
659         print_lustre_cfg(lcfg);
660
661         target = lustre_cfg_string(lcfg, 1);
662         if (!target) {
663                 CERROR("missing target name\n");
664                 return -EINVAL;
665         }
666
667         param = lustre_cfg_string(lcfg, 2);
668         if (!param) {
669                 CERROR("missing parameter\n");
670                 return -EINVAL;
671         }
672
673         /* parse rule to make sure the format is correct */
674         if (strncmp(param, PARAM_SRPC_FLVR,
675                     sizeof(PARAM_SRPC_FLVR) - 1) != 0) {
676                 CERROR("Invalid sptlrpc parameter: %s\n", param);
677                 return -EINVAL;
678         }
679         param += sizeof(PARAM_SRPC_FLVR) - 1;
680
681         CDEBUG(D_SEC, "processing rule: %s.%s\n", target, param);
682
683         /*
684          * Three types of targets exist for sptlrpc using conf_param
685          * 1.   '_mgs' which targets mgc srpc settings. Treat it as
686          *      as a special file system name.
687          * 2.   target is a device which can be fsname-MDTXXXX or
688          *      fsname-OSTXXXX. This can be verified by the function
689          *      server_name2fsname.
690          * 3.   If both above conditions are not meet then the target
691          *      is a actual filesystem.
692          */
693         if (server_name2fsname(target, fsname, NULL))
694                 strlcpy(fsname, target, sizeof(target));
695
696         rc = sptlrpc_parse_rule(param, &rule);
697         if (rc)
698                 return rc;
699
700         return __sptlrpc_process_config(target, fsname, &rule, NULL);
701 }
702 EXPORT_SYMBOL(sptlrpc_process_config);
703
704 static int logname2fsname(const char *logname, char *buf, int buflen)
705 {
706         char   *ptr;
707         int     len;
708
709         ptr = strrchr(logname, '-');
710         if (ptr == NULL || strcmp(ptr, "-sptlrpc")) {
711                 CERROR("%s is not a sptlrpc config log\n", logname);
712                 return -EINVAL;
713         }
714
715         len = min((int) (ptr - logname), buflen - 1);
716
717         memcpy(buf, logname, len);
718         buf[len] = '\0';
719         return 0;
720 }
721
722 void sptlrpc_conf_log_update_begin(const char *logname)
723 {
724         struct sptlrpc_conf *conf;
725         char                 fsname[16];
726
727         if (logname2fsname(logname, fsname, sizeof(fsname)))
728                 return;
729
730         mutex_lock(&sptlrpc_conf_lock);
731
732         conf = sptlrpc_conf_get(fsname, 0);
733         if (conf) {
734                 if (conf->sc_local) {
735                         LASSERT(conf->sc_updated == 0);
736                         sptlrpc_conf_free_rsets(conf);
737                 }
738                 conf->sc_modified = 0;
739         }
740
741         mutex_unlock(&sptlrpc_conf_lock);
742 }
743 EXPORT_SYMBOL(sptlrpc_conf_log_update_begin);
744
745 /**
746  * mark a config log has been updated
747  */
748 void sptlrpc_conf_log_update_end(const char *logname)
749 {
750         struct sptlrpc_conf *conf;
751         char                 fsname[16];
752
753         if (logname2fsname(logname, fsname, sizeof(fsname)))
754                 return;
755
756         mutex_lock(&sptlrpc_conf_lock);
757
758         conf = sptlrpc_conf_get(fsname, 0);
759         if (conf) {
760                 /*
761                  * if original state is not updated, make sure the
762                  * modified counter > 0 to enforce updating local copy.
763                  */
764                 if (conf->sc_updated == 0)
765                         conf->sc_modified++;
766
767                 conf->sc_updated = 1;
768         }
769
770         mutex_unlock(&sptlrpc_conf_lock);
771 }
772 EXPORT_SYMBOL(sptlrpc_conf_log_update_end);
773
774 void sptlrpc_conf_log_start(const char *logname)
775 {
776         char                 fsname[16];
777
778         if (logname2fsname(logname, fsname, sizeof(fsname)))
779                 return;
780
781         mutex_lock(&sptlrpc_conf_lock);
782         sptlrpc_conf_get(fsname, 1);
783         mutex_unlock(&sptlrpc_conf_lock);
784 }
785 EXPORT_SYMBOL(sptlrpc_conf_log_start);
786
787 void sptlrpc_conf_log_stop(const char *logname)
788 {
789         struct sptlrpc_conf *conf;
790         char                 fsname[16];
791
792         if (logname2fsname(logname, fsname, sizeof(fsname)))
793                 return;
794
795         mutex_lock(&sptlrpc_conf_lock);
796         conf = sptlrpc_conf_get(fsname, 0);
797         if (conf)
798                 sptlrpc_conf_free(conf);
799         mutex_unlock(&sptlrpc_conf_lock);
800 }
801 EXPORT_SYMBOL(sptlrpc_conf_log_stop);
802
803 static void inline flavor_set_flags(struct sptlrpc_flavor *sf,
804                                     enum lustre_sec_part from,
805                                     enum lustre_sec_part to,
806                                     unsigned int fl_udesc)
807 {
808         /*
809          * null flavor doesn't need to set any flavor, and in fact
810          * we'd better not do that because everybody share a single sec.
811          */
812         if (sf->sf_rpc == SPTLRPC_FLVR_NULL)
813                 return;
814
815         if (from == LUSTRE_SP_MDT) {
816                 /* MDT->MDT; MDT->OST */
817                 sf->sf_flags |= PTLRPC_SEC_FL_ROOTONLY;
818         } else if (from == LUSTRE_SP_CLI && to == LUSTRE_SP_OST) {
819                 /* CLI->OST */
820                 sf->sf_flags |= PTLRPC_SEC_FL_ROOTONLY | PTLRPC_SEC_FL_BULK;
821         } else if (from == LUSTRE_SP_CLI && to == LUSTRE_SP_MDT) {
822                 /* CLI->MDT */
823                 if (fl_udesc && sf->sf_rpc != SPTLRPC_FLVR_NULL)
824                         sf->sf_flags |= PTLRPC_SEC_FL_UDESC;
825         }
826
827         /* Some flavors use a single uid (0) context */
828         if (flvr_is_rootonly(sf->sf_rpc))
829                 sf->sf_flags |= PTLRPC_SEC_FL_ROOTONLY;
830
831         /* User descriptor might need to be cleared */
832         if (flvr_allows_user_desc(sf->sf_rpc) == 0)
833                 sf->sf_flags &= ~PTLRPC_SEC_FL_UDESC;
834 }
835
836 void sptlrpc_conf_choose_flavor(enum lustre_sec_part from,
837                                 enum lustre_sec_part to,
838                                 struct obd_uuid *target,
839                                 lnet_nid_t nid,
840                                 struct sptlrpc_flavor *sf)
841 {
842         struct sptlrpc_conf     *conf;
843         struct sptlrpc_conf_tgt *conf_tgt;
844         char                     name[MTI_NAME_MAXLEN];
845         int                      len, rc = 0;
846
847         obd_uuid2fsname(name, target->uuid, sizeof(name));
848
849         mutex_lock(&sptlrpc_conf_lock);
850
851         conf = sptlrpc_conf_get(name, 0);
852         if (conf == NULL)
853                 goto out;
854
855         /* convert uuid name (supposed end with _UUID) to target name */
856         len = strlen(target->uuid);
857         LASSERT(len > 5);
858         memcpy(name, target->uuid, len - 5);
859         name[len - 5] = '\0';
860
861         conf_tgt = sptlrpc_conf_get_tgt(conf, name, 0);
862         if (conf_tgt) {
863                 rc = sptlrpc_rule_set_choose(&conf_tgt->sct_rset,
864                                              from, to, nid, sf);
865                 if (rc)
866                         goto out;
867         }
868
869         rc = sptlrpc_rule_set_choose(&conf->sc_rset, from, to, nid, sf);
870 out:
871         mutex_unlock(&sptlrpc_conf_lock);
872
873         if (rc == 0)
874                 get_default_flavor(sf);
875
876         flavor_set_flags(sf, from, to, 1);
877 }
878
879 /**
880  * called by target devices, determine the expected flavor from
881  * certain peer (from, nid).
882  */
883 void sptlrpc_target_choose_flavor(struct sptlrpc_rule_set *rset,
884                                   enum lustre_sec_part from,
885                                   lnet_nid_t nid,
886                                   struct sptlrpc_flavor *sf)
887 {
888         if (sptlrpc_rule_set_choose(rset, from, LUSTRE_SP_ANY, nid, sf) == 0)
889                 get_default_flavor(sf);
890 }
891
892 #define SEC_ADAPT_DELAY         (10)
893
894 /**
895  * called by client devices, notify the sptlrpc config has changed and
896  * do import_sec_adapt later.
897  */
898 void sptlrpc_conf_client_adapt(struct obd_device *obd)
899 {
900         struct obd_import  *imp;
901         ENTRY;
902
903         LASSERT(strcmp(obd->obd_type->typ_name, LUSTRE_MDC_NAME) == 0 ||
904                 strcmp(obd->obd_type->typ_name, LUSTRE_OSC_NAME) == 0 ||
905                 strcmp(obd->obd_type->typ_name, LUSTRE_OSP_NAME) == 0 ||
906                 strcmp(obd->obd_type->typ_name, LUSTRE_LWP_NAME) == 0);
907         CDEBUG(D_SEC, "obd %s\n", obd->u.cli.cl_target_uuid.uuid);
908
909         /* serialize with connect/disconnect import */
910         down_read_nested(&obd->u.cli.cl_sem, OBD_CLI_SEM_MDCOSC);
911
912         imp = obd->u.cli.cl_import;
913         if (imp) {
914                 write_lock(&imp->imp_sec_lock);
915                 if (imp->imp_sec)
916                         imp->imp_sec_expire = ktime_get_real_seconds() +
917                                 SEC_ADAPT_DELAY;
918                 write_unlock(&imp->imp_sec_lock);
919         }
920
921         up_read(&obd->u.cli.cl_sem);
922         EXIT;
923 }
924 EXPORT_SYMBOL(sptlrpc_conf_client_adapt);
925
926 /**
927  * called by target devices, extract sptlrpc rules which applies to
928  * this target, to be used for future rpc flavor checking.
929  */
930 int sptlrpc_conf_target_get_rules(struct obd_device *obd,
931                                   struct sptlrpc_rule_set *rset)
932 {
933         struct sptlrpc_conf *conf;
934         struct sptlrpc_conf_tgt *conf_tgt;
935         enum lustre_sec_part sp_dst;
936         char fsname[MTI_NAME_MAXLEN];
937         int rc = 0;
938         ENTRY;
939
940         if (strcmp(obd->obd_type->typ_name, LUSTRE_MDT_NAME) == 0) {
941                 sp_dst = LUSTRE_SP_MDT;
942         } else if (strcmp(obd->obd_type->typ_name, LUSTRE_OST_NAME) == 0) {
943                 sp_dst = LUSTRE_SP_OST;
944         } else {
945                 CERROR("unexpected obd type %s\n", obd->obd_type->typ_name);
946                 RETURN(-EINVAL);
947         }
948
949         obd_uuid2fsname(fsname, obd->obd_uuid.uuid, sizeof(fsname));
950
951         mutex_lock(&sptlrpc_conf_lock);
952         conf = sptlrpc_conf_get(fsname, 0);
953         if (conf == NULL) {
954                 CERROR("missing sptlrpc config log\n");
955                 rc = -EFAULT;
956         } else {
957                 /* extract rule set for this target */
958                 conf_tgt = sptlrpc_conf_get_tgt(conf, obd->obd_name, 0);
959
960                 rc = sptlrpc_rule_set_extract(&conf->sc_rset,
961                                       conf_tgt ? &conf_tgt->sct_rset : NULL,
962                                       LUSTRE_SP_ANY, sp_dst, rset);
963         }
964         mutex_unlock(&sptlrpc_conf_lock);
965
966         RETURN(rc);
967 }
968
969 int  sptlrpc_conf_init(void)
970 {
971         mutex_init(&sptlrpc_conf_lock);
972         return 0;
973 }
974
975 void sptlrpc_conf_fini(void)
976 {
977         struct sptlrpc_conf  *conf, *conf_next;
978
979         mutex_lock(&sptlrpc_conf_lock);
980         list_for_each_entry_safe(conf, conf_next, &sptlrpc_confs, sc_list)
981                 sptlrpc_conf_free(conf);
982         LASSERT(list_empty(&sptlrpc_confs));
983         mutex_unlock(&sptlrpc_conf_lock);
984 }