зеркало из https://github.com/mozilla/gecko-dev.git
Adding perl script to fix up nm output for Mac OS X, and adding 'unix' scripts that work for Mac OS X and linux.
This commit is contained in:
sfraser%netscape.com
Родитель
127e1d80a8
Коммит
540ad54c46
|
|
@ -0,0 +1,184 @@
|
|||
#!/bin/bash
|
||||
#
|
||||
# The contents of this file are subject to the Mozilla Public
|
||||
# License Version 1.1 (the "License"); you may not use this file
|
||||
# except in compliance with the License. You may obtain a copy of
|
||||
# the License at http://www.mozilla.org/MPL/
|
||||
#
|
||||
# Software distributed under the License is distributed on an "AS
|
||||
# IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
|
||||
# implied. See the License for the specific language governing
|
||||
# rights and limitations under the License.
|
||||
#
|
||||
# The Original Code is autosummary.linx.bash code, released
|
||||
# Oct 10, 2002.
|
||||
#
|
||||
# The Initial Developer of the Original Code is Netscape
|
||||
# Communications Corporation. Portions created by Netscape are
|
||||
# Copyright (C) 2002 Netscape Communications Corporation. All
|
||||
# Rights Reserved.
|
||||
#
|
||||
# Contributor(s):
|
||||
# Garrett Arch Blythe, 10-October-2002
|
||||
# Simon Fraser <sfraser@netscape.com>
|
||||
#
|
||||
# Alternatively, the contents of this file may be used under the
|
||||
# terms of the GNU Public License (the "GPL"), in which case the
|
||||
# provisions of the GPL are applicable instead of those above.
|
||||
# If you wish to allow use of your version of this file only
|
||||
# under the terms of the GPL and not to allow others to use your
|
||||
# version of this file under the MPL, indicate your decision by
|
||||
# deleting the provisions above and replace them with the notice
|
||||
# and other provisions required by the GPL. If you do not delete
|
||||
# the provisions above, a recipient may use your version of this
|
||||
# file under either the MPL or the GPL.
|
||||
#
|
||||
|
||||
#
|
||||
# A little help for my friends.
|
||||
#
|
||||
if [ "-h" == "$1" ];then
|
||||
SHOWHELP="1"
|
||||
fi
|
||||
if [ "--help" == "$1" ];then
|
||||
SHOWHELP="1"
|
||||
fi
|
||||
if [ "" == "$1" ]; then
|
||||
SHOWHELP="1"
|
||||
fi
|
||||
if [ "" == "$2" ]; then
|
||||
SHOWHELP="1"
|
||||
fi
|
||||
if [ "" == "$3" ]; then
|
||||
SHOWHELP="1"
|
||||
fi
|
||||
|
||||
|
||||
#
|
||||
# Show the help if required.
|
||||
#
|
||||
if [ $SHOWHELP ]; then
|
||||
echo "usage: $0 <save_results> <old_results> <summary>"
|
||||
echo " <save_results> is a file that will receive the results of this run."
|
||||
echo " This file can be used in a future run as the old results."
|
||||
echo " <old_results> is a results file from a previous run."
|
||||
echo " It is used to diff with current results and come up with a summary"
|
||||
echo " of changes."
|
||||
echo " It is OK if the file does not exist, just supply the argument."
|
||||
echo " <summary> is a file which will contain a human readable report."
|
||||
echo " This file is most useful by providing more information than the"
|
||||
echo " normally single digit output of this script."
|
||||
echo ""
|
||||
echo "Run this command from the parent directory of the mozilla tree."
|
||||
echo ""
|
||||
echo "This command will output two numbers to stdout that will represent"
|
||||
echo " the total size of all code and data, and a delta from the prior."
|
||||
echo " the old results."
|
||||
echo "For much more detail on size drifts refer to the summary report."
|
||||
echo ""
|
||||
echo "This tool reports on all executables in the directory tree."
|
||||
exit
|
||||
fi
|
||||
|
||||
|
||||
#
|
||||
# Stash our arguments away.
|
||||
#
|
||||
COPYSORTTSV="$1"
|
||||
OLDTSVFILE="$2"
|
||||
SUMMARYFILE="$3"
|
||||
|
||||
OSTYPE=`uname -s`
|
||||
|
||||
#
|
||||
# Create our temporary directory.
|
||||
# mktemp on Darwin doesn't support -d (suckage)
|
||||
#
|
||||
if [ $OSTYPE == "Darwin" ]; then
|
||||
MYTMPDIR=`mktemp ./codesighs.tmp.XXXXXXXX`
|
||||
rm $MYTMPDIR
|
||||
mkdir $MYTMPDIR
|
||||
else
|
||||
MYTMPDIR=`mktemp -d ./codesighs.tmp.XXXXXXXX`
|
||||
fi
|
||||
|
||||
#
|
||||
# Find all relevant files.
|
||||
#
|
||||
ALLFILES="$MYTMPDIR/allfiles.list"
|
||||
|
||||
if [ $OSTYPE == "Darwin" ]; then
|
||||
find ./mozilla/dist/bin ! -type d > $ALLFILES
|
||||
else
|
||||
find ./mozilla/dist/bin -not -type d > $ALLFILES
|
||||
fi
|
||||
|
||||
#
|
||||
# Produce the cumulative nm output.
|
||||
# We are very particular on what switches to use.
|
||||
# nm --format=bsd --size-sort --print-file-name --demangle
|
||||
#
|
||||
# Darwin (Mac OS X) has a lame nm that we have to wrap in a perl
|
||||
# script to get decent output.
|
||||
#
|
||||
NMRESULTS="$MYTMPDIR/nm.txt"
|
||||
if [ $OSTYPE == "Darwin" ]; then
|
||||
xargs -n 1 ./mozilla/tools/codesighs/nm_wrap_osx.pl < $ALLFILES > $NMRESULTS 2> /dev/null
|
||||
else
|
||||
xargs -n 1 nm --format=bsd --size-sort --print-file-name --demangle < $ALLFILES > $NMRESULTS 2> /dev/null
|
||||
fi
|
||||
|
||||
|
||||
#
|
||||
# Produce the TSV output.
|
||||
#
|
||||
RAWTSVFILE="$MYTMPDIR/raw.tsv"
|
||||
./mozilla/dist/bin/nm2tsv --input $NMRESULTS > $RAWTSVFILE
|
||||
|
||||
|
||||
#
|
||||
# Sort the TSV output for useful diffing and eyeballing in general.
|
||||
#
|
||||
sort -r $RAWTSVFILE > $COPYSORTTSV
|
||||
|
||||
|
||||
#
|
||||
# If a historical file was specified, diff it with our sorted tsv values.
|
||||
# Run it through a tool to summaries the diffs to the module
|
||||
# level report.
|
||||
# Otherwise, generate the module level report from our new data.
|
||||
#
|
||||
rm -f $SUMMARYFILE
|
||||
DIFFFILE="$MYTMPDIR/diff.txt"
|
||||
if [ -e $OLDTSVFILE ]; then
|
||||
diff $OLDTSVFILE $COPYSORTTSV > $DIFFFILE
|
||||
./mozilla/dist/bin/maptsvdifftool --input $DIFFFILE >> $SUMMARYFILE
|
||||
else
|
||||
./mozilla/dist/bin/codesighs --modules --input $COPYSORTTSV >> $SUMMARYFILE
|
||||
fi
|
||||
|
||||
|
||||
#
|
||||
# Output our numbers, that will let tinderbox specify everything all
|
||||
# at once.
|
||||
# First number is in fact the total size of all code and data in the map
|
||||
# files parsed.
|
||||
# Second number, if present, is growth/shrinkage.
|
||||
#
|
||||
|
||||
if [ $TINDERBOX_OUTPUT ]; then
|
||||
echo -n "__codesize:"
|
||||
fi
|
||||
./mozilla/dist/bin/codesighs --totalonly --input $COPYSORTTSV
|
||||
|
||||
if [ -e $DIFFFILE ]; then
|
||||
if [ $TINDERBOX_OUTPUT ]; then
|
||||
echo -n "__codesizeDiff:"
|
||||
fi
|
||||
./mozilla/dist/bin/maptsvdifftool --summary --input $DIFFFILE
|
||||
fi
|
||||
|
||||
#
|
||||
# Remove our temporary directory.
|
||||
#
|
||||
#rm -rf $MYTMPDIR
|
||||
|
|
@ -0,0 +1,189 @@
|
|||
#!/bin/bash
|
||||
#
|
||||
# The contents of this file are subject to the Mozilla Public
|
||||
# License Version 1.1 (the "License"); you may not use this file
|
||||
# except in compliance with the License. You may obtain a copy of
|
||||
# the License at http://www.mozilla.org/MPL/
|
||||
#
|
||||
# Software distributed under the License is distributed on an "AS
|
||||
# IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
|
||||
# implied. See the License for the specific language governing
|
||||
# rights and limitations under the License.
|
||||
#
|
||||
# The Original Code is basesummary.linx.bash code, released
|
||||
# Nov 15, 2002.
|
||||
#
|
||||
# The Initial Developer of the Original Code is Netscape
|
||||
# Communications Corporation. Portions created by Netscape are
|
||||
# Copyright (C) 2002 Netscape Communications Corporation. All
|
||||
# Rights Reserved.
|
||||
#
|
||||
# Contributor(s):
|
||||
# Garrett Arch Blythe, 15-November-2002
|
||||
# Simon Fraser <sfraser@netscape.com>
|
||||
#
|
||||
# Alternatively, the contents of this file may be used under the
|
||||
# terms of the GNU Public License (the "GPL"), in which case the
|
||||
# provisions of the GPL are applicable instead of those above.
|
||||
# If you wish to allow use of your version of this file only
|
||||
# under the terms of the GPL and not to allow others to use your
|
||||
# version of this file under the MPL, indicate your decision by
|
||||
# deleting the provisions above and replace them with the notice
|
||||
# and other provisions required by the GPL. If you do not delete
|
||||
# the provisions above, a recipient may use your version of this
|
||||
# file under either the MPL or the GPL.
|
||||
#
|
||||
|
||||
OSTYPE=`uname -s`
|
||||
|
||||
if [ $OSTYPE == "Darwin" ]; then
|
||||
MANIFEST="./mozilla/embedding/config/basebrowser-mac-macho"
|
||||
else
|
||||
MANIFEST="./mozilla/embedding/config/basebrowser-unix"
|
||||
fi
|
||||
|
||||
#
|
||||
# A little help for my friends.
|
||||
#
|
||||
if [ "-h" == "$1" ];then
|
||||
SHOWHELP="1"
|
||||
fi
|
||||
if [ "--help" == "$1" ];then
|
||||
SHOWHELP="1"
|
||||
fi
|
||||
if [ "" == "$1" ]; then
|
||||
SHOWHELP="1"
|
||||
fi
|
||||
if [ "" == "$2" ]; then
|
||||
SHOWHELP="1"
|
||||
fi
|
||||
if [ "" == "$3" ]; then
|
||||
SHOWHELP="1"
|
||||
fi
|
||||
|
||||
|
||||
#
|
||||
# Show the help if required.
|
||||
#
|
||||
if [ $SHOWHELP ]; then
|
||||
echo "usage: $0 <save_results> <old_results> <summary>"
|
||||
echo " <save_results> is a file that will receive the results of this run."
|
||||
echo " This file can be used in a future run as the old results."
|
||||
echo " <old_results> is a results file from a previous run."
|
||||
echo " It is used to diff with current results and come up with a summary"
|
||||
echo " of changes."
|
||||
echo " It is OK if the file does not exist, just supply the argument."
|
||||
echo " <summary> is a file which will contain a human readable report."
|
||||
echo " This file is most useful by providing more information than the"
|
||||
echo " normally single digit output of this script."
|
||||
echo ""
|
||||
echo "Run this command from the parent directory of the mozilla tree."
|
||||
echo ""
|
||||
echo "This command will output two numbers to stdout that will represent"
|
||||
echo " the total size of all code and data, and a delta from the prior."
|
||||
echo " the old results."
|
||||
echo "For much more detail on size drifts refer to the summary report."
|
||||
echo ""
|
||||
echo "This tool reports on executables listed in the following file:"
|
||||
echo "$MANIFEST"
|
||||
exit
|
||||
fi
|
||||
|
||||
|
||||
#
|
||||
# Stash our arguments away.
|
||||
#
|
||||
COPYSORTTSV="$1"
|
||||
OLDTSVFILE="$2"
|
||||
SUMMARYFILE="$3"
|
||||
|
||||
|
||||
|
||||
#
|
||||
# Create our temporary directory.
|
||||
# mktemp on Darwin doesn't support -d (suckage)
|
||||
#
|
||||
if [ $OSTYPE == "Darwin" ]; then
|
||||
MYTMPDIR=`mktemp ./codesighs.tmp.XXXXXXXX`
|
||||
rm $MYTMPDIR
|
||||
mkdir $MYTMPDIR
|
||||
else
|
||||
MYTMPDIR=`mktemp -d ./codesighs.tmp.XXXXXXXX`
|
||||
fi
|
||||
|
||||
|
||||
#
|
||||
# Find all relevant files.
|
||||
#
|
||||
ALLFILES="$MYTMPDIR/allfiles.list"
|
||||
grep -v '[\;\[]' < $MANIFEST | grep -v '^$' | sed 's/^/\.\/mozilla\/dist\/bin\//' > $ALLFILES
|
||||
|
||||
|
||||
#
|
||||
# Produce the cumulative nm output.
|
||||
# We are very particular on what switches to use.
|
||||
# nm --format=bsd --size-sort --print-file-name --demangle
|
||||
#
|
||||
# Darwin (Mac OS X) has a lame nm that we have to wrap in a perl
|
||||
# script to get decent output.
|
||||
#
|
||||
NMRESULTS="$MYTMPDIR/nm.txt"
|
||||
if [ $OSTYPE == "Darwin" ]; then
|
||||
xargs -n 1 ./mozilla/tools/codesighs/nm_wrap_osx.pl < $ALLFILES > $NMRESULTS 2> /dev/null
|
||||
else
|
||||
xargs -n 1 nm --format=bsd --size-sort --print-file-name --demangle < $ALLFILES > $NMRESULTS 2> /dev/null
|
||||
fi
|
||||
|
||||
#
|
||||
# Produce the TSV output.
|
||||
#
|
||||
RAWTSVFILE="$MYTMPDIR/raw.tsv"
|
||||
./mozilla/dist/bin/nm2tsv --input $NMRESULTS > $RAWTSVFILE
|
||||
|
||||
|
||||
#
|
||||
# Sort the TSV output for useful diffing and eyeballing in general.
|
||||
#
|
||||
sort -r $RAWTSVFILE > $COPYSORTTSV
|
||||
|
||||
|
||||
#
|
||||
# If a historical file was specified, diff it with our sorted tsv values.
|
||||
# Run it through a tool to summaries the diffs to the module
|
||||
# level report.
|
||||
# Otherwise, generate the module level report from our new data.
|
||||
#
|
||||
rm -f $SUMMARYFILE
|
||||
DIFFFILE="$MYTMPDIR/diff.txt"
|
||||
if [ -e $OLDTSVFILE ]; then
|
||||
diff $OLDTSVFILE $COPYSORTTSV > $DIFFFILE
|
||||
./mozilla/dist/bin/maptsvdifftool --input $DIFFFILE >> $SUMMARYFILE
|
||||
else
|
||||
./mozilla/dist/bin/codesighs --modules --input $COPYSORTTSV >> $SUMMARYFILE
|
||||
fi
|
||||
|
||||
|
||||
#
|
||||
# Output our numbers, that will let tinderbox specify everything all
|
||||
# at once.
|
||||
# First number is in fact the total size of all code and data in the map
|
||||
# files parsed.
|
||||
# Second number, if present, is growth/shrinkage.
|
||||
#
|
||||
|
||||
if [ $TINDERBOX_OUTPUT ]; then
|
||||
echo -n "__codesize:"
|
||||
fi
|
||||
./mozilla/dist/bin/codesighs --totalonly --input $COPYSORTTSV
|
||||
|
||||
if [ -e $DIFFFILE ]; then
|
||||
if [ $TINDERBOX_OUTPUT ]; then
|
||||
echo -n "__codesizeDiff:"
|
||||
fi
|
||||
./mozilla/dist/bin/maptsvdifftool --summary --input $DIFFFILE
|
||||
fi
|
||||
|
||||
#
|
||||
# Remove our temporary directory.
|
||||
#
|
||||
#rm -rf $MYTMPDIR
|
||||
|
|
@ -0,0 +1,92 @@
|
|||
#!/usr/bin/perl -w
|
||||
#
|
||||
# The contents of this file are subject to the Mozilla Public
|
||||
# License Version 1.1 (the "License"); you may not use this file
|
||||
# except in compliance with the License. You may obtain a copy of
|
||||
# the License at http://www.mozilla.org/MPL/
|
||||
#
|
||||
# Software distributed under the License is distributed on an "AS
|
||||
# IS" basis, WITHOUT WARRANTY OF ANY KIND, either express or
|
||||
# implied. See the License for the specific language governing
|
||||
# rights and limitations under the License.
|
||||
#
|
||||
# The Original Code is autosummary.linx.bash code, released
|
||||
# Oct 10, 2002.
|
||||
#
|
||||
# The Initial Developer of the Original Code is Netscape
|
||||
# Communications Corporation. Portions created by Netscape are
|
||||
# Copyright (C) 2002 Netscape Communications Corporation. All
|
||||
# Rights Reserved.
|
||||
#
|
||||
# Contributor(s):
|
||||
# Simon Fraser <sfraser@netscape.com>
|
||||
#
|
||||
# Alternatively, the contents of this file may be used under the
|
||||
# terms of the GNU Public License (the "GPL"), in which case the
|
||||
# provisions of the GPL are applicable instead of those above.
|
||||
# If you wish to allow use of your version of this file only
|
||||
# under the terms of the GPL and not to allow others to use your
|
||||
# version of this file under the MPL, indicate your decision by
|
||||
# deleting the provisions above and replace them with the notice
|
||||
# and other provisions required by the GPL. If you do not delete
|
||||
# the provisions above, a recipient may use your version of this
|
||||
# file under either the MPL or the GPL.
|
||||
#
|
||||
|
||||
use strict;
|
||||
|
||||
#
|
||||
# A wrapper for nm that produces output listing symbol size.
|
||||
#
|
||||
my($prev_addr) = 0;
|
||||
my($prev_module) = "";
|
||||
my($prev_kind) = "";
|
||||
my($prev_symbol) = "";
|
||||
|
||||
open(NM_OUTPUT, "nm -fnol $ARGV[0] | c++filt |") or die "nm failed to run on $ARGV[0]\n";
|
||||
while (<NM_OUTPUT>)
|
||||
{
|
||||
my($line) = $_;
|
||||
chomp($line);
|
||||
|
||||
if ($line =~ /^([^:]+):([0-9a-f]{8}) (\w) (.+)$/)
|
||||
{
|
||||
my($module) = $1;
|
||||
my($addr) = $2;
|
||||
my($kind) = $3;
|
||||
my($symbol) = $4;
|
||||
|
||||
# we expect the input to have been piped through c++filt to
|
||||
# demangle symbols. For some reason, it doesn't always demangle
|
||||
# all of them, so push still-mangled symbols back through c++filt again.
|
||||
if ($symbol =~ /^(_[_Z].+)/)
|
||||
{
|
||||
# warn "Trying again to unmangle $1\n";
|
||||
$symbol = `c++filt '$1'`;
|
||||
chomp($symbol);
|
||||
# warn "Unmangling again to $symbol\n";
|
||||
}
|
||||
|
||||
my($prev_size) = hex($addr) - hex($prev_addr);
|
||||
# print "Outputting line $line\n";
|
||||
|
||||
# always print one behind, because only now do we know its size
|
||||
if ($prev_module ne "") {
|
||||
printf "%s:%08x %s %s\n", $prev_module, $prev_size, $prev_kind, $prev_symbol;
|
||||
}
|
||||
|
||||
$prev_addr = $addr;
|
||||
$prev_module = $module;
|
||||
$prev_kind = $kind;
|
||||
$prev_symbol = $symbol;
|
||||
}
|
||||
else
|
||||
{
|
||||
# warn " Discaring line $line\n";
|
||||
}
|
||||
}
|
||||
|
||||
# we don't know how big the last symbol is, so always show 4.
|
||||
if ($prev_module ne "") {
|
||||
printf "%s:%08x %s %s\n", $prev_module, 4, $prev_kind, $prev_symbol;
|
||||
}
|
||||
Загрузка…
Ссылка в новой задаче