commit cb9ab5905b5931578fe378d82f03de2ce21ceb7e Author: neingeist Date: Mon May 20 13:12:42 2002 +0000 Initial CVS Import diff --git a/nullidentd b/nullidentd new file mode 100755 index 0000000..62b3e78 --- /dev/null +++ b/nullidentd @@ -0,0 +1,18 @@ +#!/usr/bin/perl + +$TIMEOUT = 3; +$BUFLEN = 1024; + +vec($rin='', fileno(STDIN), 1) = 1; +select($rout=$rin, undef, undef, $TIMEOUT); + +if (vec($rout, fileno(STDIN),1)) +{ + exit if (sysread(STDIN, $line, $BUFLEN) < 1); + ($serverPort, $clientPort) = split(',', $line); + $serverPort = int($serverPort); + $clientPort = int($clientPort); + exit if ($serverPort < 1 || $clientPort < 1); + + printf("%s , %s : USERID : %s : %s\r\n", $serverPort, $clientPort, "MSDOS", "billgates"); +}