mirror of
https://github.com/valitydev/msgpack-erlang.git
synced 2024-11-06 08:45:19 +00:00
54 lines
2.0 KiB
Erlang
54 lines
2.0 KiB
Erlang
%%%-------------------------------------------------------------------
|
|
%%% File : sample_sup.erl
|
|
%%% Author : UENISHI Kota <kuenishi@gmail.com>
|
|
%%% Description :
|
|
%%%
|
|
%%% Created : 5 May 2011 by UENISHI Kota <kuenishi@gmail.com>
|
|
%%%-------------------------------------------------------------------
|
|
-module(sample_sup).
|
|
|
|
-behaviour(supervisor).
|
|
|
|
-include_lib("eunit/include/eunit.hrl").
|
|
|
|
%% API
|
|
-export([start_link/0]).
|
|
|
|
%% Supervisor callbacks
|
|
-export([init/1]).
|
|
|
|
-define(SERVER, ?MODULE).
|
|
|
|
%%====================================================================
|
|
%% API functions
|
|
%%====================================================================
|
|
%%--------------------------------------------------------------------
|
|
%% Function: start_link() -> {ok,Pid} | ignore | {error,Error}
|
|
%% Description: Starts the supervisor
|
|
%%--------------------------------------------------------------------
|
|
start_link() ->
|
|
supervisor:start_link({local, ?SERVER}, ?MODULE, []).
|
|
|
|
%%====================================================================
|
|
%% Supervisor callbacks
|
|
%%====================================================================
|
|
%%--------------------------------------------------------------------
|
|
%% Func: init(Args) -> {ok, {SupFlags, [ChildSpec]}} |
|
|
%% ignore |
|
|
%% {error, Reason}
|
|
%% Description: Whenever a supervisor is started using
|
|
%% supervisor:start_link/[2,3], this function is called by the new process
|
|
%% to find out about restart strategy, maximum restart frequency and child
|
|
%% specifications.
|
|
%%--------------------------------------------------------------------
|
|
init([]) ->
|
|
AChild = {'AName',{mprs,start_link,[sample_srv,[{host,localhost},{port,9199}]]},
|
|
permanent,2000,worker,[sample_srv]},
|
|
?debugVal(AChild),
|
|
ok=supervisor:check_childspecs([AChild]),
|
|
{ok,{{one_for_all,0,1}, [AChild]}}.
|
|
|
|
%%====================================================================
|
|
%% Internal functions
|
|
%%====================================================================
|