1ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown#! @PERL@ 2ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 3ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# This script handles linking the tool executables on Linux, 4ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# statically and at an alternative load address. 5ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# 6ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# Linking statically sidesteps all sorts of complications to do with 7ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# having two copies of the dynamic linker (valgrind's and the 8ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# client's) coexisting in the same process. The alternative load 9ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# address is needed because Valgrind itself will load the client at 10ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# whatever address it specifies, which is almost invariably the 11ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# default load address. Hence we can't allow Valgrind itself (viz, 12ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# the tool executable) to be loaded at that address. 13ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# 14ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# Unfortunately there's no standard way to do 'static link at 15ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# alternative address', so these link_tool_exe_*.in scripts handle 16ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# the per-platform hoop-jumping. 17ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# 18ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# What we get passed here is: 19ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# first arg 20ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# the alternative load address 21ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# all the rest of the args 22ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# the gcc invokation to do the final link, that 23ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# the build system would have done, left to itself 24ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# 25ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# We just let the script 'die' if something is wrong, rather than do 26ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# proper error reporting. We don't expect the users to run this 27ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# directly. It is only run as part of the build process, with 28ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# carefully constrained inputs. 29ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# 30ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# 31ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# So: what we actually do is: 32ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# 33ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# Look at the specified gcc invokation. Ignore all parts of it except 34ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# the *.a, *.o and -o outfile parts. Wrap them up in a new command 35ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# which looks (eg) as follows: 36ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# 37ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# (64-bit): 38ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# 39ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# /usr/bin/ld -static -arch x86_64 -macosx_version_min 10.5 \ 40ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# -o memcheck-amd64-darwin -u __start -e __start \ 41ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# -image_base 0x138000000 -stack_addr 0x13c000000 \ 42ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# -stack_size 0x800000 \ 43ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# memcheck_amd*.o \ 44ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# ../coregrind/libcoregrind-amd64-darwin.a \ 45ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# ../VEX/libvex-amd64-darwin.a 46ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# 47ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# (32-bit) 48ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# 49ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# /usr/bin/ld -static -arch i386 -macosx_version_min 10.5 \ 50ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# -o memcheck-x86-darwin -u __start -e __start \ 51ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# -image_base 0x38000000 -stack_addr 0x3c000000 \ 52ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# -stack_size 0x800000 \ 53ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# memcheck_x86*.o \ 54ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# ../coregrind/libcoregrind-x86-darwin.a \ 55ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# ../VEX/libvex-x86-darwin.a 56ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# 57ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# The addresses shown above will actually work, although "for real" we 58ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# of course need to take it from argv[1]. In these examples the stack 59ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# is placed 64M after the executable start. It is probably safer to 60ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# place it 64M before the executable's start point, so the executable 61ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# + data + bss can grow arbitrarily in future without colliding with 62ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# the stack. 63ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# 64ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# There's one more twist: we need to know the word size of the 65ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# executable for which we are linking. We need to know this because 66ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# we must tell the linker that, by handing it either "-arch x86_64" or 67ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# "-arch i386". Fortunately we can figure this out by scanning the 68ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# gcc invokation, which itself must contain either "-arch x86_64" or 69ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# "-arch i386". 70ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 71ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brownuse warnings; 72ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brownuse strict; 73ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# we need to be able to do 64-bit arithmetic: 74ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brownuse Math::BigInt; 75ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 76ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 77ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# User configurable constants: how far before the exe should we 78ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# place the stack? 79ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brownmy $TX_STACK_OFFSET_BEFORE_TEXT = 64 * 1024 * 1024; 80ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 81ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# and how big should the stack be? 82ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brownmy $TX_STACK_SIZE = 8 * 1024 * 1024; 83ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 84ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 85ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# string -> bool 86ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brownsub is_dota_or_doto($) 87ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown{ 88ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown my ($str) = @_; 89ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown if ($str =~ /.\.a$/ || $str =~ /.\.o$/) { 90ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown return 1; 91ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown } else { 92ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown return 0; 93ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown } 94ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown} 95ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 96ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 97ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# expect at least: alt-load-address gcc -o foo bar.o 98ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Browndie "Not enough arguments" 99ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown if (($#ARGV + 1) < 5); 100ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 101663860b1408516d02ebfcb3a9999a134e6cfb223Ben Chengmy $ala = $ARGV[0]; # the load address to use 102663860b1408516d02ebfcb3a9999a134e6cfb223Ben Chengmy $cc = $ARGV[1]; # the C compiler in use 103ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 104ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# check for plausible-ish alt load address 105ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Browndie "Bogus alt-load address (1)" 106ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown if (length($ala) < 3 || index($ala, "0x") != 0); 107ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 108ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Browndie "Bogus alt-load address (2)" 109ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown if ($ala !~ /^0x[0-9a-fA-F]+$/); 110ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 111ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 112ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# get hold of the outfile name (following "-o") 113ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brownmy $outname = ""; 114ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 115ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brownforeach my $n (2 .. $#ARGV - 1) { 116ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown my $str = $ARGV[$n]; 117ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown if ($str eq "-o" && $outname eq "") { 118ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown $outname = $ARGV[$n + 1]; 119ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown } 120ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown} 121ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 122ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Browndie "Can't find '-o outfilename' in command line" 123ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown if ($outname eq ""); 124ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 125ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 126ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# get hold of the string following "-arch" 127ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brownmy $archstr = ""; 128ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 129ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brownforeach my $n (2 .. $#ARGV - 1) { 130ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown my $str = $ARGV[$n]; 131ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown if ($str eq "-arch" && $archstr eq "") { 132ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown $archstr = $ARGV[$n + 1]; 133ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown } 134ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown} 135ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 136ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Browndie "Can't find '-arch archstr' in command line" 137ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown if ($archstr eq ""); 138ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 139ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 140ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# build the command line 141ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brownmy $cmd = "/usr/bin/ld"; 142ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 143ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown$cmd = "$cmd -static"; 144663860b1408516d02ebfcb3a9999a134e6cfb223Ben Cheng 145663860b1408516d02ebfcb3a9999a134e6cfb223Ben Cheng# If we're building with clang (viz, the C compiler as specified 146663860b1408516d02ebfcb3a9999a134e6cfb223Ben Cheng# by the 2nd arg ends in "clang"), we also need -new_linker. See 147663860b1408516d02ebfcb3a9999a134e6cfb223Ben Cheng# https://bugs.kde.org/show_bug.cgi?id=295427 148663860b1408516d02ebfcb3a9999a134e6cfb223Ben Chengif ("$cc" =~ /clang$/) { 149663860b1408516d02ebfcb3a9999a134e6cfb223Ben Cheng $cmd = "$cmd -new_linker"; 150663860b1408516d02ebfcb3a9999a134e6cfb223Ben Cheng} 151663860b1408516d02ebfcb3a9999a134e6cfb223Ben Cheng 152ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown$cmd = "$cmd -arch $archstr"; 153ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown$cmd = "$cmd -macosx_version_min 10.5"; 154ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown$cmd = "$cmd -o $outname"; 155ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown$cmd = "$cmd -u __start -e __start"; 156ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 157ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brownmy $stack_addr = Math::BigInt->new( $ala ) - $TX_STACK_OFFSET_BEFORE_TEXT; 158ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brownmy $stack_addr_str = $stack_addr->as_hex(); 159ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brownmy $stack_size_str = Math::BigInt::as_hex($TX_STACK_SIZE); 160ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 161ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown$cmd = "$cmd -image_base $ala"; 162ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown$cmd = "$cmd -stack_addr $stack_addr_str"; 163ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown$cmd = "$cmd -stack_size $stack_size_str"; 164ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 165ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brownforeach my $n (2 .. $#ARGV) { 166ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown my $str = $ARGV[$n]; 167ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown if (is_dota_or_doto($str)) { 168ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown $cmd = "$cmd $str"; 169ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown } 170ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown} 171ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 172b32f58018498ea2225959b0ba11c18f0c433deefEvgeniy Stepanovprint "link_tool_exe_darwin: $cmd\n"; 173ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 174ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown# Execute the command: 175ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brownmy $r = system("$cmd"); 176ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown 177b32f58018498ea2225959b0ba11c18f0c433deefEvgeniy Stepanovif ($r != 0) { 178b32f58018498ea2225959b0ba11c18f0c433deefEvgeniy Stepanov exit 1; 179b32f58018498ea2225959b0ba11c18f0c433deefEvgeniy Stepanov} 180b32f58018498ea2225959b0ba11c18f0c433deefEvgeniy Stepanov 181b32f58018498ea2225959b0ba11c18f0c433deefEvgeniy Stepanov 182b32f58018498ea2225959b0ba11c18f0c433deefEvgeniy Stepanov# and now kludge the tool exe 183b32f58018498ea2225959b0ba11c18f0c433deefEvgeniy Stepanov# see bug 267997 184b32f58018498ea2225959b0ba11c18f0c433deefEvgeniy Stepanov 185b32f58018498ea2225959b0ba11c18f0c433deefEvgeniy Stepanov$cmd = "../coregrind/fixup_macho_loadcmds"; 186b32f58018498ea2225959b0ba11c18f0c433deefEvgeniy Stepanov$cmd = "$cmd $stack_addr_str $stack_size_str $outname"; 187b32f58018498ea2225959b0ba11c18f0c433deefEvgeniy Stepanov 188b32f58018498ea2225959b0ba11c18f0c433deefEvgeniy Stepanovprint "link_tool_exe_darwin: $cmd\n"; 189b32f58018498ea2225959b0ba11c18f0c433deefEvgeniy Stepanov 190b32f58018498ea2225959b0ba11c18f0c433deefEvgeniy Stepanov$r = system("$cmd"); 191b32f58018498ea2225959b0ba11c18f0c433deefEvgeniy Stepanov 192b32f58018498ea2225959b0ba11c18f0c433deefEvgeniy Stepanovif ($r != 0) { 193b32f58018498ea2225959b0ba11c18f0c433deefEvgeniy Stepanov exit 1; 194ed07e00d438c74b7a23c01bfffde77e3968305e4Jeff Brown} 195b32f58018498ea2225959b0ba11c18f0c433deefEvgeniy Stepanov 196b32f58018498ea2225959b0ba11c18f0c433deefEvgeniy Stepanov 197b32f58018498ea2225959b0ba11c18f0c433deefEvgeniy Stepanov 198b32f58018498ea2225959b0ba11c18f0c433deefEvgeniy Stepanov 199b32f58018498ea2225959b0ba11c18f0c433deefEvgeniy Stepanovexit 0; 200