This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Tru64, gcc -O3, datasize
[perl5.git] / hints / dec_osf.sh
1 # hints/dec_osf.sh
2
3 #       * If you want to debug perl or want to send a
4 #       stack trace for inclusion into an bug report, call
5 #       Configure with the additional argument  -Doptimize=-g2
6 #       or uncomment this assignment to "optimize":
7 #
8 #optimize=-g2
9 #
10 #       If you want both to optimise and debug with the DEC cc
11 #       you must have -g3, e.g. "-O4 -g3", and (re)run Configure.
12 #
13 #       * gcc can always have both -g and optimisation on.
14 #
15 #       * debugging optimised code, no matter what compiler
16 #       one is using, can be surprising and confusing because of
17 #       the optimisation tricks like code motion, code removal,
18 #       loop unrolling, and inlining. The source code and the
19 #       executable code simply do not agree any more while in
20 #       mid-execution, the optimiser only cares about the results.
21 #
22 #       * Configure will automatically add the often quoted
23 #       -DDEBUGGING for you if the -g is specified.
24 #
25 #       * There is even more optimisation available in the new
26 #       (GEM) DEC cc: -O5 and -fast. "man cc" will tell more about them.
27 #       The jury is still out whether either or neither help for Perl
28 #       and how much. Based on very quick testing, -fast boosts
29 #       raw data copy by about 5-15% (-fast brings in, among other
30 #       things, inlined, ahem, fast memcpy()), while on the other
31 #       hand searching things (index, m//, s///), seems to get slower.
32 #       Your mileage will vary.
33 #
34 #       * The -std is needed because the following compiled
35 #       without the -std and linked with -lm
36 #
37 #       #include <math.h>
38 #       #include <stdio.h>
39 #       int main(){short x=10,y=sqrt(x);printf("%d\n",y);}
40 #
41 #       will in Digital UNIX 3.* and 4.0b print 0 -- and in Digital
42 #       UNIX 4.0{,a} dump core: Floating point exception in the printf(),
43 #       the y has become a signaling NaN.
44 #
45 #       * Compilation warnings like:
46 #
47 #       "Undefined the ANSI standard macro ..."
48 #
49 #       can be ignored, at least while compiling the POSIX extension
50 #       and especially if using the sfio (the latter is not a standard
51 #       part of Perl, never mind if it says little to you).
52 #
53
54 # If using the DEC compiler we must find out the DEC compiler style:
55 # the style changed between Digital UNIX (aka DEC OSF/1) 3 and
56 # Digital UNIX 4. The old compiler was originally from Ultrix and
57 # the MIPS company, the new compiler is originally from the VAX world
58 # and it is called GEM. Many of the options we are going to use depend
59 # on the compiler style.
60
61 cc=${cc:-cc}
62
63 case "`$cc -v 2>&1 | grep cc`" in
64 *gcc*) isgcc=gcc ;;
65 esac
66
67 # do NOT, I repeat, *NOT* take away the leading tabs
68 # Configure Black Magic (TM)
69         # reset
70         _DEC_cc_style=
71 case "$isgcc" in
72 gcc)    if [ "X$gccversion" = "X" ]; then
73             # Done too late in Configure if hinted
74             gccversion=`$cc --version | sed 's/.*(GCC) *//'`
75         fi
76         set $gccversion
77         if test "$1" -lt 2 -o \( "$1" -eq 2 -a \( "$2" -lt 95 -o \( "$2" -eq 95 -a "$3" -lt 3 \) \) \); then
78             cat >&4 <<EOF
79
80 *** Your cc seems to be gcc and its version ($gccversion) seems to be
81 *** less than 2.95.3.  This is not a good idea since old versions of gcc
82 *** are known to produce buggy code when compiling Perl (and no doubt for
83 *** other programs, too).
84 ***
85 *** Therefore, I strongly suggest upgrading your gcc.  (Why don't you use
86 *** the vendor cc is also a good question.  It comes with the operating
87 *** system and produces good code.)
88
89 Cannot continue, aborting.
90
91 EOF
92             exit 1
93         fi
94         if test "$1" -eq 2 -a "$2" -eq 95 -a "$3" -le 2; then
95             cat >&4 <<EOF
96
97 *** Note that as of gcc 2.95.2 (19991024) and Perl 5.6.0 (March 2000)
98 *** if the said Perl is compiled with the said gcc the lib/sdbm test
99 *** may dump core (meaning that the SDBM_File extension is unusable).
100 *** As this core dump never happens with the vendor cc, this is most
101 *** probably a lingering bug in gcc.  Therefore unless you have a better
102 *** gcc installation you are still better off using the vendor cc.
103
104 Since you explicitly chose gcc, I assume that you know what are doing.
105
106 EOF
107         fi
108         ;;
109 *)      # compile something small: taint.c is fine for this.
110         ccversion=`cc -V | awk '/(Compaq|DEC) C/ {print $3}' | grep '^V'`
111         # the main point is the '-v' flag of 'cc'.
112         case "`cc -v -I. -c taint.c -o taint$$.o 2>&1`" in
113         */gemc_cc*)     # we have the new DEC GEM CC
114                         _DEC_cc_style=new
115                         ;;
116         *)              # we have the old MIPS CC
117                         _DEC_cc_style=old
118                         ;;
119         esac
120         # cleanup
121         rm -f taint$$.o
122         ;;
123 esac
124
125 # be nauseatingly ANSI
126 case "$isgcc" in
127 gcc)    ccflags="$ccflags -ansi"
128         ;;
129 *)      ccflags="$ccflags -std"
130         ;;
131 esac
132
133 # for gcc the Configure knows about the -fpic:
134 # position-independent code for dynamic loading
135
136 # we want optimisation
137
138 case "$optimize" in
139 '')     case "$isgcc" in
140         gcc)    optimize='-O3'                          ;;
141         *)      case "$_DEC_cc_style" in
142                 new)    optimize='-O4'                  ;;
143                 old)    optimize='-O2 -Olimit 3200'     ;;
144                 esac
145                 ccflags="$ccflags -D_INTRINSICS"
146                 ;;
147         esac
148         ;;
149 esac
150
151 ## Optimization limits
152 case "$isgcc" in
153 gcc) #  gcc 3.2.1 wants a lot of memory for -O3'ing toke.c
154 cat >try.c <<EOF
155 #include <sys/resource.h>
156
157 int main ()
158 {
159     struct rlimit rl;
160     int i = getrlimit (RLIMIT_DATA, &rl);
161     printf ("%d\n", rl.rlim_cur / (1024 * 1024));
162     } /* main */
163 EOF
164 $cc -o try $ccflags $ldflags try.c
165         maxdsiz=`./try`
166 rm -f try try.c core
167 if [ $maxdsiz -lt 256 ]; then
168     # less than 256 MB is probably not enough to optimize toke.c with gcc -O3
169     cat <<EOM >&4
170
171 Your process datasize is limited to $maxdsiz MB, which is (sadly) not
172 always enough to fully optimize some source code files of Perl,
173 at least 256 MB seems to be necessary as of Perl 5.8.0.  I'll try to
174 use a lower optimization level for those parts.  You could either try
175 using your shell's ulimit/limit/limits command to raise your datasize
176 (assuming the system-wide hard resource limits allow you to go higher),
177 or if you can't go higher and if you are a sysadmin, and you *do* want
178 the full optimization, you can tune the 'max_per_proc_data_size'
179 kernel parameter: see man sysconfigtab, and man sys_attrs_proc.
180
181 EOM
182 toke_cflags='optimize=-O2'
183     fi
184 ;;
185 esac
186
187 # we want dynamic fp rounding mode, and we want ieee exception semantics
188 case "$isgcc" in
189 gcc)    ;;
190 *)      case "$_DEC_cc_style" in
191         new)    ccflags="$ccflags -fprm d -ieee"        ;;
192         esac
193         ;;
194 esac
195
196 # Make glibpth agree with the compiler suite.  Note that /shlib
197 # is not here.  That's on purpose.  Even though that's where libc
198 # really lives from V4.0 on, the linker (and /sbin/loader) won't
199 # look there by default.  The sharable /sbin utilities were all
200 # built with "-Wl,-rpath,/shlib" to get around that.  This makes
201 # no attempt to figure out the additional location(s) searched by
202 # gcc, since not all versions of gcc are easily coerced into
203 # revealing that information.
204 glibpth="/usr/shlib /usr/ccs/lib /usr/lib/cmplrs/cc"
205 glibpth="$glibpth /usr/lib /usr/local/lib /var/shlib"
206
207 # dlopen() is in libc
208 libswanted="`echo $libswanted | sed -e 's/ dl / /'`"
209
210 # libPW contains nothing useful for perl
211 libswanted="`echo $libswanted | sed -e 's/ PW / /'`"
212
213 # libnet contains nothing useful for perl here, and doesn't work
214 libswanted="`echo $libswanted | sed -e 's/ net / /'`"
215
216 # libbsd contains nothing used by perl that is not already in libc
217 libswanted="`echo $libswanted | sed -e 's/ bsd / /'`"
218
219 # libc need not be separately listed
220 libswanted="`echo $libswanted | sed -e 's/ c / /'`"
221
222 # ndbm is already in libc
223 libswanted="`echo $libswanted | sed -e 's/ ndbm / /'`"
224
225 # the basic lddlflags used always
226 lddlflags='-shared -expect_unresolved "*"'
227
228 # Fancy compiler suites use optimising linker as well as compiler.
229 # <spider@Orb.Nashua.NH.US>
230 case "`uname -r`" in
231 *[123].*)       # old loader
232                 lddlflags="$lddlflags -O3"
233                 ;;
234 *)            if $test "X$optimize" = "X$undef"; then
235                       lddlflags="$lddlflags -msym"
236               else
237                   case "`/usr/sbin/sizer -v`" in
238                   *4.0D*)
239                       # QAR 56761: -O4 + .so may produce broken code,
240                       # fixed in 4.0E or better.
241                       ;;
242                   *)    
243                       lddlflags="$lddlflags $optimize"
244                       ;;
245                   esac
246                   # -msym: If using a sufficiently recent /sbin/loader,
247                   # keep the module symbols with the modules.
248                   lddlflags="$lddlflags -msym -std"
249               fi
250                 ;;
251 esac
252 # Yes, the above loses if gcc does not use the system linker.
253 # If that happens, let me know about it. <jhi@iki.fi>
254
255
256 # If debugging or (old systems and doing shared)
257 # then do not strip the lib, otherwise, strip.
258 # As noted above the -DDEBUGGING is added automagically by Configure if -g.
259 case "$optimize" in
260         *-g*) ;; # left intentionally blank
261 *)      case "`uname -r`" in
262         *[123].*)
263                 case "$useshrplib" in
264                 false|undef|'') lddlflags="$lddlflags -s"       ;;
265                 esac
266                 ;;
267         *) lddlflags="$lddlflags -s"
268                 ;;
269         esac
270         ;;
271 esac
272
273 #
274 # Make embedding in things like INN and Apache more memory friendly.
275 # Keep it overridable on the Configure command line, though, so that
276 # "-Uuseshrplib" prevents this default.
277 #
278
279 case "$_DEC_cc_style.$useshrplib" in
280         new.)   useshrplib="$define"    ;;
281 esac
282
283 # The EFF_ONLY_OK from <sys/access.h> is present but dysfunctional for
284 # [RWX]_OK as of Digital UNIX 4.0[A-D]?.  If and when this gets fixed,
285 # please adjust this appropriately.  See also pp_sys.c just before the
286 # emulate_eaccess().
287
288 # Fixed in V5.0A.
289 case "`/usr/sbin/sizer -v`" in
290 *5.0[A-Z]*|*5.[1-9]*|*[6-9].[0-9]*)
291         : ok
292         ;;
293 *)
294 # V5.0 or previous
295 pp_sys_cflags='ccflags="$ccflags -DNO_EFF_ONLY_OK"'
296         ;;
297 esac
298
299 # The off_t is already 8 bytes, so we do have largefileness.
300
301 cat > UU/usethreads.cbu <<'EOCBU'
302 # This script UU/usethreads.cbu will get 'called-back' by Configure 
303 # after it has prompted the user for whether to use threads.
304 case "$usethreads" in
305 $define|true|[yY]*)
306         # Threads interfaces changed with V4.0.
307         case "$isgcc" in
308         gcc)    ccflags="-D_REENTRANT $ccflags" ;;
309         *)  case "`uname -r`" in
310             *[123].*)   ccflags="-threads $ccflags" ;;
311             *)          ccflags="-pthread $ccflags" ;;
312             esac
313             ;;
314         esac    
315         case "`uname -r`" in
316         *[123].*) libswanted="$libswanted pthreads mach exc c_r" ;;
317         *)        libswanted="$libswanted pthread exc" ;;
318         esac
319
320         case "$usemymalloc" in
321         '')
322                 usemymalloc='n'
323                 ;;
324         esac
325         # These symbols are renamed in <time.h> so
326         # that the Configure hasproto doesn't see them.
327         d_asctime_r_proto="$define"
328         d_ctime_r_proto="$define"
329         d_gmtime_r_proto="$define"
330         d_localtime_r_proto="$define"
331         ;;
332 esac
333 EOCBU
334
335 cat > UU/uselongdouble.cbu <<'EOCBU'
336 # This script UU/uselongdouble.cbu will get 'called-back' by Configure 
337 # after it has prompted the user for whether to use long doubles.
338 case "$uselongdouble" in
339 $define|true|[yY]*)
340         case "`/usr/sbin/sizer -v`" in
341         *[1-4].0*)      cat >&4 <<EOF
342
343 ***
344 *** Sorry, you cannot use long doubles in pre-V5.0 releases of Tru64.
345 ***
346
347 Cannot continue, aborting.
348
349 EOF
350                 exit 1
351                 ;;
352         *)
353                 # Test whether libc's been fixed yet.
354                 cat >try.c <<\TRY
355 #include <stdio.h>
356 int main(int argc, char **argv)
357 {
358         unsigned long uvmax = ~0UL;
359         long double ld = uvmax + 0.0L;
360         char buf1[30], buf2[30];
361
362         (void) sprintf(buf1, "%lu", uvmax);
363         (void) sprintf(buf2, "%.0Lf", ld);
364         return strcmp(buf1, buf2) != 0;
365 }
366 TRY
367                 # Don't bother trying to work with Configure's idea of
368                 # cc and the various flags.  This might not work as-is
369                 # with gcc -- but we're testing libc, not the compiler.
370                 if cc -o try -std try.c && ./try
371                 then
372                         : ok
373                 else
374                         cat <<\UGLY >&4
375 !
376 Warning!  Your libc has not yet been patched so that its "%Lf" format for
377 printing long doubles shows all the significant digits.  You will get errors
378 in the t/op/numconvert test because of this.  (The data is still good
379 internally, and the "%e" format of printf() or sprintf() in perl will still
380 produce valid results.)  See README.tru64 for additional details.
381
382 Continuing anyway.
383 !
384 UGLY
385                 fi
386                 $rm -f try try.c
387         esac
388         ;;
389 esac
390 EOCBU
391
392 case "`/usr/sbin/sizer -v`" in
393 *[1-4].0*) d_modfl=undef ;; # must wait till 5.0
394 esac
395
396 # Keep that leading tab.
397         old_LD_LIBRARY_PATH=$LD_LIBRARY_PATH
398 for p in $loclibpth
399 do
400         if test -d $p; then
401             echo "Appending $p to LD_LIBRARY_PATH." >& 4
402             case "$LD_LIBRARY_PATH" in
403             '') LD_LIBRARY_PATH=$p                  ;;
404             *)  LD_LIBRARY_PATH=$LD_LIBRARY_PATH:$p ;;
405             esac
406         fi      
407 done
408 case "$LD_LIBRARY_PATH" in
409 "$old_LD_LIBRARY_PATH") ;;
410 *) echo "LD_LIBRARY_PATH is now $LD_LIBRARY_PATH." >& 4 ;;
411 esac
412
413 #
414 # Unset temporary variables no more needed.
415 #
416
417 unset _DEC_cc_style
418     
419 #
420 # History:
421 #
422 # perl5.005_51:
423 #
424 #       September-1998 Jarkko Hietaniemi <jhi@iki.fi>
425 #
426 #       * Added the -DNO_EFF_ONLY_OK flag ('use filetest;' support).
427 #
428 # perl5.004_57:
429 #
430 #       19-Dec-1997 Spider Boardman <spider@Orb.Nashua.NH.US>
431 #
432 #       * Newer Digital UNIX compilers enforce signaling for NaN without
433 #         -ieee.  Added -fprm d at the same time since it's friendlier for
434 #         embedding.
435 #
436 #       * Fixed the library search path to match cc, ld, and /sbin/loader.
437 #
438 #       * Default to building -Duseshrplib on newer systems.  -Uuseshrplib
439 #         still overrides.
440 #
441 #       * Fix -pthread additions for useshrplib.  ld has no -pthread option.
442 #
443 #
444 # perl5.004_04:
445 #
446 #       19-Sep-1997 Spider Boardman <spider@Orb.Nashua.NH.US>
447 #
448 #       * libnet on Digital UNIX is for JAVA, not for sockets.
449 #
450 #
451 # perl5.003_28:
452 #
453 #       22-Feb-1997 Jarkko Hietaniemi <jhi@iki.fi>
454 #
455 #       * Restructuring Spider's suggestions.
456 #
457 #       * Older Digital UNIXes cannot handle -Olimit ... for $lddlflags.
458 #       
459 #       * ld -s cannot be used in older Digital UNIXes when doing shared.
460 #
461 #
462 #       21-Feb-1997 Spider Boardman <spider@Orb.Nashua.NH.US>
463 #
464 #       * -hidden removed.
465 #       
466 #       * -DSTANDARD_C removed.
467 #
468 #       * -D_INTRINSICS added. (that -fast does not seem to buy much confirmed)
469 #
470 #       * odbm not in libc, only ndbm. Therefore dbm back to $libswanted.
471 #
472 #       * -msym for the newer runtime loaders.
473 #
474 #       * $optimize also in $lddflags.
475 #
476 #
477 # perl5.003_27:
478 #
479 #       18-Feb-1997 Jarkko Hietaniemi <jhi@iki.fi>
480 #
481 #       * unset _DEC_cc_style and more commentary on -std.
482 #
483 #
484 # perl5.003_26:
485 #
486 #       15-Feb-1997 Jarkko Hietaniemi <jhi@iki.fi>
487 #
488 #       * -std and -ansi.
489 #
490 #
491 # perl5.003_24:
492 #
493 #       30-Jan-1997 Jarkko Hietaniemi <jhi@iki.fi>
494 #
495 #       * Fixing the note on -DDEBUGGING.
496 #
497 #       * Note on -O5 -fast.
498 #
499 #
500 # perl5.003_23:
501 #
502 #       26-Jan-1997 Jarkko Hietaniemi <jhi@iki.fi>
503 #
504 #       * Notes on how to do both optimisation and debugging.
505 #
506 #
507 #       25-Jan-1997 Jarkko Hietaniemi <jhi@iki.fi>
508 #
509 #       * Remove unneeded libraries from $libswanted: PW, bsd, c, dbm
510 #
511 #       * Restructure the $lddlflags build.
512 #
513 #       * $optimize based on which compiler we have.
514 #
515 #
516 # perl5.003_22:
517 #
518 #       23-Jan-1997 Achim Bohnet <ach@rosat.mpe-garching.mpg.de>
519 #
520 #       * Added comments 'how to create a debugging version of perl'
521 #
522 #       * Fixed logic of this script to prevent stripping of shared
523 #         objects by the loader (see ld man page for -s) is debugging
524 #         is set via the -g switch.
525 #
526 #
527 #       21-Jan-1997 Achim Bohnet <ach@rosat.mpe-garching.mpg.de>
528 #
529 #       * now 'dl' is always removed from libswanted. Not only if
530 #         optimize is an empty string.
531 #        
532 #
533 #       17-Jan-1997 Achim Bohnet <ach@rosat.mpe-garching.mpg.de>
534 #
535 #       * Removed 'dl' from libswanted: When the FreePort binary
536 #         translator for Sun binaries is installed Configure concludes
537 #         that it should use libdl.x.yz.fpx.so :-(
538 #         Because the dlopen, dlclose,... calls are in the
539 #         C library it not necessary at all to check for the
540 #         dl library.  Therefore dl is removed from libswanted.
541 #       
542 #
543 #       1-Jan-1997 Achim Bohnet <ach@rosat.mpe-garching.mpg.de>
544 #       
545 #       * Set -Olimit to 3200 because perl_yylex.c got too big
546 #         for the optimizer.
547 #