|
| 1 | +# SPDX-License-Identifier: Apache-2.0 |
| 2 | +# SPDX-FileCopyrightText: 2021 The Elixir Team |
| 3 | + |
| 4 | +defmodule CoverageRecorder do |
| 5 | + def maybe_record(suite_name) do |
| 6 | + if enabled?() do |
| 7 | + record(suite_name) |
| 8 | + |
| 9 | + true |
| 10 | + else |
| 11 | + false |
| 12 | + end |
| 13 | + end |
| 14 | + |
| 15 | + def enable_coverage do |
| 16 | + _ = :cover.stop() |
| 17 | + {:ok, pid} = :cover.start() |
| 18 | + |
| 19 | + cover_compile_ebins() |
| 20 | + |
| 21 | + pid |
| 22 | + end |
| 23 | + |
| 24 | + def cover_dir, do: Path.join(root_dir(), "cover") |
| 25 | + |
| 26 | + defp enabled? do |
| 27 | + case System.fetch_env("COVER") do |
| 28 | + {:ok, truthy} when truthy in ~w[1 true yes y] -> |
| 29 | + true |
| 30 | + |
| 31 | + _ -> |
| 32 | + false |
| 33 | + end |
| 34 | + end |
| 35 | + |
| 36 | + defp root_dir, do: Path.join(__DIR__, "../../..") |
| 37 | + defp ebins, do: root_dir() |> Path.join("lib/*/ebin") |> Path.wildcard() |
| 38 | + |
| 39 | + defp record(suite_name) do |
| 40 | + file = Path.join(cover_dir(), "ex_unit_#{suite_name}.coverdata") |
| 41 | + |
| 42 | + enable_coverage() |
| 43 | + |
| 44 | + System.at_exit(fn _status -> |
| 45 | + File.mkdir_p!(cover_dir()) |
| 46 | + |
| 47 | + :ok = :cover.export(String.to_charlist(file)) |
| 48 | + end) |
| 49 | + end |
| 50 | + |
| 51 | + defp cover_compile_ebins do |
| 52 | + relevant_beam_files() |
| 53 | + |> Enum.map(&String.to_charlist/1) |
| 54 | + |> :cover.compile_beam() |
| 55 | + |> Enum.each(fn |
| 56 | + {:ok, _module} -> |
| 57 | + :ok |
| 58 | + |
| 59 | + {:error, reason} -> |
| 60 | + raise "Failed to cover compile with reason: #{inspect(reason)}" |
| 61 | + end) |
| 62 | + end |
| 63 | + |
| 64 | + defp relevant_beam_files do |
| 65 | + ebins() |
| 66 | + |> Enum.flat_map(fn ebin -> |
| 67 | + ebin |> Path.join("*.beam") |> Path.wildcard() |
| 68 | + end) |
| 69 | + |> Enum.reject(&deprecated/1) |
| 70 | + end |
| 71 | + |
| 72 | + defp deprecated(file) do |
| 73 | + mod = file |> Path.basename(".beam") |> String.to_atom() |
| 74 | + |
| 75 | + match?({:docs_v1, _, _, _, _, %{deprecated: _}, _}, Code.fetch_docs(mod)) |
| 76 | + end |
| 77 | +end |
0 commit comments