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