2 # (c) 2014, Sasha Levin <sasha.levin@oracle.com>
7 echo " $0 [vmlinux] [base path]"
16 # The structure of symbol at this point is:
17 # ([name]+[offset]/[total length])
20 # do_basic_setup+0x9c/0xbf
22 # Remove the englobing parenthesis
26 # Strip the symbol name so that we could look it up
27 local name
=${symbol%+*}
29 # Use 'nm vmlinux' to figure out the base address of said symbol.
30 # It's actually faster to call it every time than to load it
32 if [[ "${cache[$name]+isset}" == "isset" ]]; then
33 local base_addr
=${cache[$name]}
35 local base_addr
=$
(nm
"$vmlinux" |
grep -i ' t ' |
awk "/ $name\$/ {print \$1}" |
head -n1)
36 cache
["$name"]="$base_addr"
38 # Let's start doing the math to get the exact address into the
39 # symbol. First, strip out the symbol total length.
40 local expr=${symbol%/*}
42 # Now, replace the symbol name with the base address we found
44 expr=${expr/$name/0x$base_addr}
46 # Evaluate it to find the actual address
48 local address
=$
(printf "%x\n" "$expr")
50 # Pass it to addr2line to get filename and line number
51 # Could get more than one result
52 if [[ "${cache[$address]+isset}" == "isset" ]]; then
53 local code
=${cache[$address]}
55 local code
=$
(addr2line
-i -e "$vmlinux" "$address")
59 # addr2line doesn't return a proper error code if it fails, so
60 # we detect it using the value it prints so that we could preserve
61 # the offset/size into the function and bail out
62 if [[ $code == "??:0" ]]; then
66 # Strip out the base of the path
67 code
=${code#$basepath/}
69 # In the case of inlines, move everything to same line
70 code
=${code//$'\n'/' '}
72 # Replace old address with pretty line numbers
73 symbol
="$name ($code)"
77 local scripts
=`dirname "${BASH_SOURCE[0]}"`
79 echo "$1" |
$scripts/decodecode
88 # Remove hex numbers. Do it ourselves until it happens in the
91 # We need to know the index of the last element before we
92 # remove elements because arrays are sparse
93 local last
=$
(( ${#words[@]} - 1 ))
95 for i
in "${!words[@]}"; do
97 if [[ ${words[$i]} =~ \
[\
<([^
]]+)\
>\
] ]]; then
101 # Format timestamps with tabs
102 if [[ ${words[$i]} == \
[ && ${words[$i+1]} == *\
] ]]; then
104 words
[$i+1]=$
(printf "[%13s\n" "${words[$i+1]}")
108 # The symbol is the last element, process it
109 symbol
=${words[$last]}
111 parse_symbol
# modifies $symbol
113 # Add up the line number to the symbol
114 echo "${words[@]}" "$symbol"
118 # Let's see if we have an address in the line
119 if [[ $line =~ \
[\
<([^
]]+)\
>\
] ]]; then
120 # Translate address to line numbers
123 elif [[ $line == *Code
:* ]]; then
126 # Nothing special in this line, show it as is