#!/bin/sh
# Testing the implementation of strfmon(3).
# Copyright (C) 1996-2016 Free Software Foundation, Inc.
# This file is part of the GNU C Library.
# Contributed by Jochen Hein <jochen.hein@delphi.central.de>, 1997.

# The GNU C Library is free software; you can redistribute it and/or
# modify it under the terms of the GNU Lesser General Public
# License as published by the Free Software Foundation; either
# version 2.1 of the License, or (at your option) any later version.

# The GNU C Library 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
# Lesser General Public License for more details.

# You should have received a copy of the GNU Lesser General Public
# License along with the GNU C Library; if not, see
# <http://www.gnu.org/licenses/>.

set -e

setglobal common_objpfx = $1
setglobal run_program_prefix_before_env = $2
setglobal run_program_env = $3
setglobal run_program_prefix_after_env = $4
setglobal test_program_prefix = $5
setglobal datafile = $6

setglobal here = $[pwd]

setglobal lang = $[sed -e '/^#/d' -e '/^$/d' -e '/^C	/d' -e '/^tstfmon/d' -e 's/^\([^	]*\).*/\1/' $datafile | sort | uniq]

# Generate data files.
for cns in [$[cd ./tst-fmon-locales && ls tstfmon_*]] {
    setglobal cn = "tst-fmon-locales/$cns"
    setglobal fn = 'charmaps/ISO-8859-1'
    $(run_program_prefix_before_env) \
    $(run_program_env) \
    I18NPATH=. \
    $(run_program_prefix_after_env) $(common_objpfx)locale/localedef \
    --quiet -i $cn -f $fn $(common_objpfx)localedata/$cns
}

# Run the tests.
setglobal errcode = '0'
# There's a TAB for IFS
while env IFS="	" read locale format value expect {
    match $locale { with '#'* continue  }
    if test -n $format {
	setglobal expect = $[echo $expect | sed 's/^\"\(.*\)\"$/\1/]
	$(test_program_prefix) $(common_objpfx)localedata/tst-fmon \
	$locale $format $value $expect < /dev/null ||
	setglobal errcode = $Status
    }
} < $datafile

exit $errcode
# Local Variables:
#  mode:shell-script
# End: