Home | History | Annotate | Line # | Download | only in stdlib
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