X-Git-Url: https://git.llucax.com/z.facultad/75.08/llamadas.git/blobdiff_plain/ab7a2a79e905def4140a0d59c3fad0b31f64596d..25c922a4534c804dc570d82d142eb3a446b288c2:/BUGAFINSTAL

diff --git a/BUGAFINSTAL b/BUGAFINSTAL
index f3680ea..84353e2 100755
--- a/BUGAFINSTAL
+++ b/BUGAFINSTAL
@@ -54,12 +54,17 @@ function checkPerl() {
 "ejecutado si Perl 5 o superior ya esta instalado"
 
 "Efectúe a instalación de Perl"
-"e inicie nuevamente el procedimiento de instalación."
+i"e inicie nuevamente el procedimiento de instalación."
 MARCA
 	return 1
 	fi
 }
 
+# Modifica una linea dada de un archivo dado
+function changeLine() {
+	cat $1 | sed "${2}s%.*%$3%" > $1
+}
+
 # Permite seleccionar que componentes se instalaran
 function selectModules() {
 	PS3="Seleccione un componente:"
@@ -116,7 +121,7 @@ cat <<MARCA
 ***********************************************************
 Componentes a instalar: [ $toinstall ]
 
-< Presione una tecla para continuar>
+< Presione una tecla para continuar >
 MARCA
 read key
 }
@@ -164,110 +169,6 @@ fi
 done
 
 # [STEP3] Chequeamos si hay componentes ya instalados
-if [ "2" = "3" ]; then
-	#busco paquetes instalados. Leo afinstal.conf para ver que hay
-	#como el archivo existe, tiene que tener alguna info almacenada..
-	instdir=`cat $afinstal | grep -n INSTDIR | grep 1 | sed s/\.\*\=\ //`
-	confdir=`cat $afinstal | grep -n CONFDIR | grep 2 | sed s/\.\*\=\ //`
-	#Busco los binarios
-	comp=0
-	anti=0
-	afic=0
-	afim=0	
-	bindir=`cat $afinstal | grep -n  BINDIR | grep 11 | sed s/\.\*\=\ //`
-	logdir=`cat $afinstal | grep -n  LOGDIR | grep 12 | sed s/\.\*\=\ //`
-	logname=`cat $afinstal | grep -n LOGNAME | grep 13 | sed s/\.\*\=\ //`
-	logsize=`cat $afinstal | grep -n  BINDIR | grep 14 | sed s/\.\*\=\ //`
-
-	# Si habia algo instalado, la informacion del los directorios quedo
-	# almacenada, pues es igual para todos los scripts. Excepto el directorio de
-	# datos para antifraude.
-	if [ ! -f "$bindir""antifraude.pl" ]; then
-		#instalo antifraude porque no existe
-		echo "Instalando Antifraude..."
-		anti=1
-		cp "$instdir/antifraude.pl" "$bindir/antifraude.pl"
-	fi
-	if [ ! -f "$bindir""aficonf" ]; then
-		#instalo aficonf porque no existe
-		echo "Instalando Aficonf..."
-		afic=1
-	cp "$instdir/aficonf" "$bindir/aficonf"
-	fi
-	if [ ! -f "$bindir""afimonio" ]; then
-		#instalo afimonio porque no existe
-		echo "Instalando Afimonio..."
-		afim=1
-		cp "$instdir/afimonio" "$bindir/afimonio"
-	fi
-
-	#hay que loguear lo que se instalo
-	comp=$(($anti + $afic + $afim))
-	if [ $anti != 0 ]; then
-		echo "Ingrese la ruta completa para el directorio de datos"
-		read datadir
-		while [ ! -d "$datadir" ]; do
-			echo "La ruta especificada no existe, ingrese un directorio existente"
-			read datadir
-		done
-		echo "Ingrese tamaño máximo de datos"
-		read datasize
-		fecha=$(date)
-		cat "$confdir/afinstal.conf" | sed "10s/.*/Comando antifraude.pl/" > "$confdir/afinstal.conf"
-		cat "$confdir/afinstal.conf" | sed "11s(.*(BINDIR = $bindir(" > "$confdir/afinstal.conf"
-		cat "$confdir/afinstal.conf" | sed "12s(.*(LOGDIR = $logdir(" > "$confdir/afinstal.conf"
-		cat "$confdir/afinstal.conf" | sed "13s(.*(LOGNAME = $logname(" > "$confdir/afinstal.conf"
-		cat "$confdir/afinstal.conf" | sed "14s(.*(LOGSIZE = $logsize(" > "$confdir/afinstal.conf"
-		cat "$confdir/afinstal.conf" | sed "15s(.*(DATADIR = $datadir(" > "$confdir/afinstal.conf"
-		cat "$confdir/afinstal.conf" | sed "16s(.*(DATASIZE = $datasize(" > "$confdir/afinstal.conf"
-		cat "$confdir/afinstal.conf" | sed "17s(.*(USERID = $USER(" > "$confdir/afinstal.conf"
-		cat "$confdir/afinstal.conf" | sed "18s(.*(FECINS = $fecha(" > "$confdir/afinstal.conf"
-	fi
-	if [ $afic != 0 ]; then
-		fecha=$(date)
-		cat "$confdir/afinstal.conf" | sed "20s/.*/Comando aficonf/" > "$confdir/afinstal.conf"
-		cat "$confdir/afinstal.conf" | sed "21s(.*(BINDIR = $bindir(" > "$confdir/afinstal.conf"
-		cat "$confdir/afinstal.conf" | sed "22s(.*(LOGDIR = $logdir(" > "$confdir/afinstal.conf"
-		cat "$confdir/afinstal.conf" | sed "23s(.*(LOGNAME = $logname(" > "$confdir/afinstal.conf"
-		cat "$confdir/afinstal.conf" | sed "24s(.*(LOGSIZE = $logsize(" > "$confdir/afinstal.conf"
-		cat "$confdir/afinstal.conf" | sed "25s(.*(USERID = $USER(" > "$confdir/afinstal.conf"
-		cat "$confdir/afinstal.conf" | sed "26s(.*(FECINS = $fecha(" > "$confdir/afinstal.conf"
-	fi
-	if [ $afim != 0 ]; then
-		fecha=$(date)
-		cat "$confdir/afinstal.conf" | sed "30s/.*/Comando afimonio/" > "$confdir/afinstal.conf"
-		cat "$confdir/afinstal.conf" | sed "31s(.*(BINDIR = $bindir(" > "$confdir/afinstal.conf"
-		cat "$confdir/afinstal.conf" | sed "32s(.*(LOGDIR = $logdir(" > "$confdir/afinstal.conf"
-		cat "$confdir/afinstal.conf" | sed "33s(.*(LOGNAME = $logname(" > "$confdir/afinstal.conf"
-		cat "$confdir/afinstal.conf" | sed "34s(.*(LOGSIZE = $logsize(" > "$confdir/afinstal.conf"
-		cat "$confdir/afinstal.conf" | sed "35s(.*(USERID = $USER(" > "$confdir/afinstal.conf"
-		cat "$confdir/afinstal.conf" | sed "36s(.*(FECINS = $fecha(" > "$confdir/afinstal.conf"
-	fi
-	if [ $comp == 0 ]; then
-
-	#busco los datos
-	fecha1=`cat $afinstal | grep -n FECINS | grep 18 | sed s/\.\*\=\ //`
-	fecha2=`cat $afinstal | grep -n FECINS | grep 26 | sed s/\.\*\=\ //`
-	fecha3=`cat $afinstal | grep -n FECINS | grep 36 | sed s/\.\*\=\ //`
-	usu1=`cat $afinstal | grep -n USERID | grep 17 | sed s/\.\*\=\ //`
-	usu2=`cat $afinstal | grep -n USERID | grep 25 | sed s/\.\*\=\ //`
-	usu3=`cat $afinstal | grep -n USERID | grep 35 | sed s/\.\*\=\ //`
-
-cat<<MARCA
-***************************************************************
-* Se encuentran instalados los siguientes componentes:        *
-* Antifraude.pl instalado el $fecha1 por $usu1 *
-* Aficonf instalado el $fecha2 por $usu2 *
-* Antifraude.pl instalado el $fecha3 por $usu3 	*
-*                                                             *
-*               Copyright TPSistemasOp (c) 2004               *
-***************************************************************
-
-Proceso de instalación cancelado.
-MARCA
-	exit 0
-	fi
-fi
 
 # [STEP4] Seleecion de los componentes a instalar
 # TODO: tener en cuenta los que ya estan
@@ -288,7 +189,6 @@ if [ ! -f "$CONFFILE" ]; then
 	for n in `seq 3 51`; do
 		echo "" >> $CONFFILE
 	done		
-	exit 0
 fi
 
 # Comienzo la instalacion de cada componente
@@ -385,7 +285,7 @@ MARCA
 	if [ -n "$choice" ]; then exit 1
 	fi
 
-	# Comienzo a crear la estructura de directorios definida (Chequear permisos!!)
+	# Comienzo a crear la estructura de directorios definida (Check permisos!!)
 	echo ">> Creando Estructura de Directorio...."
 	mkdir -p $BINDIR
 	mkdir -p $LOGDIR
@@ -398,64 +298,97 @@ MARCA
 	cp $INSTDIR/$comando $BINDIR
 	cp $INSTDIR/umbrales.param $CONFDIR
 	#cp $INSTDIR/*.data $DATADIR/aprocesar
+
+	# Guardo los datos en el archivo de configuracion
+	case $comando in
+		"antifraude.pl" ) numline=10;;
+		"aficonf" ) numline=20;;
+		"afimonio" ) numline=30;;
+	esac	
+		
+	changeLine "$CONFFILE" "$numline" "Comando $comando"
+	numline=$(($numline+1))
+	changeLine "$CONFFILE" "$numline" "BINDIR = $BINDIR"
+	numline=$(($numline+1))
+	changeLine "$CONFFILE" "$numline" "LOGDIR = $LOGDIR"
+	numline=$(($numline+1))
+	changeLine "$CONFFILE" "$numline" "LOGFILE = $LOGFILE"
+	numline=$(($numline+1))
+	changeLine "$CONFFILE" "$numline" "LOGSIZE = $LOGSIZE"
+	numline=$(($numline+1))
+	if [ "$comando" = "antifraude.pl" ]; then
+		changeLine "$CONFFILE" "$numline" "DATADIR = $DATADIR"
+		numline=$(($numline+1))
+		changeLine "$CONFFILE" "$numline" "DATASIZE = "
+		numline=$(($numline+1))
+	fi
+	changeLine "$CONFFILE" "$numline" "USERID = `id | sed 's/(.*//;s/uid=//'`"
+	numline=$(($numline+1))
+	changeLine "$CONFFILE" "$numline" "FECINS = `date`"
 done
 
-############## NO DAR BOLA DE ACA HACIA ABAJO #####################
+# [STEP6] Ofrecer arrancar el Afimonio si estan los tres paquetes instalados
+
+# [STEP7] Mostrar en un recuadro que se encuentra instalado en el sistema
+
+
+################## NO DAR BOLA A TODO LO QUE SIGUE ########################
 exit 0
+if [ "2" = "3" ]; then
+	#busco paquetes instalados. Leo afinstal.conf para ver que hay
+	#como el archivo existe, tiene que tener alguna info almacenada..
+	instdir=`cat $afinstal | grep -n INSTDIR | grep 1 | sed s/\.\*\=\ //`
+	confdir=`cat $afinstal | grep -n CONFDIR | grep 2 | sed s/\.\*\=\ //`
+	#Busco los binarios
+	comp=0
+	anti=0
+	afic=0
+	afim=0	
+	bindir=`cat $afinstal | grep -n  BINDIR | grep 11 | sed s/\.\*\=\ //`
+	logdir=`cat $afinstal | grep -n  LOGDIR | grep 12 | sed s/\.\*\=\ //`
+	logname=`cat $afinstal | grep -n LOGNAME | grep 13 | sed s/\.\*\=\ //`
+	logsize=`cat $afinstal | grep -n  BINDIR | grep 14 | sed s/\.\*\=\ //`
 
-linea=10
-i=0
-fecha=$(date)
+	# Si habia algo instalado, la informacion del los directorios quedo
+	# almacenada, pues es igual para todos los scripts. Excepto el directorio de
+	# datos para antifraude.
+	if [ ! -f "$bindir""antifraude.pl" ]; then
+		#instalo antifraude porque no existe
+		echo "Instalando Antifraude..."
+		anti=1
+		cp "$instdir/antifraude.pl" "$bindir/antifraude.pl"
+	fi
+	if [ ! -f "$bindir""aficonf" ]; then
+		#instalo aficonf porque no existe
+		echo "Instalando Aficonf..."
+		afic=1
+	cp "$instdir/aficonf" "$bindir/aficonf"
+	fi
+	if [ ! -f "$bindir""afimonio" ]; then
+		#instalo afimonio porque no existe
+		echo "Instalando Afimonio..."
+		afim=1
+		cp "$instdir/afimonio" "$bindir/afimonio"
+	fi
 
+	#busco los datos
+	fecha1=`cat $afinstal | grep -n FECINS | grep 18 | sed s/\.\*\=\ //`
+	fecha2=`cat $afinstal | grep -n FECINS | grep 26 | sed s/\.\*\=\ //`
+	fecha3=`cat $afinstal | grep -n FECINS | grep 36 | sed s/\.\*\=\ //`
+	usu1=`cat $afinstal | grep -n USERID | grep 17 | sed s/\.\*\=\ //`
+	usu2=`cat $afinstal | grep -n USERID | grep 25 | sed s/\.\*\=\ //`
+	usu3=`cat $afinstal | grep -n USERID | grep 35 | sed s/\.\*\=\ //`
 
-read op
+cat<<MARCA
+***************************************************************
+* Se encuentran instalados los siguientes componentes:        *
+* Antifraude.pl instalado el $fecha1 por $usu1 *
+* Aficonf instalado el $fecha2 por $usu2 *
+* Antifraude.pl instalado el $fecha3 por $usu3 	*
+*                                                             *
+*               Copyright TPSistemasOp (c) 2004               *
+***************************************************************
 
-if [ -n "$op" ]; then
-	echo "Proceso de instalación cancelado"
-	exit 0
+Proceso de instalación cancelado.
+MARCA
 fi
-
-# Cremos los directorios para este comando
-
-numlinea=$(($linea+$i))
-cat "$CONFDIR/afinstal.conf" | sed "$numlinea""s/.*/Comando $comando/" > "$CONFDIR/afinstal.conf"
-i=$(($i+1))
-numlinea=$(($linea+$i))
-cat "$CONFDIR/afinstal.conf" | sed "$numlinea""s(.*(BINDIR = $BINDIR(" > "$CONFDIR/afinstal.conf"
-i=$(($i+1))
-numlinea=$(($linea+$i))
-cat "$CONFDIR/afinstal.conf" | sed "$numlinea""s(.*(LOGDIR = $LOGDIR(" > "$CONFDIR/afinstal.conf"
-i=$(($i+1))
-numlinea=$(($linea+$i))
-cat "$CONFDIR/afinstal.conf" | sed "$numlinea""s(.*(LOGNAME = $LOGNAME(" > "$CONFDIR/afinstal.conf"
-i=$(($i+1))
-numlinea=$(($linea+$i))
-cat "$CONFDIR/afinstal.conf" | sed "$numlinea""s(.*(LOGSIZE = $LOGSIZE(" > "$CONFDIR/afinstal.conf"
-if [ "$FILE" = "antifraude.pl" ]; then
-	i=$(($i+1))
-	numlinea=$(($linea+$i))
-	cat "$CONFDIR/afinstal.conf" | sed "$numlinea""s(.*(DATADIR = $DATADIR(" > "$CONFDIR/afinstal.conf"
-	i=$(($i+1))
-	numlinea=$(($linea+$i))
-	cat "$CONFDIR/afinstal.conf" | sed "$numlinea""s(.*(DATASIZE = (" > "$CONFDIR/afinstal.conf"
-	fi		
-i=$(($i+1))
-numlinea=$(($linea+$i))
-cat "$CONFDIR/afinstal.conf" | sed "$numlinea""s(.*(USERID = $USER(" > "$CONFDIR/afinstal.conf"
-i=$(($i+1))
-numlinea=$(($linea+$i))
-cat "$CONFDIR/afinstal.conf" | sed "$numlinea""s(.*(FECINS = $fecha(" > "$CONFDIR/afinstal.conf"
-i=0
-linea=$(($linea+10))
-	
-# Termino la instalacion, muestro informacion.
-j=10
-echo " ***************************************************************** "
-echo " *			Proceso de instalacion concluido                   * "
-comandos=`cat "$CONFDIR/afinstal.conf" | grep Comando `
-for i in 17 25 35 ; do
-	
-fecha=`cat "$CONFDIR/afinstal.conf" | grep -n FECINS | grep $i | sed 's/.*= //'`
-i=$(($i +1))
-usu=`cat "$CONDIR/afinstal.conf" | grep -n USERID | grep $i | sed 's/.*= //'`
-done