Linux 4.11-rc6
[linux/fpc-iii.git] / net / sunrpc / auth_gss / gss_rpc_xdr.c
blob25d9a9cf7b66b7f4e501d38d91f6a1908830972e
1 /*
2 * GSS Proxy upcall module
4 * Copyright (C) 2012 Simo Sorce <simo@redhat.com>
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License as published by
8 * the Free Software Foundation; either version 2 of the License, or
9 * (at your option) any later version.
11 * This program is distributed in the hope that it will be useful,
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 * GNU General Public License for more details.
16 * You should have received a copy of the GNU General Public License
17 * along with this program; if not, write to the Free Software
18 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
21 #include <linux/sunrpc/svcauth.h>
22 #include "gss_rpc_xdr.h"
24 static int gssx_enc_bool(struct xdr_stream *xdr, int v)
26 __be32 *p;
28 p = xdr_reserve_space(xdr, 4);
29 if (unlikely(p == NULL))
30 return -ENOSPC;
31 *p = v ? xdr_one : xdr_zero;
32 return 0;
35 static int gssx_dec_bool(struct xdr_stream *xdr, u32 *v)
37 __be32 *p;
39 p = xdr_inline_decode(xdr, 4);
40 if (unlikely(p == NULL))
41 return -ENOSPC;
42 *v = be32_to_cpu(*p);
43 return 0;
46 static int gssx_enc_buffer(struct xdr_stream *xdr,
47 gssx_buffer *buf)
49 __be32 *p;
51 p = xdr_reserve_space(xdr, sizeof(u32) + buf->len);
52 if (!p)
53 return -ENOSPC;
54 xdr_encode_opaque(p, buf->data, buf->len);
55 return 0;
58 static int gssx_enc_in_token(struct xdr_stream *xdr,
59 struct gssp_in_token *in)
61 __be32 *p;
63 p = xdr_reserve_space(xdr, 4);
64 if (!p)
65 return -ENOSPC;
66 *p = cpu_to_be32(in->page_len);
68 /* all we need to do is to write pages */
69 xdr_write_pages(xdr, in->pages, in->page_base, in->page_len);
71 return 0;
75 static int gssx_dec_buffer(struct xdr_stream *xdr,
76 gssx_buffer *buf)
78 u32 length;
79 __be32 *p;
81 p = xdr_inline_decode(xdr, 4);
82 if (unlikely(p == NULL))
83 return -ENOSPC;
85 length = be32_to_cpup(p);
86 p = xdr_inline_decode(xdr, length);
87 if (unlikely(p == NULL))
88 return -ENOSPC;
90 if (buf->len == 0) {
91 /* we intentionally are not interested in this buffer */
92 return 0;
94 if (length > buf->len)
95 return -ENOSPC;
97 if (!buf->data) {
98 buf->data = kmemdup(p, length, GFP_KERNEL);
99 if (!buf->data)
100 return -ENOMEM;
101 } else {
102 memcpy(buf->data, p, length);
104 buf->len = length;
105 return 0;
108 static int gssx_enc_option(struct xdr_stream *xdr,
109 struct gssx_option *opt)
111 int err;
113 err = gssx_enc_buffer(xdr, &opt->option);
114 if (err)
115 return err;
116 err = gssx_enc_buffer(xdr, &opt->value);
117 return err;
120 static int gssx_dec_option(struct xdr_stream *xdr,
121 struct gssx_option *opt)
123 int err;
125 err = gssx_dec_buffer(xdr, &opt->option);
126 if (err)
127 return err;
128 err = gssx_dec_buffer(xdr, &opt->value);
129 return err;
132 static int dummy_enc_opt_array(struct xdr_stream *xdr,
133 struct gssx_option_array *oa)
135 __be32 *p;
137 if (oa->count != 0)
138 return -EINVAL;
140 p = xdr_reserve_space(xdr, 4);
141 if (!p)
142 return -ENOSPC;
143 *p = 0;
145 return 0;
148 static int dummy_dec_opt_array(struct xdr_stream *xdr,
149 struct gssx_option_array *oa)
151 struct gssx_option dummy;
152 u32 count, i;
153 __be32 *p;
155 p = xdr_inline_decode(xdr, 4);
156 if (unlikely(p == NULL))
157 return -ENOSPC;
158 count = be32_to_cpup(p++);
159 memset(&dummy, 0, sizeof(dummy));
160 for (i = 0; i < count; i++) {
161 gssx_dec_option(xdr, &dummy);
164 oa->count = 0;
165 oa->data = NULL;
166 return 0;
169 static int get_host_u32(struct xdr_stream *xdr, u32 *res)
171 __be32 *p;
173 p = xdr_inline_decode(xdr, 4);
174 if (!p)
175 return -EINVAL;
176 /* Contents of linux creds are all host-endian: */
177 memcpy(res, p, sizeof(u32));
178 return 0;
181 static int gssx_dec_linux_creds(struct xdr_stream *xdr,
182 struct svc_cred *creds)
184 u32 length;
185 __be32 *p;
186 u32 tmp;
187 u32 N;
188 int i, err;
190 p = xdr_inline_decode(xdr, 4);
191 if (unlikely(p == NULL))
192 return -ENOSPC;
194 length = be32_to_cpup(p);
196 if (length > (3 + NGROUPS_MAX) * sizeof(u32))
197 return -ENOSPC;
199 /* uid */
200 err = get_host_u32(xdr, &tmp);
201 if (err)
202 return err;
203 creds->cr_uid = make_kuid(&init_user_ns, tmp);
205 /* gid */
206 err = get_host_u32(xdr, &tmp);
207 if (err)
208 return err;
209 creds->cr_gid = make_kgid(&init_user_ns, tmp);
211 /* number of additional gid's */
212 err = get_host_u32(xdr, &tmp);
213 if (err)
214 return err;
215 N = tmp;
216 if ((3 + N) * sizeof(u32) != length)
217 return -EINVAL;
218 creds->cr_group_info = groups_alloc(N);
219 if (creds->cr_group_info == NULL)
220 return -ENOMEM;
222 /* gid's */
223 for (i = 0; i < N; i++) {
224 kgid_t kgid;
225 err = get_host_u32(xdr, &tmp);
226 if (err)
227 goto out_free_groups;
228 err = -EINVAL;
229 kgid = make_kgid(&init_user_ns, tmp);
230 if (!gid_valid(kgid))
231 goto out_free_groups;
232 creds->cr_group_info->gid[i] = kgid;
235 return 0;
236 out_free_groups:
237 groups_free(creds->cr_group_info);
238 return err;
241 static int gssx_dec_option_array(struct xdr_stream *xdr,
242 struct gssx_option_array *oa)
244 struct svc_cred *creds;
245 u32 count, i;
246 __be32 *p;
247 int err;
249 p = xdr_inline_decode(xdr, 4);
250 if (unlikely(p == NULL))
251 return -ENOSPC;
252 count = be32_to_cpup(p++);
253 if (!count)
254 return 0;
256 /* we recognize only 1 currently: CREDS_VALUE */
257 oa->count = 1;
259 oa->data = kmalloc(sizeof(struct gssx_option), GFP_KERNEL);
260 if (!oa->data)
261 return -ENOMEM;
263 creds = kzalloc(sizeof(struct svc_cred), GFP_KERNEL);
264 if (!creds) {
265 kfree(oa->data);
266 return -ENOMEM;
269 oa->data[0].option.data = CREDS_VALUE;
270 oa->data[0].option.len = sizeof(CREDS_VALUE);
271 oa->data[0].value.data = (void *)creds;
272 oa->data[0].value.len = 0;
274 for (i = 0; i < count; i++) {
275 gssx_buffer dummy = { 0, NULL };
276 u32 length;
278 /* option buffer */
279 p = xdr_inline_decode(xdr, 4);
280 if (unlikely(p == NULL))
281 return -ENOSPC;
283 length = be32_to_cpup(p);
284 p = xdr_inline_decode(xdr, length);
285 if (unlikely(p == NULL))
286 return -ENOSPC;
288 if (length == sizeof(CREDS_VALUE) &&
289 memcmp(p, CREDS_VALUE, sizeof(CREDS_VALUE)) == 0) {
290 /* We have creds here. parse them */
291 err = gssx_dec_linux_creds(xdr, creds);
292 if (err)
293 return err;
294 oa->data[0].value.len = 1; /* presence */
295 } else {
296 /* consume uninteresting buffer */
297 err = gssx_dec_buffer(xdr, &dummy);
298 if (err)
299 return err;
302 return 0;
305 static int gssx_dec_status(struct xdr_stream *xdr,
306 struct gssx_status *status)
308 __be32 *p;
309 int err;
311 /* status->major_status */
312 p = xdr_inline_decode(xdr, 8);
313 if (unlikely(p == NULL))
314 return -ENOSPC;
315 p = xdr_decode_hyper(p, &status->major_status);
317 /* status->mech */
318 err = gssx_dec_buffer(xdr, &status->mech);
319 if (err)
320 return err;
322 /* status->minor_status */
323 p = xdr_inline_decode(xdr, 8);
324 if (unlikely(p == NULL))
325 return -ENOSPC;
326 p = xdr_decode_hyper(p, &status->minor_status);
328 /* status->major_status_string */
329 err = gssx_dec_buffer(xdr, &status->major_status_string);
330 if (err)
331 return err;
333 /* status->minor_status_string */
334 err = gssx_dec_buffer(xdr, &status->minor_status_string);
335 if (err)
336 return err;
338 /* status->server_ctx */
339 err = gssx_dec_buffer(xdr, &status->server_ctx);
340 if (err)
341 return err;
343 /* we assume we have no options for now, so simply consume them */
344 /* status->options */
345 err = dummy_dec_opt_array(xdr, &status->options);
347 return err;
350 static int gssx_enc_call_ctx(struct xdr_stream *xdr,
351 struct gssx_call_ctx *ctx)
353 struct gssx_option opt;
354 __be32 *p;
355 int err;
357 /* ctx->locale */
358 err = gssx_enc_buffer(xdr, &ctx->locale);
359 if (err)
360 return err;
362 /* ctx->server_ctx */
363 err = gssx_enc_buffer(xdr, &ctx->server_ctx);
364 if (err)
365 return err;
367 /* we always want to ask for lucid contexts */
368 /* ctx->options */
369 p = xdr_reserve_space(xdr, 4);
370 *p = cpu_to_be32(2);
372 /* we want a lucid_v1 context */
373 opt.option.data = LUCID_OPTION;
374 opt.option.len = sizeof(LUCID_OPTION);
375 opt.value.data = LUCID_VALUE;
376 opt.value.len = sizeof(LUCID_VALUE);
377 err = gssx_enc_option(xdr, &opt);
379 /* ..and user creds */
380 opt.option.data = CREDS_OPTION;
381 opt.option.len = sizeof(CREDS_OPTION);
382 opt.value.data = CREDS_VALUE;
383 opt.value.len = sizeof(CREDS_VALUE);
384 err = gssx_enc_option(xdr, &opt);
386 return err;
389 static int gssx_dec_name_attr(struct xdr_stream *xdr,
390 struct gssx_name_attr *attr)
392 int err;
394 /* attr->attr */
395 err = gssx_dec_buffer(xdr, &attr->attr);
396 if (err)
397 return err;
399 /* attr->value */
400 err = gssx_dec_buffer(xdr, &attr->value);
401 if (err)
402 return err;
404 /* attr->extensions */
405 err = dummy_dec_opt_array(xdr, &attr->extensions);
407 return err;
410 static int dummy_enc_nameattr_array(struct xdr_stream *xdr,
411 struct gssx_name_attr_array *naa)
413 __be32 *p;
415 if (naa->count != 0)
416 return -EINVAL;
418 p = xdr_reserve_space(xdr, 4);
419 if (!p)
420 return -ENOSPC;
421 *p = 0;
423 return 0;
426 static int dummy_dec_nameattr_array(struct xdr_stream *xdr,
427 struct gssx_name_attr_array *naa)
429 struct gssx_name_attr dummy = { .attr = {.len = 0} };
430 u32 count, i;
431 __be32 *p;
433 p = xdr_inline_decode(xdr, 4);
434 if (unlikely(p == NULL))
435 return -ENOSPC;
436 count = be32_to_cpup(p++);
437 for (i = 0; i < count; i++) {
438 gssx_dec_name_attr(xdr, &dummy);
441 naa->count = 0;
442 naa->data = NULL;
443 return 0;
446 static struct xdr_netobj zero_netobj = {};
448 static struct gssx_name_attr_array zero_name_attr_array = {};
450 static struct gssx_option_array zero_option_array = {};
452 static int gssx_enc_name(struct xdr_stream *xdr,
453 struct gssx_name *name)
455 int err;
457 /* name->display_name */
458 err = gssx_enc_buffer(xdr, &name->display_name);
459 if (err)
460 return err;
462 /* name->name_type */
463 err = gssx_enc_buffer(xdr, &zero_netobj);
464 if (err)
465 return err;
467 /* name->exported_name */
468 err = gssx_enc_buffer(xdr, &zero_netobj);
469 if (err)
470 return err;
472 /* name->exported_composite_name */
473 err = gssx_enc_buffer(xdr, &zero_netobj);
474 if (err)
475 return err;
477 /* leave name_attributes empty for now, will add once we have any
478 * to pass up at all */
479 /* name->name_attributes */
480 err = dummy_enc_nameattr_array(xdr, &zero_name_attr_array);
481 if (err)
482 return err;
484 /* leave options empty for now, will add once we have any options
485 * to pass up at all */
486 /* name->extensions */
487 err = dummy_enc_opt_array(xdr, &zero_option_array);
489 return err;
493 static int gssx_dec_name(struct xdr_stream *xdr,
494 struct gssx_name *name)
496 struct xdr_netobj dummy_netobj = { .len = 0 };
497 struct gssx_name_attr_array dummy_name_attr_array = { .count = 0 };
498 struct gssx_option_array dummy_option_array = { .count = 0 };
499 int err;
501 /* name->display_name */
502 err = gssx_dec_buffer(xdr, &name->display_name);
503 if (err)
504 return err;
506 /* name->name_type */
507 err = gssx_dec_buffer(xdr, &dummy_netobj);
508 if (err)
509 return err;
511 /* name->exported_name */
512 err = gssx_dec_buffer(xdr, &dummy_netobj);
513 if (err)
514 return err;
516 /* name->exported_composite_name */
517 err = gssx_dec_buffer(xdr, &dummy_netobj);
518 if (err)
519 return err;
521 /* we assume we have no attributes for now, so simply consume them */
522 /* name->name_attributes */
523 err = dummy_dec_nameattr_array(xdr, &dummy_name_attr_array);
524 if (err)
525 return err;
527 /* we assume we have no options for now, so simply consume them */
528 /* name->extensions */
529 err = dummy_dec_opt_array(xdr, &dummy_option_array);
531 return err;
534 static int dummy_enc_credel_array(struct xdr_stream *xdr,
535 struct gssx_cred_element_array *cea)
537 __be32 *p;
539 if (cea->count != 0)
540 return -EINVAL;
542 p = xdr_reserve_space(xdr, 4);
543 if (!p)
544 return -ENOSPC;
545 *p = 0;
547 return 0;
550 static int gssx_enc_cred(struct xdr_stream *xdr,
551 struct gssx_cred *cred)
553 int err;
555 /* cred->desired_name */
556 err = gssx_enc_name(xdr, &cred->desired_name);
557 if (err)
558 return err;
560 /* cred->elements */
561 err = dummy_enc_credel_array(xdr, &cred->elements);
562 if (err)
563 return err;
565 /* cred->cred_handle_reference */
566 err = gssx_enc_buffer(xdr, &cred->cred_handle_reference);
567 if (err)
568 return err;
570 /* cred->needs_release */
571 err = gssx_enc_bool(xdr, cred->needs_release);
573 return err;
576 static int gssx_enc_ctx(struct xdr_stream *xdr,
577 struct gssx_ctx *ctx)
579 __be32 *p;
580 int err;
582 /* ctx->exported_context_token */
583 err = gssx_enc_buffer(xdr, &ctx->exported_context_token);
584 if (err)
585 return err;
587 /* ctx->state */
588 err = gssx_enc_buffer(xdr, &ctx->state);
589 if (err)
590 return err;
592 /* ctx->need_release */
593 err = gssx_enc_bool(xdr, ctx->need_release);
594 if (err)
595 return err;
597 /* ctx->mech */
598 err = gssx_enc_buffer(xdr, &ctx->mech);
599 if (err)
600 return err;
602 /* ctx->src_name */
603 err = gssx_enc_name(xdr, &ctx->src_name);
604 if (err)
605 return err;
607 /* ctx->targ_name */
608 err = gssx_enc_name(xdr, &ctx->targ_name);
609 if (err)
610 return err;
612 /* ctx->lifetime */
613 p = xdr_reserve_space(xdr, 8+8);
614 if (!p)
615 return -ENOSPC;
616 p = xdr_encode_hyper(p, ctx->lifetime);
618 /* ctx->ctx_flags */
619 p = xdr_encode_hyper(p, ctx->ctx_flags);
621 /* ctx->locally_initiated */
622 err = gssx_enc_bool(xdr, ctx->locally_initiated);
623 if (err)
624 return err;
626 /* ctx->open */
627 err = gssx_enc_bool(xdr, ctx->open);
628 if (err)
629 return err;
631 /* leave options empty for now, will add once we have any options
632 * to pass up at all */
633 /* ctx->options */
634 err = dummy_enc_opt_array(xdr, &ctx->options);
636 return err;
639 static int gssx_dec_ctx(struct xdr_stream *xdr,
640 struct gssx_ctx *ctx)
642 __be32 *p;
643 int err;
645 /* ctx->exported_context_token */
646 err = gssx_dec_buffer(xdr, &ctx->exported_context_token);
647 if (err)
648 return err;
650 /* ctx->state */
651 err = gssx_dec_buffer(xdr, &ctx->state);
652 if (err)
653 return err;
655 /* ctx->need_release */
656 err = gssx_dec_bool(xdr, &ctx->need_release);
657 if (err)
658 return err;
660 /* ctx->mech */
661 err = gssx_dec_buffer(xdr, &ctx->mech);
662 if (err)
663 return err;
665 /* ctx->src_name */
666 err = gssx_dec_name(xdr, &ctx->src_name);
667 if (err)
668 return err;
670 /* ctx->targ_name */
671 err = gssx_dec_name(xdr, &ctx->targ_name);
672 if (err)
673 return err;
675 /* ctx->lifetime */
676 p = xdr_inline_decode(xdr, 8+8);
677 if (unlikely(p == NULL))
678 return -ENOSPC;
679 p = xdr_decode_hyper(p, &ctx->lifetime);
681 /* ctx->ctx_flags */
682 p = xdr_decode_hyper(p, &ctx->ctx_flags);
684 /* ctx->locally_initiated */
685 err = gssx_dec_bool(xdr, &ctx->locally_initiated);
686 if (err)
687 return err;
689 /* ctx->open */
690 err = gssx_dec_bool(xdr, &ctx->open);
691 if (err)
692 return err;
694 /* we assume we have no options for now, so simply consume them */
695 /* ctx->options */
696 err = dummy_dec_opt_array(xdr, &ctx->options);
698 return err;
701 static int gssx_enc_cb(struct xdr_stream *xdr, struct gssx_cb *cb)
703 __be32 *p;
704 int err;
706 /* cb->initiator_addrtype */
707 p = xdr_reserve_space(xdr, 8);
708 if (!p)
709 return -ENOSPC;
710 p = xdr_encode_hyper(p, cb->initiator_addrtype);
712 /* cb->initiator_address */
713 err = gssx_enc_buffer(xdr, &cb->initiator_address);
714 if (err)
715 return err;
717 /* cb->acceptor_addrtype */
718 p = xdr_reserve_space(xdr, 8);
719 if (!p)
720 return -ENOSPC;
721 p = xdr_encode_hyper(p, cb->acceptor_addrtype);
723 /* cb->acceptor_address */
724 err = gssx_enc_buffer(xdr, &cb->acceptor_address);
725 if (err)
726 return err;
728 /* cb->application_data */
729 err = gssx_enc_buffer(xdr, &cb->application_data);
731 return err;
734 void gssx_enc_accept_sec_context(struct rpc_rqst *req,
735 struct xdr_stream *xdr,
736 struct gssx_arg_accept_sec_context *arg)
738 int err;
740 err = gssx_enc_call_ctx(xdr, &arg->call_ctx);
741 if (err)
742 goto done;
744 /* arg->context_handle */
745 if (arg->context_handle)
746 err = gssx_enc_ctx(xdr, arg->context_handle);
747 else
748 err = gssx_enc_bool(xdr, 0);
749 if (err)
750 goto done;
752 /* arg->cred_handle */
753 if (arg->cred_handle)
754 err = gssx_enc_cred(xdr, arg->cred_handle);
755 else
756 err = gssx_enc_bool(xdr, 0);
757 if (err)
758 goto done;
760 /* arg->input_token */
761 err = gssx_enc_in_token(xdr, &arg->input_token);
762 if (err)
763 goto done;
765 /* arg->input_cb */
766 if (arg->input_cb)
767 err = gssx_enc_cb(xdr, arg->input_cb);
768 else
769 err = gssx_enc_bool(xdr, 0);
770 if (err)
771 goto done;
773 err = gssx_enc_bool(xdr, arg->ret_deleg_cred);
774 if (err)
775 goto done;
777 /* leave options empty for now, will add once we have any options
778 * to pass up at all */
779 /* arg->options */
780 err = dummy_enc_opt_array(xdr, &arg->options);
782 xdr_inline_pages(&req->rq_rcv_buf,
783 PAGE_SIZE/2 /* pretty arbitrary */,
784 arg->pages, 0 /* page base */, arg->npages * PAGE_SIZE);
785 done:
786 if (err)
787 dprintk("RPC: gssx_enc_accept_sec_context: %d\n", err);
790 int gssx_dec_accept_sec_context(struct rpc_rqst *rqstp,
791 struct xdr_stream *xdr,
792 struct gssx_res_accept_sec_context *res)
794 u32 value_follows;
795 int err;
796 struct page *scratch;
798 scratch = alloc_page(GFP_KERNEL);
799 if (!scratch)
800 return -ENOMEM;
801 xdr_set_scratch_buffer(xdr, page_address(scratch), PAGE_SIZE);
803 /* res->status */
804 err = gssx_dec_status(xdr, &res->status);
805 if (err)
806 goto out_free;
808 /* res->context_handle */
809 err = gssx_dec_bool(xdr, &value_follows);
810 if (err)
811 goto out_free;
812 if (value_follows) {
813 err = gssx_dec_ctx(xdr, res->context_handle);
814 if (err)
815 goto out_free;
816 } else {
817 res->context_handle = NULL;
820 /* res->output_token */
821 err = gssx_dec_bool(xdr, &value_follows);
822 if (err)
823 goto out_free;
824 if (value_follows) {
825 err = gssx_dec_buffer(xdr, res->output_token);
826 if (err)
827 goto out_free;
828 } else {
829 res->output_token = NULL;
832 /* res->delegated_cred_handle */
833 err = gssx_dec_bool(xdr, &value_follows);
834 if (err)
835 goto out_free;
836 if (value_follows) {
837 /* we do not support upcall servers sending this data. */
838 err = -EINVAL;
839 goto out_free;
842 /* res->options */
843 err = gssx_dec_option_array(xdr, &res->options);
845 out_free:
846 __free_page(scratch);
847 return err;