This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
SvUTF8_off() in do_join can be unconditional.
[perl5.git] / hints / aix_4.sh
CommitLineData
b6d030a4
MB
1# hints/aix.sh
2#
3# Split off from aix.sh on 04 Feb 2004 by H.Merijn Brand
4#
5# AIX 4.1 hints thanks to Christopher Chan-Nui <channui@austin.ibm.com>.
6# AIX 4.1 pthreading by Christopher Chan-Nui <channui@austin.ibm.com> and
7# Jarkko Hietaniemi <jhi@iki.fi>.
8# AIX 4.3.x LP64 build by Steven Hirsch <hirschs@btv.ibm.com>
9# Merged on Mon Feb 6 10:22:35 EST 1995 by
10# Andy Dougherty <doughera@lafayette.edu>
11
12# Contact dfavor@corridor.com for any of the following:
13#
14# - AIX 43x and above support
15# - gcc + threads support
16# - socks support
17#
18# Apr 99 changes:
19#
20# - use nm in AIX 43x and above
21# - gcc + threads now builds
22# [(added support for socks) Jul 99 SOCKS support rewritten]
23#
24# Notes:
25#
26# - shared libperl support is tricky. if ever libperl.a ends up
27# in /usr/local/lib/* it can override any subsequent builds of
28# that same perl release. to make sure you know where the shared
29# libperl.a is coming from do a 'dump -Hv perl' and check all the
30# library search paths in the loader header.
31#
32# it would be nice to warn the user if a libperl.a exists that is
33# going to override the current build, but that would be complex.
34#
35# better yet, a solid fix for this situation should be developed.
36#
37
38# Configure finds setrgid and setruid, but they're useless. The man
39# pages state:
40# setrgid: The EPERM error code is always returned.
41# setruid: The EPERM error code is always returned. Processes cannot
42# reset only their real user IDs.
43d_setrgid='undef'
44d_setruid='undef'
45
46alignbytes=8
47
48case "$usemymalloc" in
49 '') usemymalloc='n' ;;
50 esac
51
52# Intuiting the existence of system calls under AIX is difficult,
53# at best; the safest technique is to find them empirically.
54
55# AIX 4.3.* and above default to letting Configure test if nm
56# extraction will work.
57case "$osvers" in
58 4.1.*|4.2.*)
59 case "$usenm" in
60 '') usenm='undef' ;;
61 esac
62 case "$usenativedlopen" in
63 '') usenativedlopen='false' ;;
64 esac
65 ;;
66 *)
67 case "$usenativedlopen" in
68 '') usenativedlopen='true' ;;
69 esac
70 ;;
71 esac
72
73so="a"
74# AIX itself uses .o (libc.o) but we prefer compatibility
75# with the rest of the world and with rest of the scripting
76# languages (Tcl, Python) and related systems (SWIG).
77# Stephanie Beals <bealzy@us.ibm.com>
78dlext="so"
79
80# Take possible hint from the environment. If 32-bit is set in the
81# environment, we can override it later. If set for 64, the
82# 'sizeof' test sees a native 64-bit architecture and never looks back.
83case "$OBJECT_MODE" in
84 32)
85 cat >&4 <<EOF
86
87You have OBJECT_MODE=32 set in the environment.
88I take this as a hint you do not want to
89build for a 64-bit address space. You will be
90given the opportunity to change this later.
91EOF
92 ;;
93 64)
94 cat >&4 <<EOF
95
96You have OBJECT_MODE=64 set in the environment.
97This forces a full 64-bit build. If that is
98not what you intended, please terminate this
99program, unset it and restart.
100EOF
101 ;;
102 *) ;;
103 esac
104
105# uname -m output is too specific and not appropriate here
106case "$archname" in
107 '') archname="$osname" ;;
108 esac
109
110cc=${cc:-cc}
111ccflags="$ccflags -D_ALL_SOURCE -D_ANSI_C_SOURCE -D_POSIX_SOURCE"
112case "$cc" in
113 *gcc*) ;;
88567e60 114 *) ccflags="$ccflags -qmaxmem=-1 -qnoansialias" ;;
b6d030a4
MB
115 esac
116nm_opt='-B'
117
118# These functions don't work like Perl expects them to.
119d_setregid='undef'
120d_setreuid='undef'
121
122# Changes for dynamic linking by Wayne Scott <wscott@ichips.intel.com>
123#
124# Tell perl which symbols to export for dynamic linking.
125cccdlflags='none' # All AIX code is position independent
126 cc_type=xlc # do not export to config.sh
127case "$cc" in
128 *gcc*)
129 cc_type=gcc
130 ccdlflags='-Xlinker'
131 if [ "X$gccversion" = "X" ]; then
132 # Done too late in Configure if hinted
133 gccversion=`$cc --version | sed 's/.*(GCC) *//'`
134 fi
135 ;;
136
137 *) ccversion=`lslpp -L | grep 'C for AIX Compiler$' | grep -v '\.msg\.[A-Za-z_]*\.' | head -1 | awk '{print $1,$2}'`
138 case "$ccversion" in
139 '') ccversion=`lslpp -L | grep 'IBM C and C++ Compilers LUM$'`
140 ;;
141
142 *.*.*.*.*.*.*) # Ahhrgg, more than one C compiler installed
143 first_cc_path=`which ${cc:-cc}`
144 case "$first_cc_path" in
145 *vac*)
146 cc_type=vac ;;
147 /usr/bin/cc) # Check the symlink
148 if [ -h $first_cc_path ] ; then
149 ls -l $first_cc_path > reflect
150 if grep -i vac reflect >/dev/null 2>&1 ; then
151 cc_type=vac
152 fi
153 rm -f reflect
154 fi
155 ;;
156 esac
157 ccversion=`lslpp -L | grep 'C for AIX Compiler$' | grep -i $cc_type | head -1`
158 ;;
159
160 vac*.*.*.*)
161 cc_type=vac
162 ;;
163 esac
164 ccversion=`echo "$ccversion" | awk '{print $2}'`
165
166 case "$ccversion" in
167 3.6.6.0)
168 optimize='none'
169 ;;
170
171 4.4.0.0|4.4.0.1|4.4.0.2)
172 cat >&4 <<EOF
173***
174*** This C compiler ($ccversion) is outdated.
175***
176*** Please upgrade to at least 4.4.0.3.
177***
178EOF
179 ;;
180
181 5.0.0.0)
182 cat >&4 <<EOF
183***
184*** This C compiler ($ccversion) is known to have too many optimizer
185*** bugs to compile a working Perl.
186***
187*** Consider upgrading your C compiler, or getting the GNU cc (gcc).
188***
189*** Cannot continue, aborting.
190EOF
191 exit 1
192 ;;
193
194 5.0.1.0)
195 cat >&4 <<EOF
196***
197*** This C compiler ($ccversion) is known to have optimizer problems
198*** when compiling regcomp.c.
199***
200*** Disabling optimization for that file but consider upgrading
201*** your C compiler.
202***
203EOF
204regcomp_cflags='optimize='
205 ;;
206 esac
88567e60
MB
207 case "$ccversion" in
208 5*) usemallocwrap='n' ;; # causes panic in miniperl
209 esac
b6d030a4
MB
210 esac
211# the required -bE:$installarchlib/CORE/perl.exp is added by
212# libperl.U (Configure) later.
213
214# The first 3 options would not be needed if dynamic libs. could be linked
215# with the compiler instead of ld.
216# -bI:$(PERL_INC)/perl.exp Read the exported symbols from the perl binary
217# -bE:$(BASEEXT).exp Export these symbols. This file contains only one
218# symbol: boot_$(EXP) can it be auto-generated?
142c1590
MB
219if test $usenativedlopen = 'true' ; then
220 lddlflags="$lddlflags -bhalt:4 -bexpall -G -bnoentry -lc"
221else
222 lddlflags="$lddlflags -bhalt:4 -bM:SRE -bI:\$(PERL_INC)/perl.exp -bE:\$(BASEEXT).exp -bnoentry -lc"
223 fi
b6d030a4
MB
224
225case "$use64bitall" in
226 $define|true|[yY]*) use64bitint="$define" ;;
227 esac
228
229case "$usemorebits" in
230 $define|true|[yY]*) use64bitint="$define"; uselongdouble="$define" ;;
231 esac
232
233case $cc_type in
234 vac|xlc)
235 case "$uselongdouble" in
236 $define|true|[yY]*)
237 ccflags="$ccflags -qlongdouble"
238 libswanted="c128 $libswanted"
239 lddlflags=`echo "$lddlflags " | sed -e 's/ -lc / -lc128 -lc /'`
240 ;;
241 esac
242 esac
243
244case "$cc" in
245 *gcc*) ;;
246 cc*|xlc*) # cc should've been set by line 116 or so if empty.
247 if test ! -x /usr/bin/$cc -a -x /usr/vac/bin/$cc; then
248 case ":$PATH:" in
249 *:/usr/vac/bin:*) ;;
250 *) if test ! -x /QOpenSys/usr/bin/$cc; then
251 # The /QOpenSys/usr/bin/$cc saves us if we are
252 # building natively in OS/400 PASE.
253 cat >&4 <<EOF
254
255***
256*** You either implicitly or explicitly specified an IBM C compiler,
257*** but you do not seem to have one in /usr/bin, but you seem to have
258*** the VAC installed in /usr/vac, but you do not have the /usr/vac/bin
259*** in your PATH. I suggest adding that and retrying Configure.
260***
261EOF
262 exit 1
263 fi
264 ;;
265 esac
266 fi
267 ;;
268 esac
269
270case "$ldlibpthname" in
271 '') ldlibpthname=LIBPATH ;;
272 esac
273
274# AIX 4.2 (using latest patchlevels on 20001130) has a broken bind
275# library (getprotobyname and getprotobynumber are outversioned by
276# the same calls in libc, at least for xlc version 3...
277case "`oslevel`" in
278 4.2.1.*)
279 case "$ccversion" in # Don't know if needed for gcc
280 3.1.4.*|5.0.2.*) # libswanted "bind ... c ..." => "... c bind ..."
281 set `echo X "$libswanted "| sed -e 's/ bind\( .*\) \([cC]\) / \1 \2 bind /'`
282 shift
283 libswanted="$*"
284 ;;
285 esac
286 ;;
287 esac
288
289# This script UU/usethreads.cbu will get 'called-back' by Configure
290# after it has prompted the user for whether to use threads.
291cat > UU/usethreads.cbu <<'EOCBU'
292case "$usethreads" in
293 $define|true|[yY]*)
294 d_drand48_r='undef'
295 d_endgrent_r='undef'
296 d_endpwent_r='undef'
297 d_getgrent_r='undef'
298 d_getpwent_r='undef'
299 d_random_r='undef'
300 d_setgrent_r='undef'
301 d_setpwent_r='undef'
302 d_srand48_r='undef'
303 d_strerror_r='undef'
304
305 ccflags="$ccflags -DNEED_PTHREAD_INIT"
306 case "$cc" in
307 *gcc*)
308 ccflags="-D_THREAD_SAFE $ccflags"
309 ;;
310 cc_r) ;;
311 cc|xl[cC]|xl[cC]_r)
312 echo >&4 "Switching cc to cc_r because of POSIX threads."
313 # xlc_r has been known to produce buggy code in AIX 4.3.2.
314 # (e.g. pragma/overload core dumps) Let's suspect xlC_r, too.
315 # --jhi@iki.fi
316 cc=cc_r
317
318 case "`oslevel`" in
319 4.2.1.*) i_crypt='undef' ;;
320 esac
321 ;;
322 '')
323 cc=cc_r
324 ;;
325 *)
326 cat >&4 <<EOM
327*** For pthreads you should use the AIX C compiler cc_r.
328*** (now your compiler was set to '$cc')
329*** Cannot continue, aborting.
330EOM
331 exit 1
332 ;;
333 esac
334
335 # c_rify libswanted.
336 set `echo X "$libswanted "| sed -e 's/ \([cC]\) / \1_r /g'`
337 shift
338 libswanted="$*"
339 # c_rify lddlflags.
340 set `echo X "$lddlflags "| sed -e 's/ \(-l[cC]\) / \1_r /g'`
341 shift
342 lddlflags="$*"
343
344 # Insert pthreads to libswanted, before any libc or libC.
345 set `echo X "$libswanted "| sed -e 's/ \([cC]_r\) / pthreads \1 /'`
346 shift
347 libswanted="$*"
348 # Insert pthreads to lddlflags, before any libc or libC.
349 set `echo X "$lddlflags " | sed -e 's/ \(-l[cC]_r\) / -lpthreads \1 /'`
350 shift
351 lddlflags="$*"
352 ;;
353 esac
354EOCBU
355
356# This script UU/uselargefiles.cbu will get 'called-back' by Configure
357# after it has prompted the user for whether to use large files.
358cat > UU/uselargefiles.cbu <<'EOCBU'
359case "$uselargefiles" in
360 ''|$define|true|[yY]*)
361 # Configure should take care of use64bitint and use64bitall being
362 # defined before uselargefiles.cbu is consulted.
363 if test X"$use64bitint:$quadtype" = X"$define:long" -o X"$use64bitall" = Xdefine; then
364# Keep these at the left margin.
365ccflags_uselargefiles="`getconf XBS5_LP64_OFF64_CFLAGS 2>/dev/null`"
366ldflags_uselargefiles="`getconf XBS5_LP64_OFF64_LDFLAGS 2>/dev/null`"
367 else
368# Keep these at the left margin.
369ccflags_uselargefiles="`getconf XBS5_ILP32_OFFBIG_CFLAGS 2>/dev/null`"
370ldflags_uselargefiles="`getconf XBS5_ILP32_OFFBIG_LDFLAGS 2>/dev/null`"
371 fi
372
373 # _Somehow_ in AIX 4.3.1.0 the above getconf call manages to
374 # insert(?) *something* to $ldflags so that later (in Configure) evaluating
375 # $ldflags causes a newline after the '-b64' (the result of the getconf).
376 # (nothing strange shows up in $ldflags even in hexdump;
377 # so it may be something (a bug) in the shell, instead?)
378 # Try it out: just uncomment the below line and rerun Configure:
379# echo >&4 "AIX 4.3.1.0 $ldflags_uselargefiles mystery" ; exit 1
380 # Just don't ask me how AIX does it, I spent hours wondering.
381 # Therefore the line re-evaluating ldflags_uselargefiles: it seems to fix
382 # the whatever it was that AIX managed to break. --jhi
383 ldflags_uselargefiles="`echo $ldflags_uselargefiles`"
384 if test X"$use64bitint:$quadtype" = X"$define:long" -o X"$use64bitall" = Xdefine; then
385# Keep this at the left margin.
386libswanted_uselargefiles="`getconf XBS5_LP64_OFF64_LIBS 2>/dev/null|sed -e 's@^-l@@' -e 's@ -l@ @g`"
387 else
388# Keep this at the left margin.
389libswanted_uselargefiles="`getconf XBS5_ILP32_OFFBIG_LIBS 2>/dev/null|sed -e 's@^-l@@' -e 's@ -l@ @g`"
390 fi
391
392 case "$ccflags_uselargefiles$ldflags_uselargefiles$libs_uselargefiles" in
393 '') ;;
394 *) ccflags="$ccflags $ccflags_uselargefiles"
395 ldflags="$ldflags $ldflags_uselargefiles"
396 libswanted="$libswanted $libswanted_uselargefiles"
397 ;;
398 esac
399
400 case "$gccversion" in
401 '') ;;
402 *) # Remove xlc-specific -qflags.
403 ccflags="`echo $ccflags | sed -e 's@ -q[^ ]*@ @g' -e 's@^-q[^ ]* @@g'`"
404 ldflags="`echo $ldflags | sed -e 's@ -q[^ ]*@ @g' -e 's@^-q[^ ]* @@g'`"
405 # Move xlc-specific -bflags.
406 ccflags="`echo $ccflags | sed -e 's@ -b@ -Wl,-b@g'`"
407 ldflags="`echo ' '$ldflags | sed -e 's@ -b@ -Wl,-b@g'`"
408 lddlflags="`echo ' '$lddlflags | sed -e 's@ -b@ -Wl,-b@g'`"
1be326de 409 lddlflags="`echo ' '$lddlflags | sed -e 's@ -G @ -Wl,-G @g'`"
b6d030a4
MB
410 ld='gcc'
411 echo >&4 "(using ccflags $ccflags)"
412 echo >&4 "(using ldflags $ldflags)"
413 echo >&4 "(using lddlflags $lddlflags)"
414 ;;
415 esac
416 ;;
417 esac
418EOCBU
419
420# This script UU/use64bitint.cbu will get 'called-back' by Configure
421# after it has prompted the user for whether to use 64 bit integers.
422cat > UU/use64bitint.cbu <<'EOCBU'
423case "$use64bitint" in
424 $define|true|[yY]*)
425 case "`oslevel`" in
426 4.[012].*)
427 cat >&4 <<EOM
428AIX `oslevel` does not support 64-bit interfaces.
429You should upgrade to at least AIX 4.3.
430EOM
431 exit 1
432 ;;
433 esac
434 ;;
435 esac
436EOCBU
437
438cat > UU/use64bitall.cbu <<'EOCBU'
439# This script UU/use64bitall.cbu will get 'called-back' by Configure
440# after it has prompted the user for whether to be maximally 64-bitty.
441case "$use64bitall" in
442 $define|true|[yY]*)
443 case "`oslevel`" in
444 4.[012].*)
445 cat >&4 <<EOM
446AIX `oslevel` does not support 64-bit interfaces.
447You should upgrade to at least AIX 4.3.
448EOM
449 exit 1
450 ;;
451 esac
452 echo " "
453 echo "Checking the CPU width of your hardware..." >&4
454 $cat >size.c <<EOCP
455#include <stdio.h>
456#include <sys/systemcfg.h>
457int main (void)
458{
459 printf ("%d\n", _system_configuration.width);
460 return (0);
461 }
462EOCP
463 set size
464 if eval $compile_ok; then
465 qacpuwidth=`./size`
466 echo "You are running on $qacpuwidth bit hardware."
467 else
468 dflt="32"
469 echo " "
470 echo "(I can't seem to compile the test program. Guessing...)"
471 rp="What is the width of your CPU (in bits)?"
472 . ./myread
473 qacpuwidth="$ans"
474 fi
475 $rm -f size.c size
476 case "$qacpuwidth" in
477 32*)
478 cat >&4 <<EOM
479Bzzzt! At present, you can only perform a
480full 64-bit build on a 64-bit machine.
481EOM
482 exit 1
483 ;;
484 esac
485
486 qacflags="`getconf XBS5_LP64_OFF64_CFLAGS 2>/dev/null`"
487 qaldflags="`getconf XBS5_LP64_OFF64_LDFLAGS 2>/dev/null`"
488 # See jhi's comments above regarding this re-eval. I've
489 # seen similar weirdness in the form of:
490 #
491 # 1506-173 (W) Option lm is not valid. Enter xlc for list of valid options.
492 #
493 # error messages from 'cc -E' invocation. Again, the offending
494 # string is simply not detectable by any means. Since it doesn't
495 # do any harm, I didn't pursue it. -- sh
496 qaldflags="`echo $qaldflags`"
497 qalibs="`getconf XBS5_LP64_OFF64_LIBS 2>/dev/null|sed -e 's@^-l@@' -e 's@ -l@ @g`"
498 # -q32 and -b32 may have been set by uselargefiles or user.
499 # Remove them.
500 ccflags="`echo $ccflags | sed -e 's@-q32@@'`"
501 ldflags="`echo $ldflags | sed -e 's@-b32@@'`"
502 # Tell archiver to use large format. Unless we remove 'ar'
503 # from 'trylist', the Configure script will just reset it to 'ar'
504 # immediately prior to writing config.sh. This took me hours
505 # to figure out.
506 trylist="`echo $trylist | sed -e 's@^ar @@' -e 's@ ar @ @g' -e 's@ ar$@@'`"
507 ar="ar -X64"
508 nm_opt="-X64 $nm_opt"
509 # Note: Placing the 'qacflags' variable into the 'ldflags' string
510 # is NOT a typo. ldflags is passed to the C compiler for final
511 # linking, and it wants -q64 (-b64 is for ld only!).
512 case "$qacflags$qaldflags$qalibs" in
513 '') ;;
514 *) ccflags="$ccflags $qacflags"
515 ldflags="$ldflags $qacflags"
516 lddlflags="$qaldflags $lddlflags"
517 libswanted="$libswanted $qalibs"
518 ;;
519 esac
520 case "$ccflags" in
521 *-DUSE_64_BIT_ALL*) ;;
522 *) ccflags="$ccflags -DUSE_64_BIT_ALL";;
523 esac
524 case "$archname64" in
525 ''|64*) archname64=64all ;;
526 esac
527 longsize="8"
528 qacflags=''
529 qaldflags=''
530 qalibs=''
531 qacpuwidth=''
532 ;;
533 esac
534EOCBU
535
536if test $usenativedlopen = 'true' ; then
537 ccflags="$ccflags -DUSE_NATIVE_DLOPEN"
538 case "$cc" in
539 *gcc*) ldflags="$ldflags -Wl,-brtl" ;;
540 *) ldflags="$ldflags -brtl" ;;
541 esac
542else
543 case `oslevel` in
544 4.2.*) ;; # libC_r has broke gettimeofday
545 *) # If the C++ libraries, libC and libC_r, are available we will
546 # prefer them over the vanilla libc, because the libC contain
547 # loadAndInit() and terminateAndUnload() which work correctly
548 # with C++ statics while libc load() and unload() do not. See
549 # ext/DynaLoader/dl_aix.xs. The C-to-C_r switch is done by
550 # usethreads.cbu, if needed.
551 if test -f /lib/libC.a -a X"`$cc -v 2>&1 | grep gcc`" = X; then
552 # Cify libswanted.
553 set `echo X "$libswanted "| sed -e 's/ c / C c /'`
554 shift
555 libswanted="$*"
556 # Cify lddlflags.
557 set `echo X "$lddlflags "| sed -e 's/ -lc / -lC -lc /'`
558 shift
559 lddlflags="$*"
560 fi
561 esac
562 fi
563
564case "$PASE" in
565 define)
566 case "$prefix" in
567 '') prefix=/QOpenSys/perl ;;
568 esac
569 cat >&4 <<EOF
570
571***
572*** You seem to be compiling in AIX for the OS/400 PASE environment.
573*** I'm not going to use the AIX bind, nsl, and possible util libraries, then.
574*** I'm also not going to install perl as /usr/bin/perl.
575*** Perl will be installed under $prefix.
576*** For instructions how to install this build from AIX to PASE,
577*** see the file README.os400. Accept the "aix" for the question
578*** about "Operating system name".
579***
580EOF
581 set `echo " $libswanted " | sed -e 's@ bind @ @' -e 's@ nsl @ @' -e 's@ util @ @'`
582 shift
583 libswanted="$*"
584 installusrbinperl="$undef"
585
586 # V5R1 doesn't have this (V5R2 does), without knowing
587 # which one we have it's safer to be pessimistic.
588 # Cwd will work fine even without fchdir(), but if
589 # V5R1 tries to use code compiled assuming fchdir(),
590 # lots of grief will issue forth from Cwd.
591 case "$d_fchdir" in
592 '') d_fchdir="$undef" ;;
593 esac
594 ;;
595 esac
596
597# EOF