summaryrefslogtreecommitdiffstats
path: root/debian/vendor-h2o/t/50expires.t
diff options
context:
space:
mode:
authorDaniel Baumann <daniel.baumann@progress-linux.org>2024-04-13 21:12:02 +0000
committerDaniel Baumann <daniel.baumann@progress-linux.org>2024-04-13 21:12:02 +0000
commit77e50caaf2ef81cd91075cf836fed0e75718ffb4 (patch)
tree53b7b411290b63192fc9e924a3b6b65cdf67e9d0 /debian/vendor-h2o/t/50expires.t
parentAdding upstream version 1.8.3. (diff)
downloaddnsdist-77e50caaf2ef81cd91075cf836fed0e75718ffb4.tar.xz
dnsdist-77e50caaf2ef81cd91075cf836fed0e75718ffb4.zip
Adding debian version 1.8.3-2.debian/1.8.3-2
Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>
Diffstat (limited to '')
-rw-r--r--debian/vendor-h2o/t/50expires.t47
1 files changed, 47 insertions, 0 deletions
diff --git a/debian/vendor-h2o/t/50expires.t b/debian/vendor-h2o/t/50expires.t
new file mode 100644
index 0000000..d5c2570
--- /dev/null
+++ b/debian/vendor-h2o/t/50expires.t
@@ -0,0 +1,47 @@
+use strict;
+use warnings;
+use Test::More;
+use t::Util;
+
+plan skip_all => 'curl not found'
+ unless prog_exists('curl');
+
+sub fetch {
+ my $extra_conf = shift;
+ my $server = spawn_h2o(<< "EOT");
+hosts:
+ default:
+ paths:
+ /:
+ file.dir: examples/doc_root
+$extra_conf
+EOT
+ return `curl --silent --dump-header /dev/stderr http://127.0.0.1:$server->{port}/ 2>&1 > /dev/null`;
+}
+
+
+my $resp = fetch('');
+unlike $resp, qr/^cache-control:.*\Wmax-age/im, "off by default";
+
+$resp = fetch(<< 'EOT');
+expires: OFF
+EOT
+unlike $resp, qr/^cache-control:.*\Wmax-age/im, "explicitly turned off";
+
+$resp = fetch(<< 'EOT');
+expires: 1 day
+EOT
+like $resp, qr/^cache-control:.*\Wmax-age=86400\W/im, "expires 1 day";
+
+$resp = fetch(<< 'EOT');
+expires: 1 month
+EOT
+like $resp, qr/^cache-control:.*\Wmax-age=2592000\W/im, "expires 1 month";
+
+$resp = fetch(<< 'EOT');
+ expires: OFF
+expires: 1 day
+EOT
+unlike $resp, qr/^cache-control:.*\Wmax-age/im, "on at global, off at path-level";
+
+done_testing();