1
0
Fork 0
mirror of https://github.com/ruby/ruby.git synced 2022-11-09 12:17:21 -05:00

Add coverage measurement mode by using gcov

This experimental feature is only for Ruby-core team, not for casual users.

Usage: `./configure --enable-gcov && make && make exam && make gcov`

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@58817 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
This commit is contained in:
mame 2017-05-20 13:00:41 +00:00
parent 41e800f6a8
commit 33710d4581
4 changed files with 66 additions and 0 deletions

3
.gitignore vendored
View file

@ -36,6 +36,9 @@ cygruby*.def
extconf.h
y.output
y.tab.c
*.gcda
*.gcno
*.gcov
# /
/*-fake.rb

View file

@ -479,6 +479,9 @@ update-download:: update-config_files
after-update:: prereq
gcov:
$(Q) $(BASERUBY) $(srcdir)/tool/run-gcov.rb
update-doclie:
$(Q) $(srcdir)/tool/git-refresh -C $(srcdir)/coverage $(Q1:0=-q) \
--branch $(DOCLIE_GIT_REF) \

View file

@ -4063,6 +4063,14 @@ AC_SUBST(DTRACE_REBUILD)
AC_SUBST(DTRACE_OPT)
AC_SUBST(LIBRUBY_A_OBJS)
AC_ARG_ENABLE(gcov,
AS_HELP_STRING([--enable-gcov], [enable coverage measurement by gcov]),
[gcov=yes])
if test x"$gcov" = xyes; then
CFLAGS="$CFLAGS -coverage"
LDFLAGS="$LDFLAGS -coverage"
fi
RUBY_SETJMP_TYPE
}
{ # build section

52
tool/run-gcov.rb Normal file
View file

@ -0,0 +1,52 @@
#!ruby
require "pathname"
require "open3"
Pathname.glob("**/*.gcda").sort.each do |gcda|
if gcda.fnmatch("ext/*")
cwd, gcda = gcda.split.map {|s| s.to_s }
objdir = "."
else
cwd, objdir, gcda = ".", gcda.dirname.to_s, gcda.to_s
end
puts "$ gcov -lpbc -o #{ objdir } #{ gcda }"
out, err, _status = Open3.capture3("gcov", "-lpbc", "-o", objdir, gcda, chdir: cwd)
puts out
puts err
# a black list of source files that contains wrong #line directives
if err !~ %r(
\A(
Cannot\ open\ source\ file\ (
defs/keywords
|zonetab\.list
|enc/jis/props\.kwd
|parser\.c
|parser\.rl
)\n
)*\z
)x
raise "Unexpected gcov output"
end
if out !~ %r(
\A(
File\ .*\nLines\ executed:.*\n
(
Branches\ executed:.*\n
Taken\ at\ least\ once:.*\n
|
No\ branches\n
)?
(
Calls\ executed:.*\n
|
No\ calls\n
)?
Creating\ .*\n
\n
)+\z
)x
raise "Unexpected gcov output"
end
end