Home | History | Annotate | Line # | Download | only in stdlib
getenv.c revision 1.37
      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