Chequeo que exista el set de pruebas antes de tratar de descompactarlo en el dir...

[z.facultad/75.08/llamadas.git] / inst / aficonf

diff --git a/inst/aficonf b/inst/aficonf
index 8d67cb896f9c8a33fa9dd0a06ee860ecc10c54dd..787dcaa815e9298ef0012387c26217fc8ddfb0fa 100755 (executable)
--- a/inst/aficonf
+++ b/inst/aficonf
@@ -13,10 +13,19 @@ BASE_DIR="$HOME/.antifraude"
 # Cargo utilidades
 . "$BASE_DIR/util.sh"
 
 # Cargo utilidades
 . "$BASE_DIR/util.sh"
 

+LOGDIR=$AFIC_LOGDIR
+LOGNAME=$AFIC_LOGFILE
+LOGFILE=$LOGDIR/$LOGNAME
+

 #Valida que exista el pais
 #Valida que exista el pais

+# Parámetros :
+#   $1 = Descripcion a buscar
+#   $2 = Variable donde guardar el código del Pais en caso de existir

 existe_pais () {
 existe_pais () {

-       EXISTE=`cat "$BASE_DIR/oridesti.txt" | egrep "^$1;"`;
+       EXISTE=`cat "$BASE_DIR/oridesti.txt" | egrep "^[A-Z]*;$1" | cut -d ';' -f 1`;

        if [ "$EXISTE" != "" ] ; then
        if [ "$EXISTE" != "" ] ; then

+               #Exite!, debo gaurdar el código
+               eval "$2=$EXISTE"

                return 0
        fi
        return 1
                return 0
        fi
        return 1


@@ -34,6 +43,7 @@ poner_estado_umbral () {
        fi
        SALIDA=`sed "s/^$ID\(;[^;]*;[^;]*;[^;]*;\)[^;]*\(;[^;]*;[^;]*;[^;]*\)$/$ID\1I;$USER;$FECHA;$HORA/" "$BASE_DIR/umbrales.param"`
        echo "$SALIDA" > "$BASE_DIR/umbrales.param"
        fi
        SALIDA=`sed "s/^$ID\(;[^;]*;[^;]*;[^;]*;\)[^;]*\(;[^;]*;[^;]*;[^;]*\)$/$ID\1I;$USER;$FECHA;$HORA/" "$BASE_DIR/umbrales.param"`
        echo "$SALIDA" > "$BASE_DIR/umbrales.param"

+       put_log "$LOGFILE" "aficonf" "Se ha cambiado el estado de umbral $ID a $ESTADO" "$AFIC_LOGSIZE"

 }
 
 menu () {
 }
 
 menu () {


@@ -82,10 +92,11 @@ case_altas () {
        preguntar "Tipo de llamada" "ES" TIPO
 
        DONE=0
        preguntar "Tipo de llamada" "ES" TIPO
 
        DONE=0

+       CODIGO=''

        while [ $DONE == 0 ] ; do
        while [ $DONE == 0 ] ; do

-               leer "Pais (código de 2 letras)" "" PAIS 
-               if ! existe_pais "$PAIS" ; then
-                       echo "No existe el país de código $PAIS"
+               leer "Pais (descripción)" "" PAIS 
+               if ! existe_pais "$PAIS" CODIGO ; then
+                       echo "No existe el país de descrición '$PAIS'"

                else
                        DONE=1
                fi
                else
                        DONE=1
                fi


@@ -94,6 +105,9 @@ case_altas () {
                fi
        done
 
                fi
        done
 

+       echo "El código de '$PAIS' es '$CODIGO'"
+       PAIS=$CODIGO
+

        # Verifico que el umbral no exista
        FECHA=`date +"%Y%m%d"`
        HORA=`date +"%H%M%S"`
        # Verifico que el umbral no exista
        FECHA=`date +"%Y%m%d"`
        HORA=`date +"%H%M%S"`


@@ -102,6 +116,7 @@ case_altas () {
        if existe_umbral "$UMBRAL" ; then
                echo "Ya existe un umbral con los datos ingresados."
                echo "Abortando..."
        if existe_umbral "$UMBRAL" ; then
                echo "Ya existe un umbral con los datos ingresados."
                echo "Abortando..."

+               put_log "$LOGFILE" "aficonf" "Se trató de insertar un umbral repetido ($UMBRAL)" "$AFIC_LOGSIZE"

                return
        fi
        
                return
        fi
        


@@ -115,6 +130,7 @@ case_altas () {
        echo ""
        echo "El Umbral fue grabado con éxito"
        echo ""
        echo ""
        echo "El Umbral fue grabado con éxito"
        echo ""

+       put_log "$LOGFILE" "aficonf" "Se inserto un nuevo umbral ($UMBRAL)" "$AFIC_LOGSIZE"

 }
 
 case_buscar () {
 }
 
 case_buscar () {


@@ -134,11 +150,12 @@ case_buscar () {
 
        DATOS=`cat "$BASE_DIR/umbrales.param" | grep "[0-9]*;$LINEA;[A-Z]*;[E,S];A"`
 
 
        DATOS=`cat "$BASE_DIR/umbrales.param" | grep "[0-9]*;$LINEA;[A-Z]*;[E,S];A"`
 

-       if [ "$OPT" == "" ] ; then
+       if [ "$DATOS" == "" ] ; then

                echo ""
                echo ""

-               echo "No se han encontrado uUmbrales activos para la linea $LINEA."
+               echo "No se han encontrado Umbrales activos para la linea $LINEA."

                echo "Abortando ..."
                echo ""
                echo "Abortando ..."
                echo ""

+               put_log "$LOGFILE" "aficonf" "No se han encontrado umbrales para la línea $LINEA" "$AFIC_LOGSIZE"

                return 0
        fi
 
                return 0
        fi
 


@@ -164,6 +181,7 @@ case_buscar () {
 
        echo "Borrando el registro $OPT ..."
        poner_estado_umbral "$OPT" "I"
 
        echo "Borrando el registro $OPT ..."
        poner_estado_umbral "$OPT" "I"

+       put_log "$LOGFILE" "aficonf" "No se ha eliminado elumbral de ID $OPT" "$AFIC_LOGSIZE"

        echo ""
        echo ""
        echo "El Umbral fue eliminado con éxito"
        echo ""
        echo ""
        echo "El Umbral fue eliminado con éxito"


@@ -175,6 +193,7 @@ if is_lock "aficonf" ; then
        echo ""
        echo "Aficonf está corriendo actualmente."
        echo ""
        echo ""
        echo "Aficonf está corriendo actualmente."
        echo ""

+       put_log "$LOGFILE" "aficonf" "Se ha intentado ejecutar aficonf cuando este estaba corriendo" "$AFIC_LOGSIZE"

        exit 1
 fi
 
        exit 1
 fi
 


@@ -182,7 +201,7 @@ lock "aficonf"
 
 # Loop Principal
 OPT="0"
 
 # Loop Principal
 OPT="0"

-while [ "$OPT" != "4" ] ; do 
+while [ "$OPT" != "3" ] ; do 

        menu OPT
 
        case $OPT in
        menu OPT
 
        case $OPT in