[Comm] SQUID

[Comm] SQUID

[Oleg]

Hello community,

  Можно ли заставить squid
  не просто вырезать баннеры,
  а подставлять на их место какую-нибудь свою картинку?

-- 
Best regards,
 Oleg                          mailto:wacom@narod.ru

Re: [Comm] SQUID

[Maxim Tyurin]

On Fri, Mar 14, 2003 at 01:46:24PM +0300, Oleg wrote:
> Hello community,
> 
>   Можно ли заставить squid
>   не просто вырезать баннеры,
>   а подставлять на их место какую-нибудь свою картинку?
Использовать перенаправление. 
Готовый -  sleezeball
-- 

With Best Regards, Maxim Tyurin
mailto: MrKooll@mail.ru
JID:	MrKooll@jabber.pibhe.com
			

Re: [Comm] SQUID

[Maxim.Savrilov]

On Fri, 14 Mar 2003 13:46:24 +0300
Oleg <wacom@narod.ru> wrote:

> Hello community,
> 
>   Можно ли заставить squid
>   не просто вырезать баннеры,
>   а подставлять на их место какую-нибудь свою картинку?
> 
./etc/squid/squid.conf
redirect_program /etc/squid/redirector


./etc/squid/redirector
#!/usr/bin/perl                                                                                   
                                                                                                  
$0 = 'redirector' ;                                                                               
                                                                                                  
$| = 1 ;                                                                                          
                                                                                                  
$SITE = 'http://localhost/banners' ;                                                  

@b    = qw (                                                                                
                 reklama\.ru/cgi\-bin/banner/
...
 ) ;

$b_     = "$SITE/468x60.gif" ;
while (<>) {                                                                                      
  ($url, $who, $ident, $method) = /^(\S+) (\S+) (\S+) (\S+)$/ ;                                   

   $url = $b_ if grep $url =~ m%$_%, @b ;                                                                                            
  print "$url $who $ident $method\n" ;                                                            
}                                                                                                 


Вот типа если совсем просто
Лучше, конечно на С
но принцип понятен