Update of /cvsroot/popfile/engine/Proxy
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv27948/Proxy
Modified Files:
POP3.pm
Log Message:
Change Log
1. POP3 proxy no longer returns both '+OK' and '-ERR' when bad account
is passed
Proxy/POP3.pm
2. POP3S proxy and POP3 proxy share the POP3 accounts
Classifier/Bayes.pm
3. Account table is used in the transparent proxy mode too
Classifier/Bayes.pm
In the transparent proxy mode, if the specified user is not found
then POPFile will use the accounts table.
4. Add 'timeout' status message on the Password page
5. Add status messages for changing between Multiuser and Single user
modes on the Administration page
UI/HTML.pm
languages/English.pm
languages/Nihongo.pm
6. Add multiuser mode tests
tests/TestPOP3.tst
7. Add some tests
tests/TestBayes.tst
tests for copying magnets and corpus
tests for get_magnet_header_and_value
8. Fix TestHTML to pass on MSWin32
tests/TestHTML.tst
tests/TestHTML.script
9. Remove an unwanted comment
UI/HTML.pm
Current state of the test suite:
TestBayesScript PASS
TestBayes PASS
TestConfiguration PASS
TestHistory PASS
TestHTML PASS *
TestHTTP PASS
TestIMAP PASS
TestInsertScript PASS *
TestLogger PASS
TestMailParse PASS
TestModule PASS
TestMQ PASS
TestMutex PASS
TestPipeScript PASS
TestPOP3 PASS
TestProxy PASS
TestWordMangle PASS
TestXMLRPC PASS
* : TODO : needs to add tests for multi user support
Index: POP3.pm
===================================================================
RCS file: /cvsroot/popfile/engine/Proxy/POP3.pm,v
retrieving revision 1.124
retrieving revision 1.125
diff -C2 -d -r1.124 -r1.125
*** POP3.pm 25 Apr 2008 23:21:47 -0000 1.124
--- POP3.pm 28 Apr 2008 11:17:43 -0000 1.125
***************
*** 351,355 ****
# return password ok
- $self->tee_( $client, "+OK password ok$eol" );
$session = $self->get_session_key_( $token );
if ( !defined( $session ) ) {
--- 351,354 ----
***************
*** 357,367 ****
last;
}
} else {
$self->tee_( $client, $response );
}
} else {
! my $ok = $self->echo_response_( $mail, $client, $command );
! last if ( $ok == 2 );
! if ( $ok == 0 ) {
$session = $self->get_session_key_( $token );
if ( !defined( $session ) ) {
--- 356,370 ----
last;
}
+ $self->tee_( $client, "+OK password ok$eol" );
} else {
$self->tee_( $client, $response );
}
} else {
! my ( $response, $ok ) = # PROFILE BLOCK START
! $self->get_response_($mail, $client,
! $command, 0, 1); # PROFILE BLOCK STOP
! if ( ( $ok == 1 ) &&
! ( $response =~ /$self->{good_response_}/ ) ) {
!
$session = $self->get_session_key_( $token );
if ( !defined( $session ) ) {
***************
*** 370,373 ****
--- 373,377 ----
}
}
+ $self->tee_( $client, $response );
}
next;
|