hi.
in the squid-archives i found a perl-wrapper for ncsa_auth. like this one:
#!/usr/bin/perl
use IPC::Open2;
open2(*READ1, *WRITE1, "/usr/lib/squid/ncsa_auth /home/www/domain/.htpasswd")
or die "cannot open: $!\n";
while (<>) {
print WRITE1 $_;
$ans = <READ1>;
if ( $ans =~ /^OK/ ) { print $ans; next; }
print $ans;
}
run from the shell it does the job quite right. but not when run for squid as a
"auth_param basic program". i will get the login prompt, but after typing valid
creds nothing happens anymore. nothing in the squid logs. tried with some debug
prints in the wrapper, it seems like the wrapper is not able to go to next line
of the <> operator after it got the first line (the valid creds). but why does
it work when run from the shell? any ideas?
tia sebastian
--
sebastian pein
netzwerkmanagement
infinity networks gmbh
web: www.infinity-networks.de
fon: +49-6104-68363-0
fax: +49-6104-68363-199
mob: +49-163-68363-01
