This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Retract #14251 (the op slab allocator from perlio)
[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)    _gcc_version=`$cc --version 2>&1 | tr . ' '`
73         set $_gcc_version
74         if test "$1" -lt 2 -o \( "$1" -eq 2 -a \( "$2" -lt 95 -o \( "$2" -eq 95 -a "$3" -lt 2 \) \) \); then
75             cat >&4 <<EOF
76
77 *** Your cc seems to be gcc and its version ($_gcc_version) seems to be
78 *** less than 2.95.2.  This is not a good idea since old versions of gcc
79 *** are known to produce buggy code when compiling Perl (and no doubt for
80 *** other programs, too).
81 ***
82 *** Therefore, I strongly suggest upgrading your gcc.  (Why don't you use
83 *** the vendor cc is also a good question.  It comes with the operating
84 *** system and produces good code.)
85
86 Cannot continue, aborting.
87
88 EOF
89             exit 1
90         fi
91         if test "$1" -eq 2 -a "$2" -eq 95 -a "$3" -le 2; then
92             cat >&4 <<EOF
93
94 *** Note that as of gcc 2.95.2 (19991024) and Perl 5.6.0 (March 2000)
95 *** if the said Perl is compiled with the said gcc the lib/sdbm test
96 *** may dump core (meaning that the SDBM_File extension is unusable).
97 *** As this core dump never happens with the vendor cc, this is most
98 *** probably a lingering bug in gcc.  Therefore unless you have a better
99 *** gcc installation you are still better off using the vendor cc.
100
101 Since you explicitly chose gcc, I assume that you know what are doing.
102
103 EOF
104         fi
105         ;;
106 *)      # compile something small: taint.c is fine for this.
107         ccversion=`cc -V | awk '/(Compaq|DEC) C/ {print $3}' | grep '^V'`
108         # the main point is the '-v' flag of 'cc'.
109         case "`cc -v -I. -c taint.c -o taint$$.o 2>&1`" in
110         */gemc_cc*)     # we have the new DEC GEM CC
111                         _DEC_cc_style=new
112                         ;;
113         *)              # we have the old MIPS CC
114                         _DEC_cc_style=old
115                         ;;
116         esac
117         # cleanup
118         rm -f taint$$.o
119         ;;
120 esac
121
122 # be nauseatingly ANSI
123 case "$isgcc" in
124 gcc)    ccflags="$ccflags -ansi"
125         ;;
126 *)      ccflags="$ccflags -std"
127         ;;
128 esac
129
130 # for gcc the Configure knows about the -fpic:
131 # position-independent code for dynamic loading
132
133 # we want optimisation
134
135 case "$optimize" in
136 '')     case "$isgcc" in
137         gcc)    optimize='-O3'                          ;;
138         *)      case "$_DEC_cc_style" in
139                 new)    optimize='-O4'                  ;;
140                 old)    optimize='-O2 -Olimit 3200'     ;;
141                 esac
142                 ccflags="$ccflags -D_INTRINSICS"
143                 ;;
144         esac
145         ;;
146 esac
147
148 # we want dynamic fp rounding mode, and we want ieee exception semantics
149 case "$isgcc" in
150 gcc)    ;;
151 *)      case "$_DEC_cc_style" in
152         new)    ccflags="$ccflags -fprm d -ieee"        ;;
153         esac
154         ;;
155 esac
156
157 # Make glibpth agree with the compiler suite.  Note that /shlib
158 # is not here.  That's on purpose.  Even though that's where libc
159 # really lives from V4.0 on, the linker (and /sbin/loader) won't
160 # look there by default.  The sharable /sbin utilities were all
161 # built with "-Wl,-rpath,/shlib" to get around that.  This makes
162 # no attempt to figure out the additional location(s) searched by
163 # gcc, since not all versions of gcc are easily coerced into
164 # revealing that information.
165 glibpth="/usr/shlib /usr/ccs/lib /usr/lib/cmplrs/cc"
166 glibpth="$glibpth /usr/lib /usr/local/lib /var/shlib"
167
168 # dlopen() is in libc
169 libswanted="`echo $libswanted | sed -e 's/ dl / /'`"
170
171 # libPW contains nothing useful for perl
172 libswanted="`echo $libswanted | sed -e 's/ PW / /'`"
173
174 # libnet contains nothing useful for perl here, and doesn't work
175 libswanted="`echo $libswanted | sed -e 's/ net / /'`"
176
177 # libbsd contains nothing used by perl that is not already in libc
178 libswanted="`echo $libswanted | sed -e 's/ bsd / /'`"
179
180 # libc need not be separately listed
181 libswanted="`echo $libswanted | sed -e 's/ c / /'`"
182
183 # ndbm is already in libc
184 libswanted="`echo $libswanted | sed -e 's/ ndbm / /'`"
185
186 # the basic lddlflags used always
187 lddlflags='-shared -expect_unresolved "*"'
188
189 # Fancy compiler suites use optimising linker as well as compiler.
190 # <spider@Orb.Nashua.NH.US>
191 case "`uname -r`" in
192 *[123].*)       # old loader
193                 lddlflags="$lddlflags -O3"
194                 ;;
195 *)            if $test "X$optimize" = "X$undef"; then
196                       lddlflags="$lddlflags -msym"
197               else
198                   case "`/usr/sbin/sizer -v`" in
199                   *4.0D*)
200                       # QAR 56761: -O4 + .so may produce broken code,
201                       # fixed in 4.0E or better.
202                       ;;
203                   *)    
204                       lddlflags="$lddlflags $optimize"
205                       ;;
206                   esac
207                   # -msym: If using a sufficiently recent /sbin/loader,
208                   # keep the module symbols with the modules.
209                   lddlflags="$lddlflags -msym -std"
210               fi
211                 ;;
212 esac
213 # Yes, the above loses if gcc does not use the system linker.
214 # If that happens, let me know about it. <jhi@iki.fi>
215
216
217 # If debugging or (old systems and doing shared)
218 # then do not strip the lib, otherwise, strip.
219 # As noted above the -DDEBUGGING is added automagically by Configure if -g.
220 case "$optimize" in
221         *-g*) ;; # left intentionally blank
222 *)      case "`uname -r`" in
223         *[123].*)
224                 case "$useshrplib" in
225                 false|undef|'') lddlflags="$lddlflags -s"       ;;
226                 esac
227                 ;;
228         *) lddlflags="$lddlflags -s"
229                 ;;
230         esac
231         ;;
232 esac
233
234 #
235 # Make embedding in things like INN and Apache more memory friendly.
236 # Keep it overridable on the Configure command line, though, so that
237 # "-Uuseshrplib" prevents this default.
238 #
239
240 case "$_DEC_cc_style.$useshrplib" in
241         new.)   useshrplib="$define"    ;;
242 esac
243
244 # The EFF_ONLY_OK from <sys/access.h> is present but dysfunctional for
245 # [RWX]_OK as of Digital UNIX 4.0[A-D]?.  If and when this gets fixed,
246 # please adjust this appropriately.  See also pp_sys.c just before the
247 # emulate_eaccess().
248
249 # Fixed in V5.0A.
250 case "`/usr/sbin/sizer -v`" in
251 *5.0[A-Z]*|*5.[1-9]*|*[6-9].[0-9]*)
252         : ok
253         ;;
254 *)
255 # V5.0 or previous
256 pp_sys_cflags='ccflags="$ccflags -DNO_EFF_ONLY_OK"'
257         ;;
258 esac
259
260 # The off_t is already 8 bytes, so we do have largefileness.
261
262 cat > UU/usethreads.cbu <<'EOCBU'
263 # This script UU/usethreads.cbu will get 'called-back' by Configure 
264 # after it has prompted the user for whether to use threads.
265 case "$usethreads" in
266 $define|true|[yY]*)
267         # Threads interfaces changed with V4.0.
268         case "$isgcc" in
269         gcc)    ccflags="-D_REENTRANT $ccflags" ;;
270         *)  case "`uname -r`" in
271             *[123].*)   ccflags="-threads $ccflags" ;;
272             *)          ccflags="-pthread $ccflags" ;;
273             esac
274             ;;
275         esac    
276         case "`uname -r`" in
277         *[123].*) libswanted="$libswanted pthreads mach exc c_r" ;;
278         *)        libswanted="$libswanted pthread exc" ;;
279         esac
280
281         case "$usemymalloc" in
282         '')
283                 usemymalloc='n'
284                 ;;
285         esac
286         ;;
287 esac
288 EOCBU
289
290 cat > UU/uselongdouble.cbu <<'EOCBU'
291 # This script UU/uselongdouble.cbu will get 'called-back' by Configure 
292 # after it has prompted the user for whether to use long doubles.
293 case "$uselongdouble" in
294 $define|true|[yY]*)
295         case "`/usr/sbin/sizer -v`" in
296         *[1-4].0*)      cat >&4 <<EOF
297
298 ***
299 *** Sorry, you cannot use long doubles in pre-V5.0 releases of Tru64.
300 ***
301
302 Cannot continue, aborting.
303
304 EOF
305                 exit 1
306                 ;;
307         esac
308         d_Gconvert='sprintf((b),"%.*Lg",(n),(x))'
309         ;;
310 esac
311 EOCBU
312
313 case "`/usr/sbin/sizer -v`" in
314 *[1-4].0*) d_modfl=undef ;; # must wait till 5.0
315 esac
316
317 #
318 # Unset temporary variables no more needed.
319 #
320
321 unset _DEC_cc_style
322     
323 #
324 # History:
325 #
326 # perl5.005_51:
327 #
328 #       September-1998 Jarkko Hietaniemi <jhi@iki.fi>
329 #
330 #       * Added the -DNO_EFF_ONLY_OK flag ('use filetest;' support).
331 #
332 # perl5.004_57:
333 #
334 #       19-Dec-1997 Spider Boardman <spider@Orb.Nashua.NH.US>
335 #
336 #       * Newer Digital UNIX compilers enforce signaling for NaN without
337 #         -ieee.  Added -fprm d at the same time since it's friendlier for
338 #         embedding.
339 #
340 #       * Fixed the library search path to match cc, ld, and /sbin/loader.
341 #
342 #       * Default to building -Duseshrplib on newer systems.  -Uuseshrplib
343 #         still overrides.
344 #
345 #       * Fix -pthread additions for useshrplib.  ld has no -pthread option.
346 #
347 #
348 # perl5.004_04:
349 #
350 #       19-Sep-1997 Spider Boardman <spider@Orb.Nashua.NH.US>
351 #
352 #       * libnet on Digital UNIX is for JAVA, not for sockets.
353 #
354 #
355 # perl5.003_28:
356 #
357 #       22-Feb-1997 Jarkko Hietaniemi <jhi@iki.fi>
358 #
359 #       * Restructuring Spider's suggestions.
360 #
361 #       * Older Digital UNIXes cannot handle -Olimit ... for $lddlflags.
362 #       
363 #       * ld -s cannot be used in older Digital UNIXes when doing shared.
364 #
365 #
366 #       21-Feb-1997 Spider Boardman <spider@Orb.Nashua.NH.US>
367 #
368 #       * -hidden removed.
369 #       
370 #       * -DSTANDARD_C removed.
371 #
372 #       * -D_INTRINSICS added. (that -fast does not seem to buy much confirmed)
373 #
374 #       * odbm not in libc, only ndbm. Therefore dbm back to $libswanted.
375 #
376 #       * -msym for the newer runtime loaders.
377 #
378 #       * $optimize also in $lddflags.
379 #
380 #
381 # perl5.003_27:
382 #
383 #       18-Feb-1997 Jarkko Hietaniemi <jhi@iki.fi>
384 #
385 #       * unset _DEC_cc_style and more commentary on -std.
386 #
387 #
388 # perl5.003_26:
389 #
390 #       15-Feb-1997 Jarkko Hietaniemi <jhi@iki.fi>
391 #
392 #       * -std and -ansi.
393 #
394 #
395 # perl5.003_24:
396 #
397 #       30-Jan-1997 Jarkko Hietaniemi <jhi@iki.fi>
398 #
399 #       * Fixing the note on -DDEBUGGING.
400 #
401 #       * Note on -O5 -fast.
402 #
403 #
404 # perl5.003_23:
405 #
406 #       26-Jan-1997 Jarkko Hietaniemi <jhi@iki.fi>
407 #
408 #       * Notes on how to do both optimisation and debugging.
409 #
410 #
411 #       25-Jan-1997 Jarkko Hietaniemi <jhi@iki.fi>
412 #
413 #       * Remove unneeded libraries from $libswanted: PW, bsd, c, dbm
414 #
415 #       * Restructure the $lddlflags build.
416 #
417 #       * $optimize based on which compiler we have.
418 #
419 #
420 # perl5.003_22:
421 #
422 #       23-Jan-1997 Achim Bohnet <ach@rosat.mpe-garching.mpg.de>
423 #
424 #       * Added comments 'how to create a debugging version of perl'
425 #
426 #       * Fixed logic of this script to prevent stripping of shared
427 #         objects by the loader (see ld man page for -s) is debugging
428 #         is set via the -g switch.
429 #
430 #
431 #       21-Jan-1997 Achim Bohnet <ach@rosat.mpe-garching.mpg.de>
432 #
433 #       * now 'dl' is always removed from libswanted. Not only if
434 #         optimize is an empty string.
435 #        
436 #
437 #       17-Jan-1997 Achim Bohnet <ach@rosat.mpe-garching.mpg.de>
438 #
439 #       * Removed 'dl' from libswanted: When the FreePort binary
440 #         translator for Sun binaries is installed Configure concludes
441 #         that it should use libdl.x.yz.fpx.so :-(
442 #         Because the dlopen, dlclose,... calls are in the
443 #         C library it not necessary at all to check for the
444 #         dl library.  Therefore dl is removed from libswanted.
445 #       
446 #
447 #       1-Jan-1997 Achim Bohnet <ach@rosat.mpe-garching.mpg.de>
448 #       
449 #       * Set -Olimit to 3200 because perl_yylex.c got too big
450 #         for the optimizer.
451 #