Blame m4/setenv.m4

Packit Service 4684c1
# setenv.m4 serial 29
Packit Service 4684c1
dnl Copyright (C) 2001-2004, 2006-2020 Free Software Foundation, Inc.
Packit Service 4684c1
dnl This file is free software; the Free Software Foundation
Packit Service 4684c1
dnl gives unlimited permission to copy and/or distribute it,
Packit Service 4684c1
dnl with or without modifications, as long as this notice is preserved.
Packit Service 4684c1
Packit Service 4684c1
AC_DEFUN([gl_FUNC_SETENV],
Packit Service 4684c1
[
Packit Service 4684c1
  AC_REQUIRE([gl_FUNC_SETENV_SEPARATE])
Packit Service 4684c1
  AC_REQUIRE([AC_CANONICAL_HOST]) dnl for cross-compiles
Packit Service 4684c1
  if test $ac_cv_func_setenv = no; then
Packit Service 4684c1
    HAVE_SETENV=0
Packit Service 4684c1
  else
Packit Service 4684c1
    AC_CACHE_CHECK([whether setenv validates arguments],
Packit Service 4684c1
      [gl_cv_func_setenv_works],
Packit Service 4684c1
      [AC_RUN_IFELSE([AC_LANG_PROGRAM([[
Packit Service 4684c1
       #include <stdlib.h>
Packit Service 4684c1
       #include <errno.h>
Packit Service 4684c1
       #include <string.h>
Packit Service 4684c1
      ]], [[
Packit Service 4684c1
       int result = 0;
Packit Service 4684c1
       {
Packit Service 4684c1
         if (setenv ("", "", 0) != -1)
Packit Service 4684c1
           result |= 1;
Packit Service 4684c1
         else if (errno != EINVAL)
Packit Service 4684c1
           result |= 2;
Packit Service 4684c1
       }
Packit Service 4684c1
       {
Packit Service 4684c1
         if (setenv ("a", "=", 1) != 0)
Packit Service 4684c1
           result |= 4;
Packit Service 4684c1
         else if (strcmp (getenv ("a"), "=") != 0)
Packit Service 4684c1
           result |= 8;
Packit Service 4684c1
       }
Packit Service 4684c1
       return result;
Packit Service 4684c1
      ]])],
Packit Service 4684c1
      [gl_cv_func_setenv_works=yes], [gl_cv_func_setenv_works=no],
Packit Service 4684c1
      [case "$host_os" in
Packit Service 4684c1
                        # Guess yes on glibc systems.
Packit Service 4684c1
         *-gnu* | gnu*) gl_cv_func_setenv_works="guessing yes" ;;
Packit Service 4684c1
                        # Guess yes on musl systems.
Packit Service 4684c1
         *-musl*)       gl_cv_func_setenv_works="guessing yes" ;;
Packit Service 4684c1
                        # If we don't know, obey --enable-cross-guesses.
Packit Service 4684c1
         *)             gl_cv_func_setenv_works="$gl_cross_guess_normal" ;;
Packit Service 4684c1
       esac
Packit Service 4684c1
      ])])
Packit Service 4684c1
    case "$gl_cv_func_setenv_works" in
Packit Service 4684c1
      *yes) ;;
Packit Service 4684c1
      *)
Packit Service 4684c1
        REPLACE_SETENV=1
Packit Service 4684c1
        ;;
Packit Service 4684c1
    esac
Packit Service 4684c1
  fi
Packit Service 4684c1
])
Packit Service 4684c1
Packit Service 4684c1
# Like gl_FUNC_SETENV, except prepare for separate compilation
Packit Service 4684c1
# (no REPLACE_SETENV, no AC_LIBOBJ).
Packit Service 4684c1
AC_DEFUN([gl_FUNC_SETENV_SEPARATE],
Packit Service 4684c1
[
Packit Service 4684c1
  AC_REQUIRE([gl_STDLIB_H_DEFAULTS])
Packit Service 4684c1
  AC_CHECK_DECLS_ONCE([setenv])
Packit Service 4684c1
  if test $ac_cv_have_decl_setenv = no; then
Packit Service 4684c1
    HAVE_DECL_SETENV=0
Packit Service 4684c1
  fi
Packit Service 4684c1
  AC_CHECK_FUNCS_ONCE([setenv])
Packit Service 4684c1
  gl_PREREQ_SETENV
Packit Service 4684c1
])
Packit Service 4684c1
Packit Service 4684c1
AC_DEFUN([gl_FUNC_UNSETENV],
Packit Service 4684c1
[
Packit Service 4684c1
  AC_REQUIRE([gl_STDLIB_H_DEFAULTS])
Packit Service 4684c1
  AC_REQUIRE([AC_CANONICAL_HOST]) dnl for cross-compiles
Packit Service 4684c1
  AC_CHECK_DECLS_ONCE([unsetenv])
Packit Service 4684c1
  if test $ac_cv_have_decl_unsetenv = no; then
Packit Service 4684c1
    HAVE_DECL_UNSETENV=0
Packit Service 4684c1
  fi
Packit Service 4684c1
  AC_CHECK_FUNCS([unsetenv])
Packit Service 4684c1
  if test $ac_cv_func_unsetenv = no; then
Packit Service 4684c1
    HAVE_UNSETENV=0
Packit Service 4684c1
  else
Packit Service 4684c1
    HAVE_UNSETENV=1
Packit Service 4684c1
    dnl Some BSDs return void, failing to do error checking.
Packit Service 4684c1
    AC_CACHE_CHECK([for unsetenv() return type], [gt_cv_func_unsetenv_ret],
Packit Service 4684c1
      [AC_COMPILE_IFELSE(
Packit Service 4684c1
         [AC_LANG_PROGRAM(
Packit Service 4684c1
            [[
Packit Service 4684c1
#undef _BSD
Packit Service 4684c1
#define _BSD 1 /* unhide unsetenv declaration in OSF/1 5.1 <stdlib.h> */
Packit Service 4684c1
#include <stdlib.h>
Packit Service 4684c1
extern
Packit Service 4684c1
#ifdef __cplusplus
Packit Service 4684c1
"C"
Packit Service 4684c1
#endif
Packit Service 4684c1
int unsetenv (const char *name);
Packit Service 4684c1
            ]],
Packit Service 4684c1
            [[]])],
Packit Service 4684c1
         [gt_cv_func_unsetenv_ret='int'],
Packit Service 4684c1
         [gt_cv_func_unsetenv_ret='void'])])
Packit Service 4684c1
    if test $gt_cv_func_unsetenv_ret = 'void'; then
Packit Service 4684c1
      AC_DEFINE([VOID_UNSETENV], [1], [Define to 1 if unsetenv returns void
Packit Service 4684c1
       instead of int.])
Packit Service 4684c1
      REPLACE_UNSETENV=1
Packit Service 4684c1
    fi
Packit Service 4684c1
Packit Service 4684c1
    dnl Solaris 10 unsetenv does not remove all copies of a name.
Packit Service 4684c1
    dnl Haiku alpha 2 unsetenv gets confused by assignment to environ.
Packit Service 4684c1
    dnl OpenBSD 4.7 unsetenv("") does not fail.
Packit Service 4684c1
    AC_CACHE_CHECK([whether unsetenv obeys POSIX],
Packit Service 4684c1
      [gl_cv_func_unsetenv_works],
Packit Service 4684c1
      [AC_RUN_IFELSE([AC_LANG_PROGRAM([[
Packit Service 4684c1
       #include <stdlib.h>
Packit Service 4684c1
       #include <errno.h>
Packit Service 4684c1
       extern char **environ;
Packit Service 4684c1
      ]], [[
Packit Service 4684c1
       char entry1[] = "a=1";
Packit Service 4684c1
       char entry2[] = "b=2";
Packit Service 4684c1
       char *env[] = { entry1, entry2, NULL };
Packit Service 4684c1
       if (putenv ((char *) "a=1")) return 1;
Packit Service 4684c1
       if (putenv (entry2)) return 2;
Packit Service 4684c1
       entry2[0] = 'a';
Packit Service 4684c1
       unsetenv ("a");
Packit Service 4684c1
       if (getenv ("a")) return 3;
Packit Service 4684c1
       if (!unsetenv ("") || errno != EINVAL) return 4;
Packit Service 4684c1
       entry2[0] = 'b';
Packit Service 4684c1
       environ = env;
Packit Service 4684c1
       if (!getenv ("a")) return 5;
Packit Service 4684c1
       entry2[0] = 'a';
Packit Service 4684c1
       unsetenv ("a");
Packit Service 4684c1
       if (getenv ("a")) return 6;
Packit Service 4684c1
      ]])],
Packit Service 4684c1
      [gl_cv_func_unsetenv_works=yes], [gl_cv_func_unsetenv_works=no],
Packit Service 4684c1
      [case "$host_os" in
Packit Service 4684c1
                 # Guess yes on glibc systems.
Packit Service 4684c1
         *-gnu*) gl_cv_func_unsetenv_works="guessing yes" ;;
Packit Service 4684c1
                 # If we don't know, obey --enable-cross-guesses.
Packit Service 4684c1
         *)      gl_cv_func_unsetenv_works="$gl_cross_guess_normal" ;;
Packit Service 4684c1
       esac
Packit Service 4684c1
      ])])
Packit Service 4684c1
    case "$gl_cv_func_unsetenv_works" in
Packit Service 4684c1
      *yes) ;;
Packit Service 4684c1
      *)
Packit Service 4684c1
        REPLACE_UNSETENV=1
Packit Service 4684c1
        ;;
Packit Service 4684c1
    esac
Packit Service 4684c1
  fi
Packit Service 4684c1
])
Packit Service 4684c1
Packit Service 4684c1
# Prerequisites of lib/setenv.c.
Packit Service 4684c1
AC_DEFUN([gl_PREREQ_SETENV],
Packit Service 4684c1
[
Packit Service 4684c1
  AC_REQUIRE([AC_FUNC_ALLOCA])
Packit Service 4684c1
  AC_REQUIRE([gl_ENVIRON])
Packit Service 4684c1
  AC_CHECK_HEADERS_ONCE([unistd.h])
Packit Service 4684c1
  AC_CHECK_HEADERS([search.h])
Packit Service 4684c1
  AC_CHECK_FUNCS([tsearch])
Packit Service 4684c1
])
Packit Service 4684c1
Packit Service 4684c1
# Prerequisites of lib/unsetenv.c.
Packit Service 4684c1
AC_DEFUN([gl_PREREQ_UNSETENV],
Packit Service 4684c1
[
Packit Service 4684c1
  AC_REQUIRE([gl_ENVIRON])
Packit Service 4684c1
  AC_CHECK_HEADERS_ONCE([unistd.h])
Packit Service 4684c1
])