gettext-tools/tests/recode-sr-latin-1

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