#! /bin/sh

# Test reading in NeXTstep/GNUstep .strings syntax.

tmpfiles=""
trap 'rm -fr $tmpfiles' 1 2 3 15

tmpfiles="$tmpfiles mcat-s-1.in"
cat <<\EOF > mcat-s-1.in
/* This is an example of a string table file. Everything inside a comment
is completely ignored, even if in "quotes", or \escape characters, etc.
*/

"title"	= "pattern II target 1";

/* This is an example of excape codes in the string table, codes */
/* that are not one of abfnrtv are stripped of the \ character */
"escapes"    = "This is a tab \t and a return \n or a \a but not a \p";
"escapes2"    = "Well how about a \0? Guess not.";

/* more parameters, white space between tokens is ignored */
"actualSize"	
	= 
		"0.000250 0.000250";

/* a key with no value assumes the value is the empty string */
"hoe322070.element";
EOF

tmpfiles="$tmpfiles mcat-s-1.out"
rm -f mcat-s-1.out
: ${MSGCAT=msgcat}
${MSGCAT} --stringtable-input mcat-s-1.in -o mcat-s-1.out
test $? = 0 || { rm -fr $tmpfiles; exit 1; }

tmpfiles="$tmpfiles mcat-s-1.ok"
cat << \EOF > mcat-s-1.ok
# This is an example of a string table file. Everything inside a comment
# is completely ignored, even if in "quotes", or \escape characters, etc.
#
msgid "title"
msgstr "pattern II target 1"

# This is an example of excape codes in the string table, codes
# that are not one of abfnrtv are stripped of the \ character
msgid "escapes"
msgstr ""
"This is a tab \t and a return \n"
" or a  but not a p"

msgid "escapes2"
msgstr "Well how about a "

# more parameters, white space between tokens is ignored
msgid "actualSize"
msgstr "0.000250 0.000250"

# a key with no value assumes the value is the empty string
msgid "hoe322070.element"
msgstr ""
EOF

: ${DIFF=diff}
${DIFF} mcat-s-1.ok mcat-s-1.out
result=$?

rm -fr $tmpfiles

exit $result
