aboutsummaryrefslogtreecommitdiffstats
path: root/include/cow_inline.hrl
diff options
context:
space:
mode:
authorLoïc Hoguin <[email protected]>2014-12-13 14:42:43 +0200
committerLoïc Hoguin <[email protected]>2014-12-13 14:46:05 +0200
commit86917a4c641f01c18f53b34bc4bc89c20549f04a (patch)
tree45e8fc0b1b4b49d6a135c81d404857648976cc85 /include/cow_inline.hrl
parent847b1bca21cc2ddec6b94f2a8f8924ad3f4be73a (diff)
downloadcowlib-86917a4c641f01c18f53b34bc4bc89c20549f04a.tar.gz
cowlib-86917a4c641f01c18f53b34bc4bc89c20549f04a.tar.bz2
cowlib-86917a4c641f01c18f53b34bc4bc89c20549f04a.zip
Add cow_http_hd:parse_accept_language/1
From RFC7231. This code is more than twice faster as the current Cowboy code, while filtering out more bad cases.
Diffstat (limited to 'include/cow_inline.hrl')
-rw-r--r--include/cow_inline.hrl25
1 files changed, 15 insertions, 10 deletions
diff --git a/include/cow_inline.hrl b/include/cow_inline.hrl
index 82cc465..a72f8c5 100644
--- a/include/cow_inline.hrl
+++ b/include/cow_inline.hrl
@@ -15,15 +15,9 @@
-ifndef(COW_INLINE_HRL).
-define(COW_INLINE_HRL, 1).
-%% IS_DIGIT(Character)
+%% IS_ALPHA(Character)
--define(IS_DIGIT(C),
- C >= $0, C =< $9
-).
-
-%% IS_TOKEN(Character)
-
--define(IS_TOKEN(C),
+-define(IS_ALPHA(C),
C =:= $a; C =:= $b; C =:= $c; C =:= $d; C =:= $e;
C =:= $f; C =:= $g; C =:= $h; C =:= $i; C =:= $j;
C =:= $k; C =:= $l; C =:= $m; C =:= $n; C =:= $o;
@@ -35,9 +29,20 @@
C =:= $K; C =:= $L; C =:= $M; C =:= $N; C =:= $O;
C =:= $P; C =:= $Q; C =:= $R; C =:= $S; C =:= $T;
C =:= $U; C =:= $V; C =:= $W; C =:= $X; C =:= $Y;
- C =:= $2;
+ C =:= $2
+).
+
+%% IS_DIGIT(Character)
+
+-define(IS_DIGIT(C),
C =:= $0; C =:= $1; C =:= $2; C =:= $3; C =:= $4;
- C =:= $5; C =:= $6; C =:= $7; C =:= $8; C =:= $9;
+ C =:= $5; C =:= $6; C =:= $7; C =:= $8; C =:= $9
+).
+
+%% IS_TOKEN(Character)
+
+-define(IS_TOKEN(C),
+ ?IS_ALPHA(C); ?IS_DIGIT(C);
C =:= $!; C =:= $#; C =:= $$; C =:= $%; C =:= $&;
C =:= $'; C =:= $*; C =:= $+; C =:= $-; C =:= $.;
C =:= $^; C =:= $_; C =:= $`; C =:= $|; C =:= $~