X-Git-Url: https://git.llucax.com/z.facultad/75.08/llamadas.git/blobdiff_plain/ccbcdc2380f6183e5cd8a8ad35074766434c472c..2ddcc6c972a9879a527b1733e9b1fc2d6eac5aa8:/afinstal

diff --git a/afinstal b/afinstal
index dd192b5..6b86e32 100755
--- a/afinstal
+++ b/afinstal
@@ -15,23 +15,27 @@ function askDir() {
 
 # Devuelve 0 si el script y el OS matchean, 1 otherwise
 function checkOS() {
-	if echo $0 | egrep -q 'afinstal$'; then
-		SCRIPTOS="Linux"
-	fi
-	if echo $0 | egrep -q 'afinsmac$'; then
-		SCRIPTOS="Mac"
-	fi
-	if echo $0 | egrep -q 'afinstaw$'; then
-		SCRIPTOS="Windows"
-	fi
-
-	if [ "$SISOPTP" != "$SCRIPTOS" ]; then
+	CURSIS="$1"
+	SCRIPTOS="un sistema desconocido"
+	case "$0" in
+		*afinstal)
+			SCRIPTOS="Linux"
+			;;
+		*afinsmac)
+			SCRIPTOS="Mac"
+			;;
+		*afinstaw)
+			SCRIPTOS="Windows"
+			;;
+	esac
+	if [ "$CURSIS" != "$SCRIPTOS" ]; then
 		cat<<MARCA
+ERROR!
 
-### ERROR ###
-Este proceso de instalacion es para $SISOPTP y su sistema operativo 
-es $CURSIS. Solicite a su proveedor la version adecuada e inicie 
-nuevamente el proceso de instalacion.
+Este proceso de instalacion es para $SCRIPTOS
+y su sistema operativo es $CURSIS
+Solicite a su proveedor la version adecuada
+e inicie nuevamente el proceso de instalacion.
 
 MARCA
 	return 1
@@ -45,13 +49,14 @@ function checkPerl() {
 		return 0;
 	else
 	cat <<MARCA
+ERROR!
+
+Este proceso de instalación solo puede ser
+ejecutado si Perl 5 o superior ya esta instalado
 
-"ERROR!!!"
-"Este proceso de instalación solo puede ser"
-"ejecutado si Perl 5 o superior ya esta instalado"
+Efectúe a instalación de Perl
+Inicie nuevamente el procedimiento de instalación.
 
-"Efectúe a instalación de Perl"
-i"e inicie nuevamente el procedimiento de instalación."
 MARCA
 	return 1
 	fi
@@ -92,7 +97,7 @@ MARCA
 
 # Permite seleccionar que componentes se instalaran
 function selectModules() {
-	PS3="Seleccione un componente:"
+	PS3="Seleccione un componente: "
 	key="S"
 	toinstall=""
 	while [ "$key" = "S" ] && [ -n "$choices" ]
@@ -158,23 +163,19 @@ CONFDIR="${CURRDIR}/conf"
 INSTDIR="${CURRDIR}/inst"
 CONFFILE="${CONFDIR}/afinstal.conf"
 DEFAULTDIR=$CURRDIR
+OWNCONFDIR="$HOME/.antifraude/conf"
 havemonio=0
 haveconf=0
 havefraude=0
 
 # [STEP1] Verifico el OS vs SCRIPT y la presencia de PERL
-echo ">> Verificando version del software contra el OS.."
-checkOS
+echo -n ">> Verificando version del software contra el OS... "
+checkOS "$SISOPTP"
 if [ "$?" -ne 0 ]; then 
 	abortMessage
 	exit 1
 fi
-echo ">> Verificando la existencia de PERL.."
-checkPerl
-if [ "$?" -ne 0 ]; then
-	abortMessage
-	exit 1
-fi
+echo 'OK!'
 echo ">> Proceso de instalacion para $SISOPTP iniciado."
 echo ">> Presione ENTER para continuar"
 read key
@@ -261,6 +262,15 @@ if [ ! -f "$CONFFILE" ] || [ ! -s "$CONFFILE" ]; then
 		echo "" >> $CONFFILE
 	done		
 fi
+if [ ! -f "$HOME/.antifraude" ]; then
+	mkdir -p "$HOME/.antifraude"
+fi
+if [ ! -f "$HOME/.antifraude/lock" ]; then
+	mkdir -p "$HOME/.antifraude/lock"
+fi
+if [ ! -f "$HOME/.antifraude/conf" ]; then
+	mkdir -p "$HOME/.antifraude/conf"
+fi
 
 # Comienzo la instalacion de cada componente
 comandos=`echo $toinstall | sed s%,%" "%g`
@@ -271,6 +281,16 @@ do
 	
 	# Directorios FIJOS para todos los componentes
 	clear
+	if [ "$comando" = "antifraude.pl" ]; then
+		echo -n ">> Verificando la existencia de PERL... "
+		checkPerl
+		if [ "$?" -ne 0 ]; then
+			abortMessage
+			exit 1
+		fi
+		echo 'OK!'
+	fi
+
 	cat <<MARCA
 
 ** Iniciando instalacion del componente <$comando>.
@@ -283,9 +303,9 @@ do
 MARCA
 
 	# Le pido un rootpath donde se instalara este comando en particular
-	leer ">> Ingrese la ruta de instalación" "$CURRDIR" userpath
+	leer ">> Ingrese la ruta de instalación" "$CURRDIR/grupoNN" userpath
 	if [ -n "$userpath" ]; then	ROOTPATH=$userpath
-	else ROOTPATH=$CURRDIR
+	else ROOTPATH="$CURRDIR/grupoNN"
 	fi
 
 	# preparlos los dirs que voy a sugerir
@@ -357,18 +377,23 @@ MARCA
 	mkdir -p "$CONFDIR/lock"
 
 	touch "$LOGDIR/$LOGFILE"
-	if [ $comando = "antifraude.pl" ]; then
-		mkdir -p $DATADIR
-		mkdir -p $DATADIR/{aprocesar,enproceso,rechazadas,procesadas}
-		mkdir -p $DATADIR/alarmas
+	if [ "$comando" = "antifraude.pl" ]; then
+		mkdir -p "$DATADIR"
+		mkdir -p "$DATADIR"/{aprocesar,enproceso,rechazadas,procesadas}
+		mkdir -p "$DATADIR/alarmas"
 	fi
 	echo ">> Moviendo Archivos....."
 	cp "$INSTDIR/$comando" "$BINDIR"
+	chmod u+x "$BINDIR/$comando"
 
 	# TODO : no se debe copiar solo 1 vez?
 	cp "$INSTDIR/oridesti.txt" "$CONFDIR"
 
 	# Guardo los datos en el archivo de configuracion
+	ownconffile="$OWNCONFDIR/${comando%.pl}.conf"
+	if [ -f "$ownconffile" ]; then
+		rm -rf "$ownconffile"
+	fi
 	userid=$LOGNAME
 	fecha=$(date +%d/%m/%Y)
 	case $comando in
@@ -384,20 +409,25 @@ MARCA
 			havefraude=1;
 			userfraude=$userid;
 			fechafraude=$fecha;;
-	esac	
+	esac
 		
 	changeLine "$CONFFILE" "$numline" "Comando $comando"
 	numline=$(($numline+1))
 	changeLine "$CONFFILE" "$numline" "BINDIR = $BINDIR"
+	echo "BINDIR=\"$BINDIR\"" >> $ownconffile
 	numline=$(($numline+1))
 	changeLine "$CONFFILE" "$numline" "LOGDIR = $LOGDIR"
+	echo "LOGDIR=\"$LOGDIR\"" >> $ownconffile
 	numline=$(($numline+1))
 	changeLine "$CONFFILE" "$numline" "LOGFILE = $LOGFILE"
+	echo "LOGFILE=\"$LOGFILE\"" >> $ownconffile
 	numline=$(($numline+1))
 	changeLine "$CONFFILE" "$numline" "LOGSIZE = $LOGSIZE"
+	echo "LOGSIZE=$LOGSIZE" >> $ownconffile
 	numline=$(($numline+1))
 	if [ "$comando" = "antifraude.pl" ]; then
 		changeLine "$CONFFILE" "$numline" "DATADIR = $DATADIR"
+		echo "DATADIR=\"$DATADIR\"" >> $ownconffile
 		numline=$(($numline+1))
 		changeLine "$CONFFILE" "$numline" "DATASIZE = "
 		numline=$(($numline+1))
@@ -405,6 +435,8 @@ MARCA
 	changeLine "$CONFFILE" "$numline" "USERID = $userid"
 	numline=$(($numline+1))
 	changeLine "$CONFFILE" "$numline" "FECINS = $fecha"
+	echo ">> Instalación del componente $comando completada"
+	read
 done
 
 # Creacion de archivos auxiliares