diff options
Diffstat (limited to 'plugins/t')
-rw-r--r-- | plugins/t/check_http.t | 12 |
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; | |||
9 | use Test::More; | 9 | use Test::More; |
10 | use NPTest; | 10 | use NPTest; |
11 | 11 | ||
12 | plan tests => 12; | 12 | plan tests => 14; |
13 | 13 | ||
14 | my $successOutput = '/OK.*HTTP.*second/'; | 14 | my $successOutput = '/OK.*HTTP.*second/'; |
15 | 15 | ||
@@ -34,6 +34,16 @@ cmp_ok( $res->return_code, '==', 0, "Webserver $host_tcp_http responded" ); | |||
34 | like( $res->output, $successOutput, "Output OK" ); | 34 | like( $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 | ); | ||
39 | like( $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 | ); | ||
44 | like( $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 | ); |
39 | cmp_ok( $res->return_code, '==', 2, "Webserver $host_nonresponsive not responding" ); | 49 | cmp_ok( $res->return_code, '==', 2, "Webserver $host_nonresponsive not responding" ); |