chiark / gitweb /
Obsolete broken program, remove.
authorian <ian>
Mon, 11 Dec 2000 00:20:12 +0000 (00:20 +0000)
committerian <ian>
Mon, 11 Dec 2000 00:20:12 +0000 (00:20 +0000)
ipif/udptunnel-vpnd [deleted file]

diff --git a/ipif/udptunnel-vpnd b/ipif/udptunnel-vpnd
deleted file mode 100644 (file)
index 75a9cfc..0000000
+++ /dev/null
@@ -1,33 +0,0 @@
-#!/usr/bin/perl
-@ARGV == 2 && $ARGV[0] != m/^-/
-    or die
-    "usage: udptunnel-vpnd SYSLOGFAC LIBDIR LOGDIR\n"
-    " eg udptunnel-vpnd local2 /var/lib/udptunnel-vpn /var/log/udptunnel-vpn\n"
-
-($syslocfac,$libdir,$logdir) = @ARGV;
-
-chdir($logdir) or die "$logdir: $!\n";
-
-open A, "$libdir/active-sites" or die "$libdir/active-sites: $!\n";
-while (<A>) {
-    next if m/^\#/ || !m/\S/;
-    m/^(\w+)\s/ or die;
-    push @restart_queue, $1;
-}
-close A;
-
-$c= open LO, "|logger -p $syslogfac.notice -t vpnd[$$]" or die $!;
-$pid{$c}= ' LOGGER NOTICE';
-
-$c= open LE, "|logger -p $syslogfac.err -t vpnd[$$]" or die $!;
-$pid{$c}= ' LOGGER NOTICE';
-
-sleep 1;
-
-print LO "starting vpnd\n" or die $!;
-
-open STDERR, ">&LE";
-open STDOUT, ">&L";
-
-for (;;) {
-