home *** CD-ROM | disk | FTP | other *** search
/ Serving the Web / ServingTheWeb1995.disc1of1.iso / linux / slacksrce / d / libc / libc-4.6 / libc-4 / libc-linux / rpc / clnt_generic.c < prev    next >
Encoding:
C/C++ Source or Header  |  1994-09-30  |  3.3 KB  |  117 lines
  1. /* @(#)clnt_generic.c    2.2 88/08/01 4.0 RPCSRC */
  2. /*
  3.  * Sun RPC is a product of Sun Microsystems, Inc. and is provided for
  4.  * unrestricted use provided that this legend is included on all tape
  5.  * media and as a part of the software program in whole or part.  Users
  6.  * may copy or modify Sun RPC without charge, but are not authorized
  7.  * to license or distribute it to anyone else except as part of a product or
  8.  * program developed by the user.
  9.  * 
  10.  * SUN RPC IS PROVIDED AS IS WITH NO WARRANTIES OF ANY KIND INCLUDING THE
  11.  * WARRANTIES OF DESIGN, MERCHANTIBILITY AND FITNESS FOR A PARTICULAR
  12.  * PURPOSE, OR ARISING FROM A COURSE OF DEALING, USAGE OR TRADE PRACTICE.
  13.  * 
  14.  * Sun RPC is provided with no support and without any obligation on the
  15.  * part of Sun Microsystems, Inc. to assist in its use, correction,
  16.  * modification or enhancement.
  17.  *
  18.  * SUN MICROSYSTEMS, INC. SHALL HAVE NO LIABILITY WITH RESPECT TO THE
  19.  * INFRINGEMENT OF COPYRIGHTS, TRADE SECRETS OR ANY PATENTS BY SUN RPC
  20.  * OR ANY PART THEREOF.
  21.  * 
  22.  * In no event will Sun Microsystems, Inc. be liable for any lost revenue
  23.  * or profits or other special, indirect and consequential damages, even if
  24.  * Sun has been advised of the possibility of such damages.
  25.  * 
  26.  * Sun Microsystems, Inc.
  27.  * 2550 Garcia Avenue
  28.  * Mountain View, California  94043
  29.  */
  30. #if !defined(lint) && defined(SCCSIDS)
  31. static char sccsid[] = "@(#)clnt_generic.c 1.4 87/08/11 (C) 1987 SMI";
  32. #endif
  33. /*
  34.  * Copyright (C) 1987, Sun Microsystems, Inc.
  35.  */
  36. #include <rpc/rpc.h>
  37. #include <sys/socket.h>
  38. #include <sys/errno.h>
  39. #include <netdb.h>
  40. #include <strings.h>
  41.  
  42. /*
  43.  * Generic client creation: takes (hostname, program-number, protocol) and
  44.  * returns client handle. Default options are set, which the user can 
  45.  * change using the rpc equivalent of ioctl()'s.
  46.  */
  47. CLIENT *
  48. clnt_create(hostname, prog, vers, proto)
  49.     __const char *hostname;
  50.     unsigned long prog;
  51.     unsigned long vers;
  52.     __const char *proto;
  53. {
  54.     struct hostent *h;
  55.     struct protoent *p;
  56.     struct sockaddr_in sin;
  57.     int sock;
  58.     struct timeval tv;
  59.     CLIENT *client;
  60.  
  61.     h = gethostbyname(hostname);
  62.     if (h == NULL) {
  63.         rpc_createerr.cf_stat = RPC_UNKNOWNHOST;
  64.         return (NULL);
  65.     }
  66.     if (h->h_addrtype != AF_INET) {
  67.         /*
  68.          * Only support INET for now
  69.          */
  70.         rpc_createerr.cf_stat = RPC_SYSTEMERROR;
  71.         rpc_createerr.cf_error.re_errno = EAFNOSUPPORT; 
  72.         return (NULL);
  73.     }
  74. #ifdef linux
  75.     bzero((char *) &sin, sizeof(sin));
  76. #endif
  77.     sin.sin_family = h->h_addrtype;
  78.     sin.sin_port = 0;
  79. #ifndef linux
  80.     bzero(sin.sin_zero, sizeof(sin.sin_zero));
  81. #endif
  82.     bcopy(h->h_addr, (char*)&sin.sin_addr, h->h_length);
  83.     p = getprotobyname(proto);
  84.     if (p == NULL) {
  85.         rpc_createerr.cf_stat = RPC_UNKNOWNPROTO;
  86.         rpc_createerr.cf_error.re_errno = EPFNOSUPPORT; 
  87.         return (NULL);
  88.     }
  89.     sock = RPC_ANYSOCK;
  90.     switch (p->p_proto) {
  91.     case IPPROTO_UDP:
  92.         tv.tv_sec = 5;
  93.         tv.tv_usec = 0;
  94.         client = clntudp_create(&sin, prog, vers, tv, &sock);
  95.         if (client == NULL) {
  96.             return (NULL);
  97.         }
  98.         tv.tv_sec = 25;
  99.         clnt_control(client, CLSET_TIMEOUT, &tv);
  100.         break;
  101.     case IPPROTO_TCP:
  102.         client = clnttcp_create(&sin, prog, vers, &sock, 0, 0);
  103.         if (client == NULL) {
  104.             return (NULL);
  105.         }
  106.         tv.tv_sec = 25;
  107.         tv.tv_usec = 0;
  108.         clnt_control(client, CLSET_TIMEOUT, &tv);
  109.         break;
  110.     default:
  111.         rpc_createerr.cf_stat = RPC_SYSTEMERROR;
  112.         rpc_createerr.cf_error.re_errno = EPFNOSUPPORT; 
  113.         return (NULL);
  114.     }
  115.     return (client);
  116. }
  117.