]> git.etc.gen.nz Git - spong.git/commitdiff
Initial import
authorStephen L Johnson <sjohnson@monsters.org>
Mon, 31 May 1999 19:19:06 +0000 (19:19 +0000)
committerStephen L Johnson <sjohnson@monsters.org>
Mon, 31 May 1999 19:19:06 +0000 (19:19 +0000)
src/lib/Spong/Network/plugins/check_ftp [new file with mode: 0755]
src/lib/Spong/Network/plugins/check_pop [new file with mode: 0755]

diff --git a/src/lib/Spong/Network/plugins/check_ftp b/src/lib/Spong/Network/plugins/check_ftp
new file mode 100755 (executable)
index 0000000..f0c4c1e
--- /dev/null
@@ -0,0 +1,10 @@
+# Register the function with the plugin registry
+$PLUGINS{'ftp'} = \&check_ftp;
+
+# Check FTP service using the built-in check_simple subroutine
+sub check_ftp {
+    my ($host) = @_;
+    return &check_simple( $host, 21, "", "^\s*220", "ftp" );
+}
+
+1;
diff --git a/src/lib/Spong/Network/plugins/check_pop b/src/lib/Spong/Network/plugins/check_pop
new file mode 100755 (executable)
index 0000000..c40bfcf
--- /dev/null
@@ -0,0 +1,10 @@
+# Register the function with the plugin registry
+$PLUGINS{'pop'} = \&check_pop;
+
+# Check FTP service using the built-in check_simple subroutine
+sub check_pop {
+   my ($host) = @_;
+   return &check_simple( $host, 110, "QUIT\n", "OK", "pop3" );
+}
+
+1;