1/* 2 * Copyright (c) 1999 Apple Computer, Inc. All rights reserved. 3 * 4 * @APPLE_LICENSE_HEADER_START@ 5 * 6 * Portions Copyright (c) 1999 Apple Computer, Inc. All Rights 7 * Reserved. This file contains Original Code and/or Modifications of 8 * Original Code as defined in and that are subject to the Apple Public 9 * Source License Version 1.1 (the "License"). You may not use this file 10 * except in compliance with the License. Please obtain a copy of the 11 * License at http://www.apple.com/publicsource and read it before using 12 * this file. 13 * 14 * The Original Code and all software distributed under the License are 15 * distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY KIND, EITHER 16 * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES, 17 * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY, 18 * FITNESS FOR A PARTICULAR PURPOSE OR NON- INFRINGEMENT. Please see the 19 * License for the specific language governing rights and limitations 20 * under the License. 21 * 22 * @APPLE_LICENSE_HEADER_END@ 23 */ 24/* 25 * Sun RPC is a product of Sun Microsystems, Inc. and is provided for 26 * unrestricted use provided that this legend is included on all tape 27 * media and as a part of the software program in whole or part. Users 28 * may copy or modify Sun RPC without charge, but are not authorized 29 * to license or distribute it to anyone else except as part of a product or 30 * program developed by the user. 31 * 32 * SUN RPC IS PROVIDED AS IS WITH NO WARRANTIES OF ANY KIND INCLUDING THE 33 * WARRANTIES OF DESIGN, MERCHANTIBILITY AND FITNESS FOR A PARTICULAR 34 * PURPOSE, OR ARISING FROM A COURSE OF DEALING, USAGE OR TRADE PRACTICE. 35 * 36 * Sun RPC is provided with no support and without any obligation on the 37 * part of Sun Microsystems, Inc. to assist in its use, correction, 38 * modification or enhancement. 39 * 40 * SUN MICROSYSTEMS, INC. SHALL HAVE NO LIABILITY WITH RESPECT TO THE 41 * INFRINGEMENT OF COPYRIGHTS, TRADE SECRETS OR ANY PATENTS BY SUN RPC 42 * OR ANY PART THEREOF. 43 * 44 * In no event will Sun Microsystems, Inc. be liable for any lost revenue 45 * or profits or other special, indirect and consequential damages, even if 46 * Sun has been advised of the possibility of such damages. 47 * 48 * Sun Microsystems, Inc. 49 * 2550 Garcia Avenue 50 * Mountain View, California 94043 51 */ 52 53#if defined(LIBC_SCCS) && !defined(lint) 54/*static char *sccsid = "from: @(#)clnt_simple.c 1.35 87/08/11 Copyr 1984 Sun Micro";*/ 55/*static char *sccsid = "from: @(#)clnt_simple.c 2.2 88/08/01 4.0 RPCSRC";*/ 56static char *rcsid = "$Id: clnt_simple.c,v 1.3 2002/02/19 20:36:23 epeyton Exp $"; 57#endif 58 59/* 60 * clnt_simple.c 61 * Simplified front end to rpc. 62 * 63 * Copyright (C) 1984, Sun Microsystems, Inc. 64 */ 65 66#include <stdio.h> 67#include <stdlib.h> 68#include <string.h> 69#include <unistd.h> 70#include <rpc/rpc.h> 71#include <sys/socket.h> 72#include <netdb.h> 73 74static struct callrpc_private { 75 CLIENT *client; 76 int socket; 77 int oldprognum, oldversnum, valid; 78 char *oldhost; 79} *callrpc_private; 80 81int 82callrpc(host, prognum, versnum, procnum, inproc, in, outproc, out) 83 int prognum; 84 int versnum; 85 int procnum; 86 char *host; 87 xdrproc_t inproc, outproc; 88 char *in, *out; 89{ 90 register struct callrpc_private *crp = callrpc_private; 91 struct sockaddr_in server_addr; 92 enum clnt_stat clnt_stat; 93 struct hostent *hp; 94 struct timeval timeout, tottimeout; 95 96 if (crp == 0) { 97 crp = (struct callrpc_private *)calloc(1, sizeof (*crp)); 98 if (crp == 0) 99 return (0); 100 callrpc_private = crp; 101 } 102 if (crp->oldhost == NULL) { 103 crp->oldhost = malloc(256); 104 crp->oldhost[0] = 0; 105 crp->socket = RPC_ANYSOCK; 106 } 107 if (crp->valid && crp->oldprognum == prognum && crp->oldversnum == versnum 108 && strcmp(crp->oldhost, host) == 0) { 109 /* reuse old client */ 110 } else { 111 crp->valid = 0; 112 (void)close(crp->socket); 113 crp->socket = RPC_ANYSOCK; 114 if (crp->client) { 115 clnt_destroy(crp->client); 116 crp->client = NULL; 117 } 118 if ((hp = gethostbyname(host)) == NULL) 119 return ((int) RPC_UNKNOWNHOST); 120 timeout.tv_usec = 0; 121 timeout.tv_sec = 5; 122 bzero((char *)&server_addr, sizeof server_addr); 123 bcopy(hp->h_addr, (char *)&server_addr.sin_addr, hp->h_length); 124 server_addr.sin_family = AF_INET; 125 server_addr.sin_port = 0; 126#ifdef __LP64__ 127 if ((crp->client = clntudp_create(&server_addr, (uint32_t)prognum, 128 (uint32_t)versnum, timeout, &crp->socket)) == NULL) 129 return ((int) rpc_createerr.cf_stat); 130#else 131 if ((crp->client = clntudp_create(&server_addr, (u_long)prognum, 132 (u_long)versnum, timeout, &crp->socket)) == NULL) 133 return ((int) rpc_createerr.cf_stat); 134#endif 135 crp->valid = 1; 136 crp->oldprognum = prognum; 137 crp->oldversnum = versnum; 138 (void) strcpy(crp->oldhost, host); 139 } 140 tottimeout.tv_sec = 25; 141 tottimeout.tv_usec = 0; 142 clnt_stat = clnt_call(crp->client, procnum, inproc, in, 143 outproc, out, tottimeout); 144 /* 145 * if call failed, empty cache 146 */ 147 if (clnt_stat != RPC_SUCCESS) 148 crp->valid = 0; 149 return ((int) clnt_stat); 150} 151