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