xref: /freebsd/lib/libc/rpc/pmap_rmt.c (revision 5b9c547c)
1 /*	$NetBSD: pmap_rmt.c,v 1.29 2000/07/06 03:10:34 christos Exp $	*/
2 
3 /*-
4  * Copyright (c) 2009, Sun Microsystems, Inc.
5  * All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions are met:
9  * - Redistributions of source code must retain the above copyright notice,
10  *   this list of conditions and the following disclaimer.
11  * - Redistributions in binary form must reproduce the above copyright notice,
12  *   this list of conditions and the following disclaimer in the documentation
13  *   and/or other materials 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 "AS IS"
19  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
20  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
21  * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
22  * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
23  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
24  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
25  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
26  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
27  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
28  * POSSIBILITY OF SUCH DAMAGE.
29  */
30 
31 #if defined(LIBC_SCCS) && !defined(lint)
32 static char *sccsid2 = "@(#)pmap_rmt.c 1.21 87/08/27 Copyr 1984 Sun Micro";
33 static char *sccsid = "@(#)pmap_rmt.c	2.2 88/08/01 4.0 RPCSRC";
34 #endif
35 #include <sys/cdefs.h>
36 __FBSDID("$FreeBSD$");
37 
38 /*
39  * pmap_rmt.c
40  * Client interface to pmap rpc service.
41  * remote call and broadcast service
42  *
43  * Copyright (C) 1984, Sun Microsystems, Inc.
44  */
45 
46 #include "namespace.h"
47 #include <sys/types.h>
48 #include <sys/ioctl.h>
49 #include <sys/poll.h>
50 #include <sys/socket.h>
51 
52 #include <net/if.h>
53 #include <netinet/in.h>
54 #include <arpa/inet.h>
55 
56 #include <assert.h>
57 #include <err.h>
58 #include <errno.h>
59 #include <stdio.h>
60 #include <string.h>
61 #include <unistd.h>
62 
63 #include <rpc/rpc.h>
64 #include <rpc/pmap_prot.h>
65 #include <rpc/pmap_clnt.h>
66 #include <rpc/pmap_rmt.h>
67 #include "un-namespace.h"
68 
69 static const struct timeval timeout = { 3, 0 };
70 
71 /*
72  * pmapper remote-call-service interface.
73  * This routine is used to call the pmapper remote call service
74  * which will look up a service program in the port maps, and then
75  * remotely call that routine with the given parameters.  This allows
76  * programs to do a lookup and call in one step.
77 */
78 enum clnt_stat
79 pmap_rmtcall(addr, prog, vers, proc, xdrargs, argsp, xdrres, resp, tout,
80     port_ptr)
81 	struct sockaddr_in *addr;
82 	u_long prog, vers, proc;
83 	xdrproc_t xdrargs, xdrres;
84 	caddr_t argsp, resp;
85 	struct timeval tout;
86 	u_long *port_ptr;
87 {
88 	int sock = -1;
89 	CLIENT *client;
90 	struct rmtcallargs a;
91 	struct rmtcallres r;
92 	enum clnt_stat stat;
93 
94 	assert(addr != NULL);
95 	assert(port_ptr != NULL);
96 
97 	addr->sin_port = htons(PMAPPORT);
98 	client = clntudp_create(addr, PMAPPROG, PMAPVERS, timeout, &sock);
99 	if (client != NULL) {
100 		a.prog = prog;
101 		a.vers = vers;
102 		a.proc = proc;
103 		a.args_ptr = argsp;
104 		a.xdr_args = xdrargs;
105 		r.port_ptr = port_ptr;
106 		r.results_ptr = resp;
107 		r.xdr_results = xdrres;
108 		stat = CLNT_CALL(client, (rpcproc_t)PMAPPROC_CALLIT,
109 		    (xdrproc_t)xdr_rmtcall_args, &a, (xdrproc_t)xdr_rmtcallres,
110 		    &r, tout);
111 		CLNT_DESTROY(client);
112 	} else {
113 		stat = RPC_FAILED;
114 	}
115 	addr->sin_port = 0;
116 	return (stat);
117 }
118 
119 
120 /*
121  * XDR remote call arguments
122  * written for XDR_ENCODE direction only
123  */
124 bool_t
125 xdr_rmtcall_args(xdrs, cap)
126 	XDR *xdrs;
127 	struct rmtcallargs *cap;
128 {
129 	u_int lenposition, argposition, position;
130 
131 	assert(xdrs != NULL);
132 	assert(cap != NULL);
133 
134 	if (xdr_u_long(xdrs, &(cap->prog)) &&
135 	    xdr_u_long(xdrs, &(cap->vers)) &&
136 	    xdr_u_long(xdrs, &(cap->proc))) {
137 		lenposition = XDR_GETPOS(xdrs);
138 		if (! xdr_u_long(xdrs, &(cap->arglen)))
139 		    return (FALSE);
140 		argposition = XDR_GETPOS(xdrs);
141 		if (! (*(cap->xdr_args))(xdrs, cap->args_ptr))
142 		    return (FALSE);
143 		position = XDR_GETPOS(xdrs);
144 		cap->arglen = (u_long)position - (u_long)argposition;
145 		XDR_SETPOS(xdrs, lenposition);
146 		if (! xdr_u_long(xdrs, &(cap->arglen)))
147 		    return (FALSE);
148 		XDR_SETPOS(xdrs, position);
149 		return (TRUE);
150 	}
151 	return (FALSE);
152 }
153 
154 /*
155  * XDR remote call results
156  * written for XDR_DECODE direction only
157  */
158 bool_t
159 xdr_rmtcallres(xdrs, crp)
160 	XDR *xdrs;
161 	struct rmtcallres *crp;
162 {
163 	caddr_t port_ptr;
164 
165 	assert(xdrs != NULL);
166 	assert(crp != NULL);
167 
168 	port_ptr = (caddr_t)(void *)crp->port_ptr;
169 	if (xdr_reference(xdrs, &port_ptr, sizeof (u_long),
170 	    (xdrproc_t)xdr_u_long) && xdr_u_long(xdrs, &crp->resultslen)) {
171 		crp->port_ptr = (u_long *)(void *)port_ptr;
172 		return ((*(crp->xdr_results))(xdrs, crp->results_ptr));
173 	}
174 	return (FALSE);
175 }
176