blob: 0d7587b2640f5f5bf03315c36e11287d6fe08326 [file] [log] [blame] [edit]
##=== TEST.dsgraph.report - Report description for dsgraph -----*- perl -*-===##
#
# This file defines a report to be generated for the dsgraph test.
#
##===----------------------------------------------------------------------===##
$SortNumeric = 1; # Sort numerically, not textually.
$TrimAllDirectories = 1; # Trim off benchmark directories.
$SortCol = 2; # Sort by #MemInstrs
$SortReverse = 1; # Sort in descending order
# Helper function
sub Ratio {
my ($Cols, $Col) = @_;
if ($Cols->[$Col-2] ne "*" and
$Cols->[$Col-2] != "0") {
return $Cols->[$Col-1]/$Cols->[$Col-2];
} else {
return "n/a";
}
}
sub TypeSafeRatio {
my ($Cols, $Col) = @_;
my $TS = $Cols->[$Col-2];
my $NTS = $Cols->[$Col-1];
$TS = 0 if ($TS eq "*");
$NTS = 0 if ($NTS eq "*");
if ($TS + NTS != 0) {
return sprintf("%4.1f%%", 100*$TS/($TS+$NTS+0.0));
} else {
return "n/a";
}
}
sub FormatSize {
my $Size = shift;
if ($Size > 10*1024*1024) {
return (int $Size*10 / (1024*1024))/10 . "MB";
} elsif ($Size > 10*1024) {
return (int $Size / 1024);
} else {
return $Size . "B";
}
}
sub NoStar {
return "0" if ($_[0] eq '*');
return $_[0];
}
sub NoCallNodes {
$_[0] =~ m/([0-9]+)\+/;
return $1;
}
# For latex output, limit benchmarks and rename as appropriate
@LatexRowMapOrder = (
'-' => '-',
'181.mcf' => '181.mcf',
'256.bzip2' => '256.bzip2',
'164.gzip' => '164.gzip',
'175.vpr' => '175.vpr',
'197.parser' => '197.parser',
'186.crafty' => '186.crafty',
'300.twolf' => '300.twolf',
'255.vortex' => '255.vortex',
'254.gap' => '254.gap',
'252.eon' => '252.eon',
'253.perlbmk' => '253.perlbmk',
'176.gcc' => '176.gcc',
'-' => '-',
'179.art' => '179.art',
'183.equake' => '183.equake',
'171.swim' => '171.swim',
'172.mgrid' => '172.mgrid',
'168.wupwise' => '168.wupwise',
'173.applu' => '173.applu',
'188.ammp' => '188.ammp',
'177.mesa' => '177.mesa',
'-' => '-',
'129.compress' => '129.compress',
'130.li' => '130.li',
'124.m88ksim' => '124.m88ksim',
'132.ijpeg' => '132.ijpeg',
'099.go' => '099.go',
'134.perl' => '134.perl',
'147.vortex' => '147.vortex',
'126.gcc' => '126.gcc',
'-' => '-',
'102.swim' => '102.swim',
'101.tomcatv' => '101.tomcatv',
'107.mgrid' => '107.mgrid',
'145.fpppp' => '145.fpppp',
'104.hydro2d' => '104.hydro2d',
'110.applu' => '110.applu',
'103.su2cor' => '103.su2cor',
'146.wave5' => '146.wave5',
'-' => '-',
'fpgrowth' => 'fpgrowth',
'bsim' => 'boxed-sim',
'namd' => 'NAMD',
'povray' => 'povray31',
);
@LxxatexColumns = (1, 2, 19, # LOC, #MemInstrs, MaxSCC
15,16, # Total/Collapsed nodes
17, 18); # Max Size, GG Size
@LatexColumns = (2, 21, 22, 23); # Type safety numbers
# Specify how to format columns nicely for printing...
%LatexColumnFormat = (
# 11 => \&FormatSize,
# 12 => \&FormatSize,
16 => \&NoStar,
15 => \&NoCallNodes,
18 => \&NoCallNodes
);
@Graphs = (["scatter", "timeVmem.txt", 27, 7],
["scatter", "timeVloc.txt", 1, 7]);
# These are the columns for the report. The first entry is the header for the
# column, the second is the regex to use to match the value. Empty list create
# seperators, and closures may be put in for custom processing.
my $USERSYSTTIME = '([0-9.]+)[ 0-9.]+\([^)]+\)[ 0-9.]+\([^)]+\) +';
(
# Name
["Name:" , '\'([^\']+)\' Program'],
["LOC:" , 'LOC: *([0-9]+)'],
["MemInsts", '([0-9]+).*Number of memory instructions'],
[],
# Times
["LocTm:", "${USERSYSTTIME}Local"],
["BUTim:", "${USERSYSTTIME}Bottom"],
["TDTim:", "${USERSYSTTIME}Top"],
["SumTm:", sub { return SumCols(@_, 3); }],
["SteTm:", "${USERSYSTTIME}Steensgaard"],
[],
# Sizes
["LcSize:" , '([0-9]+) Local'],
["BUSize:" , '([0-9]+) Bottom-up'],
["TDSize:" , '([0-9]+) Top-down'],
["BUTDSz:" , sub { return SumCols(@_, 2); }],
[],
# Misc stuff
["NumNodes", 'Graphs contain \\[([0-9+]+)\\] nodes total'],
["NumFold" , '([0-9]+).*Number of folded nodes '],
["MaxSz" , '([0-9]+).*Maximum graph size'],
["GlobGr" , '\\.GlobalsGraph\\.dot\'... \\[([0-9+]+)\\]'],
["MaxSCC" , '([0-9]+).*Maximum SCC Size in Call Graph'],
[],
["TypeSafe", "ACCESSES TYPED: *([0-9]+)"],
["NonType", "ACCESSES UNTYPED: *([0-9]+)"],
["TS %" , sub { return TypeSafeRatio(@_); }],
[]
);