diff options
Diffstat (limited to 'tests/hdr-itr.at')
| -rw-r--r-- | tests/hdr-itr.at | 44 |
1 files changed, 44 insertions, 0 deletions
diff --git a/tests/hdr-itr.at b/tests/hdr-itr.at new file mode 100644 index 00000000..51914c41 --- /dev/null +++ b/tests/hdr-itr.at @@ -0,0 +1,44 @@ +# This file is part of Mailfromd testsuite. -*- Autotest -*- +# Copyright (C) 2009 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/>. + +AT_SETUP(current_header(name,ind) - iteration) +AT_KEYWORDS([curhdr current_header_i]) + +AT_WITH_MAILFROMD_OPTIONS([--stderr --gacopyz-log=err],[ +AT_MTA_TEST_SCRIPT([ +prog eoh +do + number limit current_header_count("Received") + loop for number i 1, + while %i <= %limit, + set i %i + 1 + do + echo "Received(%i): " current_header("Received", %i) + done +done +], +[hdr.mts], +[0], +[], +[mailfromd: mailfromd (AT_PACKAGE_TARNAME AT_PACKAGE_VERSION) started +Received(1): foo +Received(2): bar +mailfromd: mailfromd terminating +]) +]) + +AT_CLEANUP + |