git.gag.com Git - debian/tar/blob - m4/getcwd.m4

   1 # getcwd.m4 - check for working getcwd that is compatible with glibc
   2
   3 # Copyright (C) 2001, 2003-2007, 2009-2015 Free Software Foundation, Inc.
   4 # This file is free software; the Free Software Foundation
   5 # gives unlimited permission to copy and/or distribute it,
   6 # with or without modifications, as long as this notice is preserved.
   7
   8 # Written by Paul Eggert.
   9 # serial 12
  10
  11 AC_DEFUN([gl_FUNC_GETCWD_NULL],
  12   [
  13    AC_REQUIRE([AC_CANONICAL_HOST]) dnl for cross-compiles
  14    AC_CHECK_HEADERS_ONCE([unistd.h])
  15    AC_CACHE_CHECK([whether getcwd (NULL, 0) allocates memory for result],
  16      [gl_cv_func_getcwd_null],
  17      [AC_RUN_IFELSE([AC_LANG_PROGRAM([[
  18 #        if HAVE_UNISTD_H
  19 #         include <unistd.h>
  20 #        else /* on Windows with MSVC */
  21 #         include <direct.h>
  22 #        endif
  23 #        ifndef getcwd
  24          char *getcwd ();
  25 #        endif
  26 ]], [[
  27 #if (defined _WIN32 || defined __WIN32__) && ! defined __CYGWIN__
  28 /* mingw cwd does not start with '/', but getcwd does allocate.
  29    However, mingw fails to honor non-zero size.  */
  30 #else
  31            if (chdir ("/") != 0)
  32              return 1;
  33            else
  34              {
  35                char *f = getcwd (NULL, 0);
  36                if (! f)
  37                  return 2;
  38                if (f[0] != '/')
  39                  return 3;
  40                if (f[1] != '\0')
  41                  return 4;
  42                return 0;
  43              }
  44 #endif
  45          ]])],
  46         [gl_cv_func_getcwd_null=yes],
  47         [gl_cv_func_getcwd_null=no],
  48         [[case "$host_os" in
  49                      # Guess yes on glibc systems.
  50             *-gnu*)  gl_cv_func_getcwd_null="guessing yes";;
  51                      # Guess yes on Cygwin.
  52             cygwin*) gl_cv_func_getcwd_null="guessing yes";;
  53                      # If we don't know, assume the worst.
  54             *)       gl_cv_func_getcwd_null="guessing no";;
  55           esac
  56         ]])])
  57 ])
  58
  59 AC_DEFUN([gl_FUNC_GETCWD_SIGNATURE],
  60 [
  61   AC_CACHE_CHECK([for getcwd with POSIX signature],
  62     [gl_cv_func_getcwd_posix_signature],
  63     [AC_COMPILE_IFELSE(
  64       [AC_LANG_PROGRAM(
  65          [[#include <unistd.h>]],
  66          [[extern
  67            #ifdef __cplusplus
  68            "C"
  69            #endif
  70            char *getcwd (char *, size_t);
  71          ]])
  72       ],
  73       [gl_cv_func_getcwd_posix_signature=yes],
  74       [gl_cv_func_getcwd_posix_signature=no])
  75    ])
  76 ])
  77
  78 dnl Guarantee that getcwd will malloc with a NULL first argument.  Assumes
  79 dnl that either the system getcwd is robust, or that calling code is okay
  80 dnl with spurious failures when run from a directory with an absolute name
  81 dnl larger than 4k bytes.
  82 dnl
  83 dnl Assumes that getcwd exists; if you are worried about obsolete
  84 dnl platforms that lacked getcwd(), then you need to use the GPL module.
  85 AC_DEFUN([gl_FUNC_GETCWD_LGPL],
  86 [
  87   AC_REQUIRE([gl_UNISTD_H_DEFAULTS])
  88   AC_REQUIRE([gl_FUNC_GETCWD_NULL])
  89   AC_REQUIRE([gl_FUNC_GETCWD_SIGNATURE])
  90
  91   case $gl_cv_func_getcwd_null,$gl_cv_func_getcwd_posix_signature in
  92   *yes,yes) ;;
  93   *)
  94     dnl Minimal replacement lib/getcwd-lgpl.c.
  95     REPLACE_GETCWD=1
  96     ;;
  97   esac
  98 ])
  99
 100 dnl Check for all known getcwd bugs; useful for a program likely to be
 101 dnl executed from an arbitrary location.
 102 AC_DEFUN([gl_FUNC_GETCWD],
 103 [
 104   AC_REQUIRE([gl_UNISTD_H_DEFAULTS])
 105   AC_REQUIRE([gl_FUNC_GETCWD_NULL])
 106   AC_REQUIRE([gl_FUNC_GETCWD_SIGNATURE])
 107   AC_REQUIRE([AC_CANONICAL_HOST]) dnl for cross-compiles
 108
 109   gl_abort_bug=no
 110   case "$host_os" in
 111     mingw*)
 112       gl_cv_func_getcwd_path_max=yes
 113       ;;
 114     *)
 115       gl_FUNC_GETCWD_PATH_MAX
 116       case "$gl_cv_func_getcwd_null" in
 117         *yes)
 118           gl_FUNC_GETCWD_ABORT_BUG([gl_abort_bug=yes])
 119           ;;
 120       esac
 121       ;;
 122   esac
 123   dnl Define HAVE_MINIMALLY_WORKING_GETCWD and HAVE_PARTLY_WORKING_GETCWD
 124   dnl if appropriate.
 125   case "$gl_cv_func_getcwd_path_max" in
 126     "no"|"no, it has the AIX bug") ;;
 127     *)
 128       AC_DEFINE([HAVE_MINIMALLY_WORKING_GETCWD], [1],
 129         [Define to 1 if getcwd minimally works, that is, its result can be
 130          trusted when it succeeds.])
 131       ;;
 132   esac
 133   case "$gl_cv_func_getcwd_path_max" in
 134     "no, but it is partly working")
 135       AC_DEFINE([HAVE_PARTLY_WORKING_GETCWD], [1],
 136         [Define to 1 if getcwd works, except it sometimes fails when it
 137          shouldn't, setting errno to ERANGE, ENAMETOOLONG, or ENOENT.])
 138       ;;
 139     "yes, but with shorter paths")
 140       AC_DEFINE([HAVE_GETCWD_SHORTER], [1],
 141         [Define to 1 if getcwd works, but with shorter paths
 142          than is generally tested with the replacement.])
 143       ;;
 144   esac
 145
 146   if { case "$gl_cv_func_getcwd_null" in *yes) false;; *) true;; esac; } \
 147      || test $gl_cv_func_getcwd_posix_signature != yes \
 148      || { case "$gl_cv_func_getcwd_path_max" in *yes*) false;; *) true;; esac; } \
 149      || test $gl_abort_bug = yes; then
 150     REPLACE_GETCWD=1
 151   fi
 152 ])
 153
 154 # Prerequisites of lib/getcwd.c, when full replacement is in effect.
 155 AC_DEFUN([gl_PREREQ_GETCWD],
 156 [
 157   AC_REQUIRE([gl_USE_SYSTEM_EXTENSIONS])
 158   AC_REQUIRE([gl_CHECK_TYPE_STRUCT_DIRENT_D_INO])
 159   :
 160 ])