Loading...
1// SPDX-License-Identifier: GPL-2.0-only
2#include <linux/types.h>
3#include <linux/sched.h>
4#include <linux/module.h>
5#include <linux/sunrpc/types.h>
6#include <linux/sunrpc/xdr.h>
7#include <linux/sunrpc/svcsock.h>
8#include <linux/sunrpc/svcauth.h>
9#include <linux/sunrpc/gss_api.h>
10#include <linux/sunrpc/addr.h>
11#include <linux/err.h>
12#include <linux/seq_file.h>
13#include <linux/hash.h>
14#include <linux/string.h>
15#include <linux/slab.h>
16#include <net/sock.h>
17#include <net/ipv6.h>
18#include <linux/kernel.h>
19#include <linux/user_namespace.h>
20#include <trace/events/sunrpc.h>
21
22#define RPCDBG_FACILITY RPCDBG_AUTH
23
24#include "netns.h"
25
26/*
27 * AUTHUNIX and AUTHNULL credentials are both handled here.
28 * AUTHNULL is treated just like AUTHUNIX except that the uid/gid
29 * are always nobody (-2). i.e. we do the same IP address checks for
30 * AUTHNULL as for AUTHUNIX, and that is done here.
31 */
32
33
34struct unix_domain {
35 struct auth_domain h;
36 /* other stuff later */
37};
38
39extern struct auth_ops svcauth_null;
40extern struct auth_ops svcauth_unix;
41extern struct auth_ops svcauth_tls;
42
43static void svcauth_unix_domain_release_rcu(struct rcu_head *head)
44{
45 struct auth_domain *dom = container_of(head, struct auth_domain, rcu_head);
46 struct unix_domain *ud = container_of(dom, struct unix_domain, h);
47
48 kfree(dom->name);
49 kfree(ud);
50}
51
52static void svcauth_unix_domain_release(struct auth_domain *dom)
53{
54 call_rcu(&dom->rcu_head, svcauth_unix_domain_release_rcu);
55}
56
57struct auth_domain *unix_domain_find(char *name)
58{
59 struct auth_domain *rv;
60 struct unix_domain *new = NULL;
61
62 rv = auth_domain_find(name);
63 while(1) {
64 if (rv) {
65 if (new && rv != &new->h)
66 svcauth_unix_domain_release(&new->h);
67
68 if (rv->flavour != &svcauth_unix) {
69 auth_domain_put(rv);
70 return NULL;
71 }
72 return rv;
73 }
74
75 new = kmalloc(sizeof(*new), GFP_KERNEL);
76 if (new == NULL)
77 return NULL;
78 kref_init(&new->h.ref);
79 new->h.name = kstrdup(name, GFP_KERNEL);
80 if (new->h.name == NULL) {
81 kfree(new);
82 return NULL;
83 }
84 new->h.flavour = &svcauth_unix;
85 rv = auth_domain_lookup(name, &new->h);
86 }
87}
88EXPORT_SYMBOL_GPL(unix_domain_find);
89
90
91/**************************************************
92 * cache for IP address to unix_domain
93 * as needed by AUTH_UNIX
94 */
95#define IP_HASHBITS 8
96#define IP_HASHMAX (1<<IP_HASHBITS)
97
98struct ip_map {
99 struct cache_head h;
100 char m_class[8]; /* e.g. "nfsd" */
101 struct in6_addr m_addr;
102 struct unix_domain *m_client;
103 struct rcu_head m_rcu;
104};
105
106static void ip_map_put(struct kref *kref)
107{
108 struct cache_head *item = container_of(kref, struct cache_head, ref);
109 struct ip_map *im = container_of(item, struct ip_map,h);
110
111 if (test_bit(CACHE_VALID, &item->flags) &&
112 !test_bit(CACHE_NEGATIVE, &item->flags))
113 auth_domain_put(&im->m_client->h);
114 kfree_rcu(im, m_rcu);
115}
116
117static inline int hash_ip6(const struct in6_addr *ip)
118{
119 return hash_32(ipv6_addr_hash(ip), IP_HASHBITS);
120}
121static int ip_map_match(struct cache_head *corig, struct cache_head *cnew)
122{
123 struct ip_map *orig = container_of(corig, struct ip_map, h);
124 struct ip_map *new = container_of(cnew, struct ip_map, h);
125 return strcmp(orig->m_class, new->m_class) == 0 &&
126 ipv6_addr_equal(&orig->m_addr, &new->m_addr);
127}
128static void ip_map_init(struct cache_head *cnew, struct cache_head *citem)
129{
130 struct ip_map *new = container_of(cnew, struct ip_map, h);
131 struct ip_map *item = container_of(citem, struct ip_map, h);
132
133 strcpy(new->m_class, item->m_class);
134 new->m_addr = item->m_addr;
135}
136static void update(struct cache_head *cnew, struct cache_head *citem)
137{
138 struct ip_map *new = container_of(cnew, struct ip_map, h);
139 struct ip_map *item = container_of(citem, struct ip_map, h);
140
141 kref_get(&item->m_client->h.ref);
142 new->m_client = item->m_client;
143}
144static struct cache_head *ip_map_alloc(void)
145{
146 struct ip_map *i = kmalloc(sizeof(*i), GFP_KERNEL);
147 if (i)
148 return &i->h;
149 else
150 return NULL;
151}
152
153static int ip_map_upcall(struct cache_detail *cd, struct cache_head *h)
154{
155 return sunrpc_cache_pipe_upcall(cd, h);
156}
157
158static void ip_map_request(struct cache_detail *cd,
159 struct cache_head *h,
160 char **bpp, int *blen)
161{
162 char text_addr[40];
163 struct ip_map *im = container_of(h, struct ip_map, h);
164
165 if (ipv6_addr_v4mapped(&(im->m_addr))) {
166 snprintf(text_addr, 20, "%pI4", &im->m_addr.s6_addr32[3]);
167 } else {
168 snprintf(text_addr, 40, "%pI6", &im->m_addr);
169 }
170 qword_add(bpp, blen, im->m_class);
171 qword_add(bpp, blen, text_addr);
172 (*bpp)[-1] = '\n';
173}
174
175static struct ip_map *__ip_map_lookup(struct cache_detail *cd, char *class, struct in6_addr *addr);
176static int __ip_map_update(struct cache_detail *cd, struct ip_map *ipm, struct unix_domain *udom, time64_t expiry);
177
178static int ip_map_parse(struct cache_detail *cd,
179 char *mesg, int mlen)
180{
181 /* class ipaddress [domainname] */
182 /* should be safe just to use the start of the input buffer
183 * for scratch: */
184 char *buf = mesg;
185 int len;
186 char class[8];
187 union {
188 struct sockaddr sa;
189 struct sockaddr_in s4;
190 struct sockaddr_in6 s6;
191 } address;
192 struct sockaddr_in6 sin6;
193 int err;
194
195 struct ip_map *ipmp;
196 struct auth_domain *dom;
197 time64_t expiry;
198
199 if (mesg[mlen-1] != '\n')
200 return -EINVAL;
201 mesg[mlen-1] = 0;
202
203 /* class */
204 len = qword_get(&mesg, class, sizeof(class));
205 if (len <= 0) return -EINVAL;
206
207 /* ip address */
208 len = qword_get(&mesg, buf, mlen);
209 if (len <= 0) return -EINVAL;
210
211 if (rpc_pton(cd->net, buf, len, &address.sa, sizeof(address)) == 0)
212 return -EINVAL;
213 switch (address.sa.sa_family) {
214 case AF_INET:
215 /* Form a mapped IPv4 address in sin6 */
216 sin6.sin6_family = AF_INET6;
217 ipv6_addr_set_v4mapped(address.s4.sin_addr.s_addr,
218 &sin6.sin6_addr);
219 break;
220#if IS_ENABLED(CONFIG_IPV6)
221 case AF_INET6:
222 memcpy(&sin6, &address.s6, sizeof(sin6));
223 break;
224#endif
225 default:
226 return -EINVAL;
227 }
228
229 err = get_expiry(&mesg, &expiry);
230 if (err)
231 return err;
232
233 /* domainname, or empty for NEGATIVE */
234 len = qword_get(&mesg, buf, mlen);
235 if (len < 0) return -EINVAL;
236
237 if (len) {
238 dom = unix_domain_find(buf);
239 if (dom == NULL)
240 return -ENOENT;
241 } else
242 dom = NULL;
243
244 /* IPv6 scope IDs are ignored for now */
245 ipmp = __ip_map_lookup(cd, class, &sin6.sin6_addr);
246 if (ipmp) {
247 err = __ip_map_update(cd, ipmp,
248 container_of(dom, struct unix_domain, h),
249 expiry);
250 } else
251 err = -ENOMEM;
252
253 if (dom)
254 auth_domain_put(dom);
255
256 cache_flush();
257 return err;
258}
259
260static int ip_map_show(struct seq_file *m,
261 struct cache_detail *cd,
262 struct cache_head *h)
263{
264 struct ip_map *im;
265 struct in6_addr addr;
266 char *dom = "-no-domain-";
267
268 if (h == NULL) {
269 seq_puts(m, "#class IP domain\n");
270 return 0;
271 }
272 im = container_of(h, struct ip_map, h);
273 /* class addr domain */
274 addr = im->m_addr;
275
276 if (test_bit(CACHE_VALID, &h->flags) &&
277 !test_bit(CACHE_NEGATIVE, &h->flags))
278 dom = im->m_client->h.name;
279
280 if (ipv6_addr_v4mapped(&addr)) {
281 seq_printf(m, "%s %pI4 %s\n",
282 im->m_class, &addr.s6_addr32[3], dom);
283 } else {
284 seq_printf(m, "%s %pI6 %s\n", im->m_class, &addr, dom);
285 }
286 return 0;
287}
288
289
290static struct ip_map *__ip_map_lookup(struct cache_detail *cd, char *class,
291 struct in6_addr *addr)
292{
293 struct ip_map ip;
294 struct cache_head *ch;
295
296 strcpy(ip.m_class, class);
297 ip.m_addr = *addr;
298 ch = sunrpc_cache_lookup_rcu(cd, &ip.h,
299 hash_str(class, IP_HASHBITS) ^
300 hash_ip6(addr));
301
302 if (ch)
303 return container_of(ch, struct ip_map, h);
304 else
305 return NULL;
306}
307
308static int __ip_map_update(struct cache_detail *cd, struct ip_map *ipm,
309 struct unix_domain *udom, time64_t expiry)
310{
311 struct ip_map ip;
312 struct cache_head *ch;
313
314 ip.m_client = udom;
315 ip.h.flags = 0;
316 if (!udom)
317 set_bit(CACHE_NEGATIVE, &ip.h.flags);
318 ip.h.expiry_time = expiry;
319 ch = sunrpc_cache_update(cd, &ip.h, &ipm->h,
320 hash_str(ipm->m_class, IP_HASHBITS) ^
321 hash_ip6(&ipm->m_addr));
322 if (!ch)
323 return -ENOMEM;
324 cache_put(ch, cd);
325 return 0;
326}
327
328void svcauth_unix_purge(struct net *net)
329{
330 struct sunrpc_net *sn;
331
332 sn = net_generic(net, sunrpc_net_id);
333 cache_purge(sn->ip_map_cache);
334}
335EXPORT_SYMBOL_GPL(svcauth_unix_purge);
336
337static inline struct ip_map *
338ip_map_cached_get(struct svc_xprt *xprt)
339{
340 struct ip_map *ipm = NULL;
341 struct sunrpc_net *sn;
342
343 if (test_bit(XPT_CACHE_AUTH, &xprt->xpt_flags)) {
344 spin_lock(&xprt->xpt_lock);
345 ipm = xprt->xpt_auth_cache;
346 if (ipm != NULL) {
347 sn = net_generic(xprt->xpt_net, sunrpc_net_id);
348 if (cache_is_expired(sn->ip_map_cache, &ipm->h)) {
349 /*
350 * The entry has been invalidated since it was
351 * remembered, e.g. by a second mount from the
352 * same IP address.
353 */
354 xprt->xpt_auth_cache = NULL;
355 spin_unlock(&xprt->xpt_lock);
356 cache_put(&ipm->h, sn->ip_map_cache);
357 return NULL;
358 }
359 cache_get(&ipm->h);
360 }
361 spin_unlock(&xprt->xpt_lock);
362 }
363 return ipm;
364}
365
366static inline void
367ip_map_cached_put(struct svc_xprt *xprt, struct ip_map *ipm)
368{
369 if (test_bit(XPT_CACHE_AUTH, &xprt->xpt_flags)) {
370 spin_lock(&xprt->xpt_lock);
371 if (xprt->xpt_auth_cache == NULL) {
372 /* newly cached, keep the reference */
373 xprt->xpt_auth_cache = ipm;
374 ipm = NULL;
375 }
376 spin_unlock(&xprt->xpt_lock);
377 }
378 if (ipm) {
379 struct sunrpc_net *sn;
380
381 sn = net_generic(xprt->xpt_net, sunrpc_net_id);
382 cache_put(&ipm->h, sn->ip_map_cache);
383 }
384}
385
386void
387svcauth_unix_info_release(struct svc_xprt *xpt)
388{
389 struct ip_map *ipm;
390
391 ipm = xpt->xpt_auth_cache;
392 if (ipm != NULL) {
393 struct sunrpc_net *sn;
394
395 sn = net_generic(xpt->xpt_net, sunrpc_net_id);
396 cache_put(&ipm->h, sn->ip_map_cache);
397 }
398}
399
400/****************************************************************************
401 * auth.unix.gid cache
402 * simple cache to map a UID to a list of GIDs
403 * because AUTH_UNIX aka AUTH_SYS has a max of UNX_NGROUPS
404 */
405#define GID_HASHBITS 8
406#define GID_HASHMAX (1<<GID_HASHBITS)
407
408struct unix_gid {
409 struct cache_head h;
410 kuid_t uid;
411 struct group_info *gi;
412 struct rcu_head rcu;
413};
414
415static int unix_gid_hash(kuid_t uid)
416{
417 return hash_long(from_kuid(&init_user_ns, uid), GID_HASHBITS);
418}
419
420static void unix_gid_free(struct rcu_head *rcu)
421{
422 struct unix_gid *ug = container_of(rcu, struct unix_gid, rcu);
423 struct cache_head *item = &ug->h;
424
425 if (test_bit(CACHE_VALID, &item->flags) &&
426 !test_bit(CACHE_NEGATIVE, &item->flags))
427 put_group_info(ug->gi);
428 kfree(ug);
429}
430
431static void unix_gid_put(struct kref *kref)
432{
433 struct cache_head *item = container_of(kref, struct cache_head, ref);
434 struct unix_gid *ug = container_of(item, struct unix_gid, h);
435
436 call_rcu(&ug->rcu, unix_gid_free);
437}
438
439static int unix_gid_match(struct cache_head *corig, struct cache_head *cnew)
440{
441 struct unix_gid *orig = container_of(corig, struct unix_gid, h);
442 struct unix_gid *new = container_of(cnew, struct unix_gid, h);
443 return uid_eq(orig->uid, new->uid);
444}
445static void unix_gid_init(struct cache_head *cnew, struct cache_head *citem)
446{
447 struct unix_gid *new = container_of(cnew, struct unix_gid, h);
448 struct unix_gid *item = container_of(citem, struct unix_gid, h);
449 new->uid = item->uid;
450}
451static void unix_gid_update(struct cache_head *cnew, struct cache_head *citem)
452{
453 struct unix_gid *new = container_of(cnew, struct unix_gid, h);
454 struct unix_gid *item = container_of(citem, struct unix_gid, h);
455
456 get_group_info(item->gi);
457 new->gi = item->gi;
458}
459static struct cache_head *unix_gid_alloc(void)
460{
461 struct unix_gid *g = kmalloc(sizeof(*g), GFP_KERNEL);
462 if (g)
463 return &g->h;
464 else
465 return NULL;
466}
467
468static int unix_gid_upcall(struct cache_detail *cd, struct cache_head *h)
469{
470 return sunrpc_cache_pipe_upcall_timeout(cd, h);
471}
472
473static void unix_gid_request(struct cache_detail *cd,
474 struct cache_head *h,
475 char **bpp, int *blen)
476{
477 char tuid[20];
478 struct unix_gid *ug = container_of(h, struct unix_gid, h);
479
480 snprintf(tuid, 20, "%u", from_kuid(&init_user_ns, ug->uid));
481 qword_add(bpp, blen, tuid);
482 (*bpp)[-1] = '\n';
483}
484
485static struct unix_gid *unix_gid_lookup(struct cache_detail *cd, kuid_t uid);
486
487static int unix_gid_parse(struct cache_detail *cd,
488 char *mesg, int mlen)
489{
490 /* uid expiry Ngid gid0 gid1 ... gidN-1 */
491 int id;
492 kuid_t uid;
493 int gids;
494 int rv;
495 int i;
496 int err;
497 time64_t expiry;
498 struct unix_gid ug, *ugp;
499
500 if (mesg[mlen - 1] != '\n')
501 return -EINVAL;
502 mesg[mlen-1] = 0;
503
504 rv = get_int(&mesg, &id);
505 if (rv)
506 return -EINVAL;
507 uid = make_kuid(current_user_ns(), id);
508 ug.uid = uid;
509
510 err = get_expiry(&mesg, &expiry);
511 if (err)
512 return err;
513
514 rv = get_int(&mesg, &gids);
515 if (rv || gids < 0 || gids > 8192)
516 return -EINVAL;
517
518 ug.gi = groups_alloc(gids);
519 if (!ug.gi)
520 return -ENOMEM;
521
522 for (i = 0 ; i < gids ; i++) {
523 int gid;
524 kgid_t kgid;
525 rv = get_int(&mesg, &gid);
526 err = -EINVAL;
527 if (rv)
528 goto out;
529 kgid = make_kgid(current_user_ns(), gid);
530 if (!gid_valid(kgid))
531 goto out;
532 ug.gi->gid[i] = kgid;
533 }
534
535 groups_sort(ug.gi);
536 ugp = unix_gid_lookup(cd, uid);
537 if (ugp) {
538 struct cache_head *ch;
539 ug.h.flags = 0;
540 ug.h.expiry_time = expiry;
541 ch = sunrpc_cache_update(cd,
542 &ug.h, &ugp->h,
543 unix_gid_hash(uid));
544 if (!ch)
545 err = -ENOMEM;
546 else {
547 err = 0;
548 cache_put(ch, cd);
549 }
550 } else
551 err = -ENOMEM;
552 out:
553 if (ug.gi)
554 put_group_info(ug.gi);
555 return err;
556}
557
558static int unix_gid_show(struct seq_file *m,
559 struct cache_detail *cd,
560 struct cache_head *h)
561{
562 struct user_namespace *user_ns = m->file->f_cred->user_ns;
563 struct unix_gid *ug;
564 int i;
565 int glen;
566
567 if (h == NULL) {
568 seq_puts(m, "#uid cnt: gids...\n");
569 return 0;
570 }
571 ug = container_of(h, struct unix_gid, h);
572 if (test_bit(CACHE_VALID, &h->flags) &&
573 !test_bit(CACHE_NEGATIVE, &h->flags))
574 glen = ug->gi->ngroups;
575 else
576 glen = 0;
577
578 seq_printf(m, "%u %d:", from_kuid_munged(user_ns, ug->uid), glen);
579 for (i = 0; i < glen; i++)
580 seq_printf(m, " %d", from_kgid_munged(user_ns, ug->gi->gid[i]));
581 seq_printf(m, "\n");
582 return 0;
583}
584
585static const struct cache_detail unix_gid_cache_template = {
586 .owner = THIS_MODULE,
587 .hash_size = GID_HASHMAX,
588 .name = "auth.unix.gid",
589 .cache_put = unix_gid_put,
590 .cache_upcall = unix_gid_upcall,
591 .cache_request = unix_gid_request,
592 .cache_parse = unix_gid_parse,
593 .cache_show = unix_gid_show,
594 .match = unix_gid_match,
595 .init = unix_gid_init,
596 .update = unix_gid_update,
597 .alloc = unix_gid_alloc,
598};
599
600int unix_gid_cache_create(struct net *net)
601{
602 struct sunrpc_net *sn = net_generic(net, sunrpc_net_id);
603 struct cache_detail *cd;
604 int err;
605
606 cd = cache_create_net(&unix_gid_cache_template, net);
607 if (IS_ERR(cd))
608 return PTR_ERR(cd);
609 err = cache_register_net(cd, net);
610 if (err) {
611 cache_destroy_net(cd, net);
612 return err;
613 }
614 sn->unix_gid_cache = cd;
615 return 0;
616}
617
618void unix_gid_cache_destroy(struct net *net)
619{
620 struct sunrpc_net *sn = net_generic(net, sunrpc_net_id);
621 struct cache_detail *cd = sn->unix_gid_cache;
622
623 sn->unix_gid_cache = NULL;
624 cache_purge(cd);
625 cache_unregister_net(cd, net);
626 cache_destroy_net(cd, net);
627}
628
629static struct unix_gid *unix_gid_lookup(struct cache_detail *cd, kuid_t uid)
630{
631 struct unix_gid ug;
632 struct cache_head *ch;
633
634 ug.uid = uid;
635 ch = sunrpc_cache_lookup_rcu(cd, &ug.h, unix_gid_hash(uid));
636 if (ch)
637 return container_of(ch, struct unix_gid, h);
638 else
639 return NULL;
640}
641
642static struct group_info *unix_gid_find(kuid_t uid, struct svc_rqst *rqstp)
643{
644 struct unix_gid *ug;
645 struct group_info *gi;
646 int ret;
647 struct sunrpc_net *sn = net_generic(rqstp->rq_xprt->xpt_net,
648 sunrpc_net_id);
649
650 ug = unix_gid_lookup(sn->unix_gid_cache, uid);
651 if (!ug)
652 return ERR_PTR(-EAGAIN);
653 ret = cache_check(sn->unix_gid_cache, &ug->h, &rqstp->rq_chandle);
654 switch (ret) {
655 case -ENOENT:
656 return ERR_PTR(-ENOENT);
657 case -ETIMEDOUT:
658 return ERR_PTR(-ESHUTDOWN);
659 case 0:
660 gi = get_group_info(ug->gi);
661 cache_put(&ug->h, sn->unix_gid_cache);
662 return gi;
663 default:
664 return ERR_PTR(-EAGAIN);
665 }
666}
667
668enum svc_auth_status
669svcauth_unix_set_client(struct svc_rqst *rqstp)
670{
671 struct sockaddr_in *sin;
672 struct sockaddr_in6 *sin6, sin6_storage;
673 struct ip_map *ipm;
674 struct group_info *gi;
675 struct svc_cred *cred = &rqstp->rq_cred;
676 struct svc_xprt *xprt = rqstp->rq_xprt;
677 struct net *net = xprt->xpt_net;
678 struct sunrpc_net *sn = net_generic(net, sunrpc_net_id);
679
680 switch (rqstp->rq_addr.ss_family) {
681 case AF_INET:
682 sin = svc_addr_in(rqstp);
683 sin6 = &sin6_storage;
684 ipv6_addr_set_v4mapped(sin->sin_addr.s_addr, &sin6->sin6_addr);
685 break;
686 case AF_INET6:
687 sin6 = svc_addr_in6(rqstp);
688 break;
689 default:
690 BUG();
691 }
692
693 rqstp->rq_client = NULL;
694 if (rqstp->rq_proc == 0)
695 goto out;
696
697 rqstp->rq_auth_stat = rpc_autherr_badcred;
698 ipm = ip_map_cached_get(xprt);
699 if (ipm == NULL)
700 ipm = __ip_map_lookup(sn->ip_map_cache,
701 rqstp->rq_server->sv_programs->pg_class,
702 &sin6->sin6_addr);
703
704 if (ipm == NULL)
705 return SVC_DENIED;
706
707 switch (cache_check(sn->ip_map_cache, &ipm->h, &rqstp->rq_chandle)) {
708 default:
709 BUG();
710 case -ETIMEDOUT:
711 return SVC_CLOSE;
712 case -EAGAIN:
713 return SVC_DROP;
714 case -ENOENT:
715 return SVC_DENIED;
716 case 0:
717 rqstp->rq_client = &ipm->m_client->h;
718 kref_get(&rqstp->rq_client->ref);
719 ip_map_cached_put(xprt, ipm);
720 break;
721 }
722
723 gi = unix_gid_find(cred->cr_uid, rqstp);
724 switch (PTR_ERR(gi)) {
725 case -EAGAIN:
726 return SVC_DROP;
727 case -ESHUTDOWN:
728 return SVC_CLOSE;
729 case -ENOENT:
730 break;
731 default:
732 put_group_info(cred->cr_group_info);
733 cred->cr_group_info = gi;
734 }
735
736out:
737 rqstp->rq_auth_stat = rpc_auth_ok;
738 return SVC_OK;
739}
740EXPORT_SYMBOL_GPL(svcauth_unix_set_client);
741
742/**
743 * svcauth_null_accept - Decode and validate incoming RPC_AUTH_NULL credential
744 * @rqstp: RPC transaction
745 *
746 * Return values:
747 * %SVC_OK: Both credential and verifier are valid
748 * %SVC_DENIED: Credential or verifier is not valid
749 * %SVC_GARBAGE: Failed to decode credential or verifier
750 * %SVC_CLOSE: Temporary failure
751 *
752 * rqstp->rq_auth_stat is set as mandated by RFC 5531.
753 */
754static enum svc_auth_status
755svcauth_null_accept(struct svc_rqst *rqstp)
756{
757 struct xdr_stream *xdr = &rqstp->rq_arg_stream;
758 struct svc_cred *cred = &rqstp->rq_cred;
759 u32 flavor, len;
760 void *body;
761
762 /* Length of Call's credential body field: */
763 if (xdr_stream_decode_u32(xdr, &len) < 0)
764 return SVC_GARBAGE;
765 if (len != 0) {
766 rqstp->rq_auth_stat = rpc_autherr_badcred;
767 return SVC_DENIED;
768 }
769
770 /* Call's verf field: */
771 if (xdr_stream_decode_opaque_auth(xdr, &flavor, &body, &len) < 0)
772 return SVC_GARBAGE;
773 if (flavor != RPC_AUTH_NULL || len != 0) {
774 rqstp->rq_auth_stat = rpc_autherr_badverf;
775 return SVC_DENIED;
776 }
777
778 /* Signal that mapping to nobody uid/gid is required */
779 cred->cr_uid = INVALID_UID;
780 cred->cr_gid = INVALID_GID;
781 cred->cr_group_info = groups_alloc(0);
782 if (cred->cr_group_info == NULL)
783 return SVC_CLOSE; /* kmalloc failure - client must retry */
784
785 if (xdr_stream_encode_opaque_auth(&rqstp->rq_res_stream,
786 RPC_AUTH_NULL, NULL, 0) < 0)
787 return SVC_CLOSE;
788 if (!svcxdr_set_accept_stat(rqstp))
789 return SVC_CLOSE;
790
791 rqstp->rq_cred.cr_flavor = RPC_AUTH_NULL;
792 return SVC_OK;
793}
794
795static int
796svcauth_null_release(struct svc_rqst *rqstp)
797{
798 if (rqstp->rq_client)
799 auth_domain_put(rqstp->rq_client);
800 rqstp->rq_client = NULL;
801 if (rqstp->rq_cred.cr_group_info)
802 put_group_info(rqstp->rq_cred.cr_group_info);
803 rqstp->rq_cred.cr_group_info = NULL;
804
805 return 0; /* don't drop */
806}
807
808
809struct auth_ops svcauth_null = {
810 .name = "null",
811 .owner = THIS_MODULE,
812 .flavour = RPC_AUTH_NULL,
813 .accept = svcauth_null_accept,
814 .release = svcauth_null_release,
815 .set_client = svcauth_unix_set_client,
816};
817
818
819/**
820 * svcauth_tls_accept - Decode and validate incoming RPC_AUTH_TLS credential
821 * @rqstp: RPC transaction
822 *
823 * Return values:
824 * %SVC_OK: Both credential and verifier are valid
825 * %SVC_DENIED: Credential or verifier is not valid
826 * %SVC_GARBAGE: Failed to decode credential or verifier
827 * %SVC_CLOSE: Temporary failure
828 *
829 * rqstp->rq_auth_stat is set as mandated by RFC 5531.
830 */
831static enum svc_auth_status
832svcauth_tls_accept(struct svc_rqst *rqstp)
833{
834 struct xdr_stream *xdr = &rqstp->rq_arg_stream;
835 struct svc_cred *cred = &rqstp->rq_cred;
836 struct svc_xprt *xprt = rqstp->rq_xprt;
837 u32 flavor, len;
838 void *body;
839 __be32 *p;
840
841 /* Length of Call's credential body field: */
842 if (xdr_stream_decode_u32(xdr, &len) < 0)
843 return SVC_GARBAGE;
844 if (len != 0) {
845 rqstp->rq_auth_stat = rpc_autherr_badcred;
846 return SVC_DENIED;
847 }
848
849 /* Call's verf field: */
850 if (xdr_stream_decode_opaque_auth(xdr, &flavor, &body, &len) < 0)
851 return SVC_GARBAGE;
852 if (flavor != RPC_AUTH_NULL || len != 0) {
853 rqstp->rq_auth_stat = rpc_autherr_badverf;
854 return SVC_DENIED;
855 }
856
857 /* AUTH_TLS is not valid on non-NULL procedures */
858 if (rqstp->rq_proc != 0) {
859 rqstp->rq_auth_stat = rpc_autherr_badcred;
860 return SVC_DENIED;
861 }
862
863 /* Signal that mapping to nobody uid/gid is required */
864 cred->cr_uid = INVALID_UID;
865 cred->cr_gid = INVALID_GID;
866 cred->cr_group_info = groups_alloc(0);
867 if (cred->cr_group_info == NULL)
868 return SVC_CLOSE;
869
870 if (xprt->xpt_ops->xpo_handshake) {
871 p = xdr_reserve_space(&rqstp->rq_res_stream, XDR_UNIT * 2 + 8);
872 if (!p)
873 return SVC_CLOSE;
874 trace_svc_tls_start(xprt);
875 *p++ = rpc_auth_null;
876 *p++ = cpu_to_be32(8);
877 memcpy(p, "STARTTLS", 8);
878
879 set_bit(XPT_HANDSHAKE, &xprt->xpt_flags);
880 svc_xprt_enqueue(xprt);
881 } else {
882 trace_svc_tls_unavailable(xprt);
883 if (xdr_stream_encode_opaque_auth(&rqstp->rq_res_stream,
884 RPC_AUTH_NULL, NULL, 0) < 0)
885 return SVC_CLOSE;
886 }
887 if (!svcxdr_set_accept_stat(rqstp))
888 return SVC_CLOSE;
889
890 rqstp->rq_cred.cr_flavor = RPC_AUTH_TLS;
891 return SVC_OK;
892}
893
894struct auth_ops svcauth_tls = {
895 .name = "tls",
896 .owner = THIS_MODULE,
897 .flavour = RPC_AUTH_TLS,
898 .accept = svcauth_tls_accept,
899 .release = svcauth_null_release,
900 .set_client = svcauth_unix_set_client,
901};
902
903
904/**
905 * svcauth_unix_accept - Decode and validate incoming RPC_AUTH_SYS credential
906 * @rqstp: RPC transaction
907 *
908 * Return values:
909 * %SVC_OK: Both credential and verifier are valid
910 * %SVC_DENIED: Credential or verifier is not valid
911 * %SVC_GARBAGE: Failed to decode credential or verifier
912 * %SVC_CLOSE: Temporary failure
913 *
914 * rqstp->rq_auth_stat is set as mandated by RFC 5531.
915 */
916static enum svc_auth_status
917svcauth_unix_accept(struct svc_rqst *rqstp)
918{
919 struct xdr_stream *xdr = &rqstp->rq_arg_stream;
920 struct svc_cred *cred = &rqstp->rq_cred;
921 struct user_namespace *userns;
922 u32 flavor, len, i;
923 void *body;
924 __be32 *p;
925
926 /*
927 * This implementation ignores the length of the Call's
928 * credential body field and the timestamp and machinename
929 * fields.
930 */
931 p = xdr_inline_decode(xdr, XDR_UNIT * 3);
932 if (!p)
933 return SVC_GARBAGE;
934 len = be32_to_cpup(p + 2);
935 if (len > RPC_MAX_MACHINENAME)
936 return SVC_GARBAGE;
937 if (!xdr_inline_decode(xdr, len))
938 return SVC_GARBAGE;
939
940 /*
941 * Note: we skip uid_valid()/gid_valid() checks here for
942 * backwards compatibility with clients that use -1 id's.
943 * Instead, -1 uid or gid is later mapped to the
944 * (export-specific) anonymous id by nfsd_setuser.
945 * Supplementary gid's will be left alone.
946 */
947 userns = (rqstp->rq_xprt && rqstp->rq_xprt->xpt_cred) ?
948 rqstp->rq_xprt->xpt_cred->user_ns : &init_user_ns;
949 if (xdr_stream_decode_u32(xdr, &i) < 0)
950 return SVC_GARBAGE;
951 cred->cr_uid = make_kuid(userns, i);
952 if (xdr_stream_decode_u32(xdr, &i) < 0)
953 return SVC_GARBAGE;
954 cred->cr_gid = make_kgid(userns, i);
955
956 if (xdr_stream_decode_u32(xdr, &len) < 0)
957 return SVC_GARBAGE;
958 if (len > UNX_NGROUPS)
959 goto badcred;
960 p = xdr_inline_decode(xdr, XDR_UNIT * len);
961 if (!p)
962 return SVC_GARBAGE;
963 cred->cr_group_info = groups_alloc(len);
964 if (cred->cr_group_info == NULL)
965 return SVC_CLOSE;
966 for (i = 0; i < len; i++) {
967 kgid_t kgid = make_kgid(userns, be32_to_cpup(p++));
968 cred->cr_group_info->gid[i] = kgid;
969 }
970 groups_sort(cred->cr_group_info);
971
972 /* Call's verf field: */
973 if (xdr_stream_decode_opaque_auth(xdr, &flavor, &body, &len) < 0)
974 return SVC_GARBAGE;
975 if (flavor != RPC_AUTH_NULL || len != 0) {
976 rqstp->rq_auth_stat = rpc_autherr_badverf;
977 return SVC_DENIED;
978 }
979
980 if (xdr_stream_encode_opaque_auth(&rqstp->rq_res_stream,
981 RPC_AUTH_NULL, NULL, 0) < 0)
982 return SVC_CLOSE;
983 if (!svcxdr_set_accept_stat(rqstp))
984 return SVC_CLOSE;
985
986 rqstp->rq_cred.cr_flavor = RPC_AUTH_UNIX;
987 return SVC_OK;
988
989badcred:
990 rqstp->rq_auth_stat = rpc_autherr_badcred;
991 return SVC_DENIED;
992}
993
994static int
995svcauth_unix_release(struct svc_rqst *rqstp)
996{
997 /* Verifier (such as it is) is already in place.
998 */
999 if (rqstp->rq_client)
1000 auth_domain_put(rqstp->rq_client);
1001 rqstp->rq_client = NULL;
1002 if (rqstp->rq_cred.cr_group_info)
1003 put_group_info(rqstp->rq_cred.cr_group_info);
1004 rqstp->rq_cred.cr_group_info = NULL;
1005
1006 return 0;
1007}
1008
1009
1010struct auth_ops svcauth_unix = {
1011 .name = "unix",
1012 .owner = THIS_MODULE,
1013 .flavour = RPC_AUTH_UNIX,
1014 .accept = svcauth_unix_accept,
1015 .release = svcauth_unix_release,
1016 .domain_release = svcauth_unix_domain_release,
1017 .set_client = svcauth_unix_set_client,
1018};
1019
1020static const struct cache_detail ip_map_cache_template = {
1021 .owner = THIS_MODULE,
1022 .hash_size = IP_HASHMAX,
1023 .name = "auth.unix.ip",
1024 .cache_put = ip_map_put,
1025 .cache_upcall = ip_map_upcall,
1026 .cache_request = ip_map_request,
1027 .cache_parse = ip_map_parse,
1028 .cache_show = ip_map_show,
1029 .match = ip_map_match,
1030 .init = ip_map_init,
1031 .update = update,
1032 .alloc = ip_map_alloc,
1033};
1034
1035int ip_map_cache_create(struct net *net)
1036{
1037 struct sunrpc_net *sn = net_generic(net, sunrpc_net_id);
1038 struct cache_detail *cd;
1039 int err;
1040
1041 cd = cache_create_net(&ip_map_cache_template, net);
1042 if (IS_ERR(cd))
1043 return PTR_ERR(cd);
1044 err = cache_register_net(cd, net);
1045 if (err) {
1046 cache_destroy_net(cd, net);
1047 return err;
1048 }
1049 sn->ip_map_cache = cd;
1050 return 0;
1051}
1052
1053void ip_map_cache_destroy(struct net *net)
1054{
1055 struct sunrpc_net *sn = net_generic(net, sunrpc_net_id);
1056 struct cache_detail *cd = sn->ip_map_cache;
1057
1058 sn->ip_map_cache = NULL;
1059 cache_purge(cd);
1060 cache_unregister_net(cd, net);
1061 cache_destroy_net(cd, net);
1062}
1#include <linux/types.h>
2#include <linux/sched.h>
3#include <linux/module.h>
4#include <linux/sunrpc/types.h>
5#include <linux/sunrpc/xdr.h>
6#include <linux/sunrpc/svcsock.h>
7#include <linux/sunrpc/svcauth.h>
8#include <linux/sunrpc/gss_api.h>
9#include <linux/err.h>
10#include <linux/seq_file.h>
11#include <linux/hash.h>
12#include <linux/string.h>
13#include <linux/slab.h>
14#include <net/sock.h>
15#include <net/ipv6.h>
16#include <linux/kernel.h>
17#include <linux/user_namespace.h>
18#define RPCDBG_FACILITY RPCDBG_AUTH
19
20#include <linux/sunrpc/clnt.h>
21
22#include "netns.h"
23
24/*
25 * AUTHUNIX and AUTHNULL credentials are both handled here.
26 * AUTHNULL is treated just like AUTHUNIX except that the uid/gid
27 * are always nobody (-2). i.e. we do the same IP address checks for
28 * AUTHNULL as for AUTHUNIX, and that is done here.
29 */
30
31
32struct unix_domain {
33 struct auth_domain h;
34 /* other stuff later */
35};
36
37extern struct auth_ops svcauth_null;
38extern struct auth_ops svcauth_unix;
39
40static void svcauth_unix_domain_release(struct auth_domain *dom)
41{
42 struct unix_domain *ud = container_of(dom, struct unix_domain, h);
43
44 kfree(dom->name);
45 kfree(ud);
46}
47
48struct auth_domain *unix_domain_find(char *name)
49{
50 struct auth_domain *rv;
51 struct unix_domain *new = NULL;
52
53 rv = auth_domain_lookup(name, NULL);
54 while(1) {
55 if (rv) {
56 if (new && rv != &new->h)
57 svcauth_unix_domain_release(&new->h);
58
59 if (rv->flavour != &svcauth_unix) {
60 auth_domain_put(rv);
61 return NULL;
62 }
63 return rv;
64 }
65
66 new = kmalloc(sizeof(*new), GFP_KERNEL);
67 if (new == NULL)
68 return NULL;
69 kref_init(&new->h.ref);
70 new->h.name = kstrdup(name, GFP_KERNEL);
71 if (new->h.name == NULL) {
72 kfree(new);
73 return NULL;
74 }
75 new->h.flavour = &svcauth_unix;
76 rv = auth_domain_lookup(name, &new->h);
77 }
78}
79EXPORT_SYMBOL_GPL(unix_domain_find);
80
81
82/**************************************************
83 * cache for IP address to unix_domain
84 * as needed by AUTH_UNIX
85 */
86#define IP_HASHBITS 8
87#define IP_HASHMAX (1<<IP_HASHBITS)
88
89struct ip_map {
90 struct cache_head h;
91 char m_class[8]; /* e.g. "nfsd" */
92 struct in6_addr m_addr;
93 struct unix_domain *m_client;
94};
95
96static void ip_map_put(struct kref *kref)
97{
98 struct cache_head *item = container_of(kref, struct cache_head, ref);
99 struct ip_map *im = container_of(item, struct ip_map,h);
100
101 if (test_bit(CACHE_VALID, &item->flags) &&
102 !test_bit(CACHE_NEGATIVE, &item->flags))
103 auth_domain_put(&im->m_client->h);
104 kfree(im);
105}
106
107#if IP_HASHBITS == 8
108/* hash_long on a 64 bit machine is currently REALLY BAD for
109 * IP addresses in reverse-endian (i.e. on a little-endian machine).
110 * So use a trivial but reliable hash instead
111 */
112static inline int hash_ip(__be32 ip)
113{
114 int hash = (__force u32)ip ^ ((__force u32)ip>>16);
115 return (hash ^ (hash>>8)) & 0xff;
116}
117#endif
118static inline int hash_ip6(struct in6_addr ip)
119{
120 return (hash_ip(ip.s6_addr32[0]) ^
121 hash_ip(ip.s6_addr32[1]) ^
122 hash_ip(ip.s6_addr32[2]) ^
123 hash_ip(ip.s6_addr32[3]));
124}
125static int ip_map_match(struct cache_head *corig, struct cache_head *cnew)
126{
127 struct ip_map *orig = container_of(corig, struct ip_map, h);
128 struct ip_map *new = container_of(cnew, struct ip_map, h);
129 return strcmp(orig->m_class, new->m_class) == 0 &&
130 ipv6_addr_equal(&orig->m_addr, &new->m_addr);
131}
132static void ip_map_init(struct cache_head *cnew, struct cache_head *citem)
133{
134 struct ip_map *new = container_of(cnew, struct ip_map, h);
135 struct ip_map *item = container_of(citem, struct ip_map, h);
136
137 strcpy(new->m_class, item->m_class);
138 new->m_addr = item->m_addr;
139}
140static void update(struct cache_head *cnew, struct cache_head *citem)
141{
142 struct ip_map *new = container_of(cnew, struct ip_map, h);
143 struct ip_map *item = container_of(citem, struct ip_map, h);
144
145 kref_get(&item->m_client->h.ref);
146 new->m_client = item->m_client;
147}
148static struct cache_head *ip_map_alloc(void)
149{
150 struct ip_map *i = kmalloc(sizeof(*i), GFP_KERNEL);
151 if (i)
152 return &i->h;
153 else
154 return NULL;
155}
156
157static void ip_map_request(struct cache_detail *cd,
158 struct cache_head *h,
159 char **bpp, int *blen)
160{
161 char text_addr[40];
162 struct ip_map *im = container_of(h, struct ip_map, h);
163
164 if (ipv6_addr_v4mapped(&(im->m_addr))) {
165 snprintf(text_addr, 20, "%pI4", &im->m_addr.s6_addr32[3]);
166 } else {
167 snprintf(text_addr, 40, "%pI6", &im->m_addr);
168 }
169 qword_add(bpp, blen, im->m_class);
170 qword_add(bpp, blen, text_addr);
171 (*bpp)[-1] = '\n';
172}
173
174static int ip_map_upcall(struct cache_detail *cd, struct cache_head *h)
175{
176 return sunrpc_cache_pipe_upcall(cd, h, ip_map_request);
177}
178
179static struct ip_map *__ip_map_lookup(struct cache_detail *cd, char *class, struct in6_addr *addr);
180static int __ip_map_update(struct cache_detail *cd, struct ip_map *ipm, struct unix_domain *udom, time_t expiry);
181
182static int ip_map_parse(struct cache_detail *cd,
183 char *mesg, int mlen)
184{
185 /* class ipaddress [domainname] */
186 /* should be safe just to use the start of the input buffer
187 * for scratch: */
188 char *buf = mesg;
189 int len;
190 char class[8];
191 union {
192 struct sockaddr sa;
193 struct sockaddr_in s4;
194 struct sockaddr_in6 s6;
195 } address;
196 struct sockaddr_in6 sin6;
197 int err;
198
199 struct ip_map *ipmp;
200 struct auth_domain *dom;
201 time_t expiry;
202
203 if (mesg[mlen-1] != '\n')
204 return -EINVAL;
205 mesg[mlen-1] = 0;
206
207 /* class */
208 len = qword_get(&mesg, class, sizeof(class));
209 if (len <= 0) return -EINVAL;
210
211 /* ip address */
212 len = qword_get(&mesg, buf, mlen);
213 if (len <= 0) return -EINVAL;
214
215 if (rpc_pton(cd->net, buf, len, &address.sa, sizeof(address)) == 0)
216 return -EINVAL;
217 switch (address.sa.sa_family) {
218 case AF_INET:
219 /* Form a mapped IPv4 address in sin6 */
220 sin6.sin6_family = AF_INET6;
221 ipv6_addr_set_v4mapped(address.s4.sin_addr.s_addr,
222 &sin6.sin6_addr);
223 break;
224#if IS_ENABLED(CONFIG_IPV6)
225 case AF_INET6:
226 memcpy(&sin6, &address.s6, sizeof(sin6));
227 break;
228#endif
229 default:
230 return -EINVAL;
231 }
232
233 expiry = get_expiry(&mesg);
234 if (expiry ==0)
235 return -EINVAL;
236
237 /* domainname, or empty for NEGATIVE */
238 len = qword_get(&mesg, buf, mlen);
239 if (len < 0) return -EINVAL;
240
241 if (len) {
242 dom = unix_domain_find(buf);
243 if (dom == NULL)
244 return -ENOENT;
245 } else
246 dom = NULL;
247
248 /* IPv6 scope IDs are ignored for now */
249 ipmp = __ip_map_lookup(cd, class, &sin6.sin6_addr);
250 if (ipmp) {
251 err = __ip_map_update(cd, ipmp,
252 container_of(dom, struct unix_domain, h),
253 expiry);
254 } else
255 err = -ENOMEM;
256
257 if (dom)
258 auth_domain_put(dom);
259
260 cache_flush();
261 return err;
262}
263
264static int ip_map_show(struct seq_file *m,
265 struct cache_detail *cd,
266 struct cache_head *h)
267{
268 struct ip_map *im;
269 struct in6_addr addr;
270 char *dom = "-no-domain-";
271
272 if (h == NULL) {
273 seq_puts(m, "#class IP domain\n");
274 return 0;
275 }
276 im = container_of(h, struct ip_map, h);
277 /* class addr domain */
278 addr = im->m_addr;
279
280 if (test_bit(CACHE_VALID, &h->flags) &&
281 !test_bit(CACHE_NEGATIVE, &h->flags))
282 dom = im->m_client->h.name;
283
284 if (ipv6_addr_v4mapped(&addr)) {
285 seq_printf(m, "%s %pI4 %s\n",
286 im->m_class, &addr.s6_addr32[3], dom);
287 } else {
288 seq_printf(m, "%s %pI6 %s\n", im->m_class, &addr, dom);
289 }
290 return 0;
291}
292
293
294static struct ip_map *__ip_map_lookup(struct cache_detail *cd, char *class,
295 struct in6_addr *addr)
296{
297 struct ip_map ip;
298 struct cache_head *ch;
299
300 strcpy(ip.m_class, class);
301 ip.m_addr = *addr;
302 ch = sunrpc_cache_lookup(cd, &ip.h,
303 hash_str(class, IP_HASHBITS) ^
304 hash_ip6(*addr));
305
306 if (ch)
307 return container_of(ch, struct ip_map, h);
308 else
309 return NULL;
310}
311
312static inline struct ip_map *ip_map_lookup(struct net *net, char *class,
313 struct in6_addr *addr)
314{
315 struct sunrpc_net *sn;
316
317 sn = net_generic(net, sunrpc_net_id);
318 return __ip_map_lookup(sn->ip_map_cache, class, addr);
319}
320
321static int __ip_map_update(struct cache_detail *cd, struct ip_map *ipm,
322 struct unix_domain *udom, time_t expiry)
323{
324 struct ip_map ip;
325 struct cache_head *ch;
326
327 ip.m_client = udom;
328 ip.h.flags = 0;
329 if (!udom)
330 set_bit(CACHE_NEGATIVE, &ip.h.flags);
331 ip.h.expiry_time = expiry;
332 ch = sunrpc_cache_update(cd, &ip.h, &ipm->h,
333 hash_str(ipm->m_class, IP_HASHBITS) ^
334 hash_ip6(ipm->m_addr));
335 if (!ch)
336 return -ENOMEM;
337 cache_put(ch, cd);
338 return 0;
339}
340
341static inline int ip_map_update(struct net *net, struct ip_map *ipm,
342 struct unix_domain *udom, time_t expiry)
343{
344 struct sunrpc_net *sn;
345
346 sn = net_generic(net, sunrpc_net_id);
347 return __ip_map_update(sn->ip_map_cache, ipm, udom, expiry);
348}
349
350void svcauth_unix_purge(struct net *net)
351{
352 struct sunrpc_net *sn;
353
354 sn = net_generic(net, sunrpc_net_id);
355 cache_purge(sn->ip_map_cache);
356}
357EXPORT_SYMBOL_GPL(svcauth_unix_purge);
358
359static inline struct ip_map *
360ip_map_cached_get(struct svc_xprt *xprt)
361{
362 struct ip_map *ipm = NULL;
363 struct sunrpc_net *sn;
364
365 if (test_bit(XPT_CACHE_AUTH, &xprt->xpt_flags)) {
366 spin_lock(&xprt->xpt_lock);
367 ipm = xprt->xpt_auth_cache;
368 if (ipm != NULL) {
369 if (!cache_valid(&ipm->h)) {
370 /*
371 * The entry has been invalidated since it was
372 * remembered, e.g. by a second mount from the
373 * same IP address.
374 */
375 sn = net_generic(xprt->xpt_net, sunrpc_net_id);
376 xprt->xpt_auth_cache = NULL;
377 spin_unlock(&xprt->xpt_lock);
378 cache_put(&ipm->h, sn->ip_map_cache);
379 return NULL;
380 }
381 cache_get(&ipm->h);
382 }
383 spin_unlock(&xprt->xpt_lock);
384 }
385 return ipm;
386}
387
388static inline void
389ip_map_cached_put(struct svc_xprt *xprt, struct ip_map *ipm)
390{
391 if (test_bit(XPT_CACHE_AUTH, &xprt->xpt_flags)) {
392 spin_lock(&xprt->xpt_lock);
393 if (xprt->xpt_auth_cache == NULL) {
394 /* newly cached, keep the reference */
395 xprt->xpt_auth_cache = ipm;
396 ipm = NULL;
397 }
398 spin_unlock(&xprt->xpt_lock);
399 }
400 if (ipm) {
401 struct sunrpc_net *sn;
402
403 sn = net_generic(xprt->xpt_net, sunrpc_net_id);
404 cache_put(&ipm->h, sn->ip_map_cache);
405 }
406}
407
408void
409svcauth_unix_info_release(struct svc_xprt *xpt)
410{
411 struct ip_map *ipm;
412
413 ipm = xpt->xpt_auth_cache;
414 if (ipm != NULL) {
415 struct sunrpc_net *sn;
416
417 sn = net_generic(xpt->xpt_net, sunrpc_net_id);
418 cache_put(&ipm->h, sn->ip_map_cache);
419 }
420}
421
422/****************************************************************************
423 * auth.unix.gid cache
424 * simple cache to map a UID to a list of GIDs
425 * because AUTH_UNIX aka AUTH_SYS has a max of 16
426 */
427#define GID_HASHBITS 8
428#define GID_HASHMAX (1<<GID_HASHBITS)
429
430struct unix_gid {
431 struct cache_head h;
432 uid_t uid;
433 struct group_info *gi;
434};
435
436static void unix_gid_put(struct kref *kref)
437{
438 struct cache_head *item = container_of(kref, struct cache_head, ref);
439 struct unix_gid *ug = container_of(item, struct unix_gid, h);
440 if (test_bit(CACHE_VALID, &item->flags) &&
441 !test_bit(CACHE_NEGATIVE, &item->flags))
442 put_group_info(ug->gi);
443 kfree(ug);
444}
445
446static int unix_gid_match(struct cache_head *corig, struct cache_head *cnew)
447{
448 struct unix_gid *orig = container_of(corig, struct unix_gid, h);
449 struct unix_gid *new = container_of(cnew, struct unix_gid, h);
450 return orig->uid == new->uid;
451}
452static void unix_gid_init(struct cache_head *cnew, struct cache_head *citem)
453{
454 struct unix_gid *new = container_of(cnew, struct unix_gid, h);
455 struct unix_gid *item = container_of(citem, struct unix_gid, h);
456 new->uid = item->uid;
457}
458static void unix_gid_update(struct cache_head *cnew, struct cache_head *citem)
459{
460 struct unix_gid *new = container_of(cnew, struct unix_gid, h);
461 struct unix_gid *item = container_of(citem, struct unix_gid, h);
462
463 get_group_info(item->gi);
464 new->gi = item->gi;
465}
466static struct cache_head *unix_gid_alloc(void)
467{
468 struct unix_gid *g = kmalloc(sizeof(*g), GFP_KERNEL);
469 if (g)
470 return &g->h;
471 else
472 return NULL;
473}
474
475static void unix_gid_request(struct cache_detail *cd,
476 struct cache_head *h,
477 char **bpp, int *blen)
478{
479 char tuid[20];
480 struct unix_gid *ug = container_of(h, struct unix_gid, h);
481
482 snprintf(tuid, 20, "%u", ug->uid);
483 qword_add(bpp, blen, tuid);
484 (*bpp)[-1] = '\n';
485}
486
487static int unix_gid_upcall(struct cache_detail *cd, struct cache_head *h)
488{
489 return sunrpc_cache_pipe_upcall(cd, h, unix_gid_request);
490}
491
492static struct unix_gid *unix_gid_lookup(struct cache_detail *cd, uid_t uid);
493
494static int unix_gid_parse(struct cache_detail *cd,
495 char *mesg, int mlen)
496{
497 /* uid expiry Ngid gid0 gid1 ... gidN-1 */
498 int uid;
499 int gids;
500 int rv;
501 int i;
502 int err;
503 time_t expiry;
504 struct unix_gid ug, *ugp;
505
506 if (mesg[mlen - 1] != '\n')
507 return -EINVAL;
508 mesg[mlen-1] = 0;
509
510 rv = get_int(&mesg, &uid);
511 if (rv)
512 return -EINVAL;
513 ug.uid = uid;
514
515 expiry = get_expiry(&mesg);
516 if (expiry == 0)
517 return -EINVAL;
518
519 rv = get_int(&mesg, &gids);
520 if (rv || gids < 0 || gids > 8192)
521 return -EINVAL;
522
523 ug.gi = groups_alloc(gids);
524 if (!ug.gi)
525 return -ENOMEM;
526
527 for (i = 0 ; i < gids ; i++) {
528 int gid;
529 kgid_t kgid;
530 rv = get_int(&mesg, &gid);
531 err = -EINVAL;
532 if (rv)
533 goto out;
534 kgid = make_kgid(&init_user_ns, gid);
535 if (!gid_valid(kgid))
536 goto out;
537 GROUP_AT(ug.gi, i) = kgid;
538 }
539
540 ugp = unix_gid_lookup(cd, uid);
541 if (ugp) {
542 struct cache_head *ch;
543 ug.h.flags = 0;
544 ug.h.expiry_time = expiry;
545 ch = sunrpc_cache_update(cd,
546 &ug.h, &ugp->h,
547 hash_long(uid, GID_HASHBITS));
548 if (!ch)
549 err = -ENOMEM;
550 else {
551 err = 0;
552 cache_put(ch, cd);
553 }
554 } else
555 err = -ENOMEM;
556 out:
557 if (ug.gi)
558 put_group_info(ug.gi);
559 return err;
560}
561
562static int unix_gid_show(struct seq_file *m,
563 struct cache_detail *cd,
564 struct cache_head *h)
565{
566 struct user_namespace *user_ns = current_user_ns();
567 struct unix_gid *ug;
568 int i;
569 int glen;
570
571 if (h == NULL) {
572 seq_puts(m, "#uid cnt: gids...\n");
573 return 0;
574 }
575 ug = container_of(h, struct unix_gid, h);
576 if (test_bit(CACHE_VALID, &h->flags) &&
577 !test_bit(CACHE_NEGATIVE, &h->flags))
578 glen = ug->gi->ngroups;
579 else
580 glen = 0;
581
582 seq_printf(m, "%u %d:", ug->uid, glen);
583 for (i = 0; i < glen; i++)
584 seq_printf(m, " %d", from_kgid_munged(user_ns, GROUP_AT(ug->gi, i)));
585 seq_printf(m, "\n");
586 return 0;
587}
588
589static struct cache_detail unix_gid_cache_template = {
590 .owner = THIS_MODULE,
591 .hash_size = GID_HASHMAX,
592 .name = "auth.unix.gid",
593 .cache_put = unix_gid_put,
594 .cache_upcall = unix_gid_upcall,
595 .cache_parse = unix_gid_parse,
596 .cache_show = unix_gid_show,
597 .match = unix_gid_match,
598 .init = unix_gid_init,
599 .update = unix_gid_update,
600 .alloc = unix_gid_alloc,
601};
602
603int unix_gid_cache_create(struct net *net)
604{
605 struct sunrpc_net *sn = net_generic(net, sunrpc_net_id);
606 struct cache_detail *cd;
607 int err;
608
609 cd = cache_create_net(&unix_gid_cache_template, net);
610 if (IS_ERR(cd))
611 return PTR_ERR(cd);
612 err = cache_register_net(cd, net);
613 if (err) {
614 cache_destroy_net(cd, net);
615 return err;
616 }
617 sn->unix_gid_cache = cd;
618 return 0;
619}
620
621void unix_gid_cache_destroy(struct net *net)
622{
623 struct sunrpc_net *sn = net_generic(net, sunrpc_net_id);
624 struct cache_detail *cd = sn->unix_gid_cache;
625
626 sn->unix_gid_cache = NULL;
627 cache_purge(cd);
628 cache_unregister_net(cd, net);
629 cache_destroy_net(cd, net);
630}
631
632static struct unix_gid *unix_gid_lookup(struct cache_detail *cd, uid_t uid)
633{
634 struct unix_gid ug;
635 struct cache_head *ch;
636
637 ug.uid = uid;
638 ch = sunrpc_cache_lookup(cd, &ug.h, hash_long(uid, GID_HASHBITS));
639 if (ch)
640 return container_of(ch, struct unix_gid, h);
641 else
642 return NULL;
643}
644
645static struct group_info *unix_gid_find(uid_t uid, struct svc_rqst *rqstp)
646{
647 struct unix_gid *ug;
648 struct group_info *gi;
649 int ret;
650 struct sunrpc_net *sn = net_generic(rqstp->rq_xprt->xpt_net,
651 sunrpc_net_id);
652
653 ug = unix_gid_lookup(sn->unix_gid_cache, uid);
654 if (!ug)
655 return ERR_PTR(-EAGAIN);
656 ret = cache_check(sn->unix_gid_cache, &ug->h, &rqstp->rq_chandle);
657 switch (ret) {
658 case -ENOENT:
659 return ERR_PTR(-ENOENT);
660 case -ETIMEDOUT:
661 return ERR_PTR(-ESHUTDOWN);
662 case 0:
663 gi = get_group_info(ug->gi);
664 cache_put(&ug->h, sn->unix_gid_cache);
665 return gi;
666 default:
667 return ERR_PTR(-EAGAIN);
668 }
669}
670
671int
672svcauth_unix_set_client(struct svc_rqst *rqstp)
673{
674 struct sockaddr_in *sin;
675 struct sockaddr_in6 *sin6, sin6_storage;
676 struct ip_map *ipm;
677 struct group_info *gi;
678 struct svc_cred *cred = &rqstp->rq_cred;
679 struct svc_xprt *xprt = rqstp->rq_xprt;
680 struct net *net = xprt->xpt_net;
681 struct sunrpc_net *sn = net_generic(net, sunrpc_net_id);
682
683 switch (rqstp->rq_addr.ss_family) {
684 case AF_INET:
685 sin = svc_addr_in(rqstp);
686 sin6 = &sin6_storage;
687 ipv6_addr_set_v4mapped(sin->sin_addr.s_addr, &sin6->sin6_addr);
688 break;
689 case AF_INET6:
690 sin6 = svc_addr_in6(rqstp);
691 break;
692 default:
693 BUG();
694 }
695
696 rqstp->rq_client = NULL;
697 if (rqstp->rq_proc == 0)
698 return SVC_OK;
699
700 ipm = ip_map_cached_get(xprt);
701 if (ipm == NULL)
702 ipm = __ip_map_lookup(sn->ip_map_cache, rqstp->rq_server->sv_program->pg_class,
703 &sin6->sin6_addr);
704
705 if (ipm == NULL)
706 return SVC_DENIED;
707
708 switch (cache_check(sn->ip_map_cache, &ipm->h, &rqstp->rq_chandle)) {
709 default:
710 BUG();
711 case -ETIMEDOUT:
712 return SVC_CLOSE;
713 case -EAGAIN:
714 return SVC_DROP;
715 case -ENOENT:
716 return SVC_DENIED;
717 case 0:
718 rqstp->rq_client = &ipm->m_client->h;
719 kref_get(&rqstp->rq_client->ref);
720 ip_map_cached_put(xprt, ipm);
721 break;
722 }
723
724 gi = unix_gid_find(cred->cr_uid, rqstp);
725 switch (PTR_ERR(gi)) {
726 case -EAGAIN:
727 return SVC_DROP;
728 case -ESHUTDOWN:
729 return SVC_CLOSE;
730 case -ENOENT:
731 break;
732 default:
733 put_group_info(cred->cr_group_info);
734 cred->cr_group_info = gi;
735 }
736 return SVC_OK;
737}
738
739EXPORT_SYMBOL_GPL(svcauth_unix_set_client);
740
741static int
742svcauth_null_accept(struct svc_rqst *rqstp, __be32 *authp)
743{
744 struct kvec *argv = &rqstp->rq_arg.head[0];
745 struct kvec *resv = &rqstp->rq_res.head[0];
746 struct svc_cred *cred = &rqstp->rq_cred;
747
748 cred->cr_group_info = NULL;
749 cred->cr_principal = NULL;
750 rqstp->rq_client = NULL;
751
752 if (argv->iov_len < 3*4)
753 return SVC_GARBAGE;
754
755 if (svc_getu32(argv) != 0) {
756 dprintk("svc: bad null cred\n");
757 *authp = rpc_autherr_badcred;
758 return SVC_DENIED;
759 }
760 if (svc_getu32(argv) != htonl(RPC_AUTH_NULL) || svc_getu32(argv) != 0) {
761 dprintk("svc: bad null verf\n");
762 *authp = rpc_autherr_badverf;
763 return SVC_DENIED;
764 }
765
766 /* Signal that mapping to nobody uid/gid is required */
767 cred->cr_uid = (uid_t) -1;
768 cred->cr_gid = (gid_t) -1;
769 cred->cr_group_info = groups_alloc(0);
770 if (cred->cr_group_info == NULL)
771 return SVC_CLOSE; /* kmalloc failure - client must retry */
772
773 /* Put NULL verifier */
774 svc_putnl(resv, RPC_AUTH_NULL);
775 svc_putnl(resv, 0);
776
777 rqstp->rq_cred.cr_flavor = RPC_AUTH_NULL;
778 return SVC_OK;
779}
780
781static int
782svcauth_null_release(struct svc_rqst *rqstp)
783{
784 if (rqstp->rq_client)
785 auth_domain_put(rqstp->rq_client);
786 rqstp->rq_client = NULL;
787 if (rqstp->rq_cred.cr_group_info)
788 put_group_info(rqstp->rq_cred.cr_group_info);
789 rqstp->rq_cred.cr_group_info = NULL;
790
791 return 0; /* don't drop */
792}
793
794
795struct auth_ops svcauth_null = {
796 .name = "null",
797 .owner = THIS_MODULE,
798 .flavour = RPC_AUTH_NULL,
799 .accept = svcauth_null_accept,
800 .release = svcauth_null_release,
801 .set_client = svcauth_unix_set_client,
802};
803
804
805static int
806svcauth_unix_accept(struct svc_rqst *rqstp, __be32 *authp)
807{
808 struct kvec *argv = &rqstp->rq_arg.head[0];
809 struct kvec *resv = &rqstp->rq_res.head[0];
810 struct svc_cred *cred = &rqstp->rq_cred;
811 u32 slen, i;
812 int len = argv->iov_len;
813
814 cred->cr_group_info = NULL;
815 cred->cr_principal = NULL;
816 rqstp->rq_client = NULL;
817
818 if ((len -= 3*4) < 0)
819 return SVC_GARBAGE;
820
821 svc_getu32(argv); /* length */
822 svc_getu32(argv); /* time stamp */
823 slen = XDR_QUADLEN(svc_getnl(argv)); /* machname length */
824 if (slen > 64 || (len -= (slen + 3)*4) < 0)
825 goto badcred;
826 argv->iov_base = (void*)((__be32*)argv->iov_base + slen); /* skip machname */
827 argv->iov_len -= slen*4;
828
829 cred->cr_uid = svc_getnl(argv); /* uid */
830 cred->cr_gid = svc_getnl(argv); /* gid */
831 slen = svc_getnl(argv); /* gids length */
832 if (slen > 16 || (len -= (slen + 2)*4) < 0)
833 goto badcred;
834 cred->cr_group_info = groups_alloc(slen);
835 if (cred->cr_group_info == NULL)
836 return SVC_CLOSE;
837 for (i = 0; i < slen; i++) {
838 kgid_t kgid = make_kgid(&init_user_ns, svc_getnl(argv));
839 if (!gid_valid(kgid))
840 goto badcred;
841 GROUP_AT(cred->cr_group_info, i) = kgid;
842 }
843 if (svc_getu32(argv) != htonl(RPC_AUTH_NULL) || svc_getu32(argv) != 0) {
844 *authp = rpc_autherr_badverf;
845 return SVC_DENIED;
846 }
847
848 /* Put NULL verifier */
849 svc_putnl(resv, RPC_AUTH_NULL);
850 svc_putnl(resv, 0);
851
852 rqstp->rq_cred.cr_flavor = RPC_AUTH_UNIX;
853 return SVC_OK;
854
855badcred:
856 *authp = rpc_autherr_badcred;
857 return SVC_DENIED;
858}
859
860static int
861svcauth_unix_release(struct svc_rqst *rqstp)
862{
863 /* Verifier (such as it is) is already in place.
864 */
865 if (rqstp->rq_client)
866 auth_domain_put(rqstp->rq_client);
867 rqstp->rq_client = NULL;
868 if (rqstp->rq_cred.cr_group_info)
869 put_group_info(rqstp->rq_cred.cr_group_info);
870 rqstp->rq_cred.cr_group_info = NULL;
871
872 return 0;
873}
874
875
876struct auth_ops svcauth_unix = {
877 .name = "unix",
878 .owner = THIS_MODULE,
879 .flavour = RPC_AUTH_UNIX,
880 .accept = svcauth_unix_accept,
881 .release = svcauth_unix_release,
882 .domain_release = svcauth_unix_domain_release,
883 .set_client = svcauth_unix_set_client,
884};
885
886static struct cache_detail ip_map_cache_template = {
887 .owner = THIS_MODULE,
888 .hash_size = IP_HASHMAX,
889 .name = "auth.unix.ip",
890 .cache_put = ip_map_put,
891 .cache_upcall = ip_map_upcall,
892 .cache_parse = ip_map_parse,
893 .cache_show = ip_map_show,
894 .match = ip_map_match,
895 .init = ip_map_init,
896 .update = update,
897 .alloc = ip_map_alloc,
898};
899
900int ip_map_cache_create(struct net *net)
901{
902 struct sunrpc_net *sn = net_generic(net, sunrpc_net_id);
903 struct cache_detail *cd;
904 int err;
905
906 cd = cache_create_net(&ip_map_cache_template, net);
907 if (IS_ERR(cd))
908 return PTR_ERR(cd);
909 err = cache_register_net(cd, net);
910 if (err) {
911 cache_destroy_net(cd, net);
912 return err;
913 }
914 sn->ip_map_cache = cd;
915 return 0;
916}
917
918void ip_map_cache_destroy(struct net *net)
919{
920 struct sunrpc_net *sn = net_generic(net, sunrpc_net_id);
921 struct cache_detail *cd = sn->ip_map_cache;
922
923 sn->ip_map_cache = NULL;
924 cache_purge(cd);
925 cache_unregister_net(cd, net);
926 cache_destroy_net(cd, net);
927}