После обновления Squid version 2.5.STABLE9 до Squid version 2.6.STABLE5
перестал отрабатывать redirector который позволял пользователю с уч. записью гость
посещать сайты только из списка, что то вроде
#!/usr/bin/perl
$0 = 'redirector' ;
$| = 1 ;                                                                        
@list1    = qw (
#good domain list
ya.ru
rambler.ru
bash.org.ru
) ;
@list2   = qw (
);
@ll1     = qw (
#limit list 1
guest
);
while (<>) {
$llp1 = "0";$listp1 = "0";
($url, $who, $ident, $method) = /^(\S+) (\S+) (\S+) (\S+)$/ ;
if (grep $ident =~ m%$_%, @ll1) {$llp1 = "1";}
if (grep $url =~ m%$_%, @list1) {$listp1 = "1";}
if (grep $url =~ m%$_%, @list2) {$listp1 = "2";}
$url = "http://192.168.1.1/1x1.gif";
if (($llp1 eq "1")and($listp1 eq "1")) {$url = ""}
if ($llp1 eq "0") {$url = "";}
if ($listp1 eq "2") {$url = "http://adm"}
print "$url $who $ident $method\n" ;
}
И если есть возможность описать более гибкий вариант гостевой записи =)

• Squid и redirector проблемы посли апдейта,amadyarov, 15:40 , 13-Дек-07

>[оверквотинг удален]
>if (grep $ident =~ m%$_%, @ll1) {$llp1 = "1";}
>if (grep $url =~ m%$_%, @list1) {$listp1 = "1";}
>if (grep $url =~ m%$_%, @list2) {$listp1 = "2";}
>$url = "http://192.168.1.1/1x1.gif";
>if (($llp1 eq "1")and($listp1 eq "1")) {$url = ""}
>if ($llp1 eq "0") {$url = "";}
>if ($listp1 eq "2") {$url = "http://adm"}
>print "$url $who $ident $method\n" ;
>}
>И если есть возможность описать более гибкий вариант гостевой записи =)