pi_baware_stamp.rb

#!/usr/bin/env ruby

require 'terminal-table'

$BENCH = {
  sunflow:"sunflow", 
  video:"video",
  camera:"camera", 
  crypto:"crypto", 
  javaboy:"javaboy",
#  batik:"batik",
}

$DIR   = "baware_run"

$RUNS = [
  "run_sd_hc",  # 0
  "run_sd_hcu", # 1
  "run_sd_mc",  # 2
  "run_sd_mcu", # 3
  "run_sd_lc",  # 4
  "run_sd_lcu", # 5

  "run_md_hc",  # 6
  "run_md_hcu", # 7
  "run_md_mc",  # 8
  "run_md_mcu", # 9
  "run_md_lc",  # 10
  "run_md_lcu", # 11

  "run_ld_hc",  # 12
  "run_ld_hcu", # 13
  "run_ld_mc",  # 14
  "run_ld_mcu", # 15
  "run_ld_lc",  # 16
  "run_ld_lcu"  # 17
  ] 

# Input = Date(Day) Date(Time) Timestamp V1 V2 V3
# Output = Timestamp V1 V2 V3
def load_timestamp(fname)
  stamps = []
  File.open(fname).read().each_line do |line|
    parsed = line.strip().split() 
    stamps << [parsed[2].to_f, parsed[3].to_f, parsed[4].to_f, parsed[5].to_f, parsed[6].to_f]
  end
  return stamps
end

def within(stamp1,stamp2,compare)
  return (stamp1 <= compare && compare <= stamp2)
end

def check_sync(file, run, stamps, imin, imax) 
  unless (within(1.8,2.0,stamps[imin][2])) then
    puts "\tWarning: Not synced: #{file} - #{run}"
    for i in 0..20 do
      if (within(1.8,2.0,stamps[imin-i][2])) then
        return i
      end
    end
    puts "\tError: Sync point further than 20 steps, exiting..."
    exit
  end
  return 0
end

def get_energy(file, run, stamps, tmin, tmax)
  i = 0
  while i < stamps.length && !within(stamps[i][0],stamps[i+1][0],tmin) 
    i += 1
  end
  if i >= stamps.length then
    puts "ERROR: Couldn't find timestamp"
    exit
  end
  indexmin = i

  while i < stamps.length && !within(stamps[i][0],stamps[i+1][0],tmax)
    i += 1
  end
  if i >= stamps.length then
    puts "ERROR: Couldn't find timestamp"
    exit
  end
  indexmax = i

  energy = 0.0
  for j in indexmin..indexmax do
    energy += stamps[j][2]
  end

  # Do some checking for sync hotspots
  offset = check_sync(file, run, stamps, indexmin, indexmax) 

  if (offset != 0) then
    corrected = 0.0
    for j in (indexmin-offset)..(indexmax-offset) do
      corrected += stamps[j][2]
    end
    puts "\tWarning: Offset:#{offset} Original:#{energy.round(2)} Corrected:#{corrected.round(2)} Percent Error:#{(((energy-corrected)/energy) * 100.0).round(2)}%"
    return corrected
  end
  
  return energy
end


# Main
if ARGV.length < 1
  puts "pi_baware_stamp.rb [TIMESTAMP FILE]"
  exit
end

timestamp_file = ARGV[0]
stamps = load_timestamp(timestamp_file)

# Build table for energy consumed for each run
$BENCH.each do |bench, path|
  $RUNS.each do |run| 
    refstamps = File.open("./pi_bench/#{path}/#{$DIR}/#{run}_stamp.txt").read().scan(/ERun.*:(.*)$/)

    energyfile = File.open("./pi_bench/#{path}/#{$DIR}/#{run}.txt", "w")
    energyfile.write("// Created from #{timestamp_file}\n")

    puts "#{bench} #{run}"

    for i in 0..refstamps.length-1 do
      parsed = refstamps[i][0].strip().split()
      #e += m[i][0].strip().split()[2].to_f
      tmin = parsed[0].to_f
      tmax = parsed[1].to_f

      #energy = get_energy(stamps, tmin, tmax)
      energy = get_energy("#{bench}/#{run}", "ERun #{i}", stamps, tmin, tmax)

      energyfile.write("ERun: #{i}: 0 0 #{energy} 0\n")
    end
    energyfile.close

  end
end