Blame stdlib/putenv.c

Packit 6c4009
/* Copyright (C) 1991-2018 Free Software Foundation, Inc.
Packit 6c4009
   This file is part of the GNU C Library.
Packit 6c4009
Packit 6c4009
   The GNU C Library is free software; you can redistribute it and/or
Packit 6c4009
   modify it under the terms of the GNU Lesser General Public
Packit 6c4009
   License as published by the Free Software Foundation; either
Packit 6c4009
   version 2.1 of the License, or (at your option) any later version.
Packit 6c4009
Packit 6c4009
   The GNU C Library is distributed in the hope that it will be useful,
Packit 6c4009
   but WITHOUT ANY WARRANTY; without even the implied warranty of
Packit 6c4009
   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
Packit 6c4009
   Lesser General Public License for more details.
Packit 6c4009
Packit 6c4009
   You should have received a copy of the GNU Lesser General Public
Packit 6c4009
   License along with the GNU C Library; if not, see
Packit 6c4009
   <http://www.gnu.org/licenses/>.  */
Packit 6c4009
Packit 6c4009
#if defined _AIX && !defined __GNUC__
Packit 6c4009
 #pragma alloca
Packit 6c4009
#endif
Packit 6c4009
Packit 6c4009
#if HAVE_CONFIG_H
Packit 6c4009
# include <config.h>
Packit 6c4009
#endif
Packit 6c4009
Packit 6c4009
#if _LIBC || HAVE_STDLIB_H
Packit 6c4009
# include <stdlib.h>
Packit 6c4009
#endif
Packit 6c4009
#if _LIBC || HAVE_STRING_H
Packit 6c4009
# include <string.h>
Packit 6c4009
#endif
Packit 6c4009
Packit 6c4009
#if !__GNU_LIBRARY__ && !HAVE_STRCHR
Packit 6c4009
# define strchr index
Packit 6c4009
#endif
Packit 6c4009
Packit 6c4009
#ifndef _LIBC
Packit 6c4009
# ifdef HAVE_ALLOCA_H
Packit 6c4009
#  include <alloca.h>
Packit 6c4009
# else
Packit 6c4009
#  ifdef __GNUC__
Packit 6c4009
#   define alloca __builtin_alloca
Packit 6c4009
#  else
Packit 6c4009
extern char *alloca ();
Packit 6c4009
#  endif /* __GNUC__ */
Packit 6c4009
# endif /* HAVE_ALLOCA_H */
Packit 6c4009
#endif /* _LIBC */
Packit 6c4009
Packit 6c4009
Packit 6c4009
/* Put STRING, which is of the form "NAME=VALUE", in the environment.  */
Packit 6c4009
int
Packit 6c4009
putenv (char *string)
Packit 6c4009
{
Packit 6c4009
  const char *const name_end = strchr (string, '=');
Packit 6c4009
Packit 6c4009
  if (name_end != NULL)
Packit 6c4009
    {
Packit 6c4009
      char *name;
Packit 6c4009
#ifdef _LIBC
Packit 6c4009
      int use_malloc = !__libc_use_alloca (name_end - string + 1);
Packit 6c4009
      if (__builtin_expect (use_malloc, 0))
Packit 6c4009
	{
Packit 6c4009
	  name = __strndup (string, name_end - string);
Packit 6c4009
	  if (name == NULL)
Packit 6c4009
	    return -1;
Packit 6c4009
	}
Packit 6c4009
      else
Packit 6c4009
	name = strndupa (string, name_end - string);
Packit 6c4009
#else
Packit 6c4009
# define use_malloc 1
Packit 6c4009
      name = malloc (name_end - string + 1);
Packit 6c4009
      if (name == NULL)
Packit 6c4009
	return -1;
Packit 6c4009
      memcpy (name, string, name_end - string);
Packit 6c4009
      name[name_end - string] = '\0';
Packit 6c4009
#endif
Packit 6c4009
      int result = __add_to_environ (name, NULL, string, 1);
Packit 6c4009
Packit 6c4009
      if (__glibc_unlikely (use_malloc))
Packit 6c4009
	free (name);
Packit 6c4009
Packit 6c4009
      return result;
Packit 6c4009
    }
Packit 6c4009
Packit 6c4009
  __unsetenv (string);
Packit 6c4009
  return 0;
Packit 6c4009
}