2 * Sun RPC is a product of Sun Microsystems, Inc. and is provided for
3 * unrestricted use provided that this legend is included on all tape
4 * media and as a part of the software program in whole or part. Users
5 * may copy or modify Sun RPC without charge, but are not authorized
6 * to license or distribute it to anyone else except as part of a product or
7 * program developed by the user.
9 * SUN RPC IS PROVIDED AS IS WITH NO WARRANTIES OF ANY KIND INCLUDING THE
10 * WARRANTIES OF DESIGN, MERCHANTIBILITY AND FITNESS FOR A PARTICULAR
11 * PURPOSE, OR ARISING FROM A COURSE OF DEALING, USAGE OR TRADE PRACTICE.
13 * Sun RPC is provided with no support and without any obligation on the
14 * part of Sun Microsystems, Inc. to assist in its use, correction,
15 * modification or enhancement.
17 * SUN MICROSYSTEMS, INC. SHALL HAVE NO LIABILITY WITH RESPECT TO THE
18 * INFRINGEMENT OF COPYRIGHTS, TRADE SECRETS OR ANY PATENTS BY SUN RPC
19 * OR ANY PART THEREOF.
21 * In no event will Sun Microsystems, Inc. be liable for any lost revenue
22 * or profits or other special, indirect and consequential damages, even if
23 * Sun has been advised of the possibility of such damages.
25 * Sun Microsystems, Inc.
27 * Mountain View, California 94043
30 * Copyright (C) 1987, Sun Microsystems, Inc.
40 #include <sys/socket.h>
45 * Generic client creation: takes (hostname, program-number, protocol) and
46 * returns client handle. Default options are set, which the user can
47 * change using the rpc equivalent of ioctl()'s.
50 clnt_create (const char *hostname
, u_long prog
, u_long vers
,
53 struct hostent hostbuf
, *h
;
56 struct sockaddr_in sin
;
57 struct sockaddr_un sun
;
63 if (strcmp (proto
, "unix") == 0)
65 memset ((char *)&sun
, 0, sizeof (sun
));
66 sun
.sun_family
= AF_UNIX
;
67 strcpy (sun
.sun_path
, hostname
);
69 client
= clntunix_create (&sun
, prog
, vers
, &sock
, 0, 0);
73 /* This is not wanted. This would disable the user from having
74 a timeout in the clnt_call() call. Only a call to cnlt_control()
75 by the user should set the timeout value. */
78 clnt_control (client
, CLSET_TIMEOUT
, (char *)&tv
);
84 hsttmpbuf
= alloca (hstbuflen
);
85 while (gethostbyname_r (hostname
, &hostbuf
, hsttmpbuf
, hstbuflen
,
88 if (herr
!= NETDB_INTERNAL
|| errno
!= ERANGE
)
90 get_rpc_createerr().cf_stat
= RPC_UNKNOWNHOST
;
95 /* Enlarge the buffer. */
97 hsttmpbuf
= alloca (hstbuflen
);
100 if (h
->h_addrtype
!= AF_INET
)
103 * Only support INET for now
105 struct rpc_createerr
*ce
= &get_rpc_createerr ();
106 ce
->cf_stat
= RPC_SYSTEMERROR
;
107 ce
->cf_error
.re_errno
= EAFNOSUPPORT
;
110 sin
.sin_family
= h
->h_addrtype
;
112 memset (sin
.sin_zero
, 0, sizeof (sin
.sin_zero
));
113 memcpy ((char *) &sin
.sin_addr
, h
->h_addr
, h
->h_length
);
117 if (!strcmp(proto
, "udp"))
121 client
= clntudp_create (&sin
, prog
, vers
, tv
, &sock
);
125 /* This is not wanted. This would disable the user from having
126 a timeout in the clnt_call() call. Only a call to cnlt_control()
127 by the user should set the timeout value. */
129 clnt_control (client
, CLSET_TIMEOUT
, (char *)&tv
);
132 else if (!strcmp(proto
, "tcp"))
134 client
= clnttcp_create (&sin
, prog
, vers
, &sock
, 0, 0);
138 /* This is not wanted. This would disable the user from having
139 a timeout in the clnt_call() call. Only a call to cnlt_control()
140 by the user should set the timeout value. */
143 clnt_control (client
, CLSET_TIMEOUT
, (char *)&tv
);
148 struct rpc_createerr
*ce
= &get_rpc_createerr ();
149 ce
->cf_stat
= RPC_SYSTEMERROR
;
150 ce
->cf_error
.re_errno
= EPFNOSUPPORT
;