aboutsummaryrefslogtreecommitdiff
path: root/tests/cs.at
diff options
context:
space:
mode:
Diffstat (limited to 'tests/cs.at')
-rw-r--r--tests/cs.at77
1 files changed, 77 insertions, 0 deletions
diff --git a/tests/cs.at b/tests/cs.at
new file mode 100644
index 0000000..f847773
--- /dev/null
+++ b/tests/cs.at
@@ -0,0 +1,77 @@
+AT_SETUP([case-sensitive])
+AT_KEYWORDS([case-sensitive])
+AT_VARNISHTEST([dict],[
+ sub vcl_init {
+ dict.load("\${vmod_topsrc}/tests/num.dict", false, 0);
+ }
+ sub vcl_recv {
+ set req.http.X-result = dict.lookup(regsub(req.url, "^/(.*)", "\1"));
+ return (hash);
+ }
+ sub vcl_deliver {
+ set resp.http.X-result = req.http.X-result;
+ }
+],
+[ txreq -url "/one"
+ rxresp
+ expect resp.http.X-result == "en"
+ txreq -url "/two"
+ rxresp
+ expect resp.http.X-result == "to"
+ txreq -url "/three"
+ rxresp
+ expect resp.http.X-result == "tre"
+ txreq -url "/four"
+ rxresp
+ expect resp.http.X-result == "fire"
+ txreq -url "/five"
+ rxresp
+ expect resp.http.X-result == "fem"
+ txreq -url "/six"
+ rxresp
+ expect resp.http.X-result == "seks"
+ txreq -url "/seven"
+ rxresp
+ expect resp.http.X-result == "sju"
+ txreq -url "/eight"
+ rxresp
+ expect resp.http.X-result == "aatte"
+ txreq -url "/nine"
+ rxresp
+ expect resp.http.X-result == "ni"
+ txreq -url "/ten"
+ rxresp
+ expect resp.http.X-result == "ti"
+ txreq -url "/eleven"
+ rxresp
+ expect resp.http.X-result == "elleve"
+ txreq -url "/twelve"
+ rxresp
+ expect resp.http.X-result == "tolv"
+],
+[ rxreq
+ txresp
+ rxreq
+ txresp
+ rxreq
+ txresp
+ rxreq
+ txresp
+ rxreq
+ txresp
+ rxreq
+ txresp
+ rxreq
+ txresp
+ rxreq
+ txresp
+ rxreq
+ txresp
+ rxreq
+ txresp
+ rxreq
+ txresp
+ rxreq
+ txresp
+])
+AT_CLEANUP

Return to:

Send suggestions and report system problems to the System administrator.