#!/bin/bash
DOWNLOAD='yes'
GIT_DIR='dictionaries'
VERBOSE='no'

declare -A provides_map=(
["myspell-af_ZA"]="myspell-african"
["myspell-ar"]="myspell-arabic"
["myspell-be_BY"]="myspell-belarusian"
["myspell-bg_BG"]="myspell-bulgarian"
["myspell-bn_BD"]="myspell-bengali"
["myspell-br_FR"]="myspell-breton"
["myspell-ca"]="myspell-catalan myspell-valencian"
["myspell-cs_CZ"]="myspell-czech"
["myspell-da_DK"]="myspell-danish"
["myspell-el_GR"]="myspell-greek"
["myspell-en"]="myspell-american myspell-australian myspell-canadian myspell-british myspell-new-zaeland myspell-south-african-english"
["myspell-es"]="myspell-spanish myspell-mexican myspell-spanish-argentine myspell-spanish-bolivian myspell-spanish-chilean myspell-spanish-colombian myspell-spanish-costa-rican myspell-spanish-dominican myspell-spanish-ecuadorian myspell-spanish-guatemalan myspell-spanish-honduran myspell-spanish-nicaraguan myspell-spanish-panamanian myspell-spanish-paraguayan myspell-spanish-peruvian myspell-spanish-puerto-rican myspell-spanish-salvadorean myspell-spanish-uruguayan myspell-spanish-venezuelan"
["myspell-et_EE"]="myspell-estonian"
["myspell-fr_FR"]="myspell-french"
["myspell-gd_GB"]="myspell-gaelic"
["myspell-gl"]="myspell-galician"
["myspell-gu_IN"]="myspell-gujarati"
["myspell-he_IL"]="myspell-hebrew"
["myspell-hi_IN"]="myspell-hindi"
["myspell-hr_HR"]="myspell-croatian"
["myspell-hu_HU"]="myspell-hungarian"
["myspell-is"]="myspell-icelandic"
["myspell-it_IT"]="myspell-italian"
["myspell-lt_LT"]="myspell-lithuanian"
["myspell-lv_LV"]="myspell-latvian"
["myspell-nl_NL"]="myspell-dutch"
["myspell-no"]="myspell-norsk-bokmaal myspell-norsk-nynorsk"
["myspell-oc_FR"]="myspell-occitan-lengadocian"
["myspell-pl_PL"]="myspell-polish"
["myspell-pt_BR"]="myspell-brazilian"
["myspell-pt_PT"]="myspell-portuguese"
["myspell-ro"]="myspell-romanian"
["myspell-ru_RU"]="myspell-russian"
["myspell-si_LK"]="myspell-sinhala"
["myspell-sk_SK"]="myspell-slovak"
["myspell-sl_SI"]="myspell-slovene"
["myspell-sr"]="myspell-serbian-latin myspell-serbian-cyrillic"
["myspell-sv_SE"]="myspell-swedish"
["myspell-sw_TZ"]="myspell-kiswahili"
["myspell-th_TH"]="myspell-thai"
["myspell-uk_UA"]="myspell-ukrainian"
["myspell-vi"]="myspell-vietnamese"
["myspell-zu_ZA"]="myspell-zulu"
)

function directories()
{
  ls $GIT_DIR/*/dictionaries.xcu | sed -e 's:dictionaries/::' -e 's:/dictionaries.xcu::' | tr '\n' ' '
}

function locale_to_file_map()
{
  cd $GIT_DIR
  rm -f locale_to_file_map.txt
  for dir in $dirs; do
    cat $dir/dictionaries.xcu \
       | grep -v '<!--' \
       | grep -A1 'Locations\|Locales' \
       | grep -v '\-\-\|Locations\|Locales' \
       | sed s:%origin%:$dir:g \
       | sed 's:.*<value>\(.*\)</value>.*:\1:' \
       | while read files; do 
           read locs
           echo $dir: $locs @ $files | tr '-' '_' >> locale_to_file_map.txt
         done
  done
  cd ..
}

function dir_locales()
{
  dir=$1
  grep "^$dir:" $GIT_DIR/locale_to_file_map.txt | sed 's/.*: //' | sed 's/ @.*//' | tr ' ' '\n' | sort -u | tr '\n' ' '
}

function locale_files()
{
  loc=$1
  grep $loc $GIT_DIR/locale_to_file_map.txt | sed 's:.*@ ::' | tr ' ' '\n' | sort -u | tr '\n' ' '
}

function description()
{
  dir=$1
  grep  '<name lang="en.*">' dictionaries/$dir/description.xml | sed -e 's:.*<name lang="en.*">::' -e 's:</name>.*::' | tr '\n' ' ' | sed 's:[ \t]*$::'
}

#
# download present git version, remove .git, unify layout
# and create locale symlinks
#
if [ $DOWNLOAD == "yes" ]; then 
  rm -rf $GIT_DIR
  git clone git://anongit.freedesktop.org/libreoffice/$GIT_DIR
  rm -rf $GIT_DIR/.git
  for dir in ca gd_GB; do
    cp --force $GIT_DIR/$dir/dictionaries/* dictionaries/$dir
    sed -i 's:dictionaries/::' dictionaries/$dir/dictionaries.xcu
  done
elif [ ! -e $GIT_DIR ]; then
  echo "ERROR: DOWNLOAD=$DOWNLOAD and $GIT_DIR doesn't exist"
  exit 1
fi

#
# create dir <-> locales <-> files mapping
# in $GIT_DIR/locale_to_file_map.txt
# 
dirs=$(directories)
[ "$VERBOSE" == "yes" ] && echo directiories: $dirs
locale_to_file_map

# create symlinks in $GIT_DIR/$dir, e. g. es_GT -> es_ANY 
for dir in $dirs; do
  dir_locs=$(dir_locales $dir)
  [ "$VERBOSE" == "yes" ] && echo "DICTIONARY: $dir ($dir_locs)"
  for l in $dir_locs; do
    loc_files=$(locale_files $l)
    [ "$VERBOSE" == "yes" ] && echo " $l: $loc_files"
    for f in $loc_files; do
      f=`basename $f`
      prefix=""
      if [[ $f == hyph* ]] || [[ $f == th* ]]; then
        # nice collision with th_ for thesaurus
        if [ "$f" != "th_TH.aff" ] && [ "$f" != "th_TH.dic" ]; then
          prefix=`echo $f | sed 's:_.*:_:'`
        fi
      fi
      #echo FILE: $f
      ext=`echo $f | sed 's:.*\.::'`
      # file or link for this locale/extension exist yet, do not create symlink
      if ls $GIT_DIR/$dir/$prefix*$l*.$ext &> /dev/null; then
        continue;
      fi
      # work around which is bug imho in dictionaries.xcu. 
      # It references file that doesn't exist.
      if [ ! -e "$GIT_DIR/$dir/$f" ]; then
        continue;
      fi
      linkname=$prefix$l.$ext
      ln -sf $f $GIT_DIR/$dir/$linkname
    done
  done
done
#
# generate myspell-dictionaries.spec
#
cp myspell-dictionaries.spec.in myspell-dictionaries.spec

sed -i "s:@DO_NOT_EDIT_COMMENT@:DO NOT EDIT THIS SPEC FILE:" myspell-dictionaries.spec
date=`date +%Y%m%d`
sed -i "s:@VERSION@:$date:" myspell-dictionaries.spec

for subpackage in $dirs; do
  desc=$(description $subpackage)
  sum="MySpell $subpackage Dictionary"
  dir_locs=$(dir_locales $subpackage)
  sed -i "s#@METADATA@#%package -n myspell-$subpackage\n@METADATA@#" myspell-dictionaries.spec
  sed -i "s#@METADATA@#Summary:        $sum\n@METADATA@#" myspell-dictionaries.spec
  sed -i "s#@METADATA@#Group:          Productivity/Text/Spell\n@METADATA@#" myspell-dictionaries.spec
  sed -i "s#@METADATA@#Requires:       myspell-dictionaries\n@METADATA@#" myspell-dictionaries.spec
  sed -i "s#@METADATA@#Provides:       myspell-dictionary\n@METADATA@#" myspell-dictionaries.spec
  for l in $dir_locs; do
    sed -i "s#@METADATA@#Provides:       locale(libreoffice:$l)\n@METADATA@#" myspell-dictionaries.spec
    sed -i "s#@METADATA@#Provides:       locale(seamonkey-spellchecker:$l)\n@METADATA@#" myspell-dictionaries.spec
  done
  for p in ${provides_map["myspell-$subpackage"]}; do
    sed -i "s#@METADATA@#Provides:       $p\n@METADATA@#" myspell-dictionaries.spec
  done
  sed -i "s#@METADATA@#\n@METADATA@#" myspell-dictionaries.spec
  sed -i "s#@METADATA@#%description -n myspell-$subpackage\n@METADATA@#" myspell-dictionaries.spec
  sed -i "s#@METADATA@#$desc.\n@METADATA@#" myspell-dictionaries.spec
  sed -i "s#@METADATA@#\n@METADATA@#" myspell-dictionaries.spec
done
sed -i "s:@METADATA@::" myspell-dictionaries.spec

sed -i "s:@LANG_DIRS@:$dirs:" myspell-dictionaries.spec	

for subpackage in $dirs; do
  sed -i "s:@FILES@:%files -n myspell-$subpackage -f $subpackage.list\n@FILES@:" myspell-dictionaries.spec
  sed -i "s:@FILES@:\n@FILES@:" myspell-dictionaries.spec
done
sed -i "s:@FILES@::" myspell-dictionaries.spec

#
# creating source archive
#
[ $DOWNLOAD == "yes" ] && tar cJf dictionaries.tar.xz dictionaries
[ $DOWNLOAD == "yes" ] && rm -r dictionaries

echo OK

#
# advice at the end ..
#
echo
echo With osc diff, figure out if there is a new package. 
echo If yes, add its license in License: tag of both 
echo *.spec and *.spec.in
echo if this license is not there yet.
echo