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 ;)
Best regards,
Ilya mailto:ilya@xxxxxxxxxx
=============================================================================
= 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 =
"Russian Apache" includes software developed
by the Apache Group for use in the Apache HTTP server project
(http://www.apache.org/) See
Apache LICENSE.
Copyright (C) 1995-2001 The Apache Group. All rights reserved.
Copyright (C) 1996 Dm. Kryukov; Copyright (C)
1997-2009 Alex Tutubalin. Design (C) 1998 Max Smolev.