chiark / gitweb /
eglibc (2.11.3-4+deb6u3) squeeze-lts; urgency=medium
[eglibc.git] / sunrpc / pmap_clnt.c
1 /*
2  * Copyright (C) 1984, Sun Microsystems, Inc.
3  *
4  * Redistribution and use in source and binary forms, with or without
5  * modification, are permitted provided that the following conditions are
6  * met:
7  *
8  *     * Redistributions of source code must retain the above copyright
9  *       notice, this list of conditions and the following disclaimer.
10  *     * Redistributions in binary form must reproduce the above
11  *       copyright notice, this list of conditions and the following
12  *       disclaimer in the documentation and/or other materials
13  *       provided with the distribution.
14  *     * Neither the name of Sun Microsystems, Inc. nor the names of its
15  *       contributors may be used to endorse or promote products derived
16  *       from this software without specific prior written permission.
17  *
18  *   THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
19  *   "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
20  *   LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
21  *   FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
22  *   COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT,
23  *   INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24  *   DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
25  *   GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26  *   INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
27  *   WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
28  *   NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
29  *   OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
30  */
31 /*
32  * pmap_clnt.c
33  * Client interface to pmap rpc service.
34  */
35
36 #include <stdio.h>
37 #include <unistd.h>
38 #include <libintl.h>
39 #include <net/if.h>
40 #include <ifaddrs.h>
41 #include <sys/ioctl.h>
42 #include <sys/socket.h>
43 #include <netinet/in.h>
44 #include <arpa/inet.h>
45 #include <rpc/rpc.h>
46 #include <rpc/pmap_prot.h>
47 #include <rpc/pmap_clnt.h>
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   struct ifaddrs *ifa;
58
59   if (getifaddrs (&ifa) != 0)
60     {
61       perror ("get_myaddress: getifaddrs");
62       exit (1);
63     }
64
65   int loopback = 1;
66   struct ifaddrs *run;
67
68  again:
69   run = ifa;
70   while (run != NULL)
71     {
72       if ((run->ifa_flags & IFF_UP)
73           && run->ifa_addr != NULL
74           && run->ifa_addr->sa_family == AF_INET
75           && ((run->ifa_flags & IFF_LOOPBACK) || loopback == 0))
76         {
77           *addr = *((struct sockaddr_in *) run->ifa_addr);
78           addr->sin_port = htons (PMAPPORT);
79           goto out;
80         }
81
82       run = run->ifa_next;
83     }
84
85   if (loopback == 1)
86     {
87       loopback = 0;
88       goto again;
89     }
90  out:
91   freeifaddrs (ifa);
92
93   return run == NULL ? FALSE : TRUE;
94 }
95
96
97 static const struct timeval timeout = {5, 0};
98 static const struct timeval tottimeout = {60, 0};
99
100 /*
101  * Set a mapping between program,version and port.
102  * Calls the pmap service remotely to do the mapping.
103  */
104 bool_t
105 pmap_set (u_long program, u_long version, int protocol, u_short port)
106 {
107   struct sockaddr_in myaddress;
108   int socket = -1;
109   CLIENT *client;
110   struct pmap parms;
111   bool_t rslt;
112
113   if (!__get_myaddress (&myaddress))
114     return FALSE;
115   client = INTUSE(clntudp_bufcreate) (&myaddress, PMAPPROG, PMAPVERS,
116                                       timeout, &socket, RPCSMALLMSGSIZE,
117                                       RPCSMALLMSGSIZE);
118   if (client == (CLIENT *) NULL)
119     return (FALSE);
120   parms.pm_prog = program;
121   parms.pm_vers = version;
122   parms.pm_prot = protocol;
123   parms.pm_port = port;
124   if (CLNT_CALL (client, PMAPPROC_SET, (xdrproc_t)INTUSE(xdr_pmap),
125                  (caddr_t)&parms, (xdrproc_t)INTUSE(xdr_bool), (caddr_t)&rslt,
126                  tottimeout) != RPC_SUCCESS)
127     {
128       clnt_perror (client, _("Cannot register service"));
129       rslt = FALSE;
130     }
131   CLNT_DESTROY (client);
132   /* (void)close(socket); CLNT_DESTROY closes it */
133   return rslt;
134 }
135 libc_hidden_def (pmap_set)
136
137 /*
138  * Remove the mapping between program,version and port.
139  * Calls the pmap service remotely to do the un-mapping.
140  */
141 bool_t
142 pmap_unset (u_long program, u_long version)
143 {
144   struct sockaddr_in myaddress;
145   int socket = -1;
146   CLIENT *client;
147   struct pmap parms;
148   bool_t rslt;
149
150   if (!__get_myaddress (&myaddress))
151     return FALSE;
152   client = INTUSE(clntudp_bufcreate) (&myaddress, PMAPPROG, PMAPVERS,
153                                       timeout, &socket, RPCSMALLMSGSIZE,
154                                       RPCSMALLMSGSIZE);
155   if (client == (CLIENT *) NULL)
156     return FALSE;
157   parms.pm_prog = program;
158   parms.pm_vers = version;
159   parms.pm_port = parms.pm_prot = 0;
160   CLNT_CALL (client, PMAPPROC_UNSET, (xdrproc_t)INTUSE(xdr_pmap),
161              (caddr_t)&parms, (xdrproc_t)INTUSE(xdr_bool), (caddr_t)&rslt,
162              tottimeout);
163   CLNT_DESTROY (client);
164   /* (void)close(socket); CLNT_DESTROY already closed it */
165   return rslt;
166 }
167 libc_hidden_def (pmap_unset)