95 lines
3.2 KiB
Erlang
95 lines
3.2 KiB
Erlang
%%------------------------------------------------------------------------------
|
|
%% Copyright (c) 2012-2015, Feng Lee <feng@emqtt.io>
|
|
%%
|
|
%% Permission is hereby granted, free of charge, to any person obtaining a copy
|
|
%% of this software and associated documentation files (the "Software"), to deal
|
|
%% in the Software without restriction, including without limitation the rights
|
|
%% to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
|
|
%% copies of the Software, and to permit persons to whom the Software is
|
|
%% furnished to do so, subject to the following conditions:
|
|
%%
|
|
%% The above copyright notice and this permission notice shall be included in all
|
|
%% copies or substantial portions of the Software.
|
|
%%
|
|
%% THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
|
|
%% IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
|
|
%% FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
|
|
%% AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
|
|
%% LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
|
|
%% OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
|
|
%% SOFTWARE.
|
|
%%------------------------------------------------------------------------------
|
|
|
|
-module(emqtt_http).
|
|
|
|
-author('feng@emqtt.io').
|
|
|
|
-include("emqtt.hrl").
|
|
|
|
-include("emqtt_packet.hrl").
|
|
|
|
-import(proplists, [get_value/2, get_value/3]).
|
|
|
|
-export([handle/1]).
|
|
|
|
handle(Req) ->
|
|
case authorized(Req) of
|
|
true ->
|
|
Path = Req:get(path),
|
|
Method = Req:get(method),
|
|
handle(Method, Path, Req);
|
|
false ->
|
|
error_logger:info_msg("Fobbidden"),
|
|
Req:respond({401, [], <<"Fobbiden">>})
|
|
end.
|
|
|
|
handle('POST', "/mqtt/publish", Req) ->
|
|
Params = mochiweb_request:parse_post(Req),
|
|
lager:info("HTTP Publish: ~p~n", [Params]),
|
|
Qos = int(get_value("qos", Params, "0")),
|
|
Retain = bool(get_value("retain", Params, "0")),
|
|
Topic = list_to_binary(get_value("topic", Params)),
|
|
Message = list_to_binary(get_value("message", Params)),
|
|
case {validate(qos, Qos), validate(topic, Topic)} of
|
|
{true, true} ->
|
|
emqtt_router:route(
|
|
#mqtt_message { qos = Qos,
|
|
retain = Retain,
|
|
topic = Topic,
|
|
payload = Message }),
|
|
Req:ok({"text/plan", <<"ok\n">>});
|
|
{false, _} ->
|
|
Req:respond({400, [], <<"Bad QoS">>});
|
|
{_, false} ->
|
|
Req:respond({400, [], <<"Bad Topic">>})
|
|
end;
|
|
|
|
handle(_Method, _Path, Req) ->
|
|
Req:not_found().
|
|
|
|
%%------------------------------------------------------------------------------
|
|
%% basic authorization
|
|
%%------------------------------------------------------------------------------
|
|
authorized(Req) ->
|
|
case mochiweb_request:get_header_value("Authorization", Req) of
|
|
undefined ->
|
|
false;
|
|
"Basic " ++ BasicAuth ->
|
|
emqtt_auth:check(user_passwd(BasicAuth))
|
|
end.
|
|
|
|
user_passwd(BasicAuth) ->
|
|
list_to_tuple(binary:split(base64:decode(BasicAuth), <<":">>)).
|
|
|
|
validate(qos, Qos) ->
|
|
(Qos >= ?QOS_0) and (Qos =< ?QOS_2);
|
|
|
|
validate(topic, Topic) ->
|
|
emqtt_topic:validate({name, Topic}).
|
|
|
|
int(S) -> list_to_integer(S).
|
|
|
|
bool("0") -> false;
|
|
bool("1") -> true.
|
|
|