blob: 61aa3f5789b6e6da561b78370869a795073580e0 (
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
|
#!/bin/sh
#
# Print a summary of how often each named object appears in a talloc report.
#
# usage:
# talloc_count.sh my_talloc_report.txt
# or:
# osmo_interact_vty.py -p 4242 -c 'show talloc-context application full' | talloc_count.sh
#
# produces output like:
# 1 struct foo
# 1 struct log_info
# 1 struct log_info_cat
# 21 msgb
# 1391 SCCP-SCOC(N)[N]
# 1402 struct osmo_fsm_inst
# [...]
f="$1"
tmpdir="$(mktemp -d)"
trap "rm -rf \"$tmpdir\"" EXIT
# without input file, read stdin
if [ "x$f" = "x" ]; then
f="$tmpdir/input"
cat > $f
fi
mangled="$tmpdir/mangled"
grep contains "$f" \
| sed 's/[ \t]*contains.*//' \
| sed 's/^[ \t]*//' \
| sed 's/[ \t][ \t]*/ /g' \
| grep -v '^$' \
| grep -v '^[0-9]\+$' \
| sed 's/0x[0-9a-fA-F]\+/N/g' \
| sed 's/\<[0-9a-fA-F]\+\>/N/g' \
| sed 's/[0-9]\+/N/g' \
| sort \
> "$mangled"
count() {
name="$1"
nr="$(grep -Fx "$name" "$mangled" | wc -l)"
printf "%6d $name\\n" $nr
}
{
cat "$mangled" | uniq | while read type; do
count "$type"
done
} | sort -h
|
