silly people that don't want to install/run autoconf :-)
[asterisk/asterisk.git] / strcompat.c
1 /*
2  * Asterisk -- An open source telephony toolkit.
3  *
4  * Copyright (C) 1999 - 2006, Digium, Inc.
5  *
6  * See http://www.asterisk.org for more information about
7  * the Asterisk project. Please do not directly contact
8  * any of the maintainers of this project for assistance;
9  * the project provides a web site, mailing lists and IRC
10  * channels for your use.
11  *
12  * This program is free software, distributed under the terms of
13  * the GNU General Public License Version 2. See the LICENSE file
14  * at the top of the source tree.
15  */
16
17 /*! \file
18  *
19  * \brief Compatibility functions for strsep and strtoq missing on Solaris 
20  */
21
22 #include <sys/types.h>
23 #include <stdio.h>
24
25 #include "asterisk.h"
26
27 #include "asterisk/compat.h"
28
29 #ifndef HAVE_STRSEP
30 char *strsep(char **str, const char *delims)
31 {
32     char *token;
33
34     if (!*str) {
35         /* No more tokens */
36         return NULL;
37     }
38
39     token = *str;
40     while (**str != '\0') {
41         if (strchr(delims, **str)) {
42             **str = '\0';
43             (*str)++;
44             return token;
45         }
46         (*str)++;
47     }
48
49     /* There is no other token */
50     *str = NULL;
51
52     return token;
53 }
54 #endif
55
56 #ifndef HAVE_SETENV
57 int setenv(const char *name, const char *value, int overwrite)
58 {
59         unsigned char *buf;
60         int buflen;
61
62         buflen = strlen(name) + strlen(value) + 2;
63         if (!(buf = alloca(buflen)))
64                 return -1;
65
66         if (!overwrite && getenv(name))
67                 return 0;
68
69         snprintf(buf, buflen, "%s=%s", name, value);
70
71         return putenv(buf);
72 }
73 #endif
74
75 #ifndef HAVE_UNSETENV
76 int unsetenv(const char *name)
77 {
78         return setenv(name, "", 0);
79 }
80 #endif