#!/bin/sh
#
# ProteanOS Development Kit
# tests/parse_control.sh
# parse_control() tests
#
# Copyright (C) 2014  Patrick "P. J." McDermott
#
# 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 of the License, 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/>.

. "${srcdir}/tests/common.sh"

use output
use control

load_locale

p=1
f=1

field()
{
	case ${p} in
		1)
			case ${f} in
				1)
					assert [ "x${1}" = 'xPackage' ]
					assert [ "x${2}" = 'xfoo' ]
					;;
				2)
					assert [ "x${1}" = 'xVersion' ]
					assert [ "x${2}" = 'x1.0' ]
					;;
				*) warn 'Too many fields'; tests_es=1;;
			esac
			;;
		2)
			case ${f} in
				1)
					assert [ "x${1}" = 'xPackage' ]
					assert [ "x${2}" = 'xbar' ]
					;;
				2)
					assert [ "x${1}" = 'xVersion' ]
					assert [ "x${2}" = 'x2.0' ]
					;;
				*) warn 'Too many fields'; tests_es=1;;
			esac
			;;
		*) warn 'Too many paragraphs'; tests_es=1;;
	esac
	f=$(($f + 1))
}
para()
{
	p=$(($p + 1))
	f=1
}

parse_control - field para 'Package Version' <<-EOF
	Package: foo
	Version: 1.0

	Package: bar
	Version: 2.0
	EOF