head 1.1; branch 1.1.1; access; symbols netbsd-11-0-RC4:1.1.1.1 netbsd-11-0-RC3:1.1.1.1 netbsd-11-0-RC2:1.1.1.1 netbsd-11-0-RC1:1.1.1.1 perseant-exfatfs-base-20250801:1.1.1.1 netbsd-11:1.1.1.1.0.30 netbsd-11-base:1.1.1.1 netbsd-10-1-RELEASE:1.1.1.1 perseant-exfatfs-base-20240630:1.1.1.1 perseant-exfatfs:1.1.1.1.0.28 perseant-exfatfs-base:1.1.1.1 netbsd-8-3-RELEASE:1.1.1.1 netbsd-9-4-RELEASE:1.1.1.1 netbsd-10-0-RELEASE:1.1.1.1 netbsd-10-0-RC6:1.1.1.1 netbsd-10-0-RC5:1.1.1.1 netbsd-10-0-RC4:1.1.1.1 netbsd-10-0-RC3:1.1.1.1 netbsd-10-0-RC2:1.1.1.1 netbsd-10-0-RC1:1.1.1.1 netbsd-10:1.1.1.1.0.26 netbsd-10-base:1.1.1.1 netbsd-9-3-RELEASE:1.1.1.1 cjep_sun2x-base1:1.1.1.1 cjep_sun2x:1.1.1.1.0.24 cjep_sun2x-base:1.1.1.1 cjep_staticlib_x-base1:1.1.1.1 netbsd-9-2-RELEASE:1.1.1.1 cjep_staticlib_x:1.1.1.1.0.22 cjep_staticlib_x-base:1.1.1.1 netbsd-9-1-RELEASE:1.1.1.1 phil-wifi-20200421:1.1.1.1 phil-wifi-20200411:1.1.1.1 is-mlppp:1.1.1.1.0.20 is-mlppp-base:1.1.1.1 phil-wifi-20200406:1.1.1.1 netbsd-8-2-RELEASE:1.1.1.1 netbsd-9-0-RELEASE:1.1.1.1 netbsd-9-0-RC2:1.1.1.1 netbsd-9-0-RC1:1.1.1.1 phil-wifi-20191119:1.1.1.1 netbsd-9:1.1.1.1.0.18 netbsd-9-base:1.1.1.1 phil-wifi-20190609:1.1.1.1 netbsd-8-1-RELEASE:1.1.1.1 netbsd-8-1-RC1:1.1.1.1 pgoyette-compat-merge-20190127:1.1.1.1 pgoyette-compat-20190127:1.1.1.1 pgoyette-compat-20190118:1.1.1.1 pgoyette-compat-1226:1.1.1.1 pgoyette-compat-1126:1.1.1.1 pgoyette-compat-1020:1.1.1.1 pgoyette-compat-0930:1.1.1.1 pgoyette-compat-0906:1.1.1.1 pgoyette-compat-0728:1.1.1.1 netbsd-8-0-RELEASE:1.1.1.1 phil-wifi:1.1.1.1.0.16 phil-wifi-base:1.1.1.1 pgoyette-compat-0625:1.1.1.1 netbsd-8-0-RC2:1.1.1.1 pgoyette-compat-0521:1.1.1.1 pgoyette-compat-0502:1.1.1.1 pgoyette-compat-0422:1.1.1.1 netbsd-8-0-RC1:1.1.1.1 pgoyette-compat-0415:1.1.1.1 pgoyette-compat-0407:1.1.1.1 pgoyette-compat-0330:1.1.1.1 pgoyette-compat-0322:1.1.1.1 pgoyette-compat-0315:1.1.1.1 pgoyette-compat:1.1.1.1.0.14 pgoyette-compat-base:1.1.1.1 matt-nb8-mediatek:1.1.1.1.0.12 matt-nb8-mediatek-base:1.1.1.1 perseant-stdc-iso10646:1.1.1.1.0.10 perseant-stdc-iso10646-base:1.1.1.1 netbsd-8:1.1.1.1.0.8 netbsd-8-base:1.1.1.1 prg-localcount2-base3:1.1.1.1 prg-localcount2-base2:1.1.1.1 prg-localcount2-base1:1.1.1.1 prg-localcount2:1.1.1.1.0.6 prg-localcount2-base:1.1.1.1 pgoyette-localcount-20170426:1.1.1.1 bouyer-socketcan-base1:1.1.1.1 pgoyette-localcount-20170320:1.1.1.1 bouyer-socketcan:1.1.1.1.0.4 bouyer-socketcan-base:1.1.1.1 pgoyette-localcount-20170107:1.1.1.1 pgoyette-localcount-20161104:1.1.1.1 localcount-20160914:1.1.1.1 pgoyette-localcount-20160806:1.1.1.1 pgoyette-localcount-20160726:1.1.1.1 pgoyette-localcount:1.1.1.1.0.2 pgoyette-localcount-base:1.1.1.1 v0_16_1:1.1.1.1 GNU:1.1.1; locks; strict; comment @# @; 1.1 date 2016.01.12.19.50.40; author christos; state Exp; branches 1.1.1.1; next ; commitid mjqfEJ9Ohc4GbGQy; 1.1.1.1 date 2016.01.12.19.50.40; author christos; state Exp; branches; next ; commitid mjqfEJ9Ohc4GbGQy; desc @@ 1.1 log @Initial revision @ text @#! /bin/sh # Test checking of Lisp format strings. tmpfiles="" trap 'rm -fr $tmpfiles' 1 2 3 15 tmpfiles="$tmpfiles f-l-2.data" cat <<\EOF > f-l-2.data # Valid: ~~ doesn't count msgid "abc~~def" msgstr "xyz" # Invalid: invalid msgstr msgid "abc~~def" msgstr "xyz~" # Valid: same argument msgid "abc~Ddef" msgstr "xyz~D" # Valid: same arguments msgid "abc~1000000@@*~Ddef" msgstr "~1000000@@*xyz~D" # Valid: permutation msgid "abc~D~C~Fdef" msgstr "xyz~2@@*~F~2:*~C~2:*~D" # Invalid: too few arguments msgid "abc~1@@*~Sdef~0@@*~S" msgstr "xyz~S" # Invalid: too many arguments msgid "abc~Ddef" msgstr "xyz~Duvw~C" # Invalid: missing non-final argument msgid "abc~1@@*~Sdef~0@@*~F" msgstr "xyz~1@@*~S" # Invalid: added non-final argument msgid "abc~1@@*~Ddef" msgstr "xyz~F~D" # Valid: formatting variations msgid "abc~Sdef" msgstr "xyz~:S" # Valid: formatting variations msgid "abc~4Sdef" msgstr "xyz~7S" # Valid: type compatibility msgid "abc~Sdef" msgstr "xyz~W" # Valid: type compatibility msgid "abc~Ddef" msgstr "xyz~B" # Valid: type compatibility msgid "abc~Ddef" msgstr "xyz~O" # Valid: type compatibility msgid "abc~Ddef" msgstr "xyz~X" # Valid: type compatibility msgid "abc~Ddef" msgstr "xyz~R" # Valid: optional plural msgid "~D egg~:P" msgstr "~D Eier" # Valid: type compatibility msgid "abc~Fdef" msgstr "xyz~E" # Valid: type compatibility msgid "abc~Fdef" msgstr "xyz~G" # Valid: type compatibility msgid "abc~Fdef" msgstr "xyz~$" # Invalid: type incompatibility msgid "abc~Fdef" msgstr "xyz~D" # Invalid: type incompatibility msgid "abc~Ddef" msgstr "xyz~C" # Invalid: type incompatibility msgid "abc~Fdef" msgstr "xyz~C" # Invalid: type incompatibility msgid "abc~Sdef" msgstr "xyz~D" # Invalid: type incompatibility msgid "abc~Sdef" msgstr "xyz~F" # Invalid: type incompatibility msgid "abc~Sdef" msgstr "xyz~C" # Valid: extra formatting msgid "abc~Ddef~S" msgstr "xyz~D~_def~%~S" # Valid: FORMAT-GOTO doesn't consume an argument by itself msgid "abc~5@@*~Ddef~C" msgstr "xyz~6@@*~C~2@@*uvw~5@@*~R" # Invalid: @@ matters msgid "abc~?" msgstr "xyz~@@?" # Valid: case conversion is optional msgid "abc~(~S~)" msgstr "xyz~S" # Valid: case conversion is optional msgid "abc~(~D~^ ~D~)" msgstr "xyz~D~^ ~D" # Invalid: ~^ matters msgid "abc~(~D~^ ~D~)" msgstr "xyz~(~D ~D~)" # Valid: case conversion is optional, and it doesn't catch ~^ msgid "abc~(~D~^ ~D~)def~C" msgstr "xyz~D~^ ~Duvw~C" # Valid: synonymous conditionals msgid "abc~@@[~D~]def~C" msgstr "xyz~:[~;~:*~D~]~C" # Valid: synonymous conditionals msgid "abc~Ddef" msgstr "abc~[null~;eins~:;~:*~D~]def" # Valid: conditionals are optional and don't catch ~^ msgid "abc~:[~;~]~^~D~C" msgstr "xyz~:[uvw~^~R~;~:*~S~^~D~]~C" # Invalid: ~:[ requires an argument, ~1@@* doesn't msgid "abc~1@@*~^~D~C" msgstr "xyz~:[uvw~^~R~;~:*~S~^~D~]~C" # Invalid: ~{~} is special msgid "abc~{ ~}" msgstr "xyz~{~}" # Invalid: @@ matters msgid "abc~{~S~}" msgstr "xyz~@@{~S~}" # Invalid: @@ matters msgid "abc~:{~S~}" msgstr "xyz~@@:{~S~}" # Invalid: : matters msgid "abc~{~S~}" msgstr "xyz~:{~S~}" # Invalid: : matters msgid "abc~@@{~S~}" msgstr "xyz~@@:{~S~}" # Invalid: @@: matters msgid "abc~{~S~}" msgstr "xyz~@@:{~S~}" # Valid: permutation inside iteration msgid "abc~{~D ~C~}" msgstr "xyz~{~1@@*~C~2:*~D~1*~}" # Invalid: permutation inside iteration, but wrong position at iteration end msgid "abc~{~D ~C~}" msgstr "xyz~{~1@@*~C~2:*~D~}" # Invalid: ~^ inside iteration matters msgid "abc~{~D ~^~C~}" msgstr "xyz~{~D ~C~}" # Invalid: ~^ inside iteration depends on position msgid "abc~{~D ~^~C~}" msgstr "xyz~{~1@@*~C~^~2:*~D~1*~}" # Invalid: ~^ inside iteration depends on position msgid "abc~{~D ~^~C~}" msgstr "xyz~{~1@@*~C~2:*~^~D~1*~}" # Invalid: ~^ inside iteration depends on position msgid "abc~{~D ~^~C~}" msgstr "xyz~{~1@@*~C~2:*~D~^~1*~}" # Invalid: ~^ inside iteration depends on position msgid "abc~{~D ~^~C~}" msgstr "xyz~{~1@@*~C~2:*~D~1*~^~}" # Valid: justification is optional msgid "abc~<~D~;~C~>" msgstr "xyz~D~C" # Valid: justification with different segmentation msgid "abc~<~D ~D~;~C~;~S~S~>" msgstr "xyz~<~D~;~D~C~S~;~S~>" # Invalid: justification catches ~^ msgid "abc~<~D~;~^~D~>~C" msgstr "abc~D~^~D~C" EOF : ${MSGFMT=msgfmt} n=0 while read comment; do read msgid_line read msgstr_line n=`expr $n + 1` tmpfiles="$tmpfiles f-l-2-$n.po f-l-2-$n.mo" cat < f-l-2-$n.po #, lisp-format ${msgid_line} ${msgstr_line} EOF fail= if echo "$comment" | grep 'Valid:' > /dev/null; then if ${MSGFMT} --check-format -o f-l-2-$n.mo f-l-2-$n.po; then : else fail=yes fi else ${MSGFMT} --check-format -o f-l-2-$n.mo f-l-2-$n.po 2> /dev/null if test $? = 1; then : else fail=yes fi fi if test -n "$fail"; then echo "Format string checking error:" 1>&2 cat f-l-2-$n.po 1>&2 exit 1 fi rm -f f-l-2-$n.po f-l-2-$n.mo done < f-l-2.data rm -fr $tmpfiles exit 0 @ 1.1.1.1 log @import latest GPLv2 gettext @ text @@