#!/usr/bin/perl

# Read two files produced by the stackusage script, and show the
# delta between them.
#
# Currently, only shows changes for functions listed in both files. We
# could add an option to show also functions which have vanished or
# appeared (which would often be due to gcc making other inlining
# decisions).
#
# Another possible option would be a minimum absolute value for the
# delta.
#
# A third possibility is for sorting by delta, but that can be
# achieved by piping to sort -k5,5g.

sub read_stack_usage_file {
    my %su;
    my $f = shift;
    open(my $fh, '<', $f)
	or die "cannot open $f: $!";
    while (<$fh>) {
	chomp;
	my ($file, $func, $size, $type) = split;
	# Old versions of gcc (at least 4.7) have an annoying quirk in
	# that a (static) function whose name has been changed into
	# for example ext4_find_unwritten_pgoff.isra.11 will show up
	# in the .su file with a name of just "11". Since such a
	# numeric suffix is likely to change across different
	# commits/compilers/.configs or whatever else we're trying to
	# tweak, we can't really track those functions, so we just
	# silently skip them.
	#
	# Newer gcc (at least 5.0) report the full name, so again,
	# since the suffix is likely to change, we strip it.
	next if $func =~ m/^[0-9]+$/;
	$func =~ s/\..*$//;
	# Line numbers are likely to change; strip those.
	$file =~ s/:[0-9]+$//;
	$su{"${file}\t${func}"} = {size => $size, type => $type};
    }
    close($fh);
    return \%su;
}

@ARGV == 2
    or die "usage: $0 <old> <new>";

my $old = read_stack_usage_file($ARGV[0]);
my $new = read_stack_usage_file($ARGV[1]);
my @common = sort grep {exists $new->{$_}} keys %$old;
for (@common) {
    my $x = $old->{$_}{size};
    my $y = $new->{$_}{size};
    my $delta = $y - $x;
    if ($delta) {
	printf "%s\t%d\t%d\t%+d\n", $_, $x, $y, $delta;
    }
}
te-remove'>log</a><a href='/cgit.cgi/linux/net-next.git/tree/include/xen/arm?h=nds-private-remove&amp;id=396bf4cd835e62d70fad4a03a8963e61f19021f2'>tree</a><a class='active' href='/cgit.cgi/linux/net-next.git/commit/include/xen/arm?h=nds-private-remove&amp;id=396bf4cd835e62d70fad4a03a8963e61f19021f2'>commit</a><a href='/cgit.cgi/linux/net-next.git/diff/include/xen/arm?h=nds-private-remove&amp;id=396bf4cd835e62d70fad4a03a8963e61f19021f2'>diff</a></td><td class='form'><form class='right' method='get' action='/cgit.cgi/linux/net-next.git/log/include/xen/arm'>
<input type='hidden' name='h' value='nds-private-remove'/><input type='hidden' name='id' value='396bf4cd835e62d70fad4a03a8963e61f19021f2'/><select name='qt'>
<option value='grep'>log msg</option>
<option value='author'>author</option>
<option value='committer'>committer</option>
<option value='range'>range</option>
</select>
<input class='txt' type='search' size='10' name='q' value=''/>
<input type='submit' value='search'/>
</form>
</td></tr></table>
<div class='path'>path: <a href='/cgit.cgi/linux/net-next.git/commit/?h=nds-private-remove&amp;id=396bf4cd835e62d70fad4a03a8963e61f19021f2'>root</a>/<a href='/cgit.cgi/linux/net-next.git/commit/include?h=nds-private-remove&amp;id=396bf4cd835e62d70fad4a03a8963e61f19021f2'>include</a>/<a href='/cgit.cgi/linux/net-next.git/commit/include/xen?h=nds-private-remove&amp;id=396bf4cd835e62d70fad4a03a8963e61f19021f2'>xen</a>/<a href='/cgit.cgi/linux/net-next.git/commit/include/xen/arm?h=nds-private-remove&amp;id=396bf4cd835e62d70fad4a03a8963e61f19021f2'>arm</a></div><div class='content'><div class='cgit-panel'><b>diff options</b><form method='get'><input type='hidden' name='h' value='nds-private-remove'/><input type='hidden' name='id' value='396bf4cd835e62d70fad4a03a8963e61f19021f2'/><table><tr><td colspan='2'/></tr><tr><td class='label'>context:</td><td class='ctrl'><select name='context' onchange='this.form.submit();'><option value='1'>1</option><option value='2'>2</option><option value='3' selected='selected'>3</option><option value='4'>4</option><option value='5'>5</option><option value='6'>6</option><option value='7'>7</option><option value='8'>8</option><option value='9'>9</option><option value='10'>10</option><option value='15'>15</option><option value='20'>20</option><option value='25'>25</option><option value='30'>30</option><option value='35'>35</option><option value='40'>40</option></select></td></tr><tr><td class='label'>space:</td><td class='ctrl'><select name='ignorews' onchange='this.form.submit();'><option value='0' selected='selected'>include</option><option value='1'>ignore</option></select></td></tr><tr><td class='label'>mode:</td><td class='ctrl'><select name='dt' onchange='this.form.submit();'><option value='0' selected='selected'>unified</option><option value='1'>ssdiff</option><option value='2'>stat only</option></select></td></tr><tr><td/><td class='ctrl'><noscript><input type='submit' value='reload'/></noscript></td></tr></table></form></div><table summary='commit info' class='commit-info'>
<tr><th>author</th><td>Linus Torvalds &lt;torvalds@linux-foundation.org&gt;</td><td class='right'>2017-02-06 14:16:23 -0800</td></tr>
<tr><th>committer</th><td>Linus Torvalds &lt;torvalds@linux-foundation.org&gt;</td><td class='right'>2017-02-06 14:16:23 -0800</td></tr>
<tr><th>commit</th><td colspan='2' class='oid'><a href='/cgit.cgi/linux/net-next.git/commit/include/xen/arm?h=nds-private-remove&amp;id=396bf4cd835e62d70fad4a03a8963e61f19021f2'>396bf4cd835e62d70fad4a03a8963e61f19021f2</a> (<a href='/cgit.cgi/linux/net-next.git/patch/include/xen/arm?id=396bf4cd835e62d70fad4a03a8963e61f19021f2'>patch</a>)</td></tr>
<tr><th>tree</th><td colspan='2' class='oid'><a href='/cgit.cgi/linux/net-next.git/tree/?h=nds-private-remove&amp;id=396bf4cd835e62d70fad4a03a8963e61f19021f2'>79ac8f33554260fea1a8d43e6f8c4c5460115f45</a> /<a href='/cgit.cgi/linux/net-next.git/tree/include/xen/arm?h=nds-private-remove&amp;id=396bf4cd835e62d70fad4a03a8963e61f19021f2'>include/xen/arm</a></td></tr>
<tr><th>parent</th><td colspan='2' class='oid'><a href='/cgit.cgi/linux/net-next.git/commit/include/xen/arm?h=nds-private-remove&amp;id=d5adbfcd5f7bcc6fa58a41c5c5ada0e5c826ce2c'>d5adbfcd5f7bcc6fa58a41c5c5ada0e5c826ce2c</a> (<a href='/cgit.cgi/linux/net-next.git/diff/include/xen/arm?h=nds-private-remove&amp;id=396bf4cd835e62d70fad4a03a8963e61f19021f2&amp;id2=d5adbfcd5f7bcc6fa58a41c5c5ada0e5c826ce2c'>diff</a>)</td></tr><tr><th>parent</th><td colspan='2' class='oid'><a href='/cgit.cgi/linux/net-next.git/commit/include/xen/arm?h=nds-private-remove&amp;id=7c2cf1c4615cc2f576d0604406cdf0065f00b83b'>7c2cf1c4615cc2f576d0604406cdf0065f00b83b</a> (<a href='/cgit.cgi/linux/net-next.git/diff/include/xen/arm?h=nds-private-remove&amp;id=396bf4cd835e62d70fad4a03a8963e61f19021f2&amp;id2=7c2cf1c4615cc2f576d0604406cdf0065f00b83b'>diff</a>)</td></tr></table>
<div class='commit-subject'>Merge branch 'linus' of git://git.kernel.org/pub/scm/linux/kernel/git/herbert/crypto-2.6</div><div class='commit-msg'>Pull crypto fixes from Herbert Xu:

 - use-after-free in algif_aead

 - modular aesni regression when pcbc is modular but absent

 - bug causing IO page faults in ccp

 - double list add in ccp

 - NULL pointer dereference in qat (two patches)

 - panic in chcr

 - NULL pointer dereference in chcr

 - out-of-bound access in chcr

* 'linus' of git://git.kernel.org/pub/scm/linux/kernel/git/herbert/crypto-2.6:
  crypto: chcr - Fix key length for RFC4106
  crypto: algif_aead - Fix kernel panic on list_del
  crypto: aesni - Fix failure when pcbc module is absent
  crypto: ccp - Fix double add when creating new DMA command
  crypto: ccp - Fix DMA operations when IOMMU is enabled
  crypto: chcr - Check device is allocated before use
  crypto: chcr - Fix panic on dma_unmap_sg
  crypto: qat - zero esram only for DH85x devices
  crypto: qat - fix bar discovery for c62x
</div><div class='diffstat-header'><a href='/cgit.cgi/linux/net-next.git/diff/?h=nds-private-remove&amp;id=396bf4cd835e62d70fad4a03a8963e61f19021f2'>Diffstat</a> (limited to 'include/xen/arm')</div><table summary='diffstat' class='diffstat'>