Current section

Files

Jump to
excoveralls lib excoveralls cover.ex
Raw

lib/excoveralls/cover.ex

defmodule ExCoveralls.Cover do
@moduledoc """
Wrapper class for Erlang's cover tool.
"""
@doc """
Compile the beam files for coverage analysis.
"""
def compile(compile_path) do
:cover.stop
:cover.start
:cover.compile_beam_directory(compile_path |> string_to_charlist)
end
@doc """
Returns the relative file path of the specified module.
"""
def module_path(module) do
module.module_info(:compile)[:source]
|> List.to_string
|> Path.relative_to(ExCoveralls.PathReader.base_path)
end
@doc "Wrapper for :cover.modules"
def modules do
:cover.modules |> Enum.filter(&has_compile_info?/1)
end
def has_compile_info?(module) do
with info when not is_nil(info) <- module.module_info(:compile),
path when not is_nil(path) <- Keyword.get(info, :source),
true <- File.exists?(path) do
true
else
_e ->
log_missing_source(module)
false
end
rescue
_e ->
log_missing_source(module)
false
end
@doc "Wrapper for :cover.analyse"
def analyze(module) do
:cover.analyse(module, :calls, :line)
end
if Version.compare(System.version, "1.3.0") == :lt do
defp string_to_charlist(string), do: String.to_char_list(string)
else
defp string_to_charlist(string), do: String.to_charlist(string)
end
defp log_missing_source(module) do
IO.puts :stderr, "[warning] skipping the module '#{module}' because source information for the module is not available."
end
end