aboutsummaryrefslogblamecommitdiffstats
path: root/src/cowboy_protocols_sup.erl
blob: 04f662e5464de66db88c68237662eb21e96c9470 (plain) (tree)








































                                                                                   
%% Copyright (c) 2011, Loïc Hoguin <[email protected]>
%%
%% Permission to use, copy, modify, and/or distribute this software for any
%% purpose with or without fee is hereby granted, provided that the above
%% copyright notice and this permission notice appear in all copies.
%%
%% THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
%% WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
%% MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
%% ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
%% WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
%% ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
%% OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.

-module(cowboy_protocols_sup).
-behaviour(supervisor).

-export([start_link/0, start_protocol/4]). %% API.
-export([init/1]). %% supervisor.

-include("include/types.hrl").

-define(SUPERVISOR, ?MODULE).

%% API.

-spec start_link() -> {ok, Pid::pid()}.
start_link() ->
	supervisor:start_link({local, ?SUPERVISOR}, ?MODULE, []).

-spec start_protocol(Socket::socket(), Transport::module(),
	Protocol::module(), Opts::term()) -> {ok, Pid::pid()}.
start_protocol(Socket, Transport, Protocol, Opts) ->
	Protocol:start_link(Socket, Transport, Opts).

%% supervisor.

-spec init([]) -> term(). %% @todo These specs should be improved.
init([]) ->
	{ok, {{simple_one_for_one, 0, 1}, [{?MODULE, {?MODULE, start_protocol, []},
		temporary, brutal_kill, worker, [?MODULE]}]}}.