Не получается пользователю получить доступ: где то что-то не срабатывает.Очень хотелось хранить пароли в базе Sqlite, база была создана.
squid.conf настроен - процессы вроде на каждое соединение стабильно работают, но вот постоянно идет запрос логина и пароля.
Итак, squid.conf:
auth_param basic program /usr/local/squid/libexec/squid_sqlite_auth
auth_param basic children 120
acl list_users proxy_auth REQUIRED
http_access allow list_users
Перловый скрипт squid_sqlite_auth:
#!/usr/bin/perl
use strict;
use DBI;
use DBD::SQLite;
$|=1;
my $dbh = DBI->connect("dbi:SQLite:dbname=/usr/local/squid/libexec/fw6.db");
while (<>) {
chop;
my ($user, $password) = split;
my $status = "ERR";
my $sth = $dbh->prepare("SELECT count(*) FROM fw6_user_list WHERE fw6_user_login='$user' AND fw6_user_passwd='$password' AND fw6_user_lock='NO';");
$sth->execute();
my $result = $sth->fetchrow();
$sth->finish();
if ($result==1) {
$status="OK";
}
else {
$status="ERR";
}
print $status."\n";
}
Причем, если в ручную запускать этот скрипт, то все нормально отрабатывает - на ввод логина и пароля честно отвечает либо "OK" либо "ERR".
Думал с правами доступа к файлу базы проблемы - ну всем разрешил ее читать. Может конечно и на выполнение нужно разрешить - не знаю.
Подскажите - что ещё можно попробовать чтобы разрешить ситуацию?