ertorrent_torrent_ssup.erl

-module(ertorrent_torrent_ssup).

-behaviour(supervisor).

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

start_link() ->
    supervisor:start_link(ertorrent_torrent_ssup, []).

init(_Arg) ->
    MaxRestart = 4,
    MaxTime = 5,

    SupFlags = {one_for_one, MaxRestart, MaxTime},

    SupSpecs = [#{id => ertorrent_torrent_sup,
                  start => {ertorrent_torrent_sup, start_link, []},
                  shutdown => brutal_kill,
                  type => supervisor}],

    SrvSpecs = [#{id => ertorrent_torrent_srv,
                  start => {ertorrent_torrent_srv, start_link, []},
                  shutdown => brutal_kill,
                  type => worker}],

    {ok, {SupFlags,[SupSpecs, SrvSpecs]}}.