1 # Copyright (C) 2013, 2015 Red Hat, Inc. 2 # This file is part of elfutils. 3 # 4 # This file is free software; you can redistribute it and/or modify 5 # it under the terms of the GNU General Public License as published by 6 # the Free Software Foundation; either version 3 of the License, or 7 # (at your option) any later version. 8 # 9 # elfutils is distributed in the hope that it will be useful, but 10 # WITHOUT ANY WARRANTY; without even the implied warranty of 11 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 12 # GNU General Public License for more details. 13 # 14 # You should have received a copy of the GNU General Public License 15 # along with this program. If not, see <http://www.gnu.org/licenses/>. 16 17 . $srcdir/test-subr.sh 18 19 # Verify one of the backtraced threads contains function 'main'. 20 check_main() 21 { 22 if grep -w main $1; then 23 return 24 fi 25 echo >&2 $2: no main 26 false 27 } 28 29 # Without proper ELF symbols resolution we could get inappropriate weak 30 # symbol "gsignal" with the same address as the correct symbol "raise". 31 # It was fixed by GIT commit 78dec228b3cfb2f9300cd0b682ebf416c9674c91 . 32 # [patch] Improve ELF symbols preference (global > weak) 33 # https://lists.fedorahosted.org/pipermail/elfutils-devel/2012-October/002624.html 34 check_gsignal() 35 { 36 if ! grep -w gsignal $1; then 37 return 38 fi 39 echo >&2 $2: found gsignal 40 false 41 } 42 43 # Verify the STDERR output does not contain unexpected errors. 44 # In some cases we cannot reliably find out we got behind _start as some 45 # operating system do not properly terminate CFI by undefined PC. 46 # Ignore it here as it is a bug of OS, not a bug of elfutils. 47 check_err() 48 { 49 if [ $(egrep -v <$1 'dwfl_thread_getframes: (No DWARF information found|no matching address range)$' \ 50 | wc -c) \ 51 -eq 0 ] 52 then 53 return 54 fi 55 echo >&2 $2: neither empty nor just out of DWARF 56 false 57 } 58 59 check_all() 60 { 61 bt=$1 62 err=$2 63 testname=$3 64 check_main $bt $testname 65 check_gsignal $bt $testname 66 check_err $err $testname 67 } 68 69 check_unsupported() 70 { 71 err=$1 72 testname=$2 73 if grep -q ': Unwinding not supported for this architecture$' $err; then 74 echo >&2 $testname: arch not supported 75 exit 77 76 fi 77 } 78 79 check_native_unsupported() 80 { 81 err=$1 82 testname=$2 83 check_unsupported $err $testname 84 85 # ARM is special. It is supported, but it doesn't use .eh_frame by default 86 # making the native tests fail unless debuginfo (for glibc) is installed 87 # and we can fall back on .debug_frame for the CFI. 88 case "`uname -m`" in 89 arm* ) 90 if egrep 'dwfl_thread_getframes(.*)No DWARF information found' $err; then 91 echo >&2 $testname: arm needs debuginfo installed for all libraries 92 exit 77 93 fi 94 ;; 95 esac 96 } 97 98 check_core() 99 { 100 arch=$1 101 testfiles backtrace.$arch.{exec,core} 102 tempfiles backtrace.$arch.{bt,err} 103 echo ./backtrace ./backtrace.$arch.{exec,core} 104 testrun ${abs_builddir}/backtrace -e ./backtrace.$arch.exec --core=./backtrace.$arch.core 1>backtrace.$arch.bt 2>backtrace.$arch.err || true 105 cat backtrace.$arch.{bt,err} 106 check_unsupported backtrace.$arch.err backtrace.$arch.core 107 check_all backtrace.$arch.{bt,err} backtrace.$arch.core 108 } 109 110 # Backtrace live process. 111 # Do not abort on non-zero exit code due to some warnings of ./backtrace 112 # - see function check_err. 113 check_native() 114 { 115 child=$1 116 tempfiles $child.{bt,err} 117 (set +ex; testrun ${abs_builddir}/backtrace --backtrace-exec=${abs_builddir}/$child 1>$child.bt 2>$child.err; true) 118 cat $child.{bt,err} 119 check_native_unsupported $child.err $child 120 check_all $child.{bt,err} $child 121 } 122 123 # Backtrace core file. 124 check_native_core() 125 { 126 child=$1 127 128 # Disable valgrind while dumping core. 129 SAVED_VALGRIND_CMD="$VALGRIND_CMD" 130 unset VALGRIND_CMD 131 132 # Skip the test if we cannot adjust core ulimit. 133 core="core.`ulimit -c unlimited || exit 77; set +ex; testrun ${abs_builddir}/$child --gencore; true`" 134 # see if /proc/sys/kernel/core_uses_pid is set to 0 135 if [ -f core ]; then 136 mv core "$core" 137 fi 138 if [ ! -f "$core" ]; then echo "No $core file generated"; exit 77; fi 139 140 if [ "x$SAVED_VALGRIND_CMD" != "x" ]; then 141 VALGRIND_CMD="$SAVED_VALGRIND_CMD" 142 export VALGRIND_CMD 143 fi 144 145 # Do not abort on non-zero exit code due to some warnings of ./backtrace 146 # - see function check_err. 147 tempfiles $core{,.{bt,err}} 148 (set +ex; testrun ${abs_builddir}/backtrace -e ${abs_builddir}/$child --core=$core 1>$core.bt 2>$core.err; true) 149 cat $core.{bt,err} 150 check_native_unsupported $core.err $child-$core 151 check_all $core.{bt,err} $child-$core 152 } 153