#!/bin/csh
#
# ONOMA: GIANNAKOPOULOU XRISTINA-MARIA
# AM: 3100031

echo "1. Εισαγωγή νέου συνδρομητή"
echo "2. Εμφάνιση στοιχείων συνδρομητών"
echo "3. Εμφάνιση όλων των συνδρομητών"
echo "4. Διαγραφή συνδρομητών"
echo "5. Διαγραφή όλων των συνδρομητών"
echo "6. Έξοδος από την εφαρμογή"

echo -n "Chose a number:"
set choice = $<
while ($choice == 1)
		echo "     EISAGWGH SYNDROMHTH"
		echo "---------------------------------"
		echo -n "EPWNYMO    : "
		set EPWNYMO = $<
		echo -n "ONOMA      : "
		set ONOMA = $<
		echo -n "THLEFWNO   : "
		set THLEFWNO = $<
		echo "$EPWNYMO $ONOMA $THLEFWNO" >> phones
		echo "---------------------------------"
		echo "Prosthiki neou syndromiti ? (y/n) :"
		set ans = $<
		switch ($ans)
			case n:
				exit
				breaksw
			case y:
				continue
				breaksw
			default:
				echo "Lathos epilogh"
				exit
				breaksw
		endsw
end

while ($choice == 2)
	echo "     EMFANISH SYNDROMITWN"
	echo "--------------------------------"
	echo -n "Search for: "
	set name = $<
	echo "--------------------------------"
	foreach epwnumo (`cat phones | cut -d' ' -f1`)


			if (`echo $epwnumo | grep -c "^$name"` == 1) then
				echo $EPWNYMO
				echo $ONOMA
				echo $THLEFWNO
			else ($status != 0) then
				echo "$name: not found!"
			endif
		echo "... press enter"
	end
end

while ($choice == 3)
	echo "  EMFANISH OLWN TWN SYNDROMHTWN"
	echo "--------------------------------"
	foreach ($EPWNYMO $ONOMA $THLEFWNO)
		echo $EPWNYMO
		echo $ONOMA
		echo $THLEFWNO
		echo "------------------------"
	end
	echo "Telos arxeiou ..."
end

while ($choice == 4)
	echo "    DIAGRAFH SYNDROMITWN"
	echo "--------------------------------"
	echo -n "Search for: "
	set name = $<
	echo "--------------------------------"
	foreach name ($argv)
		grep $name phones
		if(-f $name) then
			echo -n "Na diagrafei? (y/n): "
	set ans = $<
		switch ($ans)
			case n:
				echo "H diagrafi den egine!"
				exit
				breaksw
			case y:
				echo "H diagrafi egine!"
				continue
				breaksw
			default:
				echo "Lathos epilogh"
				exit
				breaksw
		endsw
	end
end

while ($choice == 5)

	if ! (-e phones)
		echo "To arxeio den uparxei!"
		exit(1)
	else if ($#argv == 0)
		echo "To arxeio einai adeio!"
	else
		echo "Diagrafi olwn? (y/n)"
	endif
	set an = $<
	switch ($an)
		case n:
			exit
		case y:
			rm -r *
			echo "H diagrafi egine!"
			continue
	endsw
end

while ($choice == 6)
	exit
end