libc/inet/rpc/pmap_clnt.c

   1 /*
   2  * Sun RPC is a product of Sun Microsystems, Inc. and is provided for
   3  * unrestricted use provided that this legend is included on all tape
   4  * media and as a part of the software program in whole or part.  Users
   5  * may copy or modify Sun RPC without charge, but are not authorized
   6  * to license or distribute it to anyone else except as part of a product or
   7  * program developed by the user.
   8  *
   9  * SUN RPC IS PROVIDED AS IS WITH NO WARRANTIES OF ANY KIND INCLUDING THE
  10  * WARRANTIES OF DESIGN, MERCHANTIBILITY AND FITNESS FOR A PARTICULAR
  11  * PURPOSE, OR ARISING FROM A COURSE OF DEALING, USAGE OR TRADE PRACTICE.
  12  *
  13  * Sun RPC is provided with no support and without any obligation on the
  14  * part of Sun Microsystems, Inc. to assist in its use, correction,
  15  * modification or enhancement.
  16  *
  17  * SUN MICROSYSTEMS, INC. SHALL HAVE NO LIABILITY WITH RESPECT TO THE
  18  * INFRINGEMENT OF COPYRIGHTS, TRADE SECRETS OR ANY PATENTS BY SUN RPC
  19  * OR ANY PART THEREOF.
  20  *
  21  * In no event will Sun Microsystems, Inc. be liable for any lost revenue
  22  * or profits or other special, indirect and consequential damages, even if
  23  * Sun has been advised of the possibility of such damages.
  24  *
  25  * Sun Microsystems, Inc.
  26  * 2550 Garcia Avenue
  27  * Mountain View, California  94043
  28  */
  29 /*
  30  * Copyright (C) 1984, Sun Microsystems, Inc.
  31  */
  32 /*
  33  * pmap_clnt.c
  34  * Client interface to pmap rpc service.
  35  */
  36
  37 #include <stdio.h>
  38 #include <unistd.h>
  39 #include <net/if.h>
  40 #include <sys/ioctl.h>
  41 #include <sys/socket.h>
  42 #include <netinet/in.h>
  43 #include <arpa/inet.h>
  44 #include "rpc_private.h"
  45 #include <rpc/pmap_prot.h>
  46 #include <rpc/pmap_clnt.h>
  47
  48
  49 /*
  50  * Same as get_myaddress, but we try to use the loopback
  51  * interface. portmap caches interfaces, and on DHCP clients,
  52  * it could be that only loopback is started at this time.
  53  */
  54 static bool_t
  55 __get_myaddress (struct sockaddr_in *addr)
  56 {
  57   int s;
  58   char buf[BUFSIZ];
  59   struct ifconf ifc;
  60   struct ifreq ifreq, *ifr;
  61   int len, loopback = 1;
  62
  63   if ((s = socket (AF_INET, SOCK_DGRAM, 0)) < 0)
  64     {
  65       perror ("__get_myaddress: socket");
  66       exit (1);
  67     }
  68   ifc.ifc_len = sizeof (buf);
  69   ifc.ifc_buf = buf;
  70   if (ioctl (s, SIOCGIFCONF, (char *) &ifc) < 0)
  71     {
  72       perror ("__get_myaddress: ioctl (get interface configuration)");
  73       exit (1);
  74     }
  75
  76  again:
  77   ifr = ifc.ifc_req;
  78   for (len = ifc.ifc_len; len; len -= sizeof ifreq)
  79     {
  80       ifreq = *ifr;
  81       if (ioctl (s, SIOCGIFFLAGS, (char *) &ifreq) < 0)
  82         {
  83           perror ("__get_myaddress: ioctl");
  84           exit (1);
  85         }
  86       if ((ifreq.ifr_flags & IFF_UP) && (ifr->ifr_addr.sa_family == AF_INET)
  87           && ((ifreq.ifr_flags & IFF_LOOPBACK) || (loopback == 0)))
  88         {
  89           *addr = *((struct sockaddr_in *) &ifr->ifr_addr);
  90           addr->sin_port = htons (PMAPPORT);
  91           close (s);
  92           return TRUE;
  93         }
  94       ifr++;
  95     }
  96   if (loopback == 1)
  97     {
  98       loopback = 0;
  99       goto again;
 100     }
 101   close (s);
 102   return FALSE;
 103 }
 104
 105
 106 static const struct timeval timeout = {5, 0};
 107 static const struct timeval tottimeout = {60, 0};
 108
 109 /*
 110  * Set a mapping between program,version and port.
 111  * Calls the pmap service remotely to do the mapping.
 112  */
 113 bool_t
 114 pmap_set (u_long program, u_long version, int protocol, u_short port)
 115 {
 116   struct sockaddr_in myaddress;
 117   int _socket = -1;
 118   CLIENT *client;
 119   struct pmap parms;
 120   bool_t rslt;
 121
 122   if (!__get_myaddress (&myaddress))
 123     return FALSE;
 124   client = clntudp_bufcreate (&myaddress, PMAPPROG, PMAPVERS,
 125                         timeout, &_socket, RPCSMALLMSGSIZE, RPCSMALLMSGSIZE);
 126   if (client == (CLIENT *) NULL)
 127     return (FALSE);
 128   parms.pm_prog = program;
 129   parms.pm_vers = version;
 130   parms.pm_prot = protocol;
 131   parms.pm_port = port;
 132   if (CLNT_CALL (client, PMAPPROC_SET, (xdrproc_t)xdr_pmap, (caddr_t)&parms,
 133                  (xdrproc_t)xdr_bool, (caddr_t)&rslt,
 134                  tottimeout) != RPC_SUCCESS)
 135     {
 136       clnt_perror (client, "Cannot register service");
 137       rslt = FALSE;
 138     }
 139   CLNT_DESTROY (client);
 140   /* (void)close(_socket); CLNT_DESTROY closes it */
 141   return rslt;
 142 }
 143 libc_hidden_def (pmap_set)
 144
 145 /*
 146  * Remove the mapping between program,version and port.
 147  * Calls the pmap service remotely to do the un-mapping.
 148  */
 149 bool_t
 150 pmap_unset (u_long program, u_long version)
 151 {
 152   struct sockaddr_in myaddress;
 153   int _socket = -1;
 154   CLIENT *client;
 155   struct pmap parms;
 156   bool_t rslt;
 157
 158   if (!__get_myaddress (&myaddress))
 159     return FALSE;
 160   client = clntudp_bufcreate (&myaddress, PMAPPROG, PMAPVERS,
 161                         timeout, &_socket, RPCSMALLMSGSIZE, RPCSMALLMSGSIZE);
 162   if (client == (CLIENT *) NULL)
 163     return FALSE;
 164   parms.pm_prog = program;
 165   parms.pm_vers = version;
 166   parms.pm_port = parms.pm_prot = 0;
 167   CLNT_CALL (client, PMAPPROC_UNSET, (xdrproc_t)xdr_pmap, (caddr_t)&parms,
 168              (xdrproc_t)xdr_bool, (caddr_t)&rslt, tottimeout);
 169   CLNT_DESTROY (client);
 170   /* (void)close(_socket); CLNT_DESTROY already closed it */
 171   return rslt;
 172 }
 173 libc_hidden_def (pmap_unset)