aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--src/cowboy_http.erl30
1 files changed, 15 insertions, 15 deletions
diff --git a/src/cowboy_http.erl b/src/cowboy_http.erl
index ee8902a..28346f1 100644
--- a/src/cowboy_http.erl
+++ b/src/cowboy_http.erl
@@ -119,7 +119,7 @@ media_range_param_attr(Data, Fun, Type, SubType, Acc) ->
-spec media_range_param_value(binary(), fun(), binary(), binary(),
[{binary(), binary()}], binary()) -> any().
media_range_param_value(Data, Fun, Type, SubType, Acc, <<"q">>) ->
- quality(Data,
+ qvalue(Data,
fun (Rest, Quality) ->
accept_ext(Rest, Fun, Type, SubType, Acc, Quality, [])
end);
@@ -247,30 +247,30 @@ quoted_string(<< C, Rest/bits >>, Fun, Acc) ->
quoted_string(Rest, Fun, << Acc/binary, C >>).
%% @doc Parse a quality value.
--spec quality(binary(), fun()) -> any().
-quality(<< $0, $., Rest/bits >>, Fun) ->
- quality(Rest, Fun, 0, 100);
-quality(<< $0, Rest/bits >>, Fun) ->
+-spec qvalue(binary(), fun()) -> any().
+qvalue(<< $0, $., Rest/bits >>, Fun) ->
+ qvalue(Rest, Fun, 0, 100);
+qvalue(<< $0, Rest/bits >>, Fun) ->
Fun(Rest, 0);
-quality(<< $1, $., $0, $0, $0, Rest/bits >>, Fun) ->
+qvalue(<< $1, $., $0, $0, $0, Rest/bits >>, Fun) ->
Fun(Rest, 1000);
-quality(<< $1, $., $0, $0, Rest/bits >>, Fun) ->
+qvalue(<< $1, $., $0, $0, Rest/bits >>, Fun) ->
Fun(Rest, 1000);
-quality(<< $1, $., $0, Rest/bits >>, Fun) ->
+qvalue(<< $1, $., $0, Rest/bits >>, Fun) ->
Fun(Rest, 1000);
-quality(<< $1, Rest/bits >>, Fun) ->
+qvalue(<< $1, Rest/bits >>, Fun) ->
Fun(Rest, 1000);
-quality(_Data, _Fun) ->
+qvalue(_Data, _Fun) ->
{error, badarg}.
--spec quality(binary(), fun(), integer(), 1 | 10 | 100) -> any().
-quality(Data, Fun, Q, 0) ->
+-spec qvalue(binary(), fun(), integer(), 1 | 10 | 100) -> any().
+qvalue(Data, Fun, Q, 0) ->
Fun(Data, Q);
-quality(<< C, Rest/bits >>, Fun, Q, M)
+qvalue(<< C, Rest/bits >>, Fun, Q, M)
when C =:= $0; C =:= $1; C =:= $2; C =:= $3; C =:= $4;
C =:= $5; C =:= $6; C =:= $7; C =:= $8; C =:= $9 ->
- quality(Rest, Fun, Q + (C - $0) * M, M div 10);
-quality(Data, Fun, Q, _M) ->
+ qvalue(Rest, Fun, Q + (C - $0) * M, M div 10);
+qvalue(Data, Fun, Q, _M) ->
Fun(Data, Q).
%% Interpretation.