# Sadala PDF failu uz pusēm.
# Otro pusi apvieno vienā lapā pa četri.
# 2014/10/30 19:44:33

# No OO eksportēts PDF ar ieķeksētu atzīmi, ka vajag arī piezīmes.


# Daudzvalodība
export TEXTDOMAIN="sadali_un_apvieno"
. gettext.sh



# Pārbauda vajadzīgo programmu esamību
if [ ! $(command -v pdfinfo) ]; then
	echo `eval_gettext 'Kļūda:'` "„pdfinfo”" `eval_gettext 'nav atrasta'`"." 
	exit 1
fi
if [ ! $(command -v pdftk) ]; then
	echo `eval_gettext 'Kļūda:'` "„pdftk”" `eval_gettext 'nav atrasta'`"." 
	exit 1
fi
if [ ! $(command -v podofoimpose) ]; then
	echo `eval_gettext 'Kļūda:'` "„podofoimpose”" `eval_gettext 'nav atrasta'`"." 
	exit 1
fi



# Pārbauda, vai nosūtīts faila vārds
if [ ! $1 ] ; then
	echo Norādi apstrādājamo PDF failu:
	ls *.pdf
	echo Nekas nav paveikts.
	exit -1
fi

# Atrod faila vārdu bez paplašinājuma
fails=${1%.pdf}

# Uz ekrāna rādamo lappu atlasai izmanto pdftk, jo
# ar to var atjaunos lapu (grāmatzīnju) nosaukumus

# Noskaidro PDF garumu
lapuskaitsT=$(pdfinfo $1 | grep Pages:)
re="^(.*):(.*)$"
[[ $lapuskaitsT =~ $re ]] && nevajag="${BASH_REMATCH[1]}" && lapuskaits="${BASH_REMATCH[2]}"
echo Atrasto lapu skaits: $lapuskaits
puse=`expr $lapuskaits / 2 `

# Ieraksts MetaInfo failā
pdftk $1 dump_data_utf8 >$1.txt

# Sadala PDF failu uz pusēm
pdftk $1 cat 1-$puse output $1.puse
pdftk $1.puse update_info_utf8 $1.txt output $fails.ekraanam.pdf compress
rm $1.puse $1.txt


# Otro pusi, kas ir lektora piezīmes, saliek pa četrām vienā lapā
podofoimpose $1  $fails.ar_tekstu.pdf sadali_un_apvieno.4vienaa.lua lua