Added rpm macros and more cleanups

1 files changed, 19 insertions, 0 deletions

diff --git a/erlang-find-requires.escript b/erlang-find-requires.escript
new file mode 100755
index 0000000..1a16f76
--- /dev/null
+++ b/erlang-find-requires.escript
@@ -0,0 +1,19 @@
+#!/usr/bin/escript
+%% -*- erlang -*-
+
+main(EbinFiles) ->
+	lists:foreach(
+		fun(BeamFile) ->
+			try
+				{ok, {_Module, [{imports,Imports}]}} = beam_lib:chunks(BeamFile, [imports]),
+				lists:foreach( fun({ModName,ModFun,Arity})->io:format("erlang(~s:~s/~p)~n", [ModName,ModFun,Arity]) end, Imports)
+			catch
+				_:_ ->
+					ok
+			end
+		end,
+		EbinFiles);
+
+main(_) ->
+	halt(1).
+