já q isso já foi feito, não gostariam de fazer um modulo p/ external acl já não?! já que é praticamente a mesma coisa...<br><br><div class="gmail_quote">2008/6/5 Lucas Mateus <<a href="mailto:lucasmateus.oliveira@gmail.com">lucasmateus.oliveira@gmail.com</a>>:<br>
<blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">Para trabalhar o programa no Squid basta editar o arquivo squid.conf da seguinte forma<br><br>
<br>auth_param basic program /path/do/meu/script.pl<br>auth_param basic children 5 <b>## numero de processos</b><br>auth_param basic realm Squid proxy-caching web server <b> ## Realm (String que parecera na caixa de autenticação)</b><br>
auth_param basic credentialsttl 2 hours <b> ## Time to Life</b><br>auth_param basic casesensitive off <b>## Sensitive On/Off</b><br><br>acl password proxy_auth REQUIRED<br>http_access allow password<br><br><br><div class="gmail_quote">
<div class="Ih2E3d">
2008/6/5 Gabriel Vieira <<a href="mailto:gabriel.vieira@gmail.com" target="_blank">gabriel.vieira@gmail.com</a>>:<br></div><blockquote class="gmail_quote" style="border-left: 1px solid rgb(204, 204, 204); margin: 0pt 0pt 0pt 0.8ex; padding-left: 1ex;">
Pronto. Contém tudo que precisa.<div><div></div><div class="Wj3C7c"><br>
<br>
2008/6/5 Mike Tesliuk <<a href="mailto:mike@braslink.com" target="_blank">mike@braslink.com</a>>:<br>
<div><div></div><div>> aqui tem um caso semelhante<br>
><br>
> <a href="http://fedora.co.in/content/writing-custom-basic-authentication-plugin-squid-python" target="_blank">http://fedora.co.in/content/writing-custom-basic-authentication-plugin-squid-python</a><br>
><br>
><br>
> ----------------------------------<br>
> Mike Tesliuk<br>
> Administrador de Sistemas<br>
> Braslink Networks<br>
> Phone: +55 11 2104 0005<br>
> Fax: +55 11 3544 4401<br>
><br>
><br>
> Luis Motta Campos wrote:<br>
>> Luis Motta Campos wrote:<br>
>>> A implementação mais nova é assim:<br>
>>><br>
>>> #!/usr/bin/perl<br>
>>> use strict;<br>
>>> use warnings;<br>
>>> use IO::Handle;<br>
>>><br>
>>> STDOUT->autoflush(1);<br>
>>> STDERR->autoflush(1);<br>
>>><br>
>>> # implement your password validation here<br>
>>> sub is_valid;<br>
>>><br>
>>> while (<>) {<br>
>>> my ( $user, $password ) = m{^(\S+)(?:\s+(.+))?$};<br>
>>> print is_valid( $user, $password ) ? qq{OK\n} : qq{ERR\n};<br>
>>> }<br>
>>> __END__<br>
>><br>
>> Agora que estamos todos de acordo, alguém pode por favor me apontar para<br>
>> a documentação sobre como colocar isso no Squid, para que eu possa<br>
>> transformar isso num módulo útil e colocar no CPAN?<br>
>><br>
>> Putamplexos!<br>
> _______________________________________________<br>
> SaoPaulo-pm mailing list<br>
> <a href="mailto:SaoPaulo-pm@pm.org" target="_blank">SaoPaulo-pm@pm.org</a><br>
> <a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a><br>
><br>
<br>
<br>
<br>
</div></div>--<br>
<font color="#888888">Gabriel Vieira<br>
</font><div><div></div><div>_______________________________________________<br>
SaoPaulo-pm mailing list<br>
<a href="mailto:SaoPaulo-pm@pm.org" target="_blank">SaoPaulo-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a><br>
</div></div></div></div></blockquote></div><br>
<br>_______________________________________________<br>
SaoPaulo-pm mailing list<br>
<a href="mailto:SaoPaulo-pm@pm.org">SaoPaulo-pm@pm.org</a><br>
<a href="http://mail.pm.org/mailman/listinfo/saopaulo-pm" target="_blank">http://mail.pm.org/mailman/listinfo/saopaulo-pm</a><br></blockquote></div><br><br clear="all"><br>-- <br>Just another Perl Hacker,<br>Fernando (SmokeMachine)<br>
<a href="http://perl-e.org">http://perl-e.org</a>