xref: /openbmc/linux/net/sunrpc/svcauth_unix.c (revision b627b4ed)
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 <net/sock.h>
14 #include <net/ipv6.h>
15 #include <linux/kernel.h>
16 #define RPCDBG_FACILITY	RPCDBG_AUTH
17 
18 
19 /*
20  * AUTHUNIX and AUTHNULL credentials are both handled here.
21  * AUTHNULL is treated just like AUTHUNIX except that the uid/gid
22  * are always nobody (-2).  i.e. we do the same IP address checks for
23  * AUTHNULL as for AUTHUNIX, and that is done here.
24  */
25 
26 
27 struct unix_domain {
28 	struct auth_domain	h;
29 	int	addr_changes;
30 	/* other stuff later */
31 };
32 
33 extern struct auth_ops svcauth_unix;
34 
35 struct auth_domain *unix_domain_find(char *name)
36 {
37 	struct auth_domain *rv;
38 	struct unix_domain *new = NULL;
39 
40 	rv = auth_domain_lookup(name, NULL);
41 	while(1) {
42 		if (rv) {
43 			if (new && rv != &new->h)
44 				auth_domain_put(&new->h);
45 
46 			if (rv->flavour != &svcauth_unix) {
47 				auth_domain_put(rv);
48 				return NULL;
49 			}
50 			return rv;
51 		}
52 
53 		new = kmalloc(sizeof(*new), GFP_KERNEL);
54 		if (new == NULL)
55 			return NULL;
56 		kref_init(&new->h.ref);
57 		new->h.name = kstrdup(name, GFP_KERNEL);
58 		if (new->h.name == NULL) {
59 			kfree(new);
60 			return NULL;
61 		}
62 		new->h.flavour = &svcauth_unix;
63 		new->addr_changes = 0;
64 		rv = auth_domain_lookup(name, &new->h);
65 	}
66 }
67 EXPORT_SYMBOL_GPL(unix_domain_find);
68 
69 static void svcauth_unix_domain_release(struct auth_domain *dom)
70 {
71 	struct unix_domain *ud = container_of(dom, struct unix_domain, h);
72 
73 	kfree(dom->name);
74 	kfree(ud);
75 }
76 
77 
78 /**************************************************
79  * cache for IP address to unix_domain
80  * as needed by AUTH_UNIX
81  */
82 #define	IP_HASHBITS	8
83 #define	IP_HASHMAX	(1<<IP_HASHBITS)
84 #define	IP_HASHMASK	(IP_HASHMAX-1)
85 
86 struct ip_map {
87 	struct cache_head	h;
88 	char			m_class[8]; /* e.g. "nfsd" */
89 	struct in6_addr		m_addr;
90 	struct unix_domain	*m_client;
91 	int			m_add_change;
92 };
93 static struct cache_head	*ip_table[IP_HASHMAX];
94 
95 static 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  */
111 static 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
117 static 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 }
124 static 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 }
131 static 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 }
139 static 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 	new->m_add_change = item->m_add_change;
147 }
148 static 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 
157 static 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 
174 static struct ip_map *ip_map_lookup(char *class, struct in6_addr *addr);
175 static int ip_map_update(struct ip_map *ipm, struct unix_domain *udom, time_t expiry);
176 
177 static 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 	int b1, b2, b3, b4, b5, b6, b7, b8;
186 	char c;
187 	char class[8];
188 	struct in6_addr addr;
189 	int err;
190 
191 	struct ip_map *ipmp;
192 	struct auth_domain *dom;
193 	time_t expiry;
194 
195 	if (mesg[mlen-1] != '\n')
196 		return -EINVAL;
197 	mesg[mlen-1] = 0;
198 
199 	/* class */
200 	len = qword_get(&mesg, class, sizeof(class));
201 	if (len <= 0) return -EINVAL;
202 
203 	/* ip address */
204 	len = qword_get(&mesg, buf, mlen);
205 	if (len <= 0) return -EINVAL;
206 
207 	if (sscanf(buf, "%u.%u.%u.%u%c", &b1, &b2, &b3, &b4, &c) == 4) {
208 		addr.s6_addr32[0] = 0;
209 		addr.s6_addr32[1] = 0;
210 		addr.s6_addr32[2] = htonl(0xffff);
211 		addr.s6_addr32[3] =
212 			htonl((((((b1<<8)|b2)<<8)|b3)<<8)|b4);
213        } else if (sscanf(buf, "%04x:%04x:%04x:%04x:%04x:%04x:%04x:%04x%c",
214 			&b1, &b2, &b3, &b4, &b5, &b6, &b7, &b8, &c) == 8) {
215 		addr.s6_addr16[0] = htons(b1);
216 		addr.s6_addr16[1] = htons(b2);
217 		addr.s6_addr16[2] = htons(b3);
218 		addr.s6_addr16[3] = htons(b4);
219 		addr.s6_addr16[4] = htons(b5);
220 		addr.s6_addr16[5] = htons(b6);
221 		addr.s6_addr16[6] = htons(b7);
222 		addr.s6_addr16[7] = htons(b8);
223        } else
224 		return -EINVAL;
225 
226 	expiry = get_expiry(&mesg);
227 	if (expiry ==0)
228 		return -EINVAL;
229 
230 	/* domainname, or empty for NEGATIVE */
231 	len = qword_get(&mesg, buf, mlen);
232 	if (len < 0) return -EINVAL;
233 
234 	if (len) {
235 		dom = unix_domain_find(buf);
236 		if (dom == NULL)
237 			return -ENOENT;
238 	} else
239 		dom = NULL;
240 
241 	ipmp = ip_map_lookup(class, &addr);
242 	if (ipmp) {
243 		err = ip_map_update(ipmp,
244 			     container_of(dom, struct unix_domain, h),
245 			     expiry);
246 	} else
247 		err = -ENOMEM;
248 
249 	if (dom)
250 		auth_domain_put(dom);
251 
252 	cache_flush();
253 	return err;
254 }
255 
256 static int ip_map_show(struct seq_file *m,
257 		       struct cache_detail *cd,
258 		       struct cache_head *h)
259 {
260 	struct ip_map *im;
261 	struct in6_addr addr;
262 	char *dom = "-no-domain-";
263 
264 	if (h == NULL) {
265 		seq_puts(m, "#class IP domain\n");
266 		return 0;
267 	}
268 	im = container_of(h, struct ip_map, h);
269 	/* class addr domain */
270 	ipv6_addr_copy(&addr, &im->m_addr);
271 
272 	if (test_bit(CACHE_VALID, &h->flags) &&
273 	    !test_bit(CACHE_NEGATIVE, &h->flags))
274 		dom = im->m_client->h.name;
275 
276 	if (ipv6_addr_v4mapped(&addr)) {
277 		seq_printf(m, "%s %pI4 %s\n",
278 			im->m_class, &addr.s6_addr32[3], dom);
279 	} else {
280 		seq_printf(m, "%s %pI6 %s\n", im->m_class, &addr, dom);
281 	}
282 	return 0;
283 }
284 
285 
286 struct cache_detail ip_map_cache = {
287 	.owner		= THIS_MODULE,
288 	.hash_size	= IP_HASHMAX,
289 	.hash_table	= ip_table,
290 	.name		= "auth.unix.ip",
291 	.cache_put	= ip_map_put,
292 	.cache_request	= ip_map_request,
293 	.cache_parse	= ip_map_parse,
294 	.cache_show	= ip_map_show,
295 	.match		= ip_map_match,
296 	.init		= ip_map_init,
297 	.update		= update,
298 	.alloc		= ip_map_alloc,
299 };
300 
301 static struct ip_map *ip_map_lookup(char *class, struct in6_addr *addr)
302 {
303 	struct ip_map ip;
304 	struct cache_head *ch;
305 
306 	strcpy(ip.m_class, class);
307 	ipv6_addr_copy(&ip.m_addr, addr);
308 	ch = sunrpc_cache_lookup(&ip_map_cache, &ip.h,
309 				 hash_str(class, IP_HASHBITS) ^
310 				 hash_ip6(*addr));
311 
312 	if (ch)
313 		return container_of(ch, struct ip_map, h);
314 	else
315 		return NULL;
316 }
317 
318 static int ip_map_update(struct ip_map *ipm, struct unix_domain *udom, time_t expiry)
319 {
320 	struct ip_map ip;
321 	struct cache_head *ch;
322 
323 	ip.m_client = udom;
324 	ip.h.flags = 0;
325 	if (!udom)
326 		set_bit(CACHE_NEGATIVE, &ip.h.flags);
327 	else {
328 		ip.m_add_change = udom->addr_changes;
329 		/* if this is from the legacy set_client system call,
330 		 * we need m_add_change to be one higher
331 		 */
332 		if (expiry == NEVER)
333 			ip.m_add_change++;
334 	}
335 	ip.h.expiry_time = expiry;
336 	ch = sunrpc_cache_update(&ip_map_cache,
337 				 &ip.h, &ipm->h,
338 				 hash_str(ipm->m_class, IP_HASHBITS) ^
339 				 hash_ip6(ipm->m_addr));
340 	if (!ch)
341 		return -ENOMEM;
342 	cache_put(ch, &ip_map_cache);
343 	return 0;
344 }
345 
346 int auth_unix_add_addr(struct in6_addr *addr, struct auth_domain *dom)
347 {
348 	struct unix_domain *udom;
349 	struct ip_map *ipmp;
350 
351 	if (dom->flavour != &svcauth_unix)
352 		return -EINVAL;
353 	udom = container_of(dom, struct unix_domain, h);
354 	ipmp = ip_map_lookup("nfsd", addr);
355 
356 	if (ipmp)
357 		return ip_map_update(ipmp, udom, NEVER);
358 	else
359 		return -ENOMEM;
360 }
361 EXPORT_SYMBOL_GPL(auth_unix_add_addr);
362 
363 int auth_unix_forget_old(struct auth_domain *dom)
364 {
365 	struct unix_domain *udom;
366 
367 	if (dom->flavour != &svcauth_unix)
368 		return -EINVAL;
369 	udom = container_of(dom, struct unix_domain, h);
370 	udom->addr_changes++;
371 	return 0;
372 }
373 EXPORT_SYMBOL_GPL(auth_unix_forget_old);
374 
375 struct auth_domain *auth_unix_lookup(struct in6_addr *addr)
376 {
377 	struct ip_map *ipm;
378 	struct auth_domain *rv;
379 
380 	ipm = ip_map_lookup("nfsd", addr);
381 
382 	if (!ipm)
383 		return NULL;
384 	if (cache_check(&ip_map_cache, &ipm->h, NULL))
385 		return NULL;
386 
387 	if ((ipm->m_client->addr_changes - ipm->m_add_change) >0) {
388 		if (test_and_set_bit(CACHE_NEGATIVE, &ipm->h.flags) == 0)
389 			auth_domain_put(&ipm->m_client->h);
390 		rv = NULL;
391 	} else {
392 		rv = &ipm->m_client->h;
393 		kref_get(&rv->ref);
394 	}
395 	cache_put(&ipm->h, &ip_map_cache);
396 	return rv;
397 }
398 EXPORT_SYMBOL_GPL(auth_unix_lookup);
399 
400 void svcauth_unix_purge(void)
401 {
402 	cache_purge(&ip_map_cache);
403 }
404 EXPORT_SYMBOL_GPL(svcauth_unix_purge);
405 
406 static inline struct ip_map *
407 ip_map_cached_get(struct svc_rqst *rqstp)
408 {
409 	struct ip_map *ipm = NULL;
410 	struct svc_xprt *xprt = rqstp->rq_xprt;
411 
412 	if (test_bit(XPT_CACHE_AUTH, &xprt->xpt_flags)) {
413 		spin_lock(&xprt->xpt_lock);
414 		ipm = xprt->xpt_auth_cache;
415 		if (ipm != NULL) {
416 			if (!cache_valid(&ipm->h)) {
417 				/*
418 				 * The entry has been invalidated since it was
419 				 * remembered, e.g. by a second mount from the
420 				 * same IP address.
421 				 */
422 				xprt->xpt_auth_cache = NULL;
423 				spin_unlock(&xprt->xpt_lock);
424 				cache_put(&ipm->h, &ip_map_cache);
425 				return NULL;
426 			}
427 			cache_get(&ipm->h);
428 		}
429 		spin_unlock(&xprt->xpt_lock);
430 	}
431 	return ipm;
432 }
433 
434 static inline void
435 ip_map_cached_put(struct svc_rqst *rqstp, struct ip_map *ipm)
436 {
437 	struct svc_xprt *xprt = rqstp->rq_xprt;
438 
439 	if (test_bit(XPT_CACHE_AUTH, &xprt->xpt_flags)) {
440 		spin_lock(&xprt->xpt_lock);
441 		if (xprt->xpt_auth_cache == NULL) {
442 			/* newly cached, keep the reference */
443 			xprt->xpt_auth_cache = ipm;
444 			ipm = NULL;
445 		}
446 		spin_unlock(&xprt->xpt_lock);
447 	}
448 	if (ipm)
449 		cache_put(&ipm->h, &ip_map_cache);
450 }
451 
452 void
453 svcauth_unix_info_release(void *info)
454 {
455 	struct ip_map *ipm = info;
456 	cache_put(&ipm->h, &ip_map_cache);
457 }
458 
459 /****************************************************************************
460  * auth.unix.gid cache
461  * simple cache to map a UID to a list of GIDs
462  * because AUTH_UNIX aka AUTH_SYS has a max of 16
463  */
464 #define	GID_HASHBITS	8
465 #define	GID_HASHMAX	(1<<GID_HASHBITS)
466 #define	GID_HASHMASK	(GID_HASHMAX - 1)
467 
468 struct unix_gid {
469 	struct cache_head	h;
470 	uid_t			uid;
471 	struct group_info	*gi;
472 };
473 static struct cache_head	*gid_table[GID_HASHMAX];
474 
475 static void unix_gid_put(struct kref *kref)
476 {
477 	struct cache_head *item = container_of(kref, struct cache_head, ref);
478 	struct unix_gid *ug = container_of(item, struct unix_gid, h);
479 	if (test_bit(CACHE_VALID, &item->flags) &&
480 	    !test_bit(CACHE_NEGATIVE, &item->flags))
481 		put_group_info(ug->gi);
482 	kfree(ug);
483 }
484 
485 static int unix_gid_match(struct cache_head *corig, struct cache_head *cnew)
486 {
487 	struct unix_gid *orig = container_of(corig, struct unix_gid, h);
488 	struct unix_gid *new = container_of(cnew, struct unix_gid, h);
489 	return orig->uid == new->uid;
490 }
491 static void unix_gid_init(struct cache_head *cnew, struct cache_head *citem)
492 {
493 	struct unix_gid *new = container_of(cnew, struct unix_gid, h);
494 	struct unix_gid *item = container_of(citem, struct unix_gid, h);
495 	new->uid = item->uid;
496 }
497 static void unix_gid_update(struct cache_head *cnew, struct cache_head *citem)
498 {
499 	struct unix_gid *new = container_of(cnew, struct unix_gid, h);
500 	struct unix_gid *item = container_of(citem, struct unix_gid, h);
501 
502 	get_group_info(item->gi);
503 	new->gi = item->gi;
504 }
505 static struct cache_head *unix_gid_alloc(void)
506 {
507 	struct unix_gid *g = kmalloc(sizeof(*g), GFP_KERNEL);
508 	if (g)
509 		return &g->h;
510 	else
511 		return NULL;
512 }
513 
514 static void unix_gid_request(struct cache_detail *cd,
515 			     struct cache_head *h,
516 			     char **bpp, int *blen)
517 {
518 	char tuid[20];
519 	struct unix_gid *ug = container_of(h, struct unix_gid, h);
520 
521 	snprintf(tuid, 20, "%u", ug->uid);
522 	qword_add(bpp, blen, tuid);
523 	(*bpp)[-1] = '\n';
524 }
525 
526 static struct unix_gid *unix_gid_lookup(uid_t uid);
527 extern struct cache_detail unix_gid_cache;
528 
529 static int unix_gid_parse(struct cache_detail *cd,
530 			char *mesg, int mlen)
531 {
532 	/* uid expiry Ngid gid0 gid1 ... gidN-1 */
533 	int uid;
534 	int gids;
535 	int rv;
536 	int i;
537 	int err;
538 	time_t expiry;
539 	struct unix_gid ug, *ugp;
540 
541 	if (mlen <= 0 || mesg[mlen-1] != '\n')
542 		return -EINVAL;
543 	mesg[mlen-1] = 0;
544 
545 	rv = get_int(&mesg, &uid);
546 	if (rv)
547 		return -EINVAL;
548 	ug.uid = uid;
549 
550 	expiry = get_expiry(&mesg);
551 	if (expiry == 0)
552 		return -EINVAL;
553 
554 	rv = get_int(&mesg, &gids);
555 	if (rv || gids < 0 || gids > 8192)
556 		return -EINVAL;
557 
558 	ug.gi = groups_alloc(gids);
559 	if (!ug.gi)
560 		return -ENOMEM;
561 
562 	for (i = 0 ; i < gids ; i++) {
563 		int gid;
564 		rv = get_int(&mesg, &gid);
565 		err = -EINVAL;
566 		if (rv)
567 			goto out;
568 		GROUP_AT(ug.gi, i) = gid;
569 	}
570 
571 	ugp = unix_gid_lookup(uid);
572 	if (ugp) {
573 		struct cache_head *ch;
574 		ug.h.flags = 0;
575 		ug.h.expiry_time = expiry;
576 		ch = sunrpc_cache_update(&unix_gid_cache,
577 					 &ug.h, &ugp->h,
578 					 hash_long(uid, GID_HASHBITS));
579 		if (!ch)
580 			err = -ENOMEM;
581 		else {
582 			err = 0;
583 			cache_put(ch, &unix_gid_cache);
584 		}
585 	} else
586 		err = -ENOMEM;
587  out:
588 	if (ug.gi)
589 		put_group_info(ug.gi);
590 	return err;
591 }
592 
593 static int unix_gid_show(struct seq_file *m,
594 			 struct cache_detail *cd,
595 			 struct cache_head *h)
596 {
597 	struct unix_gid *ug;
598 	int i;
599 	int glen;
600 
601 	if (h == NULL) {
602 		seq_puts(m, "#uid cnt: gids...\n");
603 		return 0;
604 	}
605 	ug = container_of(h, struct unix_gid, h);
606 	if (test_bit(CACHE_VALID, &h->flags) &&
607 	    !test_bit(CACHE_NEGATIVE, &h->flags))
608 		glen = ug->gi->ngroups;
609 	else
610 		glen = 0;
611 
612 	seq_printf(m, "%d %d:", ug->uid, glen);
613 	for (i = 0; i < glen; i++)
614 		seq_printf(m, " %d", GROUP_AT(ug->gi, i));
615 	seq_printf(m, "\n");
616 	return 0;
617 }
618 
619 struct cache_detail unix_gid_cache = {
620 	.owner		= THIS_MODULE,
621 	.hash_size	= GID_HASHMAX,
622 	.hash_table	= gid_table,
623 	.name		= "auth.unix.gid",
624 	.cache_put	= unix_gid_put,
625 	.cache_request	= unix_gid_request,
626 	.cache_parse	= unix_gid_parse,
627 	.cache_show	= unix_gid_show,
628 	.match		= unix_gid_match,
629 	.init		= unix_gid_init,
630 	.update		= unix_gid_update,
631 	.alloc		= unix_gid_alloc,
632 };
633 
634 static struct unix_gid *unix_gid_lookup(uid_t uid)
635 {
636 	struct unix_gid ug;
637 	struct cache_head *ch;
638 
639 	ug.uid = uid;
640 	ch = sunrpc_cache_lookup(&unix_gid_cache, &ug.h,
641 				 hash_long(uid, GID_HASHBITS));
642 	if (ch)
643 		return container_of(ch, struct unix_gid, h);
644 	else
645 		return NULL;
646 }
647 
648 static int unix_gid_find(uid_t uid, struct group_info **gip,
649 			 struct svc_rqst *rqstp)
650 {
651 	struct unix_gid *ug = unix_gid_lookup(uid);
652 	if (!ug)
653 		return -EAGAIN;
654 	switch (cache_check(&unix_gid_cache, &ug->h, &rqstp->rq_chandle)) {
655 	case -ENOENT:
656 		*gip = NULL;
657 		return 0;
658 	case 0:
659 		*gip = ug->gi;
660 		get_group_info(*gip);
661 		return 0;
662 	default:
663 		return -EAGAIN;
664 	}
665 }
666 
667 int
668 svcauth_unix_set_client(struct svc_rqst *rqstp)
669 {
670 	struct sockaddr_in *sin;
671 	struct sockaddr_in6 *sin6, sin6_storage;
672 	struct ip_map *ipm;
673 
674 	switch (rqstp->rq_addr.ss_family) {
675 	case AF_INET:
676 		sin = svc_addr_in(rqstp);
677 		sin6 = &sin6_storage;
678 		ipv6_addr_set(&sin6->sin6_addr, 0, 0,
679 				htonl(0x0000FFFF), sin->sin_addr.s_addr);
680 		break;
681 	case AF_INET6:
682 		sin6 = svc_addr_in6(rqstp);
683 		break;
684 	default:
685 		BUG();
686 	}
687 
688 	rqstp->rq_client = NULL;
689 	if (rqstp->rq_proc == 0)
690 		return SVC_OK;
691 
692 	ipm = ip_map_cached_get(rqstp);
693 	if (ipm == NULL)
694 		ipm = ip_map_lookup(rqstp->rq_server->sv_program->pg_class,
695 				    &sin6->sin6_addr);
696 
697 	if (ipm == NULL)
698 		return SVC_DENIED;
699 
700 	switch (cache_check(&ip_map_cache, &ipm->h, &rqstp->rq_chandle)) {
701 		default:
702 			BUG();
703 		case -EAGAIN:
704 		case -ETIMEDOUT:
705 			return SVC_DROP;
706 		case -ENOENT:
707 			return SVC_DENIED;
708 		case 0:
709 			rqstp->rq_client = &ipm->m_client->h;
710 			kref_get(&rqstp->rq_client->ref);
711 			ip_map_cached_put(rqstp, ipm);
712 			break;
713 	}
714 	return SVC_OK;
715 }
716 
717 EXPORT_SYMBOL_GPL(svcauth_unix_set_client);
718 
719 static int
720 svcauth_null_accept(struct svc_rqst *rqstp, __be32 *authp)
721 {
722 	struct kvec	*argv = &rqstp->rq_arg.head[0];
723 	struct kvec	*resv = &rqstp->rq_res.head[0];
724 	struct svc_cred	*cred = &rqstp->rq_cred;
725 
726 	cred->cr_group_info = NULL;
727 	rqstp->rq_client = NULL;
728 
729 	if (argv->iov_len < 3*4)
730 		return SVC_GARBAGE;
731 
732 	if (svc_getu32(argv) != 0) {
733 		dprintk("svc: bad null cred\n");
734 		*authp = rpc_autherr_badcred;
735 		return SVC_DENIED;
736 	}
737 	if (svc_getu32(argv) != htonl(RPC_AUTH_NULL) || svc_getu32(argv) != 0) {
738 		dprintk("svc: bad null verf\n");
739 		*authp = rpc_autherr_badverf;
740 		return SVC_DENIED;
741 	}
742 
743 	/* Signal that mapping to nobody uid/gid is required */
744 	cred->cr_uid = (uid_t) -1;
745 	cred->cr_gid = (gid_t) -1;
746 	cred->cr_group_info = groups_alloc(0);
747 	if (cred->cr_group_info == NULL)
748 		return SVC_DROP; /* kmalloc failure - client must retry */
749 
750 	/* Put NULL verifier */
751 	svc_putnl(resv, RPC_AUTH_NULL);
752 	svc_putnl(resv, 0);
753 
754 	rqstp->rq_flavor = RPC_AUTH_NULL;
755 	return SVC_OK;
756 }
757 
758 static int
759 svcauth_null_release(struct svc_rqst *rqstp)
760 {
761 	if (rqstp->rq_client)
762 		auth_domain_put(rqstp->rq_client);
763 	rqstp->rq_client = NULL;
764 	if (rqstp->rq_cred.cr_group_info)
765 		put_group_info(rqstp->rq_cred.cr_group_info);
766 	rqstp->rq_cred.cr_group_info = NULL;
767 
768 	return 0; /* don't drop */
769 }
770 
771 
772 struct auth_ops svcauth_null = {
773 	.name		= "null",
774 	.owner		= THIS_MODULE,
775 	.flavour	= RPC_AUTH_NULL,
776 	.accept 	= svcauth_null_accept,
777 	.release	= svcauth_null_release,
778 	.set_client	= svcauth_unix_set_client,
779 };
780 
781 
782 static int
783 svcauth_unix_accept(struct svc_rqst *rqstp, __be32 *authp)
784 {
785 	struct kvec	*argv = &rqstp->rq_arg.head[0];
786 	struct kvec	*resv = &rqstp->rq_res.head[0];
787 	struct svc_cred	*cred = &rqstp->rq_cred;
788 	u32		slen, i;
789 	int		len   = argv->iov_len;
790 
791 	cred->cr_group_info = NULL;
792 	rqstp->rq_client = NULL;
793 
794 	if ((len -= 3*4) < 0)
795 		return SVC_GARBAGE;
796 
797 	svc_getu32(argv);			/* length */
798 	svc_getu32(argv);			/* time stamp */
799 	slen = XDR_QUADLEN(svc_getnl(argv));	/* machname length */
800 	if (slen > 64 || (len -= (slen + 3)*4) < 0)
801 		goto badcred;
802 	argv->iov_base = (void*)((__be32*)argv->iov_base + slen);	/* skip machname */
803 	argv->iov_len -= slen*4;
804 
805 	cred->cr_uid = svc_getnl(argv);		/* uid */
806 	cred->cr_gid = svc_getnl(argv);		/* gid */
807 	slen = svc_getnl(argv);			/* gids length */
808 	if (slen > 16 || (len -= (slen + 2)*4) < 0)
809 		goto badcred;
810 	if (unix_gid_find(cred->cr_uid, &cred->cr_group_info, rqstp)
811 	    == -EAGAIN)
812 		return SVC_DROP;
813 	if (cred->cr_group_info == NULL) {
814 		cred->cr_group_info = groups_alloc(slen);
815 		if (cred->cr_group_info == NULL)
816 			return SVC_DROP;
817 		for (i = 0; i < slen; i++)
818 			GROUP_AT(cred->cr_group_info, i) = svc_getnl(argv);
819 	} else {
820 		for (i = 0; i < slen ; i++)
821 			svc_getnl(argv);
822 	}
823 	if (svc_getu32(argv) != htonl(RPC_AUTH_NULL) || svc_getu32(argv) != 0) {
824 		*authp = rpc_autherr_badverf;
825 		return SVC_DENIED;
826 	}
827 
828 	/* Put NULL verifier */
829 	svc_putnl(resv, RPC_AUTH_NULL);
830 	svc_putnl(resv, 0);
831 
832 	rqstp->rq_flavor = RPC_AUTH_UNIX;
833 	return SVC_OK;
834 
835 badcred:
836 	*authp = rpc_autherr_badcred;
837 	return SVC_DENIED;
838 }
839 
840 static int
841 svcauth_unix_release(struct svc_rqst *rqstp)
842 {
843 	/* Verifier (such as it is) is already in place.
844 	 */
845 	if (rqstp->rq_client)
846 		auth_domain_put(rqstp->rq_client);
847 	rqstp->rq_client = NULL;
848 	if (rqstp->rq_cred.cr_group_info)
849 		put_group_info(rqstp->rq_cred.cr_group_info);
850 	rqstp->rq_cred.cr_group_info = NULL;
851 
852 	return 0;
853 }
854 
855 
856 struct auth_ops svcauth_unix = {
857 	.name		= "unix",
858 	.owner		= THIS_MODULE,
859 	.flavour	= RPC_AUTH_UNIX,
860 	.accept 	= svcauth_unix_accept,
861 	.release	= svcauth_unix_release,
862 	.domain_release	= svcauth_unix_domain_release,
863 	.set_client	= svcauth_unix_set_client,
864 };
865 
866