diff options
Diffstat (limited to 'plugins/t/check_http.t')
| -rw-r--r-- | plugins/t/check_http.t | 68 |
1 files changed, 35 insertions, 33 deletions
diff --git a/plugins/t/check_http.t b/plugins/t/check_http.t index 8bd484a0..281fa362 100644 --- a/plugins/t/check_http.t +++ b/plugins/t/check_http.t | |||
| @@ -14,6 +14,8 @@ plan tests => 49; | |||
| 14 | my $successOutput = '/OK.*HTTP.*second/'; | 14 | my $successOutput = '/OK.*HTTP.*second/'; |
| 15 | 15 | ||
| 16 | my $res; | 16 | my $res; |
| 17 | my $plugin = 'check_http'; | ||
| 18 | $plugin = 'check_curl' if $0 =~ m/check_curl/mx; | ||
| 17 | 19 | ||
| 18 | my $host_tcp_http = getTestParameter( "NP_HOST_TCP_HTTP", | 20 | my $host_tcp_http = getTestParameter( "NP_HOST_TCP_HTTP", |
| 19 | "A host providing the HTTP Service (a web server)", | 21 | "A host providing the HTTP Service (a web server)", |
| @@ -46,24 +48,24 @@ my $faketime = -x '/usr/bin/faketime' ? 1 : 0; | |||
| 46 | 48 | ||
| 47 | 49 | ||
| 48 | $res = NPTest->testCmd( | 50 | $res = NPTest->testCmd( |
| 49 | "./check_http $host_tcp_http -wt 300 -ct 600" | 51 | "./$plugin $host_tcp_http -wt 300 -ct 600" |
| 50 | ); | 52 | ); |
| 51 | cmp_ok( $res->return_code, '==', 0, "Webserver $host_tcp_http responded" ); | 53 | cmp_ok( $res->return_code, '==', 0, "Webserver $host_tcp_http responded" ); |
| 52 | like( $res->output, $successOutput, "Output OK" ); | 54 | like( $res->output, $successOutput, "Output OK" ); |
| 53 | 55 | ||
| 54 | $res = NPTest->testCmd( | 56 | $res = NPTest->testCmd( |
| 55 | "./check_http $host_tcp_http -wt 300 -ct 600 -v -v -v -k 'bob:there' -k 'carl:frown'" | 57 | "./$plugin $host_tcp_http -wt 300 -ct 600 -v -v -v -k 'bob:there' -k 'carl:frown'" |
| 56 | ); | 58 | ); |
| 57 | like( $res->output, '/bob:there\r\ncarl:frown\r\n/', "Got headers with multiple -k options" ); | 59 | like( $res->output, '/bob:there\r\ncarl:frown\r\n/', "Got headers with multiple -k options" ); |
| 58 | 60 | ||
| 59 | $res = NPTest->testCmd( | 61 | $res = NPTest->testCmd( |
| 60 | "./check_http $host_nonresponsive -wt 1 -ct 2 -t 3" | 62 | "./$plugin $host_nonresponsive -wt 1 -ct 2 -t 3" |
| 61 | ); | 63 | ); |
| 62 | cmp_ok( $res->return_code, '==', 2, "Webserver $host_nonresponsive not responding" ); | 64 | cmp_ok( $res->return_code, '==', 2, "Webserver $host_nonresponsive not responding" ); |
| 63 | cmp_ok( $res->output, 'eq', "CRITICAL - Socket timeout after 3 seconds", "Output OK"); | 65 | cmp_ok( $res->output, 'eq', "CRITICAL - Socket timeout after 3 seconds", "Output OK"); |
| 64 | 66 | ||
| 65 | $res = NPTest->testCmd( | 67 | $res = NPTest->testCmd( |
| 66 | "./check_http $hostname_invalid -wt 1 -ct 2" | 68 | "./$plugin $hostname_invalid -wt 1 -ct 2" |
| 67 | ); | 69 | ); |
| 68 | cmp_ok( $res->return_code, '==', 2, "Webserver $hostname_invalid not valid" ); | 70 | cmp_ok( $res->return_code, '==', 2, "Webserver $hostname_invalid not valid" ); |
| 69 | # The first part of the message comes from the OS catalogue, so cannot check this. | 71 | # The first part of the message comes from the OS catalogue, so cannot check this. |
| @@ -72,86 +74,86 @@ cmp_ok( $res->return_code, '==', 2, "Webserver $hostname_invalid not valid" ); | |||
| 72 | like( $res->output, "/Unable to open TCP socket|Socket timeout after/", "Output OK"); | 74 | like( $res->output, "/Unable to open TCP socket|Socket timeout after/", "Output OK"); |
| 73 | 75 | ||
| 74 | # host header checks | 76 | # host header checks |
| 75 | $res = NPTest->testCmd("./check_http -v -H $host_tcp_http"); | 77 | $res = NPTest->testCmd("./$plugin -v -H $host_tcp_http"); |
| 76 | like( $res->output, '/^Host: '.$host_tcp_http.'\s*$/ms', "Host Header OK" ); | 78 | like( $res->output, '/^Host: '.$host_tcp_http.'\s*$/ms', "Host Header OK" ); |
| 77 | 79 | ||
| 78 | $res = NPTest->testCmd("./check_http -v -H $host_tcp_http -p 80"); | 80 | $res = NPTest->testCmd("./$plugin -v -H $host_tcp_http -p 80"); |
| 79 | like( $res->output, '/^Host: '.$host_tcp_http.'\s*$/ms', "Host Header OK" ); | 81 | like( $res->output, '/^Host: '.$host_tcp_http.'\s*$/ms', "Host Header OK" ); |
| 80 | 82 | ||
| 81 | $res = NPTest->testCmd("./check_http -v -H $host_tcp_http:8080 -p 80"); | 83 | $res = NPTest->testCmd("./$plugin -v -H $host_tcp_http:8080 -p 80"); |
| 82 | like( $res->output, '/^Host: '.$host_tcp_http.':8080\s*$/ms', "Host Header OK" ); | 84 | like( $res->output, '/^Host: '.$host_tcp_http.':8080\s*$/ms', "Host Header OK" ); |
| 83 | 85 | ||
| 84 | $res = NPTest->testCmd("./check_http -v -H $host_tcp_http:8080 -p 80"); | 86 | $res = NPTest->testCmd("./$plugin -v -H $host_tcp_http:8080 -p 80"); |
| 85 | like( $res->output, '/^Host: '.$host_tcp_http.':8080\s*$/ms', "Host Header OK" ); | 87 | like( $res->output, '/^Host: '.$host_tcp_http.':8080\s*$/ms', "Host Header OK" ); |
| 86 | 88 | ||
| 87 | SKIP: { | 89 | SKIP: { |
| 88 | skip "No internet access", 3 if $internet_access eq "no"; | 90 | skip "No internet access", 3 if $internet_access eq "no"; |
| 89 | 91 | ||
| 90 | $res = NPTest->testCmd("./check_http -v -H $host_tls_http -S"); | 92 | $res = NPTest->testCmd("./$plugin -v -H $host_tls_http -S"); |
| 91 | like( $res->output, '/^Host: '.$host_tls_http.'\s*$/ms', "Host Header OK" ); | 93 | like( $res->output, '/^Host: '.$host_tls_http.'\s*$/ms', "Host Header OK" ); |
| 92 | 94 | ||
| 93 | $res = NPTest->testCmd("./check_http -v -H $host_tls_http:8080 -S -p 443"); | 95 | $res = NPTest->testCmd("./$plugin -v -H $host_tls_http:8080 -S -p 443"); |
| 94 | like( $res->output, '/^Host: '.$host_tls_http.':8080\s*$/ms', "Host Header OK" ); | 96 | like( $res->output, '/^Host: '.$host_tls_http.':8080\s*$/ms', "Host Header OK" ); |
| 95 | 97 | ||
| 96 | $res = NPTest->testCmd("./check_http -v -H $host_tls_http:443 -S -p 443"); | 98 | $res = NPTest->testCmd("./$plugin -v -H $host_tls_http:443 -S -p 443"); |
| 97 | like( $res->output, '/^Host: '.$host_tls_http.'\s*$/ms', "Host Header OK" ); | 99 | like( $res->output, '/^Host: '.$host_tls_http.'\s*$/ms', "Host Header OK" ); |
| 98 | }; | 100 | }; |
| 99 | 101 | ||
| 100 | SKIP: { | 102 | SKIP: { |
| 101 | skip "No host serving monitoring in index file", 7 unless $host_tcp_http2; | 103 | skip "No host serving monitoring in index file", 7 unless $host_tcp_http2; |
| 102 | 104 | ||
| 103 | $res = NPTest->testCmd( "./check_http -H $host_tcp_http2 -r 'monitoring'" ); | 105 | $res = NPTest->testCmd( "./$plugin -H $host_tcp_http2 -r 'monitoring'" ); |
| 104 | cmp_ok( $res->return_code, "==", 0, "Got a reference to 'monitoring'"); | 106 | cmp_ok( $res->return_code, "==", 0, "Got a reference to 'monitoring'"); |
| 105 | 107 | ||
| 106 | $res = NPTest->testCmd( "./check_http -H $host_tcp_http2 -r 'mONiTORing'" ); | 108 | $res = NPTest->testCmd( "./$plugin -H $host_tcp_http2 -r 'mONiTORing'" ); |
| 107 | cmp_ok( $res->return_code, "==", 2, "Not got 'mONiTORing'"); | 109 | cmp_ok( $res->return_code, "==", 2, "Not got 'mONiTORing'"); |
| 108 | like ( $res->output, "/pattern not found/", "Error message says 'pattern not found'"); | 110 | like ( $res->output, "/pattern not found/", "Error message says 'pattern not found'"); |
| 109 | 111 | ||
| 110 | $res = NPTest->testCmd( "./check_http -H $host_tcp_http2 -R 'mONiTORing'" ); | 112 | $res = NPTest->testCmd( "./$plugin -H $host_tcp_http2 -R 'mONiTORing'" ); |
| 111 | cmp_ok( $res->return_code, "==", 0, "But case insensitive doesn't mind 'mONiTORing'"); | 113 | cmp_ok( $res->return_code, "==", 0, "But case insensitive doesn't mind 'mONiTORing'"); |
| 112 | 114 | ||
| 113 | $res = NPTest->testCmd( "./check_http -H $host_tcp_http2 -r 'monitoring' --invert-regex" ); | 115 | $res = NPTest->testCmd( "./$plugin -H $host_tcp_http2 -r 'monitoring' --invert-regex" ); |
| 114 | cmp_ok( $res->return_code, "==", 2, "Invert results work when found"); | 116 | cmp_ok( $res->return_code, "==", 2, "Invert results work when found"); |
| 115 | like ( $res->output, "/pattern found/", "Error message says 'pattern found'"); | 117 | like ( $res->output, "/pattern found/", "Error message says 'pattern found'"); |
| 116 | 118 | ||
| 117 | $res = NPTest->testCmd( "./check_http -H $host_tcp_http2 -r 'mONiTORing' --invert-regex" ); | 119 | $res = NPTest->testCmd( "./$plugin -H $host_tcp_http2 -r 'mONiTORing' --invert-regex" ); |
| 118 | cmp_ok( $res->return_code, "==", 0, "And also when not found"); | 120 | cmp_ok( $res->return_code, "==", 0, "And also when not found"); |
| 119 | } | 121 | } |
| 120 | SKIP: { | 122 | SKIP: { |
| 121 | skip "No internet access", 16 if $internet_access eq "no"; | 123 | skip "No internet access", 16 if $internet_access eq "no"; |
| 122 | 124 | ||
| 123 | $res = NPTest->testCmd( | 125 | $res = NPTest->testCmd( |
| 124 | "./check_http --ssl $host_tls_http" | 126 | "./$plugin --ssl $host_tls_http" |
| 125 | ); | 127 | ); |
| 126 | cmp_ok( $res->return_code, '==', 0, "Can read https for $host_tls_http" ); | 128 | cmp_ok( $res->return_code, '==', 0, "Can read https for $host_tls_http" ); |
| 127 | 129 | ||
| 128 | $res = NPTest->testCmd( "./check_http -C 1 --ssl $host_tls_http" ); | 130 | $res = NPTest->testCmd( "./$plugin -C 1 --ssl $host_tls_http" ); |
| 129 | cmp_ok( $res->return_code, '==', 0, "Checking certificate for $host_tls_http"); | 131 | cmp_ok( $res->return_code, '==', 0, "Checking certificate for $host_tls_http"); |
| 130 | like ( $res->output, "/Certificate '$host_tls_cert' will expire on/", "Output OK" ); | 132 | like ( $res->output, "/Certificate '$host_tls_cert' will expire on/", "Output OK" ); |
| 131 | my $saved_cert_output = $res->output; | 133 | my $saved_cert_output = $res->output; |
| 132 | 134 | ||
| 133 | $res = NPTest->testCmd( "./check_http -C 8000,1 --ssl $host_tls_http" ); | 135 | $res = NPTest->testCmd( "./$plugin -C 8000,1 --ssl $host_tls_http" ); |
| 134 | cmp_ok( $res->return_code, '==', 1, "Checking certificate for $host_tls_http"); | 136 | cmp_ok( $res->return_code, '==', 1, "Checking certificate for $host_tls_http"); |
| 135 | like ( $res->output, qr/WARNING - Certificate '$host_tls_cert' expires in \d+ day/, "Output Warning" ); | 137 | like ( $res->output, qr/WARNING - Certificate '$host_tls_cert' expires in \d+ day/, "Output Warning" ); |
| 136 | 138 | ||
| 137 | $res = NPTest->testCmd( "./check_http $host_tls_http -C 1" ); | 139 | $res = NPTest->testCmd( "./$plugin $host_tls_http -C 1" ); |
| 138 | is( $res->return_code, 0, "Old syntax for cert checking okay" ); | 140 | is( $res->return_code, 0, "Old syntax for cert checking okay" ); |
| 139 | is( $res->output, $saved_cert_output, "Same output as new syntax" ); | 141 | is( $res->output, $saved_cert_output, "Same output as new syntax" ); |
| 140 | 142 | ||
| 141 | $res = NPTest->testCmd( "./check_http -H $host_tls_http -C 1" ); | 143 | $res = NPTest->testCmd( "./$plugin -H $host_tls_http -C 1" ); |
| 142 | is( $res->return_code, 0, "Updated syntax for cert checking okay" ); | 144 | is( $res->return_code, 0, "Updated syntax for cert checking okay" ); |
| 143 | is( $res->output, $saved_cert_output, "Same output as new syntax" ); | 145 | is( $res->output, $saved_cert_output, "Same output as new syntax" ); |
| 144 | 146 | ||
| 145 | $res = NPTest->testCmd( "./check_http -C 1 $host_tls_http" ); | 147 | $res = NPTest->testCmd( "./$plugin -C 1 $host_tls_http" ); |
| 146 | cmp_ok( $res->output, 'eq', $saved_cert_output, "--ssl option automatically added"); | 148 | cmp_ok( $res->output, 'eq', $saved_cert_output, "--ssl option automatically added"); |
| 147 | 149 | ||
| 148 | $res = NPTest->testCmd( "./check_http $host_tls_http -C 1" ); | 150 | $res = NPTest->testCmd( "./$plugin $host_tls_http -C 1" ); |
| 149 | cmp_ok( $res->output, 'eq', $saved_cert_output, "Old syntax for cert checking still works"); | 151 | cmp_ok( $res->output, 'eq', $saved_cert_output, "Old syntax for cert checking still works"); |
| 150 | 152 | ||
| 151 | # run some certificate checks with faketime | 153 | # run some certificate checks with faketime |
| 152 | SKIP: { | 154 | SKIP: { |
| 153 | skip "No faketime binary found", 12 if !$faketime; | 155 | skip "No faketime binary found", 12 if !$faketime; |
| 154 | $res = NPTest->testCmd("LC_TIME=C TZ=UTC ./check_http -C 1 $host_tls_http"); | 156 | $res = NPTest->testCmd("LC_TIME=C TZ=UTC ./$plugin -C 1 $host_tls_http"); |
| 155 | like($res->output, qr/OK - Certificate '$host_tls_cert' will expire on/, "Catch cert output"); | 157 | like($res->output, qr/OK - Certificate '$host_tls_cert' will expire on/, "Catch cert output"); |
| 156 | is( $res->return_code, 0, "Catch cert output exit code" ); | 158 | is( $res->return_code, 0, "Catch cert output exit code" ); |
| 157 | my($mon,$day,$hour,$min,$sec,$year) = ($res->output =~ /(\w+)\s+(\d+)\s+(\d+):(\d+):(\d+)\s+(\d+)/); | 159 | my($mon,$day,$hour,$min,$sec,$year) = ($res->output =~ /(\w+)\s+(\d+)\s+(\d+):(\d+):(\d+)\s+(\d+)/); |
| @@ -161,40 +163,40 @@ SKIP: { | |||
| 161 | my $months = {'Jan' => 0, 'Feb' => 1, 'Mar' => 2, 'Apr' => 3, 'May' => 4, 'Jun' => 5, 'Jul' => 6, 'Aug' => 7, 'Sep' => 8, 'Oct' => 9, 'Nov' => 10, 'Dec' => 11}; | 163 | my $months = {'Jan' => 0, 'Feb' => 1, 'Mar' => 2, 'Apr' => 3, 'May' => 4, 'Jun' => 5, 'Jul' => 6, 'Aug' => 7, 'Sep' => 8, 'Oct' => 9, 'Nov' => 10, 'Dec' => 11}; |
| 162 | my $ts = mktime($sec, $min, $hour, $day, $months->{$mon}, $year-1900); | 164 | my $ts = mktime($sec, $min, $hour, $day, $months->{$mon}, $year-1900); |
| 163 | my $time = strftime("%Y-%m-%d %H:%M:%S", localtime($ts)); | 165 | my $time = strftime("%Y-%m-%d %H:%M:%S", localtime($ts)); |
| 164 | $res = NPTest->testCmd("LC_TIME=C TZ=UTC faketime -f '".strftime("%Y-%m-%d %H:%M:%S", localtime($ts))."' ./check_http -C 1 $host_tls_http"); | 166 | $res = NPTest->testCmd("LC_TIME=C TZ=UTC faketime -f '".strftime("%Y-%m-%d %H:%M:%S", localtime($ts))."' ./$plugin -C 1 $host_tls_http"); |
| 165 | like($res->output, qr/CRITICAL - Certificate '$host_tls_cert' just expired/, "Output on expire date"); | 167 | like($res->output, qr/CRITICAL - Certificate '$host_tls_cert' just expired/, "Output on expire date"); |
| 166 | is( $res->return_code, 2, "Output on expire date" ); | 168 | is( $res->return_code, 2, "Output on expire date" ); |
| 167 | 169 | ||
| 168 | $res = NPTest->testCmd("LC_TIME=C TZ=UTC faketime -f '".strftime("%Y-%m-%d %H:%M:%S", localtime($ts-1))."' ./check_http -C 1 $host_tls_http"); | 170 | $res = NPTest->testCmd("LC_TIME=C TZ=UTC faketime -f '".strftime("%Y-%m-%d %H:%M:%S", localtime($ts-1))."' ./$plugin -C 1 $host_tls_http"); |
| 169 | like($res->output, qr/CRITICAL - Certificate '$host_tls_cert' expires in 0 minutes/, "cert expires in 1 second output"); | 171 | like($res->output, qr/CRITICAL - Certificate '$host_tls_cert' expires in 0 minutes/, "cert expires in 1 second output"); |
| 170 | is( $res->return_code, 2, "cert expires in 1 second exit code" ); | 172 | is( $res->return_code, 2, "cert expires in 1 second exit code" ); |
| 171 | 173 | ||
| 172 | $res = NPTest->testCmd("LC_TIME=C TZ=UTC faketime -f '".strftime("%Y-%m-%d %H:%M:%S", localtime($ts-120))."' ./check_http -C 1 $host_tls_http"); | 174 | $res = NPTest->testCmd("LC_TIME=C TZ=UTC faketime -f '".strftime("%Y-%m-%d %H:%M:%S", localtime($ts-120))."' ./$plugin -C 1 $host_tls_http"); |
| 173 | like($res->output, qr/CRITICAL - Certificate '$host_tls_cert' expires in 2 minutes/, "cert expires in 2 minutes output"); | 175 | like($res->output, qr/CRITICAL - Certificate '$host_tls_cert' expires in 2 minutes/, "cert expires in 2 minutes output"); |
| 174 | is( $res->return_code, 2, "cert expires in 2 minutes exit code" ); | 176 | is( $res->return_code, 2, "cert expires in 2 minutes exit code" ); |
| 175 | 177 | ||
| 176 | $res = NPTest->testCmd("LC_TIME=C TZ=UTC faketime -f '".strftime("%Y-%m-%d %H:%M:%S", localtime($ts-7200))."' ./check_http -C 1 $host_tls_http"); | 178 | $res = NPTest->testCmd("LC_TIME=C TZ=UTC faketime -f '".strftime("%Y-%m-%d %H:%M:%S", localtime($ts-7200))."' ./$plugin -C 1 $host_tls_http"); |
| 177 | like($res->output, qr/CRITICAL - Certificate '$host_tls_cert' expires in 2 hours/, "cert expires in 2 hours output"); | 179 | like($res->output, qr/CRITICAL - Certificate '$host_tls_cert' expires in 2 hours/, "cert expires in 2 hours output"); |
| 178 | is( $res->return_code, 2, "cert expires in 2 hours exit code" ); | 180 | is( $res->return_code, 2, "cert expires in 2 hours exit code" ); |
| 179 | 181 | ||
| 180 | $res = NPTest->testCmd("LC_TIME=C TZ=UTC faketime -f '".strftime("%Y-%m-%d %H:%M:%S", localtime($ts+1))."' ./check_http -C 1 $host_tls_http"); | 182 | $res = NPTest->testCmd("LC_TIME=C TZ=UTC faketime -f '".strftime("%Y-%m-%d %H:%M:%S", localtime($ts+1))."' ./$plugin -C 1 $host_tls_http"); |
| 181 | like($res->output, qr/CRITICAL - Certificate '$host_tls_cert' expired on/, "Certificate expired output"); | 183 | like($res->output, qr/CRITICAL - Certificate '$host_tls_cert' expired on/, "Certificate expired output"); |
| 182 | is( $res->return_code, 2, "Certificate expired exit code" ); | 184 | is( $res->return_code, 2, "Certificate expired exit code" ); |
| 183 | }; | 185 | }; |
| 184 | 186 | ||
| 185 | $res = NPTest->testCmd( "./check_http --ssl $host_tls_http -E" ); | 187 | $res = NPTest->testCmd( "./$plugin --ssl $host_tls_http -E" ); |
| 186 | like ( $res->output, '/time_connect=[\d\.]+/', 'Extended Performance Data Output OK' ); | 188 | like ( $res->output, '/time_connect=[\d\.]+/', 'Extended Performance Data Output OK' ); |
| 187 | like ( $res->output, '/time_ssl=[\d\.]+/', 'Extended Performance Data SSL Output OK' ); | 189 | like ( $res->output, '/time_ssl=[\d\.]+/', 'Extended Performance Data SSL Output OK' ); |
| 188 | 190 | ||
| 189 | $res = NPTest->testCmd( | 191 | $res = NPTest->testCmd( |
| 190 | "./check_http --ssl -H www.e-paycobalt.com" | 192 | "./$plugin --ssl -H www.e-paycobalt.com" |
| 191 | ); | 193 | ); |
| 192 | cmp_ok( $res->return_code, "==", 0, "Can read https for www.e-paycobalt.com (uses AES certificate)" ); | 194 | cmp_ok( $res->return_code, "==", 0, "Can read https for www.e-paycobalt.com (uses AES certificate)" ); |
| 193 | 195 | ||
| 194 | 196 | ||
| 195 | $res = NPTest->testCmd( "./check_http -H www.mozilla.com -u /firefox -f follow" ); | 197 | $res = NPTest->testCmd( "./$plugin -H www.mozilla.com -u /firefox -f follow" ); |
| 196 | is( $res->return_code, 0, "Redirection based on location is okay"); | 198 | is( $res->return_code, 0, "Redirection based on location is okay"); |
| 197 | 199 | ||
| 198 | $res = NPTest->testCmd( "./check_http -H www.mozilla.com --extended-perfdata" ); | 200 | $res = NPTest->testCmd( "./$plugin -H www.mozilla.com --extended-perfdata" ); |
| 199 | like ( $res->output, '/time_connect=[\d\.]+/', 'Extended Performance Data Output OK' ); | 201 | like ( $res->output, '/time_connect=[\d\.]+/', 'Extended Performance Data Output OK' ); |
| 200 | } | 202 | } |
