# hints/aix.sh # 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 # # 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 # 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. case "$usenativedlopen" in '') usenativedlopen='true' ;; 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 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 <&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 cc=${cc:-cc} 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' # These functions don't work like Perl expects them to. d_setregid='undef' 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*) 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. # 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? 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]*) 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*) ccflags="-D_THREAD_SAFE $ccflags" ;; cc_r) ;; xlc_r) ;; # we do not need the C++ compiler xlC_r) cc=xlc_r ;; '') cc=cc_r ;; *) esac # Insert pthreads to libswanted, before any libc or libC. set `echo X "$libswanted "| sed -e 's/ \([cC]\) / pthreads \1 /'` shift libswanted="$*" # Insert pthreads to lddlflags, before any libc or libC. set `echo X "$lddlflags " | sed -e 's/ \(-l[cC]\) / -lpthreads \1 /'` shift lddlflags="$*" ;; *) case "$cc" in xlc) ;; # we do not need the C++ compiler xlC) cc=xlc ;; *) esac ;; 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 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 # -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 case "$gccversion" in '') # Not using gcc. # Due to calling $cc without $cflags when linking some # binaries we need to hardwire $cc to the right mode. # The correct fix would be to have Makefile.SH not set # CLDFLAGS from $ldflags ... case "$use64bitall" in $define|true|[yY]*) cc="$cc -q64" ;; *) cc="$cc -q32" ;; esac # Some 32-bit getconfs will set ccflags to include -qlonglong # but that's no longer needed with an explicit -qextc99. ccflags="`echo $ccflags | sed -e 's@ -qlonglong@@'`" ;; *) # Remove xlc-specific -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 xlc-specific -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'`" lddlflags="`echo ' '$lddlflags | sed -e 's@ -G @ -Wl,-G @g'`" # Due to calling $cc without $cflags when linking some # binaries we need to hardwire $cc to the right mode. case "$use64bitall" in $define|true|[yY]*) cc="$cc -maix64" ld="$cc" ;; *) cc="$cc -maix32" ld="$cc" ;; esac echo >&4 "(using ccflags $ccflags)" echo >&4 "(using ldflags $ldflags)" echo >&4 "(using lddlflags $lddlflags)" ;; 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]*) echo " " echo "Checking the CPU width of your hardware..." >&4 $cat >size.c < #include 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 <&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 libswanted="$*" # Cify lddlflags. 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