summaryrefslogtreecommitdiff
path: root/src/stringprep
diff options
context:
space:
mode:
authorMickaël Rémond <mickael.remond@process-one.net>2007-06-30 06:07:09 +0000
committerMickaël Rémond <mickael.remond@process-one.net>2007-06-30 06:07:09 +0000
commit03fde5d50c537b0ddad02972d0cf619a779f9fd8 (patch)
treed0163020fd8615721965a8eb1613c6a733d9894c /src/stringprep
parent* src/ejabberd_config.erl: Normalize hostnames in config file. If mixed case ... (diff)
* Added missing file.
SVN Revision: 807
Diffstat (limited to 'src/stringprep')
-rw-r--r--src/stringprep/stringprep_sup.erl49
1 files changed, 49 insertions, 0 deletions
diff --git a/src/stringprep/stringprep_sup.erl b/src/stringprep/stringprep_sup.erl
new file mode 100644
index 00000000..e3b95796
--- /dev/null
+++ b/src/stringprep/stringprep_sup.erl
@@ -0,0 +1,49 @@
+%%%-------------------------------------------------------------------
+%%% File : stringprep_sup.erl
+%%% Author : Mickael Remond <mremond@process-one.net>
+%%% Description : Supervisor for the Stringprep worker.
+%%%
+%%% Created : 29 Jun 2007 by Mickael Remond <mremond@process-one.net>
+%%%-------------------------------------------------------------------
+-module(stringprep_sup).
+
+-behaviour(supervisor).
+
+%% 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([]) ->
+ StringPrep = {stringprep,
+ {stringprep, start_link, []},
+ permanent,
+ brutal_kill,
+ worker,
+ [stringprep]},
+ {ok,{{one_for_all,10,1}, [StringPrep]}}.