From cf03345486f5e3b09960deb861c07e2d1dcca3a1 Mon Sep 17 00:00:00 2001 From: Serge Aleynikov Date: Fri, 18 Dec 2015 08:38:54 -0500 Subject: Add a state display provider The provider is used for debugging to help displaying current rebar's state. Usage: rebar3 state --- src/rebar_prv_state.erl | 44 ++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 44 insertions(+) create mode 100644 src/rebar_prv_state.erl (limited to 'src/rebar_prv_state.erl') diff --git a/src/rebar_prv_state.erl b/src/rebar_prv_state.erl new file mode 100644 index 0000000..0e2ca21 --- /dev/null +++ b/src/rebar_prv_state.erl @@ -0,0 +1,44 @@ +%% -*- erlang-indent-level: 4;indent-tabs-mode: nil -*- +%% ex: ts=4 sw=4 et + +-module(rebar_prv_state). + +-behaviour(provider). + +-export([init/1, + do/1, + format_error/1]). + +-include("rebar.hrl"). + +-define(PROVIDER, state). +-define(DEPS, []). + +%% =================================================================== +%% Public API +%% =================================================================== + +-spec init(rebar_state:t()) -> {ok, rebar_state:t()}. +init(State) -> + Provider = providers:create( + [{name, ?PROVIDER}, + {module, ?MODULE}, + {bare, true}, + {deps, ?DEPS}, + {example, "rebar3 state"}, + {short_desc, "Print current configuration state"}, + {desc, "Display rebar configuration for debugging purpose"}, + {opts, []}]), + State1 = rebar_state:add_provider(State, Provider), + {ok, State1}. + +-spec do(rebar_state:t()) -> {ok, rebar_state:t()} | {error, string()}. +do(State) -> + L = rebar_state:to_list(State), + io:put_chars("State:\n"), + [io:format(" ~w: ~p\n", [K, V]) || {K,V} <- L], + {ok, State}. + +-spec format_error(any()) -> iolist(). +format_error(Reason) -> + io_lib:format("~p", [Reason]). -- cgit v1.1 From 7b4ceecfdbf60be0d341319f4a675f08951fe8c1 Mon Sep 17 00:00:00 2001 From: Serge Aleynikov Date: Sat, 19 Dec 2015 00:14:17 -0500 Subject: Change output to use ?CONSOLE marco --- src/rebar_prv_state.erl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/rebar_prv_state.erl') diff --git a/src/rebar_prv_state.erl b/src/rebar_prv_state.erl index 0e2ca21..244e0d0 100644 --- a/src/rebar_prv_state.erl +++ b/src/rebar_prv_state.erl @@ -36,7 +36,7 @@ init(State) -> do(State) -> L = rebar_state:to_list(State), io:put_chars("State:\n"), - [io:format(" ~w: ~p\n", [K, V]) || {K,V} <- L], + [?CONSOLE(" ~w: ~p\n", [K, V]) || {K,V} <- L], {ok, State}. -spec format_error(any()) -> iolist(). -- cgit v1.1 From 8497a50fcef78e50a24518a10f5fb8b05015482d Mon Sep 17 00:00:00 2001 From: Serge Aleynikov Date: Sat, 19 Dec 2015 00:19:33 -0500 Subject: Change output to use ?CONSOLE macro --- src/rebar_prv_state.erl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'src/rebar_prv_state.erl') diff --git a/src/rebar_prv_state.erl b/src/rebar_prv_state.erl index 244e0d0..dc75c7a 100644 --- a/src/rebar_prv_state.erl +++ b/src/rebar_prv_state.erl @@ -35,8 +35,8 @@ init(State) -> -spec do(rebar_state:t()) -> {ok, rebar_state:t()} | {error, string()}. do(State) -> L = rebar_state:to_list(State), - io:put_chars("State:\n"), - [?CONSOLE(" ~w: ~p\n", [K, V]) || {K,V} <- L], + ?CONSOLE("State:", []), + [?CONSOLE(" ~w: ~p", [K, V]) || {K,V} <- L], {ok, State}. -spec format_error(any()) -> iolist(). -- cgit v1.1 From 0f1df270c17d2c524005cbd2bdfc29a19660f8cf Mon Sep 17 00:00:00 2001 From: Serge Aleynikov Date: Mon, 8 Feb 2016 19:31:46 -0500 Subject: Make state provider {bare, false} --- src/rebar_prv_state.erl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/rebar_prv_state.erl') diff --git a/src/rebar_prv_state.erl b/src/rebar_prv_state.erl index dc75c7a..4fbcb67 100644 --- a/src/rebar_prv_state.erl +++ b/src/rebar_prv_state.erl @@ -23,7 +23,7 @@ init(State) -> Provider = providers:create( [{name, ?PROVIDER}, {module, ?MODULE}, - {bare, true}, + {bare, false}, {deps, ?DEPS}, {example, "rebar3 state"}, {short_desc, "Print current configuration state"}, -- cgit v1.1