| #! /bin/sh | |
| . "${srcdir=.}/init.sh"; path_prepend_ . ../src | |
| # Test recognition of Ruby format strings. | |
| (rxgettext --version) >/dev/null 2>/dev/null \ | |
| || { echo "Skipping test: rxgettext not found"; Exit 77; } | |
| cat <<\EOF > f-r-1.data | |
| # Valid: no argument | |
| "abc%%" | |
| # Valid: one string argument (unnumbered) | |
| "abc%s" | |
| # Valid: one string argument (numbered) | |
| "abc%1$s" | |
| # Valid: one string argument (named) | |
| "abc%<foo>s" | |
| # Valid: one string argument (named) | |
| "abc%{foo}" | |
| # Valid: one escaped string argument (unnumbered) | |
| "abc%p" | |
| # Valid: one escaped string argument (numbered) | |
| "abc%1$p" | |
| # Valid: one escaped string argument (named) | |
| "abc%<foo>p" | |
| # Valid: one character argument (unnumbered) | |
| "abc%c" | |
| # Valid: one character argument (numbered) | |
| "abc%1$c" | |
| # Valid: one character argument (named) | |
| "abc%<foo>c" | |
| # Valid: one integer argument (unnumbered) | |
| "abc%d" | |
| # Valid: one integer argument (numbered) | |
| "abc%1$d" | |
| # Valid: one integer argument (named) | |
| "abc%<foo>d" | |
| # Valid: one integer argument (unnumbered) | |
| "abc%i" | |
| # Valid: one integer argument (numbered) | |
| "abc%1$i" | |
| # Valid: one integer argument (named) | |
| "abc%<foo>i" | |
| # Valid: one integer argument (unnumbered) | |
| "abc%u" | |
| # Valid: one integer argument (numbered) | |
| "abc%1$u" | |
| # Valid: one integer argument (named) | |
| "abc%<foo>u" | |
| # Valid: one integer argument (unnumbered) | |
| "abc%o" | |
| # Valid: one integer argument (numbered) | |
| "abc%1$o" | |
| # Valid: one integer argument (named) | |
| "abc%<foo>o" | |
| # Valid: one integer argument (unnumbered) | |
| "abc%x" | |
| # Valid: one integer argument (numbered) | |
| "abc%1$x" | |
| # Valid: one integer argument (named) | |
| "abc%<foo>x" | |
| # Valid: one integer argument (unnumbered) | |
| "abc%X" | |
| # Valid: one integer argument (numbered) | |
| "abc%1$X" | |
| # Valid: one integer argument (named) | |
| "abc%<foo>X" | |
| # Valid: one integer argument (unnumbered) | |
| "abc%b" | |
| # Valid: one integer argument (numbered) | |
| "abc%1$b" | |
| # Valid: one integer argument (named) | |
| "abc%<foo>b" | |
| # Valid: one integer argument (unnumbered) | |
| "abc%B" | |
| # Valid: one integer argument (numbered) | |
| "abc%1$B" | |
| # Valid: one integer argument (named) | |
| "abc%<foo>B" | |
| # Valid: one floating-point argument (unnumbered) | |
| "abc%f" | |
| # Valid: one floating-point argument (numbered) | |
| "abc%1$f" | |
| # Valid: one floating-point argument (named) | |
| "abc%<foo>f" | |
| # Valid: one floating-point argument (unnumbered) | |
| "abc%g" | |
| # Valid: one floating-point argument (numbered) | |
| "abc%1$g" | |
| # Valid: one floating-point argument (named) | |
| "abc%<foo>g" | |
| # Valid: one floating-point argument (unnumbered) | |
| "abc%G" | |
| # Valid: one floating-point argument (numbered) | |
| "abc%1$G" | |
| # Valid: one floating-point argument (named) | |
| "abc%<foo>G" | |
| # Valid: one floating-point argument (unnumbered) | |
| "abc%e" | |
| # Valid: one floating-point argument (numbered) | |
| "abc%1$e" | |
| # Valid: one floating-point argument (named) | |
| "abc%<foo>e" | |
| # Valid: one floating-point argument (unnumbered) | |
| "abc%E" | |
| # Valid: one floating-point argument (numbered) | |
| "abc%1$E" | |
| # Valid: one floating-point argument (named) | |
| "abc%<foo>E" | |
| # Valid: one floating-point argument (unnumbered) | |
| "abc%a" | |
| # Valid: one floating-point argument (numbered) | |
| "abc%1$a" | |
| # Valid: one floating-point argument (named) | |
| "abc%<foo>a" | |
| # Valid: one floating-point argument (unnumbered) | |
| "abc%A" | |
| # Valid: one floating-point argument (numbered) | |
| "abc%1$A" | |
| # Valid: one floating-point argument (named) | |
| "abc%<foo>A" | |
| # Valid: one argument with flags (unnumbered) | |
| "abc%0#g" | |
| # Valid: one argument with flags (numbered) | |
| "abc%1$0#g" | |
| # Valid: one argument with flags (numbered) | |
| "abc%0#1$g" | |
| # Valid: one argument with flags (named) | |
| "abc%<foo>0#g" | |
| # Valid: one argument with flags (named) | |
| "abc%0#<foo>g" | |
| # Valid: one argument with width (unnumbered) | |
| "abc%2g" | |
| # Valid: one argument with width (numbered) | |
| "abc%1$2g" | |
| # Valid: one argument with width (named) | |
| "abc%<foo>2g" | |
| # Valid: one argument with width (named) | |
| "abc%2<foo>g" | |
| # Valid: one argument with width (unnumbered) | |
| "abc%*g" | |
| # Valid: one argument with width (numbered) | |
| "abc%2$*1$g" | |
| # Valid: one argument with precision (unnumbered) | |
| "abc%.4g" | |
| # Valid: one argument with precision (numbered) | |
| "abc%1$.4g" | |
| # Valid: one argument with precision (named) | |
| "abc%<foo>.4g" | |
| # Valid: one argument with precision (named) | |
| "abc%.4<foo>g" | |
| # Valid: one argument with precision (unnumbered) | |
| "abc%.*g" | |
| # Valid: one argument with precision (numbered) | |
| "abc%2$.*1$g" | |
| # Valid: one argument with width and precision (unnumbered) | |
| "abc%14.4g" | |
| # Valid: one argument with width and precision (numbered) | |
| "abc%1$14.4g" | |
| # Valid: one argument with width and precision (named) | |
| "abc%<foo>14.4g" | |
| # Valid: one argument with width and precision (named) | |
| "abc%14<foo>.4g" | |
| # Valid: one argument with width and precision (named) | |
| "abc%14.4<foo>g" | |
| # Valid: one argument with width and precision (unnumbered) | |
| "abc%14.*g" | |
| # Valid: one argument with width and precision (numbered) | |
| "abc%2$14.*1$g" | |
| # Valid: one argument with width and precision (unnumbered) | |
| "abc%*.4g" | |
| # Valid: one argument with width and precision (numbered) | |
| "abc%2$*1$.4g" | |
| # Valid: one argument with width and precision (unnumbered) | |
| "abc%*.*g" | |
| # Valid: one argument with width and precision (numbered) | |
| "abc%3$*1$.*2$g" | |
| # Invalid: unterminated directive | |
| "abc%" | |
| # Invalid: unterminated name | |
| "abc%<value" | |
| # Invalid: unterminated name | |
| "abc%{value" | |
| # Invalid: unterminated directive | |
| "abc%<value>" | |
| # Invalid: unknown format specifier (unnumbered) | |
| "abc%y" | |
| # Invalid: mixing unnumbered and numbered in the same directive | |
| "abc%2$*g" | |
| # Invalid: mixing unnumbered and numbered in the same directive | |
| "abc%*1$g" | |
| # Invalid: mixing unnumbered and numbered in the same directive | |
| "abc%2$.*g" | |
| # Invalid: mixing unnumbered and numbered in the same directive | |
| "abc%.*1$g" | |
| # Invalid: mixing unnumbered and numbered in different directives | |
| "abc%d%2$g" | |
| # Invalid: mixing unnumbered and numbered in different directives | |
| "abc%1$d%g" | |
| # Invalid: mixing unnumbered and named in the same directive | |
| "abc%*<foo>g" | |
| # Invalid: mixing unnumbered and named in the same directive | |
| "abc%.*<foo>g" | |
| # Invalid: mixing unnumbered and named in different directives | |
| "abc%d%<foo>g" | |
| # Invalid: mixing unnumbered and named in different directives | |
| "abc%<foo>d%g" | |
| # Invalid: mixing numbered and named in the same directive | |
| "abc%*1$<foo>g" | |
| # Invalid: mixing numbered and named in the same directive | |
| "abc%.*1$<foo>g" | |
| # Invalid: mixing numbered and named in different directives | |
| "abc%2$d%<foo>g" | |
| # Invalid: mixing numbered and named in different directives | |
| "abc%<foo>d%2$g" | |
| # Invalid: flags after width (unnumbered) | |
| "abc%*0g" | |
| # Invalid: flags after width (numbered) | |
| "abc%2$*1$0g" | |
| # Invalid: flags after precision (unnumbered) | |
| "abc%.*0g" | |
| # Invalid: flags after precision (numbered) | |
| "abc%2$.*1$0g" | |
| # Invalid: width after precision (unnumbered) | |
| "abc%.*14g" | |
| # Invalid: width after precision (unnumbered) | |
| "abc%.4*g" | |
| # Invalid: width after precision (unnumbered) | |
| "abc%.**g" | |
| # Invalid: width after precision (numbered) | |
| "abc%2$.*1$14g" | |
| # Invalid: width after precision (numbered) | |
| "abc%2$.4*1$g" | |
| # Invalid: width after precision (numbered) | |
| "abc%3$.*1$*2$g" | |
| # Invalid: twice width (unnumbered) | |
| "abc%2*g" | |
| # Invalid: twice width (unnumbered) | |
| "abc%*2g" | |
| # Invalid: twice width (numbered) | |
| "abc%2$2*1$g" | |
| # Invalid: twice width (numbered) | |
| "abc%2$*1$2g" | |
| # Invalid: twice precision (unnumbered) | |
| "abc%.4.2g" | |
| # Invalid: twice precision (numbered) | |
| "abc%1$.4.2g" | |
| # Valid: three arguments | |
| "abc%d%u%u" | |
| # Valid: an unused argument | |
| "abc%2$d%3$u" | |
| # Valid: a named argument | |
| "abc%<value>d" | |
| # Valid: a named argument | |
| "abc%{value}" | |
| # Valid: an empty name | |
| "abc%<>d" | |
| # Valid: an empty name | |
| "abc%{}" | |
| # Valid: ignored named argument | |
| "abc%<dummy>%" | |
| # Valid: three arguments, two with equal names | |
| "abc%<addr>4x,%<char>c,%<addr>u" | |
| # Invalid: argument with conflicting types | |
| "abc%<addr>4x,%<char>c,%<addr>s" | |
| # Valid: no conflict | |
| "abc%<addr>s,%{addr}" | |
| EOF | |
| : ${XGETTEXT=xgettext} | |
| n=0 | |
| while read comment; do | |
| read string | |
| n=`expr $n + 1` | |
| cat <<EOF > f-r-1-$n.in | |
| gettext(${string}); | |
| EOF | |
| ${XGETTEXT} -L Ruby -o f-r-1-$n.po f-r-1-$n.in || Exit 1 | |
| test -f f-r-1-$n.po || Exit 1 | |
| fail= | |
| if echo "$comment" | grep 'Valid:' > /dev/null; then | |
| if grep ruby-format f-r-1-$n.po > /dev/null; then | |
| : | |
| else | |
| fail=yes | |
| fi | |
| else | |
| if grep ruby-format f-r-1-$n.po > /dev/null; then | |
| fail=yes | |
| else | |
| : | |
| fi | |
| fi | |
| if test -n "$fail"; then | |
| echo "Format string recognition error:" 1>&2 | |
| cat f-r-1-$n.in 1>&2 | |
| echo "Got:" 1>&2 | |
| cat f-r-1-$n.po 1>&2 | |
| Exit 1 | |
| fi | |
| rm -f f-r-1-$n.in f-r-1-$n.po | |
| done < f-r-1.data | |
| Exit 0 |