Página 3 de 13 PrimeiroPrimeiro 12345678 ... ÚltimoÚltimo
+ Responder ao Tópico



  1. #41

    Padrão

    Hmmmm... foi mal, papei mosca!

    no perl não tem elseif, é só if.

  2. #42

    Padrão

    mais ae o else nao vai fica funcionando apenas com o dominio do avast?

  3. #43

    Padrão

    jah vi que nao! tah funcionando! heheh

  4. #44

  5. #45

    Padrão

    seria massa pra sites como Globo, youtube (apesar que é dificil mais mais de uma pessoa assistir o mesmo vídeo), rapidshare

  6. #46

    Padrão

    *orkut ok
    *Avast ok
    *AVG Testando mais á principio Ok (esse é facil é 2 dominios hehe)

    Next:
    Avira
    Kaspersky

    depois caio pros sites mais difíceis!

  7. #47

    Padrão

    estou trocando meu servidor e nem dá pra eu testar agora, depois que o outro estiver rodando ok vou colocar pra rodar e ver como ficará..

    vou mudar do squid 2.6 pro 2.7, parece que tem muitas melhorias.

  8. #48

    Padrão

    acho que o principal mesmo seria das atualizações do windows, puta merda, se conseguir fazer com que as atualizações sejam baixadas apenas uma vez e depois seja enviado do cache seria uma mão na roda, tanto em ganho de velocidade quanto em economia de link.

    já até pensei em usar o windows update service service, mas pra isso teria que ter uma maquina rodando 2003, e to correndo disso.. eheheh

  9. #49

    Padrão

    Eu estou usando o squid 3 já há algum tempo e muito satisfeito com ele.

    E realmente, se conseguir fazer cache dos updates da MS seria muito bom!

  10. #50

    Padrão

    pelo que pesquisei na net tem um utilitário que roda junto com o samba, ele faz como se fosse um cache dos pacotes de atualizações, mas é necessário instalar um programa no micro cliente, aí fica complicado, o negócio tem que ser transparente ao cliente.

  11. #51

    Padrão

    vamos ver oq conseguimos

  12. #52

    Padrão

    fudido o windows update meu deus parece que ele faz por streaming!


    achei isso na net!

    se desse para imendar no nosso!
    pelo que deu pra entender usa uma pasta no apache faz download pra lá de tudo
    depois por dns ele vai redirecionando pra pasta interna

    como um SUB-cache!

    # byron jones
    # public domain

    # fixed bug .. now prints blank line if there's no change
    # fixed bug .. removed psf from extension list
    # fixed weirdness .. "next" on some flavours of perl wasn't "next"ing
    # fixed v5 issue by not caching iuident.cab (thanks marvi benedet)

    $| = 1;

    my $cache_path = '/usr/local/apache/htdocs/cache/store';
    my $cache_url = 'http://10.0.0.254:8000/cache/store';
    my $downloader = '/usr/local/apache/htdocs/cache/download';

    URL: while(<>) {

    # grab url (first word)
    ($url) = /^(\S+)/;
    $orig_req = $_;
    $orig_url = $url;

    # decode
    $url =~ tr|+| |;
    $url =~ s|%([a-fA-F0-9][a-fA-F0-9])|pack("C", hex($1))|ge;
    $url =~ s/\000+$//; # trailing nulls

    # check cache store

    {
    my $url = $orig_url;
    $url =~ s#^http://##i;
    $url =~ s/^www\.//i;
    if($url !~ /iuident\.cab/ && -e "$cache_path/$url" && !-d "$cache_path/$url" && !-e "$cache_path/$url.downloading") {
    open(FH, ">>$cache_path/../log");
    print FH '[', scalar localtime, '] ';
    print FH "cachehit ", -s "$cache_path/$url", " $url\n";
    close FH;
    # s|^\S+|$cache_url/$url|;
    print "$cache_url/$url\n";
    next URL;
    }
    }

    # cache windows update and other bits

    if(!/^\Q$cache_url/i) {
    if(
    (
    # any microsoft cab (windowsupdate, officeupdate, msdn, etc)
    m#^http://(.*?\.microsoft\.com\S+\.(cab|exe))\b#i
    || m#^http://(.*?\.windowsupdate\.com\S+\.(cab|exe))\b#i
    || m#^http://(.*?mssjus\.www\.conxion\.com\S+\.(cab|exe))\b#i
    # quicktime
    || m#^http://(.*?qtinstall\.apple\.com\S+\...|idx|dat))\b#i
    # java
    || m#^http://(.*?java\.sun\.com\S+\.(cab|exe))\b#i
    # adobe acrobat
    || m#^http://(.*?ardownload\.adobe\.com\S+...x|gz|exe))\b#i
    )
    && !(m#iuident\.cab\b#i)
    ) {
    my $url = $1;
    $url =~ s/^www\.//i;
    if(-e "$cache_path/$url" && !-e "$cache_path/$url.downloading") {
    open(FH, ">>$cache_path/../log");
    print FH '[', scalar localtime, '] ';
    print FH "cachehit ", -s "$cache_path/$url", " $url\n";
    close FH;
    # s|^\S+|$cache_url/$url|;
    print "$cache_url/$url\n";
    next URL;
    } else {
    system("$downloader $url 2>&1 >/dev/null &");
    }
    }
    }

    # no change
    print "\n";

    }

    __END__
    1000355322.691 106912 JIMMY.internal TCP_MISS/200 14884044 GET http://www.download.windowsupdate.co...D5BF46A97.exe? - DIRECT/203.102.129.100 application/octet-stream

  13. #53

    Padrão

    quanto ao AVG vo precisar de mais uma ajudinha!!!!

    saca soh

    o avg tem esses hosts aki:
    guru.avg.com
    downloadfree.avg.com
    akamai.avg.com

    e esse aqui que cria uma subpasta que eh o
    update.avg.com



    fiz isso aki e ambos funcionam:
    if ($url =~ /^http:\/\/guru.avg.com/) {
    $url =~ s/guru/downloadfree/;
    print $fh "saida: $url\n";
    print "$url\n";
    }
    if ($url =~ /^http:\/\/akamai.avg.com/) {
    $url =~ s/akamai/downloadfree/;
    print $fh "saida: $url\n";
    print "$url\n";
    }



    só que olha soh a diferença dos 3 hosts guru , akamai e download free pro update....



    http://akamai.avg.com/update/u7avi1337u13277l.bin
    http://guru.avg.com/update/u7avi1337u13277l.bin
    http://downloadfree.avg.com/update/u7avi1337u13277l.bin
    http://update.avg.com/softw/80/update/u7avi1337u13277l.bin


    tem como dar uma mão ae pra optimizar esse lance? abração!

  14. #54

    Padrão

    os do update são sempre softw/80?

    se for é só fazer:

    Código :
    if ($url =~ /^http:\/\/update.avg.com/) {
                    $url =~ s/update/downloadfree/;
    $url =~ s/softw\/80\///;
                    print $fh "saida: $url\n";
                    print "$url\n";
            }

    Se não for, aí tem que ver o padrão pra ver qual vai ser a melhor forma de resolver isso.

  15. #55

    Padrão

    to tendo alguns entrevês com o AVG, pois ele tem algumas outras particularidades... quando eu aciono todos os redirecionamentos ele não updateia... estou verificando aqui assim que acabar posto


    pode explicar a lógica da linha?

    $url =~ s/softw\/80\///; abraços! quero dizer como ele sabe que tem que cortar na parte X até Y
    Última edição por arium; 14-07-2008 às 08:38.

  16. #56

    Padrão

    posta aqui essas particularidades, que aí fica mais fácil de tentar achar uma forma de resolver.

    Quanto a linha que você pediu pra explicar, eu mandei ele trocar softw/80/ por nada. Pra ficar mais fácil de visualizar, a linha pode ser escrita assim: $urs =~ s@softw/80/@@; usando os @ como delimitadores.

  17. #57

    Padrão

    Pessoal, os assuntos discutidos já não são mais referentes ao título do tópico.

    Vamos abrir um tópico referente a url_rewrite do squid e discutir esse assunto.

  18. #58

    Padrão

    muda o nome deste topico mesmo amigão.. para não dissipar as infos.
    eu tentei mais nao libera a modificação do titulo

  19. #59

    Padrão

    Citação Postado originalmente por galahad Ver Post
    posta aqui essas particularidades, que aí fica mais fácil de tentar achar uma forma de resolver.
    hj de noite eu posto pq hj de tarde nao vou ter como mexer nele tenho varios clientes para visitar!

  20. #60