X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/d553adecd04300d132a718970d6b17b4663f3e32..6fa2dc60899234df7bde728354b58afa2779105e:/hints/aix.sh diff --git a/hints/aix.sh b/hints/aix.sh index c6a8c52..3c606c6 100644 --- a/hints/aix.sh +++ b/hints/aix.sh @@ -1,25 +1,16 @@ # hints/aix.sh -# AIX 3.x.x hints thanks to Wayne Scott -# AIX 4.1 hints thanks to Christopher Chan-Nui . -# AIX 4.1 pthreading by Christopher Chan-Nui and -# Jarkko Hietaniemi . -# AIX 4.3.x LP64 build by Steven Hirsch -# Merged on Mon Feb 6 10:22:35 EST 1995 by -# Andy Dougherty -# +# AIX 3 and AIX 4 are split off to aix_3.sh and aix_4.sh +# early Feb 2004 by H.Merijn Brand +# please read comments in there for historic questions. +# many now stripped here + # 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 @@ -43,23 +34,21 @@ d_setrgid='undef' d_setruid='undef' alignbytes=8 - case "$usemymalloc" in -'') usemymalloc='n' ;; -esac + '') usemymalloc='n' ;; + esac + +# malloc wrap works, but not in vac-5, see later +case "$usemallocwrap" in + '') usemallocwrap='define' ;; + 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 using nm for symbol extraction -case "$osvers" in - 3.*|4.1.*|4.2.*) - usenm='undef' - ;; - *) - usenm='true' - ;; -esac +case "$usenativedlopen" in + '') usenativedlopen='true' ;; + esac so="a" # AIX itself uses .o (libc.o) but we prefer compatibility @@ -72,52 +61,43 @@ dlext="so" # 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 <&4 <&4 <&4 </dev/null` +if [ $? != 0 ]; then + echo "You cannot build perl without the bos.adt.libm package installed" >&4 + exit + fi # uname -m output is too specific and not appropriate here case "$archname" in -'') archname="$osname" ;; -esac + '') 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" ;; +ccflags="$ccflags -D_ALL_SOURCE -D_ANSI_C_SOURCE -D_POSIX_SOURCE" +case "$cc" in + *gcc*) ;; + *) ccflags="$ccflags -qmaxmem=-1 -qnoansialias -qlanglvl=extc99" ;; esac - nm_opt='-B' - ;; -esac +nm_opt='-B' # These functions don't work like Perl expects them to. d_setregid='undef' @@ -126,68 +106,155 @@ d_setreuid='undef' # Changes for dynamic linking by Wayne Scott # # Tell perl which symbols to export for dynamic linking. +cccdlflags='none' # All AIX code is position independent + cc_type=xlc # do not export to config.sh case "$cc" in -*gcc*) ccdlflags='-Xlinker' ;; -esac + *gcc*) + cc_type=gcc + ccdlflags='-Xlinker' + if [ "X$gccversion" = "X" ]; then + # Done too late in Configure if hinted + gccversion=`$cc -dumpversion` + fi + ;; + + *) ccversion=`lslpp -ql -Ou vac.C | grep -v '^Path' | head -1 | awk '{print $1,$2}'` + case "$ccversion" in + '') ccversion=`lslpp -L | grep 'IBM C and C++ Compilers LUM$'` ;; + + *.*.*.*.*.*.*) # 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 | head -1` + ;; + + vac*.*.*.*) + cc_type=vac + ;; + esac + + ccversion=`echo "$ccversion" | awk '{print $2}'` + # Redbooks state AIX-5 only supports vac-5.0.2.0 and up + case "$ccversion" in + 5*) usemallocwrap='n' ;; # panic in miniperl + esac + ;; + esac + # the required -bE:$installarchlib/CORE/perl.exp is added by # libperl.U (Configure) later. -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 -b noentry -lc" - ;; -esac +if test $usenativedlopen = 'true' ; then + lddlflags="$lddlflags -bhalt:4 -G -bI:\$(PERL_INC)/perl.exp -bE:\$(BASEEXT).exp -bnoentry -lc -lm" +else + lddlflags="$lddlflags -bhalt:4 -bM:SRE -bI:\$(PERL_INC)/perl.exp -bE:\$(BASEEXT).exp -bnoentry -lc" + fi + +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" + lddlflags=`echo "$lddlflags " | sed -e 's/ -lc / -lc128 -lc /'` + ;; + 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 < UU/usethreads.cbu <<'EOCBU' case "$usethreads" in -$define|true|[yY]*) + $define|true|[yY]*) + 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_setgrent_r='undef' + d_setpwent_r='undef' + d_srand48_r='undef' + d_srandom_r='undef' + d_strerror_r='undef' + ccflags="$ccflags -DNEED_PTHREAD_INIT" case "$cc" in - gcc) ;; - 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 - ;; - '') - cc=cc_r - ;; - *) - cat >&4 < UU/uselargefiles.cbu <<'EOCBU' case "$uselargefiles" in -''|$define|true|[yY]*) + ''|$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_largefiles="`getconf XBS5_ILP32_OFFBIG_CFLAGS 2>/dev/null`" -ldflags_largefiles="`getconf XBS5_ILP32_OFFBIG_LDFLAGS 2>/dev/null`" - # _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_largefiles mystery" ; exit 1 - # Just don't ask me how AIX does it, I spent hours wondering. - # Therefore the line re-evaluating ldflags_largefiles: it seems to fix - # the whatever it was that AIX managed to break. --jhi - ldflags_largefiles="`echo $ldflags_largefiles`" +ccflags_uselargefiles="`getconf XBS5_ILP32_OFFBIG_CFLAGS 2>/dev/null`" +ldflags_uselargefiles="`getconf XBS5_ILP32_OFFBIG_LDFLAGS 2>/dev/null`" + fi + if test X"$use64bitint:$quadtype" = X"$define:long" -o X"$use64bitall" = Xdefine; then # Keep this at the left margin. -libswanted_largefiles="`getconf XBS5_ILP32_OFFBIG_LIBS 2>/dev/null|sed -e 's@^-l@@' -e 's@ -l@ @g`" - case "$ccflags_largefiles$ldflags_largefiles$libs_largefiles" in - '');; - *) ccflags="$ccflags $ccflags_largefiles" - ldflags="$ldflags $ldflags_largefiles" - libswanted="$libswanted $libswanted_largefiles" - ;; - esac - case "$gccversion" in - '') ;; - *) - cat >&4 <&4 "(using ccflags $ccflags)" - echo >&4 "(using ldflags $ldflags)" - ;; - esac - ;; -esac -EOCBU + # -bmaxdata:0x80000000 + # - This increases the size of heap memory available to perl. + # Default is 256 MB, which sounds large but caused a software + # vendor problems. So this sets heap to 2 GB maximum. Anything + # higher and you'd want to consider 64 bit perl. + # - NOTE however, that setting this in 64bit mode will limit your + # amount of available memory to 2GB, so we set this only in + # 32bit mode to avoid future problems a la "should be enough + # for everyone" ... + # + case "$use64bitall" in + $define|true|[yY]*) + : + ;; + *) + ldflags="$ldflags -bmaxdata:0x80000000" + ;; + esac -# 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 <&4 "(using ccflags $ccflags)" + echo >&4 "(using ldflags $ldflags)" + echo >&4 "(using lddlflags $lddlflags)" ;; esac - ;; -esac + ;; + esac EOCBU cat > UU/use64bitall.cbu <<'EOCBU' -# This script UU/use64bitall.cbu will get 'called-back' by Configure +# 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 <&4 - $cat >size.c <&4 + $cat >size.c < #include int main (void) { - printf("%d\n",_system_configuration.width); - return(0); -} + 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" + 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 + $rm -f size.c size + + case "$qacpuwidth" in 32*) cat >&4 < UU/uselongdouble.cbu <<'EOCBU' -# This script UU/uselongdouble.cbu will get 'called-back' by Configure -# after it has prompted the user for whether to use long doubles. -case "$uselongdouble" in -$define|true|[yY]*) - ccflags="$ccflags -qlongdouble" - # The explicit cc128, xlc128, xlC128 are not needed, - # the -qlongdouble should do the trick. --jhi - d_Gconvert='sprintf((b),"%.*llg",(n),(x))' + longsize="8" + qacflags='' + qaldflags='' + qalibs='' + qacpuwidth='' ;; -esac + esac EOCBU -# 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 +if test $usenativedlopen = 'true' ; then + ccflags="$ccflags -DUSE_NATIVE_DLOPEN" + # -brtl Enables a binary to use run time linking + # -bdynamic When used with -brtl, tells linker to search for + # ".so"-suffix libraries as well as ".a" suffix + # libraries. AIX allows both .so and .a libraries to + # contain dynamic shared objects. + case "$cc" in + *gcc*) ldflags="$ldflags -Wl,-brtl -Wl,-bdynamic" ;; + *) ldflags="$ldflags -brtl -bdynamic" ;; + esac +elif test -f /lib/libC.a -a X"`$cc -v 2>&1 | grep gcc`" = X; then + # 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. + # Cify libswanted. set `echo X "$libswanted "| sed -e 's/ c / C c /'` shift @@ -395,6 +493,206 @@ if test -f /lib/libC.a -a X"`$cc -v 2>&1 | grep gcc`" = X; then set `echo X "$lddlflags "| sed -e 's/ -lc / -lC -lc /'` shift lddlflags="$*" + fi + +case "$PASE" in + define) + case "$prefix" in + '') prefix=/QOpenSys/perl ;; + esac + cat >&4 < +# * The 128-bit implementation differs from the IEEE standard for long double +# in the following ways: +# * Supports only round-to-nearest mode. If the application changes +# the rounding mode, results are undefined. +# * Does not fully support the IEEE special numbers NaN and INF. +# * Does not support IEEE status flags for overflow, underflow, +# and other conditions. These flags have no meaning for the 128-bit +# long double inplementation. +# * The 128-bit long double data type does not support the following math +# APIs: atanhl, cbrtl, copysignl, exp2l, expm1l, fdiml, fmal, fmaxl, +# fminl, hypotl, ilogbl, llrintl, llroundl, log1pl, log2l, logbl, +# lrintl, lroundl, nanl, nearbyintl, nextafterl, nexttoward, +# nexttowardf, nexttowardl, remainderl, remquol, rintl, roundl, +# scalblnl, scalbnl, tgammal, and truncl. +# * The representation of 128-bit long double numbers means that the +# following macros required by standard C in the values.h file do not +# have clear meaning: +# * Number of bits in the mantissa (LDBL_MANT_DIG) +# * Epsilon (LBDL_EPSILON) +# * Maximum representable finite value (LDBL_MAX) +# +# +# The missing math functions affect the POSIX extension math interfaces. + +case "$uselongdouble" in +'') + echo "Checking if your infinity is working with long doubles..." >&4 + cat > inf$$.c < +#include +int main() { + long double inf = INFINITY; + long double one = 1.0L; + printf("%Lg\n", inf + one); +} +EOF + $cc -qlongdouble -o inf$$ inf$$.c -lm + case `./inf$$` in + INF) echo "Your infinity is working correctly with long doubles." >&4 ;; + *) # NaNQ (or anything else than INF) + echo " " + echo "Your infinity is broken, I suggest disabling long doubles." >&4 + rp="Disable long doubles?" + dflt="y" + . UU/myread + case "$ans" in + [Yy]*) + echo "Okay, disabling long doubles." >&4 + uselongdouble="$undef" + ccflags=`echo " $ccflags " | sed -e 's/ -qlongdouble / /'` + libswanted=`echo " $libswanted " | sed -e 's/ c128/ /'` + lddlflags=`echo " $lddlflags " | sed -e 's/ -lc128 / /'` + ;; + *) + echo "Okay, keeping long doubles enabled." >&4 + ;; + esac + ;; + esac + rm -f inf$$.c inf$$ + ;; +esac + +# Some releases (and patch levels) of AIX have a broken powl(). +pp_cflags='' +case "$uselongdouble" in +define) + echo "Checking if your powl() is broken..." >&4 + cat > powl$$.c < +#include +int main() { + printf("%Lg\n", powl(-3.0L, 2.0L)); +} +EOF + case "$gccversion" in + '') $cc -qlongdouble -o powl$$ powl$$.c -lm ;; + *) $cc -o powl$$ powl$$.c -lm ;; + esac + case `./powl$$` in + 9) echo "Your powl() is working correctly." >&4 ;; + *) + echo "Your powl() is broken, will use a workaround." >&4 + pp_cflags='ccflags="$ccflags -DHAS_AIX_POWL_NEG_BASE_BUG"' + ;; + esac + rm -f powl$$.c powl$$ + ;; +esac + +# Some releases of AIX cc/xlc a broken fmodl(), but -q64 seems to help. +case "$gccversion" in +'') case "$uselongdouble" in + define) + case "$ccflags" in + *-q64*) ;; + *) echo "Checking if your fmodl() is broken..." >&4 + cat > fmodl$$.c < +#include +int main() { + printf("%ld\n", (long)fmodl(powl(2, 31), (long double)4294967295)); +} +EOF + $cc -qlongdouble -o fmodl$$ fmodl$$.c -lm + case `./fmodl$$` in + 2147483648) echo "Your fmodl() is working correctly." >&4 ;; + *) echo "Your fmodl() is broken, will try with -q64..." >&4 + $cc -q64 -qlongdouble -o fmodl$$ fmodl$$.c -lm + case `./fmodl$$` in + 2147483648) + echo "The -q64 did the trick, will use it." >& 4 + ccflags="`echo $ccflags | sed -e 's@-q32@@g'`" + ldflags="`echo $ldflags | sed -e 's@-q32@@g'`" + ccflags="$ccflags -q64" + ldflags="$ldflags -q64" + ;; + *) echo "Not even the -q64 worked. I'm disabling long doubles." >&4 + echo "And you should have stern talk with your IBM rep." >&4 + uselongdouble="$undef" + ccflags=`echo " $ccflags " | sed -e 's/ -qlongdouble / /'` + libswanted=`echo " $libswanted " | sed -e 's/ c128/ /'` + lddlflags=`echo " $lddlflags " | sed -e 's/ -lc128 / /'` + ;; + esac # second fmodl$$ + ;; + esac # first fmodl$$ + ;; + esac # Checking if ... + ;; + esac # uselongdouble + rm -f fmodl$$.c fmodl$$ + ;; +esac # not gcc + + # EOF