如何使用Elixir宏獲取模塊的完整生成代碼

Question

下面是示例Phoenix應用程序的路由器模塊。我想在宏之後注​​入模塊的完整代碼注入函數。

我試過類似Macro.to_string (Macro.expand (Code.string_to_quoted! File.read!("web/router.ex")), __ENV__)的東西，但是它並沒有完全展開這些宏。我如何遞歸地擴展每個宏，即pipeline,plug,scope, pipe_through和get。

感謝

defmodule HelloPhoenix.Router do 
    use HelloPhoenix.Web, :router 

    pipeline :browser do 
    plug :accepts, ["html"] 
    plug :fetch_session 
    plug :fetch_flash 
    plug :protect_from_forgery 
    plug :put_secure_browser_headers 
    end 

    pipeline :api do 
    plug :accepts, ["json"] 
    end 

    scope "/", HelloPhoenix do 
    pipe_through :browser # Use the default browser stack 

    get "/", PageController, :index 
    end 

end 

Answer 1

這段代碼將反射光束文件回erlang。我沒有針對基於插件的模塊運行它，所以我不知道結果會有多糟糕，但是這會給你任何模塊的最終結果。

def disassemble(beam_file) do 
    beam_file = String.to_char_list(beam_file) 
    {:ok, 
     {_, [{:abstract_code, {_, ac}}]}} = :beam_lib.chunks(beam_file, 
                  [:abstract_code]) 
    :io.fwrite('~s~n', [:erl_prettypr.format(:erl_syntax.form_list(ac))]) 
    end 

原始出處，並詳細信息：http://erlang.org/doc/man/beam_lib.html

注意，此方法需要[模塊]的文件路徑 .beam

Answer 2

正如你已經正確觀察到的，你需要使用遞歸Macro.expand/1真正擴大所有宏觀層面。有一個內置的設施來達到這個目的：Macro.prewalk/2。這應該讓你開始：

ast 
|> Macro.prewalk(&Macro.expand(&1, __ENV__)) 
|> Macro.to_string 
|> IO.puts