Se cambia el set de prueba

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

diff --git a/inst/aficonf b/inst/aficonf
index ca2e3b01bfbeed4eb42abfec60977c8f945a7359..bd8ba4ef9cec7dee8a5889290dd908ffea047170 100755 (executable)
--- a/inst/aficonf
+++ b/inst/aficonf
@@ -14,9 +14,14 @@ BASE_DIR="$HOME/.antifraude"
 . "$BASE_DIR/util.sh"
 
 #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=`cat "$BASE_DIR/oridesti.txt" | egrep "^$1;"`;
+       EXISTE=`cat "$BASE_DIR/oridesti.txt" | egrep "^[A-Z]*;$1" | cut -d ';' -f 1`;
        if [ "$EXISTE" != "" ] ; then
+               #Exite!, debo gaurdar el código
+               eval "$2=$EXISTE"
                return 0
        fi
        return 1
@@ -26,10 +31,13 @@ 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\2/" "$BASE_DIR/umbrales.param"`
+       SALIDA=`sed "s/^$ID\(;[^;]*;[^;]*;[^;]*;\)[^;]*\(;[^;]*;[^;]*;[^;]*\)$/$ID\1I;$USER;$FECHA;$HORA/" "$BASE_DIR/umbrales.param"`
        echo "$SALIDA" > "$BASE_DIR/umbrales.param"
 }
 
@@ -38,11 +46,10 @@ menu () {
        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 () {
@@ -80,10 +87,11 @@ case_altas () {
        preguntar "Tipo de llamada" "ES" TIPO
 
        DONE=0
+       CODIGO=''
        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
@@ -92,6 +100,9 @@ case_altas () {
                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"`
@@ -130,7 +141,15 @@ case_buscar () {
                fi
        done
 
-       DATOS=`cat "$BASE_DIR/umbrales.param" | grep "[0-9]*;$LINEA"`
+       DATOS=`cat "$BASE_DIR/umbrales.param" | grep "[0-9]*;$LINEA;[A-Z]*;[E,S];A"`
+
+       if [ "$OPT" == "" ] ; then
+               echo ""
+               echo "No se han encontrado uUmbrales activos para la linea $LINEA."
+               echo "Abortando ..."
+               echo ""
+               return 0
+       fi
 
        printf "%3s      %2s  %1s   %1s    %10s%8s       %6s\n" "ID" "Ciudad" "Tipo" "Estado" "Usuario" "Fecha" "Hora"
        OPCIONES="-1"
@@ -155,6 +174,9 @@ case_buscar () {
        echo "Borrando el registro $OPT ..."
        poner_estado_umbral "$OPT" "I"
        echo ""
+       echo ""
+       echo "El Umbral fue eliminado con éxito"
+       echo ""
 }
 
 # No permito correr 2 instancias de AFICONF
@@ -169,13 +191,12 @@ lock "aficonf"
 
 # Loop Principal
 OPT="0"
-while [ "$OPT" != "4" ] ; do 
+while [ "$OPT" != "3" ] ; do 
        menu OPT
 
        case $OPT in
                "1") case_altas ;;
-               "2") echo "Dos" ;;
-               "3") case_buscar ;;
+               "2") case_buscar ;;
        esac
 done