noss / iserve

A small http server for erlang.

This URL has Read+Write access

iserve / src / iserve_sup.erl
raw normal view history
f886f728 » Torbjorn Tornkvist 2007-10-31 Init repos. 1 -module(iserve_sup).
2 -behaviour(supervisor).
3 -export([
4 start_link/0,
5 init/1
6 ]).
7
8 start_link() ->
2b7027e2 » noss 2008-12-22 Working on being able to ru... 9 supervisor:start_link({local, ?MODULE}, ?MODULE, []).
f886f728 » Torbjorn Tornkvist 2007-10-31 Init repos. 10
11 init([]) ->
2b7027e2 » noss 2008-12-22 Working on being able to ru... 12 Supervisor = self(),
13
14 %% The servers supervisor is for keeping individual servers,
15 %% adding and removing them dynamically
16 Servers = {servers_sup,
17 {iserve_server_sup, start_link, [Supervisor]},
18 permanent, 2000, worker, [iserve_server_sup]},
19
20 %% The master is for book keeping all running servers and
21 %% to hold information about them.
22 Master = {master,
d481614c » noss 2009-03-08 Iserve master is passed the... 23 {iserve_master, start_link, [iserve_server_sup]},
2b7027e2 » noss 2008-12-22 Working on being able to ru... 24 permanent, 2000, worker, [iserve_master]},
25
26 {ok,
27 { {one_for_one, 5, 60},
28 [Servers, Master]}}.
f886f728 » Torbjorn Tornkvist 2007-10-31 Init repos. 29
f6658a76 » noss 2008-08-02 Taking configuration items ... 30