#!/bin/sh

# $1 = file with words, 1 word per line

echo "

You probably want to first

cp cmavo_freq cmavo_freq.tmp
cp gismu_freq gismu_freq.tmp
cp lujvo_freq lujvo_freq.tmp

"

for word in `cat $1`
do
    type=`echo $word | tr -d '.' | /usr/bin/vlatai |\
    awk -F: '{ print $2 }' | tr -d ' '`
    fixed=`echo $word | sed 's/\./\\\\./'`

    if [ $type = "cmavo(s)" ]
    then
	#echo $word is a cmavo.
	if [ "`grep \"^$fixed	\" cmavo.4col`" ]
	then
	    num=`grep   "^$fixed	" cmavo_freq.tmp | sed 's/^.*	//'`
	    if [ ! "$num" ]
	    then
		if [ "`grep "^$word$" cmavo.irrelevant`" ]
		then
		    echo "New cmavo $word rejected."
		    continue
		else
		    num=0
		    echo "New cmavo: $word"
		fi
	    fi
	    num=`expr $num + 1`
	    grep -v "^$fixed	" cmavo_freq.tmp > cmavo_freq.tmp.$$
	    echo  "$word	$num" >> cmavo_freq.tmp.$$
	    mv cmavo_freq.tmp.$$ cmavo_freq.tmp
	fi
	continue
    fi
    
    if [ $type = gismu ]
    then
	#echo $word is a gismu.
	if [ "`grep \"^$fixed	\" gismu.4col`" ]
	then
	    num=`grep   "^$fixed	" gismu_freq.tmp | sed 's/^.*	//'`
	    if [ ! "$num" ]
	    then
		if [ "`grep "^$word$" gismu.irrelevant`" ]
		then
		    echo "New gismu $word rejected."
		    continue
		else
		    num=0
		    echo "New gismu: $word"
		fi
	    fi
	    num=`expr $num + 1`
	    grep -v "^$fixed	" gismu_freq.tmp > gismu_freq.tmp.$$
	    echo  "$word	$num" >> gismu_freq.tmp.$$
	    mv gismu_freq.tmp.$$ gismu_freq.tmp
	fi
	continue
    fi

    if [ $type = lujvo ]
    then
	#echo $word is a lujvo.
	num=`grep "^$fixed	" lujvo_freq.tmp | sed 's/^.*	//'`
	if [ ! "$num" ]
	then
	    if [ "`grep "^$word$" lujvo.irrelevant`" ]
	    then
		echo "New lujvo $word rejected."
		continue
	    else
		num=0
		echo "New lujvo: $word"
	    fi
	fi
	num=`expr $num + 1`
	grep -v "^$fixed	" lujvo_freq.tmp > lujvo_freq.tmp.$$
	echo  "$word	$num" >> lujvo_freq.tmp.$$
	mv lujvo_freq.tmp.$$ lujvo_freq.tmp
	continue
    fi

    echo Word $word has unsupported type $type.
done

sort -k2rn cmavo_freq.tmp > cmavo_freq.tmp2
mv cmavo_freq.tmp2 cmavo_freq.tmp 

sort -k2rn gismu_freq.tmp > gismu_freq.tmp2
mv gismu_freq.tmp2 gismu_freq.tmp 

sort -k2rn lujvo_freq.tmp > lujvo_freq.tmp2
mv lujvo_freq.tmp2 lujvo_freq.tmp