1*7c478bd9Sstevel@tonic-gate /*
2*7c478bd9Sstevel@tonic-gate  * CDDL HEADER START
3*7c478bd9Sstevel@tonic-gate  *
4*7c478bd9Sstevel@tonic-gate  * The contents of this file are subject to the terms of the
5*7c478bd9Sstevel@tonic-gate  * Common Development and Distribution License, Version 1.0 only
6*7c478bd9Sstevel@tonic-gate  * (the "License").  You may not use this file except in compliance
7*7c478bd9Sstevel@tonic-gate  * with the License.
8*7c478bd9Sstevel@tonic-gate  *
9*7c478bd9Sstevel@tonic-gate  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
10*7c478bd9Sstevel@tonic-gate  * or http://www.opensolaris.org/os/licensing.
11*7c478bd9Sstevel@tonic-gate  * See the License for the specific language governing permissions
12*7c478bd9Sstevel@tonic-gate  * and limitations under the License.
13*7c478bd9Sstevel@tonic-gate  *
14*7c478bd9Sstevel@tonic-gate  * When distributing Covered Code, include this CDDL HEADER in each
15*7c478bd9Sstevel@tonic-gate  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
16*7c478bd9Sstevel@tonic-gate  * If applicable, add the following below this CDDL HEADER, with the
17*7c478bd9Sstevel@tonic-gate  * fields enclosed by brackets "[]" replaced with your own identifying
18*7c478bd9Sstevel@tonic-gate  * information: Portions Copyright [yyyy] [name of copyright owner]
19*7c478bd9Sstevel@tonic-gate  *
20*7c478bd9Sstevel@tonic-gate  * CDDL HEADER END
21*7c478bd9Sstevel@tonic-gate  */
22*7c478bd9Sstevel@tonic-gate /*
23*7c478bd9Sstevel@tonic-gate  * Copyright 1999-2003 Sun Microsystems, Inc.  All rights reserved.
24*7c478bd9Sstevel@tonic-gate  * Use is subject to license terms.
25*7c478bd9Sstevel@tonic-gate  */
26*7c478bd9Sstevel@tonic-gate 
27*7c478bd9Sstevel@tonic-gate #pragma ident	"%Z%%M%	%I%	%E% SMI"
28*7c478bd9Sstevel@tonic-gate 
29*7c478bd9Sstevel@tonic-gate /*
30*7c478bd9Sstevel@tonic-gate  * Turning DEBUG on for this library opens a potential security hole.  If
31*7c478bd9Sstevel@tonic-gate  * the library is compiled with DEBUG, it should only be done for internal
32*7c478bd9Sstevel@tonic-gate  * testing.
33*7c478bd9Sstevel@tonic-gate  */
34*7c478bd9Sstevel@tonic-gate #include <stdlib.h>
35*7c478bd9Sstevel@tonic-gate #include <stdio.h>
36*7c478bd9Sstevel@tonic-gate #include <string.h>
37*7c478bd9Sstevel@tonic-gate #include <ctype.h>
38*7c478bd9Sstevel@tonic-gate #include <sys/types.h>
39*7c478bd9Sstevel@tonic-gate #include <sys/stat.h>
40*7c478bd9Sstevel@tonic-gate #include <fcntl.h>
41*7c478bd9Sstevel@tonic-gate #include <syslog.h>
42*7c478bd9Sstevel@tonic-gate 
43*7c478bd9Sstevel@tonic-gate 
44*7c478bd9Sstevel@tonic-gate #ifdef DEBUG
45*7c478bd9Sstevel@tonic-gate #define	OPT_INT		1
46*7c478bd9Sstevel@tonic-gate #define	OPT_STRING	2
47*7c478bd9Sstevel@tonic-gate #define	OPT_FILE	3
48*7c478bd9Sstevel@tonic-gate 
49*7c478bd9Sstevel@tonic-gate int	__ldap_debug_file = 2;
50*7c478bd9Sstevel@tonic-gate int	__ldap_debug_api;
51*7c478bd9Sstevel@tonic-gate int	__ldap_debug_ldap;
52*7c478bd9Sstevel@tonic-gate int	__ldap_debug_servers;
53*7c478bd9Sstevel@tonic-gate 
54*7c478bd9Sstevel@tonic-gate struct option {
55*7c478bd9Sstevel@tonic-gate 	char	*name;
56*7c478bd9Sstevel@tonic-gate 	int	type;
57*7c478bd9Sstevel@tonic-gate 	void	*address;
58*7c478bd9Sstevel@tonic-gate };
59*7c478bd9Sstevel@tonic-gate 
60*7c478bd9Sstevel@tonic-gate static struct option options[] = {
61*7c478bd9Sstevel@tonic-gate 	{ "debug_file", OPT_FILE, &__ldap_debug_file },
62*7c478bd9Sstevel@tonic-gate 	{ "debug_api", OPT_INT, &__ldap_debug_api },
63*7c478bd9Sstevel@tonic-gate 	{ "debug_ldap", OPT_INT, &__ldap_debug_servers },
64*7c478bd9Sstevel@tonic-gate 	{ 0, 0, 0 },
65*7c478bd9Sstevel@tonic-gate };
66*7c478bd9Sstevel@tonic-gate 
67*7c478bd9Sstevel@tonic-gate #ifdef NS_NO_STDIO
68*7c478bd9Sstevel@tonic-gate extern int __ns_ldap_raise_fd(int);
69*7c478bd9Sstevel@tonic-gate #endif
70*7c478bd9Sstevel@tonic-gate 
71*7c478bd9Sstevel@tonic-gate static void
set_option(char * name,char * val)72*7c478bd9Sstevel@tonic-gate set_option(char *name, char *val)
73*7c478bd9Sstevel@tonic-gate {
74*7c478bd9Sstevel@tonic-gate 	struct option *opt;
75*7c478bd9Sstevel@tonic-gate 	int		n;
76*7c478bd9Sstevel@tonic-gate 	char		*p;
77*7c478bd9Sstevel@tonic-gate 	int		fd;
78*7c478bd9Sstevel@tonic-gate 
79*7c478bd9Sstevel@tonic-gate 	for (opt = options; opt->name; opt++) {
80*7c478bd9Sstevel@tonic-gate 		if (strcasecmp(name, opt->name) == 0) {
81*7c478bd9Sstevel@tonic-gate 			switch (opt->type) {
82*7c478bd9Sstevel@tonic-gate 			    case OPT_STRING:
83*7c478bd9Sstevel@tonic-gate 				p = strdup(val);
84*7c478bd9Sstevel@tonic-gate 				*((char **)opt->address) = p;
85*7c478bd9Sstevel@tonic-gate 				break;
86*7c478bd9Sstevel@tonic-gate 			    case OPT_INT:
87*7c478bd9Sstevel@tonic-gate 				if (val && *val == '\0')
88*7c478bd9Sstevel@tonic-gate 					n = 1;
89*7c478bd9Sstevel@tonic-gate 				else
90*7c478bd9Sstevel@tonic-gate 					n = atoi(val);
91*7c478bd9Sstevel@tonic-gate 				*((int *)opt->address) = n;
92*7c478bd9Sstevel@tonic-gate 				break;
93*7c478bd9Sstevel@tonic-gate 			    case OPT_FILE:
94*7c478bd9Sstevel@tonic-gate 				/* this is a potential security risk    */
95*7c478bd9Sstevel@tonic-gate 				/* as setuid programs will create files */
96*7c478bd9Sstevel@tonic-gate 				/* owned by root.  This is only to be   */
97*7c478bd9Sstevel@tonic-gate 				/* used for internal debugging.		*/
98*7c478bd9Sstevel@tonic-gate 				fd = open(val, O_WRONLY | O_CREAT, 0644);
99*7c478bd9Sstevel@tonic-gate #ifdef NS_NO_STDIO
100*7c478bd9Sstevel@tonic-gate 				fd = __ns_ldap_raise_fd(fd);
101*7c478bd9Sstevel@tonic-gate #endif
102*7c478bd9Sstevel@tonic-gate 				*((int *)opt->address) = fd;
103*7c478bd9Sstevel@tonic-gate 				break;
104*7c478bd9Sstevel@tonic-gate 			}
105*7c478bd9Sstevel@tonic-gate 			break;
106*7c478bd9Sstevel@tonic-gate 		}
107*7c478bd9Sstevel@tonic-gate 	}
108*7c478bd9Sstevel@tonic-gate }
109*7c478bd9Sstevel@tonic-gate #endif
110*7c478bd9Sstevel@tonic-gate 
111*7c478bd9Sstevel@tonic-gate void
get_environment()112*7c478bd9Sstevel@tonic-gate get_environment()
113*7c478bd9Sstevel@tonic-gate {
114*7c478bd9Sstevel@tonic-gate #ifdef DEBUG
115*7c478bd9Sstevel@tonic-gate 	char	*p;
116*7c478bd9Sstevel@tonic-gate 	char	*base;
117*7c478bd9Sstevel@tonic-gate 	char	optname[100];
118*7c478bd9Sstevel@tonic-gate 	char	optval[100];
119*7c478bd9Sstevel@tonic-gate 
120*7c478bd9Sstevel@tonic-gate 	p = getenv("LDAP_OPTIONS");
121*7c478bd9Sstevel@tonic-gate 	if (p == NULL)
122*7c478bd9Sstevel@tonic-gate 		return;
123*7c478bd9Sstevel@tonic-gate 
124*7c478bd9Sstevel@tonic-gate 	while (*p) {
125*7c478bd9Sstevel@tonic-gate 		while (isspace(*p))
126*7c478bd9Sstevel@tonic-gate 			p++;
127*7c478bd9Sstevel@tonic-gate 		if (*p == '\0')
128*7c478bd9Sstevel@tonic-gate 			break;
129*7c478bd9Sstevel@tonic-gate 		base = p;
130*7c478bd9Sstevel@tonic-gate 		while (*p && *p != '=' && !isspace(*p))
131*7c478bd9Sstevel@tonic-gate 			p++;
132*7c478bd9Sstevel@tonic-gate 		(void) strncpy(optname, base, p - base);
133*7c478bd9Sstevel@tonic-gate 		optname[p - base] = '\0';
134*7c478bd9Sstevel@tonic-gate 		if (*p == '=') {
135*7c478bd9Sstevel@tonic-gate 			p++;
136*7c478bd9Sstevel@tonic-gate 			base = p;
137*7c478bd9Sstevel@tonic-gate 			while (*p && !isspace(*p))
138*7c478bd9Sstevel@tonic-gate 				p++;
139*7c478bd9Sstevel@tonic-gate 			(void) strncpy(optval, base, p - base);
140*7c478bd9Sstevel@tonic-gate 			optval[p - base] = '\0';
141*7c478bd9Sstevel@tonic-gate 		} else {
142*7c478bd9Sstevel@tonic-gate 			optval[0] = '\0';
143*7c478bd9Sstevel@tonic-gate 		}
144*7c478bd9Sstevel@tonic-gate 		set_option(optname, optval);
145*7c478bd9Sstevel@tonic-gate 	}
146*7c478bd9Sstevel@tonic-gate 
147*7c478bd9Sstevel@tonic-gate 	(void) fprintf(stderr, "debug_api: %d\n", __ldap_debug_api);
148*7c478bd9Sstevel@tonic-gate 	(void) fprintf(stderr, "debug_ldap: %d\n", __ldap_debug_ldap);
149*7c478bd9Sstevel@tonic-gate 	(void) fprintf(stderr, "debug_servers: %d\n", __ldap_debug_servers);
150*7c478bd9Sstevel@tonic-gate #endif
151*7c478bd9Sstevel@tonic-gate }
152*7c478bd9Sstevel@tonic-gate 
153*7c478bd9Sstevel@tonic-gate /*ARGSUSED*/
154*7c478bd9Sstevel@tonic-gate void
__s_api_debug_pause(int priority,int st,const char * mesg)155*7c478bd9Sstevel@tonic-gate __s_api_debug_pause(int priority, int st, const char *mesg)
156*7c478bd9Sstevel@tonic-gate {
157*7c478bd9Sstevel@tonic-gate 	if (mesg)
158*7c478bd9Sstevel@tonic-gate 		syslog(priority, "libsldap: Status: %d  Mesg: %s", st, mesg);
159*7c478bd9Sstevel@tonic-gate }
160