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 8a7e8241973522ce80700b5750163fa340e2649d..787dcaa815e9298ef0012387c26217fc8ddfb0fa 100755 (executable)
--- a/inst/aficonf
+++ b/inst/aficonf
@@ -3,37 +3,62 @@
 # Configurador
 
 # Atajo CTRL+C 
 # Configurador
 
 # Atajo CTRL+C 

-# TODO Sacar esto cuando termine de probar
-trap "echo -n ''" INT
+#trap "echo -n ''" INT

 
 

-# TODO : esto lo debe modificar el instalador, no?
-INST_DIR="$PWD/inst"
+# Cargo config
+BASE_DIR="$HOME/.antifraude"
+# Cargo config
+. "$BASE_DIR/conf/aficonf.conf"

 
 

-. "/$INST_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 "$INST_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
 }
 

+poner_estado_umbral () {
+       ID=$1
+       ESTADO=$2
+
+       FECHA=`date +"%Y%m%d"`
+       HORA=`date +"%H%M%S"`
+       
+       if [ "$ESTADO" != "A" ] && [ "$ESTADO" != "I" ] ; then
+               return 1
+       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 () {
        echo "AFICONF"
        echo "======="
        echo
        echo "  1) Alta"
 menu () {
        echo "AFICONF"
        echo "======="
        echo
        echo "  1) Alta"

-       echo "  2) Baja"
-       echo "  3) Buscar"
-       echo "  4) Salir"
+       echo "  2) Buscar"
+       echo "  3) Salir"

 
 

-       preguntar "Su opción" "1234" $1
+       preguntar "Su opción" "123" $1

 }
 
 existe_umbral () {
 }
 
 existe_umbral () {

-       EXISTE=`cat "$INST_DIR/umbrales.param" | egrep "$1"`;
+       EXISTE=`cat "$BASE_DIR/umbrales.param" | egrep "$1"`;

        if [ "$EXISTE" == "" ] ; then
                #No existe
                return 1
        if [ "$EXISTE" == "" ] ; then
                #No existe
                return 1


@@ -43,10 +68,10 @@ existe_umbral () {
 }
        
 buscar_id_umbral () {
 }
        
 buscar_id_umbral () {

-       ID=`cat "$INST_DIR/umbrales.id"`;
+       ID=`cat "$BASE_DIR/umbrales.id"`;

        eval "$1=$ID"
        let ID=$ID+1
        eval "$1=$ID"
        let ID=$ID+1

-       echo "$ID" > "$INST_DIR/umbrales.id"
+       echo "$ID" > "$BASE_DIR/umbrales.id"

 }
 
 case_altas () {
 }
 
 case_altas () {


@@ -67,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


@@ -79,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"`


@@ -87,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
        


@@ -95,34 +125,90 @@ case_altas () {
        UMBRAL="$ID;$LINEA;$PAIS;$TIPO;A;$USER;$FECHA;$HORA"
 
        # Lo guardo
        UMBRAL="$ID;$LINEA;$PAIS;$TIPO;A;$USER;$FECHA;$HORA"
 
        # Lo guardo

-       echo "$UMBRAL" >> "$INST_DIR/umbrales.param"
+       echo "$UMBRAL" >> "$BASE_DIR/umbrales.param"

 
        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 () {
+       DONE=0
+       while [ $DONE == 0 ] ; do
+               leer "Número de línea" "" LINEA
+               #TODO Valido
+               if ! validar_solo_numeros "$LINEA" ; then
+                       echo "EL NUMERO TE LINEA SOLO DEBE TENER DIGITOS"
+               else
+                       DONE=1
+               fi
+               if [ "$LINEA" == "" ] ; then
+                       DONE=0
+               fi
+       done
+
+       DATOS=`cat "$BASE_DIR/umbrales.param" | grep "[0-9]*;$LINEA;[A-Z]*;[E,S];A"`
+
+       if [ "$DATOS" == "" ] ; then
+               echo ""
+               echo "No se han encontrado Umbrales activos para la linea $LINEA."
+               echo "Abortando ..."
+               echo ""
+               put_log "$LOGFILE" "aficonf" "No se han encontrado umbrales para la línea $LINEA" "$AFIC_LOGSIZE"
+               return 0
+       fi
+
+       printf "%3s      %2s  %1s   %1s    %10s%8s       %6s\n" "ID" "Ciudad" "Tipo" "Estado" "Usuario" "Fecha" "Hora"
+       OPCIONES="-1"
+       for i in $DATOS ; do
+               ID=`echo "$i" | cut -d ';' -f 1`
+               CIUDAD=`echo "$i" | cut -d ';' -f 3`
+               TIPO=`echo "$i" | cut -d ';' -f 4`
+               ESTADO=`echo "$i" | cut -d ';' -f 5`
+               USUARIO=`echo "$i" | cut -d ';' -f 6`
+               FECHA=`echo "$i" | cut -d ';' -f 7`
+               HORA=`echo "$i" | cut -d ';' -f 8`
+               printf "%3s      %2s      %1s      %1s      %10s      %8s      %6s\n" "$ID" "$CIUDAD" "$TIPO" "$ESTADO" "$USUARIO" "$FECHA" "$HORA"
+               OPCIONES="$OPCIONES $ID"
+       done
+
+       preguntar "Cual desea borrar (-1 para salir)" "$OPCIONES" OPT
+
+       if [ "$OPT" = "-1" ] ; then
+               return 0
+       fi
+
+       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 ""
+}

 
 # No permito correr 2 instancias de AFICONF
 
 # No permito correr 2 instancias de AFICONF

-if is_lock "AFICONF" ; then
+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
 

-lock "AFICONF"
+lock "aficonf"

 
 # Loop Principal
 OPT="0"
 
 # Loop Principal
 OPT="0"

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

        menu OPT
 
        case $OPT in
                "1") case_altas ;;
        menu OPT
 
        case $OPT in
                "1") case_altas ;;

-               "2") echo "Dos" ;;
-               "3") echo "Tres" ;;
+               "2") case_buscar ;;

        esac
 done
 
        esac
 done
 

-unlock "AFICONF"
+unlock "aficonf"
+