update to work with latest rebar3 and able to run against all project apps

Author: tsloughter

src/pc_port_specs.erl

@@ -77,8 +77,20 @@ type(#spec{type = Type})          -> Type.
 
 port_spec_from_legacy(Config) ->
     %% Get the target from the so_name variable
-    AName = rebar_state:get(Config, so_name),
-    Target = filename:join("priv", AName),
+    Target = case rebar_state:get(Config, so_name, undefined) of
+                 undefined ->
+                     %% Generate a sensible default from app file
+                     AppName = case rebar_state:current_app(Config) of
+                                      undefined ->
+                                          throw({error, {pc_prv_compile, no_app}});
+                                      CurrentApp ->
+                                          rebar_app_info:name(CurrentApp)
+                                  end,
+                     filename:join("priv", lists:concat([AppName, "_drv.so"]));
+                 AName ->
+                     filename:join("priv", AName)
+             end,
+
     %% Get the list of source files from port_sources
     Sources = port_sources(rebar_state:dir(Config), rebar_state:get(Config, port_sources, ["c_src/*.c"])),
     #spec { type = pc_util:target_type(Target),

src/pc_prv_compile.erl

@@ -33,10 +33,24 @@ init(State) ->
 
 -spec do(rebar_state:t()) -> {ok, rebar_state:t()} | {error, string()}.
 do(State) ->
-    {ok, PortSpecs} = pc_port_specs:construct(State),
-    ok = pc_compilation:compile_and_link(State, PortSpecs),
+    Apps = case rebar_state:current_app(State) of
+               undefined ->
+                   rebar_state:project_apps(State);
+               AppInfo ->
+                   [AppInfo]
+           end,
+
+    [begin
+         Opts = rebar_app_info:opts(AppInfo1),
+         State1 = rebar_state:opts(State, Opts),
+         {ok, PortSpecs} = pc_port_specs:construct(State1),
+         ok = pc_compilation:compile_and_link(State1, PortSpecs)
+     end || AppInfo1 <- Apps],
+
     {ok, State}.
 
 -spec format_error(any()) ->  iolist().
+format_error(no_app) ->
+    io_lib:format("No so_name or application defined.", []);
 format_error(Reason) ->
     io_lib:format("~p", [Reason]).