Hanno Hecker escribió:
It should be called (lib/Qpsmtpd/SMTP.pm):
sub getline {
my ($self, $timeout) = @_;
alarm $timeout;
my $line = <STDIN>; # default implementation
alarm 0;
Didn't catch that one... didn't grep the lib files for alarm (didn't
think they would be there because of possible incompatibilities with
different server types :) Naive me.
:S ¿Is there any other way to send yourself ALRMs?
kill "ALRM", $$;
:-)
jejeje. There's always more than one way to do it.
No, see getline() above. The timeout is started when attempting to read
one line. Once the line is there, it's switched off.
Hmm, what happens if <STDIN> just returns ""? ... should we
return undef if $line eq "";
in getline()?
[...]
Why false out what the client says?
I also saw that in SMTP.pm there are two commented out lines referring
to ALRMs... so it looks like the session timeout was a working feature
at some point...
IIRC not a "session timeout", but a "read one line timout"...
Thanks for the pointers.
Jose Luis Martinez
CAPSiDE
[EMAIL PROTECTED]
