summaryrefslogtreecommitdiffstats
path: root/plugins/t
diff options
context:
space:
mode:
Diffstat (limited to 'plugins/t')
-rw-r--r--plugins/t/check_http.t12
1 files changed, 11 insertions, 1 deletions
diff --git a/plugins/t/check_http.t b/plugins/t/check_http.t
index 408906d..3154151 100644
--- a/plugins/t/check_http.t
+++ b/plugins/t/check_http.t
@@ -9,7 +9,7 @@ use strict;
9use Test::More; 9use Test::More;
10use NPTest; 10use NPTest;
11 11
12plan tests => 12; 12plan tests => 14;
13 13
14my $successOutput = '/OK.*HTTP.*second/'; 14my $successOutput = '/OK.*HTTP.*second/';
15 15
@@ -34,6 +34,16 @@ cmp_ok( $res->return_code, '==', 0, "Webserver $host_tcp_http responded" );
34like( $res->output, $successOutput, "Output OK" ); 34like( $res->output, $successOutput, "Output OK" );
35 35
36$res = NPTest->testCmd( 36$res = NPTest->testCmd(
37 "./check_http $host_tcp_http -wt 300 -ct 600 -v -v -v -k 'bob:there;fred:here'"
38 );
39like( $res->output, '/bob:there\r\nfred:here\r\n/', "Got headers, delimited with ';'" );
40
41$res = NPTest->testCmd(
42 "./check_http $host_tcp_http -wt 300 -ct 600 -v -v -v -k 'bob:there;fred:here' -k 'carl:frown'"
43 );
44like( $res->output, '/bob:there\r\nfred:here\r\ncarl:frown\r\n/', "Got headers with multiple -k options" );
45
46$res = NPTest->testCmd(
37 "./check_http $host_nonresponsive -wt 1 -ct 2" 47 "./check_http $host_nonresponsive -wt 1 -ct 2"
38 ); 48 );
39cmp_ok( $res->return_code, '==', 2, "Webserver $host_nonresponsive not responding" ); 49cmp_ok( $res->return_code, '==', 2, "Webserver $host_nonresponsive not responding" );