3 # Copyright 2004 Matt Mackall <mpm@selenic.com>
5 # inspired by perl Bloat-O-Meter (c) 1997 by Andi Kleen
7 # This software may be used and distributed according to the terms
8 # of the GNU General Public License, incorporated herein by reference.
12 if len(sys
.argv
) != 3:
13 sys
.stderr
.write("usage: %s file1 file2\n" % sys
.argv
[0])
18 for l
in os
.popen("nm --size-sort " + file).readlines():
19 size
, type, name
= l
[:-1].split()
21 sym
[name
] = int(size
, 16)
24 old
= getsizes(sys
.argv
[1])
25 new
= getsizes(sys
.argv
[2])
26 grow
, shrink
, add
, remove
, up
, down
= 0, 0, 0, 0, 0, 0
27 delta
, common
= [], {}
34 if name
not in common
:
37 delta
.append((-old
[name
], name
))
40 if name
not in common
:
43 delta
.append((new
[name
], name
))
46 d
= new
.get(name
, 0) - old
.get(name
, 0)
47 if d
>0: grow
, up
= grow
+1, up
+d
48 if d
<0: shrink
, down
= shrink
+1, down
-d
49 delta
.append((d
, name
))
54 print "add/remove: %s/%s grow/shrink: %s/%s up/down: %s/%s (%s)" % \
55 (add
, remove
, grow
, shrink
, up
, -down
, up
-down
)
56 print "%-40s %7s %7s %+7s" % ("function", "old", "new", "delta")
58 if d
: print "%-40s %7s %7s %+7d" % (n
, old
.get(n
,"-"), new
.get(n
,"-"), d
)