Fixed timeout bug when the client sent DATA and then stopped before
sending the next line. (Gergely Risko <risko@risko.hu>) git-svn-id: https://svn.perl.org/qpsmtpd/trunk@138 958fd67b-6ff1-0310-b445-bb7760255be9
This commit is contained in:
parent
3c80ae667f
commit
933d76ecf9
2
CREDITS
2
CREDITS
@ -24,5 +24,7 @@ Changes file.
|
|||||||
Kee Hinckley <nazgul@somewhere.com>: Sent me the correct strftime
|
Kee Hinckley <nazgul@somewhere.com>: Sent me the correct strftime
|
||||||
format for the dates in the "Received" headers.
|
format for the dates in the "Received" headers.
|
||||||
|
|
||||||
|
Gergely Risko <risko@risko.hu>: Fixed timeout bug when the client sent
|
||||||
|
DATA and then stopped before sending the next line.
|
||||||
|
|
||||||
... and many others per the Change file!
|
... and many others per the Change file!
|
||||||
|
3
Changes
3
Changes
@ -1,5 +1,8 @@
|
|||||||
0.26-dev
|
0.26-dev
|
||||||
|
|
||||||
|
Fixed timeout bug when the client sent DATA and then stopped before
|
||||||
|
sending the next line. (Gergely Risko <risko@risko.hu>)
|
||||||
|
|
||||||
unrecognized_command hook and a count_unrecognized_commands
|
unrecognized_command hook and a count_unrecognized_commands
|
||||||
plugin. (Rasjid Wilcox)
|
plugin. (Rasjid Wilcox)
|
||||||
|
|
||||||
|
@ -320,6 +320,8 @@ sub data {
|
|||||||
|
|
||||||
my $timeout = $self->config('timeout');
|
my $timeout = $self->config('timeout');
|
||||||
|
|
||||||
|
alarm $timeout;
|
||||||
|
|
||||||
while (<STDIN>) {
|
while (<STDIN>) {
|
||||||
$complete++, last if $_ eq ".\r\n";
|
$complete++, last if $_ eq ".\r\n";
|
||||||
$i++;
|
$i++;
|
||||||
|
Loading…
Reference in New Issue
Block a user