| 1 |
root |
1.1 |
# Hints for the Power MAX OS operating system (formerly PowerUX - hence the |
| 2 |
|
|
# name) running on Concurrent (formerly Harris) NightHawk machines. Written |
| 3 |
|
|
# by Tom.Horsley@ccur.com |
| 4 |
|
|
# |
| 5 |
|
|
# This hint uses dynamic linking and the new Concurrent C compiler (based |
| 6 |
|
|
# on the Edison front end). This hint file was produced for a build of the |
| 7 |
|
|
# 5.7.3 development release of perl running on a PowerMAX_OS 5.1SR2 system |
| 8 |
|
|
# (but it should work on any Power MAX release using the newer "ec" (versus |
| 9 |
|
|
# "cc") compiler, and hopefully will also work for the upcoming 5.8 |
| 10 |
|
|
# development release of perl). |
| 11 |
|
|
|
| 12 |
|
|
# First find out where the root of the source tree is located. |
| 13 |
|
|
|
| 14 |
|
|
SRCROOT="" |
| 15 |
|
|
if [ -f ./INSTALL ] |
| 16 |
|
|
then |
| 17 |
|
|
SRCROOT="." |
| 18 |
|
|
else |
| 19 |
|
|
if [ -f ../INSTALL ] |
| 20 |
|
|
then |
| 21 |
|
|
SRCROOT=".." |
| 22 |
|
|
fi |
| 23 |
|
|
fi |
| 24 |
|
|
if [ -z "$SRCROOT" ] |
| 25 |
|
|
then |
| 26 |
|
|
echo "powerux hint file cannot locate root perl source!" 1>&2 |
| 27 |
|
|
exit 2 |
| 28 |
|
|
fi |
| 29 |
|
|
|
| 30 |
|
|
# We DO NOT want -lmalloc or -lPW, we DO need -lgen to follow -lnsl, so |
| 31 |
|
|
# fixup libswanted to reflect that desire (also need -lresolv if you want |
| 32 |
|
|
# DNS name lookup to work, which seems desirable :-). |
| 33 |
|
|
# |
| 34 |
|
|
libswanted=`echo ' '$libswanted' ' | sed -e 's/ malloc / /' -e 's/ PW / /' -e 's/ nsl / nsl gen resolv /'` |
| 35 |
|
|
|
| 36 |
|
|
# We DO NOT want /usr/ucblib in glibpth |
| 37 |
|
|
# |
| 38 |
|
|
glibpth=`echo ' '$glibpth' ' | sed -e 's@ /usr/ucblib @ @'` |
| 39 |
|
|
|
| 40 |
|
|
# Yes, csh exists, but doesn't work worth beans, if perl tries to use it, |
| 41 |
|
|
# the glob test fails, so just pretend it isn't there... |
| 42 |
|
|
# |
| 43 |
|
|
d_csh='undef' |
| 44 |
|
|
|
| 45 |
|
|
# Need to use Concurrent ec for most of these options to be meaningful (if you |
| 46 |
|
|
# want to get this to work with gcc, you're on your own :-). Passing |
| 47 |
|
|
# -Bexport to the linker when linking perl is important because it leaves |
| 48 |
|
|
# the interpreter internal symbols visible to the shared libs that will be |
| 49 |
|
|
# loaded on demand (and will try to reference those symbols). The -usys_nerr |
| 50 |
|
|
# drags in some stuff from libc that perl proper doesn't reference but |
| 51 |
|
|
# some dynamically linked extension will need to be in the static part |
| 52 |
|
|
# of perl (there are probably more of these that might be useful, but |
| 53 |
|
|
# for the extensions I build, this turned out to be enough). The -uldexp |
| 54 |
|
|
# makes sure the custom ldexp.o I add to archobjs actually gets pulled |
| 55 |
|
|
# into perl from libperl.a. The -unanosleep makes Timer::HiRes happy. |
| 56 |
|
|
# |
| 57 |
|
|
cc='/usr/ccs/bin/ec' |
| 58 |
|
|
cccdlflags='-Zpic' |
| 59 |
|
|
ccdlflags='-Zlink=dynamic -Wl,-usys_nerr -Wl,-uldexp -Wl,-unanosleep -Wl,-Bexport' |
| 60 |
|
|
lddlflags='-Zlink=so' |
| 61 |
|
|
|
| 62 |
|
|
# Sigh... Various versions of Power MAX went out with a broken ldexp runtime |
| 63 |
|
|
# routine in libc (it is fixed for sure in the upcoming SR4 release, but |
| 64 |
|
|
# that hasn't made it out the door yet). Since libc is linked dynamically, |
| 65 |
|
|
# and the perl you build might try to run on one of the broken systems, we |
| 66 |
|
|
# need to statically link a corrected copy of ldexp.o into perl. What the |
| 67 |
|
|
# following code does is determine if the ldexp.o on the current system |
| 68 |
|
|
# works right. If it does, it simply extracts the ldexp.o from the system C |
| 69 |
|
|
# library and uses that .o file. If the system .o is broken, the btoa |
| 70 |
|
|
# encoded copy of a correct ldexp.o file included in this hint file is used |
| 71 |
|
|
# (what a pain...) |
| 72 |
|
|
# |
| 73 |
|
|
if [ ! -f $SRCROOT/ldexp.o ] |
| 74 |
|
|
then |
| 75 |
|
|
echo Finding a correct copy of ldexp.o to link with... 1>&2 |
| 76 |
|
|
cat > $SRCROOT/UU/ldexptest.c <<'EOF' |
| 77 |
|
|
#include <stdio.h> |
| 78 |
|
|
#include <math.h> |
| 79 |
|
|
#include <string.h> |
| 80 |
|
|
int |
| 81 |
|
|
main(int argc, char ** argv) { |
| 82 |
|
|
double result = pow(2.0, 38.0); |
| 83 |
|
|
char buf[100]; |
| 84 |
|
|
sprintf(buf, "%g", result); |
| 85 |
|
|
if (strncmp(buf, "inf", 3) == 0) { |
| 86 |
|
|
exit(2); |
| 87 |
|
|
} |
| 88 |
|
|
return 0; |
| 89 |
|
|
} |
| 90 |
|
|
EOF |
| 91 |
|
|
GOODLDEXP="no" |
| 92 |
|
|
$cc -v -Zlink=static -o $SRCROOT/UU/ldexptest $SRCROOT/UU/ldexptest.c -lm > $SRCROOT/UU/ldexptest.lo 2>&1 |
| 93 |
|
|
if [ $? -eq 0 ] |
| 94 |
|
|
then |
| 95 |
|
|
$SRCROOT/UU/ldexptest |
| 96 |
|
|
if [ $? -eq 0 ] |
| 97 |
|
|
then |
| 98 |
|
|
LDEXPLIB=`fgrep libc.a $SRCROOT/UU/ldexptest.lo | tail -1 | sed -e 's@^[^/]*@@'` |
| 99 |
|
|
if [ -s "$LDEXPLIB" ] |
| 100 |
|
|
then |
| 101 |
|
|
if [ -f "$LDEXPLIB" ] |
| 102 |
|
|
then |
| 103 |
|
|
GOODLDEXP="yes" |
| 104 |
|
|
fi |
| 105 |
|
|
fi |
| 106 |
|
|
fi |
| 107 |
|
|
fi |
| 108 |
|
|
if [ "$GOODLDEXP" = "yes" ] |
| 109 |
|
|
then |
| 110 |
|
|
echo Congratulations! The ldexp.o on this system looks good! 1>&2 |
| 111 |
|
|
echo Using ldexp.o from $LDEXPLIB 1>&2 |
| 112 |
|
|
( cd $SRCROOT ; ar x $LDEXPLIB ldexp.o ) |
| 113 |
|
|
else |
| 114 |
|
|
echo Sorry, the ldexp.o on this system is busted. 1>&2 |
| 115 |
|
|
echo Using the ldexp.o from the powerux hint file 1>&2 |
| 116 |
|
|
atob > $SRCROOT/ldexp.o << 'EOF' |
| 117 |
|
|
xbtoa Begin |
| 118 |
|
|
Imm%#!<N9%zz!!*'-!!!!"zz!!!8Jz!&OZU!!!!I!"/c-!%r>7Ecb`!!%rA)G]Wp<Ec5JsFC>/%FC\ |
| 119 |
|
|
s(@fS,lAR]dp?YjFoAH3u00JG4;0JEJZF*VVE@:B4QA7^")/n4k]/hUsNAU&0$@rH4'?Zg7#FC/KgB |
| 120 |
|
|
5)5`!%om?A7^")?Yj7aG]7#$DI``"/o5'0G]7#+A7^")?N:'+5\stBG]7#+Bl7KhF*(i2F9"RBA7^" |
| 121 |
|
|
)?YjFoARB"dA,nl2A7^")?YjFoARAnXB5)5`5\stBG]7#/Ec5c4B6@cmASu#Y5\stBG]7#/Ec5c4B6 |
| 122 |
|
|
@cm@V'1dD?'ZQA7^")!+0)TBQ@HkEcQ&9!+p7_G]3XiCh[?cG%G]8Bl@kh?XIJhB4YFn@;GorEb0&q |
| 123 |
|
|
/p(ZLF9!q6ASbd-FC\s(@fS-%ASbd-A7]4mB4#IhDIieJz3$J<@IAd4EOoYQ5HuL$L3Pb]og;*c.rk |
| 124 |
|
|
Jf$0+\*`g>N$VfHC6nOeDcBJaNL<r#i5*<UF@H/I_sb5`,PtJ;sU43WK.'.>.[$5ct)L<TXBJ5b\68 |
| 125 |
|
|
8,rVja<:P^38ac\OQ-<@b/"'sb2E>Fr#l&\JY<(2JcPk%3$A9`IAd7F:4N<e<U"H%5b\5i3FDgf;/_ |
| 126 |
|
|
p@OmW2L8,rVjOok[aa<:P^b/"'sb2E>FJY<(2JcPk%3$A9`IAd7F:4N<e6(.iX4J2ZSb2iU's-C.p6 |
| 127 |
|
|
,!Blr#i5*3+2eP8,rVjJH5a9/J%m^4[8uI/!'`P5`#LiIF(:p4CCN1/WKr63FDgf5ck%!8,rVj4[8u |
| 128 |
|
|
I3T'l]4obQ_OlHEAJP#nB/d_RY5dCAdrg(%ob2E>F4eMcT^b#Nd5a26gb/"'sJY<(2JcPk%3$A9`IA |
| 129 |
|
|
d7F:4N<eb/"'s4J2ZS^a/s\JY<(2JcPk%3$A9`IAd7F:4N<eaKPXErt`*EJY<(25aVNob/"'sr#dCa |
| 130 |
|
|
IAd7Fb2E>FJcPk%3$A9`:4N<eb/"'sr#dDL4TGH^IAd7Fb2E>FJcPk%3$A9`:4N<eaQ`a*5b.lp4Wj |
| 131 |
|
|
_)b,G@@3Y;>Nrmh6n.M)S$6';3>OC8,cI;FEfb2E>FD1mE>OF[C2aT2B<JY<(2JcPk%r5^iGIAd7Fr |
| 132 |
|
|
&+S]b/"'s3$A9`:4N<eI'>pO3T0qs/VX)J4[;@g3<0$[I1UWg5car>8,rVj35>M<r#iM2OM_%ub/"' |
| 133 |
|
|
sb2E>FJY<(2JcPk%3$A9`IAd7F:4N<eJY<(25_oC_4hq$tb)QH%3Y29438jhrrmh6.IulWT6(IuEO[ |
| 134 |
|
|
/tTILlM+IAd7Fb2E>FI11W[4obQ_a\Vs;D1mE>OF[CBa^G0WJcPk%r@:\mr&.(kb/"'s3$A9`:4N<e |
| 135 |
|
|
b/"'sb2E>FJY<(2JcPk%3$A9`IAd7F:4N<ezzzs*t(KzIt.Luz6-oT3z6SJK?J,fQL4qI\oz!!!!s! |
| 136 |
|
|
!!!$zz!s/HG!!!"\!!!!)s8W,W!!!*$!!!"@!!3-#!"]85q[3`2!<E3%!!!!"!!!!&!WW3#!!WNU!W |
| 137 |
|
|
rH*If]fT!sSf.!Cp$,"p9>V!<FMOCe,mh8j5@-)[6Co!W`<V"u5N)49bn;!W`<+-`^N""p9>V!<F,D |
| 138 |
|
|
Bh&@0If]WO"t'Ld!Y>A:>Q=d*zz"98E)zzzzzzzzzz!!!!\zz"9AJl!!!!dzz!rr<&!!!!ezz!!!!# |
| 139 |
|
|
!!!"(zz!rr<'!!!")!!!)]z!!!!#!!!";!!!!Mz!!!!#!!!"Jzz!rr<(!!!"Kzz!rr<)!!!"Lzz!!! |
| 140 |
|
|
!&!!!"^!!!"Dz!!!!&!!!"n!!!!%z!!!!&!!!#+!!!!;z!!!!&!!!#?!!!!+z!!!!&!!!#Uzz!rr<* |
| 141 |
|
|
!!!#Vz!!!)]&c_n5!!!#\zz&-)\1!!!#hzz&-)\1!!!#nzz&-)\1!!!$&zz&-)\1!!!"$!!!Q<z!!! |
| 142 |
|
|
"h!!!Q<z!!!#A!!!-Gz!!!#E!!!-Hz!!!#W!!!T=z!!!#e!!!-G!!!!A!!!$.!!!Q<z!!!$4!!!WUz |
| 143 |
|
|
!!!$<!!!ZVz!!!$D!!!WVz!!!$X!!!-G!!!!)!!!$\!!!-H!!!!)!!!%+!!!-G!!!!1!!!%/!!!-H! |
| 144 |
|
|
!!!1!!!%G!!!ZWz!!!&&!!!ZVz!!!&>!!!-H!!!!A!!!&F!!!-G!!!!9!!!&J!!!-H!!!!9!!!'[!! |
| 145 |
|
|
!Q<z!!!(<!!!-G!!!!I!!!(@!!!-H!!!!I!!!(l!!!-G!!!!A!!!(p!!!-H!!!!A!!!!)!!!3Gz!!! |
| 146 |
|
|
!-!!!'C!!!)]!!!!>!!!*Ezzzzzzzzzzz!!!!"!!!!$zz!!!!U!!!$Yzz!!!!"z!!!!*!!!!"!!!!' |
| 147 |
|
|
z!!!%=!!!)]zz!!!!1z!!!!0!!!!"!!!!#z!!!.(!!!!Qzz!!!!)z!!!!8!!!!"!!!!#z!!!.X!!!! |
| 148 |
|
|
Ezz!!!!%z!!!!?!!!!"zz!!!/'!!!"Dzz!!!!%z!!!!KJ,fQLzz!!!0J!!!!Ezz!!!!%z!!!!T!!!! |
| 149 |
|
|
#zz!!!0n!!!$b!!!!"!!!!0!!!!%!!!!1!!!$1!!!!%zz!!!4Z!!!$B!!!!(!!!!#!!!!%!!!!-!!! |
| 150 |
|
|
$<!!!!%zz!!!8&!!!!9!!!!(!!!!%!!!!%!!!!-!!!$H!!!!%zz!!!8>!!!!-!!!!(!!!!&!!!!%!! |
| 151 |
|
|
!!- |
| 152 |
|
|
xbtoa End N 2436 984 E ad S 1bf43 R a7867666 |
| 153 |
|
|
EOF |
| 154 |
|
|
fi |
| 155 |
|
|
( cd $SRCROOT/UU ; rm -f ldexptest* ) |
| 156 |
|
|
fi |
| 157 |
|
|
if [ -f $SRCROOT/ldexp.o ] |
| 158 |
|
|
then |
| 159 |
|
|
archobjs='ldexp.o' |
| 160 |
|
|
fi |
| 161 |
|
|
|
| 162 |
|
|
# Configure sometime finds what it believes to be ndbm header files on the |
| 163 |
|
|
# system and imagines that we have the NDBM library, but we really don't. |
| 164 |
|
|
# There is something there that once resembled ndbm, but it is purely |
| 165 |
|
|
# for internal use in some tool and has been hacked beyond recognition |
| 166 |
|
|
# (or even function :-) |
| 167 |
|
|
# |
| 168 |
|
|
i_ndbm='undef' |
| 169 |
|
|
|
| 170 |
|
|
# I have no clue what perl thinks it wants <sys/mode.h> for, but if you |
| 171 |
|
|
# include it in a program in PowerMAX without first including <sys/vnode.h> |
| 172 |
|
|
# the code don't compile (apparently some other operating system has |
| 173 |
|
|
# something completely different in its sys/mode.h) |
| 174 |
|
|
# |
| 175 |
|
|
i_sysmode='undef' |
| 176 |
|
|
|
| 177 |
|
|
# There was a bug in memcmp (which was fixed a while ago) which sometimes |
| 178 |
|
|
# fails to provide the correct compare status (it is data dependant). I |
| 179 |
|
|
# don't wnat to figure out if you are building with the correct version or |
| 180 |
|
|
# not, so just pretend there is no memcmp (since perl has its own handy |
| 181 |
|
|
# substitute). |
| 182 |
|
|
# |
| 183 |
|
|
d_memcmp='undef' |
| 184 |
|
|
|
| 185 |
|
|
# Due to problems with dynamic linking (which I also hope will be fixed soon) |
| 186 |
|
|
# you can't build a libperl.so, the core has to be in the static part of the |
| 187 |
|
|
# perl executable. |
| 188 |
|
|
# |
| 189 |
|
|
useshrplib='false' |
| 190 |
|
|
|
| 191 |
|
|
# PowerMAX OS has support for a few different kinds of filesystems. The |
| 192 |
|
|
# newer "xfs" filesystem does *not* report a reasonable value in the |
| 193 |
|
|
# 'nlinks' field of stat() info for directories (in fact, it is always 1). |
| 194 |
|
|
# Since xfs is the only filesystem which supports partitions bigger than |
| 195 |
|
|
# 2gig and you can't hardly buy a disk that small anymore, xfs is coming in |
| 196 |
|
|
# to greater and greater use, so we pretty much have no choice but to |
| 197 |
|
|
# abandon all hope that number of links will mean anything. |
| 198 |
|
|
# |
| 199 |
|
|
dont_use_nlink=define |
| 200 |
|
|
|
| 201 |
|
|
# Configure comes up with the wrong type for these for some reason. The |
| 202 |
|
|
# pointers shouldn't have const in them. (And it looks like I have to |
| 203 |
|
|
# provide netdb_hlen_type as well becuase when I predefine the others it |
| 204 |
|
|
# comes up empty :-). |
| 205 |
|
|
# |
| 206 |
|
|
netdb_host_type='char *' |
| 207 |
|
|
netdb_name_type='char *' |
| 208 |
|
|
netdb_hlen_type='int' |
| 209 |
|
|
|
| 210 |
|
|
# Misc other flags that might be able to change, but I know these work right. |
| 211 |
|
|
# |
| 212 |
|
|
d_suidsafe='define' |
| 213 |
|
|
d_isascii='define' |
| 214 |
|
|
d_mymalloc='undef' |
| 215 |
|
|
usemymalloc='n' |
| 216 |
|
|
ssizetype='ssize_t' |
| 217 |
|
|
usevfork='false' |
| 218 |
|
|
|
