#!/bin/sh
# Select Language
# Witten by Ne01eX@rambler.ru for
# Russian Technology Kit Linux, http://rtklinux.com
# (c) 2007, RTK LinuxSecurity Team.
PID_TP=`ps ax | grep "ecmd setlang" | awk '{ print $1 }'`
BSTART="" # set beforestart yellow color
ASTART="" # set afterstart green color
FSTART="" # set failstart red color
NTEXT="" # set normaltext color

SHABANG="#!/bin/sh"
TMPDIR="/tmp/setupvar"
mkdir -p $TMPDIR
SETLANG="$TMPDIR/setlang.var"
LCFILE=/etc/profile.d/lang.sh
RFFILE=/etc/rc.d/rc.font
RKFILE=/etc/rc.d/rc.keymap
FLANG="ru_RU.koi8r"
STALL="export LC_ALL="
STLNG="export LANG="
RCKM1="if [ -x /usr/bin/loadkeys ]; then"
RCKM2="  /usr/bin/loadkeys"
RCKM3="> /dev/null 2> /dev/null"

cr_langsh()
{
  echo "$SHABANG" > $LCFILE
  echo >> $LCFILE
  echo "$STALL${FLANG}" >> $LCFILE
  echo "$STLNG${FLANG}" >> $LCFILE
  echo >> $LCFILE
  chmod 755 $LCFILE
  echo "${FLANG}" > $TMPDIR/tlc_all.var
}

cr_rcfont()
{
  echo "$SHABANG" > $RFFILE
  echo >> $RFFILE
  echo "$RCFONT" >> $RFFILE
  echo >> $RFFILE
  echo "for n in 1 2 3 4 5 6; do" >> $RFFILE
  echo "  echo -ne \"\033(K\" > /dev/tty\$n" >> $RFFILE
  echo "done" >> $RFFILE
  chmod 755 $RFFILE
}

cr_rckeymap()
{
  echo "$SHABANG" > $RKFILE
  echo >> $RKFILE
  echo "$RCKM1" >> $RKFILE
  echo "$RCKM2 $RCKEYMAP $RCKM3" >> $RKFILE
  echo "fi" >> $RKFILE
  echo >> $RKFILE
  chmod 755 $RKFILE
}

cs_lang()
{
case "$setlang" in

  "BE" | "be" | "Be" )
  FLANG="be_BY.cp1251"
  RCFONT="setfont ter-c16b.psf.gz -m cp1251_to_uni.trans"
  RCKEYMAP="by.map"
  cr_langsh
  cr_rcfont
  cr_rckeymap
  ;;

  "DE" | "de" | "De" )
  FLANG="de_DE.iso88591"
  RCFONT="setfont ter-116b.psf.gz -m 8859-1_to_uni.trans"
  RCKEYMAP="de.map"
  cr_langsh
  cr_rcfont
  cr_rckeymap
  ;;

  "EN" | "en" | "En" )
  FLANG="en_GB.iso88591"
  RCFONT="setfont ter-116b.psf.gz -m 8859-1_to_uni.trans"
  RCKEYMAP="us.map"
  cr_langsh
  cr_rcfont
  cr_rckeymap
  ;;

  "FR" | "fr" | "Fr" )
  FLANG="fr_FR.iso88591"
  RCFONT="setfont ter-116b.psf.gz -m 8859-1_to_uni.trans"
  RCKEYMAP="fr.map"
  cr_langsh
  cr_rcfont
  cr_rckeymap
  ;;

  "RU" | "ru" | "Ru" )
  FLANG="ru_RU.koi8r"
  RCFONT="setfont ter-k16b.psf.gz -m koi8-r_to_uni.trans"
  RCKEYMAP="ru-ms.map"
  cr_langsh
  cr_rcfont
  cr_rckeymap
  ;;

  "SR" | "sr" | "Sr" )
  FLANG="sr_CS.iso88595"
  RCFONT="setfont ter-c16b.psf.gz -m 8859-5_to_uni.trans"
  RCKEYMAP="sr-cy.map"
  cr_langsh
  cr_rcfont
  cr_rckeymap
  ;;

  "UK" | "uk" | "Uk" )
  FLANG="uk_UA.koi8u"
  RCFONT="setfont ter-u16b.psf.gz -m koi8-u_to_uni.trans"
  RCKEYMAP="ua.map"
  cr_langsh
  cr_rcfont
  cr_rckeymap
  ;;

  * )
  FLANG="ru_RU.koi8r"
  RCFONT="setfont ter-k16b.psf.gz -m koi8-r_to_uni.trans"
  RCKEYMAP="ru-ms.map"
  cr_langsh
  cr_rcfont
  cr_rckeymap
  ;;

esac
clear
}

clear
if [ -x /bin/dialog ]; then
    dialog --clear --title "Set language" \
        --menu "Please select language:" 14 50 7 \
        "RU" "Russian [default]" \
        "BE" "Belarussian" \
        "DE" "Deutsch" \
        "EN" "English (Britain)" \
        "FR" "Francais" \
        "SR" "Serbian (Cyrillic)" \
        "UK" "Ukrainian" 2> $SETLANG
    retval=$?

    setlang=`cat $SETLANG`

    case $retval in
      0)
        cs_lang;;
      1)
        cs_lang
        exit 0;;
      255)
        cs_lang
        exit 0;;
    esac
else
    echo "${BSTART}Please select language:${NTEXT}"
    echo
    echo "[${ASTART}RU${NTEXT}] - Russian ${FSTART}[default]${NTEXT}"
    echo "[${ASTART}BE${NTEXT}] - Belarussian"
    echo "[${ASTART}DE${NTEXT}] - Deutsch"
    echo "[${ASTART}EN${NTEXT}] - English ${FSTART}(Britain)${NTEXT}"
    echo "[${ASTART}FR${NTEXT}] - Francais"
    echo "[${ASTART}SR${NTEXT}] - Serbian ${FSTART}(Cyrillic)${NTEXT}"
    echo "[${ASTART}UK${NTEXT}] - Ukrainian"
    echo
    read lang
    cs_lang
fi

kill $PID_TP >/dev/null 2>/dev/null

Xft.dpi: 96
Xft.hinting:1
Xft.hintstyle:hintfull