home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 2 / Apprentice-Release2.iso / Source Code / C / Libraries / GUSI-RPC 4.0 / clnt_generic.c < prev    next >
Encoding:
C/C++ Source or Header  |  1993-03-12  |  3.2 KB  |  112 lines  |  [TEXT/MPS ]
  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 <GUSI.h>
  37. #include <rpc/rpc.h>
  38. #include <sys/socket.h>
  39. #include <sys/errno.h>
  40. #include <netdb.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.     char *hostname;
  50.     unsigned prog;
  51.     unsigned vers;
  52.     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.     sin.sin_family = h->h_addrtype;
  75.     sin.sin_port = 0;
  76.     bzero(sin.sin_zero, sizeof(sin.sin_zero));
  77.     bcopy(h->h_addr, (char*)&sin.sin_addr, h->h_length);
  78.     p = getprotobyname(proto);
  79.     if (p == NULL) {
  80.         rpc_createerr.cf_stat = RPC_UNKNOWNPROTO;
  81.         rpc_createerr.cf_error.re_errno = EPFNOSUPPORT; 
  82.         return (NULL);
  83.     }
  84.     sock = RPC_ANYSOCK;
  85.     switch (p->p_proto) {
  86.     case IPPROTO_UDP:
  87.         tv.tv_sec = 5;
  88.         tv.tv_usec = 0;
  89.         client = clntudp_create(&sin, prog, vers, tv, &sock);
  90.         if (client == NULL) {
  91.             return (NULL);
  92.         }
  93.         tv.tv_sec = 25;
  94.         clnt_control(client, CLSET_TIMEOUT, &tv);
  95.         break;
  96.     case IPPROTO_TCP:
  97.         client = clnttcp_create(&sin, prog, vers, &sock, 0, 0);
  98.         if (client == NULL) {
  99.             return (NULL);
  100.         }
  101.         tv.tv_sec = 25;
  102.         tv.tv_usec = 0;
  103.         clnt_control(client, CLSET_TIMEOUT, &tv);
  104.         break;
  105.     default:
  106.         rpc_createerr.cf_stat = RPC_SYSTEMERROR;
  107.         rpc_createerr.cf_error.re_errno = EPFNOSUPPORT; 
  108.         return (NULL);
  109.     }
  110.     return (client);
  111. }
  112.