iframe-proxy | Sunbelt Computer Software

76 lines (63 loc) · 2.19 KB

%% @author Justin Sheehy <justin@basho.com>
%% @author Andy Gross <andy@basho.com>
%% @copyright 2007-2014 Basho Technologies
%%    Licensed under the Apache License, Version 2.0 (the "License");
%%    you may not use this file except in compliance with the License.
%%    You may obtain a copy of the License at
%%        http://www.apache.org/licenses/LICENSE-2.0
%%    Unless required by applicable law or agreed to in writing, software
%%    distributed under the License is distributed on an "AS IS" BASIS,
%%    WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
%%    See the License for the specific language governing permissions and
%%    limitations under the License.
-module(webmachine).
-author('Justin Sheehy <justin@basho.com>').
-author('Andy Gross <andy@basho.com>').
-export([start/0, stop/0, new_request/2]).
-type headers() :: webmachine_headers:t().
-type response_body() :: iodata()
                       | {stream, StreamBody::any()}
                       | {known_length_stream, non_neg_integer(), StreamBody::any()}
                       | {stream, non_neg_integer(), fun()} %% TODO: type for fun()
                       | {writer, WrtieBody::any()}
                       | {file, IoDevice::any()}.
-export_type([headers/0, response_body/0]).
%% @spec start() -> ok
%% @doc Start the webmachine server.
    webmachine_deps:ensure(),
    ok = ensure_started(crypto),
    ok = ensure_started(webmachine).
ensure_started(App) ->
    case application:start(App) of
        ok ->
        {error, {already_started, App}} ->
        {error, _} = E ->
%% @spec stop() -> ok
%% @doc Stop the webmachine server.
    application:stop(webmachine).
new_request(mochiweb, MochiReq) ->
    webmachine_mochiweb:new_webmachine_req(MochiReq).
-ifdef(TEST).
-include_lib("eunit/include/eunit.hrl").
start_mochiweb() ->
    webmachine_util:ensure_all_started(mochiweb).
start_stop_test() ->
    {Res, Apps} = start_mochiweb(),
    ?assertEqual(ok, Res),
    ?assertEqual(ok, webmachine:start()),
    ?assertEqual(ok, webmachine:stop()),
    [application:stop(App) || App <- Apps],

Sunbelt Computer Software

PL/B Language Development and Support

Provide feedback

Saved searches

Use saved searches to filter your results more quickly

Uh oh!

Sunbelt Computer Software

PL/B Language Development and Support

Uh oh!

FilesExpand file tree

webmachine.erl

Latest commit

History

webmachine.erl

File metadata and controls