xref: /titanic_44/usr/src/cmd/sendmail/libsm/config.c (revision ae115bc77f6fcde83175c75b4206dc2e50747966)
1 /*
2  * Copyright (c) 2000-2003 Sendmail, Inc. and its suppliers.
3  *	All rights reserved.
4  *
5  * By using this file, you agree to the terms and conditions set
6  * forth in the LICENSE file which can be found at the top level of
7  * the sendmail distribution.
8  *
9  */
10 
11 #pragma ident	"%Z%%M%	%I%	%E% SMI"
12 
13 #include <sm/gen.h>
14 SM_RCSID("@(#)$Id: config.c,v 1.30 2003/12/10 03:19:07 gshapiro Exp $")
15 
16 #include <stdlib.h>
17 #include <sm/heap.h>
18 #include <sm/string.h>
19 #include <sm/conf.h>
20 
21 /*
22 **  PUTENV -- emulation of putenv() in terms of setenv()
23 **
24 **	Not needed on Posix-compliant systems.
25 **	This doesn't have full Posix semantics, but it's good enough
26 **		for sendmail.
27 **
28 **	Parameter:
29 **		env -- the environment to put.
30 **
31 **	Returns:
32 **		0 on success, < 0 on failure.
33 */
34 
35 #if NEEDPUTENV
36 
37 # if NEEDPUTENV == 2		/* no setenv(3) call available */
38 
39 int
40 putenv(str)
41 	char *str;
42 {
43 	char **current;
44 	int matchlen, envlen = 0;
45 	char *tmp;
46 	char **newenv;
47 	static bool first = true;
48 	extern char **environ;
49 
50 	/*
51 	**  find out how much of str to match when searching
52 	**  for a string to replace.
53 	*/
54 
55 	if ((tmp = strchr(str, '=')) == NULL || tmp == str)
56 		matchlen = strlen(str);
57 	else
58 		matchlen = (int) (tmp - str);
59 	++matchlen;
60 
61 	/*
62 	**  Search for an existing string in the environment and find the
63 	**  length of environ.  If found, replace and exit.
64 	*/
65 
66 	for (current = environ; *current != NULL; current++)
67 	{
68 		++envlen;
69 
70 		if (strncmp(str, *current, matchlen) == 0)
71 		{
72 			/* found it, now insert the new version */
73 			*current = (char *) str;
74 			return 0;
75 		}
76 	}
77 
78 	/*
79 	**  There wasn't already a slot so add space for a new slot.
80 	**  If this is our first time through, use malloc(), else realloc().
81 	*/
82 
83 	if (first)
84 	{
85 		newenv = (char **) sm_malloc(sizeof(char *) * (envlen + 2));
86 		if (newenv == NULL)
87 			return -1;
88 
89 		first = false;
90 		(void) memcpy(newenv, environ, sizeof(char *) * envlen);
91 	}
92 	else
93 	{
94 		newenv = (char **) sm_realloc((char *) environ,
95 					      sizeof(char *) * (envlen + 2));
96 		if (newenv == NULL)
97 			return -1;
98 	}
99 
100 	/* actually add in the new entry */
101 	environ = newenv;
102 	environ[envlen] = (char *) str;
103 	environ[envlen + 1] = NULL;
104 
105 	return 0;
106 }
107 
108 # else /* NEEDPUTENV == 2 */
109 
110 int
111 putenv(env)
112 	char *env;
113 {
114 	char *p;
115 	int l;
116 	char nbuf[100];
117 
118 	p = strchr(env, '=');
119 	if (p == NULL)
120 		return 0;
121 	l = p - env;
122 	if (l > sizeof nbuf - 1)
123 		l = sizeof nbuf - 1;
124 	memmove(nbuf, env, l);
125 	nbuf[l] = '\0';
126 	return setenv(nbuf, ++p, 1);
127 }
128 
129 # endif /* NEEDPUTENV == 2 */
130 #endif /* NEEDPUTENV */
131 /*
132 **  UNSETENV -- remove a variable from the environment
133 **
134 **	Not needed on newer systems.
135 **
136 **	Parameters:
137 **		name -- the string name of the environment variable to be
138 **			deleted from the current environment.
139 **
140 **	Returns:
141 **		none.
142 **
143 **	Globals:
144 **		environ -- a pointer to the current environment.
145 **
146 **	Side Effects:
147 **		Modifies environ.
148 */
149 
150 #if !HASUNSETENV
151 
152 void
153 unsetenv(name)
154 	char *name;
155 {
156 	extern char **environ;
157 	register char **pp;
158 	int len = strlen(name);
159 
160 	for (pp = environ; *pp != NULL; pp++)
161 	{
162 		if (strncmp(name, *pp, len) == 0 &&
163 		    ((*pp)[len] == '=' || (*pp)[len] == '\0'))
164 			break;
165 	}
166 
167 	for (; *pp != NULL; pp++)
168 		*pp = pp[1];
169 }
170 
171 #endif /* !HASUNSETENV */
172 
173 char *SmCompileOptions[] =
174 {
175 #if SM_CONF_BROKEN_STRTOD
176 	"SM_CONF_BROKEN_STRTOD",
177 #endif /* SM_CONF_BROKEN_STRTOD */
178 #if SM_CONF_GETOPT
179 	"SM_CONF_GETOPT",
180 #endif /* SM_CONF_GETOPT */
181 #if SM_CONF_LDAP_INITIALIZE
182 	"SM_CONF_LDAP_INITIALIZE",
183 #endif /* SM_CONF_LDAP_INITIALIZE */
184 #if SM_CONF_LDAP_MEMFREE
185 	"SM_CONF_LDAP_MEMFREE",
186 #endif /* SM_CONF_LDAP_MEMFREE */
187 #if SM_CONF_LONGLONG
188 	"SM_CONF_LONGLONG",
189 #endif /* SM_CONF_LONGLONG */
190 #if SM_CONF_MEMCHR
191 	"SM_CONF_MEMCHR",
192 #endif /* SM_CONF_MEMCHR */
193 #if SM_CONF_MSG
194 	"SM_CONF_MSG",
195 #endif /* SM_CONF_MSG */
196 #if SM_CONF_QUAD_T
197 	"SM_CONF_QUAD_T",
198 #endif /* SM_CONF_QUAD_T */
199 #if SM_CONF_SEM
200 	"SM_CONF_SEM",
201 #endif /* SM_CONF_SEM */
202 #if SM_CONF_SETITIMER
203 	"SM_CONF_SETITIMER",
204 #endif /* SM_CONF_SETITIMER */
205 #if SM_CONF_SIGSETJMP
206 	"SM_CONF_SIGSETJMP",
207 #endif /* SM_CONF_SIGSETJMP */
208 #if SM_CONF_SHM
209 	"SM_CONF_SHM",
210 #endif /* SM_CONF_SHM */
211 #if SM_CONF_SHM_DELAY
212 	"SM_CONF_SHM_DELAY",
213 #endif /* SM_CONF_SHM_DELAY */
214 #if SM_CONF_SSIZE_T
215 	"SM_CONF_SSIZE_T",
216 #endif /* SM_CONF_SSIZE_T */
217 #if SM_CONF_STDBOOL_H
218 	"SM_CONF_STDBOOL_H",
219 #endif /* SM_CONF_STDBOOL_H */
220 #if SM_CONF_STDDEF_H
221 	"SM_CONF_STDDEF_H",
222 #endif /* SM_CONF_STDDEF_H */
223 
224 #if 0
225 /* XXX this is always enabled (for now) */
226 #if SM_CONF_STRL
227 	"SM_CONF_STRL",
228 #endif /* SM_CONF_STRL */
229 #endif /* 0 */
230 
231 #if SM_CONF_SYS_CDEFS_H
232 	"SM_CONF_SYS_CDEFS_H",
233 #endif /* SM_CONF_SYS_CDEFS_H */
234 #if SM_CONF_SYSEXITS_H
235 	"SM_CONF_SYSEXITS_H",
236 #endif /* SM_CONF_SYSEXITS_H */
237 #if SM_CONF_UID_GID
238 	"SM_CONF_UID_GID",
239 #endif /* SM_CONF_UID_GID */
240 #if DO_NOT_USE_STRCPY
241 	"DO_NOT_USE_STRCPY",
242 #endif /* DO_NOT_USE_STRCPY */
243 #if SM_HEAP_CHECK
244 	"SM_HEAP_CHECK",
245 #endif /* SM_HEAP_CHECK */
246 #if defined(SM_OS_NAME) && defined(__STDC__)
247 	"SM_OS=sm_os_" SM_OS_NAME,
248 #endif /* defined(SM_OS_NAME) && defined(__STDC__) */
249 #if SM_VA_STD
250 	"SM_VA_STD",
251 #endif /* SM_VA_STD */
252 	NULL
253 };
254