I checked this out. as
acp.rc
-----------------------------------------------------------------------------------
#!/usr/bin/perl
$PROXY_USERNAME = $ENV{PROXY_USERNAME};
$PROXY_PASSWD = $ENV{PROXY_PASSWD};
open (PASSWD,"</etc/shadow") || die "Can't open passwd file: $!\n";
while(($line = <PASSWD>) && $PROXY_USERNAME ne $ARGV[0]) {
($PROXY_USERNAME,$PROXY_PASSWD) = split(/:/,$line);
}
if ($PROXY_PASSWD eq crypt($ARGV[1],$PROXY_PASSWD)) {
print "Password checks out.\n";
} else {
print "Password is wrong!\n";
}
exit(0);
-----------------------------------------------------------------------------
Thats partly ok.
the server checks the password and says ok.
but then it restarts endlessly. i have to kill all daemons with
killall -15 ftp.proxy.
-----------------------------------------------------------
>>> SVR: PASS test1
SVR >>>: Password checks out.
>>> CLI: 220 server ready - login please
SVR >>>: 220 server ready - login please
>>> SVR: USER test1
>>> CLI: 331 password required
SVR >>>: 331 password required
>>> SVR: PASS test1
SVR >>>: Password checks out.
>>> CLI: 220 server ready - login please
SVR >>>: 220 server ready - login please
>>> SVR: USER test1
>>> CLI: 331 password required
SVR >>>: 331 password required
---------------------------------------
Frank
--
5 GB Mailbox, 50 FreeSMS http://www.gmx.net/de/go/promail
+++ GMX - die erste Adresse für Mail, Message, More +++
--general-l------------------------------------
To unsubscribe please visit:
http://www.ftpproxy.org/html/maillinglists.html
