version 1.10, 2004/05/11 06:49:58
|
version 1.11, 2005/02/05 22:20:56
|
Line 36 use Apache::File();
|
Line 36 use Apache::File();
|
|
|
sub handler { |
sub handler { |
my $r = shift; |
my $r = shift; |
my $reqhost = $r->get_remote_host(REMOTE_DOUBLE_REV); |
my $reqhost = $r->get_remote_host(REMOTE_HOST); |
if (!$reqhost && $r->get_remote_host(REMOTE_NOLOOKUP) eq $r->get_server_name()) { |
|
$reqhost = $r->get_server_name(); |
|
} |
|
unless ($reqhost) { |
|
$r->log_reason("Spoof request from ". $reqhost); |
|
return FORBIDDEN; |
|
} |
|
if ($reqhost eq 'localhost.localdomain') { |
if ($reqhost eq 'localhost.localdomain') { |
return OK; |
return OK; |
} |
} |
Line 56 sub handler {
|
Line 49 sub handler {
|
return FORBIDDEN; |
return FORBIDDEN; |
} |
} |
while ($readline=<$fh>) { |
while ($readline=<$fh>) { |
my ($id,$domain,$role,$name,$ip)=split(/:/,$readline); |
$readline=~s/\s*$//; |
if ($name =~ /$reqhost/i) { |
my ($id,$domain,$role,$name)=split(/:/,$readline); |
return OK; |
if ($name =~ /\Q$reqhost\E/i) { |
} |
return OK; |
|
} |
} |
} |
|
|
} |
} |