mirror of
https://github.com/ninenines/cowboy.git
synced 2025-07-14 20:30:23 +00:00
24 lines
683 B
Erlang
24 lines
683 B
Erlang
%% This module does rate limiting based on the query string value.
|
|
|
|
-module(rate_limited_h).
|
|
|
|
-export([init/2]).
|
|
-export([rate_limited/2]).
|
|
-export([content_types_provided/2]).
|
|
-export([get_text_plain/2]).
|
|
|
|
init(Req, State) ->
|
|
{cowboy_rest, Req, State}.
|
|
|
|
rate_limited(Req=#{qs := <<"false">>}, State) ->
|
|
{false, Req, State};
|
|
rate_limited(Req=#{qs := <<"true-date">>}, State) ->
|
|
{{true, {{2222, 2, 22}, {11, 11, 11}}}, Req, State};
|
|
rate_limited(Req=#{qs := <<"true">>}, State) ->
|
|
{{true, 3600}, Req, State}.
|
|
|
|
content_types_provided(Req, State) ->
|
|
{[{{<<"text">>, <<"plain">>, []}, get_text_plain}], Req, State}.
|
|
|
|
get_text_plain(Req, State) ->
|
|
{<<"This is REST!">>, Req, State}.
|