rabbit_common: Remove 'cover' related code from 'rabbit_misc'

This is very old code that is likely no longer used. Removing
it helps avoid depending on cover.

Author: lhoguin

deps/rabbit_common/src/rabbit_misc.erl

@@ -26,9 +26,6 @@
 -export([table_lookup/2, set_table_value/4, amqp_table/1, to_amqp_table/1]).
 -export([r/3, r/2, r_arg/4, rs/1,
          queue_resource/2, exchange_resource/2]).
--export([enable_cover/0, report_cover/0]).
--export([enable_cover/1, report_cover/1]).
--export([start_cover/1]).
 -export([throw_on_error/2, with_exit_handler/2, is_abnormal_exit/1,
          filter_exit_map/2]).
 -export([ensure_ok/2]).
@@ -165,11 +162,6 @@
               {invalid_type, rabbit_framing:amqp_field_type()}) |
             rabbit_types:r(K) when is_subtype(K, atom()).
 -spec rs(rabbit_types:r(atom())) -> string().
--spec enable_cover() -> ok_or_error().
--spec start_cover([{string(), string()} | string()]) -> 'ok'.
--spec report_cover() -> 'ok'.
--spec enable_cover([file:filename() | atom()]) -> ok_or_error().
--spec report_cover([file:filename() | atom()]) -> 'ok'.
 -spec throw_on_error
         (atom(), thunk(rabbit_types:error(any()) | {ok, A} | A)) -> A.
 -spec with_exit_handler(thunk(A), thunk(A)) -> A.
@@ -449,59 +441,6 @@ queue_resource(VHostPath, Name) ->
 exchange_resource(VHostPath, Name) ->
     r(VHostPath, exchange, Name).
 
-enable_cover() -> enable_cover(["."]).
-
-enable_cover(Dirs) ->
-    lists:foldl(fun (Dir, ok) ->
-                        case cover:compile_beam_directory(
-                               filename:join(lists:concat([Dir]),"ebin")) of
-                            {error, _} = Err -> Err;
-                            _                -> ok
-                        end;
-                    (_Dir, Err) ->
-                        Err
-                end, ok, Dirs).
-
-start_cover(NodesS) ->
-    {ok, _} = cover:start([rabbit_nodes_common:make(N) || N <- NodesS]),
-    ok.
-
-report_cover() -> report_cover(["."]).
-
-report_cover(Dirs) -> [report_cover1(lists:concat([Dir])) || Dir <- Dirs], ok.
-
-report_cover1(Root) ->
-    Dir = filename:join(Root, "cover"),
-    ok = filelib:ensure_dir(filename:join(Dir, "junk")),
-    lists:foreach(fun (F) -> file:delete(F) end,
-                  filelib:wildcard(filename:join(Dir, "*.html"))),
-    {ok, SummaryFile} = file:open(filename:join(Dir, "summary.txt"), [write]),
-    {CT, NCT} =
-        lists:foldl(
-          fun (M,{CovTot, NotCovTot}) ->
-                  {ok, {M, {Cov, NotCov}}} = cover:analyze(M, module),
-                  ok = report_coverage_percentage(SummaryFile,
-                                                  Cov, NotCov, M),
-                  {ok,_} = cover:analyze_to_file(
-                             M,
-                             filename:join(Dir, atom_to_list(M) ++ ".html"),
-                             [html]),
-                  {CovTot+Cov, NotCovTot+NotCov}
-          end,
-          {0, 0},
-          lists:sort(cover:modules())),
-    ok = report_coverage_percentage(SummaryFile, CT, NCT, 'TOTAL'),
-    ok = file:close(SummaryFile),
-    ok.
-
-report_coverage_percentage(File, Cov, NotCov, Mod) ->
-    io:fwrite(File, "~6.2f ~tp~n",
-              [if
-                   Cov+NotCov > 0 -> 100.0*Cov/(Cov+NotCov);
-                   true -> 100.0
-               end,
-               Mod]).
-
 %% @doc Halts the emulator returning the given status code to the os.
 %% On Windows this function will block indefinitely so as to give the io
 %% subsystem time to flush stdout completely.