Se agrega locking

[z.facultad/75.08/llamadas.git] / afinstal

diff --git a/afinstal b/afinstal
index dd192b586bbf1353f99f566aecf06ead373f9744..f803f7dc725e49942bb346b9b5bed0abfb312e87 100755 (executable)
--- a/afinstal
+++ b/afinstal
@@ -15,23 +15,27 @@ function askDir() {
 
 # Devuelve 0 si el script y el OS matchean, 1 otherwise
 function checkOS() {
 
 # 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
                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
 
 MARCA
        return 1


@@ -45,13 +49,14 @@ function checkPerl() {
                return 0;
        else
        cat <<MARCA
                return 0;
        else
        cat <<MARCA

+ERROR!

 
 

-"ERROR!!!"
-"Este proceso de instalación solo puede ser"
-"ejecutado si Perl 5 o superior ya esta instalado"
+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
 MARCA
        return 1
        fi


@@ -92,7 +97,7 @@ MARCA
 
 # Permite seleccionar que componentes se instalaran
 function selectModules() {
 
 # Permite seleccionar que componentes se instalaran
 function selectModules() {

-       PS3="Seleccione un componente:"
+       PS3="Seleccione un componente: "

        key="S"
        toinstall=""
        while [ "$key" = "S" ] && [ -n "$choices" ]
        key="S"
        toinstall=""
        while [ "$key" = "S" ] && [ -n "$choices" ]


@@ -163,18 +168,13 @@ haveconf=0
 havefraude=0
 
 # [STEP1] Verifico el OS vs SCRIPT y la presencia de PERL
 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
 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
 echo ">> Proceso de instalacion para $SISOPTP iniciado."
 echo ">> Presione ENTER para continuar"
 read key


@@ -271,6 +271,16 @@ do
        
        # Directorios FIJOS para todos los componentes
        clear
        
        # 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>.
        cat <<MARCA
 
 ** Iniciando instalacion del componente <$comando>.


@@ -283,9 +293,9 @@ do
 MARCA
 
        # Le pido un rootpath donde se instalara este comando en particular
 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
        if [ -n "$userpath" ]; then     ROOTPATH=$userpath

-       else ROOTPATH=$CURRDIR
+       else ROOTPATH="$CURRDIR/grupoNN"

        fi
 
        # preparlos los dirs que voy a sugerir
        fi
 
        # preparlos los dirs que voy a sugerir


@@ -357,13 +367,14 @@ MARCA
        mkdir -p "$CONFDIR/lock"
 
        touch "$LOGDIR/$LOGFILE"
        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"
        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"
 
        # TODO : no se debe copiar solo 1 vez?
        cp "$INSTDIR/oridesti.txt" "$CONFDIR"


@@ -405,6 +416,8 @@ MARCA
        changeLine "$CONFFILE" "$numline" "USERID = $userid"
        numline=$(($numline+1))
        changeLine "$CONFFILE" "$numline" "FECINS = $fecha"
        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
 done
 
 # Creacion de archivos auxiliares