net/sunrpc/rpcb_clnt.c

   1 /*
   2  * In-kernel rpcbind client supporting versions 2, 3, and 4 of the rpcbind
   3  * protocol
   4  *
   5  * Based on RFC 1833: "Binding Protocols for ONC RPC Version 2" and
   6  * RFC 3530: "Network File System (NFS) version 4 Protocol"
   7  *
   8  * Original: Gilles Quillard, Bull Open Source, 2005 <gilles.quillard@bull.net>
   9  * Updated: Chuck Lever, Oracle Corporation, 2007 <chuck.lever@oracle.com>
  10  *
  11  * Descended from net/sunrpc/pmap_clnt.c,
  12  *  Copyright (C) 1996, Olaf Kirch <okir@monad.swb.de>
  13  */
  14
  15 #include <linux/module.h>
  16
  17 #include <linux/types.h>
  18 #include <linux/socket.h>
  19 #include <linux/in.h>
  20 #include <linux/in6.h>
  21 #include <linux/kernel.h>
  22 #include <linux/errno.h>
  23 #include <net/ipv6.h>
  24
  25 #include <linux/sunrpc/clnt.h>
  26 #include <linux/sunrpc/sched.h>
  27 #include <linux/sunrpc/xprtsock.h>
  28
  29 #ifdef RPC_DEBUG
  30 # define RPCDBG_FACILITY        RPCDBG_BIND
  31 #endif
  32
  33 #define RPCBIND_PROGRAM         (100000u)
  34 #define RPCBIND_PORT            (111u)
  35
  36 #define RPCBVERS_2              (2u)
  37 #define RPCBVERS_3              (3u)
  38 #define RPCBVERS_4              (4u)
  39
  40 enum {
  41         RPCBPROC_NULL,
  42         RPCBPROC_SET,
  43         RPCBPROC_UNSET,
  44         RPCBPROC_GETPORT,
  45         RPCBPROC_GETADDR = 3,           /* alias for GETPORT */
  46         RPCBPROC_DUMP,
  47         RPCBPROC_CALLIT,
  48         RPCBPROC_BCAST = 5,             /* alias for CALLIT */
  49         RPCBPROC_GETTIME,
  50         RPCBPROC_UADDR2TADDR,
  51         RPCBPROC_TADDR2UADDR,
  52         RPCBPROC_GETVERSADDR,
  53         RPCBPROC_INDIRECT,
  54         RPCBPROC_GETADDRLIST,
  55         RPCBPROC_GETSTAT,
  56 };
  57
  58 #define RPCB_HIGHPROC_2         RPCBPROC_CALLIT
  59 #define RPCB_HIGHPROC_3         RPCBPROC_TADDR2UADDR
  60 #define RPCB_HIGHPROC_4         RPCBPROC_GETSTAT
  61
  62 /*
  63  * r_owner
  64  *
  65  * The "owner" is allowed to unset a service in the rpcbind database.
  66  *
  67  * For AF_LOCAL SET/UNSET requests, rpcbind treats this string as a
  68  * UID which it maps to a local user name via a password lookup.
  69  * In all other cases it is ignored.
  70  *
  71  * For SET/UNSET requests, user space provides a value, even for
  72  * network requests, and GETADDR uses an empty string.  We follow
  73  * those precedents here.
  74  */
  75 #define RPCB_OWNER_STRING       "0"
  76 #define RPCB_MAXOWNERLEN        sizeof(RPCB_OWNER_STRING)
  77
  78 static void                     rpcb_getport_done(struct rpc_task *, void *);
  79 static void                     rpcb_map_release(void *data);
  80 static struct rpc_program       rpcb_program;
  81
  82 struct rpcbind_args {
  83         struct rpc_xprt *       r_xprt;
  84
  85         u32                     r_prog;
  86         u32                     r_vers;
  87         u32                     r_prot;
  88         unsigned short          r_port;
  89         const char *            r_netid;
  90         const char *            r_addr;
  91         const char *            r_owner;
  92
  93         int                     r_status;
  94 };
  95
  96 static struct rpc_procinfo rpcb_procedures2[];
  97 static struct rpc_procinfo rpcb_procedures3[];
  98 static struct rpc_procinfo rpcb_procedures4[];
  99
 100 struct rpcb_info {
 101         u32                     rpc_vers;
 102         struct rpc_procinfo *   rpc_proc;
 103 };
 104
 105 static struct rpcb_info rpcb_next_version[];
 106 static struct rpcb_info rpcb_next_version6[];
 107
 108 static const struct rpc_call_ops rpcb_getport_ops = {
 109         .rpc_call_done          = rpcb_getport_done,
 110         .rpc_release            = rpcb_map_release,
 111 };
 112
 113 static void rpcb_wake_rpcbind_waiters(struct rpc_xprt *xprt, int status)
 114 {
 115         xprt_clear_binding(xprt);
 116         rpc_wake_up_status(&xprt->binding, status);
 117 }
 118
 119 static void rpcb_map_release(void *data)
 120 {
 121         struct rpcbind_args *map = data;
 122
 123         rpcb_wake_rpcbind_waiters(map->r_xprt, map->r_status);
 124         xprt_put(map->r_xprt);
 125         kfree(map);
 126 }
 127
 128 static const struct sockaddr_in rpcb_inaddr_loopback = {
 129         .sin_family             = AF_INET,
 130         .sin_addr.s_addr        = htonl(INADDR_LOOPBACK),
 131         .sin_port               = htons(RPCBIND_PORT),
 132 };
 133
 134 static struct rpc_clnt *rpcb_create_local(struct sockaddr *addr,
 135                                           size_t addrlen, u32 version)
 136 {
 137         struct rpc_create_args args = {
 138                 .protocol       = XPRT_TRANSPORT_UDP,
 139                 .address        = addr,
 140                 .addrsize       = addrlen,
 141                 .servername     = "localhost",
 142                 .program        = &rpcb_program,
 143                 .version        = version,
 144                 .authflavor     = RPC_AUTH_UNIX,
 145                 .flags          = RPC_CLNT_CREATE_NOPING,
 146         };
 147
 148         return rpc_create(&args);
 149 }
 150
 151 static struct rpc_clnt *rpcb_create(char *hostname, struct sockaddr *srvaddr,
 152                                     size_t salen, int proto, u32 version)
 153 {
 154         struct rpc_create_args args = {
 155                 .protocol       = proto,
 156                 .address        = srvaddr,
 157                 .addrsize       = salen,
 158                 .servername     = hostname,
 159                 .program        = &rpcb_program,
 160                 .version        = version,
 161                 .authflavor     = RPC_AUTH_UNIX,
 162                 .flags          = (RPC_CLNT_CREATE_NOPING |
 163                                         RPC_CLNT_CREATE_NONPRIVPORT),
 164         };
 165
 166         switch (srvaddr->sa_family) {
 167         case AF_INET:
 168                 ((struct sockaddr_in *)srvaddr)->sin_port = htons(RPCBIND_PORT);
 169                 break;
 170         case AF_INET6:
 171                 ((struct sockaddr_in6 *)srvaddr)->sin6_port = htons(RPCBIND_PORT);
 172                 break;
 173         default:
 174                 return NULL;
 175         }
 176
 177         return rpc_create(&args);
 178 }
 179
 180 static int rpcb_register_call(const u32 version, struct rpc_message *msg)
 181 {
 182         struct sockaddr *addr = (struct sockaddr *)&rpcb_inaddr_loopback;
 183         size_t addrlen = sizeof(rpcb_inaddr_loopback);
 184         struct rpc_clnt *rpcb_clnt;
 185         int result, error = 0;
 186
 187         msg->rpc_resp = &result;
 188
 189         rpcb_clnt = rpcb_create_local(addr, addrlen, version);
 190         if (!IS_ERR(rpcb_clnt)) {
 191                 error = rpc_call_sync(rpcb_clnt, msg, 0);
 192                 rpc_shutdown_client(rpcb_clnt);
 193         } else
 194                 error = PTR_ERR(rpcb_clnt);
 195
 196         if (error < 0) {
 197                 dprintk("RPC:       failed to contact local rpcbind "
 198                                 "server (errno %d).\n", -error);
 199                 return error;
 200         }
 201
 202         if (!result)
 203                 return -EACCES;
 204         return 0;
 205 }
 206
 207 /**
 208  * rpcb_register - set or unset a port registration with the local rpcbind svc
 209  * @prog: RPC program number to bind
 210  * @vers: RPC version number to bind
 211  * @prot: transport protocol to register
 212  * @port: port value to register
 213  *
 214  * Returns zero if the registration request was dispatched successfully
 215  * and the rpcbind daemon returned success.  Otherwise, returns an errno
 216  * value that reflects the nature of the error (request could not be
 217  * dispatched, timed out, or rpcbind returned an error).
 218  *
 219  * RPC services invoke this function to advertise their contact
 220  * information via the system's rpcbind daemon.  RPC services
 221  * invoke this function once for each [program, version, transport]
 222  * tuple they wish to advertise.
 223  *
 224  * Callers may also unregister RPC services that are no longer
 225  * available by setting the passed-in port to zero.  This removes
 226  * all registered transports for [program, version] from the local
 227  * rpcbind database.
 228  *
 229  * This function uses rpcbind protocol version 2 to contact the
 230  * local rpcbind daemon.
 231  *
 232  * Registration works over both AF_INET and AF_INET6, and services
 233  * registered via this function are advertised as available for any
 234  * address.  If the local rpcbind daemon is listening on AF_INET6,
 235  * services registered via this function will be advertised on
 236  * IN6ADDR_ANY (ie available for all AF_INET and AF_INET6
 237  * addresses).
 238  */
 239 int rpcb_register(u32 prog, u32 vers, int prot, unsigned short port)
 240 {
 241         struct rpcbind_args map = {
 242                 .r_prog         = prog,
 243                 .r_vers         = vers,
 244                 .r_prot         = prot,
 245                 .r_port         = port,
 246         };
 247         struct rpc_message msg = {
 248                 .rpc_argp       = &map,
 249         };
 250
 251         dprintk("RPC:       %sregistering (%u, %u, %d, %u) with local "
 252                         "rpcbind\n", (port ? "" : "un"),
 253                         prog, vers, prot, port);
 254
 255         msg.rpc_proc = &rpcb_procedures2[RPCBPROC_UNSET];
 256         if (port)
 257                 msg.rpc_proc = &rpcb_procedures2[RPCBPROC_SET];
 258
 259         return rpcb_register_call(RPCBVERS_2, &msg);
 260 }
 261
 262 /*
 263  * Fill in AF_INET family-specific arguments to register
 264  */
 265 static int rpcb_register_inet4(const struct sockaddr *sap,
 266                                struct rpc_message *msg)
 267 {
 268         const struct sockaddr_in *sin = (const struct sockaddr_in *)sap;
 269         struct rpcbind_args *map = msg->rpc_argp;
 270         unsigned short port = ntohs(sin->sin_port);
 271         char buf[32];
 272
 273         /* Construct AF_INET universal address */
 274         snprintf(buf, sizeof(buf), "%pI4.%u.%u",
 275                  &sin->sin_addr.s_addr, port >> 8, port & 0xff);
 276         map->r_addr = buf;
 277
 278         dprintk("RPC:       %sregistering [%u, %u, %s, '%s'] with "
 279                 "local rpcbind\n", (port ? "" : "un"),
 280                         map->r_prog, map->r_vers,
 281                         map->r_addr, map->r_netid);
 282
 283         msg->rpc_proc = &rpcb_procedures4[RPCBPROC_UNSET];
 284         if (port)
 285                 msg->rpc_proc = &rpcb_procedures4[RPCBPROC_SET];
 286
 287         return rpcb_register_call(RPCBVERS_4, msg);
 288 }
 289
 290 /*
 291  * Fill in AF_INET6 family-specific arguments to register
 292  */
 293 static int rpcb_register_inet6(const struct sockaddr *sap,
 294                                struct rpc_message *msg)
 295 {
 296         const struct sockaddr_in6 *sin6 = (const struct sockaddr_in6 *)sap;
 297         struct rpcbind_args *map = msg->rpc_argp;
 298         unsigned short port = ntohs(sin6->sin6_port);
 299         char buf[64];
 300
 301         /* Construct AF_INET6 universal address */
 302         if (ipv6_addr_any(&sin6->sin6_addr))
 303                 snprintf(buf, sizeof(buf), "::.%u.%u",
 304                                 port >> 8, port & 0xff);
 305         else
 306                 snprintf(buf, sizeof(buf), "%pI6.%u.%u",
 307                          &sin6->sin6_addr, port >> 8, port & 0xff);
 308         map->r_addr = buf;
 309
 310         dprintk("RPC:       %sregistering [%u, %u, %s, '%s'] with "
 311                 "local rpcbind\n", (port ? "" : "un"),
 312                         map->r_prog, map->r_vers,
 313                         map->r_addr, map->r_netid);
 314
 315         msg->rpc_proc = &rpcb_procedures4[RPCBPROC_UNSET];
 316         if (port)
 317                 msg->rpc_proc = &rpcb_procedures4[RPCBPROC_SET];
 318
 319         return rpcb_register_call(RPCBVERS_4, msg);
 320 }
 321
 322 static int rpcb_unregister_all_protofamilies(struct rpc_message *msg)
 323 {
 324         struct rpcbind_args *map = msg->rpc_argp;
 325
 326         dprintk("RPC:       unregistering [%u, %u, '%s'] with "
 327                 "local rpcbind\n",
 328                         map->r_prog, map->r_vers, map->r_netid);
 329
 330         map->r_addr = "";
 331         msg->rpc_proc = &rpcb_procedures4[RPCBPROC_UNSET];
 332
 333         return rpcb_register_call(RPCBVERS_4, msg);
 334 }
 335
 336 /**
 337  * rpcb_v4_register - set or unset a port registration with the local rpcbind
 338  * @program: RPC program number of service to (un)register
 339  * @version: RPC version number of service to (un)register
 340  * @address: address family, IP address, and port to (un)register
 341  * @netid: netid of transport protocol to (un)register
 342  *
 343  * Returns zero if the registration request was dispatched successfully
 344  * and the rpcbind daemon returned success.  Otherwise, returns an errno
 345  * value that reflects the nature of the error (request could not be
 346  * dispatched, timed out, or rpcbind returned an error).
 347  *
 348  * RPC services invoke this function to advertise their contact
 349  * information via the system's rpcbind daemon.  RPC services
 350  * invoke this function once for each [program, version, address,
 351  * netid] tuple they wish to advertise.
 352  *
 353  * Callers may also unregister RPC services that are registered at a
 354  * specific address by setting the port number in @address to zero.
 355  * They may unregister all registered protocol families at once for
 356  * a service by passing a NULL @address argument.  If @netid is ""
 357  * then all netids for [program, version, address] are unregistered.
 358  *
 359  * This function uses rpcbind protocol version 4 to contact the
 360  * local rpcbind daemon.  The local rpcbind daemon must support
 361  * version 4 of the rpcbind protocol in order for these functions
 362  * to register a service successfully.
 363  *
 364  * Supported netids include "udp" and "tcp" for UDP and TCP over
 365  * IPv4, and "udp6" and "tcp6" for UDP and TCP over IPv6,
 366  * respectively.
 367  *
 368  * The contents of @address determine the address family and the
 369  * port to be registered.  The usual practice is to pass INADDR_ANY
 370  * as the raw address, but specifying a non-zero address is also
 371  * supported by this API if the caller wishes to advertise an RPC
 372  * service on a specific network interface.
 373  *
 374  * Note that passing in INADDR_ANY does not create the same service
 375  * registration as IN6ADDR_ANY.  The former advertises an RPC
 376  * service on any IPv4 address, but not on IPv6.  The latter
 377  * advertises the service on all IPv4 and IPv6 addresses.
 378  */
 379 int rpcb_v4_register(const u32 program, const u32 version,
 380                      const struct sockaddr *address, const char *netid)
 381 {
 382         struct rpcbind_args map = {
 383                 .r_prog         = program,
 384                 .r_vers         = version,
 385                 .r_netid        = netid,
 386                 .r_owner        = RPCB_OWNER_STRING,
 387         };
 388         struct rpc_message msg = {
 389                 .rpc_argp       = &map,
 390         };
 391
 392         if (address == NULL)
 393                 return rpcb_unregister_all_protofamilies(&msg);
 394
 395         switch (address->sa_family) {
 396         case AF_INET:
 397                 return rpcb_register_inet4(address, &msg);
 398         case AF_INET6:
 399                 return rpcb_register_inet6(address, &msg);
 400         }
 401
 402         return -EAFNOSUPPORT;
 403 }
 404
 405 /**
 406  * rpcb_getport_sync - obtain the port for an RPC service on a given host
 407  * @sin: address of remote peer
 408  * @prog: RPC program number to bind
 409  * @vers: RPC version number to bind
 410  * @prot: transport protocol to use to make this request
 411  *
 412  * Return value is the requested advertised port number,
 413  * or a negative errno value.
 414  *
 415  * Called from outside the RPC client in a synchronous task context.
 416  * Uses default timeout parameters specified by underlying transport.
 417  *
 418  * XXX: Needs to support IPv6
 419  */
 420 int rpcb_getport_sync(struct sockaddr_in *sin, u32 prog, u32 vers, int prot)
 421 {
 422         struct rpcbind_args map = {
 423                 .r_prog         = prog,
 424                 .r_vers         = vers,
 425                 .r_prot         = prot,
 426                 .r_port         = 0,
 427         };
 428         struct rpc_message msg = {
 429                 .rpc_proc       = &rpcb_procedures2[RPCBPROC_GETPORT],
 430                 .rpc_argp       = &map,
 431                 .rpc_resp       = &map.r_port,
 432         };
 433         struct rpc_clnt *rpcb_clnt;
 434         int status;
 435
 436         dprintk("RPC:       %s(%pI4, %u, %u, %d)\n",
 437                 __func__, &sin->sin_addr.s_addr, prog, vers, prot);
 438
 439         rpcb_clnt = rpcb_create(NULL, (struct sockaddr *)sin,
 440                                 sizeof(*sin), prot, RPCBVERS_2);
 441         if (IS_ERR(rpcb_clnt))
 442                 return PTR_ERR(rpcb_clnt);
 443
 444         status = rpc_call_sync(rpcb_clnt, &msg, 0);
 445         rpc_shutdown_client(rpcb_clnt);
 446
 447         if (status >= 0) {
 448                 if (map.r_port != 0)
 449                         return map.r_port;
 450                 status = -EACCES;
 451         }
 452         return status;
 453 }
 454 EXPORT_SYMBOL_GPL(rpcb_getport_sync);
 455
 456 static struct rpc_task *rpcb_call_async(struct rpc_clnt *rpcb_clnt, struct rpcbind_args *map, struct rpc_procinfo *proc)
 457 {
 458         struct rpc_message msg = {
 459                 .rpc_proc = proc,
 460                 .rpc_argp = map,
 461                 .rpc_resp = &map->r_port,
 462         };
 463         struct rpc_task_setup task_setup_data = {
 464                 .rpc_client = rpcb_clnt,
 465                 .rpc_message = &msg,
 466                 .callback_ops = &rpcb_getport_ops,
 467                 .callback_data = map,
 468                 .flags = RPC_TASK_ASYNC,
 469         };
 470
 471         return rpc_run_task(&task_setup_data);
 472 }
 473
 474 /*
 475  * In the case where rpc clients have been cloned, we want to make
 476  * sure that we use the program number/version etc of the actual
 477  * owner of the xprt. To do so, we walk back up the tree of parents
 478  * to find whoever created the transport and/or whoever has the
 479  * autobind flag set.
 480  */
 481 static struct rpc_clnt *rpcb_find_transport_owner(struct rpc_clnt *clnt)
 482 {
 483         struct rpc_clnt *parent = clnt->cl_parent;
 484
 485         while (parent != clnt) {
 486                 if (parent->cl_xprt != clnt->cl_xprt)
 487                         break;
 488                 if (clnt->cl_autobind)
 489                         break;
 490                 clnt = parent;
 491                 parent = parent->cl_parent;
 492         }
 493         return clnt;
 494 }
 495
 496 /**
 497  * rpcb_getport_async - obtain the port for a given RPC service on a given host
 498  * @task: task that is waiting for portmapper request
 499  *
 500  * This one can be called for an ongoing RPC request, and can be used in
 501  * an async (rpciod) context.
 502  */
 503 void rpcb_getport_async(struct rpc_task *task)
 504 {
 505         struct rpc_clnt *clnt;
 506         struct rpc_procinfo *proc;
 507         u32 bind_version;
 508         struct rpc_xprt *xprt;
 509         struct rpc_clnt *rpcb_clnt;
 510         static struct rpcbind_args *map;
 511         struct rpc_task *child;
 512         struct sockaddr_storage addr;
 513         struct sockaddr *sap = (struct sockaddr *)&addr;
 514         size_t salen;
 515         int status;
 516
 517         clnt = rpcb_find_transport_owner(task->tk_client);
 518         xprt = clnt->cl_xprt;
 519
 520         dprintk("RPC: %5u %s(%s, %u, %u, %d)\n",
 521                 task->tk_pid, __func__,
 522                 clnt->cl_server, clnt->cl_prog, clnt->cl_vers, xprt->prot);
 523
 524         /* Put self on the wait queue to ensure we get notified if
 525          * some other task is already attempting to bind the port */
 526         rpc_sleep_on(&xprt->binding, task, NULL);
 527
 528         if (xprt_test_and_set_binding(xprt)) {
 529                 dprintk("RPC: %5u %s: waiting for another binder\n",
 530                         task->tk_pid, __func__);
 531                 return;
 532         }
 533
 534         /* Someone else may have bound if we slept */
 535         if (xprt_bound(xprt)) {
 536                 status = 0;
 537                 dprintk("RPC: %5u %s: already bound\n",
 538                         task->tk_pid, __func__);
 539                 goto bailout_nofree;
 540         }
 541
 542         salen = rpc_peeraddr(clnt, sap, sizeof(addr));
 543
 544         /* Don't ever use rpcbind v2 for AF_INET6 requests */
 545         switch (sap->sa_family) {
 546         case AF_INET:
 547                 proc = rpcb_next_version[xprt->bind_index].rpc_proc;
 548                 bind_version = rpcb_next_version[xprt->bind_index].rpc_vers;
 549                 break;
 550         case AF_INET6:
 551                 proc = rpcb_next_version6[xprt->bind_index].rpc_proc;
 552                 bind_version = rpcb_next_version6[xprt->bind_index].rpc_vers;
 553                 break;
 554         default:
 555                 status = -EAFNOSUPPORT;
 556                 dprintk("RPC: %5u %s: bad address family\n",
 557                                 task->tk_pid, __func__);
 558                 goto bailout_nofree;
 559         }
 560         if (proc == NULL) {
 561                 xprt->bind_index = 0;
 562                 status = -EPFNOSUPPORT;
 563                 dprintk("RPC: %5u %s: no more getport versions available\n",
 564                         task->tk_pid, __func__);
 565                 goto bailout_nofree;
 566         }
 567
 568         dprintk("RPC: %5u %s: trying rpcbind version %u\n",
 569                 task->tk_pid, __func__, bind_version);
 570
 571         rpcb_clnt = rpcb_create(clnt->cl_server, sap, salen, xprt->prot,
 572                                 bind_version);
 573         if (IS_ERR(rpcb_clnt)) {
 574                 status = PTR_ERR(rpcb_clnt);
 575                 dprintk("RPC: %5u %s: rpcb_create failed, error %ld\n",
 576                         task->tk_pid, __func__, PTR_ERR(rpcb_clnt));
 577                 goto bailout_nofree;
 578         }
 579
 580         map = kzalloc(sizeof(struct rpcbind_args), GFP_ATOMIC);
 581         if (!map) {
 582                 status = -ENOMEM;
 583                 dprintk("RPC: %5u %s: no memory available\n",
 584                         task->tk_pid, __func__);
 585                 goto bailout_release_client;
 586         }
 587         map->r_prog = clnt->cl_prog;
 588         map->r_vers = clnt->cl_vers;
 589         map->r_prot = xprt->prot;
 590         map->r_port = 0;
 591         map->r_xprt = xprt_get(xprt);
 592         map->r_netid = rpc_peeraddr2str(clnt, RPC_DISPLAY_NETID);
 593         map->r_addr = rpc_peeraddr2str(rpcb_clnt, RPC_DISPLAY_UNIVERSAL_ADDR);
 594         map->r_owner = "";
 595         map->r_status = -EIO;
 596
 597         child = rpcb_call_async(rpcb_clnt, map, proc);
 598         rpc_release_client(rpcb_clnt);
 599         if (IS_ERR(child)) {
 600                 /* rpcb_map_release() has freed the arguments */
 601                 dprintk("RPC: %5u %s: rpc_run_task failed\n",
 602                         task->tk_pid, __func__);
 603                 return;
 604         }
 605
 606         xprt->stat.bind_count++;
 607         rpc_put_task(child);
 608         return;
 609
 610 bailout_release_client:
 611         rpc_release_client(rpcb_clnt);
 612 bailout_nofree:
 613         rpcb_wake_rpcbind_waiters(xprt, status);
 614         task->tk_status = status;
 615 }
 616 EXPORT_SYMBOL_GPL(rpcb_getport_async);
 617
 618 /*
 619  * Rpcbind child task calls this callback via tk_exit.
 620  */
 621 static void rpcb_getport_done(struct rpc_task *child, void *data)
 622 {
 623         struct rpcbind_args *map = data;
 624         struct rpc_xprt *xprt = map->r_xprt;
 625         int status = child->tk_status;
 626
 627         /* Garbage reply: retry with a lesser rpcbind version */
 628         if (status == -EIO)
 629                 status = -EPROTONOSUPPORT;
 630
 631         /* rpcbind server doesn't support this rpcbind protocol version */
 632         if (status == -EPROTONOSUPPORT)
 633                 xprt->bind_index++;
 634
 635         if (status < 0) {
 636                 /* rpcbind server not available on remote host? */
 637                 xprt->ops->set_port(xprt, 0);
 638         } else if (map->r_port == 0) {
 639                 /* Requested RPC service wasn't registered on remote host */
 640                 xprt->ops->set_port(xprt, 0);
 641                 status = -EACCES;
 642         } else {
 643                 /* Succeeded */
 644                 xprt->ops->set_port(xprt, map->r_port);
 645                 xprt_set_bound(xprt);
 646                 status = 0;
 647         }
 648
 649         dprintk("RPC: %5u rpcb_getport_done(status %d, port %u)\n",
 650                         child->tk_pid, status, map->r_port);
 651
 652         map->r_status = status;
 653 }
 654
 655 /*
 656  * XDR functions for rpcbind
 657  */
 658
 659 static int rpcb_encode_mapping(struct rpc_rqst *req, __be32 *p,
 660                                struct rpcbind_args *rpcb)
 661 {
 662         dprintk("RPC:       encoding rpcb request (%u, %u, %d, %u)\n",
 663                         rpcb->r_prog, rpcb->r_vers, rpcb->r_prot, rpcb->r_port);
 664         *p++ = htonl(rpcb->r_prog);
 665         *p++ = htonl(rpcb->r_vers);
 666         *p++ = htonl(rpcb->r_prot);
 667         *p++ = htonl(rpcb->r_port);
 668
 669         req->rq_slen = xdr_adjust_iovec(req->rq_svec, p);
 670         return 0;
 671 }
 672
 673 static int rpcb_decode_getport(struct rpc_rqst *req, __be32 *p,
 674                                unsigned short *portp)
 675 {
 676         *portp = (unsigned short) ntohl(*p++);
 677         dprintk("RPC:       rpcb getport result: %u\n",
 678                         *portp);
 679         return 0;
 680 }
 681
 682 static int rpcb_decode_set(struct rpc_rqst *req, __be32 *p,
 683                            unsigned int *boolp)
 684 {
 685         *boolp = (unsigned int) ntohl(*p++);
 686         dprintk("RPC:       rpcb set/unset call %s\n",
 687                         (*boolp ? "succeeded" : "failed"));
 688         return 0;
 689 }
 690
 691 static int rpcb_encode_getaddr(struct rpc_rqst *req, __be32 *p,
 692                                struct rpcbind_args *rpcb)
 693 {
 694         dprintk("RPC:       encoding rpcb request (%u, %u, %s)\n",
 695                         rpcb->r_prog, rpcb->r_vers, rpcb->r_addr);
 696         *p++ = htonl(rpcb->r_prog);
 697         *p++ = htonl(rpcb->r_vers);
 698
 699         p = xdr_encode_string(p, rpcb->r_netid);
 700         p = xdr_encode_string(p, rpcb->r_addr);
 701         p = xdr_encode_string(p, rpcb->r_owner);
 702
 703         req->rq_slen = xdr_adjust_iovec(req->rq_svec, p);
 704
 705         return 0;
 706 }
 707
 708 static int rpcb_decode_getaddr(struct rpc_rqst *req, __be32 *p,
 709                                unsigned short *portp)
 710 {
 711         char *addr;
 712         u32 addr_len;
 713         int c, i, f, first, val;
 714
 715         *portp = 0;
 716         addr_len = ntohl(*p++);
 717
 718         if (addr_len == 0) {
 719                 dprintk("RPC:       rpcb_decode_getaddr: "
 720                                         "service is not registered\n");
 721                 return 0;
 722         }
 723
 724         /*
 725          * Simple sanity check.
 726          */
 727         if (addr_len > RPCBIND_MAXUADDRLEN)
 728                 goto out_err;
 729
 730         /*
 731          * Start at the end and walk backwards until the first dot
 732          * is encountered.  When the second dot is found, we have
 733          * both parts of the port number.
 734          */
 735         addr = (char *)p;
 736         val = 0;
 737         first = 1;
 738         f = 1;
 739         for (i = addr_len - 1; i > 0; i--) {
 740                 c = addr[i];
 741                 if (c >= '0' && c <= '9') {
 742                         val += (c - '0') * f;
 743                         f *= 10;
 744                 } else if (c == '.') {
 745                         if (first) {
 746                                 *portp = val;
 747                                 val = first = 0;
 748                                 f = 1;
 749                         } else {
 750                                 *portp |= (val << 8);
 751                                 break;
 752                         }
 753                 }
 754         }
 755
 756         /*
 757          * Simple sanity check.  If we never saw a dot in the reply,
 758          * then this was probably just garbage.
 759          */
 760         if (first)
 761                 goto out_err;
 762
 763         dprintk("RPC:       rpcb_decode_getaddr port=%u\n", *portp);
 764         return 0;
 765
 766 out_err:
 767         dprintk("RPC:       rpcbind server returned malformed reply\n");
 768         return -EIO;
 769 }
 770
 771 #define RPCB_program_sz         (1u)
 772 #define RPCB_version_sz         (1u)
 773 #define RPCB_protocol_sz        (1u)
 774 #define RPCB_port_sz            (1u)
 775 #define RPCB_boolean_sz         (1u)
 776
 777 #define RPCB_netid_sz           (1+XDR_QUADLEN(RPCBIND_MAXNETIDLEN))
 778 #define RPCB_addr_sz            (1+XDR_QUADLEN(RPCBIND_MAXUADDRLEN))
 779 #define RPCB_ownerstring_sz     (1+XDR_QUADLEN(RPCB_MAXOWNERLEN))
 780
 781 #define RPCB_mappingargs_sz     RPCB_program_sz+RPCB_version_sz+        \
 782                                 RPCB_protocol_sz+RPCB_port_sz
 783 #define RPCB_getaddrargs_sz     RPCB_program_sz+RPCB_version_sz+        \
 784                                 RPCB_netid_sz+RPCB_addr_sz+             \
 785                                 RPCB_ownerstring_sz
 786
 787 #define RPCB_setres_sz          RPCB_boolean_sz
 788 #define RPCB_getportres_sz      RPCB_port_sz
 789
 790 /*
 791  * Note that RFC 1833 does not put any size restrictions on the
 792  * address string returned by the remote rpcbind database.
 793  */
 794 #define RPCB_getaddrres_sz      RPCB_addr_sz
 795
 796 #define PROC(proc, argtype, restype)                                    \
 797         [RPCBPROC_##proc] = {                                           \
 798                 .p_proc         = RPCBPROC_##proc,                      \
 799                 .p_encode       = (kxdrproc_t) rpcb_encode_##argtype,   \
 800                 .p_decode       = (kxdrproc_t) rpcb_decode_##restype,   \
 801                 .p_arglen       = RPCB_##argtype##args_sz,              \
 802                 .p_replen       = RPCB_##restype##res_sz,               \
 803                 .p_statidx      = RPCBPROC_##proc,                      \
 804                 .p_timer        = 0,                                    \
 805                 .p_name         = #proc,                                \
 806         }
 807
 808 /*
 809  * Not all rpcbind procedures described in RFC 1833 are implemented
 810  * since the Linux kernel RPC code requires only these.
 811  */
 812 static struct rpc_procinfo rpcb_procedures2[] = {
 813         PROC(SET,               mapping,        set),
 814         PROC(UNSET,             mapping,        set),
 815         PROC(GETPORT,           mapping,        getport),
 816 };
 817
 818 static struct rpc_procinfo rpcb_procedures3[] = {
 819         PROC(SET,               getaddr,        set),
 820         PROC(UNSET,             getaddr,        set),
 821         PROC(GETADDR,           getaddr,        getaddr),
 822 };
 823
 824 static struct rpc_procinfo rpcb_procedures4[] = {
 825         PROC(SET,               getaddr,        set),
 826         PROC(UNSET,             getaddr,        set),
 827         PROC(GETADDR,           getaddr,        getaddr),
 828         PROC(GETVERSADDR,       getaddr,        getaddr),
 829 };
 830
 831 static struct rpcb_info rpcb_next_version[] = {
 832         {
 833                 .rpc_vers       = RPCBVERS_2,
 834                 .rpc_proc       = &rpcb_procedures2[RPCBPROC_GETPORT],
 835         },
 836         {
 837                 .rpc_proc       = NULL,
 838         },
 839 };
 840
 841 static struct rpcb_info rpcb_next_version6[] = {
 842         {
 843                 .rpc_vers       = RPCBVERS_4,
 844                 .rpc_proc       = &rpcb_procedures4[RPCBPROC_GETADDR],
 845         },
 846         {
 847                 .rpc_vers       = RPCBVERS_3,
 848                 .rpc_proc       = &rpcb_procedures3[RPCBPROC_GETADDR],
 849         },
 850         {
 851                 .rpc_proc       = NULL,
 852         },
 853 };
 854
 855 static struct rpc_version rpcb_version2 = {
 856         .number         = RPCBVERS_2,
 857         .nrprocs        = RPCB_HIGHPROC_2,
 858         .procs          = rpcb_procedures2
 859 };
 860
 861 static struct rpc_version rpcb_version3 = {
 862         .number         = RPCBVERS_3,
 863         .nrprocs        = RPCB_HIGHPROC_3,
 864         .procs          = rpcb_procedures3
 865 };
 866
 867 static struct rpc_version rpcb_version4 = {
 868         .number         = RPCBVERS_4,
 869         .nrprocs        = RPCB_HIGHPROC_4,
 870         .procs          = rpcb_procedures4
 871 };
 872
 873 static struct rpc_version *rpcb_version[] = {
 874         NULL,
 875         NULL,
 876         &rpcb_version2,
 877         &rpcb_version3,
 878         &rpcb_version4
 879 };
 880
 881 static struct rpc_stat rpcb_stats;
 882
 883 static struct rpc_program rpcb_program = {
 884         .name           = "rpcbind",
 885         .number         = RPCBIND_PROGRAM,
 886         .nrvers         = ARRAY_SIZE(rpcb_version),
 887         .version        = rpcb_version,
 888         .stats          = &rpcb_stats,
 889 };