Whamcloud - gitweb
LU-9859 lustre: remove current_pid() and current_comm()
[fs/lustre-release.git] / lustre / ptlrpc / gss / gss_mech_switch.c
1 /*
2  * Modifications for Lustre
3  *
4  * Copyright (c) 2007, 2010, Oracle and/or its affiliates. All rights reserved.
5  *
6  * Copyright (c) 2012, Intel Corporation.
7  *
8  * Author: Eric Mei <ericm@clusterfs.com>
9  */
10
11 /*
12  *  linux/net/sunrpc/gss_mech_switch.c
13  *
14  *  Copyright (c) 2001 The Regents of the University of Michigan.
15  *  All rights reserved.
16  *
17  *  J. Bruce Fields   <bfields@umich.edu>
18  *
19  *  Redistribution and use in source and binary forms, with or without
20  *  modification, are permitted provided that the following conditions
21  *  are met:
22  *
23  *  1. Redistributions of source code must retain the above copyright
24  *     notice, this list of conditions and the following disclaimer.
25  *  2. Redistributions in binary form must reproduce the above copyright
26  *     notice, this list of conditions and the following disclaimer in the
27  *     documentation and/or other materials provided with the distribution.
28  *  3. Neither the name of the University nor the names of its
29  *     contributors may be used to endorse or promote products derived
30  *     from this software without specific prior written permission.
31  *
32  *  THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED
33  *  WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
34  *  MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
35  *  DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
36  *  FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
37  *  CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
38  *  SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR
39  *  BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
40  *  LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
41  *  NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
42  *  SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
43  *
44  */
45
46 #define DEBUG_SUBSYSTEM S_SEC
47 #include <linux/init.h>
48 #include <linux/module.h>
49 #include <linux/slab.h>
50 #include <linux/mutex.h>
51
52 #include <obd.h>
53 #include <obd_class.h>
54 #include <obd_support.h>
55 #include <lustre_net.h>
56 #include <lustre_import.h>
57 #include <lustre_sec.h>
58
59 #include "gss_err.h"
60 #include "gss_internal.h"
61 #include "gss_api.h"
62 #include "gss_crypto.h"
63
64 static LIST_HEAD(registered_mechs);
65 static DEFINE_SPINLOCK(registered_mechs_lock);
66
67 int lgss_mech_register(struct gss_api_mech *gm)
68 {
69         spin_lock(&registered_mechs_lock);
70         list_add(&gm->gm_list, &registered_mechs);
71         spin_unlock(&registered_mechs_lock);
72         CDEBUG(D_SEC, "register %s mechanism\n", gm->gm_name);
73         return 0;
74 }
75
76 void lgss_mech_unregister(struct gss_api_mech *gm)
77 {
78         spin_lock(&registered_mechs_lock);
79         list_del(&gm->gm_list);
80         spin_unlock(&registered_mechs_lock);
81         CDEBUG(D_SEC, "Unregister %s mechanism\n", gm->gm_name);
82 }
83
84
85 struct gss_api_mech *lgss_mech_get(struct gss_api_mech *gm)
86 {
87         __module_get(gm->gm_owner);
88         return gm;
89 }
90
91 struct gss_api_mech *lgss_name_to_mech(char *name)
92 {
93         struct gss_api_mech *pos, *gm = NULL;
94
95         spin_lock(&registered_mechs_lock);
96         list_for_each_entry(pos, &registered_mechs, gm_list) {
97                 if (0 == strcmp(name, pos->gm_name)) {
98                         if (!try_module_get(pos->gm_owner))
99                                 continue;
100                         gm = pos;
101                         break;
102                 }
103         }
104         spin_unlock(&registered_mechs_lock);
105         return gm;
106
107 }
108
109 static inline
110 int mech_supports_subflavor(struct gss_api_mech *gm, __u32 subflavor)
111 {
112         int i;
113
114         for (i = 0; i < gm->gm_sf_num; i++) {
115                 if (gm->gm_sfs[i].sf_subflavor == subflavor)
116                         return 1;
117         }
118         return 0;
119 }
120
121 struct gss_api_mech *lgss_subflavor_to_mech(__u32 subflavor)
122 {
123         struct gss_api_mech *pos, *gm = NULL;
124
125         spin_lock(&registered_mechs_lock);
126         list_for_each_entry(pos, &registered_mechs, gm_list) {
127                 if (!try_module_get(pos->gm_owner))
128                         continue;
129                 if (!mech_supports_subflavor(pos, subflavor)) {
130                         module_put(pos->gm_owner);
131                         continue;
132                 }
133                 gm = pos;
134                 break;
135         }
136         spin_unlock(&registered_mechs_lock);
137         return gm;
138 }
139
140 void lgss_mech_put(struct gss_api_mech *gm)
141 {
142         module_put(gm->gm_owner);
143 }
144
145 /* The mech could probably be determined from the token instead, but it's just
146  * as easy for now to pass it in. */
147 __u32 lgss_import_sec_context(rawobj_t *input_token,
148                               struct gss_api_mech *mech,
149                               struct gss_ctx **ctx_id)
150 {
151         OBD_ALLOC_PTR(*ctx_id);
152         if (*ctx_id == NULL)
153                 return GSS_S_FAILURE;
154
155         (*ctx_id)->mech_type = lgss_mech_get(mech);
156         (*ctx_id)->hash_func = gss_digest_hash;
157
158         LASSERT(mech);
159         LASSERT(mech->gm_ops);
160         LASSERT(mech->gm_ops->gss_import_sec_context);
161         return mech->gm_ops->gss_import_sec_context(input_token, *ctx_id);
162 }
163
164 __u32 lgss_copy_reverse_context(struct gss_ctx *ctx_id,
165                                 struct gss_ctx **ctx_id_new)
166 {
167         struct gss_api_mech *mech = ctx_id->mech_type;
168         __u32                major;
169
170         LASSERT(mech);
171
172         OBD_ALLOC_PTR(*ctx_id_new);
173         if (*ctx_id_new == NULL)
174                 return GSS_S_FAILURE;
175
176         (*ctx_id_new)->mech_type = lgss_mech_get(mech);
177         (*ctx_id_new)->hash_func = ctx_id->hash_func;
178
179         LASSERT(mech);
180         LASSERT(mech->gm_ops);
181         LASSERT(mech->gm_ops->gss_copy_reverse_context);
182
183         major = mech->gm_ops->gss_copy_reverse_context(ctx_id, *ctx_id_new);
184         if (major != GSS_S_COMPLETE) {
185                 lgss_mech_put(mech);
186                 OBD_FREE_PTR(*ctx_id_new);
187                 *ctx_id_new = NULL;
188         }
189         return major;
190 }
191
192 /*
193  * this interface is much simplified, currently we only need endtime.
194  */
195 __u32 lgss_inquire_context(struct gss_ctx *context_handle,
196                            time64_t *endtime)
197 {
198         LASSERT(context_handle);
199         LASSERT(context_handle->mech_type);
200         LASSERT(context_handle->mech_type->gm_ops);
201         LASSERT(context_handle->mech_type->gm_ops->gss_inquire_context);
202
203         return context_handle->mech_type->gm_ops
204                 ->gss_inquire_context(context_handle,
205                                       endtime);
206 }
207
208 /* gss_get_mic: compute a mic over message and return mic_token. */
209 __u32 lgss_get_mic(struct gss_ctx *context_handle,
210                    int msgcnt,
211                    rawobj_t *msg,
212                    int iovcnt,
213                    lnet_kiov_t *iovs,
214                    rawobj_t *mic_token)
215 {
216         LASSERT(context_handle);
217         LASSERT(context_handle->mech_type);
218         LASSERT(context_handle->mech_type->gm_ops);
219         LASSERT(context_handle->mech_type->gm_ops->gss_get_mic);
220
221         return context_handle->mech_type->gm_ops
222                 ->gss_get_mic(context_handle,
223                               msgcnt,
224                               msg,
225                               iovcnt,
226                               iovs,
227                               mic_token);
228 }
229
230 /* gss_verify_mic: check whether the provided mic_token verifies message. */
231 __u32 lgss_verify_mic(struct gss_ctx *context_handle,
232                       int msgcnt,
233                       rawobj_t *msg,
234                       int iovcnt,
235                       lnet_kiov_t *iovs,
236                       rawobj_t *mic_token)
237 {
238         LASSERT(context_handle);
239         LASSERT(context_handle->mech_type);
240         LASSERT(context_handle->mech_type->gm_ops);
241         LASSERT(context_handle->mech_type->gm_ops->gss_verify_mic);
242
243         return context_handle->mech_type->gm_ops
244                 ->gss_verify_mic(context_handle,
245                                  msgcnt,
246                                  msg,
247                                  iovcnt,
248                                  iovs,
249                                  mic_token);
250 }
251
252 __u32 lgss_wrap(struct gss_ctx *context_handle,
253                 rawobj_t *gsshdr,
254                 rawobj_t *msg,
255                 int msg_buflen,
256                 rawobj_t *out_token)
257 {
258         LASSERT(context_handle);
259         LASSERT(context_handle->mech_type);
260         LASSERT(context_handle->mech_type->gm_ops);
261         LASSERT(context_handle->mech_type->gm_ops->gss_wrap);
262
263         return context_handle->mech_type->gm_ops
264                 ->gss_wrap(context_handle, gsshdr, msg, msg_buflen, out_token);
265 }
266
267 __u32 lgss_unwrap(struct gss_ctx *context_handle,
268                   rawobj_t *gsshdr,
269                   rawobj_t *token,
270                   rawobj_t *out_msg)
271 {
272         LASSERT(context_handle);
273         LASSERT(context_handle->mech_type);
274         LASSERT(context_handle->mech_type->gm_ops);
275         LASSERT(context_handle->mech_type->gm_ops->gss_unwrap);
276
277         return context_handle->mech_type->gm_ops
278                 ->gss_unwrap(context_handle, gsshdr, token, out_msg);
279 }
280
281
282 __u32 lgss_prep_bulk(struct gss_ctx *context_handle,
283                      struct ptlrpc_bulk_desc *desc)
284 {
285         LASSERT(context_handle);
286         LASSERT(context_handle->mech_type);
287         LASSERT(context_handle->mech_type->gm_ops);
288         LASSERT(context_handle->mech_type->gm_ops->gss_prep_bulk);
289
290         return context_handle->mech_type->gm_ops
291                 ->gss_prep_bulk(context_handle, desc);
292 }
293
294 __u32 lgss_wrap_bulk(struct gss_ctx *context_handle,
295                      struct ptlrpc_bulk_desc *desc,
296                      rawobj_t *token,
297                      int adj_nob)
298 {
299         LASSERT(context_handle);
300         LASSERT(context_handle->mech_type);
301         LASSERT(context_handle->mech_type->gm_ops);
302         LASSERT(context_handle->mech_type->gm_ops->gss_wrap_bulk);
303
304         return context_handle->mech_type->gm_ops
305                 ->gss_wrap_bulk(context_handle, desc, token, adj_nob);
306 }
307
308 __u32 lgss_unwrap_bulk(struct gss_ctx *context_handle,
309                        struct ptlrpc_bulk_desc *desc,
310                        rawobj_t *token,
311                        int adj_nob)
312 {
313         LASSERT(context_handle);
314         LASSERT(context_handle->mech_type);
315         LASSERT(context_handle->mech_type->gm_ops);
316         LASSERT(context_handle->mech_type->gm_ops->gss_unwrap_bulk);
317
318         return context_handle->mech_type->gm_ops
319                 ->gss_unwrap_bulk(context_handle, desc, token, adj_nob);
320 }
321
322 /* gss_delete_sec_context: free all resources associated with context_handle.
323  * Note this differs from the RFC 2744-specified prototype in that we don't
324  * bother returning an output token, since it would never be used anyway. */
325
326 __u32 lgss_delete_sec_context(struct gss_ctx **context_handle)
327 {
328         struct gss_api_mech *mech;
329
330         if (!*context_handle)
331                 return GSS_S_NO_CONTEXT;
332
333         CDEBUG(D_SEC, "deleting %p\n", *context_handle);
334
335         mech = (*context_handle)->mech_type;
336         if ((*context_handle)->internal_ctx_id != NULL) {
337                 LASSERT(mech);
338                 LASSERT(mech->gm_ops);
339                 LASSERT(mech->gm_ops->gss_delete_sec_context);
340                 mech->gm_ops->gss_delete_sec_context(
341                         (*context_handle)->internal_ctx_id);
342         }
343         if (mech)
344                 lgss_mech_put(mech);
345
346         OBD_FREE_PTR(*context_handle);
347         *context_handle = NULL;
348         return GSS_S_COMPLETE;
349 }
350
351 int lgss_display(struct gss_ctx *ctx,
352                  char           *buf,
353                  int             bufsize)
354 {
355         LASSERT(ctx);
356         LASSERT(ctx->mech_type);
357         LASSERT(ctx->mech_type->gm_ops);
358         LASSERT(ctx->mech_type->gm_ops->gss_display);
359
360         return ctx->mech_type->gm_ops->gss_display(ctx, buf, bufsize);
361 }