1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
|
#! /bin/sh
# Test recode-sr-latin on some input in UTF-8 encoding.
tmpfiles=""
trap 'rm -fr $tmpfiles' 1 2 3 15
# Test whether a specific UTF-8 locale is installed.
: ${LOCALE_FR_UTF8=fr_FR.UTF-8}
if test $LOCALE_FR_UTF8 != none; then
LC_ALL=$LOCALE_FR_UTF8 ./testlocale 2>/dev/null
case $? in
0) ;;
77) LOCALE_FR_UTF8=none;;
*) exit 1;;
esac
fi
if test $LOCALE_FR_UTF8 = none; then
if test -f /usr/bin/localedef; then
echo "Skipping test: no french UTF-8 locale is installed"
else
echo "Skipping test: no french UTF-8 locale is supported"
fi
rm -fr $tmpfiles; exit 77
fi
tmpfiles="$tmpfiles rec-srl-1.in"
cat <<\EOF > rec-srl-1.in
Исправни аргументи су
неједнозначан аргумент
љубазни фењерџија чађавог лица хоће да ми покаже штос
ЉУБАЗНИ ФЕЊЕРЏИЈА ЧАЂАВОГ ЛИЦА ХОЋЕ ДА МИ ПОКАЖЕ ШТОС
ЉУБЉАНА Љубљана ЏИВЏАН Џивџан ЊУЊОРИ Њуњори
ѐѝӣӯ ЍЀӢӮ ЉӮ ӮЉ
EOF
tmpfiles="$tmpfiles rec-srl-1.out"
: ${RECODE=recode}
LC_ALL=$LOCALE_FR_UTF8 \
${RECODE}-sr-latin < rec-srl-1.in > rec-srl-1.out \
|| { rm -fr $tmpfiles; exit 1; }
tmpfiles="$tmpfiles rec-srl-1.ok"
cat <<\EOF > rec-srl-1.ok
Ispravni argumenti su
nejednoznačan argument
ljubazni fenjerdžija čađavog lica hoće da mi pokaže štos
LJUBAZNI FENJERDŽIJA ČAĐAVOG LICA HOĆE DA MI POKAŽE ŠTOS
LJUBLJANA Ljubljana DŽIVDŽAN Dživdžan NJUNJORI Njunjori
èìīū ÌÈĪŪ LJŪ ŪLJ
EOF
: ${DIFF=diff}
${DIFF} rec-srl-1.ok rec-srl-1.out
result=$?
rm -fr $tmpfiles
exit $result
|
