# hints/dec_osf.sh # * If you want to debug perl or want to send a # stack trace for inclusion into an bug report, call # Configure with the additional argument -Doptimize=-g2 # or uncomment this assignment to "optimize": # #optimize=-g2 # # If you want both to optimise and debug with the DEC cc # you must have -g3, e.g. "-O4 -g3", and (re)run Configure. # # * gcc can always have both -g and optimisation on. # # * debugging optimised code, no matter what compiler # one is using, can be surprising and confusing because of # the optimisation tricks like code motion, code removal, # loop unrolling, and inlining. The source code and the # executable code simply do not agree any more while in # mid-execution, the optimiser only cares about the results. # # * Configure will automatically add the often quoted # -DDEBUGGING for you if the -g is specified. # # * There is even more optimisation available in the new # (GEM) DEC cc: -O5 and -fast. "man cc" will tell more about them. # The jury is still out whether either or neither help for Perl # and how much. Based on very quick testing, -fast boosts # raw data copy by about 5-15% (-fast brings in, among other # things, inlined, ahem, fast memcpy()), while on the other # hand searching things (index, m//, s///), seems to get slower. # Your mileage will vary. # # * The -std is needed because the following compiled # without the -std and linked with -lm # # #include # #include # int main(){short x=10,y=sqrt(x);printf("%d\n",y);} # # will in Digital UNIX 3.* and 4.0b print 0 -- and in Digital # UNIX 4.0{,a} dump core: Floating point exception in the printf(), # the y has become a signaling NaN. # # * Compilation warnings like: # # "Undefined the ANSI standard macro ..." # # can be ignored, at least while compiling the POSIX extension # and especially if using the sfio (the latter is not a standard # part of Perl, never mind if it says little to you). # # If using the DEC compiler we must find out the DEC compiler style: # the style changed between Digital UNIX (aka DEC OSF/1) 3 and # Digital UNIX 4. The old compiler was originally from Ultrix and # the MIPS company, the new compiler is originally from the VAX world # and it is called GEM. Many of the options we are going to use depend # on the compiler style. cc=${cc:-cc} case "`$cc -v 2>&1 | grep cc`" in *gcc*) isgcc=gcc ;; esac # do NOT, I repeat, *NOT* take away the leading tabs # Configure Black Magic (TM) # reset _DEC_cc_style= case "$isgcc" in gcc) if [ "X$gccversion" = "X" ]; then # Done too late in Configure if hinted gccversion=`$cc --version | sed 's/.*(GCC) *//'` 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 <&4 <&1`" in */gemc_cc*) # we have the new DEC GEM CC _DEC_cc_style=new ;; *) # we have the old MIPS CC _DEC_cc_style=old ;; esac # cleanup rm -f taint$$.o ;; esac # be nauseatingly ANSI case "$isgcc" in gcc) ccflags="$ccflags -ansi" ;; *) ccflags="$ccflags -std" ;; esac # for gcc the Configure knows about the -fpic: # position-independent code for dynamic loading # we want optimisation case "$optimize" in '') case "$isgcc" in gcc) optimize='-O3' ;; *) case "$_DEC_cc_style" in new) optimize='-O4' ;; old) optimize='-O2 -Olimit 3200' ;; esac ccflags="$ccflags -D_INTRINSICS" ;; esac ;; esac # we want dynamic fp rounding mode, and we want ieee exception semantics case "$isgcc" in gcc) ;; *) case "$_DEC_cc_style" in new) ccflags="$ccflags -fprm d -ieee" ;; esac ;; esac # Make glibpth agree with the compiler suite. Note that /shlib # is not here. That's on purpose. Even though that's where libc # really lives from V4.0 on, the linker (and /sbin/loader) won't # look there by default. The sharable /sbin utilities were all # built with "-Wl,-rpath,/shlib" to get around that. This makes # no attempt to figure out the additional location(s) searched by # gcc, since not all versions of gcc are easily coerced into # revealing that information. glibpth="/usr/shlib /usr/ccs/lib /usr/lib/cmplrs/cc" glibpth="$glibpth /usr/lib /usr/local/lib /var/shlib" # dlopen() is in libc libswanted="`echo $libswanted | sed -e 's/ dl / /'`" # libPW contains nothing useful for perl libswanted="`echo $libswanted | sed -e 's/ PW / /'`" # libnet contains nothing useful for perl here, and doesn't work libswanted="`echo $libswanted | sed -e 's/ net / /'`" # libbsd contains nothing used by perl that is not already in libc libswanted="`echo $libswanted | sed -e 's/ bsd / /'`" # libc need not be separately listed libswanted="`echo $libswanted | sed -e 's/ c / /'`" # ndbm is already in libc 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 *[123].*) case "$useshrplib" in false|undef|'') lddlflags="$lddlflags -s" ;; esac ;; *) lddlflags="$lddlflags -s" ;; esac ;; esac # # Make embedding in things like INN and Apache more memory friendly. # Keep it overridable on the Configure command line, though, so that # "-Uuseshrplib" prevents this default. # case "$_DEC_cc_style.$useshrplib" in new.) useshrplib="$define" ;; esac # The EFF_ONLY_OK from is present but dysfunctional for # [RWX]_OK as of Digital UNIX 4.0[A-D]?. If and when this gets fixed, # please adjust this appropriately. See also pp_sys.c just before the # emulate_eaccess(). # Fixed in V5.0A. case "`/usr/sbin/sizer -v`" in *5.0[A-Z]*|*5.[1-9]*|*[6-9].[0-9]*) : ok ;; *) # V5.0 or previous pp_sys_cflags='ccflags="$ccflags -DNO_EFF_ONLY_OK"' ;; 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 # after it has prompted the user for whether to use threads. case "$usethreads" in $define|true|[yY]*) # Threads interfaces changed with V4.0. case "$isgcc" in gcc) ccflags="-D_REENTRANT $ccflags" ;; *) case "`uname -r`" in *[123].*) ccflags="-threads $ccflags" ;; *) ccflags="-pthread $ccflags" ;; esac ;; esac case "`uname -r`" in *[123].*) libswanted="$libswanted pthreads mach exc c_r" ;; *) libswanted="$libswanted pthread exc" ;; esac case "$usemymalloc" in '') usemymalloc='n' ;; esac # These symbols are renamed in 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 cat > 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]*) case "`/usr/sbin/sizer -v`" 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 -std 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 *[1-4].0*) d_modfl=undef ;; # must wait till 5.0 esac # Keep those leading tabs. needusrshlib='' old_LD_LIBRARY_PATH=$LD_LIBRARY_PATH for p in $loclibpth do if test -n "`ls $p/libdb.so* 2>/dev/null`"; then needusrshlib=yes fi 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 fi done case "$LD_LIBRARY_PATH" in "$old_LD_LIBRARY_PATH") ;; *) echo "LD_LIBRARY_PATH is now $LD_LIBRARY_PATH." >& 4 ;; esac # 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 # # Unset temporary variables no more needed. # unset _DEC_cc_style # # History: # # perl5.005_51: # # September-1998 Jarkko Hietaniemi # # * Added the -DNO_EFF_ONLY_OK flag ('use filetest;' support). # # perl5.004_57: # # 19-Dec-1997 Spider Boardman # # * Newer Digital UNIX compilers enforce signaling for NaN without # -ieee. Added -fprm d at the same time since it's friendlier for # embedding. # # * Fixed the library search path to match cc, ld, and /sbin/loader. # # * Default to building -Duseshrplib on newer systems. -Uuseshrplib # still overrides. # # * Fix -pthread additions for useshrplib. ld has no -pthread option. # # # perl5.004_04: # # 19-Sep-1997 Spider Boardman # # * libnet on Digital UNIX is for JAVA, not for sockets. # # # perl5.003_28: # # 22-Feb-1997 Jarkko Hietaniemi # # * 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) # # * odbm not in libc, only ndbm. Therefore dbm back to $libswanted. # # * -msym for the newer runtime loaders. # # * $optimize also in $lddflags. # # # perl5.003_27: # # 18-Feb-1997 Jarkko Hietaniemi # # * unset _DEC_cc_style and more commentary on -std. # # # perl5.003_26: # # 15-Feb-1997 Jarkko Hietaniemi # # * -std and -ansi. # # # perl5.003_24: # # 30-Jan-1997 Jarkko Hietaniemi # # * Fixing the note on -DDEBUGGING. # # * Note on -O5 -fast. # # # perl5.003_23: # # 26-Jan-1997 Jarkko Hietaniemi # # * Notes on how to do both optimisation and debugging. # # # 25-Jan-1997 Jarkko Hietaniemi # # * Remove unneeded libraries from $libswanted: PW, bsd, c, dbm # # * Restructure the $lddlflags build. # # * $optimize based on which compiler we have. # # # perl5.003_22: # # 23-Jan-1997 Achim Bohnet # # * Added comments 'how to create a debugging version of perl' # # * Fixed logic of this script to prevent stripping of shared # objects by the loader (see ld man page for -s) is debugging # is set via the -g switch. # # # 21-Jan-1997 Achim Bohnet # # * now 'dl' is always removed from libswanted. Not only if # optimize is an empty string. # # # 17-Jan-1997 Achim Bohnet # # * Removed 'dl' from libswanted: When the FreePort binary # translator for Sun binaries is installed Configure concludes # that it should use libdl.x.yz.fpx.so :-( # 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. #