码迷,mamicode.com
首页 > 其他好文 > 详细

erlang supervisor simple_one_for_one实例

时间:2015-01-23 13:08:28      阅读:244      评论:0      收藏:0      [点我收藏+]

标签:

http://www.cnblogs.com/little-ant/p/3196201.html

simple_one_for_one vs one_for_one:

相同点:

这种Restart Strategy和one_for_one基本相同(即当一个child process挂掉后,仅仅重启该child process 而不影响其他child process)。

异同点:

1, simple_one_for_one supvisor启动时不会启动任何子进程,所有子进程都只能通过调用 supervisor:start_child(Sup, Args) 来动态启动。

2, simple_one_for_one supvisor持有child process的定义,并有一个dict存放数据, 其实就是如干个child process,共享一份数据。

3, 一个simple_one_for_one supervisor只有一个(single)simple_one_for_one的定义, 也就是说它只能生产出一种类型worker process。

 

supervisor:start_child(Sup, Args) :

    Sup:  Supervisor的Pid或者registered Name.

    Args: 当supervisor的类型是simple_one_for_one时,Args会追加到spec的参数中。

例如:

技术分享
-module(simple_sup).
-behaviour(supervisor).

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

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

init(_Args) ->
  {M, F, A} = _Args,
    {ok, {{simple_one_for_one, 0, 1},
          [{M, {M, F, A},
            temporary, brutal_kill, worker, [M]}]}}.
技术分享

调用supervisor:start_child(simple_sup, Args)后,最终启动子进程的代码会是:apply(M, F, A++Args).

调用supervisor:start_child(Sup, Args)可能会遇到的错误:

1, noproc: 可能的原因是在调用supervisor:start_link时没写参数{local, ?MODULE},即上面代码红色部分,此时进程Sup并不存在,所以会产生

                 noproc错误。

2,undef: 可能的原因是A++Args后,与child process的start_link函数参数不一致。

 

实例代码:

     实例包含两部分,一是监控普通进程(normal_process.erl),二是监控gen_server进程(gen_server_process.erl)。

common.hrl

%%-define(CALL, normal_process).
-define(CALL, gen_server_process).

simple_sup.erl

技术分享
-module(simple_sup).
-behaviour(supervisor).

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

-include("common.hrl").

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

init(_Args) ->
    {ok, {{simple_one_for_one, 0, 1}, 
          [{?CALL, {?CALL, start_link, []},
          temporary, brutal_kill, worker, [?CALL]}]}}.
技术分享

normal_process.erl

技术分享
-module(normal_process).

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

start_link() ->
    proc_lib:start_link(?MODULE, start_loop, [self()]).

start_loop(Parent) ->
    proc_lib:init_ack(Parent, {ok, self()}),
    loop().

loop() ->
    receive
        Args ->
            io:format("~p~n", [Args])
    end.
技术分享

gen_server_process.erl

技术分享
-module(gen_server_process).
-behaviour(gen_server).
-export([start_link/0]).

%% gen_server callbacks
-export([init/1, handle_call/3, handle_cast/2, handle_info/2,
         terminate/2, code_change/3]).

%% interface
-export([start/0, stop/0, echo/1]).

%% interface implement
start()      -> start_link().
stop()       -> gen_server:call(?MODULE, stop).
echo(String) -> gen_server:call(?MODULE, {echo, String}).

%% gen_server callbacks implement
start_link() -> gen_server:start_link({local,?MODULE}, ?MODULE, [], []).

init([]) ->
    {ok, 0}. 

handle_call({echo, String}, _From, Tab) ->  
    Reply = String,
    {reply, Reply, Tab};

handle_call(stop, _From, Tab) ->
    {stop, normal, stopped, Tab}.

handle_cast(_Msg, State) -> {noreply, State}.
handle_info(_Info, State) -> {noreply, State}.
terminate(_Reason, _State) -> ok. 
code_change(_OldVsn, State, _Extra) -> {ok, State}.
技术分享

编译命令:

c(simple_sup).
c(normal_process).
c(gen_server_process).

测试命令:

simple_sup:start_link().
supervisor:start_child(simple_sup, []).

测试通过start_child启动普通进程:

修改common.hrl:-define(CALL, normal_process). 执行编译命令 + 测试命令。

测试通过start_child启动gen_server进程:

修改common.hrl:-define(CALL, gen_server_process). 执行编译命令 + 测试命令。

erlang supervisor simple_one_for_one实例

标签:

原文地址:http://www.cnblogs.com/fvsfvs123/p/4243734.html

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!