# This file is part of Mailfromd testsuite. -*- Autotest -*-
# Copyright (C) 2007-2020 Sergey Poznyakoff
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 3, or (at your option)
# any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program.  If not, see <http://www.gnu.org/licenses/>.

# Check whether RSET properly clears all global variables, except
# those marked as `precious'.

AT_SETUP([rset])
AT_KEYWORDS([rset])

AT_WITH_MAILFROMD_OPTIONS([--stderr --gacopyz-log=err],[
AT_MTA_TEST_FILTER_SCRIPT([
string currcpts
precious string allrcpts

prog envrcpt
do
  set currcpts "%currcpts $1"
  set allrcpts "%allrcpts $1"
  echo "rcpt_count=%rcpt_count"
  echo "currcpts=%currcpts"
  echo "allrcpts=%allrcpts"
done
],
[\E250
HELO localhost
\E250
MAIL FROM:<>
\E250
RCPT TO:<a>
\E250
RCPT TO:<b>
\E250
RCPT TO:<c>
\E250
RSET
\E250
HELO localhost
\E250
MAIL FROM:<>
\E250
RCPT TO:<d>
\E250
RCPT TO:<e>
\E250
RCPT TO:<f>
\E250
],
[0],
[],
[rcpt_count=1
currcpts= <a>
allrcpts= <a>
rcpt_count=2
currcpts= <a> <b>
allrcpts= <a> <b>
rcpt_count=3
currcpts= <a> <b> <c>
allrcpts= <a> <b> <c>
rcpt_count=1
currcpts= <d>
allrcpts= <a> <b> <c> <d>
rcpt_count=2
currcpts= <d> <e>
allrcpts= <a> <b> <c> <d> <e>
rcpt_count=3
currcpts= <d> <e> <f>
allrcpts= <a> <b> <c> <d> <e> <f>
])
])

AT_CLEANUP