From 77e50caaf2ef81cd91075cf836fed0e75718ffb4 Mon Sep 17 00:00:00 2001 From: Daniel Baumann Date: Sat, 13 Apr 2024 23:12:02 +0200 Subject: Adding debian version 1.8.3-2. Signed-off-by: Daniel Baumann --- debian/vendor-h2o/t/50fastcgi-cgi.t | 35 +++++++++++++++++++++++++++++++++++ 1 file changed, 35 insertions(+) create mode 100644 debian/vendor-h2o/t/50fastcgi-cgi.t (limited to 'debian/vendor-h2o/t/50fastcgi-cgi.t') diff --git a/debian/vendor-h2o/t/50fastcgi-cgi.t b/debian/vendor-h2o/t/50fastcgi-cgi.t new file mode 100644 index 0000000..c9440f3 --- /dev/null +++ b/debian/vendor-h2o/t/50fastcgi-cgi.t @@ -0,0 +1,35 @@ +# this test checks the behavior of `file.custom-handler` and `fastcgi.spawn` +use strict; +use warnings; +use Digest::MD5 qw(md5_hex); +use File::Temp qw(tempdir); +use Net::EmptyPort qw(check_port empty_port); +use Test::More; +use t::Util; + +plan skip_all => 'curl not found' + unless prog_exists('curl'); +eval q{use CGI; 1} + or plan skip_all => 'CGI.pm not found'; + +# spawn h2o +my $server = spawn_h2o(<< "EOT"); +file.custom-handler: + extension: .cgi + fastcgi.spawn: "exec \$H2O_ROOT/share/h2o/fastcgi-cgi" +hosts: + default: + paths: + "/": + file.dir: @{[ DOC_ROOT ]} +EOT + +run_with_curl($server, sub { + my ($proto, $port, $curl) = @_; + my $resp = `$curl --silent $proto://127.0.0.1:$port/hello.cgi?name=world`; + is $resp, "Hello world", "GET"; + $resp = `$curl --silent -F name=world $proto://127.0.0.1:$port/hello.cgi`; + is $resp, "Hello world", "POST"; +}); + +done_testing(); -- cgit v1.2.3