xmpp.chapril.org-ejabberd/src/ejabberd_sup.erl

%%%----------------------------------------------------------------------
%%% File    : ejabberd_sup.erl
%%% Author  : Alexey Shchepin <alexey@sevcom.net>
%%% Purpose : 
%%% Created : 31 Jan 2003 by Alexey Shchepin <alexey@sevcom.net>
%%% Id      : $Id$
%%%----------------------------------------------------------------------

-module(ejabberd_sup).
-author('alexey@sevcom.net').
-vsn('$Revision$ ').

-behaviour(supervisor).

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

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


init([]) ->
    Router = {ejabberd_router,
	      {ejabberd_router, start_link, []},
	      permanent,
	      brutal_kill,
	      worker,
	      [ejabberd_router]},
    SM = {ejabberd_sm,
	  {ejabberd_sm, start_link, []},
	  permanent,
	  brutal_kill,
	  worker,
	  [ejabberd_sm]},
    S2S = {ejabberd_s2s,
	   {ejabberd_s2s, start_link, []},
	   permanent,
	   brutal_kill,
	   worker,
	   [ejabberd_s2s]},
    Local = {ejabberd_local,
	     {ejabberd_local, start_link, []},
	     permanent,
	     brutal_kill,
	     worker,
	     [ejabberd_local]},
    Listener = {ejabberd_listener,
		{ejabberd_listener, start_link, []},
		permanent,
		infinity,
		supervisor,
		[ejabberd_listener]},
    StringPrep =
	{stringprep,
	 {stringprep, start_link, []},
	 permanent,
	 brutal_kill,
	 worker,
	 [stringprep]},
    C2SSupervisor =
	{ejabberd_c2s_sup,
	 {ejabberd_tmp_sup, start_link, [ejabberd_c2s_sup, ejabberd_c2s]},
	 permanent,
	 infinity,
	 supervisor,
	 [ejabberd_tmp_sup]},
    S2SInSupervisor =
	{ejabberd_s2s_in_sup,
	 {ejabberd_tmp_sup, start_link,
	  [ejabberd_s2s_in_sup, ejabberd_s2s_in]},
	 permanent,
	 infinity,
	 supervisor,
	 [ejabberd_tmp_sup]},
    S2SOutSupervisor =
	{ejabberd_s2s_out_sup,
	 {ejabberd_tmp_sup, start_link,
	  [ejabberd_s2s_out_sup, ejabberd_s2s_out]},
	 permanent,
	 infinity,
	 supervisor,
	 [ejabberd_tmp_sup]},
    ServiceSupervisor =
	{ejabberd_service_sup,
	 {ejabberd_tmp_sup, start_link,
	  [ejabberd_service_sup, ejabberd_service]},
	 permanent,
	 infinity,
	 supervisor,
	 [ejabberd_tmp_sup]},
    IQSupervisor =
	{ejabberd_iq_sup,
	 {ejabberd_tmp_sup, start_link,
	  [ejabberd_iq_sup, gen_iq_handler]},
	 permanent,
	 infinity,
	 supervisor,
	 [ejabberd_tmp_sup]},
    {ok, {{one_for_one, 10, 1},
	  [Router, SM, S2S, Local,
	   StringPrep,
	   C2SSupervisor,
	   S2SInSupervisor,
	   S2SOutSupervisor,
	   ServiceSupervisor,
	   IQSupervisor,
	   Listener]}}.