Re: [apache-talk] X-Forwarded-For

[Eugene Grosbein <eugen@xxxxxxxxxxxxxxxxxxx>]

Ilya Obshadko wrote:
> 
> Hello Eugene,
> 
> четверг, 21 сентября 2000 г., you wrote:
> 
> EG> package Apache::ProxyAddr;
> EG> use Apache::Constants qw(:common);
> EG> sub handler {
> EG>   my $r = shift ;
> EG>   if ($r -> header_in('X-Forwarded-For') =~ /([^,\s]+)$/)    {
> EG>     $r -> connection -> remote_ip($1);
> EG>   }
> EG>   return OK;
> EG> }
> EG> 1;
> 
> EG> А по сути, решение корректное? Мне статический контент отдавать надо,
> EG> защищенный через allow/deny или еще как.
> 
> Вполне. Если у тебя эта байда ставится в PostReadRequest Phase, весь
> access check и прочая муть происходит уже _после_ выставления
> корректного IP в request object. А вообще если у тебя mod_perl не
> используется активно, проще апач похакать IMHO ;)

mod_perl у меня используется активно, так что прикручу сейчас 
дополнительный параметр - список хостов, которым можно доверять
насчет X-Forwarded-For, и выпущу модуль, устанавливаемый как обычно:

perl Makefile.PL
make
make test
make install

Eugene
=============================================================================
=               Apache-Talk@xxxxxxxxxxxxx mailing list                      =
Mail "unsubscribe apache-talk" to majordomo@xxxxxxxxxxxxx if you want to quit.
=       Archive avaliable at http://www.lexa.ru/apache-talk                 =