]> git.llucax.com Git - z.facultad/75.08/llamadas.git/blob - inst/aficonf
ahora parece andar bien
[z.facultad/75.08/llamadas.git] / inst / aficonf
1 #!/bin/sh
2 #
3 # Configurador
4
5 # Atajo CTRL+C 
6 #trap "echo -n ''" INT
7
8 # Cargo config
9 BASE_DIR="$HOME/.antifraude"
10 # Cargo config
11 . "$BASE_DIR/conf/aficonf.conf"
12
13 # Cargo utilidades
14 . "$BASE_DIR/util.sh"
15
16 #Valida que exista el pais
17 existe_pais () {
18         EXISTE=`cat "$BASE_DIR/oridesti.txt" | egrep "^$1;"`;
19         if [ "$EXISTE" != "" ] ; then
20                 return 0
21         fi
22         return 1
23 }
24
25 poner_estado_umbral () {
26         ID=$1
27         ESTADO=$2
28
29         FECHA=`date +"%Y%m%d"`
30         HORA=`date +"%H%M%S"`
31         
32         if [ "$ESTADO" != "A" ] && [ "$ESTADO" != "I" ] ; then
33                 return 1
34         fi
35         SALIDA=`sed "s/^$ID\(;[^;]*;[^;]*;[^;]*;\)[^;]*\(;[^;]*;[^;]*;[^;]*\)$/$ID\1I;$USER;$FECHA;$HORA/" "$BASE_DIR/umbrales.param"`
36         echo "$SALIDA" > "$BASE_DIR/umbrales.param"
37 }
38
39 menu () {
40         echo "AFICONF"
41         echo "======="
42         echo
43         echo "  1) Alta"
44         echo "  2) Buscar"
45         echo "  3) Salir"
46
47         preguntar "Su opción" "1234" $1
48 }
49
50 existe_umbral () {
51         EXISTE=`cat "$BASE_DIR/umbrales.param" | egrep "$1"`;
52         if [ "$EXISTE" == "" ] ; then
53                 #No existe
54                 return 1
55         fi
56         #Ya existe un umbral!
57         return 0
58 }
59         
60 buscar_id_umbral () {
61         ID=`cat "$BASE_DIR/umbrales.id"`;
62         eval "$1=$ID"
63         let ID=$ID+1
64         echo "$ID" > "$BASE_DIR/umbrales.id"
65 }
66
67 case_altas () {
68         DONE=0
69         while [ $DONE == 0 ] ; do
70                 leer "Número de línea" "" LINEA
71                 #TODO Valido
72                 if ! validar_solo_numeros "$LINEA" ; then
73                         echo "EL NUMERO TE LINEA SOLO DEBE TENER DIGITOS"
74                 else
75                         DONE=1
76                 fi
77                 if [ "$LINEA" == "" ] ; then
78                         DONE=0
79                 fi
80         done
81
82         preguntar "Tipo de llamada" "ES" TIPO
83
84         DONE=0
85         while [ $DONE == 0 ] ; do
86                 leer "Pais (código de 2 letras)" "" PAIS 
87                 if ! existe_pais "$PAIS" ; then
88                         echo "No existe el país de código $PAIS"
89                 else
90                         DONE=1
91                 fi
92                 if [ "$PAIS" == "" ] ; then
93                         DONE=0
94                 fi
95         done
96
97         # Verifico que el umbral no exista
98         FECHA=`date +"%Y%m%d"`
99         HORA=`date +"%H%M%S"`
100         UMBRAL="$LINEA;$PAIS;$TIPO;A;*;*;*"
101
102         if existe_umbral "$UMBRAL" ; then
103                 echo "Ya existe un umbral con los datos ingresados."
104                 echo "Abortando..."
105                 return
106         fi
107         
108         # Genero el umbral
109         buscar_id_umbral ID
110         UMBRAL="$ID;$LINEA;$PAIS;$TIPO;A;$USER;$FECHA;$HORA"
111
112         # Lo guardo
113         echo "$UMBRAL" >> "$BASE_DIR/umbrales.param"
114
115         echo ""
116         echo "El Umbral fue grabado con éxito"
117         echo ""
118 }
119
120 case_buscar () {
121         DONE=0
122         while [ $DONE == 0 ] ; do
123                 leer "Número de línea" "" LINEA
124                 #TODO Valido
125                 if ! validar_solo_numeros "$LINEA" ; then
126                         echo "EL NUMERO TE LINEA SOLO DEBE TENER DIGITOS"
127                 else
128                         DONE=1
129                 fi
130                 if [ "$LINEA" == "" ] ; then
131                         DONE=0
132                 fi
133         done
134
135         DATOS=`cat "$BASE_DIR/umbrales.param" | grep "[0-9]*;$LINEA;[A-Z]*;[E,S];A"`
136
137         if [ "$OPT" == "" ] : then
138                 echo ""
139                 echo "No se han encontrado uUmbrales activos para la linea $LINEA."
140                 echo "Abortando ..."
141                 echo ""
142                 return 0
143         fi
144
145         printf "%3s      %2s  %1s   %1s    %10s%8s       %6s\n" "ID" "Ciudad" "Tipo" "Estado" "Usuario" "Fecha" "Hora"
146         OPCIONES="-1"
147         for i in $DATOS ; do
148                 ID=`echo "$i" | cut -d ';' -f 1`
149                 CIUDAD=`echo "$i" | cut -d ';' -f 3`
150                 TIPO=`echo "$i" | cut -d ';' -f 4`
151                 ESTADO=`echo "$i" | cut -d ';' -f 5`
152                 USUARIO=`echo "$i" | cut -d ';' -f 6`
153                 FECHA=`echo "$i" | cut -d ';' -f 7`
154                 HORA=`echo "$i" | cut -d ';' -f 8`
155                 printf "%3s      %2s      %1s      %1s      %10s      %8s      %6s\n" "$ID" "$CIUDAD" "$TIPO" "$ESTADO" "$USUARIO" "$FECHA" "$HORA"
156                 OPCIONES="$OPCIONES $ID"
157         done
158
159         preguntar "Cual desea borrar (-1 para salir)" "$OPCIONES" OPT
160
161         if [ "$OPT" = "-1" ] ; then
162                 return 0
163         fi
164
165         echo "Borrando el registro $OPT ..."
166         poner_estado_umbral "$OPT" "I"
167         echo ""
168         echo ""
169         echo "El Umbral fue eliminado con éxito"
170         echo ""
171 }
172
173 # No permito correr 2 instancias de AFICONF
174 if is_lock "aficonf" ; then
175         echo ""
176         echo "Aficonf está corriendo actualmente."
177         echo ""
178         exit 1
179 fi
180
181 lock "aficonf"
182
183 # Loop Principal
184 OPT="0"
185 while [ "$OPT" != "4" ] ; do 
186         menu OPT
187
188         case $OPT in
189                 "1") case_altas ;;
190                 "2") case_buscar ;;
191         esac
192 done
193
194 unlock "aficonf"
195