xref: /titanic_41/usr/src/lib/libbc/libc/yp/yp_bind.c (revision 7c478bd95313f5f23a4c958a745db2134aa03244)
1 /*
2  * CDDL HEADER START
3  *
4  * The contents of this file are subject to the terms of the
5  * Common Development and Distribution License, Version 1.0 only
6  * (the "License").  You may not use this file except in compliance
7  * with the License.
8  *
9  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10  * or http://www.opensolaris.org/os/licensing.
11  * See the License for the specific language governing permissions
12  * and limitations under the License.
13  *
14  * When distributing Covered Code, include this CDDL HEADER in each
15  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16  * If applicable, add the following below this CDDL HEADER, with the
17  * fields enclosed by brackets "[]" replaced with your own identifying
18  * information: Portions Copyright [yyyy] [name of copyright owner]
19  *
20  * CDDL HEADER END
21  */
22 /*
23  * Copyright 1992 Sun Microsystems, Inc.  All rights reserved.
24  * Use is subject to license terms.
25  */
26 
27 #pragma ident	"%Z%%M%	%I%	%E% SMI"
28 
29 #include <stdio.h>
30 #include <errno.h>
31 #include <sys/time.h>
32 #include <rpc/rpc.h>
33 #include <rpc/pmap_prot.h>
34 #include <sys/socket.h>
35 #include <sys/file.h>
36 #include <sys/syslog.h>
37 
38 #include "yp_prot.h"
39 #include "ypv1_prot.h"
40 #include "ypclnt.h"
41 
42 /*
43  * This is the same as struct dom_binding used by the base __yp_dobind().
44  * Named differently here to avoid name conflict with the compat
45  * struct dom_binding.
46  */
47 
48 /* Copied from base <sys/netconfig.h> */
49 
50 struct  netconfig {
51 	char		*nc_netid;	/* network identifier		*/
52 	unsigned long	nc_semantics;	/* defined below		*/
53 	unsigned long	nc_flag;	/* defined below		*/
54 	char		*nc_protofmly;	/* protocol family name		*/
55 	char		*nc_proto;	/* protocol name		*/
56 	char		*nc_device;	/* device name for network id	*/
57 	unsigned long	nc_nlookups;	/* # of entries in nc_lookups	*/
58 	char		**nc_lookups;	/* list of lookup directories	*/
59 	unsigned long	nc_unused[8];
60 };
61 
62 /* Copied from base <sys/tiuser.h> */
63 
64 struct netbuf {
65 	unsigned int maxlen;
66 	unsigned int len;
67 	char *buf;
68 };
69 
70 struct s5_dom_binding {
71 	struct s5_dom_binding *dom_next;
72 	char *dom_domain;
73 	struct s5_ypbind_binding *dom_binding;
74 	CLIENT *dom_client;
75 };
76 
77 struct s5_ypbind_binding {
78 	struct netconfig *ypbind_conf;
79 	struct netbuf *ypbind_svcaddr;
80 	char *ypbind_servername;
81 	long ypbind_hi_vers;
82 	long ypbind_lo_vers;
83 };
84 
85 static void _yp_unbind();
86 static struct	dom_binding *load_dom_binding_cache();
87 
88 static struct dom_binding *bound_domains; /* List of bound domains */
89 
90 /*
91  * This is a "wrapper" function that is implemented by the yp_bind()
92  * function in base libnsl/yp.
93  */
94 #ifdef NOTDEFINED
95 int
yp_bind(domain)96 yp_bind(domain)
97 	char *domain;
98 {
99 	/* XXX */
100 	_yp_bind(domain);
101 }
102 #endif
103 
104 /*
105  * Attempts to find a dom_binding in the list at bound_domains having the
106  * domain name field equal to the passed domain name, and removes it if found.
107  * The domain-server binding will not exist after the call to this function.
108  * All resources associated with the binding will be freed.
109  */
110 #ifdef NOTDEFINED
111 void
yp_unbind(domain)112 yp_unbind (domain)
113 	char *domain;
114 {
115 	_yp_unbind(domain); /* clean our local cache */
116 	/* XXX */
117 	_yp_unbind(domain);
118 }
119 #endif
120 
121 /*
122  * This is a wrapper around the yp_get_default_domain()
123  * function in base libnsl/yp.
124  */
125 #ifdef NOTDEFINED
126 int
yp_get_default_domain(domain)127 yp_get_default_domain(domain)
128 	char **domain;
129 {
130 	/* XXX */
131 	_yp_get_default_domain(domain);
132 }
133 #endif
134 
135 /*
136  * Attempts to locate a NIS server that serves a passed domain.
137  * This is a wrapper around the __yp_dobind() function in base
138  * libnsl/yp; it converts the libnsl [netbuf based] dom_binding structure into
139  * the [sockaddr based] one that is expected by binary compat apps. Note that,
140  * the wrapper must allocate memory resources in order to hold
141  * the
142  */
143 int
_yp_dobind(domain,binding)144 _yp_dobind(domain, binding)
145 	char *domain;
146 	struct dom_binding **binding;	/* if result == 0, ptr to dom_binding */
147 {
148 	int retval;
149 	struct s5_dom_binding *dom_binding; /* Ptr to dom_binding from libnsl __yp_dobind() */
150 	int status;
151 
152 	/* XXX */
153 	retval = __yp_dobind(domain, &dom_binding);
154 	if (retval != 0)
155 		return(retval);
156 
157 	if ((*binding = load_dom_binding_cache(domain, dom_binding)) == NULL)
158 		return (YPERR_RESRC);		/* make sure it is in our cache */
159 	return (0);				/* This is the go path */
160 }
161 
162 
163 /*
164  * This allocates some memory for a domain binding, initialize it, and
165  * returns a pointer to it.  Based on the program version we ended up
166  * talking to ypbind with, fill out an opvector of appropriate protocol
167  * modules.
168  */
169 static struct dom_binding *
load_dom_binding_cache(domain,dom_binding)170 load_dom_binding_cache(domain, dom_binding)
171 	char *domain;
172 	struct s5_dom_binding *dom_binding;
173 {
174 	struct dom_binding *pdomb = NULL;
175 	struct sockaddr_in *sa;	/* To get a port bound to socket */
176 	struct sockaddr_in local_name;
177 	int local_name_len = sizeof(struct sockaddr_in);
178 
179 
180 	for (pdomb = bound_domains; pdomb != NULL; pdomb = pdomb->dom_pnext) {
181 		if (strcmp(domain, pdomb->dom_domain) == 0)
182 				return (pdomb);
183 	}
184 
185 	if ((pdomb = (struct dom_binding *) malloc(sizeof(struct dom_binding)))
186 		== NULL) {
187 		(void) syslog(LOG_ERR, "load_dom_binding_cache:  malloc failure.");
188 		return (struct dom_binding *) (NULL);
189 	}
190 
191 	sa = (struct sockaddr_in *)dom_binding->dom_binding->ypbind_svcaddr->buf;
192 	pdomb->dom_server_addr.sin_family = sa->sin_family;
193 	pdomb->dom_server_addr.sin_port = sa->sin_port;
194 	pdomb->dom_server_addr.sin_addr.s_addr = sa->sin_addr.s_addr;
195 	bzero(pdomb->dom_server_addr.sin_zero, 8);
196 	pdomb->dom_server_port = sa->sin_port;
197 	pdomb->dom_socket = RPC_ANYSOCK;
198 	pdomb->dom_vers = dom_binding->dom_binding->ypbind_hi_vers;
199 	/* the claim is 5.0 CLIENT * can be used by a 4.x RPC user */
200 	pdomb->dom_client = dom_binding->dom_client;
201 
202 	(void) strcpy(pdomb->dom_domain, domain);/* Remember the domain name */
203 	pdomb->dom_pnext = bound_domains;	/* Link this to the list as */
204 	bound_domains = pdomb;			/* ... the head entry */
205 
206 	return (pdomb);
207 }
208 
209 static void
_yp_unbind(domain)210 _yp_unbind (domain)
211 	char *domain;
212 {
213 	struct dom_binding *pdomb;
214 	struct dom_binding *ptrail = 0;
215 
216 
217 	if ( (domain == NULL) ||(strlen(domain) == 0) ) {
218 		return;
219 	}
220 
221 	for (pdomb = bound_domains; pdomb != NULL;
222 	    ptrail = pdomb, pdomb = pdomb->dom_pnext) {
223 
224 		if (strcmp(domain, pdomb->dom_domain) == 0) {
225 			if (pdomb == bound_domains)
226 				bound_domains = pdomb->dom_pnext;
227 			else
228 				ptrail->dom_pnext = pdomb->dom_pnext;
229 			free((char *) pdomb);
230 			break;
231 		}
232 	}
233 }
234 
235 int
yp_ismapthere(stat)236 yp_ismapthere(stat)
237 	int stat;
238 {
239 
240 	switch (stat) {
241 
242 	case 0:  /* it actually succeeded! */
243 	case YPERR_KEY:  /* no such key in map */
244 	case YPERR_NOMORE:
245 	case YPERR_BUSY:
246 		return (TRUE);
247 	}
248 	return (FALSE);
249 }
250