xref: /dragonfly/lib/libc/rpc/pmap_clnt.c (revision 71126e33)
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  * @(#)pmap_clnt.c 1.37 87/08/11 Copyr 1984 Sun Micro
30  * @(#)pmap_clnt.c	2.2 88/08/01 4.0 RPCSRC
31  * $FreeBSD: src/lib/libc/rpc/pmap_clnt.c,v 1.11 2000/01/27 23:06:39 jasone Exp $
32  * $DragonFly: src/lib/libc/rpc/pmap_clnt.c,v 1.3 2004/10/25 19:38:01 drhodus Exp $
33  */
34 
35 /*
36  * pmap_clnt.c
37  * Client interface to pmap rpc service.
38  *
39  * Copyright (C) 1984, Sun Microsystems, Inc.
40  */
41 
42 #include <sys/types.h>
43 #include <sys/stat.h>
44 #include <unistd.h>
45 #include <rpc/rpc.h>
46 #include <rpc/pmap_prot.h>
47 #include <rpc/pmap_clnt.h>
48 #include <netinet/in.h>
49 
50 static struct timeval timeout = { 5, 0 };
51 static struct timeval tottimeout = { 60, 0 };
52 
53 void clnt_perror();
54 
55 #ifndef PORTMAPSOCK
56 #define PORTMAPSOCK "/var/run/portmapsock"
57 #endif
58 
59 /*
60  * Set a mapping between program,version and port.
61  * Calls the pmap service remotely to do the mapping.
62  */
63 bool_t
64 pmap_set(program, version, protocol, port)
65 	u_long program;
66 	u_long version;
67 	int protocol;
68 	u_short port;
69 {
70 	struct sockaddr_in myaddress;
71 	int socket = -1;
72 	CLIENT *client;
73 	struct pmap parms;
74 	bool_t rslt;
75 	struct stat st;
76 
77 	/*
78 	 * Temporary hack for backwards compatibility. Eventually
79 	 * this test will go away and we'll use only the "unix" transport.
80 	 */
81 	if (stat(PORTMAPSOCK, &st) == 0 && st.st_mode & S_IFSOCK)
82 		client = clnt_create(PORTMAPSOCK, PMAPPROG, PMAPVERS, "unix");
83 	else  {
84 		if (get_myaddress(&myaddress) != 0)
85 			return (FALSE);
86 		myaddress.sin_addr.s_addr = htonl(INADDR_LOOPBACK);
87 		client = clntudp_bufcreate(&myaddress, PMAPPROG, PMAPVERS,
88 	    		timeout, &socket, RPCSMALLMSGSIZE, RPCSMALLMSGSIZE);
89 	}
90 
91 	if (client == (CLIENT *)NULL)
92 		return (FALSE);
93 	parms.pm_prog = program;
94 	parms.pm_vers = version;
95 	parms.pm_prot = protocol;
96 	parms.pm_port = port;
97 	if (CLNT_CALL(client, PMAPPROC_SET, xdr_pmap, &parms, xdr_bool, &rslt,
98 	    tottimeout) != RPC_SUCCESS) {
99 		clnt_perror(client, "Cannot register service");
100 		return (FALSE);
101 	}
102 	CLNT_DESTROY(client);
103 	if (socket != -1)
104 		(void)_close(socket);
105 	return (rslt);
106 }
107 
108 /*
109  * Remove the mapping between program,version and port.
110  * Calls the pmap service remotely to do the un-mapping.
111  */
112 bool_t
113 pmap_unset(program, version)
114 	u_long program;
115 	u_long version;
116 {
117 	struct sockaddr_in myaddress;
118 	int socket = -1;
119 	CLIENT *client;
120 	struct pmap parms;
121 	bool_t rslt;
122 	struct stat st;
123 
124 	/*
125 	 * Temporary hack for backwards compatibility. Eventually
126 	 * this test will go away and we'll use only the "unix" transport.
127 	 */
128 	if (stat(PORTMAPSOCK, &st) == 0 && st.st_mode & S_IFSOCK)
129 		client = clnt_create(PORTMAPSOCK, PMAPPROG, PMAPVERS, "unix");
130 	else {
131 		if (get_myaddress(&myaddress) != 0)
132 			return (FALSE);
133 		myaddress.sin_addr.s_addr = htonl(INADDR_LOOPBACK);
134 		client = clntudp_bufcreate(&myaddress, PMAPPROG, PMAPVERS,
135 	    		timeout, &socket, RPCSMALLMSGSIZE, RPCSMALLMSGSIZE);
136 	}
137 	if (client == (CLIENT *)NULL)
138 		return (FALSE);
139 	parms.pm_prog = program;
140 	parms.pm_vers = version;
141 	parms.pm_port = parms.pm_prot = 0;
142 	CLNT_CALL(client, PMAPPROC_UNSET, xdr_pmap, &parms, xdr_bool, &rslt,
143 	    tottimeout);
144 	CLNT_DESTROY(client);
145 	if (socket != -1)
146 		(void)_close(socket);
147 	return (rslt);
148 }
149