From 86f9f481c8c8326380279df3cd2162163c1c40f0 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Lo=C3=AFc=20Hoguin?= Date: Sat, 14 Jul 2012 20:24:47 +0200 Subject: Add a simple Static File Server example --- examples/static/src/static.app.src | 15 +++++++++++++++ examples/static/src/static.erl | 12 ++++++++++++ examples/static/src/static_app.erl | 28 ++++++++++++++++++++++++++++ examples/static/src/static_sup.erl | 23 +++++++++++++++++++++++ 4 files changed, 78 insertions(+) create mode 100644 examples/static/src/static.app.src create mode 100644 examples/static/src/static.erl create mode 100644 examples/static/src/static_app.erl create mode 100644 examples/static/src/static_sup.erl (limited to 'examples/static/src') diff --git a/examples/static/src/static.app.src b/examples/static/src/static.app.src new file mode 100644 index 0000000..bf7512d --- /dev/null +++ b/examples/static/src/static.app.src @@ -0,0 +1,15 @@ +%% Feel free to use, reuse and abuse the code in this file. + +{application, static, [ + {description, "Cowboy static file server example."}, + {vsn, "1"}, + {modules, []}, + {registered, []}, + {applications, [ + kernel, + stdlib, + cowboy + ]}, + {mod, {static_app, []}}, + {env, []} +]}. diff --git a/examples/static/src/static.erl b/examples/static/src/static.erl new file mode 100644 index 0000000..a542adb --- /dev/null +++ b/examples/static/src/static.erl @@ -0,0 +1,12 @@ +%% Feel free to use, reuse and abuse the code in this file. + +-module(static). + +%% API. +-export([start/0]). + +%% API. + +start() -> + ok = application:start(cowboy), + ok = application:start(static). diff --git a/examples/static/src/static_app.erl b/examples/static/src/static_app.erl new file mode 100644 index 0000000..3fba707 --- /dev/null +++ b/examples/static/src/static_app.erl @@ -0,0 +1,28 @@ +%% Feel free to use, reuse and abuse the code in this file. + +%% @private +-module(static_app). +-behaviour(application). + +%% API. +-export([start/2]). +-export([stop/1]). + +%% API. + +start(_Type, _Args) -> + Dispatch = [ + {'_', [ + {['...'], cowboy_http_static, [ + {directory, {priv_dir, static, []}} + ]} + ]} + ], + {ok, _} = cowboy:start_listener(http, 100, + cowboy_tcp_transport, [{port, 8080}], + cowboy_http_protocol, [{dispatch, Dispatch}] + ), + static_sup:start_link(). + +stop(_State) -> + ok. diff --git a/examples/static/src/static_sup.erl b/examples/static/src/static_sup.erl new file mode 100644 index 0000000..a3b2e16 --- /dev/null +++ b/examples/static/src/static_sup.erl @@ -0,0 +1,23 @@ +%% Feel free to use, reuse and abuse the code in this file. + +%% @private +-module(static_sup). +-behaviour(supervisor). + +%% API. +-export([start_link/0]). + +%% supervisor. +-export([init/1]). + +%% API. + +-spec start_link() -> {ok, pid()}. +start_link() -> + supervisor:start_link({local, ?MODULE}, ?MODULE, []). + +%% supervisor. + +init([]) -> + Procs = [], + {ok, {{one_for_one, 10, 10}, Procs}}. -- cgit v1.2.3