Modified the FTP server to use the new 'sockfilt' program to do all the socket

level stuff. The FTP server communicates with sockfilt using perl's open2().
This enables easier IPv6 support and hopefully FTP-SSL support in the future.
Added four test cases for FTP-ipv6.

1 files changed, 17 insertions, 0 deletions

diff --git a/tests/ftp.pm b/tests/ftp.pm
new file mode 100644
index 000000000..390c21459
--- /dev/null
+++ b/tests/ftp.pm
@@ -0,0 +1,17 @@
+# make sure no leftovers are still running
+sub ftpkillslaves {
+    for $ext (("", "ipv6")) {
+        for $id (("", "2")) {
+            for $base (('filt', 'data')) {
+                my $f = ".sock$base$id$ext.pid";
+                my $pid = checkserver($f);
+                if($pid > 0) {
+                    kill (9, $pid); # die!
+                }
+                unlink($f);
+            }
+        }
+    }
+}
+
+1;