Linux Audio

Check our new training course

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