1 1.1 christos #!/bin/sh 2 1.1 christos {- 3 1.1 christos use lib '.'; 4 1.1 christos use configdata; 5 1.1 christos use lib catdir($config{sourcedir}, 'Configurations'); 6 1.1 christos use platform; 7 1.1 christos -} 8 1.1 christos # To test this OpenSSL version's applications against another version's 9 1.1 christos # shared libraries, simply set 10 1.1 christos # 11 1.1 christos # OPENSSL_REGRESSION=/path/to/other/OpenSSL/build/tree 12 1.1 christos if [ -n "$OPENSSL_REGRESSION" ]; then 13 1.1 christos shlibwrap="$OPENSSL_REGRESSION/util/shlib_wrap.sh" 14 1.1 christos if [ -x "$shlibwrap" ]; then 15 1.1 christos # We clear OPENSSL_REGRESSION to avoid a loop, should the shlib_wrap.sh 16 1.1 christos # we exec also support that mechanism... 17 1.1 christos OPENSSL_REGRESSION= exec "$shlibwrap" "$@" 18 1.1 christos else 19 1.1 christos if [ -f "$shlibwrap" ]; then 20 1.1 christos echo "Not permitted to run $shlibwrap" >&2 21 1.1 christos else 22 1.1 christos echo "No $shlibwrap, perhaps OPENSSL_REGRESSION isn't properly set?" >&2 23 1.1 christos fi 24 1.1 christos exit 1 25 1.1 christos fi 26 1.1 christos fi 27 1.1 christos 28 1.1 christos [ $# -ne 0 ] || set -x # debug mode without arguments:-) 29 1.1 christos 30 1.1 christos THERE="`echo $0 | sed -e 's|[^/]*$||' 2>/dev/null`.." 31 1.1 christos [ -d "${THERE}" ] || exec "$@" # should never happen... 32 1.1 christos 33 1.1 christos LIBCRYPTOSO="${THERE}/{- platform->sharedlib('libcrypto') -}" 34 1.1 christos LIBSSLSO="${THERE}/{- platform->sharedlib('libssl') -}" 35 1.1 christos 36 1.1 christos SYSNAME=`(uname -s) 2>/dev/null`; 37 1.1 christos case "$SYSNAME" in 38 1.1 christos SunOS|IRIX*) 39 1.1 christos # SunOS and IRIX run-time linkers evaluate alternative 40 1.1 christos # variables depending on target ABI... 41 1.1 christos rld_var=LD_LIBRARY_PATH 42 1.1 christos case "`(/usr/bin/file "$LIBCRYPTOSO") 2>/dev/null`" in 43 1.1 christos *ELF\ 64*SPARC*|*ELF\ 64*AMD64*) 44 1.1 christos [ -n "$LD_LIBRARY_PATH_64" ] && rld_var=LD_LIBRARY_PATH_64 45 1.1 christos LD_PRELOAD_64="$LIBCRYPTOSO $LIBSSLSO"; export LD_PRELOAD_64 46 1.1 christos preload_var=LD_PRELOAD_64 47 1.1 christos ;; 48 1.1 christos *ELF\ 32*SPARC*|*ELF\ 32*80386*) 49 1.1 christos # We only need to change LD_PRELOAD_32 and LD_LIBRARY_PATH_32 50 1.1 christos # on a multi-arch system. Otherwise, trust the fallbacks. 51 1.1 christos if [ -f /lib/64/ld.so.1 ]; then 52 1.1 christos [ -n "$LD_LIBRARY_PATH_32" ] && rld_var=LD_LIBRARY_PATH_32 53 1.1 christos LD_PRELOAD_32="$LIBCRYPTOSO $LIBSSLSO"; export LD_PRELOAD_32 54 1.1 christos preload_var=LD_PRELOAD_32 55 1.1 christos fi 56 1.1 christos ;; 57 1.1 christos # Why are newly built .so's preloaded anyway? Because run-time 58 1.1 christos # .so lookup path embedded into application takes precedence 59 1.1 christos # over LD_LIBRARY_PATH and as result application ends up linking 60 1.1 christos # to previously installed .so's. On IRIX instead of preloading 61 1.1 christos # newly built .so's we trick run-time linker to fail to find 62 1.1 christos # the installed .so by setting _RLD_ROOT variable. 63 1.1 christos *ELF\ 32*MIPS*) 64 1.1 christos #_RLD_LIST="$LIBCRYPTOSO:$LIBSSLSO:DEFAULT"; export _RLD_LIST 65 1.1 christos _RLD_ROOT=/no/such/dir; export _RLD_ROOT 66 1.1 christos eval $rld_var=\"/usr/lib'${'$rld_var':+:$'$rld_var'}'\" 67 1.1 christos preload_var=_RLD_LIST 68 1.1 christos ;; 69 1.1 christos *ELF\ N32*MIPS*) 70 1.1 christos [ -n "$LD_LIBRARYN32_PATH" ] && rld_var=LD_LIBRARYN32_PATH 71 1.1 christos #_RLDN32_LIST="$LIBCRYPTOSO:$LIBSSLSO:DEFAULT"; export _RLDN32_LIST 72 1.1 christos _RLDN32_ROOT=/no/such/dir; export _RLDN32_ROOT 73 1.1 christos eval $rld_var=\"/usr/lib32'${'$rld_var':+:$'$rld_var'}'\" 74 1.1 christos preload_var=_RLDN32_LIST 75 1.1 christos ;; 76 1.1 christos *ELF\ 64*MIPS*) 77 1.1 christos [ -n "$LD_LIBRARY64_PATH" ] && rld_var=LD_LIBRARY64_PATH 78 1.1 christos #_RLD64_LIST="$LIBCRYPTOSO:$LIBSSLSO:DEFAULT"; export _RLD64_LIST 79 1.1 christos _RLD64_ROOT=/no/such/dir; export _RLD64_ROOT 80 1.1 christos eval $rld_var=\"/usr/lib64'${'$rld_var':+:$'$rld_var'}'\" 81 1.1 christos preload_var=_RLD64_LIST 82 1.1 christos ;; 83 1.1 christos esac 84 1.1 christos eval $rld_var=\"${THERE}'${'$rld_var':+:$'$rld_var'}'\"; export $rld_var 85 1.1 christos unset rld_var 86 1.1 christos ;; 87 1.1 christos NONSTOP_KERNEL) 88 1.1 christos # HPE NonStop has a proprietary mechanism for specifying 89 1.1 christos # the location of DLLs. It does not use PATH or variables 90 1.1 christos # commonly used on other platforms. The platform has a limited 91 1.1 christos # environment space keeping extraneous variables to a minimum 92 1.1 christos # is recommended. 93 1.1 christos _RLD_LIB_PATH="${THERE}:$LD_LIBRARY_PATH" 94 1.1 christos export _RLD_LIB_PATH 95 1.1 christos ;; 96 1.1 christos *) LD_LIBRARY_PATH="${THERE}:$LD_LIBRARY_PATH" # Linux, ELF HP-UX 97 1.1 christos DYLD_LIBRARY_PATH="${THERE}:$DYLD_LIBRARY_PATH" # MacOS X 98 1.1 christos SHLIB_PATH="${THERE}:$SHLIB_PATH" # legacy HP-UX 99 1.1 christos LIBPATH="${THERE}:$LIBPATH" # AIX, OS/2 100 1.1 christos export LD_LIBRARY_PATH DYLD_LIBRARY_PATH SHLIB_PATH LIBPATH 101 1.1 christos # Even though $PATH is adjusted [for Windows sake], it doesn't 102 1.1 christos # necessarily does the trick. Trouble is that with introduction 103 1.1 christos # of SafeDllSearchMode in XP/2003 it's more appropriate to copy 104 1.1 christos # .DLLs in vicinity of executable, which is done elsewhere... 105 1.1 christos if [ "$OSTYPE" != msdosdjgpp ]; then 106 1.1 christos PATH="${THERE}:$PATH"; export PATH 107 1.1 christos fi 108 1.1 christos ;; 109 1.1 christos esac 110 1.1 christos 111 1.1 christos {- output_off() unless grep (/-rpath\b/, @{$config{LDFLAGS}}); ""; -} 112 1.1 christos if [ -f "$LIBCRYPTOSO" -a -z "$preload_var" ]; then 113 1.1 christos # Following three lines are major excuse for isolating them into 114 1.1 christos # this wrapper script. Original reason for setting LD_PRELOAD 115 1.1 christos # was to make it possible to pass 'make test' when user linked 116 1.1 christos # with -rpath pointing to previous version installation. Wrapping 117 1.1 christos # it into a script makes it possible to do so on multi-ABI 118 1.1 christos # platforms. 119 1.1 christos case "$SYSNAME" in 120 1.1 christos *BSD) LD_PRELOAD="$LIBCRYPTOSO:$LIBSSLSO" ;; # *BSD 121 1.1 christos *) LD_PRELOAD="$LIBCRYPTOSO $LIBSSLSO" ;; # SunOS, Linux, ELF HP-UX 122 1.1 christos esac 123 1.1 christos _RLD_LIST="$LIBCRYPTOSO:$LIBSSLSO:DEFAULT" # Tru64, o32 IRIX 124 1.1 christos DYLD_INSERT_LIBRARIES="$LIBCRYPTOSO:$LIBSSLSO" # MacOS X 125 1.1 christos export LD_PRELOAD _RLD_LIST DYLD_INSERT_LIBRARIES 126 1.1 christos fi 127 1.1 christos {- output_on() unless grep (/-rpath\b/, @{$config{LDFLAGS}}); ""; -} 128 1.1 christos 129 1.1 christos cmd="$1"; [ -x "$cmd" ] || cmd="$cmd${EXE_EXT}" 130 1.1 christos shift 131 1.1 christos if [ $# -eq 0 ]; then 132 1.1 christos exec "$cmd" # old sh, such as Tru64 4.x, fails to expand empty "$@" 133 1.1 christos else 134 1.1 christos exec "$cmd" "$@" 135 1.1 christos fi 136