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