X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/c93bd003f3b814a3f41e3ecac7b4aaf1167310fc..999ef43de9efd3b29844095afa7f71eb923f672f:/hints/dec_osf.sh diff --git a/hints/dec_osf.sh b/hints/dec_osf.sh index 87d3933..f0b7726 100644 --- a/hints/dec_osf.sh +++ b/hints/dec_osf.sh @@ -60,6 +60,42 @@ cc=${cc:-cc} +# Intentional leading tabs. + myosvers="`/usr/sbin/sizer -v 2>/dev/null || uname -r`" + unamer="`uname -r`" + +# Fancy compiler suites use optimising linker as well as compiler. +# +case "$unamer" in +*[123].*) # old loader + lddlflags="$lddlflags -O3" + ;; +*) if $test "X$optimize" = "X$undef"; then + lddlflags="$lddlflags -msym" + else + case "$myosvers" in + *4.0D*) + # QAR 56761: -O4 + .so may produce broken code, + # fixed in 4.0E or better. + ;; + *) + lddlflags="$lddlflags $optimize" + ;; + esac + # -msym: If using a sufficiently recent /sbin/loader, + # keep the module symbols with the modules. + lddlflags="$lddlflags -msym $_lddlflags_strict_ansi" + fi + ;; +esac +# Yes, the above loses if gcc does not use the system linker. +# If that happens, let me know about it. + +# Because there is no other handy way to recognize 3.X. +case "$unamer" in +*3.*) ccflags="$ccflags -DDEC_OSF1_3_X" ;; +esac + case "`$cc -v 2>&1 | grep cc`" in *gcc*) isgcc=gcc ;; esac @@ -69,19 +105,22 @@ esac # reset _DEC_cc_style= case "$isgcc" in -gcc) _gcc_version=`$cc --version 2>&1 | tr . ' '` - set $_gcc_version - if test "$1" -lt 2 -o \( "$1" -eq 2 -a \( "$2" -lt 95 -o \( "$2" -eq 95 -a "$3" -lt 2 \) \) \); then +gcc) if [ "X$gccversion" = "X" ]; then + # Done too late in Configure if hinted + gccversion=`$cc -dumpversion` + fi + set $gccversion + if test "$1" -lt 2 -o \( "$1" -eq 2 -a \( "$2" -lt 95 -o \( "$2" -eq 95 -a "$3" -lt 3 \) \) \); then cat >&4 <try.c <&1`" in + # the main point is the '-v' flag of 'cc'. + case "`cc -v -c try.c 2>&1`" in */gemc_cc*) # we have the new DEC GEM CC _DEC_cc_style=new ;; @@ -114,17 +158,43 @@ EOF _DEC_cc_style=old ;; esac - # cleanup - rm -f taint$$.o + # We need to figure out whether -c99 is a valid flag to use. + # If it is, we can use it for being nauseatingly C99 ANSI -- + # but even then the lddlflags needs to stay -std1. + # If it is not, we must use -std1 for both flags. + # + case "`cc -c99 try.c 2>&1`" in + *"-c99: Unknown flag"*) + _ccflags_strict_ansi="-std1" + ;; + *) _ccflags_strict_ansi="-c99" + ;; + esac + _lddlflags_strict_ansi="-std1" + # -no_ansi_alias because Perl code is not that strict + # (also gcc uses by default -fno-strict-aliasing). + case "$unamer" in + *[1234].*) ;; + *5.*) _ccflags_strict_ansi="$_ccflags_strict_ansi -no_ansi_alias" ;; + esac + # Cleanup. + rm -f try.c try.o ;; esac -# be nauseatingly ANSI -case "$isgcc" in -gcc) ccflags="$ccflags -ansi" - ;; -*) ccflags="$ccflags -std" - ;; +# Be nauseatingly ANSI +ccflags="$ccflags $_ccflags_strict_ansi" + +# g++ needs a lot of definitions to see the same set of +# prototypes from et alia as cxx/cc see. +# Note that we cannot define _XOPEN_SOURCE_EXTENDED or +# its moral equivalent, _XOPEN_SOURCE=500 (which would +# define a lot of the required prototypes for us), because +# the gcc-processed version of contains fatally +# conflicting prototypes for wait3(). The _SOCKADDR_LEN is +# needed to get struct sockaddr and struct sockaddr_in to align. +case "$cc" in +*g++*) ccflags="$ccflags -D_XOPEN_SOURCE -D_OSF_SOURCE -D_AES_SOURCE -D_BSD -D_POSIX_C_SOURCE=199309L -D_POSIX_PII_SOCKET -D_SOCKADDR_LEN" ;; esac # for gcc the Configure knows about the -fpic: @@ -138,16 +208,74 @@ case "$optimize" in *) case "$_DEC_cc_style" in new) optimize='-O4' ;; old) optimize='-O2 -Olimit 3200' ;; - esac + esac ccflags="$ccflags -D_INTRINSICS" ;; esac ;; esac -# we want dynamic fp rounding mode, and we want ieee exception semantics case "$isgcc" in gcc) ;; +*) case "$optimize" in + *-O*) # With both -O and -g, the -g must be -g3. + optimize="`echo $optimize | sed 's/-g[1-4]*/-g3/'`" + ;; + esac + ;; +esac + +## Optimization limits +case "$isgcc" in +gcc) # gcc 3.2.1 wants a lot of memory for -O3'ing toke.c +cat >try.c < +#include + +int main () +{ + struct rlimit rl; + int i = getrlimit (RLIMIT_DATA, &rl); + printf ("%d\n", rl.rlim_cur / (1024 * 1024)); + } /* main */ +EOF +$cc -o try $ccflags $ldflags try.c + maxdsiz=`./try` +rm -f try try.c core +if [ $maxdsiz -lt 256 ]; then + # less than 256 MB is probably not enough to optimize toke.c with gcc -O3 + cat <&4 + +Your process datasize is limited to $maxdsiz MB, which is (sadly) not +always enough to fully optimize some source code files of Perl, +at least 256 MB seems to be necessary as of Perl 5.8.0. I'll try to +use a lower optimization level for those parts. You could either try +using your shell's ulimit/limit/limits command to raise your datasize +(assuming the system-wide hard resource limits allow you to go higher), +or if you can't go higher and if you are a sysadmin, and you *do* want +the full optimization, you can tune the 'max_per_proc_data_size' +kernel parameter: see man sysconfigtab, and man sys_attrs_proc. + +EOM +toke_cflags='optimize=-O2' + fi +;; +esac + +# The patch 23787 +# http://perl5.git.perl.org/perl.git/commit/73cb726371990cd489597c4fee405a9815abf4da +# broke things for gcc (at least gcc 3.3) so that many of the pack() +# checksum tests for formats L, j, J, especially when combined +# with the < and > specifiers, started to fail if compiled with plain -O3. +case "$isgcc" in +gcc) +pp_pack_cflags='optimize="-O3 -fno-cse-skip-blocks"' +;; +esac + +# we want dynamic fp rounding mode, and we want ieee exception semantics +case "$isgcc" in +gcc) ccflags="$ccflags -mfp-rounding-mode=d -mieee" ;; *) case "$_DEC_cc_style" in new) ccflags="$ccflags -fprm d -ieee" ;; esac @@ -186,40 +314,12 @@ libswanted="`echo $libswanted | sed -e 's/ ndbm / /'`" # the basic lddlflags used always lddlflags='-shared -expect_unresolved "*"' -# Fancy compiler suites use optimising linker as well as compiler. -# -case "`uname -r`" in -*[123].*) # old loader - lddlflags="$lddlflags -O3" - ;; -*) if $test "X$optimize" = "X$undef"; then - lddlflags="$lddlflags -msym" - else - case "`/usr/sbin/sizer -v`" in - *4.0D*) - # QAR 56761: -O4 + .so may produce broken code, - # fixed in 4.0E or better. - ;; - *) - lddlflags="$lddlflags $optimize" - ;; - esac - # -msym: If using a sufficiently recent /sbin/loader, - # keep the module symbols with the modules. - lddlflags="$lddlflags -msym -std" - fi - ;; -esac -# Yes, the above loses if gcc does not use the system linker. -# If that happens, let me know about it. - - # If debugging or (old systems and doing shared) # then do not strip the lib, otherwise, strip. # As noted above the -DDEBUGGING is added automagically by Configure if -g. case "$optimize" in *-g*) ;; # left intentionally blank -*) case "`uname -r`" in +*) case "$unamer" in *[123].*) case "$useshrplib" in false|undef|'') lddlflags="$lddlflags -s" ;; @@ -227,8 +327,8 @@ case "$optimize" in ;; *) lddlflags="$lddlflags -s" ;; - esac - ;; + esac + ;; esac # @@ -247,7 +347,7 @@ esac # emulate_eaccess(). # Fixed in V5.0A. -case "`/usr/sbin/sizer -v`" in +case "$myosvers" in *5.0[A-Z]*|*5.[1-9]*|*[6-9].[0-9]*) : ok ;; @@ -260,20 +360,43 @@ esac # The off_t is already 8 bytes, so we do have largefileness. cat > UU/usethreads.cbu <<'EOCBU' -# This script UU/usethreads.cbu will get 'called-back' by Configure +# This script UU/usethreads.cbu will get 'called-back' by Configure # after it has prompted the user for whether to use threads. case "$usethreads" in $define|true|[yY]*) + # In Tru64 V5 (at least V5.1A, V5.1B) gcc (at least 3.2.2) + # cannot be used to compile a threaded Perl. + cat > pthread.c < +extern int foo; +EOF + $cc -c pthread.c 2> pthread.err + if egrep -q "unrecognized compiler|syntax error" pthread.err; then + cat >&4 < so + # that the Configure hasproto doesn't see them. + d_asctime_r_proto="$define" + d_ctime_r_proto="$define" + d_gmtime_r_proto="$define" + d_localtime_r_proto="$define" ;; esac EOCBU +# malloc wrap works +case "$usemallocwrap" in +'') usemallocwrap='define' ;; +esac + cat > UU/uselongdouble.cbu <<'EOCBU' -# This script UU/uselongdouble.cbu will get 'called-back' by Configure +# 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]*) - case "`/usr/sbin/sizer -v`" in + case "$myosvers" in *[1-4].0*) cat >&4 <try.c <<\TRY +#include +int main(int argc, char **argv) +{ + unsigned long uvmax = ~0UL; + long double ld = uvmax + 0.0L; + char buf1[30], buf2[30]; + + (void) sprintf(buf1, "%lu", uvmax); + (void) sprintf(buf2, "%.0Lf", ld); + return strcmp(buf1, buf2) != 0; +} +TRY + # Don't bother trying to work with Configure's idea of + # cc and the various flags. This might not work as-is + # with gcc -- but we're testing libc, not the compiler. + if cc -o try $_ccflags_strict_ansi try.c && ./try + then + : ok + else + cat <<\UGLY >&4 +! +Warning! Your libc has not yet been patched so that its "%Lf" format for +printing long doubles shows all the significant digits. You will get errors +in the t/op/numconvert test because of this. (The data is still good +internally, and the "%e" format of printf() or sprintf() in perl will still +produce valid results.) See README.tru64 for additional details. + +Continuing anyway. +! +UGLY + fi + $rm -f try try.c esac ;; esac EOCBU -case "`/usr/sbin/sizer -v`" in +case "$myosvers" in *[1-4].0*) d_modfl=undef ;; # must wait till 5.0 esac -case "$loclibpth" in -'') ;; -*) - needusrshlib='' - for p in $loclibpth - do - if test -n "`ls $p/libdb.so* 2>/dev/null`"; then - needusrshlib=yes - fi +# Keep that leading tab. + old_LD_LIBRARY_PATH=$LD_LIBRARY_PATH +for p in $loclibpth +do + if test -d $p; then echo "Appending $p to LD_LIBRARY_PATH." >& 4 case "$LD_LIBRARY_PATH" in '') LD_LIBRARY_PATH=$p ;; *) LD_LIBRARY_PATH=$LD_LIBRARY_PATH:$p ;; esac - done - echo "LD_LIBRARY_PATH is now $LD_LIBRARY_PATH." >& 4 - # This is evil but I can't think of a nice workaround: - # the /usr/shlib/libdb.so needs to be seen first, - # or running Configure will fail. - if test -n "$needusrshlib"; then - echo "Prepending /usr/shlib to loclibpth." >& 4 - loclibpth="/usr/shlib $loclibpth" - echo "loclibpth is now $loclibpth." >& 4 fi - ;; +done +case "$LD_LIBRARY_PATH" in +"$old_LD_LIBRARY_PATH") ;; +*) echo "LD_LIBRARY_PATH is now $LD_LIBRARY_PATH." >& 4 ;; +esac +case "$LD_LIBRARY_PATH" in +'') ;; +* ) export LD_LIBRARY_PATH ;; esac +# Enforce strict data. +case "$isgcc" in +gcc) ;; +*) # -trapuv poisons uninitialized stack with + # 0xfff58005fff58005 which is as a pointer a segmentation fault and + # as a floating point a signaling NaN. As integers/longs that causes + # no traps but at least it is not zero. + # -readonly_strings moves string constants into read-only section + # which hopefully means that modifying them leads into segmentation + # faults. + for i in -trapuv -readonly_strings + do + case "$ccflags" in + *$i*) ;; + *) ccflags="$ccflags $i" ;; + esac + done + ;; +esac + +# In Tru64 several slightly incompatible socket APIs are supported, +# which one applies is chosen with a set of defines: +# -D_SOCKADDR_LEN enables 4.4BSD and IPv6 interfaces +# -D_POSIX_PII_SOCKET enables socklen_t instead of size_t +for i in -D_SOCKADDR_LEN -D_POSIX_PII_SOCKET +do + case "$ccflags" in + *$i*) ;; + *) ccflags="$ccflags $i" ;; + esac +done +# For OSF/1 3.2, however, defining _SOCKADDR_LEN would be +# a bad idea since it breaks send() and recv(). +case "$ccflags" in +*DEC_OSF1_3_X*SOCKADDR_LEN*) + ccflags=`echo " $ccflags " | sed -e 's/ -D_SOCKADDR_LEN / /'` + ;; +esac + +# These are in libm, but seem broken (there are no protos in headers, +# or man pages, either) +d_fdim='undef' +d_fma='undef' +d_fmax='undef' +d_fmin='undef' +d_llrint='undef' +d_llround='undef' +d_lrint='undef' +d_lround='undef' +d_nan='undef' +d_nearbyint='undef' +d_round='undef' +d_scalbn='undef' +d_tgamma='undef' + # # Unset temporary variables no more needed. # unset _DEC_cc_style - + # # History: # @@ -385,14 +603,14 @@ unset _DEC_cc_style # * Restructuring Spider's suggestions. # # * Older Digital UNIXes cannot handle -Olimit ... for $lddlflags. -# +# # * ld -s cannot be used in older Digital UNIXes when doing shared. # # # 21-Feb-1997 Spider Boardman # # * -hidden removed. -# +# # * -DSTANDARD_C removed. # # * -D_INTRINSICS added. (that -fast does not seem to buy much confirmed) @@ -458,7 +676,7 @@ unset _DEC_cc_style # # * now 'dl' is always removed from libswanted. Not only if # optimize is an empty string. -# +# # # 17-Jan-1997 Achim Bohnet # @@ -468,10 +686,11 @@ unset _DEC_cc_style # Because the dlopen, dlclose,... calls are in the # C library it not necessary at all to check for the # dl library. Therefore dl is removed from libswanted. -# +# # # 1-Jan-1997 Achim Bohnet -# +# # * Set -Olimit to 3200 because perl_yylex.c got too big # for the optimizer. # +