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