add ct-suite template and support for usage message

Author: tsloughter

priv/templates/ct-suite.template

@@ -0,0 +1,6 @@
+{description, "Common Test suite module"}.
+{variables, [
+    {name, "myapp", "Name of the Common Test suite to create"}
+]}.
+{template, "ct_suite.erl", "test/{{name}}_SUITE.erl"}.
+{message, "Run all test suites:\n\n\trebar3 ct\n\nRun individual suite with:\n\n\trebar3 ct --suite=test/{{name}}_SUITE"}.

priv/templates/ct_suite.erl

@@ -0,0 +1,33 @@
+-module({{name}}_SUITE).
+
+-include_lib("common_test/include/ct.hrl").
+-include_lib("stdlib/include/assert.hrl").
+
+-compile(export_all).
+
+suite() ->
+    [].
+
+all() ->
+     [].
+
+groups() ->
+    [].
+
+init_per_suite(Config) ->
+   Config.
+
+end_per_suite(_Config) ->
+    ok.
+
+init_per_group(_GroupName, Config) ->
+    Config.
+
+end_per_group(_GroupName, _Config) ->
+    ok.
+
+init_per_testcase(_Case, Config) ->
+    Config.
+
+end_per_testcase(_Case, _Config) ->
+    ok.

src/rebar_templater.erl

@@ -162,7 +162,14 @@ create({Template, Type, File}, Files, UserVars, Force, State) ->
     Vars = drop_var_docs(override_vars(UserVars, get_template_vars(TemplateTerms, State))),
     maybe_warn_about_name(Vars),
     TemplateCwd = filename:dirname(File),
-    execute_template(TemplateTerms, Files, {Template, Type, TemplateCwd}, Vars, Force).
+    Result = execute_template(TemplateTerms, Files, {Template, Type, TemplateCwd}, Vars, Force),
+    maybe_print_final_message(proplists:get_value(message, TemplateTerms, undefined), Vars),
+    Result.
+
+maybe_print_final_message(undefined, _) ->
+    ok;
+maybe_print_final_message(Message, Values) ->
+    io:format("Usage:~n~n~s~n", [render(Message, Values)]).
 
 maybe_warn_about_name(Vars) ->
     Name = proplists:get_value(name, Vars, "valid"),
@@ -198,6 +205,9 @@ execute_template([{description, _} | Terms], Files, Template, Vars, Force) ->
 %% We can't execute variables
 execute_template([{variables, _} | Terms], Files, Template, Vars, Force) ->
     execute_template(Terms, Files, Template, Vars, Force);
+%% We can't execute message
+execute_template([{message, _} | Terms], Files, Template, Vars, Force) ->
+    execute_template(Terms, Files, Template, Vars, Force);
 %% Create a directory
 execute_template([{dir, Path} | Terms], Files, Template, Vars, Force) ->
     ?DEBUG("Creating directory ~p", [Path]),