* Copyright (c) 1987 Regents of the University of California.
* Redistribution and use in source and binary forms are permitted
* provided that the above copyright notice and this paragraph are
* duplicated in all such forms and that any documentation,
* advertising materials, and other materials related to such
* distribution and use acknowledge that the software was developed
* by the University of California, Berkeley. The name of the
* University may not be used to endorse or promote products derived
* from this software without specific prior written permission.
* THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR
* IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED
* WARRANTIES OF MERCHANTIBILITY AND FITNESS FOR A PARTICULAR PURPOSE.
#if defined(LIBC_SCCS) && !defined(lint)
static char sccsid
[] = "@(#)getenv.c 5.6 (Berkeley) %G%";
#endif /* LIBC_SCCS and not lint */
* Returns ptr to value associated with name, if any, else NULL.
return(_findenv(name
, &offset
));
* Returns pointer to value associated with name, if any, else NULL.
* Sets offset to be the offset of the name/value combination in the
* environmental array, for use by setenv(3) and unsetenv(3).
* Explicitly removes '=' in argument name.
* This routine *should* be a static; don't use it.
for (C
= name
, len
= 0; *C
&& *C
!= '='; ++C
, ++len
);
for (P
= environ
; *P
; ++P
)
if (!strncmp(*P
, name
, len
))
if (*(C
= *P
+ len
) == '=') {