getenv.c revision 1.33 1 1.33 tron /* $NetBSD: getenv.c,v 1.33 2010/11/14 18:11:43 tron Exp $ */
2 1.6 thorpej
3 1.1 cgd /*
4 1.9 perry * Copyright (c) 1987, 1993
5 1.9 perry * The Regents of the University of California. All rights reserved.
6 1.1 cgd *
7 1.1 cgd * Redistribution and use in source and binary forms, with or without
8 1.1 cgd * modification, are permitted provided that the following conditions
9 1.1 cgd * are met:
10 1.1 cgd * 1. Redistributions of source code must retain the above copyright
11 1.1 cgd * notice, this list of conditions and the following disclaimer.
12 1.1 cgd * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 cgd * notice, this list of conditions and the following disclaimer in the
14 1.1 cgd * documentation and/or other materials provided with the distribution.
15 1.17 agc * 3. Neither the name of the University nor the names of its contributors
16 1.1 cgd * may be used to endorse or promote products derived from this software
17 1.1 cgd * without specific prior written permission.
18 1.1 cgd *
19 1.1 cgd * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20 1.1 cgd * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21 1.1 cgd * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22 1.1 cgd * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23 1.1 cgd * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24 1.1 cgd * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25 1.1 cgd * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26 1.1 cgd * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27 1.1 cgd * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28 1.1 cgd * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29 1.1 cgd * SUCH DAMAGE.
30 1.1 cgd */
31 1.1 cgd
32 1.8 christos #include <sys/cdefs.h>
33 1.1 cgd #if defined(LIBC_SCCS) && !defined(lint)
34 1.6 thorpej #if 0
35 1.9 perry static char sccsid[] = "@(#)getenv.c 8.1 (Berkeley) 6/4/93";
36 1.6 thorpej #else
37 1.33 tron __RCSID("$NetBSD: getenv.c,v 1.33 2010/11/14 18:11:43 tron Exp $");
38 1.6 thorpej #endif
39 1.1 cgd #endif /* LIBC_SCCS and not lint */
40 1.1 cgd
41 1.18 christos #include "namespace.h"
42 1.13 lukem #include <assert.h>
43 1.13 lukem #include <errno.h>
44 1.1 cgd #include <stdlib.h>
45 1.1 cgd #include <string.h>
46 1.33 tron
47 1.33 tron #include "env.h"
48 1.20 christos #include "reentrant.h"
49 1.8 christos #include "local.h"
50 1.11 kleink
51 1.18 christos __weak_alias(getenv_r, _getenv_r)
52 1.18 christos
53 1.1 cgd /*
54 1.1 cgd * getenv --
55 1.1 cgd * Returns ptr to value associated with name, if any, else NULL.
56 1.18 christos * XXX: we cannot use getenv_r to implement this, because getenv()
57 1.18 christos * cannot use a shared buffer, because if it did, subsequent calls
58 1.18 christos * to getenv would trash previous results.
59 1.1 cgd */
60 1.1 cgd char *
61 1.18 christos getenv(const char *name)
62 1.18 christos {
63 1.33 tron size_t l_name;
64 1.18 christos char *result;
65 1.18 christos
66 1.18 christos _DIAGASSERT(name != NULL);
67 1.18 christos
68 1.33 tron l_name = __envvarnamelen(name, false);
69 1.33 tron if (l_name == 0)
70 1.33 tron return NULL;
71 1.33 tron
72 1.33 tron result = NULL;
73 1.33 tron if (__readlockenv()) {
74 1.33 tron result = __findenv(name, l_name);
75 1.33 tron (void)__unlockenv();
76 1.33 tron }
77 1.33 tron
78 1.18 christos return result;
79 1.18 christos }
80 1.18 christos
81 1.18 christos int
82 1.18 christos getenv_r(const char *name, char *buf, size_t len)
83 1.1 cgd {
84 1.33 tron size_t l_name;
85 1.33 tron int rv;
86 1.13 lukem
87 1.13 lukem _DIAGASSERT(name != NULL);
88 1.1 cgd
89 1.33 tron l_name = __envvarnamelen(name, false);
90 1.33 tron if (l_name == 0)
91 1.20 christos return -1;
92 1.20 christos
93 1.33 tron rv = -1;
94 1.33 tron if (__readlockenv()) {
95 1.33 tron const char *value;
96 1.33 tron
97 1.33 tron value = __findenv(name, l_name);
98 1.33 tron if (value != NULL) {
99 1.33 tron if (strlcpy(buf, value, len) < len) {
100 1.33 tron rv = 0;
101 1.33 tron } else {
102 1.33 tron errno = ERANGE;
103 1.33 tron }
104 1.33 tron } else {
105 1.33 tron errno = ENOENT;
106 1.33 tron }
107 1.33 tron (void)__unlockenv();
108 1.32 enami }
109 1.33 tron
110 1.33 tron return rv;
111 1.1 cgd }
112