This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Merge branch 'Add script_run feature' into blead
[perl5.git] / hints / dec_osf.sh
index 336e0ef..f0b7726 100644 (file)
 
 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.
+# <spider@Orb.Nashua.NH.US>
+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. <jhi@iki.fi>
+
+# 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
@@ -71,7 +107,7 @@ esac
 case "$isgcc" in
 gcc)   if [ "X$gccversion" = "X" ]; then
            # Done too late in Configure if hinted
-           gccversion=`$cc --version | sed 's/.*(GCC) *//'`
+           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
@@ -113,8 +149,8 @@ EOF
 int main() { return 0; }
 EOF
        ccversion=`cc -V | awk '/(Compaq|DEC) C/ {print $3}' | grep '^V'`
-       # the main point is the '-v' flag of 'cc'.
-               case "`cc -v -c try.c 2>&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
                        ;;
@@ -127,32 +163,20 @@ EOF
        # 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
+       case "`cc -c99 try.c 2>&1`" in
        *"-c99: Unknown flag"*)
                _ccflags_strict_ansi="-std1"
                ;;
-       *)      # However, use the -c99 only if compiling for
-               # -DPERL_MEM_LOG, where the C99 feature __func__
-               # is useful to have.  Otherwise use the good old
-               # -std1 so that we stay C89 strict, which the goal
-               # of the Perl C code base (no //, no code between
-               # declarations, etc).  Moreover, the Tru64 cc is
-               # not fully C99, and most probably never will be.
-               #
-               # The -DPERL_MEM_LOG can be either in ccflags
-               # (if using an old config.sh) or in the command line
-               # (which has been stowed away in UU/cmdline.opt).
-               #
-               case "$ccflags `cat UU/cmdline.opt`" in
-               *-DPERL_MEM_LOG*)       _ccflags_strict_ansi="-c99"  ;;
-               *)                      _ccflags_strict_ansi="-std1" ;;
-               esac
+       *)      _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).
-       _ccflags_strict_ansi="$_ccflags_strict_ansi -no_ansi_alias"
+       case "$unamer" in
+       *[1234].*) ;;
+       *5.*)   _ccflags_strict_ansi="$_ccflags_strict_ansi -no_ansi_alias" ;;
+       esac
        # Cleanup.
        rm -f try.c try.o
        ;;
@@ -167,9 +191,10 @@ ccflags="$ccflags $_ccflags_strict_ansi"
 # its moral equivalent, _XOPEN_SOURCE=500 (which would
 # define a lot of the required prototypes for us), because
 # the gcc-processed version of <sys/wait.h> contains fatally
-# conflicting prototypes for wait3().
+# 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" ;;
+*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:
@@ -183,7 +208,7 @@ case "$optimize" in
        *)      case "$_DEC_cc_style" in
                new)    optimize='-O4'                  ;;
                old)    optimize='-O2 -Olimit 3200'     ;;
-               esac
+               esac
                ccflags="$ccflags -D_INTRINSICS"
                ;;
        esac
@@ -238,7 +263,7 @@ toke_cflags='optimize=-O2'
 esac
 
 # The patch 23787
-# http://public.activestate.com/cgi-bin/perlbrowse?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.
@@ -250,7 +275,7 @@ esac
 
 # we want dynamic fp rounding mode, and we want ieee exception semantics
 case "$isgcc" in
-gcc)   ;;
+gcc)   ccflags="$ccflags -mfp-rounding-mode=d -mieee" ;;
 *)     case "$_DEC_cc_style" in
        new)    ccflags="$ccflags -fprm d -ieee"        ;;
        esac
@@ -289,47 +314,12 @@ libswanted="`echo $libswanted | sed -e 's/ ndbm / /'`"
 # the basic lddlflags used always
 lddlflags='-shared -expect_unresolved "*"'
 
-# Intentional leading tab.
-       myosvers="`/usr/sbin/sizer -v 2>/dev/null || uname -r`"
-
-# Fancy compiler suites use optimising linker as well as compiler.
-# <spider@Orb.Nashua.NH.US>
-case "`uname -r`" 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. <jhi@iki.fi>
-
-# Because there is no other handy way to recognize 3.X.
-case "`uname -r`" in
-*3.*)  ccflags="$ccflags -DDEC_OSF1_3_X" ;;
-esac
-
 # 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"       ;;
@@ -337,8 +327,8 @@ case "$optimize" in
                ;;
         *) lddlflags="$lddlflags -s"
                ;;
-       esac
-       ;;
+       esac
+       ;;
 esac
 
 #
@@ -370,7 +360,7 @@ 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]*)
@@ -378,7 +368,7 @@ $define|true|[yY]*)
        # cannot be used to compile a threaded Perl.
        cat > pthread.c <<EOF
 #include <pthread.h>
-extern int foo;        
+extern int foo;
 EOF
        $cc -c pthread.c 2> pthread.err
        if egrep -q "unrecognized compiler|syntax error" pthread.err; then
@@ -400,13 +390,13 @@ EOF
        gcc)
            ccflags="-D_REENTRANT $ccflags"
            ;;
-       *)  case "`uname -r`" in
+       *)  case "$unamer" in
            *[123].*)   ccflags="-threads $ccflags" ;;
            *)          ccflags="-pthread $ccflags" ;;
            esac
            ;;
-       esac    
-       case "`uname -r`" in
+       esac
+       case "$unamer" in
        *[123].*) libswanted="$libswanted pthreads mach exc c_r" ;;
        *)        libswanted="$libswanted pthread exc" ;;
        esac
@@ -432,7 +422,7 @@ case "$usemallocwrap" in
 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]*)
@@ -502,7 +492,7 @@ do
            '') LD_LIBRARY_PATH=$p                  ;;
            *)  LD_LIBRARY_PATH=$LD_LIBRARY_PATH:$p ;;
            esac
-       fi      
+       fi
 done
 case "$LD_LIBRARY_PATH" in
 "$old_LD_LIBRARY_PATH") ;;
@@ -513,12 +503,67 @@ 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:
 #
@@ -558,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 <spider@Orb.Nashua.NH.US>
 #
 #      * -hidden removed.
-#      
+#
 #      * -DSTANDARD_C removed.
 #
 #      * -D_INTRINSICS added. (that -fast does not seem to buy much confirmed)
@@ -631,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 <ach@rosat.mpe-garching.mpg.de>
 #
@@ -641,10 +686,10 @@ 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 <ach@rosat.mpe-garching.mpg.de>
-#      
+#
 #      * Set -Olimit to 3200 because perl_yylex.c got too big
 #        for the optimizer.
 #