1 #! /usr/bin/perl -w -I ..
16 $res = NPTest
->testCmd("./check_dummy");
17 is
( $res->return_code, 3, "No args" );
18 like
( $res->output, "/Could not parse arguments/", "Correct usage message");
20 $res = NPTest
->testCmd("./check_dummy 0");
21 is
( $res->return_code, 0, "OK state returned");
22 is
( $res->output, "OK", "Says 'OK'");
24 $res = NPTest
->testCmd("./check_dummy 0 'some random data'");
25 is
( $res->return_code, 0, "Still OK");
26 is
( $res->output, "OK: some random data", "Sample text okay");
28 $res = NPTest
->testCmd("./check_dummy 1");
29 is
( $res->return_code, 1, "Warning okay");
30 is
( $res->output, "WARNING", "Says 'WARNING'");
32 $res = NPTest
->testCmd("./check_dummy 1 'more stuff'");
33 is
( $res->return_code, 1, "Still warning");
34 is
( $res->output, "WARNING: more stuff", "optional text okay" );
36 $res = NPTest
->testCmd("./check_dummy 2");
37 is
( $res->return_code, 2, "Critical ok" );
38 is
( $res->output, "CRITICAL", "Says 'CRITICAL'");
40 $res = NPTest
->testCmd("./check_dummy 2 'roughly drafted'");
41 is
( $res->return_code, 2, "Still critical");
42 is
( $res->output, "CRITICAL: roughly drafted", "optional text okay" );
44 $res = NPTest
->testCmd("./check_dummy 3");
45 is
( $res->return_code, 3, "Unknown ok" );
46 is
( $res->output, "UNKNOWN", "Says 'UNKNOWN'");
48 $res = NPTest
->testCmd("./check_dummy 3 'daringfireball'");
49 is
( $res->return_code, 3, "Still unknown");
50 is
( $res->output, "UNKNOWN: daringfireball", "optional text okay" );
52 $res = NPTest
->testCmd("./check_dummy 4");
53 is
( $res->return_code, 3, "Invalid error code" );
54 is
( $res->output, "UNKNOWN: Status 4 is not a supported error state", "With appropriate error message");