ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/Coro/myhttpd/err.pl
(Generate patch)

Comparing Coro/myhttpd/err.pl (file contents):
Revision 1.8 by root, Thu Oct 11 12:48:27 2007 UTC vs.
Revision 1.9 by root, Fri Oct 12 12:34:31 2007 UTC

113 $status = 401; 113 $status = 401;
114 $hdr->{Warning} = "Please do NOT retry, your IP has been blocked due to excessive hammering. Press Cancel instead."; 114 $hdr->{Warning} = "Please do NOT retry, your IP has been blocked due to excessive hammering. Press Cancel instead.";
115 $hdr->{"WWW-Authenticate"} = "Basic realm=\"Please do NOT retry, you IP has been blocked due to excessive hammering. Press Cancel instead.\""; 115 $hdr->{"WWW-Authenticate"} = "Basic realm=\"Please do NOT retry, you IP has been blocked due to excessive hammering. Press Cancel instead.\"";
116 116
117 if ($block->[2] > 40) { 117 if ($block->[2] > 40) {
118 system "/root/s/dynablock --add $self->{remote_ip} $::DYNABLOCK &"; 118 system "/root/s/dynablock --add $self->{remote_addr} $::DYNABLOCK &";
119 } 119 }
120 } 120 }
121 } 121 }
122 122
123 $self->err($status, $block->[1], $hdr, 123 $self->err($status, $block->[1], $hdr,

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines