[p5sagit/p5-mst-13.2.git] / hints / aix.sh

# hints/aix.sh
# AIX 3.x.x hints thanks to Wayne Scott <wscott@ichips.intel.com>
# AIX 4.1 hints thanks to Christopher Chan-Nui <channui@austin.ibm.com>.
# AIX 4.1 pthreading by Christopher Chan-Nui <channui@austin.ibm.com> and
#	  Jarkko Hietaniemi <jhi@iki.fi>.
# AIX 4.3.x LP64 build by Steven Hirsch <hirschs@btv.ibm.com>
# Merged on Mon Feb  6 10:22:35 EST 1995 by
#   Andy Dougherty  <doughera@lafayette.edu>

#
# Contact dfavor@corridor.com for any of the following:
#
#    - AIX 43x and above support
#    - gcc + threads support
#    - socks support
#
# Apr 99 changes:
#
#    - use nm in AIX 43x and above
#    - gcc + threads now builds
#    [(added support for socks) Jul 99 SOCKS support rewritten]
#
# Notes:
#
#    - shared libperl support is tricky. if ever libperl.a ends up
#      in /usr/local/lib/* it can override any subsequent builds of
#      that same perl release. to make sure you know where the shared
#      libperl.a is coming from do a 'dump -Hv perl' and check all the
#      library search paths in the loader header.
#
#      it would be nice to warn the user if a libperl.a exists that is
#      going to override the current build, but that would be complex.
#
#      better yet, a solid fix for this situation should be developed.
#

# Configure finds setrgid and setruid, but they're useless.  The man
# pages state:
#    setrgid: The EPERM error code is always returned.
#    setruid: The EPERM error code is always returned. Processes cannot
#	      reset only their real user IDs.
d_setrgid='undef'
d_setruid='undef'

alignbytes=8

case "$usemymalloc" in
'')  usemymalloc='n' ;;
esac

# Intuiting the existence of system calls under AIX is difficult,
# at best; the safest technique is to find them empirically.

# AIX 4.3.* and above default to letting Configure test if nm
# extraction will work.
case "$osvers" in
   3.*|4.1.*|4.2.*)
      case "$usenm" in
	  '') usenm='undef'
	  esac
      case "$usenativedlopen" in
	  '') usenativedlopen='false'
	  esac
      ;;
   *)
      case "$usenativedlopen" in
	  '') usenativedlopen='true'
	  esac
      ;;
esac

so="a"
# AIX itself uses .o (libc.o) but we prefer compatibility
# with the rest of the world and with rest of the scripting
# languages (Tcl, Python) and related systems (SWIG).
# Stephanie Beals <bealzy@us.ibm.com>
dlext="so"

# Take possible hint from the environment.  If 32-bit is set in the
# environment, we can override it later.  If set for 64, the
# 'sizeof' test sees a native 64-bit architecture and never looks back.
case "$OBJECT_MODE" in
32)
    cat >&4 <<EOF

You have OBJECT_MODE=32 set in the environment. 
I take this as a hint you do not want to
build for a 64-bit address space. You will be
given the opportunity to change this later.
EOF
    ;;
64)
    cat >&4 <<EOF

You have OBJECT_MODE=64 set in the environment. 
This forces a full 64-bit build.  If that is
not what you intended, please terminate this
program, unset it and restart.
EOF
    ;;
*)  ;;
esac

# Trying to set this breaks the POSIX.c compilation

# Make setsockopt work correctly.  See man page.
# ccflags='-D_BSD=44'

# uname -m output is too specific and not appropriate here
case "$archname" in
'') archname="$osname" ;;
esac

cc=${cc:-cc}

case "$osvers" in
3*) d_fchmod=undef
    ccflags="$ccflags -D_ALL_SOURCE"
    ;;
*)  # These hints at least work for 4.x, possibly other systems too.
    ccflags="$ccflags -D_ALL_SOURCE -D_ANSI_C_SOURCE -D_POSIX_SOURCE"
    case "$cc" in
     *gcc*) ;;
     *) ccflags="$ccflags -qmaxmem=16384 -qnoansialias" ;;
    esac
    nm_opt='-B'
    ;;
esac

# These functions don't work like Perl expects them to.
d_setregid='undef'
d_setreuid='undef'

# Changes for dynamic linking by Wayne Scott <wscott@ichips.intel.com>
#
# Tell perl which symbols to export for dynamic linking.
cccdlflags='none'      # All AIX code is position independent
cc_type=xlc
case "$cc" in
*gcc*)
   cc_type=gcc
   ccdlflags='-Xlinker'
   if [ "X$gccversion" = "X" ]; then
     # Done too late in Configure if hinted
     gccversion=`$cc --version | sed 's/.*(GCC) *//`
     fi
   ;;
*) ccversion=`lslpp -L | grep 'C for AIX Compiler$' | grep -v '\.msg\.[A-Za-z_]*\.' | awk '{print $2}'`
   case "$ccversion" in
     '') ccversion=`lslpp -L | grep 'IBM C and C++ Compilers LUM$' | awk '{print $2}'`
	 ;;
     *.*.*.*.*.*.*)		# Ahhrgg, more than one C compiler installed
	 first_cc_path=`which ${cc:-cc}`
	 case "$first_cc_path" in
	   *vac*)
	     cc_type=vac ;;
	   /usr/bin/cc)		# Check the symlink
	     if [ -h $first_cc_path ] ; then
	       ls -l $first_cc_path > reflect
	       if grep -i vac reflect >/dev/null 2>&1 ; then
		 cc_type=vac
		 fi
	       rm -f reflect
	       fi
	     ;;
	   esac
	 ccversion=`lslpp -L | grep 'C for AIX Compiler$' | grep -i $cc_type | awk '{print $2}' | head -1`
	 ;;
     esac
   case "$ccversion" in
     3.6.6.0)
	optimize='none'
	;;
     4.4.0.0|4.4.0.1|4.4.0.2)
	cat >&4 <<EOF
***
*** This C compiler ($ccversion) is outdated.
***
*** Please upgrade to at least 4.4.0.3.
***
EOF
	;;
     5.0.0.0)
	cat >&4 <<EOF
***
*** This C compiler ($ccversion) is known to have too many optimizer
*** bugs to compile a working Perl.
***
*** Consider upgrading your C compiler, or getting the GNU cc (gcc).
***
*** Cannot continue, aborting.
EOF
	exit 1
	;;
     5.0.1.0)
	cat >&4 <<EOF
***
*** This C compiler ($ccversion) is known to have optimizer problems
*** when compiling regcomp.c.
***
*** Disabling optimization for that file but consider upgrading
*** your C compiler.
***
EOF
regcomp_cflags='optimize='
	;;
     esac
esac
# the required -bE:$installarchlib/CORE/perl.exp is added by
# libperl.U (Configure) later.

case "$use64bitall" in
    $define|true|[yY]*) use64bitint="$define" ;;
    esac

case "$usemorebits" in
    $define|true|[yY]*) use64bitint="$define"; uselongdouble="$define" ;;
    esac

case $cc_type in
    vac|xlc)
	case "$uselongdouble" in
	    $define|true|[yY]*)
		ccflags="$ccflags -qlongdouble"
		libswanted="c128 $libswanted"
		;;
	    esac
    esac

case "$cc" in
*gcc*) ;;
cc*|xlc*) # cc should've been set by line 116 or so if empty.
	if test ! -x /usr/bin/$cc -a -x /usr/vac/bin/$cc; then
		case ":$PATH:" in
		*:/usr/vac/bin:*) ;;
		*) if test ! -x /QOpenSys/usr/bin/$cc; then
			# The /QOpenSys/usr/bin/$cc saves us if we are
			# building natively in OS/400 PASE.
			cat >&4 <<EOF

***
*** You either implicitly or explicitly specified an IBM C compiler,
*** but you do not seem to have one in /usr/bin, but you seem to have
*** the VAC installed in /usr/vac, but you do not have the /usr/vac/bin
*** in your PATH.  I suggest adding that and retrying Configure.
***
EOF
			exit 1
		   fi 
		   ;;
		esac
	fi
	;;
esac

case "$ldlibpthname" in
'') ldlibpthname=LIBPATH ;;
esac

# The first 3 options would not be needed if dynamic libs. could be linked
# with the compiler instead of ld.
# -bI:$(PERL_INC)/perl.exp  Read the exported symbols from the perl binary
# -bE:$(BASEEXT).exp	    Export these symbols.  This file contains only one
#			    symbol: boot_$(EXP)	 can it be auto-generated?
case "$osvers" in
3*) 
    lddlflags="$lddlflags -H512 -T512 -bhalt:4 -bM:SRE -bI:\$(PERL_INC)/perl.exp -bE:\$(BASEEXT).exp -e _nostart -lc"
    ;;
*) 
    lddlflags="$lddlflags -bhalt:4 -bM:SRE -bI:\$(PERL_INC)/perl.exp -bE:\$(BASEEXT).exp -bnoentry -lc"
    ;;
esac
# AIX 4.2 (using latest patchlevels on 20001130) has a broken bind
# library (getprotobyname and getprotobynumber are outversioned by
# the same calls in libc, at least for xlc version 3...
case "`oslevel`" in
    4.2.1.*)
      case "$ccversion" in    # Don't know if needed for gcc
          3.1.4.*|5.0.2.*)    # libswanted "bind ... c ..." => "... c bind ..."
              set `echo X "$libswanted "| sed -e 's/ bind\( .*\) \([cC]\) / \1 \2 bind /'`
              shift
              libswanted="$*"
              ;;
          esac
      ;;
    esac

# This script UU/usethreads.cbu will get 'called-back' by Configure 
# after it has prompted the user for whether to use threads.
cat > UU/usethreads.cbu <<'EOCBU'
case "$usethreads" in
$define|true|[yY]*)
	ccflags="$ccflags -DNEED_PTHREAD_INIT"
	case "$cc" in
	*gcc*)
	    ccflags="-D_THREAD_SAFE $ccflags"
	    echo "GCC $gccversion disabling some _r functions" >&4
	    case "$gccversion" in
		3*) d_drand48_r='undef'
		    d_endgrent_r='undef'
		    d_endpwent_r='undef'
		    d_getgrent_r='undef'
		    d_getpwent_r='undef'
		    d_random_r='undef'
		    d_srand48_r='undef'
		    d_strerror_r='undef'
		    ;;
		esac
	    ;;
	cc_r) ;;
	cc|xl[cC]_r) 
	    echo >&4 "Switching cc to cc_r because of POSIX threads."
	    # xlc_r has been known to produce buggy code in AIX 4.3.2.
	    # (e.g. pragma/overload core dumps)	 Let's suspect xlC_r, too.
	    # --jhi@iki.fi
	    cc=cc_r

	    case "`oslevel`" in
		4.2.1.*) i_crypt='undef' ;;
		esac
	    ;;
	'') 
	    cc=cc_r
	    ;;
	*)
	    cat >&4 <<EOM
*** For pthreads you should use the AIX C compiler cc_r.
*** (now your compiler was set to '$cc')
*** Cannot continue, aborting.
EOM
	    exit 1
	    ;;
	esac

	# c_rify libswanted.
	set `echo X "$libswanted "| sed -e 's/ \([cC]\) / \1_r /g'`
	shift
	libswanted="$*"
	# c_rify lddlflags.
	set `echo X "$lddlflags "| sed -e 's/ \(-l[cC]\) / \1_r /g'`
	shift
	lddlflags="$*"

	# Insert pthreads to libswanted, before any libc or libC.
	set `echo X "$libswanted "| sed -e 's/ \([cC]_r\) / pthreads \1 /'`
	shift
	libswanted="$*"
	# Insert pthreads to lddlflags, before any libc or libC.
	set `echo X "$lddlflags " | sed -e 's/ \(-l[cC]_r\) / -lpthreads \1 /'`
	shift
	lddlflags="$*"

	;;
esac
EOCBU

# This script UU/uselargefiles.cbu will get 'called-back' by Configure 
# after it has prompted the user for whether to use large files.
cat > UU/uselargefiles.cbu <<'EOCBU'
case "$uselargefiles" in
''|$define|true|[yY]*)
    # Configure should take care of use64bitint and use64bitall being
    # defined before uselargefiles.cbu is consulted.
    if test X"$use64bitint:$quadtype" = X"$define:long" -o X"$use64bitall" = Xdefine; then
# Keep these at the left margin.
ccflags_uselargefiles="`getconf XBS5_LP64_OFF64_CFLAGS 2>/dev/null`"
ldflags_uselargefiles="`getconf XBS5_LP64_OFF64_LDFLAGS 2>/dev/null`"
    else
# Keep these at the left margin.
ccflags_uselargefiles="`getconf XBS5_ILP32_OFFBIG_CFLAGS 2>/dev/null`"
ldflags_uselargefiles="`getconf XBS5_ILP32_OFFBIG_LDFLAGS 2>/dev/null`"
    fi
	# _Somehow_ in AIX 4.3.1.0 the above getconf call manages to
	# insert(?) *something* to $ldflags so that later (in Configure) evaluating
	# $ldflags causes a newline after the '-b64' (the result of the getconf).
	# (nothing strange shows up in $ldflags even in hexdump;
	#  so it may be something (a bug) in the shell, instead?)
	# Try it out: just uncomment the below line and rerun Configure:
# echo >&4 "AIX 4.3.1.0 $ldflags_uselargefiles mystery" ; exit 1
	# Just don't ask me how AIX does it, I spent hours wondering.
	# Therefore the line re-evaluating ldflags_uselargefiles: it seems to fix
	# the whatever it was that AIX managed to break. --jhi
	ldflags_uselargefiles="`echo $ldflags_uselargefiles`"
    if test X"$use64bitint:$quadtype" = X"$define:long" -o X"$use64bitall" = Xdefine; then
# Keep this at the left margin.
libswanted_uselargefiles="`getconf XBS5_LP64_OFF64_LIBS 2>/dev/null|sed -e 's@^-l@@' -e 's@ -l@ @g`"
    else
# Keep this at the left margin.
libswanted_uselargefiles="`getconf XBS5_ILP32_OFFBIG_LIBS 2>/dev/null|sed -e 's@^-l@@' -e 's@ -l@ @g`"
    fi
	case "$ccflags_uselargefiles$ldflags_uselargefiles$libs_uselargefiles" in
	'');;
	*) ccflags="$ccflags $ccflags_uselargefiles"
	   ldflags="$ldflags $ldflags_uselargefiles"
	   libswanted="$libswanted $libswanted_uselargefiles"
	   ;;
	esac
	case "$gccversion" in
	'') ;;
	*) # Remove xlc-spefific -qflags.
	   ccflags="`echo $ccflags | sed -e 's@ -q[^ ]*@ @g' -e 's@^-q[^ ]* @@g'`"
	   ldflags="`echo $ldflags | sed -e 's@ -q[^ ]*@ @g' -e 's@^-q[^ ]* @@g'`"
	   # Move xld-spefific -bflags.
	   ccflags="`echo $ccflags | sed -e 's@ -b@ -Wl,-b@g'`"
	   ldflags="`echo ' '$ldflags | sed -e 's@ -b@ -Wl,-b@g'`"
	   lddlflags="`echo ' '$lddlflags | sed -e 's@ -b@ -Wl,-b@g'`"
	   ld='gcc'
	   echo >&4 "(using ccflags   $ccflags)"
	   echo >&4 "(using ldflags   $ldflags)"
	   echo >&4 "(using lddlflags $lddlflags)"
	   ;; 
        esac
        ;;
esac
EOCBU

# This script UU/use64bitint.cbu will get 'called-back' by Configure 
# after it has prompted the user for whether to use 64 bit integers.
cat > UU/use64bitint.cbu <<'EOCBU'
case "$use64bitint" in
$define|true|[yY]*)
	    case "`oslevel`" in
	    3.*|4.[012].*)
		cat >&4 <<EOM
AIX `oslevel` does not support 64-bit interfaces.
You should upgrade to at least AIX 4.3.
EOM
		exit 1
		;;
	    esac
	    ;;
esac
EOCBU

cat > UU/use64bitall.cbu <<'EOCBU'
# This script UU/use64bitall.cbu will get 'called-back' by Configure 
# after it has prompted the user for whether to be maximally 64-bitty.
case "$use64bitall" in
$define|true|[yY]*)
	    case "`oslevel`" in
	    3.*|4.[012].*)
		cat >&4 <<EOM
AIX `oslevel` does not support 64-bit interfaces.
You should upgrade to at least AIX 4.3.
EOM
		exit 1
		;;
	    esac
	    echo " "
	    echo "Checking the CPU width of your hardware..." >&4
	    $cat >size.c <<EOCP
#include <stdio.h>
#include <sys/systemcfg.h>
int main (void)
{
  printf("%d\n",_system_configuration.width);
  return(0);
}
EOCP
	    set size
	    if eval $compile_ok; then
		qacpuwidth=`./size`
		echo "You are running on $qacpuwidth bit hardware."
	    else
		dflt="32"
		echo " "
		echo "(I can't seem to compile the test program.  Guessing...)"
		rp="What is the width of your CPU (in bits)?"
		. ./myread
		qacpuwidth="$ans"
	    fi
	    $rm -f size.c size
	    case "$qacpuwidth" in
	    32*)
		cat >&4 <<EOM
Bzzzt! At present, you can only perform a
full 64-bit build on a 64-bit machine.
EOM
		exit 1
		;;
	    esac
	    qacflags="`getconf XBS5_LP64_OFF64_CFLAGS 2>/dev/null`"
	    qaldflags="`getconf XBS5_LP64_OFF64_LDFLAGS 2>/dev/null`"
	    # See jhi's comments above regarding this re-eval.  I've
	    # seen similar weirdness in the form of:
	    #
# 1506-173 (W) Option lm is not valid.  Enter xlc for list of valid options.
	    #
	    # error messages from 'cc -E' invocation. Again, the offending
	    # string is simply not detectable by any means.  Since it doesn't
	    # do any harm, I didn't pursue it. -- sh
	    qaldflags="`echo $qaldflags`"
	    qalibs="`getconf XBS5_LP64_OFF64_LIBS 2>/dev/null|sed -e 's@^-l@@' -e 's@ -l@ @g`"
	    # -q32 and -b32 may have been set by uselargefiles or user.
    	    # Remove them.
	    ccflags="`echo $ccflags | sed -e 's@-q32@@'`"
	    ldflags="`echo $ldflags | sed -e 's@-b32@@'`"
	    # Tell archiver to use large format.  Unless we remove 'ar'
	    # from 'trylist', the Configure script will just reset it to 'ar'
	    # immediately prior to writing config.sh.  This took me hours
	    # to figure out.
	    trylist="`echo $trylist | sed -e 's@^ar @@' -e 's@ ar @ @g' -e 's@ ar$@@'`"
	    ar="ar -X64"
	    nm_opt="-X64 $nm_opt"
	    # Note: Placing the 'qacflags' variable into the 'ldflags' string
	    # is NOT a typo.  ldflags is passed to the C compiler for final
	    # linking, and it wants -q64 (-b64 is for ld only!).
	    case "$qacflags$qaldflags$qalibs" in
	    '');;
	    *) ccflags="$ccflags $qacflags"
	       ldflags="$ldflags $qacflags"
	       lddlflags="$qaldflags $lddlflags"
	       libswanted="$libswanted $qalibs"
	       ;;
	    esac
	    case "$ccflags" in
	    *-DUSE_64_BIT_ALL*) ;;
      	    *) ccflags="$ccflags -DUSE_64_BIT_ALL";;
	    esac
	    case "$archname64" in
	    ''|64*) archname64=64all ;;
	    esac
	    longsize="8"
	    qacflags=''
	    qaldflags=''
	    qalibs=''
	    qacpuwidth=''
	    ;;
esac
EOCBU

if test $usenativedlopen = 'true'
then
    ccflags="$ccflags -DUSE_NATIVE_DLOPEN"
    case "$cc" in
      *gcc*) ldflags="$ldflags -Wl,-brtl" ;;
      *)     ldflags="$ldflags -brtl" ;;
      esac
else
    case `oslevel` in
	4.2.*)	;;	# libC_r has broke gettimeofday
        *)  # If the C++ libraries, libC and libC_r, are available we will
	    # prefer them over the vanilla libc, because the libC contain
	    # loadAndInit() and terminateAndUnload() which work correctly
	    # with C++ statics while libc load() and unload() do not. See
	    # ext/DynaLoader/dl_aix.xs. The C-to-C_r switch is done by
	    # usethreads.cbu, if needed.
	    if test -f /lib/libC.a -a X"`$cc -v 2>&1 | grep gcc`" = X; then
		# Cify libswanted.
		set `echo X "$libswanted "| sed -e 's/ c / C c /'`
		shift
		libswanted="$*"
		# Cify lddlflags.
		set `echo X "$lddlflags "| sed -e 's/ -lc / -lC -lc /'`
		shift
		lddlflags="$*"
	    fi
	esac
fi

case "$PASE" in
define)
	case "$prefix" in
	'') prefix=/QOpenSys/perl ;;
	esac
	cat >&4 <<EOF

***
*** You seem to be compiling in AIX for the OS/400 PASE environment.
*** I'm not going to use the AIX bind, nsl, and possible util libraries, then.
*** I'm also not going to install perl as /usr/bin/perl.
*** Perl will be installed under $prefix.
*** For instructions how to install this build from AIX to PASE,
*** see the file README.os400.  Accept the "aix" for the question
*** about "Operating system name".
***
EOF
	set `echo " $libswanted " | sed -e 's@ bind @ @' -e 's@ nsl @ @' -e 's@ util @ @'`
	shift
	libswanted="$*"
	installusrbinperl="$undef"

	# V5R1 doesn't have this (V5R2 does), without knowing
	# which one we have it's safer to be pessimistic.
	# Cwd will work fine even without fchdir(), but if
	# V5R1 tries to use code compiled assuming fchdir(),
	# lots of grief will issue forth from Cwd.
	case "$d_fchdir" in
	'') d_fchdir="$undef" ;;
	esac
	;;
esac

# EOF
Commit	Line	Data
1aef975c	1	# hints/aix.sh
	2	# AIX 3.x.x hints thanks to Wayne Scott <wscott@ichips.intel.com>
	3	# AIX 4.1 hints thanks to Christopher Chan-Nui <channui@austin.ibm.com>.
52e1cb5e	4	# AIX 4.1 pthreading by Christopher Chan-Nui <channui@austin.ibm.com> and
4e774c84	5	# Jarkko Hietaniemi <jhi@iki.fi>.
19e194ad	6	# AIX 4.3.x LP64 build by Steven Hirsch <hirschs@btv.ibm.com>
1aef975c	7	# Merged on Mon Feb 6 10:22:35 EST 1995 by
1973dd96	8	# Andy Dougherty <doughera@lafayette.edu>
1aef975c	9
bbc711f9	10	#
	11	# Contact dfavor@corridor.com for any of the following:
	12	#
	13	# - AIX 43x and above support
	14	# - gcc + threads support
	15	# - socks support
	16	#
	17	# Apr 99 changes:
	18	#
	19	# - use nm in AIX 43x and above
	20	# - gcc + threads now builds
29209bc5	21	# [(added support for socks) Jul 99 SOCKS support rewritten]
bbc711f9	22	#
	23	# Notes:
	24	#
	25	# - shared libperl support is tricky. if ever libperl.a ends up
	26	# in /usr/local/lib/* it can override any subsequent builds of
	27	# that same perl release. to make sure you know where the shared
	28	# libperl.a is coming from do a 'dump -Hv perl' and check all the
	29	# library search paths in the loader header.
	30	#
	31	# it would be nice to warn the user if a libperl.a exists that is
	32	# going to override the current build, but that would be complex.
	33	#
	34	# better yet, a solid fix for this situation should be developed.
	35	#
1aef975c	36
	37	# Configure finds setrgid and setruid, but they're useless. The man
	38	# pages state:
	39	# setrgid: The EPERM error code is always returned.
	40	# setruid: The EPERM error code is always returned. Processes cannot
4e774c84	41	# reset only their real user IDs.
a0d0e21e	42	d_setrgid='undef'
a0d0e21e	43	d_setruid='undef'
1aef975c	44
5f3774a9	45	alignbytes=8
a5f75d66	46
86959918	47	case "$usemymalloc" in
	48	'') usemymalloc='n' ;;
	49	esac
bbc711f9	50
	51	# Intuiting the existence of system calls under AIX is difficult,
	52	# at best; the safest technique is to find them empirically.
	53
e6cad49a	54	# AIX 4.3.* and above default to letting Configure test if nm
e6cad49a	55	# extraction will work.
bbc711f9	56	case "$osvers" in
56dbb940	57	3.\|4.1.\|4.2.*)
	58	case "$usenm" in
	59	'') usenm='undef'
	60	esac
	61	case "$usenativedlopen" in
	62	'') usenativedlopen='false'
	63	esac
bbc711f9	64	;;
bbc711f9	65	*)
56dbb940	66	case "$usenativedlopen" in
	67	'') usenativedlopen='true'
	68	esac
bbc711f9	69	;;
bbc711f9	70	esac
cc628cc3	71
3c321fdc	72	so="a"
0d9ec2f4	73	# AIX itself uses .o (libc.o) but we prefer compatibility
	74	# with the rest of the world and with rest of the scripting
	75	# languages (Tcl, Python) and related systems (SWIG).
	76	# Stephanie Beals <bealzy@us.ibm.com>
	77	dlext="so"
3c321fdc	78
19e194ad	79	# Take possible hint from the environment. If 32-bit is set in the
	80	# environment, we can override it later. If set for 64, the
	81	# 'sizeof' test sees a native 64-bit architecture and never looks back.
	82	case "$OBJECT_MODE" in
	83	32)
	84	cat >&4 <<EOF
	85
	86	You have OBJECT_MODE=32 set in the environment.
	87	I take this as a hint you do not want to
	88	build for a 64-bit address space. You will be
	89	given the opportunity to change this later.
	90	EOF
	91	;;
	92	64)
	93	cat >&4 <<EOF
	94
	95	You have OBJECT_MODE=64 set in the environment.
	96	This forces a full 64-bit build. If that is
	97	not what you intended, please terminate this
	98	program, unset it and restart.
	99	EOF
	100	;;
	101	*) ;;
	102	esac
	103
bbc711f9	104	# Trying to set this breaks the POSIX.c compilation
bbc711f9	105
1aef975c	106	# Make setsockopt work correctly. See man page.
	107	# ccflags='-D_BSD=44'
	108
	109	# uname -m output is too specific and not appropriate here
	110	case "$archname" in
	111	'') archname="$osname" ;;
	112	esac
	113
bd9b35c9	114	cc=${cc:-cc}
bd9b35c9	115
1aef975c	116	case "$osvers" in
1aef975c	117	3*) d_fchmod=undef
fc2c2f48	118	ccflags="$ccflags -D_ALL_SOURCE"
1aef975c	119	;;
1aef975c	120	*) # These hints at least work for 4.x, possibly other systems too.
fc2c2f48	121	ccflags="$ccflags -D_ALL_SOURCE -D_ANSI_C_SOURCE -D_POSIX_SOURCE"
80589958	122	case "$cc" in
80589958	123	gcc) ;;
8437356b	124	*) ccflags="$ccflags -qmaxmem=16384 -qnoansialias" ;;
80589958	125	esac
1aef975c	126	nm_opt='-B'
1aef975c	127	;;
	128	esac
	129
bbc711f9	130	# These functions don't work like Perl expects them to.
	131	d_setregid='undef'
	132	d_setreuid='undef'
	133
1aef975c	134	# Changes for dynamic linking by Wayne Scott <wscott@ichips.intel.com>
a0d0e21e	135	#
a0d0e21e	136	# Tell perl which symbols to export for dynamic linking.
b0f9136b	137	cccdlflags='none' # All AIX code is position independent
851f49a8	138	cc_type=xlc
4633a7c4	139	case "$cc" in
851f49a8	140	gcc)
851f49a8	141	cc_type=gcc
86c089c6	142	ccdlflags='-Xlinker'
	143	if [ "X$gccversion" = "X" ]; then
	144	# Done too late in Configure if hinted
	145	gccversion=`$cc --version \| sed 's/.(GCC) //`
	146	fi
	147	;;
12997c75	148	) ccversion=`lslpp -L \| grep 'C for AIX Compiler$' \| grep -v '\.msg\.[A-Za-z_]\.' \| awk '{print $2}'`
6b356c8e	149	case "$ccversion" in
8d4151d3	150	'') ccversion=`lslpp -L \| grep 'IBM C and C++ Compilers LUM$' \| awk '{print $2}'`
851f49a8	151	;;
	152	......*) # Ahhrgg, more than one C compiler installed
	153	first_cc_path=`which ${cc:-cc}`
	154	case "$first_cc_path" in
	155	vac)
	156	cc_type=vac ;;
	157	/usr/bin/cc) # Check the symlink
	158	if [ -h $first_cc_path ] ; then
	159	ls -l $first_cc_path > reflect
	160	if grep -i vac reflect >/dev/null 2>&1 ; then
	161	cc_type=vac
	162	fi
	163	rm -f reflect
	164	fi
	165	;;
	166	esac
	167	ccversion=`lslpp -L \| grep 'C for AIX Compiler$' \| grep -i $cc_type \| awk '{print $2}' \| head -1`
	168	;;
8d4151d3	169	esac
	170	case "$ccversion" in
	171	3.6.6.0)
	172	optimize='none'
	173	;;
6b356c8e	174	4.4.0.0\|4.4.0.1\|4.4.0.2)
b7a20417	175	cat >&4 <<EOF
	176	***
	177	*** This C compiler ($ccversion) is outdated.
	178	***
	179	*** Please upgrade to at least 4.4.0.3.
	180	***
	181	EOF
	182	;;
2973cfbe	183	5.0.0.0)
	184	cat >&4 <<EOF
	185	***
201c2286	186	*** This C compiler ($ccversion) is known to have too many optimizer
201c2286	187	*** bugs to compile a working Perl.
2973cfbe	188	***
201c2286	189	*** Consider upgrading your C compiler, or getting the GNU cc (gcc).
2973cfbe	190	***
201c2286	191	*** Cannot continue, aborting.
2973cfbe	192	EOF
201c2286	193	exit 1
2973cfbe	194	;;
72f70c99	195	5.0.1.0)
b7a20417	196	cat >&4 <<EOF
	197	***
	198	*** This C compiler ($ccversion) is known to have optimizer problems
	199	*** when compiling regcomp.c.
	200	***
	201	*** Disabling optimization for that file but consider upgrading
	202	*** your C compiler.
	203	***
	204	EOF
	205	regcomp_cflags='optimize='
6b356c8e	206	;;
6b356c8e	207	esac
4633a7c4	208	esac
5f9d9a17	209	# the required -bE:$installarchlib/CORE/perl.exp is added by
5f9d9a17	210	# libperl.U (Configure) later.
a0d0e21e	211
d002699e	212	case "$use64bitall" in
	213	$define\|true\|[yY]*) use64bitint="$define" ;;
	214	esac
	215
	216	case "$usemorebits" in
	217	$define\|true\|[yY]*) use64bitint="$define"; uselongdouble="$define" ;;
	218	esac
	219
	220	case $cc_type in
	221	vac\|xlc)
	222	case "$uselongdouble" in
	223	$define\|true\|[yY]*)
	224	ccflags="$ccflags -qlongdouble"
	225	libswanted="c128 $libswanted"
	226	;;
	227	esac
	228	esac
	229
444379fb	230	case "$cc" in
	231	gcc) ;;
	232	cc\|xlc) # cc should've been set by line 116 or so if empty.
	233	if test ! -x /usr/bin/$cc -a -x /usr/vac/bin/$cc; then
	234	case ":$PATH:" in
	235	:/usr/vac/bin:) ;;
61074b56	236	*) if test ! -x /QOpenSys/usr/bin/$cc; then
	237	# The /QOpenSys/usr/bin/$cc saves us if we are
	238	# building natively in OS/400 PASE.
e6604a4d	239	cat >&4 <<EOF
444379fb	240
	241	***
	242	*** You either implicitly or explicitly specified an IBM C compiler,
	243	*** but you do not seem to have one in /usr/bin, but you seem to have
	244	*** the VAC installed in /usr/vac, but you do not have the /usr/vac/bin
	245	*** in your PATH. I suggest adding that and retrying Configure.
	246	***
	247	EOF
61074b56	248	exit 1
61074b56	249	fi
444379fb	250	;;
	251	esac
	252	fi
	253	;;
	254	esac
	255
5cf1d1f1	256	case "$ldlibpthname" in
	257	'') ldlibpthname=LIBPATH ;;
	258	esac
	259
a0d0e21e	260	# The first 3 options would not be needed if dynamic libs. could be linked
a0d0e21e	261	# with the compiler instead of ld.
42793c05	262	# -bI:$(PERL_INC)/perl.exp Read the exported symbols from the perl binary
4e774c84	263	# -bE:$(BASEEXT).exp Export these symbols. This file contains only one
4e774c84	264	# symbol: boot_$(EXP) can it be auto-generated?
c07a80fd	265	case "$osvers" in
c07a80fd	266	3*)
6c79d5f6	267	lddlflags="$lddlflags -H512 -T512 -bhalt:4 -bM:SRE -bI:\$(PERL_INC)/perl.exp -bE:\$(BASEEXT).exp -e _nostart -lc"
c07a80fd	268	;;
c07a80fd	269	*)
39816196	270	lddlflags="$lddlflags -bhalt:4 -bM:SRE -bI:\$(PERL_INC)/perl.exp -bE:\$(BASEEXT).exp -bnoentry -lc"
b691c02f	271	;;
c07a80fd	272	esac
3427abbf	273	# AIX 4.2 (using latest patchlevels on 20001130) has a broken bind
	274	# library (getprotobyname and getprotobynumber are outversioned by
	275	# the same calls in libc, at least for xlc version 3...
	276	case "`oslevel`" in
765adc1d	277	4.2.1.*)
3427abbf	278	case "$ccversion" in # Don't know if needed for gcc
851f49a8	279	3.1.4.\|5.0.2.) # libswanted "bind ... c ..." => "... c bind ..."
3427abbf	280	set `echo X "$libswanted "\| sed -e 's/ bind\( .*\) \([cC]\) / \1 \2 bind /'`
	281	shift
	282	libswanted="$*"
	283	;;
	284	esac
	285	;;
	286	esac
52e1cb5e	287
104d25b7	288	# This script UU/usethreads.cbu will get 'called-back' by Configure
	289	# after it has prompted the user for whether to use threads.
	290	cat > UU/usethreads.cbu <<'EOCBU'
	291	case "$usethreads" in
	292	$define\|true\|[yY]*)
4e774c84	293	ccflags="$ccflags -DNEED_PTHREAD_INIT"
4e774c84	294	case "$cc" in
86c089c6	295	gcc)
836995da	296	ccflags="-D_THREAD_SAFE $ccflags"
836995da	297	echo "GCC $gccversion disabling some _r functions" >&4
86c089c6	298	case "$gccversion" in
	299	3*) d_drand48_r='undef'
	300	d_endgrent_r='undef'
	301	d_endpwent_r='undef'
	302	d_getgrent_r='undef'
	303	d_getpwent_r='undef'
	304	d_random_r='undef'
	305	d_srand48_r='undef'
	306	d_strerror_r='undef'
	307	;;
	308	esac
	309	;;
4e774c84	310	cc_r) ;;
4e774c84	311	cc\|xl[cC]_r)
bbc711f9	312	echo >&4 "Switching cc to cc_r because of POSIX threads."
bbc711f9	313	# xlc_r has been known to produce buggy code in AIX 4.3.2.
4e774c84	314	# (e.g. pragma/overload core dumps) Let's suspect xlC_r, too.
bbc711f9	315	# --jhi@iki.fi
bbc711f9	316	cc=cc_r
12c96c39	317
86c089c6	318	case "`oslevel`" in
	319	4.2.1.*) i_crypt='undef' ;;
	320	esac
4e774c84	321	;;
4e774c84	322	'')
bbc711f9	323	cc=cc_r
4e774c84	324	;;
	325	*)
	326	cat >&4 <<EOM
6b356c8e	327	*** For pthreads you should use the AIX C compiler cc_r.
	328	*** (now your compiler was set to '$cc')
	329	*** Cannot continue, aborting.
104d25b7	330	EOM
4e774c84	331	exit 1
104d25b7	332	;;
4e774c84	333	esac
4e774c84	334
c88be79f	335	# c_rify libswanted.
	336	set `echo X "$libswanted "\| sed -e 's/ \([cC]\) / \1_r /g'`
	337	shift
	338	libswanted="$*"
	339	# c_rify lddlflags.
	340	set `echo X "$lddlflags "\| sed -e 's/ \(-l[cC]\) / \1_r /g'`
	341	shift
	342	lddlflags="$*"
	343
	344	# Insert pthreads to libswanted, before any libc or libC.
db512b97	345	set `echo X "$libswanted "\| sed -e 's/ \([cC]_r\) / pthreads \1 /'`
c88be79f	346	shift
	347	libswanted="$*"
	348	# Insert pthreads to lddlflags, before any libc or libC.
db512b97	349	set `echo X "$lddlflags " \| sed -e 's/ \(-l[cC]_r\) / -lpthreads \1 /'`
c88be79f	350	shift
	351	lddlflags="$*"
	352
104d25b7	353	;;
	354	esac
	355	EOCBU
fa9667c9	356
8a647129	357	# This script UU/uselargefiles.cbu will get 'called-back' by Configure
bd9b35c9	358	# after it has prompted the user for whether to use large files.
8a647129	359	cat > UU/uselargefiles.cbu <<'EOCBU'
bd9b35c9	360	case "$uselargefiles" in
10cc9d2a	361	''\|$define\|true\|[yY]*)
21c7e20c	362	# Configure should take care of use64bitint and use64bitall being
	363	# defined before uselargefiles.cbu is consulted.
	364	if test X"$use64bitint:$quadtype" = X"$define:long" -o X"$use64bitall" = Xdefine; then
	365	# Keep these at the left margin.
	366	ccflags_uselargefiles="`getconf XBS5_LP64_OFF64_CFLAGS 2>/dev/null`"
	367	ldflags_uselargefiles="`getconf XBS5_LP64_OFF64_LDFLAGS 2>/dev/null`"
	368	else
9422c00b	369	# Keep these at the left margin.
45c9e83b	370	ccflags_uselargefiles="`getconf XBS5_ILP32_OFFBIG_CFLAGS 2>/dev/null`"
45c9e83b	371	ldflags_uselargefiles="`getconf XBS5_ILP32_OFFBIG_LDFLAGS 2>/dev/null`"
21c7e20c	372	fi
6b8eaf93	373	# _Somehow_ in AIX 4.3.1.0 the above getconf call manages to
	374	# insert(?) something to $ldflags so that later (in Configure) evaluating
	375	# $ldflags causes a newline after the '-b64' (the result of the getconf).
	376	# (nothing strange shows up in $ldflags even in hexdump;
d553adec	377	# so it may be something (a bug) in the shell, instead?)
6b8eaf93	378	# Try it out: just uncomment the below line and rerun Configure:
45c9e83b	379	# echo >&4 "AIX 4.3.1.0 $ldflags_uselargefiles mystery" ; exit 1
6b8eaf93	380	# Just don't ask me how AIX does it, I spent hours wondering.
45c9e83b	381	# Therefore the line re-evaluating ldflags_uselargefiles: it seems to fix
6b8eaf93	382	# the whatever it was that AIX managed to break. --jhi
45c9e83b	383	ldflags_uselargefiles="`echo $ldflags_uselargefiles`"
21c7e20c	384	if test X"$use64bitint:$quadtype" = X"$define:long" -o X"$use64bitall" = Xdefine; then
	385	# Keep this at the left margin.
	386	libswanted_uselargefiles="`getconf XBS5_LP64_OFF64_LIBS 2>/dev/null\|sed -e 's@^-l@@' -e 's@ -l@ @g`"
	387	else
9422c00b	388	# Keep this at the left margin.
45c9e83b	389	libswanted_uselargefiles="`getconf XBS5_ILP32_OFFBIG_LIBS 2>/dev/null\|sed -e 's@^-l@@' -e 's@ -l@ @g`"
21c7e20c	390	fi
45c9e83b	391	case "$ccflags_uselargefiles$ldflags_uselargefiles$libs_uselargefiles" in
bd9b35c9	392	'');;
45c9e83b	393	*) ccflags="$ccflags $ccflags_uselargefiles"
	394	ldflags="$ldflags $ldflags_uselargefiles"
	395	libswanted="$libswanted $libswanted_uselargefiles"
bd9b35c9	396	;;
bd9b35c9	397	esac
d553adec	398	case "$gccversion" in
d553adec	399	'') ;;
a2147dfe	400	*) # Remove xlc-spefific -qflags.
	401	ccflags="`echo $ccflags \| sed -e 's@ -q[^ ]@ @g' -e 's@^-q[^ ] @@g'`"
	402	ldflags="`echo $ldflags \| sed -e 's@ -q[^ ]@ @g' -e 's@^-q[^ ] @@g'`"
	403	# Move xld-spefific -bflags.
	404	ccflags="`echo $ccflags \| sed -e 's@ -b@ -Wl,-b@g'`"
	405	ldflags="`echo ' '$ldflags \| sed -e 's@ -b@ -Wl,-b@g'`"
	406	lddlflags="`echo ' '$lddlflags \| sed -e 's@ -b@ -Wl,-b@g'`"
	407	ld='gcc'
	408	echo >&4 "(using ccflags $ccflags)"
	409	echo >&4 "(using ldflags $ldflags)"
	410	echo >&4 "(using lddlflags $lddlflags)"
	411	;;
d553adec	412	esac
d553adec	413	;;
bd9b35c9	414	esac
bd9b35c9	415	EOCBU
6b8eaf93	416
10cc9d2a	417	# This script UU/use64bitint.cbu will get 'called-back' by Configure
de6124c8	418	# after it has prompted the user for whether to use 64 bit integers.
10cc9d2a	419	cat > UU/use64bitint.cbu <<'EOCBU'
10cc9d2a	420	case "$use64bitint" in
efeaa891	421	$define\|true\|[yY]*)
2d4389e4	422	case "`oslevel`" in
efeaa891	423	3.\|4.[012].)
efeaa891	424	cat >&4 <<EOM
2d4389e4	425	AIX `oslevel` does not support 64-bit interfaces.
19e194ad	426	You should upgrade to at least AIX 4.3.
efeaa891	427	EOM
	428	exit 1
	429	;;
	430	esac
19e194ad	431	;;
	432	esac
	433	EOCBU
	434
19e194ad	435	cat > UU/use64bitall.cbu <<'EOCBU'
de6124c8	436	# This script UU/use64bitall.cbu will get 'called-back' by Configure
de6124c8	437	# after it has prompted the user for whether to be maximally 64-bitty.
19e194ad	438	case "$use64bitall" in
	439	$define\|true\|[yY]*)
	440	case "`oslevel`" in
	441	3.\|4.[012].)
	442	cat >&4 <<EOM
	443	AIX `oslevel` does not support 64-bit interfaces.
	444	You should upgrade to at least AIX 4.3.
	445	EOM
	446	exit 1
	447	;;
	448	esac
	449	echo " "
	450	echo "Checking the CPU width of your hardware..." >&4
	451	$cat >size.c <<EOCP
	452	#include <stdio.h>
	453	#include <sys/systemcfg.h>
	454	int main (void)
	455	{
	456	printf("%d\n",_system_configuration.width);
	457	return(0);
	458	}
	459	EOCP
	460	set size
	461	if eval $compile_ok; then
9422c00b	462	qacpuwidth=`./size`
9422c00b	463	echo "You are running on $qacpuwidth bit hardware."
19e194ad	464	else
	465	dflt="32"
	466	echo " "
	467	echo "(I can't seem to compile the test program. Guessing...)"
	468	rp="What is the width of your CPU (in bits)?"
	469	. ./myread
9422c00b	470	qacpuwidth="$ans"
19e194ad	471	fi
19e194ad	472	$rm -f size.c size
9422c00b	473	case "$qacpuwidth" in
19e194ad	474	32*)
	475	cat >&4 <<EOM
	476	Bzzzt! At present, you can only perform a
	477	full 64-bit build on a 64-bit machine.
	478	EOM
	479	exit 1
	480	;;
	481	esac
9422c00b	482	qacflags="`getconf XBS5_LP64_OFF64_CFLAGS 2>/dev/null`"
9422c00b	483	qaldflags="`getconf XBS5_LP64_OFF64_LDFLAGS 2>/dev/null`"
19e194ad	484	# See jhi's comments above regarding this re-eval. I've
	485	# seen similar weirdness in the form of:
	486	#
	487	# 1506-173 (W) Option lm is not valid. Enter xlc for list of valid options.
	488	#
	489	# error messages from 'cc -E' invocation. Again, the offending
	490	# string is simply not detectable by any means. Since it doesn't
	491	# do any harm, I didn't pursue it. -- sh
9422c00b	492	qaldflags="`echo $qaldflags`"
9422c00b	493	qalibs="`getconf XBS5_LP64_OFF64_LIBS 2>/dev/null\|sed -e 's@^-l@@' -e 's@ -l@ @g`"
8a647129	494	# -q32 and -b32 may have been set by uselargefiles or user.
8a647129	495	# Remove them.
19e194ad	496	ccflags="`echo $ccflags \| sed -e 's@-q32@@'`"
	497	ldflags="`echo $ldflags \| sed -e 's@-b32@@'`"
	498	# Tell archiver to use large format. Unless we remove 'ar'
	499	# from 'trylist', the Configure script will just reset it to 'ar'
	500	# immediately prior to writing config.sh. This took me hours
	501	# to figure out.
bab3591f	502	trylist="`echo $trylist \| sed -e 's@^ar @@' -e 's@ ar @ @g' -e 's@ ar$@@'`"
19e194ad	503	ar="ar -X64"
19e194ad	504	nm_opt="-X64 $nm_opt"
9422c00b	505	# Note: Placing the 'qacflags' variable into the 'ldflags' string
3a7209f1	506	# is NOT a typo. ldflags is passed to the C compiler for final
19e194ad	507	# linking, and it wants -q64 (-b64 is for ld only!).
9422c00b	508	case "$qacflags$qaldflags$qalibs" in
19e194ad	509	'');;
9422c00b	510	*) ccflags="$ccflags $qacflags"
9422c00b	511	ldflags="$ldflags $qacflags"
3a7209f1	512	lddlflags="$qaldflags $lddlflags"
9422c00b	513	libswanted="$libswanted $qalibs"
19e194ad	514	;;
	515	esac
	516	case "$ccflags" in
	517	-DUSE_64_BIT_ALL) ;;
	518	*) ccflags="$ccflags -DUSE_64_BIT_ALL";;
	519	esac
	520	case "$archname64" in
	521	''\|64*) archname64=64all ;;
	522	esac
	523	longsize="8"
9422c00b	524	qacflags=''
	525	qaldflags=''
	526	qalibs=''
	527	qacpuwidth=''
efeaa891	528	;;
	529	esac
	530	EOCBU
5b877257	531
61d42ce4	532	if test $usenativedlopen = 'true'
61d42ce4	533	then
fd90a50d	534	ccflags="$ccflags -DUSE_NATIVE_DLOPEN"
	535	case "$cc" in
	536	gcc) ldflags="$ldflags -Wl,-brtl" ;;
	537	*) ldflags="$ldflags -brtl" ;;
	538	esac
61d42ce4	539	else
9d20a131	540	case `oslevel` in
	541	4.2.*) ;; # libC_r has broke gettimeofday
	542	*) # If the C++ libraries, libC and libC_r, are available we will
	543	# prefer them over the vanilla libc, because the libC contain
	544	# loadAndInit() and terminateAndUnload() which work correctly
	545	# with C++ statics while libc load() and unload() do not. See
	546	# ext/DynaLoader/dl_aix.xs. The C-to-C_r switch is done by
	547	# usethreads.cbu, if needed.
	548	if test -f /lib/libC.a -a X"`$cc -v 2>&1 \| grep gcc`" = X; then
	549	# Cify libswanted.
	550	set `echo X "$libswanted "\| sed -e 's/ c / C c /'`
	551	shift
	552	libswanted="$*"
	553	# Cify lddlflags.
	554	set `echo X "$lddlflags "\| sed -e 's/ -lc / -lC -lc /'`
	555	shift
	556	lddlflags="$*"
	557	fi
	558	esac
c88be79f	559	fi
4e774c84	560
522b859a	561	case "$PASE" in
	562	define)
	563	case "$prefix" in
	564	'') prefix=/QOpenSys/perl ;;
	565	esac
	566	cat >&4 <<EOF
	567
	568	***
	569	*** You seem to be compiling in AIX for the OS/400 PASE environment.
	570	*** I'm not going to use the AIX bind, nsl, and possible util libraries, then.
	571	*** I'm also not going to install perl as /usr/bin/perl.
	572	*** Perl will be installed under $prefix.
	573	*** For instructions how to install this build from AIX to PASE,
	574	*** see the file README.os400. Accept the "aix" for the question
	575	*** about "Operating system name".
	576	***
	577	EOF
	578	set `echo " $libswanted " \| sed -e 's@ bind @ @' -e 's@ nsl @ @' -e 's@ util @ @'`
	579	shift
	580	libswanted="$*"
	581	installusrbinperl="$undef"
abeab9d3	582
	583	# V5R1 doesn't have this (V5R2 does), without knowing
	584	# which one we have it's safer to be pessimistic.
	585	# Cwd will work fine even without fchdir(), but if
	586	# V5R1 tries to use code compiled assuming fchdir(),
	587	# lots of grief will issue forth from Cwd.
	588	case "$d_fchdir" in
	589	'') d_fchdir="$undef" ;;
	590	esac
522b859a	591	;;
	592	esac
	593
5b877257	594	# EOF