Initial revision

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
+++ b/src/lib/Spong/Network/plugins/check_ftp
@@ -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
+++ b/src/lib/Spong/Network/plugins/check_pop
@@ -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;