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