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