1 /* Copyright (C) 1992,1995-1999,2000-2002,2005 Free Software Foundation, Inc.
2 This file is part of the GNU C Library.
4 This program is free software; you can redistribute it and/or modify
5 it under the terms of the GNU General Public License as published by
6 the Free Software Foundation; either version 2, or (at your option)
9 This program is distributed in the hope that it will be useful,
10 but WITHOUT ANY WARRANTY; without even the implied warranty of
11 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 GNU General Public License for more details.
14 You should have received a copy of the GNU General Public License along
15 with this program; if not, write to the Free Software Foundation,
16 Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA. */
24 # if !defined errno && !defined HAVE_ERRNO_DECL
27 # define __set_errno(ev) ((errno) = (ev))
35 # define __environ environ
36 # ifndef HAVE_ENVIRON_DECL
37 extern char **environ;
42 /* This lock protects against simultaneous modifications of `environ'. */
43 # include <bits/libc-lock.h>
44 __libc_lock_define_initialized (static, envlock)
45 # define LOCK __libc_lock_lock (envlock)
46 # define UNLOCK __libc_lock_unlock (envlock)
52 /* In the GNU C library we must keep the namespace clean. */
54 # define unsetenv __unsetenv
59 unsetenv (const char *name)
64 if (name == NULL || *name == '\0' || strchr (name, '=') != NULL)
76 if (!strncmp (*ep, name, len) && (*ep)[len] == '=')
78 /* Found it. Remove this pointer by moving later ones back. */
84 /* Continue the loop in case NAME appears again. */
96 weak_alias (__unsetenv, unsetenv)