1 // SPDX-License-Identifier: GPL-2.0
3 * Neil Brown <neilb@cse.unsw.edu.au>
4 * J. Bruce Fields <bfields@umich.edu>
5 * Andy Adamson <andros@umich.edu>
6 * Dug Song <dugsong@monkey.org>
8 * RPCSEC_GSS server authentication.
9 * This implements RPCSEC_GSS as defined in rfc2203 (rpcsec_gss) and rfc2078
12 * The RPCSEC_GSS involves three stages:
15 * 3/ context destruction
17 * Context creation is handled largely by upcalls to user-space.
18 * In particular, GSS_Accept_sec_context is handled by an upcall
19 * Data exchange is handled entirely within the kernel
20 * In particular, GSS_GetMIC, GSS_VerifyMIC, GSS_Seal, GSS_Unseal are in-kernel.
21 * Context destruction is handled in-kernel
22 * GSS_Delete_sec_context is in-kernel
24 * Context creation is initiated by a RPCSEC_GSS_INIT request arriving.
25 * The context handle and gss_token are used as a key into the rpcsec_init cache.
26 * The content of this cache includes some of the outputs of GSS_Accept_sec_context,
27 * being major_status, minor_status, context_handle, reply_token.
28 * These are sent back to the client.
29 * Sequence window management is handled by the kernel. The window size if currently
30 * a compile time constant.
32 * When user-space is happy that a context is established, it places an entry
33 * in the rpcsec_context cache. The key for this cache is the context_handle.
34 * The content includes:
35 * uid/gidlist - for determining access rights
37 * mechanism specific information, such as a key
41 #include <linux/slab.h>
42 #include <linux/types.h>
43 #include <linux/module.h>
44 #include <linux/pagemap.h>
45 #include <linux/user_namespace.h>
47 #include <linux/sunrpc/auth_gss.h>
48 #include <linux/sunrpc/gss_err.h>
49 #include <linux/sunrpc/svcauth.h>
50 #include <linux/sunrpc/svcauth_gss.h>
51 #include <linux/sunrpc/cache.h>
53 #include <trace/events/rpcgss.h>
55 #include "gss_rpc_upcall.h"
58 /* The rpcsec_init cache is used for mapping RPCSEC_GSS_{,CONT_}INIT requests
61 * Key is context handle (\x if empty) and gss_token.
62 * Content is major_status minor_status (integers) context_handle, reply_token.
66 static int netobj_equal(struct xdr_netobj *a, struct xdr_netobj *b)
68 return a->len == b->len && 0 == memcmp(a->data, b->data, a->len);
71 #define RSI_HASHBITS 6
72 #define RSI_HASHMAX (1<<RSI_HASHBITS)
76 struct xdr_netobj in_handle, in_token;
77 struct xdr_netobj out_handle, out_token;
78 int major_status, minor_status;
79 struct rcu_head rcu_head;
82 static struct rsi *rsi_update(struct cache_detail *cd, struct rsi *new, struct rsi *old);
83 static struct rsi *rsi_lookup(struct cache_detail *cd, struct rsi *item);
85 static void rsi_free(struct rsi *rsii)
87 kfree(rsii->in_handle.data);
88 kfree(rsii->in_token.data);
89 kfree(rsii->out_handle.data);
90 kfree(rsii->out_token.data);
93 static void rsi_free_rcu(struct rcu_head *head)
95 struct rsi *rsii = container_of(head, struct rsi, rcu_head);
101 static void rsi_put(struct kref *ref)
103 struct rsi *rsii = container_of(ref, struct rsi, h.ref);
105 call_rcu(&rsii->rcu_head, rsi_free_rcu);
108 static inline int rsi_hash(struct rsi *item)
110 return hash_mem(item->in_handle.data, item->in_handle.len, RSI_HASHBITS)
111 ^ hash_mem(item->in_token.data, item->in_token.len, RSI_HASHBITS);
114 static int rsi_match(struct cache_head *a, struct cache_head *b)
116 struct rsi *item = container_of(a, struct rsi, h);
117 struct rsi *tmp = container_of(b, struct rsi, h);
118 return netobj_equal(&item->in_handle, &tmp->in_handle) &&
119 netobj_equal(&item->in_token, &tmp->in_token);
122 static int dup_to_netobj(struct xdr_netobj *dst, char *src, int len)
125 dst->data = (len ? kmemdup(src, len, GFP_KERNEL) : NULL);
126 if (len && !dst->data)
131 static inline int dup_netobj(struct xdr_netobj *dst, struct xdr_netobj *src)
133 return dup_to_netobj(dst, src->data, src->len);
136 static void rsi_init(struct cache_head *cnew, struct cache_head *citem)
138 struct rsi *new = container_of(cnew, struct rsi, h);
139 struct rsi *item = container_of(citem, struct rsi, h);
141 new->out_handle.data = NULL;
142 new->out_handle.len = 0;
143 new->out_token.data = NULL;
144 new->out_token.len = 0;
145 new->in_handle.len = item->in_handle.len;
146 item->in_handle.len = 0;
147 new->in_token.len = item->in_token.len;
148 item->in_token.len = 0;
149 new->in_handle.data = item->in_handle.data;
150 item->in_handle.data = NULL;
151 new->in_token.data = item->in_token.data;
152 item->in_token.data = NULL;
155 static void update_rsi(struct cache_head *cnew, struct cache_head *citem)
157 struct rsi *new = container_of(cnew, struct rsi, h);
158 struct rsi *item = container_of(citem, struct rsi, h);
160 BUG_ON(new->out_handle.data || new->out_token.data);
161 new->out_handle.len = item->out_handle.len;
162 item->out_handle.len = 0;
163 new->out_token.len = item->out_token.len;
164 item->out_token.len = 0;
165 new->out_handle.data = item->out_handle.data;
166 item->out_handle.data = NULL;
167 new->out_token.data = item->out_token.data;
168 item->out_token.data = NULL;
170 new->major_status = item->major_status;
171 new->minor_status = item->minor_status;
174 static struct cache_head *rsi_alloc(void)
176 struct rsi *rsii = kmalloc(sizeof(*rsii), GFP_KERNEL);
183 static int rsi_upcall(struct cache_detail *cd, struct cache_head *h)
185 return sunrpc_cache_pipe_upcall_timeout(cd, h);
188 static void rsi_request(struct cache_detail *cd,
189 struct cache_head *h,
190 char **bpp, int *blen)
192 struct rsi *rsii = container_of(h, struct rsi, h);
194 qword_addhex(bpp, blen, rsii->in_handle.data, rsii->in_handle.len);
195 qword_addhex(bpp, blen, rsii->in_token.data, rsii->in_token.len);
198 "RPCSEC/GSS credential too large - please use gssproxy\n");
201 static int rsi_parse(struct cache_detail *cd,
202 char *mesg, int mlen)
204 /* context token expiry major minor context token */
208 struct rsi rsii, *rsip = NULL;
210 int status = -EINVAL;
212 memset(&rsii, 0, sizeof(rsii));
214 len = qword_get(&mesg, buf, mlen);
218 if (dup_to_netobj(&rsii.in_handle, buf, len))
222 len = qword_get(&mesg, buf, mlen);
227 if (dup_to_netobj(&rsii.in_token, buf, len))
230 rsip = rsi_lookup(cd, &rsii);
236 expiry = get_expiry(&mesg);
242 len = qword_get(&mesg, buf, mlen);
245 rsii.major_status = simple_strtoul(buf, &ep, 10);
248 len = qword_get(&mesg, buf, mlen);
251 rsii.minor_status = simple_strtoul(buf, &ep, 10);
256 len = qword_get(&mesg, buf, mlen);
260 if (dup_to_netobj(&rsii.out_handle, buf, len))
264 len = qword_get(&mesg, buf, mlen);
269 if (dup_to_netobj(&rsii.out_token, buf, len))
271 rsii.h.expiry_time = expiry;
272 rsip = rsi_update(cd, &rsii, rsip);
277 cache_put(&rsip->h, cd);
283 static const struct cache_detail rsi_cache_template = {
284 .owner = THIS_MODULE,
285 .hash_size = RSI_HASHMAX,
286 .name = "auth.rpcsec.init",
287 .cache_put = rsi_put,
288 .cache_upcall = rsi_upcall,
289 .cache_request = rsi_request,
290 .cache_parse = rsi_parse,
293 .update = update_rsi,
297 static struct rsi *rsi_lookup(struct cache_detail *cd, struct rsi *item)
299 struct cache_head *ch;
300 int hash = rsi_hash(item);
302 ch = sunrpc_cache_lookup_rcu(cd, &item->h, hash);
304 return container_of(ch, struct rsi, h);
309 static struct rsi *rsi_update(struct cache_detail *cd, struct rsi *new, struct rsi *old)
311 struct cache_head *ch;
312 int hash = rsi_hash(new);
314 ch = sunrpc_cache_update(cd, &new->h,
317 return container_of(ch, struct rsi, h);
324 * The rpcsec_context cache is used to store a context that is
325 * used in data exchange.
326 * The key is a context handle. The content is:
327 * uid, gidlist, mechanism, service-set, mech-specific-data
330 #define RSC_HASHBITS 10
331 #define RSC_HASHMAX (1<<RSC_HASHBITS)
333 #define GSS_SEQ_WIN 128
335 struct gss_svc_seq_data {
336 /* highest seq number seen so far: */
338 /* for i such that sd_max-GSS_SEQ_WIN < i <= sd_max, the i-th bit of
339 * sd_win is nonzero iff sequence number i has been seen already: */
340 unsigned long sd_win[GSS_SEQ_WIN/BITS_PER_LONG];
346 struct xdr_netobj handle;
347 struct svc_cred cred;
348 struct gss_svc_seq_data seqdata;
349 struct gss_ctx *mechctx;
350 struct rcu_head rcu_head;
353 static struct rsc *rsc_update(struct cache_detail *cd, struct rsc *new, struct rsc *old);
354 static struct rsc *rsc_lookup(struct cache_detail *cd, struct rsc *item);
356 static void rsc_free(struct rsc *rsci)
358 kfree(rsci->handle.data);
360 gss_delete_sec_context(&rsci->mechctx);
361 free_svc_cred(&rsci->cred);
364 static void rsc_free_rcu(struct rcu_head *head)
366 struct rsc *rsci = container_of(head, struct rsc, rcu_head);
368 kfree(rsci->handle.data);
372 static void rsc_put(struct kref *ref)
374 struct rsc *rsci = container_of(ref, struct rsc, h.ref);
377 gss_delete_sec_context(&rsci->mechctx);
378 free_svc_cred(&rsci->cred);
379 call_rcu(&rsci->rcu_head, rsc_free_rcu);
383 rsc_hash(struct rsc *rsci)
385 return hash_mem(rsci->handle.data, rsci->handle.len, RSC_HASHBITS);
389 rsc_match(struct cache_head *a, struct cache_head *b)
391 struct rsc *new = container_of(a, struct rsc, h);
392 struct rsc *tmp = container_of(b, struct rsc, h);
394 return netobj_equal(&new->handle, &tmp->handle);
398 rsc_init(struct cache_head *cnew, struct cache_head *ctmp)
400 struct rsc *new = container_of(cnew, struct rsc, h);
401 struct rsc *tmp = container_of(ctmp, struct rsc, h);
403 new->handle.len = tmp->handle.len;
405 new->handle.data = tmp->handle.data;
406 tmp->handle.data = NULL;
408 init_svc_cred(&new->cred);
412 update_rsc(struct cache_head *cnew, struct cache_head *ctmp)
414 struct rsc *new = container_of(cnew, struct rsc, h);
415 struct rsc *tmp = container_of(ctmp, struct rsc, h);
417 new->mechctx = tmp->mechctx;
419 memset(&new->seqdata, 0, sizeof(new->seqdata));
420 spin_lock_init(&new->seqdata.sd_lock);
421 new->cred = tmp->cred;
422 init_svc_cred(&tmp->cred);
425 static struct cache_head *
428 struct rsc *rsci = kmalloc(sizeof(*rsci), GFP_KERNEL);
435 static int rsc_upcall(struct cache_detail *cd, struct cache_head *h)
440 static int rsc_parse(struct cache_detail *cd,
441 char *mesg, int mlen)
443 /* contexthandle expiry [ uid gid N <n gids> mechname ...mechdata... ] */
447 struct rsc rsci, *rscp = NULL;
449 int status = -EINVAL;
450 struct gss_api_mech *gm = NULL;
452 memset(&rsci, 0, sizeof(rsci));
454 len = qword_get(&mesg, buf, mlen);
455 if (len < 0) goto out;
457 if (dup_to_netobj(&rsci.handle, buf, len))
462 expiry = get_expiry(&mesg);
467 rscp = rsc_lookup(cd, &rsci);
471 /* uid, or NEGATIVE */
472 rv = get_int(&mesg, &id);
476 set_bit(CACHE_NEGATIVE, &rsci.h.flags);
481 * NOTE: we skip uid_valid()/gid_valid() checks here:
482 * instead, * -1 id's are later mapped to the
483 * (export-specific) anonymous id by nfsd_setuser.
485 * (But supplementary gid's get no such special
486 * treatment so are checked for validity here.)
489 rsci.cred.cr_uid = make_kuid(current_user_ns(), id);
492 if (get_int(&mesg, &id))
494 rsci.cred.cr_gid = make_kgid(current_user_ns(), id);
496 /* number of additional gid's */
497 if (get_int(&mesg, &N))
499 if (N < 0 || N > NGROUPS_MAX)
502 rsci.cred.cr_group_info = groups_alloc(N);
503 if (rsci.cred.cr_group_info == NULL)
508 for (i=0; i<N; i++) {
510 if (get_int(&mesg, &id))
512 kgid = make_kgid(current_user_ns(), id);
513 if (!gid_valid(kgid))
515 rsci.cred.cr_group_info->gid[i] = kgid;
517 groups_sort(rsci.cred.cr_group_info);
520 len = qword_get(&mesg, buf, mlen);
523 gm = rsci.cred.cr_gss_mech = gss_mech_get_by_name(buf);
524 status = -EOPNOTSUPP;
529 /* mech-specific data: */
530 len = qword_get(&mesg, buf, mlen);
533 status = gss_import_sec_context(buf, len, gm, &rsci.mechctx,
538 /* get client name */
539 len = qword_get(&mesg, buf, mlen);
541 rsci.cred.cr_principal = kstrdup(buf, GFP_KERNEL);
542 if (!rsci.cred.cr_principal) {
549 rsci.h.expiry_time = expiry;
550 rscp = rsc_update(cd, &rsci, rscp);
555 cache_put(&rscp->h, cd);
561 static const struct cache_detail rsc_cache_template = {
562 .owner = THIS_MODULE,
563 .hash_size = RSC_HASHMAX,
564 .name = "auth.rpcsec.context",
565 .cache_put = rsc_put,
566 .cache_upcall = rsc_upcall,
567 .cache_parse = rsc_parse,
570 .update = update_rsc,
574 static struct rsc *rsc_lookup(struct cache_detail *cd, struct rsc *item)
576 struct cache_head *ch;
577 int hash = rsc_hash(item);
579 ch = sunrpc_cache_lookup_rcu(cd, &item->h, hash);
581 return container_of(ch, struct rsc, h);
586 static struct rsc *rsc_update(struct cache_detail *cd, struct rsc *new, struct rsc *old)
588 struct cache_head *ch;
589 int hash = rsc_hash(new);
591 ch = sunrpc_cache_update(cd, &new->h,
594 return container_of(ch, struct rsc, h);
601 gss_svc_searchbyctx(struct cache_detail *cd, struct xdr_netobj *handle)
606 memset(&rsci, 0, sizeof(rsci));
607 if (dup_to_netobj(&rsci.handle, handle->data, handle->len))
609 found = rsc_lookup(cd, &rsci);
613 if (cache_check(cd, &found->h, NULL))
619 * gss_check_seq_num - GSS sequence number window check
620 * @rqstp: RPC Call to use when reporting errors
621 * @rsci: cached GSS context state (updated on return)
622 * @seq_num: sequence number to check
624 * Implements sequence number algorithm as specified in
625 * RFC 2203, Section 5.3.3.1. "Context Management".
628 * %true: @rqstp's GSS sequence number is inside the window
629 * %false: @rqstp's GSS sequence number is outside the window
631 static bool gss_check_seq_num(const struct svc_rqst *rqstp, struct rsc *rsci,
634 struct gss_svc_seq_data *sd = &rsci->seqdata;
637 spin_lock(&sd->sd_lock);
638 if (seq_num > sd->sd_max) {
639 if (seq_num >= sd->sd_max + GSS_SEQ_WIN) {
640 memset(sd->sd_win, 0, sizeof(sd->sd_win));
641 sd->sd_max = seq_num;
642 } else while (sd->sd_max < seq_num) {
644 __clear_bit(sd->sd_max % GSS_SEQ_WIN, sd->sd_win);
646 __set_bit(seq_num % GSS_SEQ_WIN, sd->sd_win);
648 } else if (seq_num + GSS_SEQ_WIN <= sd->sd_max) {
651 if (__test_and_set_bit(seq_num % GSS_SEQ_WIN, sd->sd_win))
657 spin_unlock(&sd->sd_lock);
661 trace_rpcgss_svc_seqno_low(rqstp, seq_num,
662 sd->sd_max - GSS_SEQ_WIN,
666 trace_rpcgss_svc_seqno_seen(rqstp, seq_num);
670 static inline u32 round_up_to_quad(u32 i)
672 return (i + 3 ) & ~3;
676 svc_safe_getnetobj(struct kvec *argv, struct xdr_netobj *o)
680 if (argv->iov_len < 4)
682 o->len = svc_getnl(argv);
683 l = round_up_to_quad(o->len);
684 if (argv->iov_len < l)
686 o->data = argv->iov_base;
693 svc_safe_putnetobj(struct kvec *resv, struct xdr_netobj *o)
697 if (resv->iov_len + 4 > PAGE_SIZE)
699 svc_putnl(resv, o->len);
700 p = resv->iov_base + resv->iov_len;
701 resv->iov_len += round_up_to_quad(o->len);
702 if (resv->iov_len > PAGE_SIZE)
704 memcpy(p, o->data, o->len);
705 memset(p + o->len, 0, round_up_to_quad(o->len) - o->len);
710 * Verify the checksum on the header and return SVC_OK on success.
711 * Otherwise, return SVC_DROP (in the case of a bad sequence number)
712 * or return SVC_DENIED and indicate error in rqstp->rq_auth_stat.
715 gss_verify_header(struct svc_rqst *rqstp, struct rsc *rsci,
716 __be32 *rpcstart, struct rpc_gss_wire_cred *gc)
718 struct gss_ctx *ctx_id = rsci->mechctx;
719 struct xdr_buf rpchdr;
720 struct xdr_netobj checksum;
722 struct kvec *argv = &rqstp->rq_arg.head[0];
725 /* data to compute the checksum over: */
726 iov.iov_base = rpcstart;
727 iov.iov_len = (u8 *)argv->iov_base - (u8 *)rpcstart;
728 xdr_buf_from_iov(&iov, &rpchdr);
730 rqstp->rq_auth_stat = rpc_autherr_badverf;
731 if (argv->iov_len < 4)
733 flavor = svc_getnl(argv);
734 if (flavor != RPC_AUTH_GSS)
736 if (svc_safe_getnetobj(argv, &checksum))
739 if (rqstp->rq_deferred) /* skip verification of revisited request */
741 if (gss_verify_mic(ctx_id, &rpchdr, &checksum) != GSS_S_COMPLETE) {
742 rqstp->rq_auth_stat = rpcsec_gsserr_credproblem;
746 if (gc->gc_seq > MAXSEQ) {
747 trace_rpcgss_svc_seqno_large(rqstp, gc->gc_seq);
748 rqstp->rq_auth_stat = rpcsec_gsserr_ctxproblem;
751 if (!gss_check_seq_num(rqstp, rsci, gc->gc_seq))
757 gss_write_null_verf(struct svc_rqst *rqstp)
761 svc_putnl(rqstp->rq_res.head, RPC_AUTH_NULL);
762 p = rqstp->rq_res.head->iov_base + rqstp->rq_res.head->iov_len;
763 /* don't really need to check if head->iov_len > PAGE_SIZE ... */
765 if (!xdr_ressize_check(rqstp, p))
771 gss_write_verf(struct svc_rqst *rqstp, struct gss_ctx *ctx_id, u32 seq)
775 struct xdr_buf verf_data;
776 struct xdr_netobj mic;
781 svc_putnl(rqstp->rq_res.head, RPC_AUTH_GSS);
782 xdr_seq = kmalloc(4, GFP_KERNEL);
785 *xdr_seq = htonl(seq);
787 iov.iov_base = xdr_seq;
789 xdr_buf_from_iov(&iov, &verf_data);
790 p = rqstp->rq_res.head->iov_base + rqstp->rq_res.head->iov_len;
791 mic.data = (u8 *)(p + 1);
792 maj_stat = gss_get_mic(ctx_id, &verf_data, &mic);
793 if (maj_stat != GSS_S_COMPLETE)
795 *p++ = htonl(mic.len);
796 memset((u8 *)p + mic.len, 0, round_up_to_quad(mic.len) - mic.len);
797 p += XDR_QUADLEN(mic.len);
798 if (!xdr_ressize_check(rqstp, p))
807 struct auth_domain h;
811 static struct auth_domain *
812 find_gss_auth_domain(struct gss_ctx *ctx, u32 svc)
816 name = gss_service_to_auth_domain_name(ctx->mech_type, svc);
819 return auth_domain_find(name);
822 static struct auth_ops svcauthops_gss;
824 u32 svcauth_gss_flavor(struct auth_domain *dom)
826 struct gss_domain *gd = container_of(dom, struct gss_domain, h);
828 return gd->pseudoflavor;
831 EXPORT_SYMBOL_GPL(svcauth_gss_flavor);
834 svcauth_gss_register_pseudoflavor(u32 pseudoflavor, char * name)
836 struct gss_domain *new;
837 struct auth_domain *test;
840 new = kmalloc(sizeof(*new), GFP_KERNEL);
843 kref_init(&new->h.ref);
844 new->h.name = kstrdup(name, GFP_KERNEL);
847 new->h.flavour = &svcauthops_gss;
848 new->pseudoflavor = pseudoflavor;
850 test = auth_domain_lookup(name, &new->h);
851 if (test != &new->h) {
852 pr_warn("svc: duplicate registration of gss pseudo flavour %s.\n",
855 auth_domain_put(test);
865 return ERR_PTR(stat);
867 EXPORT_SYMBOL_GPL(svcauth_gss_register_pseudoflavor);
870 read_u32_from_xdr_buf(struct xdr_buf *buf, int base, u32 *obj)
875 status = read_bytes_from_xdr_buf(buf, base, &raw, sizeof(*obj));
882 /* It would be nice if this bit of code could be shared with the client.
884 * The client shouldn't malloc(), would have to pass in own memory.
885 * The server uses base of head iovec as read pointer, while the
886 * client uses separate pointer. */
888 unwrap_integ_data(struct svc_rqst *rqstp, struct xdr_buf *buf, u32 seq, struct gss_ctx *ctx)
890 u32 integ_len, rseqno, maj_stat;
892 struct xdr_netobj mic;
893 struct xdr_buf integ_buf;
897 /* NFS READ normally uses splice to send data in-place. However
898 * the data in cache can change after the reply's MIC is computed
899 * but before the RPC reply is sent. To prevent the client from
900 * rejecting the server-computed MIC in this somewhat rare case,
901 * do not use splice with the GSS integrity service.
903 clear_bit(RQ_SPLICE_OK, &rqstp->rq_flags);
905 /* Did we already verify the signature on the original pass through? */
906 if (rqstp->rq_deferred)
909 integ_len = svc_getnl(&buf->head[0]);
912 if (integ_len > buf->len)
914 if (xdr_buf_subsegment(buf, &integ_buf, 0, integ_len))
917 /* copy out mic... */
918 if (read_u32_from_xdr_buf(buf, integ_len, &mic.len))
920 if (mic.len > RPC_MAX_AUTH_SIZE)
922 mic.data = kmalloc(mic.len, GFP_KERNEL);
925 if (read_bytes_from_xdr_buf(buf, integ_len + 4, mic.data, mic.len))
927 maj_stat = gss_verify_mic(ctx, &integ_buf, &mic);
928 if (maj_stat != GSS_S_COMPLETE)
930 rseqno = svc_getnl(&buf->head[0]);
933 /* trim off the mic and padding at the end before returning */
934 xdr_buf_trim(buf, round_up_to_quad(mic.len) + 4);
941 trace_rpcgss_svc_unwrap_failed(rqstp);
944 trace_rpcgss_svc_seqno_bad(rqstp, seq, rseqno);
947 trace_rpcgss_svc_mic(rqstp, maj_stat);
952 total_buf_len(struct xdr_buf *buf)
954 return buf->head[0].iov_len + buf->page_len + buf->tail[0].iov_len;
958 fix_priv_head(struct xdr_buf *buf, int pad)
960 if (buf->page_len == 0) {
961 /* We need to adjust head and buf->len in tandem in this
962 * case to make svc_defer() work--it finds the original
963 * buffer start using buf->len - buf->head[0].iov_len. */
964 buf->head[0].iov_len -= pad;
969 unwrap_priv_data(struct svc_rqst *rqstp, struct xdr_buf *buf, u32 seq, struct gss_ctx *ctx)
971 u32 priv_len, maj_stat;
972 int pad, remaining_len, offset;
975 clear_bit(RQ_SPLICE_OK, &rqstp->rq_flags);
977 priv_len = svc_getnl(&buf->head[0]);
978 if (rqstp->rq_deferred) {
979 /* Already decrypted last time through! The sequence number
980 * check at out_seq is unnecessary but harmless: */
983 /* buf->len is the number of bytes from the original start of the
984 * request to the end, where head[0].iov_len is just the bytes
985 * not yet read from the head, so these two values are different: */
986 remaining_len = total_buf_len(buf);
987 if (priv_len > remaining_len)
989 pad = remaining_len - priv_len;
991 fix_priv_head(buf, pad);
993 maj_stat = gss_unwrap(ctx, 0, priv_len, buf);
994 pad = priv_len - buf->len;
995 /* The upper layers assume the buffer is aligned on 4-byte boundaries.
996 * In the krb5p case, at least, the data ends up offset, so we need to
998 /* XXX: This is very inefficient. It would be better to either do
999 * this while we encrypt, or maybe in the receive code, if we can peak
1000 * ahead and work out the service and mechanism there. */
1001 offset = xdr_pad_size(buf->head[0].iov_len);
1003 buf->buflen = RPCSVC_MAXPAYLOAD;
1004 xdr_shift_buf(buf, offset);
1005 fix_priv_head(buf, pad);
1007 if (maj_stat != GSS_S_COMPLETE)
1010 rseqno = svc_getnl(&buf->head[0]);
1016 trace_rpcgss_svc_unwrap_failed(rqstp);
1019 trace_rpcgss_svc_seqno_bad(rqstp, seq, rseqno);
1022 trace_rpcgss_svc_unwrap(rqstp, maj_stat);
1026 struct gss_svc_data {
1027 /* decoded gss client cred: */
1028 struct rpc_gss_wire_cred clcred;
1029 /* save a pointer to the beginning of the encoded verifier,
1030 * for use in encryption/checksumming in svcauth_gss_release: */
1036 svcauth_gss_set_client(struct svc_rqst *rqstp)
1038 struct gss_svc_data *svcdata = rqstp->rq_auth_data;
1039 struct rsc *rsci = svcdata->rsci;
1040 struct rpc_gss_wire_cred *gc = &svcdata->clcred;
1043 rqstp->rq_auth_stat = rpc_autherr_badcred;
1046 * A gss export can be specified either by:
1047 * export *(sec=krb5,rw)
1049 * export gss/krb5(rw)
1050 * The latter is deprecated; but for backwards compatibility reasons
1051 * the nfsd code will still fall back on trying it if the former
1052 * doesn't work; so we try to make both available to nfsd, below.
1054 rqstp->rq_gssclient = find_gss_auth_domain(rsci->mechctx, gc->gc_svc);
1055 if (rqstp->rq_gssclient == NULL)
1057 stat = svcauth_unix_set_client(rqstp);
1058 if (stat == SVC_DROP || stat == SVC_CLOSE)
1061 rqstp->rq_auth_stat = rpc_auth_ok;
1066 gss_write_init_verf(struct cache_detail *cd, struct svc_rqst *rqstp,
1067 struct xdr_netobj *out_handle, int *major_status)
1072 if (*major_status != GSS_S_COMPLETE)
1073 return gss_write_null_verf(rqstp);
1074 rsci = gss_svc_searchbyctx(cd, out_handle);
1076 *major_status = GSS_S_NO_CONTEXT;
1077 return gss_write_null_verf(rqstp);
1079 rc = gss_write_verf(rqstp, rsci->mechctx, GSS_SEQ_WIN);
1080 cache_put(&rsci->h, cd);
1085 gss_read_common_verf(struct rpc_gss_wire_cred *gc,
1086 struct kvec *argv, __be32 *authp,
1087 struct xdr_netobj *in_handle)
1089 /* Read the verifier; should be NULL: */
1090 *authp = rpc_autherr_badverf;
1091 if (argv->iov_len < 2 * 4)
1093 if (svc_getnl(argv) != RPC_AUTH_NULL)
1095 if (svc_getnl(argv) != 0)
1097 /* Martial context handle and token for upcall: */
1098 *authp = rpc_autherr_badcred;
1099 if (gc->gc_proc == RPC_GSS_PROC_INIT && gc->gc_ctx.len != 0)
1101 if (dup_netobj(in_handle, &gc->gc_ctx))
1103 *authp = rpc_autherr_badverf;
1109 gss_read_verf(struct rpc_gss_wire_cred *gc,
1110 struct kvec *argv, __be32 *authp,
1111 struct xdr_netobj *in_handle,
1112 struct xdr_netobj *in_token)
1114 struct xdr_netobj tmpobj;
1117 res = gss_read_common_verf(gc, argv, authp, in_handle);
1121 if (svc_safe_getnetobj(argv, &tmpobj)) {
1122 kfree(in_handle->data);
1125 if (dup_netobj(in_token, &tmpobj)) {
1126 kfree(in_handle->data);
1133 static void gss_free_in_token_pages(struct gssp_in_token *in_token)
1139 inlen = in_token->page_len;
1141 if (in_token->pages[i])
1142 put_page(in_token->pages[i]);
1143 inlen -= inlen > PAGE_SIZE ? PAGE_SIZE : inlen;
1146 kfree(in_token->pages);
1147 in_token->pages = NULL;
1150 static int gss_read_proxy_verf(struct svc_rqst *rqstp,
1151 struct rpc_gss_wire_cred *gc,
1152 struct xdr_netobj *in_handle,
1153 struct gssp_in_token *in_token)
1155 struct kvec *argv = &rqstp->rq_arg.head[0];
1156 unsigned int length, pgto_offs, pgfrom_offs;
1157 int pages, i, res, pgto, pgfrom;
1158 size_t inlen, to_offs, from_offs;
1160 res = gss_read_common_verf(gc, argv, &rqstp->rq_auth_stat, in_handle);
1164 inlen = svc_getnl(argv);
1165 if (inlen > (argv->iov_len + rqstp->rq_arg.page_len))
1168 pages = DIV_ROUND_UP(inlen, PAGE_SIZE);
1169 in_token->pages = kcalloc(pages, sizeof(struct page *), GFP_KERNEL);
1170 if (!in_token->pages)
1172 in_token->page_base = 0;
1173 in_token->page_len = inlen;
1174 for (i = 0; i < pages; i++) {
1175 in_token->pages[i] = alloc_page(GFP_KERNEL);
1176 if (!in_token->pages[i]) {
1177 gss_free_in_token_pages(in_token);
1182 length = min_t(unsigned int, inlen, argv->iov_len);
1183 memcpy(page_address(in_token->pages[0]), argv->iov_base, length);
1187 from_offs = rqstp->rq_arg.page_base;
1189 pgto = to_offs >> PAGE_SHIFT;
1190 pgfrom = from_offs >> PAGE_SHIFT;
1191 pgto_offs = to_offs & ~PAGE_MASK;
1192 pgfrom_offs = from_offs & ~PAGE_MASK;
1194 length = min_t(unsigned int, inlen,
1195 min_t(unsigned int, PAGE_SIZE - pgto_offs,
1196 PAGE_SIZE - pgfrom_offs));
1197 memcpy(page_address(in_token->pages[pgto]) + pgto_offs,
1198 page_address(rqstp->rq_arg.pages[pgfrom]) + pgfrom_offs,
1202 from_offs += length;
1209 gss_write_resv(struct kvec *resv, size_t size_limit,
1210 struct xdr_netobj *out_handle, struct xdr_netobj *out_token,
1211 int major_status, int minor_status)
1213 if (resv->iov_len + 4 > size_limit)
1215 svc_putnl(resv, RPC_SUCCESS);
1216 if (svc_safe_putnetobj(resv, out_handle))
1218 if (resv->iov_len + 3 * 4 > size_limit)
1220 svc_putnl(resv, major_status);
1221 svc_putnl(resv, minor_status);
1222 svc_putnl(resv, GSS_SEQ_WIN);
1223 if (svc_safe_putnetobj(resv, out_token))
1229 * Having read the cred already and found we're in the context
1230 * initiation case, read the verifier and initiate (or check the results
1231 * of) upcalls to userspace for help with context initiation. If
1232 * the upcall results are available, write the verifier and result.
1233 * Otherwise, drop the request pending an answer to the upcall.
1235 static int svcauth_gss_legacy_init(struct svc_rqst *rqstp,
1236 struct rpc_gss_wire_cred *gc)
1238 struct kvec *argv = &rqstp->rq_arg.head[0];
1239 struct kvec *resv = &rqstp->rq_res.head[0];
1240 struct rsi *rsip, rsikey;
1242 struct sunrpc_net *sn = net_generic(SVC_NET(rqstp), sunrpc_net_id);
1244 memset(&rsikey, 0, sizeof(rsikey));
1245 ret = gss_read_verf(gc, argv, &rqstp->rq_auth_stat,
1246 &rsikey.in_handle, &rsikey.in_token);
1250 /* Perform upcall, or find upcall result: */
1251 rsip = rsi_lookup(sn->rsi_cache, &rsikey);
1255 if (cache_check(sn->rsi_cache, &rsip->h, &rqstp->rq_chandle) < 0)
1256 /* No upcall result: */
1260 /* Got an answer to the upcall; use it: */
1261 if (gss_write_init_verf(sn->rsc_cache, rqstp,
1262 &rsip->out_handle, &rsip->major_status))
1264 if (gss_write_resv(resv, PAGE_SIZE,
1265 &rsip->out_handle, &rsip->out_token,
1266 rsip->major_status, rsip->minor_status))
1271 cache_put(&rsip->h, sn->rsi_cache);
1275 static int gss_proxy_save_rsc(struct cache_detail *cd,
1276 struct gssp_upcall_data *ud,
1279 struct rsc rsci, *rscp = NULL;
1280 static atomic64_t ctxhctr;
1282 struct gss_api_mech *gm = NULL;
1286 memset(&rsci, 0, sizeof(rsci));
1287 /* context handle */
1289 /* the handle needs to be just a unique id,
1290 * use a static counter */
1291 ctxh = atomic64_inc_return(&ctxhctr);
1293 /* make a copy for the caller */
1296 /* make a copy for the rsc cache */
1297 if (dup_to_netobj(&rsci.handle, (char *)handle, sizeof(uint64_t)))
1299 rscp = rsc_lookup(cd, &rsci);
1304 if (!ud->found_creds) {
1305 /* userspace seem buggy, we should always get at least a
1306 * mapping to nobody */
1309 struct timespec64 boot;
1312 rsci.cred = ud->creds;
1313 memset(&ud->creds, 0, sizeof(struct svc_cred));
1315 status = -EOPNOTSUPP;
1316 /* get mech handle from OID */
1317 gm = gss_mech_get_by_OID(&ud->mech_oid);
1320 rsci.cred.cr_gss_mech = gm;
1323 /* mech-specific data: */
1324 status = gss_import_sec_context(ud->out_handle.data,
1327 &expiry, GFP_KERNEL);
1331 getboottime64(&boot);
1332 expiry -= boot.tv_sec;
1335 rsci.h.expiry_time = expiry;
1336 rscp = rsc_update(cd, &rsci, rscp);
1341 cache_put(&rscp->h, cd);
1347 static int svcauth_gss_proxy_init(struct svc_rqst *rqstp,
1348 struct rpc_gss_wire_cred *gc)
1350 struct kvec *resv = &rqstp->rq_res.head[0];
1351 struct xdr_netobj cli_handle;
1352 struct gssp_upcall_data ud;
1356 struct net *net = SVC_NET(rqstp);
1357 struct sunrpc_net *sn = net_generic(net, sunrpc_net_id);
1359 memset(&ud, 0, sizeof(ud));
1360 ret = gss_read_proxy_verf(rqstp, gc, &ud.in_handle, &ud.in_token);
1366 /* Perform synchronous upcall to gss-proxy */
1367 status = gssp_accept_sec_context_upcall(net, &ud);
1371 trace_rpcgss_svc_accept_upcall(rqstp, ud.major_status, ud.minor_status);
1373 switch (ud.major_status) {
1374 case GSS_S_CONTINUE_NEEDED:
1375 cli_handle = ud.out_handle;
1377 case GSS_S_COMPLETE:
1378 status = gss_proxy_save_rsc(sn->rsc_cache, &ud, &handle);
1381 cli_handle.data = (u8 *)&handle;
1382 cli_handle.len = sizeof(handle);
1388 /* Got an answer to the upcall; use it: */
1389 if (gss_write_init_verf(sn->rsc_cache, rqstp,
1390 &cli_handle, &ud.major_status))
1392 if (gss_write_resv(resv, PAGE_SIZE,
1393 &cli_handle, &ud.out_token,
1394 ud.major_status, ud.minor_status))
1399 gss_free_in_token_pages(&ud.in_token);
1400 gssp_free_upcall_data(&ud);
1405 * Try to set the sn->use_gss_proxy variable to a new value. We only allow
1406 * it to be changed if it's currently undefined (-1). If it's any other value
1407 * then return -EBUSY unless the type wouldn't have changed anyway.
1409 static int set_gss_proxy(struct net *net, int type)
1411 struct sunrpc_net *sn = net_generic(net, sunrpc_net_id);
1414 WARN_ON_ONCE(type != 0 && type != 1);
1415 ret = cmpxchg(&sn->use_gss_proxy, -1, type);
1416 if (ret != -1 && ret != type)
1421 static bool use_gss_proxy(struct net *net)
1423 struct sunrpc_net *sn = net_generic(net, sunrpc_net_id);
1425 /* If use_gss_proxy is still undefined, then try to disable it */
1426 if (sn->use_gss_proxy == -1)
1427 set_gss_proxy(net, 0);
1428 return sn->use_gss_proxy;
1431 #ifdef CONFIG_PROC_FS
1433 static ssize_t write_gssp(struct file *file, const char __user *buf,
1434 size_t count, loff_t *ppos)
1436 struct net *net = PDE_DATA(file_inode(file));
1441 if (*ppos || count > sizeof(tbuf)-1)
1443 if (copy_from_user(tbuf, buf, count))
1447 res = kstrtoul(tbuf, 0, &i);
1452 res = set_gssp_clnt(net);
1455 res = set_gss_proxy(net, 1);
1461 static ssize_t read_gssp(struct file *file, char __user *buf,
1462 size_t count, loff_t *ppos)
1464 struct net *net = PDE_DATA(file_inode(file));
1465 struct sunrpc_net *sn = net_generic(net, sunrpc_net_id);
1466 unsigned long p = *ppos;
1470 snprintf(tbuf, sizeof(tbuf), "%d\n", sn->use_gss_proxy);
1477 if (copy_to_user(buf, (void *)(tbuf+p), len))
1483 static const struct proc_ops use_gss_proxy_proc_ops = {
1484 .proc_open = nonseekable_open,
1485 .proc_write = write_gssp,
1486 .proc_read = read_gssp,
1489 static int create_use_gss_proxy_proc_entry(struct net *net)
1491 struct sunrpc_net *sn = net_generic(net, sunrpc_net_id);
1492 struct proc_dir_entry **p = &sn->use_gssp_proc;
1494 sn->use_gss_proxy = -1;
1495 *p = proc_create_data("use-gss-proxy", S_IFREG | 0600,
1497 &use_gss_proxy_proc_ops, net);
1504 static void destroy_use_gss_proxy_proc_entry(struct net *net)
1506 struct sunrpc_net *sn = net_generic(net, sunrpc_net_id);
1508 if (sn->use_gssp_proc) {
1509 remove_proc_entry("use-gss-proxy", sn->proc_net_rpc);
1510 clear_gssp_clnt(sn);
1513 #else /* CONFIG_PROC_FS */
1515 static int create_use_gss_proxy_proc_entry(struct net *net)
1520 static void destroy_use_gss_proxy_proc_entry(struct net *net) {}
1522 #endif /* CONFIG_PROC_FS */
1525 * Accept an rpcsec packet.
1526 * If context establishment, punt to user space
1527 * If data exchange, verify/decrypt
1528 * If context destruction, handle here
1529 * In the context establishment and destruction case we encode
1530 * response here and return SVC_COMPLETE.
1533 svcauth_gss_accept(struct svc_rqst *rqstp)
1535 struct kvec *argv = &rqstp->rq_arg.head[0];
1536 struct kvec *resv = &rqstp->rq_res.head[0];
1538 struct gss_svc_data *svcdata = rqstp->rq_auth_data;
1539 struct rpc_gss_wire_cred *gc;
1540 struct rsc *rsci = NULL;
1542 __be32 *reject_stat = resv->iov_base + resv->iov_len;
1544 struct sunrpc_net *sn = net_generic(SVC_NET(rqstp), sunrpc_net_id);
1546 rqstp->rq_auth_stat = rpc_autherr_badcred;
1548 svcdata = kmalloc(sizeof(*svcdata), GFP_KERNEL);
1551 rqstp->rq_auth_data = svcdata;
1552 svcdata->verf_start = NULL;
1553 svcdata->rsci = NULL;
1554 gc = &svcdata->clcred;
1556 /* start of rpc packet is 7 u32's back from here:
1557 * xid direction rpcversion prog vers proc flavour
1559 rpcstart = argv->iov_base;
1563 * version(==1), proc(0,1,2,3), seq, service (1,2,3), handle
1564 * at least 5 u32s, and is preceded by length, so that makes 6.
1567 if (argv->iov_len < 5 * 4)
1569 crlen = svc_getnl(argv);
1570 if (svc_getnl(argv) != RPC_GSS_VERSION)
1572 gc->gc_proc = svc_getnl(argv);
1573 gc->gc_seq = svc_getnl(argv);
1574 gc->gc_svc = svc_getnl(argv);
1575 if (svc_safe_getnetobj(argv, &gc->gc_ctx))
1577 if (crlen != round_up_to_quad(gc->gc_ctx.len) + 5 * 4)
1580 if ((gc->gc_proc != RPC_GSS_PROC_DATA) && (rqstp->rq_proc != 0))
1583 rqstp->rq_auth_stat = rpc_autherr_badverf;
1584 switch (gc->gc_proc) {
1585 case RPC_GSS_PROC_INIT:
1586 case RPC_GSS_PROC_CONTINUE_INIT:
1587 if (use_gss_proxy(SVC_NET(rqstp)))
1588 return svcauth_gss_proxy_init(rqstp, gc);
1590 return svcauth_gss_legacy_init(rqstp, gc);
1591 case RPC_GSS_PROC_DATA:
1592 case RPC_GSS_PROC_DESTROY:
1593 /* Look up the context, and check the verifier: */
1594 rqstp->rq_auth_stat = rpcsec_gsserr_credproblem;
1595 rsci = gss_svc_searchbyctx(sn->rsc_cache, &gc->gc_ctx);
1598 switch (gss_verify_header(rqstp, rsci, rpcstart, gc)) {
1608 rqstp->rq_auth_stat = rpc_autherr_rejectedcred;
1612 /* now act upon the command: */
1613 switch (gc->gc_proc) {
1614 case RPC_GSS_PROC_DESTROY:
1615 if (gss_write_verf(rqstp, rsci->mechctx, gc->gc_seq))
1617 /* Delete the entry from the cache_list and call cache_put */
1618 sunrpc_cache_unhash(sn->rsc_cache, &rsci->h);
1619 if (resv->iov_len + 4 > PAGE_SIZE)
1621 svc_putnl(resv, RPC_SUCCESS);
1623 case RPC_GSS_PROC_DATA:
1624 rqstp->rq_auth_stat = rpcsec_gsserr_ctxproblem;
1625 svcdata->verf_start = resv->iov_base + resv->iov_len;
1626 if (gss_write_verf(rqstp, rsci->mechctx, gc->gc_seq))
1628 rqstp->rq_cred = rsci->cred;
1629 get_group_info(rsci->cred.cr_group_info);
1630 rqstp->rq_auth_stat = rpc_autherr_badcred;
1631 switch (gc->gc_svc) {
1632 case RPC_GSS_SVC_NONE:
1634 case RPC_GSS_SVC_INTEGRITY:
1635 /* placeholders for length and seq. number: */
1638 if (unwrap_integ_data(rqstp, &rqstp->rq_arg,
1639 gc->gc_seq, rsci->mechctx))
1641 rqstp->rq_auth_slack = RPC_MAX_AUTH_SIZE;
1643 case RPC_GSS_SVC_PRIVACY:
1644 /* placeholders for length and seq. number: */
1647 if (unwrap_priv_data(rqstp, &rqstp->rq_arg,
1648 gc->gc_seq, rsci->mechctx))
1650 rqstp->rq_auth_slack = RPC_MAX_AUTH_SIZE * 2;
1655 svcdata->rsci = rsci;
1656 cache_get(&rsci->h);
1657 rqstp->rq_cred.cr_flavor = gss_svc_to_pseudoflavor(
1658 rsci->mechctx->mech_type,
1662 trace_rpcgss_svc_authenticate(rqstp, gc);
1669 /* Restore write pointer to its original value: */
1670 xdr_ressize_check(rqstp, reject_stat);
1680 cache_put(&rsci->h, sn->rsc_cache);
1685 svcauth_gss_prepare_to_wrap(struct xdr_buf *resbuf, struct gss_svc_data *gsd)
1690 p = gsd->verf_start;
1691 gsd->verf_start = NULL;
1693 /* If the reply stat is nonzero, don't wrap: */
1694 if (*(p-1) != rpc_success)
1696 /* Skip the verifier: */
1698 verf_len = ntohl(*p++);
1699 p += XDR_QUADLEN(verf_len);
1700 /* move accept_stat to right place: */
1701 memcpy(p, p + 2, 4);
1702 /* Also don't wrap if the accept stat is nonzero: */
1703 if (*p != rpc_success) {
1704 resbuf->head[0].iov_len -= 2 * 4;
1712 svcauth_gss_wrap_resp_integ(struct svc_rqst *rqstp)
1714 struct gss_svc_data *gsd = (struct gss_svc_data *)rqstp->rq_auth_data;
1715 struct rpc_gss_wire_cred *gc = &gsd->clcred;
1716 struct xdr_buf *resbuf = &rqstp->rq_res;
1717 struct xdr_buf integ_buf;
1718 struct xdr_netobj mic;
1721 int integ_offset, integ_len;
1724 p = svcauth_gss_prepare_to_wrap(resbuf, gsd);
1727 integ_offset = (u8 *)(p + 1) - (u8 *)resbuf->head[0].iov_base;
1728 integ_len = resbuf->len - integ_offset;
1731 *p++ = htonl(integ_len);
1732 *p++ = htonl(gc->gc_seq);
1733 if (xdr_buf_subsegment(resbuf, &integ_buf, integ_offset, integ_len)) {
1737 if (resbuf->tail[0].iov_base == NULL) {
1738 if (resbuf->head[0].iov_len + RPC_MAX_AUTH_SIZE > PAGE_SIZE)
1740 resbuf->tail[0].iov_base = resbuf->head[0].iov_base
1741 + resbuf->head[0].iov_len;
1742 resbuf->tail[0].iov_len = 0;
1744 resv = &resbuf->tail[0];
1745 mic.data = (u8 *)resv->iov_base + resv->iov_len + 4;
1746 if (gss_get_mic(gsd->rsci->mechctx, &integ_buf, &mic))
1748 svc_putnl(resv, mic.len);
1749 memset(mic.data + mic.len, 0,
1750 round_up_to_quad(mic.len) - mic.len);
1751 resv->iov_len += XDR_QUADLEN(mic.len) << 2;
1752 /* not strictly required: */
1753 resbuf->len += XDR_QUADLEN(mic.len) << 2;
1754 if (resv->iov_len > PAGE_SIZE)
1763 svcauth_gss_wrap_resp_priv(struct svc_rqst *rqstp)
1765 struct gss_svc_data *gsd = (struct gss_svc_data *)rqstp->rq_auth_data;
1766 struct rpc_gss_wire_cred *gc = &gsd->clcred;
1767 struct xdr_buf *resbuf = &rqstp->rq_res;
1768 struct page **inpages = NULL;
1773 p = svcauth_gss_prepare_to_wrap(resbuf, gsd);
1777 offset = (u8 *)p - (u8 *)resbuf->head[0].iov_base;
1778 *p++ = htonl(gc->gc_seq);
1779 inpages = resbuf->pages;
1780 /* XXX: Would be better to write some xdr helper functions for
1781 * nfs{2,3,4}xdr.c that place the data right, instead of copying: */
1784 * If there is currently tail data, make sure there is
1785 * room for the head, tail, and 2 * RPC_MAX_AUTH_SIZE in
1786 * the page, and move the current tail data such that
1787 * there is RPC_MAX_AUTH_SIZE slack space available in
1788 * both the head and tail.
1790 if (resbuf->tail[0].iov_base) {
1791 if (resbuf->tail[0].iov_base >=
1792 resbuf->head[0].iov_base + PAGE_SIZE)
1794 if (resbuf->tail[0].iov_base < resbuf->head[0].iov_base)
1796 if (resbuf->tail[0].iov_len + resbuf->head[0].iov_len
1797 + 2 * RPC_MAX_AUTH_SIZE > PAGE_SIZE)
1799 memmove(resbuf->tail[0].iov_base + RPC_MAX_AUTH_SIZE,
1800 resbuf->tail[0].iov_base,
1801 resbuf->tail[0].iov_len);
1802 resbuf->tail[0].iov_base += RPC_MAX_AUTH_SIZE;
1805 * If there is no current tail data, make sure there is
1806 * room for the head data, and 2 * RPC_MAX_AUTH_SIZE in the
1807 * allotted page, and set up tail information such that there
1808 * is RPC_MAX_AUTH_SIZE slack space available in both the
1811 if (resbuf->tail[0].iov_base == NULL) {
1812 if (resbuf->head[0].iov_len + 2*RPC_MAX_AUTH_SIZE > PAGE_SIZE)
1814 resbuf->tail[0].iov_base = resbuf->head[0].iov_base
1815 + resbuf->head[0].iov_len + RPC_MAX_AUTH_SIZE;
1816 resbuf->tail[0].iov_len = 0;
1818 if (gss_wrap(gsd->rsci->mechctx, offset, resbuf, inpages))
1820 *len = htonl(resbuf->len - offset);
1821 pad = 3 - ((resbuf->len - offset - 1)&3);
1822 p = (__be32 *)(resbuf->tail[0].iov_base + resbuf->tail[0].iov_len);
1824 resbuf->tail[0].iov_len += pad;
1830 svcauth_gss_release(struct svc_rqst *rqstp)
1832 struct gss_svc_data *gsd = (struct gss_svc_data *)rqstp->rq_auth_data;
1833 struct rpc_gss_wire_cred *gc;
1834 struct xdr_buf *resbuf = &rqstp->rq_res;
1836 struct sunrpc_net *sn = net_generic(SVC_NET(rqstp), sunrpc_net_id);
1841 if (gc->gc_proc != RPC_GSS_PROC_DATA)
1843 /* Release can be called twice, but we only wrap once. */
1844 if (gsd->verf_start == NULL)
1846 /* normally not set till svc_send, but we need it here: */
1847 /* XXX: what for? Do we mess it up the moment we call svc_putu32
1849 resbuf->len = total_buf_len(resbuf);
1850 switch (gc->gc_svc) {
1851 case RPC_GSS_SVC_NONE:
1853 case RPC_GSS_SVC_INTEGRITY:
1854 stat = svcauth_gss_wrap_resp_integ(rqstp);
1858 case RPC_GSS_SVC_PRIVACY:
1859 stat = svcauth_gss_wrap_resp_priv(rqstp);
1864 * For any other gc_svc value, svcauth_gss_accept() already set
1865 * the auth_error appropriately; just fall through:
1872 if (rqstp->rq_client)
1873 auth_domain_put(rqstp->rq_client);
1874 rqstp->rq_client = NULL;
1875 if (rqstp->rq_gssclient)
1876 auth_domain_put(rqstp->rq_gssclient);
1877 rqstp->rq_gssclient = NULL;
1878 if (rqstp->rq_cred.cr_group_info)
1879 put_group_info(rqstp->rq_cred.cr_group_info);
1880 rqstp->rq_cred.cr_group_info = NULL;
1881 if (gsd && gsd->rsci) {
1882 cache_put(&gsd->rsci->h, sn->rsc_cache);
1889 svcauth_gss_domain_release_rcu(struct rcu_head *head)
1891 struct auth_domain *dom = container_of(head, struct auth_domain, rcu_head);
1892 struct gss_domain *gd = container_of(dom, struct gss_domain, h);
1899 svcauth_gss_domain_release(struct auth_domain *dom)
1901 call_rcu(&dom->rcu_head, svcauth_gss_domain_release_rcu);
1904 static struct auth_ops svcauthops_gss = {
1905 .name = "rpcsec_gss",
1906 .owner = THIS_MODULE,
1907 .flavour = RPC_AUTH_GSS,
1908 .accept = svcauth_gss_accept,
1909 .release = svcauth_gss_release,
1910 .domain_release = svcauth_gss_domain_release,
1911 .set_client = svcauth_gss_set_client,
1914 static int rsi_cache_create_net(struct net *net)
1916 struct sunrpc_net *sn = net_generic(net, sunrpc_net_id);
1917 struct cache_detail *cd;
1920 cd = cache_create_net(&rsi_cache_template, net);
1923 err = cache_register_net(cd, net);
1925 cache_destroy_net(cd, net);
1932 static void rsi_cache_destroy_net(struct net *net)
1934 struct sunrpc_net *sn = net_generic(net, sunrpc_net_id);
1935 struct cache_detail *cd = sn->rsi_cache;
1937 sn->rsi_cache = NULL;
1939 cache_unregister_net(cd, net);
1940 cache_destroy_net(cd, net);
1943 static int rsc_cache_create_net(struct net *net)
1945 struct sunrpc_net *sn = net_generic(net, sunrpc_net_id);
1946 struct cache_detail *cd;
1949 cd = cache_create_net(&rsc_cache_template, net);
1952 err = cache_register_net(cd, net);
1954 cache_destroy_net(cd, net);
1961 static void rsc_cache_destroy_net(struct net *net)
1963 struct sunrpc_net *sn = net_generic(net, sunrpc_net_id);
1964 struct cache_detail *cd = sn->rsc_cache;
1966 sn->rsc_cache = NULL;
1968 cache_unregister_net(cd, net);
1969 cache_destroy_net(cd, net);
1973 gss_svc_init_net(struct net *net)
1977 rv = rsc_cache_create_net(net);
1980 rv = rsi_cache_create_net(net);
1983 rv = create_use_gss_proxy_proc_entry(net);
1988 rsi_cache_destroy_net(net);
1990 rsc_cache_destroy_net(net);
1995 gss_svc_shutdown_net(struct net *net)
1997 destroy_use_gss_proxy_proc_entry(net);
1998 rsi_cache_destroy_net(net);
1999 rsc_cache_destroy_net(net);
2005 return svc_auth_register(RPC_AUTH_GSS, &svcauthops_gss);
2009 gss_svc_shutdown(void)
2011 svc_auth_unregister(RPC_AUTH_GSS);