oncrpc/clnt_sim.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 /* @(#)clnt_simple.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[] = "@(#)clnt_simple.c 1.35 87/08/11 Copyr 1984 Sun Micro";
  43 #endif
  44
  45 /*
  46  * clnt_simple.c
  47  * Simplified front end to rpc.
  48  *
  49  * Copyright (C) 1984, Sun Microsystems, Inc.
  50  */
  51
  52 #include <stdio.h>
  53 #include <rpc/rpc.h>
  54 #ifndef WIN32
  55 #include <sys/socket.h>
  56 #include <netdb.h>
  57 #include <strings.h>
  58 #endif
  59
  60 static struct callrpc_private {
  61         CLIENT  *client;
  62         int     socket;
  63         int     oldprognum, oldversnum, valid;
  64         char    *oldhost;
  65 } *callrpc_private;
  66
  67 callrpc(host, prognum, versnum, procnum, inproc, in, outproc, out)
  68         char *host;
  69         xdrproc_t inproc, outproc;
  70         char *in, *out;
  71 {
  72         register struct callrpc_private *crp = callrpc_private;
  73         struct sockaddr_in server_addr;
  74         enum clnt_stat clnt_stat;
  75         struct hostent *hp;
  76         struct timeval timeout, tottimeout;
  77
  78         if (crp == 0) {
  79                 crp = (struct callrpc_private *)calloc(1, sizeof (*crp));
  80                 if (crp == 0)
  81                         return (0);
  82                 callrpc_private = crp;
  83         }
  84         if (crp->oldhost == NULL) {
  85                 crp->oldhost = malloc(256);
  86                 crp->oldhost[0] = 0;
  87                 crp->socket = RPC_ANYSOCK;
  88         }
  89         if (crp->valid && crp->oldprognum == prognum && crp->oldversnum == versnum
  90                 && strcmp(crp->oldhost, host) == 0) {
  91                 /* reuse old client */
  92         } else {
  93                 crp->valid = 0;
  94 #ifdef WIN32
  95                 (void)closesocket(crp->socket);
  96 #else
  97                 (void)close(crp->socket);
  98 #endif
  99                 crp->socket = RPC_ANYSOCK;
 100                 if (crp->client) {
 101                         clnt_destroy(crp->client);
 102                         crp->client = NULL;
 103                 }
 104                 if ((hp = gethostbyname(host)) == NULL)
 105                         return ((int) RPC_UNKNOWNHOST);
 106                 timeout.tv_usec = 0;
 107                 timeout.tv_sec = 5;
 108                 bcopy(hp->h_addr, (char *)&server_addr.sin_addr, hp->h_length);
 109                 server_addr.sin_family = AF_INET;
 110                 server_addr.sin_port =  0;
 111                 if ((crp->client = clntudp_create(&server_addr, (u_long)prognum,
 112                     (u_long)versnum, timeout, &crp->socket)) == NULL)
 113                         return ((int) rpc_createerr.cf_stat);
 114                 crp->valid = 1;
 115                 crp->oldprognum = prognum;
 116                 crp->oldversnum = versnum;
 117                 (void) strcpy(crp->oldhost, host);
 118         }
 119         tottimeout.tv_sec = 25;
 120         tottimeout.tv_usec = 0;
 121         clnt_stat = clnt_call(crp->client, procnum, inproc, in,
 122             outproc, out, tottimeout);
 123         /*
 124          * if call failed, empty cache
 125          */
 126         if (clnt_stat != RPC_SUCCESS)
 127                 crp->valid = 0;
 128         return ((int) clnt_stat);
 129 }