mirror of
git://sourceware.org/git/lvm2.git
synced 2024-12-21 13:34:40 +03:00
87 lines
2.2 KiB
Ruby
87 lines
2.2 KiB
Ruby
# Copyright (C) 2010 Red Hat, Inc. All rights reserved.
|
|
#
|
|
# This copyrighted material is made available to anyone wishing to use,
|
|
# modify, copy, or redistribute it subject to the terms and conditions
|
|
# of the GNU General Public License v.2.
|
|
#
|
|
# You should have received a copy of the GNU General Public License
|
|
# along with this program; if not, write to the Free Software Foundation,
|
|
# Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
|
|
|
# Reads the schedule files given on the command line. Runs them and
|
|
# generates the reports.
|
|
|
|
# FIXME: a lot of duplication with unit_test.rb
|
|
|
|
require 'schedule_file'
|
|
require 'pathname'
|
|
require 'reports'
|
|
require 'erb'
|
|
require 'report_templates'
|
|
|
|
include ReportTemplates
|
|
|
|
schedules = ARGV.map do |f|
|
|
p = Pathname.new(f)
|
|
Schedule.read(p.dirname, p)
|
|
end
|
|
|
|
total_passed = 0
|
|
total_failed = 0
|
|
|
|
# We need to make sure the lvm shared libs are in the LD_LIBRARY_PATH
|
|
ENV['LD_LIBRARY_PATH'] = `pwd`.strip + "/libdm:" + (ENV['LD_LIBRARY_PATH'] || '')
|
|
|
|
ENV['TEST_TOOL'] = "valgrind --leak-check=full --show-reachable=yes"
|
|
|
|
schedules.each do |s|
|
|
s.run
|
|
|
|
s.schedules.each do |t|
|
|
if t.status.success?
|
|
total_passed += 1
|
|
else
|
|
total_failed += 1
|
|
end
|
|
end
|
|
end
|
|
|
|
def mangle(txt)
|
|
txt.gsub(/\s+/, '_')
|
|
end
|
|
|
|
MemcheckStats = Struct.new(:definitely_lost, :indirectly_lost, :possibly_lost, :reachable)
|
|
|
|
def format(bytes, blocks)
|
|
"#{bytes} bytes, #{blocks} blocks"
|
|
end
|
|
|
|
# Examines the output for details of leaks
|
|
def extract_stats(t)
|
|
d = i = p = r = '-'
|
|
|
|
t.output.split("\n").each do |l|
|
|
case l
|
|
when /==\d+== definitely lost: ([0-9,]+) bytes in ([0-9,]+) blocks/
|
|
d = format($1, $2)
|
|
when /==\d+== indirectly lost: ([0-9,]+) bytes in ([0-9,]+) blocks/
|
|
i = format($1, $2)
|
|
when /==\d+== possibly lost: ([0-9,]+) bytes in ([0-9,]+) blocks/
|
|
p = format($1, $2)
|
|
when /==\d+== still reachable: ([0-9,]+) bytes in ([0-9,]+) blocks/
|
|
r = format($1, $2)
|
|
end
|
|
end
|
|
|
|
MemcheckStats.new(d, i, p, r)
|
|
end
|
|
|
|
generate_report(:memcheck, binding)
|
|
|
|
# now we generate a detail report for each schedule
|
|
schedules.each do |s|
|
|
s.schedules.each do |t|
|
|
generate_report(:unit_detail, binding, Pathname.new("reports/memcheck_#{mangle(t.desc)}.html"))
|
|
end
|
|
end
|