blob: d735e3875b5e796ffb5558527ebdead5186bb9b0 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
|
#!/bin/bash
# Copyright © 2016 IBM Corporation
#
# This program is free software; you can redistribute it and/or
# modify it under the terms of the GNU General Public License
# as published by the Free Software Foundation; either version
# 2 of the License, or (at your option) any later version.
#
# This script checks the relocations of a vmlinux for "suspicious"
# branches from unrelocated code (head_64.S code).
# Turn this on if you want more debug output:
# set -x
# Have Kbuild supply the path to objdump so we handle cross compilation.
objdump="$1"
vmlinux="$2"
#__end_interrupts should be located within the first 64K
kstart=0xc000000000000000
printf -v kend '0x%x' $(( kstart + 0x10000 ))
end_intr=0x$(
$objdump -R -d --start-address="$kstart" --stop-address="$kend" "$vmlinux" |
awk '$2 == "<__end_interrupts>:" { print $1 }'
)
BRANCHES=$(
$objdump -R -D --start-address="$kstart" --stop-address="$end_intr" "$vmlinux" |
grep -e "^c[0-9a-f]*:[[:space:]]*\([0-9a-f][0-9a-f][[:space:]]\)\{4\}[[:space:]]*b" |
sed -e '/\<__start_initialization_multiplatform>/d' \
-e '/b.\?.\?ctr/d' \
-e '/b.\?.\?lr/d' \
-e 's/\bbt.\?[[:space:]]*[[:digit:]][[:digit:]]*,/beq/' \
-e 's/\bbf.\?[[:space:]]*[[:digit:]][[:digit:]]*,/bne/' \
-e 's/[[:space:]]0x/ /' \
-e 's/://' |
awk '{ print $1 ":" $6 ":0x" $7 ":" $8 " "}'
)
for tuple in $BRANCHES; do
from=$(echo "$tuple" | cut -d':' -f1)
branch=$(echo "$tuple" | cut -d':' -f2)
to=$(echo "$tuple" | cut -d':' -f3 | sed 's/cr[0-7],//')
sym=$(echo "$tuple" | cut -d':' -f4)
if (( to > end_intr )); then
if [ -z "$bad_branches" ]; then
echo "WARNING: Unrelocated relative branches"
bad_branches="yes"
fi
echo "$from $branch-> $to $sym"
fi
done
if [ -z "$bad_branches" ]; then
exit 0
fi
|