SquirrelMail

Fixed in SVN (stable=12423 and trunk=12424)

This bug has been resolved.

Please pull the latest version from the appropriate development
tree CVS to fix your bug.

Thank you for your help in resolving this issue.

Anonymous test is in different subroutine

From line 1438 ($Id: conf.pl 12346)
----
# Check none by trying to relay to junk@microsoft.com
$host = $smtpServerAddress . ':' . $smtpPort;
my $sock = IO::Socket::INET->new($host);
print "Testing none:\t\t$WHT";
if (!defined($sock)) {
print " ERROR TESTING\n";
close $sock;
} else {
print $sock "HELO $domain\r\n";
----

In 1.5.1, the server's greeting is indeed read :

-----------8<------------- [ config.pl ]----
my $sock=IO::Socket::INET->new($host);
if (!defined($sock)) {
# Connect failed
return undef;
}
my $discard = <$sock>; # Server greeting/banner - who cares..
--------------8<----------------8<---------

Are you sure the problem exists in the 1.5.2 branch ?

> I'm not sure how to fix the sync issue however. Not in perl anyway.

Read server's greeting before you issue HELO command. Code samples are
already there several lines below. Code reads other SMTP responses, but
does not read the first one.

RFC821 4.3. Sequencing of commands and replies
---
One important reply is the connection greeting. Normally, a
receiver will send a 220 "Service ready" reply when the connection
is completed. The sender should wait for this greeting message
before sending any commands.
---

You're right, the behaviour is somewhat illogical.
A possible fix would be to check for success instead of failure, because
of the wide range of possible failure codes (imagine 404 for a temporarly
unsupported mechanism).

-----------8<------------- [ config.pl ]----
# So at this point, we have a response, and it is (hopefully) valid.
if ($service eq 'SMTP') {
if (!($response =~ /^334/)) {
# Not supported
print $sock $logout;
close $sock;
return 'NO';
}
} elsif ($service eq 'IMAP') {
-------------8<----------------8<---------

I'm not sure how to fix the sync issue however. Not in perl anyway.

qmail-smtp replies with '502 unimplemented (#5.5.1)'

exim replies with '503 AUTH command used when not advertised'

postfix replies with '503 5.5.1 Error: authentication not enabled'

postfix and exim terminate conf.pl on 'none' authentication test. 554
SMTP synchronization error on HELO command. test is too fast and executes
helo command without reading response from smtp server.