escript.mk 2.0 KB

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364
  1. # Copyright (c) 2014 Dave Cottlehuber <dch@skunkwerks.at>
  2. # This file is part of erlang.mk and subject to the terms of the ISC License.
  3. .PHONY: distclean-escript escript
  4. # Configuration.
  5. ESCRIPT_NAME ?= $(PROJECT)
  6. ESCRIPT_COMMENT ?= This is an -*- erlang -*- file
  7. ESCRIPT_BEAMS ?= "ebin/*", "deps/*/ebin/*"
  8. ESCRIPT_SYS_CONFIG ?= "rel/sys.config"
  9. ESCRIPT_EMU_ARGS ?= -pa . \
  10. -sasl errlog_type error \
  11. -escript main $(ESCRIPT_NAME)
  12. ESCRIPT_SHEBANG ?= /usr/bin/env escript
  13. ESCRIPT_STATIC ?= "deps/*/priv/**", "priv/**"
  14. # Core targets.
  15. distclean:: distclean-escript
  16. help::
  17. @printf "%s\n" "" \
  18. "Escript targets:" \
  19. " escript Build an executable escript archive" \
  20. # Plugin-specific targets.
  21. # Based on https://github.com/synrc/mad/blob/master/src/mad_bundle.erl
  22. # Copyright (c) 2013 Maxim Sokhatsky, Synrc Research Center
  23. # Modified MIT License, https://github.com/synrc/mad/blob/master/LICENSE :
  24. # Software may only be used for the great good and the true happiness of all
  25. # sentient beings.
  26. define ESCRIPT_RAW
  27. 'Read = fun(F) -> {ok, B} = file:read_file(filename:absname(F)), B end,'\
  28. 'Files = fun(L) -> A = lists:concat([filelib:wildcard(X)||X<- L ]),'\
  29. ' [F || F <- A, not filelib:is_dir(F) ] end,'\
  30. 'Squash = fun(L) -> [{filename:basename(F), Read(F) } || F <- L ] end,'\
  31. 'Zip = fun(A, L) -> {ok,{_,Z}} = zip:create(A, L, [{compress,all},memory]), Z end,'\
  32. 'Ez = fun(Escript) ->'\
  33. ' Static = Files([$(ESCRIPT_STATIC)]),'\
  34. ' Beams = Squash(Files([$(ESCRIPT_BEAMS), $(ESCRIPT_SYS_CONFIG)])),'\
  35. ' Archive = Beams ++ [{ "static.gz", Zip("static.gz", Static)}],'\
  36. ' escript:create(Escript, [ $(ESCRIPT_OPTIONS)'\
  37. ' {archive, Archive, [memory]},'\
  38. ' {shebang, "$(ESCRIPT_SHEBANG)"},'\
  39. ' {comment, "$(ESCRIPT_COMMENT)"},'\
  40. ' {emu_args, " $(ESCRIPT_EMU_ARGS)"}'\
  41. ' ]),'\
  42. ' file:change_mode(Escript, 8#755)'\
  43. 'end,'\
  44. 'Ez("$(ESCRIPT_NAME)"),'\
  45. 'halt().'
  46. endef
  47. ESCRIPT_COMMAND = $(subst ' ',,$(ESCRIPT_RAW))
  48. escript:: distclean-escript deps app
  49. $(gen_verbose) $(ERL) -eval $(ESCRIPT_COMMAND)
  50. distclean-escript:
  51. $(gen_verbose) rm -f $(ESCRIPT_NAME)