aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMel Gorman <mel@csn.ul.ie>2010-10-11 18:08:36 +0100
committerEric B Munson <emunson@mgebm.net>2010-10-11 14:49:48 -0700
commitbac952da3a311edf4a869741511bde87ac7c4dad (patch)
tree7a394c0690f05972a3900cc5590dc518ddbccaf6
parent9a023a785dc624fe5ef8aee71f300bfd6ee8d273 (diff)
downloadlibhugetlbfs-bac952da3a311edf4a869741511bde87ac7c4dad.tar.gz
cpupcstat: Ignore private caching of tlb cost information
tlbmiss_cost.sh now knows how to cache TLB miss cost information. Do not duplicate the work in cpupcstat. Signed-off-by: Mel Gorman <mel@csn.ul.ie> Acked-by: Eric B Munson <emunson@mgebm.net> Signed-off-by: Eric B Munson <emunson@mgebm.net>
-rwxr-xr-xcpupcstat15
1 files changed, 0 insertions, 15 deletions
diff --git a/cpupcstat b/cpupcstat
index ff6216c..8b1d332 100755
--- a/cpupcstat
+++ b/cpupcstat
@@ -37,7 +37,6 @@ my $collector;
my $miss_scale = 0;
my $ins_scale = 0;
my $cyc_scale = 0;
-my $tlbcost_cache = "$Bin/tlbmisscost";
sub start_target()
{
@@ -283,17 +282,6 @@ if ($misses > 0) {
}
if ($service && $cycles > 0) {
- if ( !$config && -e $tlbcost_cache ) {
- $config = $tlbcost_cache;
- }
- if ($config) {
- open(DAT, $config) || die "Failed to open $config\n";
- my $data = <DAT>;
- close(DAT);
- ($data,$cost_in_cycles) = split(/\=/, $data);
- chomp($cost_in_cycles);
- }
-
if ($cost_in_cycles <= 0) {
my $cost_script = `which tlbmiss_cost.sh`;
if ($cost_script eq "") {
@@ -302,9 +290,6 @@ if ($misses > 0) {
my $data = `$cost_script --vmlinux $vmlinux`;
($data,$cost_in_cycles) = split(/\=/, $data);
chomp($cost_in_cycles);
- open (DAT, ">$tlbcost_cache");
- print DAT "TLB_MISS_COST=$cost_in_cycles";
- close (DAT);
}
my $total_cost = $cost_in_cycles * $misses;
print("$target spent ",