302bb4f8f84905bb4bd8a9258e1bedc5554e7b8d
[shibboleth/cpp-sp.git] / oncrpc / pmap_get.c
1 /*********************************************************************
2  * RPC for the Windows NT Operating System
3  * 1993 by Martin F. Gergeleit
4  * Users may use, copy or modify Sun RPC for the Windows NT Operating 
5  * System according to the Sun copyright below.
6  *
7  * RPC for the Windows NT Operating System COMES WITH ABSOLUTELY NO 
8  * WARRANTY, NOR WILL I BE LIABLE FOR ANY DAMAGES INCURRED FROM THE 
9  * USE OF. USE ENTIRELY AT YOUR OWN RISK!!!
10  *********************************************************************/
11
12 /* @(#)pmap_getport.c   2.2 88/08/01 4.0 RPCSRC */
13 /*
14  * Sun RPC is a product of Sun Microsystems, Inc. and is provided for
15  * unrestricted use provided that this legend is included on all tape
16  * media and as a part of the software program in whole or part.  Users
17  * may copy or modify Sun RPC without charge, but are not authorized
18  * to license or distribute it to anyone else except as part of a product or
19  * program developed by the user.
20  * 
21  * SUN RPC IS PROVIDED AS IS WITH NO WARRANTIES OF ANY KIND INCLUDING THE
22  * WARRANTIES OF DESIGN, MERCHANTIBILITY AND FITNESS FOR A PARTICULAR
23  * PURPOSE, OR ARISING FROM A COURSE OF DEALING, USAGE OR TRADE PRACTICE.
24  * 
25  * Sun RPC is provided with no support and without any obligation on the
26  * part of Sun Microsystems, Inc. to assist in its use, correction,
27  * modification or enhancement.
28  * 
29  * SUN MICROSYSTEMS, INC. SHALL HAVE NO LIABILITY WITH RESPECT TO THE
30  * INFRINGEMENT OF COPYRIGHTS, TRADE SECRETS OR ANY PATENTS BY SUN RPC
31  * OR ANY PART THEREOF.
32  * 
33  * In no event will Sun Microsystems, Inc. be liable for any lost revenue
34  * or profits or other special, indirect and consequential damages, even if
35  * Sun has been advised of the possibility of such damages.
36  * 
37  * Sun Microsystems, Inc.
38  * 2550 Garcia Avenue
39  * Mountain View, California  94043
40  */
41 #if !defined(lint) && defined(SCCSIDS)
42 static char sccsid[] = "@(#)pmap_getport.c 1.9 87/08/11 Copyr 1984 Sun Micro";
43 #endif
44
45 /*
46  * pmap_getport.c
47  * Client interface to pmap rpc service.
48  *
49  * Copyright (C) 1984, Sun Microsystems, Inc.
50  */
51
52 #include <rpc/rpc.h>
53 #include <rpc/pmap_prot.h>
54 #include <rpc/pmap_clnt.h>
55
56 static struct timeval timeout = { 5, 0 };
57 static struct timeval tottimeout = { 60, 0 };
58
59 /*
60  * Find the mapped port for program,version.
61  * Calls the pmap service remotely to do the lookup.
62  * Returns 0 if no map exists.
63  */
64 u_short
65 pmap_getport(address, program, version, protocol)
66         struct sockaddr_in *address;
67         u_long program;
68         u_long version;
69         u_int protocol;
70 {
71         u_short port = 0;
72         int socket = -1;
73         register CLIENT *client;
74         struct pmap parms;
75
76         address->sin_port = htons(PMAPPORT);
77         client = clntudp_bufcreate(address, PMAPPROG,
78             PMAPVERS, timeout, &socket, RPCSMALLMSGSIZE, RPCSMALLMSGSIZE);
79         if (client != (CLIENT *)NULL) {
80                 parms.pm_prog = program;
81                 parms.pm_vers = version;
82                 parms.pm_prot = protocol;
83                 parms.pm_port = 0;  /* not needed or used */
84                 if (CLNT_CALL(client, PMAPPROC_GETPORT, xdr_pmap, &parms,
85                     xdr_u_short, &port, tottimeout) != RPC_SUCCESS){
86                         rpc_createerr.cf_stat = RPC_PMAPFAILURE;
87                         clnt_geterr(client, &rpc_createerr.cf_error);
88                 } else if (port == 0) {
89                         rpc_createerr.cf_stat = RPC_PROGNOTREGISTERED;
90                 }
91                 CLNT_DESTROY(client);
92         }
93 #ifdef WIN32
94         (void)closesocket(socket);
95 #else
96         (void)close(socket);
97 #endif
98         address->sin_port = 0;
99         return (port);
100 }