diff options
author | linkslice <sparctacus@gmail.com> | 2012-06-06 21:35:34 -0700 |
---|---|---|
committer | Holger Weiss <holger@zedat.fu-berlin.de> | 2013-08-18 18:23:11 +0200 |
commit | 2a8eab6b31e0f461e52b504776caad6bb93b981f (patch) | |
tree | 087ab01032764d366d91849a619489b73d3c776c /plugins/tests | |
parent | 0eeb8cde6756c1280f4925ba479d378541bbce04 (diff) | |
download | monitoring-plugins-2a8eab6b31e0f461e52b504776caad6bb93b981f.tar.gz |
added ability to check regex against http headers. booyah!
Diffstat (limited to 'plugins/tests')
-rwxr-xr-x | plugins/tests/check_http.t | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/plugins/tests/check_http.t b/plugins/tests/check_http.t index 9f97abdc..873fd6ec 100755 --- a/plugins/tests/check_http.t +++ b/plugins/tests/check_http.t @@ -151,6 +151,10 @@ sub run_server { unshift @persist, $c; delete($persist[1000]); next MAINLOOP; + } elsif ($r->url->path eq "/header_check") { + $c->send_basic_header; + $c->send_header('foo'); + $c->send_crlf; } else { $c->send_error(HTTP::Status->RC_FORBIDDEN); } @@ -223,6 +227,13 @@ sub run_common_tests { is( $result->return_code, 2, "Missing string check"); like( $result->output, qr%HTTP CRITICAL: HTTP/1\.1 200 OK - string 'NonRootWithOver30charsAndM...' not found on 'https?://127\.0\.0\.1:\d+/file/root'%, "Shows search string and location"); + $result = NPTest->testCmd( "$command -u /header_check -d foo" ); + is( $result->return_code, 0, "header_check search for string"); + like( $result->output, '/^HTTP OK: HTTP/1.1 200 OK - 274 bytes in [\d\.]+ second/', "Output correct" ); + + $result = NPTest->testCmd( "$command -u /header_check -d foobar" ); + is( $result->return_code, 2, "Missing header string check"); + like( $result->output, qr%^HTTP CRITICAL: HTTP/1\.1 200 OK - string 'foobar' not found on 'https?://127\.0\.0\.1:\d+/header_check/root'%, "Shows search string and location"); my $cmd; $cmd = "$command -u /slow"; |