1 1.37 rillig /* $NetBSD: getenv.c,v 1.37 2022/02/11 21:36:46 rillig 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.37 rillig __RCSID("$NetBSD: getenv.c,v 1.37 2022/02/11 21:36:46 rillig 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.8 christos #include "local.h" 49 1.11 kleink 50 1.18 christos __weak_alias(getenv_r, _getenv_r) 51 1.18 christos 52 1.1 cgd /* 53 1.1 cgd * getenv -- 54 1.1 cgd * Returns ptr to value associated with name, if any, else NULL. 55 1.18 christos * XXX: we cannot use getenv_r to implement this, because getenv() 56 1.18 christos * cannot use a shared buffer, because if it did, subsequent calls 57 1.18 christos * to getenv would trash previous results. 58 1.1 cgd */ 59 1.1 cgd char * 60 1.18 christos getenv(const char *name) 61 1.18 christos { 62 1.33 tron size_t l_name; 63 1.18 christos char *result; 64 1.18 christos 65 1.18 christos _DIAGASSERT(name != NULL); 66 1.18 christos 67 1.33 tron l_name = __envvarnamelen(name, false); 68 1.33 tron if (l_name == 0) 69 1.33 tron return NULL; 70 1.33 tron 71 1.33 tron result = NULL; 72 1.33 tron if (__readlockenv()) { 73 1.35 tron result = __findenvvar(name, l_name); 74 1.33 tron (void)__unlockenv(); 75 1.33 tron } 76 1.37 rillig 77 1.18 christos return result; 78 1.18 christos } 79 1.18 christos 80 1.18 christos int 81 1.18 christos getenv_r(const char *name, char *buf, size_t len) 82 1.1 cgd { 83 1.33 tron size_t l_name; 84 1.33 tron int rv; 85 1.13 lukem 86 1.13 lukem _DIAGASSERT(name != NULL); 87 1.1 cgd 88 1.33 tron l_name = __envvarnamelen(name, false); 89 1.34 tron if (l_name == 0) { 90 1.34 tron errno = ENOENT; 91 1.20 christos return -1; 92 1.34 tron } 93 1.20 christos 94 1.33 tron rv = -1; 95 1.33 tron if (__readlockenv()) { 96 1.33 tron const char *value; 97 1.33 tron 98 1.35 tron value = __findenvvar(name, l_name); 99 1.33 tron if (value != NULL) { 100 1.33 tron if (strlcpy(buf, value, len) < len) { 101 1.33 tron rv = 0; 102 1.33 tron } else { 103 1.33 tron errno = ERANGE; 104 1.33 tron } 105 1.33 tron } else { 106 1.33 tron errno = ENOENT; 107 1.33 tron } 108 1.33 tron (void)__unlockenv(); 109 1.32 enami } 110 1.37 rillig 111 1.33 tron return rv; 112 1.1 cgd } 113