ftpserver.pl: Added support for POP3 RSET command (5840c918) · Commits · CYBER - Cyber Security / TS 103 523 MSP / TLMSP / TLMSP curl

tests/ftpserver.pl

+20 −0

Original line number	Diff line number	Diff line
		@@ -563,6 +563,7 @@ sub protocolsetup {
		'NOOP' => \&NOOP_pop3,
		'QUIT' => \&QUIT_pop3,
		'RETR' => \&RETR_pop3,
		'RSET' => \&RSET_pop3,
		'STAT' => \&STAT_pop3,
		'TOP' => \&TOP_pop3,
		'UIDL' => \&UIDL_pop3,
		@@ -1456,6 +1457,25 @@ sub TOP_pop3 {
		return 0;
		}

		sub RSET_pop3 {
		my ($args) = @_;

		if ($args) {
		sendcontrol "-ERR Protocol error\r\n";
		}
		else {
		if (@deleted) {
		logmsg "resetting @deleted message(s)\n";

		@deleted = ();
		}

		sendcontrol "+OK\r\n";
		}

		return 0;
		}

		sub QUIT_pop3 {
		if(@deleted) {
		logmsg "deleting @deleted message(s)\n";