1 From 81106c53b80f5d0fa441b893048bbdc6c9e2c4f0 Mon Sep 17 00:00:00 2001
2 From: Marek Majkowski <majek04@gmail.com>
3 Date: Thu, 26 Jan 2012 12:54:31 +0000
4 Subject: [PATCH 6/7] Use erlang:integer_to_list and lists:max instead of bifs
7 src/cowboy_http_req.erl | 2 +-
8 src/cowboy_http_static.erl | 2 +-
9 src/cowboy_multipart.erl | 4 ++--
10 3 files changed, 4 insertions(+), 4 deletions(-)
12 diff --git a/src/cowboy_http_req.erl b/src/cowboy_http_req.erl
13 index c884f5a..bf4ac7a 100644
14 --- a/src/cowboy_http_req.erl
15 +++ b/src/cowboy_http_req.erl
16 @@ -576,7 +576,7 @@ chunked_reply(Status, Headers, Req=#http_req{socket=Socket,
17 chunk(_Data, #http_req{socket=_Socket, transport=_Transport, method='HEAD'}) ->
19 chunk(Data, #http_req{socket=Socket, transport=Transport, resp_state=chunks}) ->
20 - Transport:send(Socket, [integer_to_list(iolist_size(Data), 16),
21 + Transport:send(Socket, [erlang:integer_to_list(iolist_size(Data), 16),
22 <<"\r\n">>, Data, <<"\r\n">>]).
24 %% @doc Send an upgrade reply.
25 diff --git a/src/cowboy_http_static.erl b/src/cowboy_http_static.erl
26 index d370046..da3bd33 100644
27 --- a/src/cowboy_http_static.erl
28 +++ b/src/cowboy_http_static.erl
29 @@ -412,7 +412,7 @@ attr_etag_function(Args, Attrs) ->
31 -spec attr_etag_function([etagarg()], [fileattr()], [binary()]) -> binary().
32 attr_etag_function(_Args, [], Acc) ->
33 - list_to_binary(integer_to_list(erlang:crc32(Acc), 16));
34 + list_to_binary(erlang:integer_to_list(erlang:crc32(Acc), 16));
35 attr_etag_function(Args, [H|T], Acc) ->
36 {_, Value} = lists:keyfind(H, 1, Args),
37 attr_etag_function(Args, T, [term_to_binary(Value)|Acc]).
38 diff --git a/src/cowboy_multipart.erl b/src/cowboy_multipart.erl
39 index b7aeb54..c9b5b6c 100644
40 --- a/src/cowboy_multipart.erl
41 +++ b/src/cowboy_multipart.erl
42 @@ -105,7 +105,7 @@ parse_boundary_eol(Bin, Pattern) ->
43 cowboy_http:whitespace(Rest, Fun);
45 % CRLF not found in the given binary.
46 - RestStart = max(byte_size(Bin) - 1, 0),
47 + RestStart = lists:max([byte_size(Bin) - 1, 0]),
48 <<_:RestStart/binary, Rest/binary>> = Bin,
49 more(Rest, fun (NewBin) -> parse_boundary_eol(NewBin, Pattern) end)
51 @@ -175,7 +175,7 @@ skip(Bin, Pattern = {P, PSize}) ->
52 parse_boundary_tail(Rest, Pattern);
54 % Boundary not found, need more data.
55 - RestStart = max(byte_size(Bin) - PSize + 1, 0),
56 + RestStart = lists:max([byte_size(Bin) - PSize + 1, 0]),
57 <<_:RestStart/binary, Rest/binary>> = Bin,
58 more(Rest, fun (NewBin) -> skip(NewBin, Pattern) end)