clnt_simple.c revision 1.8 1 /* $NetBSD: clnt_simple.c,v 1.8 1997/07/13 20:13:06 christos Exp $ */
2
3 /*
4 * Sun RPC is a product of Sun Microsystems, Inc. and is provided for
5 * unrestricted use provided that this legend is included on all tape
6 * media and as a part of the software program in whole or part. Users
7 * may copy or modify Sun RPC without charge, but are not authorized
8 * to license or distribute it to anyone else except as part of a product or
9 * program developed by the user.
10 *
11 * SUN RPC IS PROVIDED AS IS WITH NO WARRANTIES OF ANY KIND INCLUDING THE
12 * WARRANTIES OF DESIGN, MERCHANTIBILITY AND FITNESS FOR A PARTICULAR
13 * PURPOSE, OR ARISING FROM A COURSE OF DEALING, USAGE OR TRADE PRACTICE.
14 *
15 * Sun RPC is provided with no support and without any obligation on the
16 * part of Sun Microsystems, Inc. to assist in its use, correction,
17 * modification or enhancement.
18 *
19 * SUN MICROSYSTEMS, INC. SHALL HAVE NO LIABILITY WITH RESPECT TO THE
20 * INFRINGEMENT OF COPYRIGHTS, TRADE SECRETS OR ANY PATENTS BY SUN RPC
21 * OR ANY PART THEREOF.
22 *
23 * In no event will Sun Microsystems, Inc. be liable for any lost revenue
24 * or profits or other special, indirect and consequential damages, even if
25 * Sun has been advised of the possibility of such damages.
26 *
27 * Sun Microsystems, Inc.
28 * 2550 Garcia Avenue
29 * Mountain View, California 94043
30 */
31
32 #include <sys/cdefs.h>
33 #if defined(LIBC_SCCS) && !defined(lint)
34 #if 0
35 static char *sccsid = "@(#)clnt_simple.c 1.35 87/08/11 Copyr 1984 Sun Micro";
36 static char *sccsid = "@(#)clnt_simple.c 2.2 88/08/01 4.0 RPCSRC";
37 #else
38 __RCSID("$NetBSD: clnt_simple.c,v 1.8 1997/07/13 20:13:06 christos Exp $");
39 #endif
40 #endif
41
42 /*
43 * clnt_simple.c
44 * Simplified front end to rpc.
45 *
46 * Copyright (C) 1984, Sun Microsystems, Inc.
47 */
48
49 #include <stdio.h>
50 #include <stdlib.h>
51 #include <string.h>
52 #include <unistd.h>
53 #include <rpc/rpc.h>
54 #include <sys/socket.h>
55 #include <netdb.h>
56
57 static struct callrpc_private {
58 CLIENT *client;
59 int socket;
60 int oldprognum, oldversnum, valid;
61 char *oldhost;
62 } *callrpc_private;
63
64 int
65 callrpc(host, prognum, versnum, procnum, inproc, in, outproc, out)
66 char *host;
67 int versnum, procnum;
68 xdrproc_t inproc, outproc;
69 char *in, *out;
70 {
71 register struct callrpc_private *crp = callrpc_private;
72 struct sockaddr_in server_addr;
73 enum clnt_stat clnt_stat;
74 struct hostent *hp;
75 struct timeval timeout, tottimeout;
76
77 if (crp == 0) {
78 crp = (struct callrpc_private *)calloc(1, sizeof (*crp));
79 if (crp == 0)
80 return (0);
81 callrpc_private = crp;
82 }
83 if (crp->oldhost == NULL) {
84 crp->oldhost = malloc(256);
85 crp->oldhost[0] = 0;
86 crp->socket = RPC_ANYSOCK;
87 }
88 if (crp->valid && crp->oldprognum == prognum && crp->oldversnum == versnum
89 && strcmp(crp->oldhost, host) == 0) {
90 /* reuse old client */
91 } else {
92 crp->valid = 0;
93 (void)close(crp->socket);
94 crp->socket = RPC_ANYSOCK;
95 if (crp->client) {
96 clnt_destroy(crp->client);
97 crp->client = NULL;
98 }
99 if ((hp = gethostbyname(host)) == NULL)
100 return ((int) RPC_UNKNOWNHOST);
101 timeout.tv_usec = 0;
102 timeout.tv_sec = 5;
103 memset(&server_addr, 0, sizeof(server_addr));
104 bcopy(hp->h_addr, (char *)&server_addr.sin_addr, hp->h_length);
105 server_addr.sin_len = sizeof(struct sockaddr_in);
106 server_addr.sin_family = AF_INET;
107 server_addr.sin_port = 0;
108 if ((crp->client = clntudp_create(&server_addr, (u_long)prognum,
109 (u_long)versnum, timeout, &crp->socket)) == NULL)
110 return ((int) rpc_createerr.cf_stat);
111 crp->valid = 1;
112 crp->oldprognum = prognum;
113 crp->oldversnum = versnum;
114 (void)strncpy(crp->oldhost, host, 256 - 1);
115 }
116 tottimeout.tv_sec = 25;
117 tottimeout.tv_usec = 0;
118 clnt_stat = clnt_call(crp->client, procnum, inproc, in,
119 outproc, out, tottimeout);
120 /*
121 * if call failed, empty cache
122 */
123 if (clnt_stat != RPC_SUCCESS)
124 crp->valid = 0;
125 return ((int) clnt_stat);
126 }
127