Re: [squid-users] redirecting squid

frevol nicolas wrote:

>hi,
>
>i am trying to use use squid with an external program.
>So i did:
>"redirect_program /home/mysession/rep/executable"
>
>In my Perl executable, i take the argv[0] value.
>
>But what kind ok value do i have to print out ?
>for example my perl script is :
>-------------------------
>#!/usr/bin/perl -w
>use strict;
>
>$|=1;
>while (<>) {
> my @X = split;
> my $url = $X[0];
> my $test = 0; #just a test value for later
> if ($url =~ /^http:\/\/internal\.foo\.com/) {
> $url =~ s/^http/https/;
> $url =~ s/internal/secure/;
> if($test==0){
> print "302:$url\n";
> }else{
> print "file:///home/template.html";
> }
> }else{
> if($test==0){
> print "http://fr.yahoo.com\n";
> }else {
> print "file:///template.html";
> }
> }
>}
>
>
It looks like you've already hit the FAQ...

>-------------------------
>the result is that i have the yahoo site on my screen
>without pictures.
>
>
Do you understand what this Perl script is doing? If the requested URL
matches http://internal.foo.com (with or without trailing characters),
it will be rewritten to "https://secure.foo.com". Otherwise, if the
variable "test" is set to zero (as it is) EVERY request will be
rewritten as "http://fr.yahoo.com", (even requests for images referenced
by that page).

>and if i replace
>print "http://fr.yahoo.com\n";
>by
>print "file:///template.html";
>
>it doesn't works
>
>
>
This is equivalent to setting the variable "test" to something other
than zero and will cause Squid to request file:///template.html. That
would be a pretty nasty security hole (letting someone access arbitrary
files on the proxy server itself).

>any ideas?
>
>
Find someone a bit more familiar with Perl, or get a good Perl book and
re-read the FAQ section on redirectors. :o)

Chris
Received on Thu Apr 27 2006 - 12:23:30 MDT