二郎產卵主管與參數

gateway.erl（監事監事） - > gateway_sup.erl（gen_servers監事） - > gateway_serv.erl（凡每個客戶都被處理）。

這是非常基本的，因爲我在互聯網上看到，大多數人都這樣做。

監聽套接字是在gateway_sup.erl上創建的，我想監聽多個套接字以防某些客戶端端口限制。

所以這裏是我的代碼到目前爲止。

gateway.erl

-export([start_link/0, init/1, startWithPort/1]). 

start_link() -> 
    supervisor:start_link({local, ?MODULE}, ?MODULE, []). 

init([]) -> 
    spawn_link(?MODULE, startWithPort, [8080]), 
    spawn_link(?MODULE, startWithPort, [443]), 
    {ok, {{simple_one_for_one, 3600, 3600}, 
     [{socket, 
      {gateway_sup, start_link, []}, 
      permanent, 1000, supervisor, [gateway_sup]} 
     ]}}. 

startWithPort(Port) -> 
    io:fwrite("Starting...: ~p~n", [Port]), 
    supervisor:start_child(?MODULE, [Port]).

gateway_sup.erl

-export([start_socket/0, init/1, start_link/1]). 

    start_link(Port) -> 
     io:fwrite("gateway_sup start_link Port: ~p // ~p~n", [list_to_atom(atom_to_list(?MODULE) ++ atom_to_list(Port)), Port]) 
     supervisor:start_link({local, list_to_atom(atom_to_list(?MODULE) ++ atom_to_list(Port))}, ?MODULE, [Port]). 

    init([Port]) -> 
     io:fwrite("gateway_sup Init with port: ~p~n", [Port]), 
     R = ssl:listen(Port, ?SSL_OPTIONS), 
     {ok, LSocket} = R, 
     spawn_link(fun empty_listeners/0), 
     {ok, {{simple_one_for_one, 3600, 3600}, 
      [{socket, 
       {gateway_serv, start_link, [LSocket]}, 
       temporary, 1000, worker, [gateway_serv]} 
      ]}}. 

    empty_listeners() -> 
     [start_socket() || _ <- lists:seq(1,128)], 
     ok. 

    start_socket() -> 
     supervisor:start_child(?MODULE, []).

的START_LINK（）上gateway_sup.erl函數永遠不會被調用。如果網關是one_for_one，我不想傳遞一個參數，一切正常，但我只聽一個硬編碼端口。

我看不出爲什麼它不會調用gateway_sup：start_link/1？

來源

2013-03-31 TheSquad

好的，找到它！帶我過了一個晚上，因爲這個小小的錯誤！

的錯誤是，當我創建START_LINK

list_to_atom(atom_to_list(?MODULE) ++ atom_to_list(Port))

中的作用已被替換

list_to_atom(atom_to_list(?MODULE) ++ lists:flatten(io_lib:format("~B", [Port])))

來源

2013-03-31 15:19:38 TheSquad

二郎產卵主管與參數

回答

相關問題