X-Git-Url: https://git.llucax.com/z.facultad/75.08/llamadas.git/blobdiff_plain/c5ffe89bb418b3d834799680b72c4c3e42528c1f..749de3dcaf1de5c07d71b49334fb35a2a5ad395a:/AFINSTAL

diff --git a/AFINSTAL b/AFINSTAL
index bc11c8e..2883a27 100755
--- a/AFINSTAL
+++ b/AFINSTAL
@@ -14,6 +14,9 @@
 #echo "term "$TERM
 #echo "time out" $TMOUT
 
+#Includes
+. util.sh
+
 # chequeo sistema operativo
 echo "Chequeando SO ..."
 if [ -z  "`echo $0 | sed \"s/.*AFINSTAL$//\"`" ]; then
@@ -38,26 +41,25 @@ else
 	echo "Proceso de instalación para $SISOPTP"
 	echo "Presione ENTER para continuar"	
 fi
-opcion="a"
-while [ -n "$opcion" ]; do
-	echo "*******************************************************"
-	echo "*                                                     *"
-	echo "*     Proceso de instalación de \"Antifraude\"          *"
-	echo "*      Copyright TPSistemasOp  (c)2004                *"
-	echo "*                                                     *"
-	echo "*******************************************************"
-	echo "A T E N C I O N: Al instalar Antifraude UD. expresa estar"
-	echo "en un todo de acuerdo con los términos y condiciones del"
-	echo "\"ACUERDO DE LICENCIA DE SOFTWARE\" incluido en este paquete"
-	echo ""
-	echo "Si desea cancelar este proceso oprima 'F' y luego ENTER"
-	echo "Para continuar oprima solamente ENTER"
-	read opcion
-	if [ "$opcion" == "F" ] || [ "$opcion" == "f" ]; then 
-		echo "Proceso de instalación cancelado"
-		exit 0
-	fi	
-done 	
+
+echo "*******************************************************"
+echo "*                                                     *"
+echo "*     Proceso de instalación de \"Antifraude\"        *"
+echo "*      Copyright TPSistemasOp  (c)2004                *"
+echo "*                                                     *"
+echo "*******************************************************"
+echo "A T E N C I O N: Al instalar Antifraude UD. expresa estar"
+echo "en un todo de acuerdo con los términos y condiciones del"
+echo "\"ACUERDO DE LICENCIA DE SOFTWARE\" incluido en este paquete"
+echo ""
+echo "Si desea cancelar este proceso oprima 'F' y luego ENTER"
+echo "Para continuar oprima 'C' y luego ENTER"
+
+preguntar "Su opción" "cCfF" opcion
+if [ "$opcion" == "F" ] || [ "$opcion" == "f" ]; then 
+	echo "Proceso de instalación cancelado"
+	exit 0
+fi	
 
 #Verifico que Perl este instalado
 if [ "esta" == "`type perl | sed s/\"perl is .*\"/\"esta\"/`" ]; then 
@@ -86,11 +88,11 @@ while [ "$again" == "s" ]; do
 	op="s"
 	while [ "$op" == "s" ]; do
 		#muestro el directorio donde se instalara el sistema
-		echo "Nombre del directorio de instalación ($INSTDIR),ingrese una nueva ruta o ENTER para continuar: $PATH_GENERAL/<nueva ruta>"
-		read AUX1
-		if [ ! -z $AUX1 ]; then 
-			INSTDIR="$PATH_GENERAL/$AUX1"
-		fi	
+		#
+		# Asi queda mas corto ;-)
+		#
+		leer "Nombre del directorio de instalación" "$INSTDIR" INSTDIR
+
 		echo "Nombre del directorio de configuración ($CONFDIR), ingrese una nueva ruta o ENTER para continuar: $PATH_GENERAL/<nueva ruta>"
 		read AUX2
 		if [ ! -z $AUX2 ]; then 
@@ -196,37 +198,37 @@ if [ -d "$PATH_GENERAL" ]; then
 		fecha=$(date)
 		for FILE in ANTIFRAUDE.PL AFICONF AFIMONIO
 		do
-			numlinea=$(($linea+$i))
+			numlinea=`expr $linea + $i`
 			cat "$CONFDIR/afinstal.conf" | sed "$numlinea""s/.*/Comando $FILE/" > "$CONFDIR/afinstal.conf"
-			i=$(($i+1))
+			i=`expr $i + 1`
 			numlinea=`expr $linea + $i`
 			cat "$CONFDIR/afinstal.conf" | sed "$numlinea""s(.*(BINDIR = $BINDIR(" > "$CONFDIR/afinstal.conf"
-			i=$(($i+1))
+			i=`expr $i + 1`
 			numlinea=`expr $linea + $i`
 			cat "$CONFDIR/afinstal.conf" | sed "$numlinea""s(.*(LOGDIR = $LOGDIR(" > "$CONFDIR/afinstal.conf"
-			i=$(($i+1))
+			i=`expr $i + 1`
 			numlinea=`expr $linea + $i`
 			cat "$CONFDIR/afinstal.conf" | sed "$numlinea""s(.*(LOGNAME = $LOGNAME(" > "$CONFDIR/afinstal.conf"
-			i=$(($i+1))
+			i=`expr $i + 1`
 			numlinea=`expr $linea + $i`
 			cat "$CONFDIR/afinstal.conf" | sed "$numlinea""s(.*(LOGSIZE = $LOGSIZE(" > "$CONFDIR/afinstal.conf"
 			if [ "$FILE" == "ANTIFRAUDE.PL" ]; then
-				i=$(($i+1))
+				i=`expr $i + 1`
 				numlinea=`expr $linea + $i`
 				cat "$CONFDIR/afinstal.conf" | sed "$numlinea""s(.*(DATADIR = $DATADIR(" > "$CONFDIR/afinstal.conf"
-				i=$(($i+1))
+				i=`expr $i + 1`
 				numlinea=`expr $linea + $i`
 				cat "$CONFDIR/afinstal.conf" | sed "$numlinea""s(.*(DATASIZE = (" > "$CONFDIR/afinstal.conf"
 			fi		
-			i=$(($i+1))
+			i=`expr $i + 1`
 			numlinea=`expr $linea + $i`
 			cat "$CONFDIR/afinstal.conf" | sed "$numlinea""s(.*(USERID = $USER(" > "$CONFDIR/afinstal.conf"
-			i=$(($i+1))
+			i=`expr $i + 1`
 			numlinea=`expr $linea + $i`
 			cat "$CONFDIR/afinstal.conf" | sed "$numlinea""s(.*(FECINS = $fecha(" > "$CONFDIR/afinstal.conf"
-			echo "i es igual a "$i
+
 			i=0
-			linea=$(($linea+10))
+			linea=`expr $linea + 10`
 		done #for
 	fi	#seleccion opcion
 fi #si esxiste la estructura de directorios.. FIXME si no existe, hay que crearlo