Add fchdir() probe (in non-UNIX systems assume it doesn't exist).

p4raw-id: //depot/perl@10797

21 files changed, 80 insertions, 6 deletions

diff --git a/Configure b/Configure
index db14b23be0..a7140f316b 100755
--- a/Configure
+++ b/Configure
@@ -20,7 +20,7 @@
 
 # $Id: Head.U,v 3.0.1.9 1997/02/28 15:02:09 ram Exp $
 #
-# Generated on Thu Jun 21 18:44:48 EET DST 2001 [metaconfig 3.0 PL70]
+# Generated on Thu Jun 21 23:22:43 EET DST 2001 [metaconfig 3.0 PL70]
 # (with additional metaconfig patches by perlbug@perl.org)
 
 cat >c1$$ <<EOF
@@ -353,6 +353,7 @@ d_endnent=''
 d_endpent=''
 d_endpwent=''
 d_endsent=''
+d_fchdir=''
 d_fchmod=''
 d_fchown=''
 d_fcntl=''
@@ -9824,6 +9825,10 @@ EOCP
 esac
 $rm -f try try.* .out core head.c mtry
 
+: see if fchdir exists
+set fchdir d_fchdir
+eval $inlibc
+
 : see if fchmod exists
 set fchmod d_fchmod
 eval $inlibc
@@ -16615,6 +16620,7 @@ d_endpwent='$d_endpwent'
 d_endsent='$d_endsent'
 d_eofnblk='$d_eofnblk'
 d_eunice='$d_eunice'
+d_fchdir='$d_fchdir'
 d_fchmod='$d_fchmod'
 d_fchown='$d_fchown'
 d_fcntl='$d_fcntl'
diff --git a/NetWare/config.wc b/NetWare/config.wc
index 1a55ef5ecf..29168eadd2 100644
--- a/NetWare/config.wc
+++ b/NetWare/config.wc
@@ -130,6 +130,7 @@ d_endsent='undef'
 d_endspent='undef'
 d_eofnblk='define'
 d_eunice='undef'
+d_fchdir='undef'
 d_fchmod='undef'
 d_fchown='undef'
 d_fcntl='undef'
diff --git a/NetWare/config_H.wc b/NetWare/config_H.wc
index 93dd24f02d..e60411130d 100644
--- a/NetWare/config_H.wc
+++ b/NetWare/config_H.wc
@@ -127,6 +127,12 @@
  */
 #define HAS_DUP2	/**/
 
+/* HAS_FCHDIR:
+ *	This symbol, if defined, indicates that the fchdir routine is
+ *	available to change directory using a file descriptor.
+ */
+/*#define HAS_FCHDIR		/**/
+
 /* HAS_FCHMOD:
  *	This symbol, if defined, indicates that the fchmod routine is available
  *	to change mode of opened files.  If unavailable, use chmod().
diff --git a/Porting/Glossary b/Porting/Glossary
index fa87e63ffe..136810b1a7 100644
--- a/Porting/Glossary
+++ b/Porting/Glossary
@@ -543,6 +543,10 @@ d_eunice (Guess.U):
 	This variable conditionally defines the symbols EUNICE and VAX, which
 	alerts the C program that it must deal with ideosyncracies of VMS.
 
+d_fchdir (d_fchdir.U):
+	This variable conditionally defines the HAS_FCHDIR symbol, which
+	indicates to the C program that the fchdir() routine is available.
+
 d_fchmod (d_fchmod.U):
 	This variable conditionally defines the HAS_FCHMOD symbol, which
 	indicates to the C program that the fchmod() routine is available
diff --git a/Porting/config.sh b/Porting/config.sh
index 5dc8a7e033..b85b5060e8 100644
--- a/Porting/config.sh
+++ b/Porting/config.sh
@@ -8,7 +8,7 @@
 
 # Package name      : perl5
 # Source directory  : .
-# Configuration time: Wed Jun 20 08:48:18 EET DST 2001
+# Configuration time: Thu Jun 21 23:32:02 EET DST 2001
 # Configured by     : jhi
 # Target system     : osf1 alpha.hut.fi v4.0 878 alpha 
 
@@ -63,7 +63,7 @@ ccsymbols='__alpha=1 __LANGUAGE_C__=1 __osf__=1 __unix__=1 _LONGLONG=1 _SYSTYPE_
 ccversion='V5.6-082'
 cf_by='jhi'
 cf_email='yourname@yourhost.yourplace.com'
-cf_time='Wed Jun 20 08:48:18 EET DST 2001'
+cf_time='Thu Jun 21 23:32:02 EET DST 2001'
 charsize='1'
 chgrp=''
 chmod=''
@@ -145,6 +145,7 @@ d_endpwent='define'
 d_endsent='define'
 d_eofnblk='define'
 d_eunice='undef'
+d_fchdir='define'
 d_fchmod='define'
 d_fchown='define'
 d_fcntl='define'
@@ -669,7 +670,7 @@ patchlevel='7'
 path_sep=':'
 perl5='/u/vieraat/vieraat/jhi/Perl/bin/perl'
 perl=''
-perl_patchlevel='10721'
+perl_patchlevel='10764'
 perladmin='yourname@yourhost.yourplace.com'
 perllibs='-lm -liconv -lutil -lpthread -lexc'
 perlpath='/opt/perl/bin/perl'
@@ -869,7 +870,7 @@ PERL_SUBVERSION=1
 PERL_API_REVISION=5
 PERL_API_VERSION=5
 PERL_API_SUBVERSION=0
-PERL_PATCHLEVEL=10721
+PERL_PATCHLEVEL=10764
 PERL_CONFIG_SH=true
 # Variables propagated from previous config.sh file.
 pp_sys_cflags='ccflags="$ccflags -DNO_EFF_ONLY_OK"'
diff --git a/Porting/config_H b/Porting/config_H
index b2c523d3a3..235021cedf 100644
--- a/Porting/config_H
+++ b/Porting/config_H
@@ -17,7 +17,7 @@
 /*
  * Package name      : perl5
  * Source directory  : .
- * Configuration time: Wed Jun 20 08:48:18 EET DST 2001
+ * Configuration time: Thu Jun 21 23:32:02 EET DST 2001
  * Configured by     : jhi
  * Target system     : osf1 alpha.hut.fi v4.0 878 alpha 
  */
@@ -1285,6 +1285,12 @@
  */
 #define HAS_ENDSERVENT		/**/
 
+/* HAS_FCHDIR:
+ *	This symbol, if defined, indicates that the fchdir routine is
+ *	available to change directory using a file descriptor.
+ */
+#define HAS_FCHDIR		/**/
+
 /* FCNTL_CAN_LOCK:
  *	This symbol, if defined, indicates that fcntl() can be used
  *	for file locking.  Normally on Unix systems this is defined.
diff --git a/config_h.SH b/config_h.SH
index 235369c4dc..de0480475d 100644
--- a/config_h.SH
+++ b/config_h.SH
@@ -1305,6 +1305,12 @@ sed <<!GROK!THIS! >$CONFIG_H -e 's!^#undef\(.*/\)\*!/\*#define\1 \*!' -e 's!^#un
  */
 #$d_endsent HAS_ENDSERVENT		/**/
 
+/* HAS_FCHDIR:
+ *	This symbol, if defined, indicates that the fchdir routine is
+ *	available to change directory using a file descriptor.
+ */
+#$d_fchdir HAS_FCHDIR		/**/
+
 /* FCNTL_CAN_LOCK:
  *	This symbol, if defined, indicates that fcntl() can be used
  *	for file locking.  Normally on Unix systems this is defined.
diff --git a/configure.com b/configure.com
index a7459b049d..0ccc61ac33 100644
--- a/configure.com
+++ b/configure.com
@@ -5028,6 +5028,7 @@ $ WC "d_endsent='" + d_endsent + "'"
 $ WC "d_eofnblk='undef'"
 $ WC "d_eunice='undef'"
 $ WC "d_fchmod='undef'"
+$ WC "d_fchdir='undef'"
 $ WC "d_fchown='undef'"
 $ WC "d_fcntl='" + d_fcntl + "'"
 $ WC "d_fcntl_can_lock='" + d_fcntl_can_lock + "'"
diff --git a/epoc/config.sh b/epoc/config.sh
index 4e80423403..2cc62f663c 100644
--- a/epoc/config.sh
+++ b/epoc/config.sh
@@ -138,6 +138,7 @@ d_endpwent='undef'
 d_endsent='undef'
 d_eofnblk='define'
 d_eunice='undef'
+d_fchdir='undef'
 d_fchmod='undef'
 d_fchown='undef'
 d_fcntl='undef'
diff --git a/uconfig.h b/uconfig.h
index 4d51056e86..8c862f1f7b 100644
--- a/uconfig.h
+++ b/uconfig.h
@@ -1281,6 +1281,12 @@
  */
 /*#define HAS_ENDSERVENT		/ **/
 
+/* HAS_FCHDIR:
+ *	This symbol, if defined, indicates that the fchdir routine is
+ *	available to change directory using a file descriptor.
+ */
+/*#define HAS_FCHDIR		/ **/
+
 /* FCNTL_CAN_LOCK:
  *	This symbol, if defined, indicates that fcntl() can be used
  *	for file locking.  Normally on Unix systems this is defined.
diff --git a/uconfig.sh b/uconfig.sh
index ca35351d25..c52e4eba49 100755
--- a/uconfig.sh
+++ b/uconfig.sh
@@ -75,6 +75,7 @@ d_endpwent='undef'
 d_endsent='undef'
 d_eofnblk='undef'
 d_eunice='undef'
+d_fchdir='undef'
 d_fchmod='undef'
 d_fchown='undef'
 d_fcntl='undef'
diff --git a/vos/config.alpha.def b/vos/config.alpha.def
index 006551691c..93a9601401 100644
--- a/vos/config.alpha.def
+++ b/vos/config.alpha.def
@@ -62,6 +62,7 @@ $d_endpent='define'
 $d_endpwent='undef'
 $d_endsent='define'
 $d_eofnblk='define'
+$d_fchdir='undef'
 $d_fchmod='define'
 $d_fchown='undef'
 $d_fcntl='define'
diff --git a/vos/config.alpha.h b/vos/config.alpha.h
index 3f47acfcd0..72a0e3db90 100644
--- a/vos/config.alpha.h
+++ b/vos/config.alpha.h
@@ -1281,6 +1281,12 @@
  */
 #define HAS_ENDSERVENT		/**/
 
+/* HAS_FCHDIR:
+ *	This symbol, if defined, indicates that the fchdir routine is
+ *	available to change directory using a file descriptor.
+ */
+/*#define HAS_FCHDIR		/**/
+
 /* FCNTL_CAN_LOCK:
  *	This symbol, if defined, indicates that fcntl() can be used
  *	for file locking.  Normally on Unix systems this is defined.
diff --git a/vos/config.ga.def b/vos/config.ga.def
index 4d49cf53ad..8774ae7ad9 100644
--- a/vos/config.ga.def
+++ b/vos/config.ga.def
@@ -62,6 +62,7 @@ $d_endpent='define'
 $d_endpwent='undef'
 $d_endsent='define'
 $d_eofnblk='define'
+$d_fchdir='undef'
 $d_fchmod='define'
 $d_fchown='undef'
 $d_fcntl='define'
diff --git a/vos/config.ga.h b/vos/config.ga.h
index 5b283e3f13..6cc7db0568 100644
--- a/vos/config.ga.h
+++ b/vos/config.ga.h
@@ -1281,6 +1281,12 @@
  */
 #define HAS_ENDSERVENT		/**/
 
+/* HAS_FCHDIR:
+ *	This symbol, if defined, indicates that the fchdir routine is
+ *	available to change directory using a file descriptor.
+ */
+/*#define HAS_FCHDIR		/**/
+
 /* FCNTL_CAN_LOCK:
  *	This symbol, if defined, indicates that fcntl() can be used
  *	for file locking.  Normally on Unix systems this is defined.
diff --git a/win32/config.bc b/win32/config.bc
index a47e40534f..86b4d51c85 100644
--- a/win32/config.bc
+++ b/win32/config.bc
@@ -129,6 +129,7 @@ d_endpwent='undef'
 d_endsent='undef'
 d_eofnblk='define'
 d_eunice='undef'
+d_fchdir='undef'
 d_fchmod='undef'
 d_fchown='undef'
 d_fcntl='undef'
diff --git a/win32/config.gc b/win32/config.gc
index 38c7a15f6b..463631662f 100644
--- a/win32/config.gc
+++ b/win32/config.gc
@@ -129,6 +129,7 @@ d_endpwent='undef'
 d_endsent='undef'
 d_eofnblk='define'
 d_eunice='undef'
+d_fchdir='undef'
 d_fchmod='undef'
 d_fchown='undef'
 d_fcntl='undef'
diff --git a/win32/config.vc b/win32/config.vc
index 2e0bae22e0..176aabe718 100644
--- a/win32/config.vc
+++ b/win32/config.vc
@@ -129,6 +129,7 @@ d_endpwent='undef'
 d_endsent='undef'
 d_eofnblk='define'
 d_eunice='undef'
+d_fchdir='undef'
 d_fchmod='undef'
 d_fchown='undef'
 d_fcntl='undef'
diff --git a/win32/config_H.bc b/win32/config_H.bc
index 6f1d3c1914..3fcbce8ac3 100644
--- a/win32/config_H.bc
+++ b/win32/config_H.bc
@@ -127,6 +127,12 @@
  */
 #define HAS_DUP2	/**/
 
+/* HAS_FCHDIR:
+ *	This symbol, if defined, indicates that the fchdir routine is
+ *	available to change directory using a file descriptor.
+ */
+/*#define HAS_FCHDIR		/**/
+
 /* HAS_FCHMOD:
  *	This symbol, if defined, indicates that the fchmod routine is available
  *	to change mode of opened files.  If unavailable, use chmod().
diff --git a/win32/config_H.gc b/win32/config_H.gc
index ce85240be0..cd73f0b3cd 100644
--- a/win32/config_H.gc
+++ b/win32/config_H.gc
@@ -127,6 +127,12 @@
  */
 #define HAS_DUP2	/**/
 
+/* HAS_FCHDIR:
+ *	This symbol, if defined, indicates that the fchdir routine is
+ *	available to change directory using a file descriptor.
+ */
+/*#define HAS_FCHDIR		/**/
+
 /* HAS_FCHMOD:
  *	This symbol, if defined, indicates that the fchmod routine is available
  *	to change mode of opened files.  If unavailable, use chmod().
diff --git a/win32/config_H.vc b/win32/config_H.vc
index e48c157707..cb63dba0cf 100644
--- a/win32/config_H.vc
+++ b/win32/config_H.vc
@@ -127,6 +127,12 @@
  */
 #define HAS_DUP2	/**/
 
+/* HAS_FCHDIR:
+ *	This symbol, if defined, indicates that the fchdir routine is
+ *	available to change directory using a file descriptor.
+ */
+/*#define HAS_FCHDIR		/**/
+
 /* HAS_FCHMOD:
  *	This symbol, if defined, indicates that the fchmod routine is available
  *	to change mode of opened files.  If unavailable, use chmod().