cola o teu progrma de redirecionamento aqui
e tambem dah um ls -la
dentro da pasta que contem o WINUP e o WINUP2
depois entra em WINUP E WINUP2 e cola aqui um ls -la de ambos
Versão Imprimível
segue o solicitado hehehe:
ls -la WINUPCódigo :
$|=1; while (<>) { open $fh, ">>/tmp/debug_url_redirect.log"; @X = split; $url = $X[0]; $metodo = $X[3]; print $fh "entrada: $url\n"; #ORKUT if ($url =~ /^http:\/\/img[2-9]\.orkut\.com.*/) { $url =~ s/img[0-9]/img1/; print $fh "saida: $url\n"; print "$url\n"; } #AVIRA if ($url =~ /^http:\/\/dl[1-9]\.avgate\.net.*/) { $url =~ s/dl[0-9]/dl7/; print $fh "saida: $url\n"; print "$url\n"; } #AVAST if ($url =~ /^http:\/\/download[0-9]{3}.avast.com/) { $url =~ s/download[0-9]{3}/download626/; print $fh "saida: $url\n"; print "$url\n"; } #AVG if ($url =~ /^http:\/\/akamai.avg.com/) { $url =~ s/akamai/downloadfree/; print $fh "saida: $url\n"; print "$url\n"; } if ($url =~ /^http:\/\/update.avg.com/) { $url =~ s/update/guru/; print $fh "saida: $url\n"; print "$url\n"; } if ($url =~ /^http:\/\/download.windowsupdate.com/) { @achar = split(/\//, $url); $arquivoachar = $achar[$#achar]; $resultado = `/bin/ls /var/www/html/WINUP`; @array = split(/\n/, $resultado); $flag = 0; for $i (0 .. $#array){ if($array[$i] eq "$arquivoachar") { $flag = 1; $id=`/usr/bin/id`; print $fh "Windows Update Redirecionado de $url Para [URL]http://189.23.53.194/WINUP/$arquivoachar[/URL] user $id\n"; $url = "[URL]http://189.23.53.194/WINUP/$arquivoachar[/URL]"; print $fh "saida: $url\n"; print "[URL]http://189.23.53.194/WINUP/$arquivoachar\n[/URL]"; } $i++; } if($flag == 0 ) { exec("cd /var/www/htdocs/WINUP && umask 022 && /usr/bin/wget $url && /bin/chmod +r /var/www/htdocs/WINUP/.$arquivochar"); print $fh "saida: arquivoachar $arquivoachar $url\n"; print "$url\n"; } } if ($url =~ /^http:\/\/au.download.windowsupdate.com/) { @achar = split(/\//, $url); $arquivoachar = $achar[$#achar]; $resultado = `/bin/ls /var/www/html/WINUP2`; @array = split(/\n/, $resultado); $flag = 0; for $i (0 .. $#array){ if($array[$i] eq "$arquivoachar") { $flag = 1; $id=`/usr/bin/id`; print $fh "AU Windows Update Redirecionado de $url Para [URL]http://189.23.53.194/WINUP2/$arquivoachar[/URL] user $id\n"; $url = "[URL]http://189.23.53.194/WINUP2/$arquivoachar[/URL]"; print $fh "saida: $url\n"; print "[URL]http://189.23.53.194/WINUP2/$arquivoachar\n[/URL]"; } $i++; } if($flag == 0 ) { exec("cd /var/www/htdocs/WINUP2 && umask 022 && /usr/bin/wget $url && /bin/chmod +r /var/www/htdocs/WINUP2/.$arquivochar"); print $fh "AU saida: arquivoachar $arquivoachar $url\n"; print "$url\n"; } } else { print $fh "nao redirecionado\n"; print "\n"; } close $fh;
[code]
segue o solicitado hehehe:
ls -la WINUPCódigo :
$|=1; while (<>) { open $fh, ">>/tmp/debug_url_redirect.log"; @X = split; $url = $X[0]; $metodo = $X[3]; print $fh "entrada: $url\n"; #ORKUT if ($url =~ /^http:\/\/img[2-9]\.orkut\.com.*/) { $url =~ s/img[0-9]/img1/; print $fh "saida: $url\n"; print "$url\n"; } #AVIRA if ($url =~ /^http:\/\/dl[1-9]\.avgate\.net.*/) { $url =~ s/dl[0-9]/dl7/; print $fh "saida: $url\n"; print "$url\n"; } #AVAST if ($url =~ /^http:\/\/download[0-9]{3}.avast.com/) { $url =~ s/download[0-9]{3}/download626/; print $fh "saida: $url\n"; print "$url\n"; } #AVG if ($url =~ /^http:\/\/akamai.avg.com/) { $url =~ s/akamai/downloadfree/; print $fh "saida: $url\n"; print "$url\n"; } if ($url =~ /^http:\/\/update.avg.com/) { $url =~ s/update/guru/; print $fh "saida: $url\n"; print "$url\n"; } if ($url =~ /^http:\/\/download.windowsupdate.com/) { @achar = split(/\//, $url); $arquivoachar = $achar[$#achar]; $resultado = `/bin/ls /var/www/html/WINUP`; @array = split(/\n/, $resultado); $flag = 0; for $i (0 .. $#array){ if($array[$i] eq "$arquivoachar") { $flag = 1; $id=`/usr/bin/id`; print $fh "Windows Update Redirecionado de $url Para [URL]http://189.23.53.194/WINUP/$arquivoachar[/URL] user $id\n"; $url = "[URL]http://189.23.53.194/WINUP/$arquivoachar[/URL]"; print $fh "saida: $url\n"; print "[URL]http://189.23.53.194/WINUP/$arquivoachar\n[/URL]"; } $i++; } if($flag == 0 ) { exec("cd /var/www/htdocs/WINUP && umask 022 && /usr/bin/wget $url && /bin/chmod +r /var/www/htdocs/WINUP/.$arquivochar"); print $fh "saida: arquivoachar $arquivoachar $url\n"; print "$url\n"; } } if ($url =~ /^http:\/\/au.download.windowsupdate.com/) { @achar = split(/\//, $url); $arquivoachar = $achar[$#achar]; $resultado = `/bin/ls /var/www/html/WINUP2`; @array = split(/\n/, $resultado); $flag = 0; for $i (0 .. $#array){ if($array[$i] eq "$arquivoachar") { $flag = 1; $id=`/usr/bin/id`; print $fh "AU Windows Update Redirecionado de $url Para [URL]http://189.23.53.194/WINUP2/$arquivoachar[/URL] user $id\n"; $url = "[URL]http://189.23.53.194/WINUP2/$arquivoachar[/URL]"; print $fh "saida: $url\n"; print "[URL]http://189.23.53.194/WINUP2/$arquivoachar\n[/URL]"; } $i++; } if($flag == 0 ) { exec("cd /var/www/htdocs/WINUP2 && umask 022 && /usr/bin/wget $url && /bin/chmod +r /var/www/htdocs/WINUP2/.$arquivochar"); print $fh "AU saida: arquivoachar $arquivoachar $url\n"; print "$url\n"; } } else { print $fh "nao redirecionado\n"; print "\n"; } close $fh;
Código :
root@servidor:/etc/squid# ls -ls /var/www/htdocs/WINUP total 8 4 -rwxr-xr-x 1 squid squid 1 2008-08-05 08:06 file* 4 -rwxr-xr-x 1 squid squid 1 2008-08-05 08:06 file2* root@servidor:/etc/squid#
ls -la WINUP2
Código :
root@servidor:/etc/squid# ls -ls /var/www/htdocs/WINUP2 total 8 4 -rwxr-xr-x 1 squid squid 1 2008-08-05 08:06 file* 4 -rwxr-xr-x 1 squid squid 1 2008-08-05 08:06 file2*
Você pode mostrar aqui seus parametros do squid?
corrigido, porem o erro continua