| #! /bin/sh | |
| . "${srcdir=.}/init.sh"; path_prepend_ . ../src | |
| # Test of gettext facilities in the librep language. | |
| # Assumes an fr_FR locale is installed. | |
| # Assumes the following packages are installed: librep. | |
| cat <<\EOF > prog.jl | |
| (require 'rep.i18n.gettext) | |
| (textdomain "prog") | |
| (bindtextdomain "prog" ".") | |
| (format standard-output "%s\n" (_ "'Your command, please?', asked the waiter.")) | |
| (format standard-output "%s\n" | |
| (format nil (_ "%s is replaced by %s.") "FF" "EUR")) | |
| EOF | |
| : ${XGETTEXT=xgettext} | |
| ${XGETTEXT} -o prog.tmp --omit-header --no-location prog.jl || Exit 1 | |
| LC_ALL=C tr -d '\r' < prog.tmp > prog.pot || Exit 1 | |
| cat <<EOF > prog.ok | |
| msgid "'Your command, please?', asked the waiter." | |
| msgstr "" | |
| #, librep-format | |
| msgid "%s is replaced by %s." | |
| msgstr "" | |
| EOF | |
| : ${DIFF=diff} | |
| ${DIFF} prog.ok prog.pot || Exit 1 | |
| cat <<\EOF > fr.po | |
| msgid "" | |
| msgstr "" | |
| "Content-Type: text/plain; charset=ISO-8859-1\n" | |
| "Plural-Forms: nplurals=2; plural=(n > 1);\n" | |
| msgid "'Your command, please?', asked the waiter." | |
| msgstr "«Votre commande, s'il vous plait», dit le garçon." | |
| # Reverse the arguments. | |
| #, librep-format | |
| msgid "%s is replaced by %s." | |
| msgstr "%2$s remplace %1$s." | |
| EOF | |
| : ${MSGMERGE=msgmerge} | |
| ${MSGMERGE} -q -o fr.po.tmp fr.po prog.pot || Exit 1 | |
| LC_ALL=C tr -d '\r' < fr.po.tmp > fr.po.new || Exit 1 | |
| : ${DIFF=diff} | |
| ${DIFF} fr.po fr.po.new || Exit 1 | |
| test -d fr || mkdir fr | |
| test -d fr/LC_MESSAGES || mkdir fr/LC_MESSAGES | |
| : ${MSGFMT=msgfmt} | |
| ${MSGFMT} -o fr/LC_MESSAGES/prog.mo fr.po | |
| # Test for presence of rep version 0.15.3 or newer. | |
| (rep --version) >/dev/null 2>/dev/null \ | |
| || { echo "Skipping test: rep not found"; Exit 77; } | |
| case `rep --version | sed -e 's/^[^0-9]*//'` in | |
| 0.[0-9] | 0.1[0-5] | 0.[0-9].* | 0.1[0-4].* | 0.15.[0-2] ) | |
| echo "Skipping test: rep version too old"; Exit 77;; | |
| esac | |
| # Test which of the fr_FR locales are installed. | |
| : ${LOCALE_FR=fr_FR} | |
| : ${LOCALE_FR_UTF8=fr_FR.UTF-8} | |
| if test $LOCALE_FR != none; then | |
| LC_ALL=$LOCALE_FR ../testlocale | |
| case $? in | |
| 0) ;; | |
| 77) LOCALE_FR=none;; | |
| *) Exit 1;; | |
| esac | |
| fi | |
| if test $LOCALE_FR_UTF8 != none; then | |
| LC_ALL=$LOCALE_FR_UTF8 ../testlocale | |
| case $? in | |
| 0) ;; | |
| 77) LOCALE_FR_UTF8=none;; | |
| *) Exit 1;; | |
| esac | |
| fi | |
| if test $LOCALE_FR = none && test $LOCALE_FR_UTF8 = none; then | |
| if test -f /usr/bin/localedef; then | |
| echo "Skipping test: no french locale is installed" | |
| else | |
| echo "Skipping test: no french locale is supported" | |
| fi | |
| Exit 77 | |
| fi | |
| : ${DIFF=diff} | |
| cat <<\EOF > prog.ok | |
| «Votre commande, s'il vous plait», dit le garçon. | |
| EUR remplace FF. | |
| EOF | |
| cat <<\EOF > prog.oku | |
| «Votre commande, s'il vous plait», dit le garçon. | |
| EUR remplace FF. | |
| EOF | |
| : ${LOCALE_FR=fr_FR} | |
| : ${LOCALE_FR_UTF8=fr_FR.UTF-8} | |
| if test $LOCALE_FR != none; then | |
| prepare_locale_ fr $LOCALE_FR | |
| LANGUAGE= LC_ALL=$LOCALE_FR rep --no-rc --batch prog.jl > prog.out || Exit 1 | |
| ${DIFF} prog.ok prog.out || Exit 1 | |
| fi | |
| if test $LOCALE_FR_UTF8 != none; then | |
| prepare_locale_ fr $LOCALE_FR_UTF8 | |
| LANGUAGE= LC_ALL=$LOCALE_FR_UTF8 rep --no-rc --batch prog.jl > prog.out || Exit 1 | |
| ${DIFF} prog.oku prog.out || Exit 1 | |
| fi | |
| Exit 0 |