l4/pkg/uclibc/lib/contrib/uclibc/libc/inet/rpc/pm_getport.c

   1 /* @(#)pmap_getport.c   2.2 88/08/01 4.0 RPCSRC */
   2 /*
   3  * Sun RPC is a product of Sun Microsystems, Inc. and is provided for
   4  * unrestricted use provided that this legend is included on all tape
   5  * media and as a part of the software program in whole or part.  Users
   6  * may copy or modify Sun RPC without charge, but are not authorized
   7  * to license or distribute it to anyone else except as part of a product or
   8  * program developed by the user.
   9  *
  10  * SUN RPC IS PROVIDED AS IS WITH NO WARRANTIES OF ANY KIND INCLUDING THE
  11  * WARRANTIES OF DESIGN, MERCHANTIBILITY AND FITNESS FOR A PARTICULAR
  12  * PURPOSE, OR ARISING FROM A COURSE OF DEALING, USAGE OR TRADE PRACTICE.
  13  *
  14  * Sun RPC is provided with no support and without any obligation on the
  15  * part of Sun Microsystems, Inc. to assist in its use, correction,
  16  * modification or enhancement.
  17  *
  18  * SUN MICROSYSTEMS, INC. SHALL HAVE NO LIABILITY WITH RESPECT TO THE
  19  * INFRINGEMENT OF COPYRIGHTS, TRADE SECRETS OR ANY PATENTS BY SUN RPC
  20  * OR ANY PART THEREOF.
  21  *
  22  * In no event will Sun Microsystems, Inc. be liable for any lost revenue
  23  * or profits or other special, indirect and consequential damages, even if
  24  * Sun has been advised of the possibility of such damages.
  25  *
  26  * Sun Microsystems, Inc.
  27  * 2550 Garcia Avenue
  28  * Mountain View, California  94043
  29  */
  30 #if 0
  31 static char sccsid[] = "@(#)pmap_getport.c 1.9 87/08/11 Copyr 1984 Sun Micro";
  32 #endif
  33
  34 /*
  35  * pmap_getport.c
  36  * Client interface to pmap rpc service.
  37  *
  38  * Copyright (C) 1984, Sun Microsystems, Inc.
  39  */
  40
  41 #include <stdbool.h>
  42 #include <unistd.h>
  43 #include <rpc/rpc.h>
  44 #include <rpc/pmap_prot.h>
  45 #include <rpc/pmap_clnt.h>
  46
  47
  48 static const struct timeval timeout =
  49 {5, 0};
  50 static const struct timeval tottimeout =
  51 {60, 0};
  52
  53 /*
  54  * Find the mapped port for program,version.
  55  * Calls the pmap service remotely to do the lookup.
  56  * Returns 0 if no map exists.
  57  */
  58 u_short
  59 pmap_getport (struct sockaddr_in *address, u_long program, u_long version,
  60                           u_int protocol)
  61 {
  62   u_short port = 0;
  63   int _socket = -1;
  64   CLIENT *client;
  65   struct pmap parms;
  66
  67   address->sin_port = htons (PMAPPORT);
  68   if (protocol == IPPROTO_TCP)
  69     {
  70       // glibc does this:
  71       ///* Don't need a reserved port to get ports from the portmapper.  */
  72       //socket = __get_socket(address); // does socket(TCP),bind(),connect(address)
  73       //if (_socket != -1)
  74       //  closeit = true;
  75       // do we need/want to do the same?
  76       client = clnttcp_create (address, PMAPPROG,
  77               PMAPVERS, &_socket, RPCSMALLMSGSIZE, RPCSMALLMSGSIZE);
  78     }
  79   else
  80     client = clntudp_bufcreate (address, PMAPPROG,
  81               PMAPVERS, timeout, &_socket, RPCSMALLMSGSIZE, RPCSMALLMSGSIZE);
  82   if (client != (CLIENT *) NULL)
  83     {
  84       struct rpc_createerr *ce = &get_rpc_createerr ();
  85       parms.pm_prog = program;
  86       parms.pm_vers = version;
  87       parms.pm_prot = protocol;
  88       parms.pm_port = 0;        /* not needed or used */
  89       if (CLNT_CALL (client, PMAPPROC_GETPORT, (xdrproc_t)xdr_pmap,
  90                      (caddr_t)&parms, (xdrproc_t)xdr_u_short,
  91                      (caddr_t)&port, tottimeout) != RPC_SUCCESS)
  92         {
  93           ce->cf_stat = RPC_PMAPFAILURE;
  94           clnt_geterr (client, &ce->cf_error);
  95         }
  96       else if (port == 0)
  97         {
  98           ce->cf_stat = RPC_PROGNOTREGISTERED;
  99         }
 100       CLNT_DESTROY (client);
 101     }
 102   /* (void)close(_socket); CLNT_DESTROY already closed it */
 103   address->sin_port = 0;
 104   return port;
 105 }
 106 libc_hidden_def(pmap_getport)