blob: 8691d2e0b9892d1ba42feaa6794953e2e6e5b6ae (
plain) (
blame)
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
|
# $FreeBSD$
# Read global symbols from object file.
BEGIN {
modname = ARGV[1]
while ("${NM:='nm'} -g " ARGV[1] | getline) {
if (match($0, /^[^[:space:]]+ [^AU] (.*)$/)) {
syms[$3] = $2
}
}
delete ARGV[1]
}
# De-list symbols from the export list.
{
smbl = $0
if (!(smbl in syms)) {
printf "Symbol %s is not present in %s\n", \
smbl, modname > "/dev/stderr"
}
delete syms[smbl]
}
# Strip commons, make everything else local.
END {
for (member in syms) {
if (syms[member] == "C")
print "-N" member
else
print "-L" member
}
}
|