empiezan a tomar forma los paths

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

diff --git a/inst/afimonio b/inst/afimonio
index e69de29bb2d1d6434b8b29ae775ad8c2e48c5391..88a6de69fe60c799b675cfa38bdc7574b85f1d14 100644 (file)
--- a/inst/afimonio
+++ b/inst/afimonio
@@ -0,0 +1,81 @@
+#!/bin/bash
+# uso las funciones de util.sh
+. util.sh
+
+
+# filtra el nombre del archivo pasado por parametro sacandole todos los
+# caracteres que no sean numeros 
+checkfilename(){
+       date=`echo $1 | cut -d "." -f 1`
+       central=`echo $1 | cut -d "." -f 2`
+
+       validar_solo_numeros "$date"
+       if [ "$?" -ne 0 ]; then
+               return 1
+       fi
+       mes=${date:4:2}
+       validar_rango "$mes" "1" "12"
+       if [ "$?" -ne 0 ]; then
+               return 1
+       fi
+       dia=${date:6:2}
+       validar_rango "$dia" "1" "31" 
+       if [ "$?" -ne 0 ]; then
+               return 1
+       fi
+       hora=${date:8:2}
+       validar_rango "$hora" "0" "23"
+       if [ "$?" -ne 0 ]; then
+               return 1
+       fi
+       min=${date:10:2}
+       validar_rango "$min" "0" "59"
+       if [ "$?" -ne 0 ]; then
+               return 1
+       fi
+       validar_solo_numeros "$central"
+       if [ "$?" -ne 0 ]; then
+               return 1
+       fi
+       return 0                
+}
+
+#--------------------MAIN SCRIPT----------------------
+# busco el archivo de configuracion para recuperar las rutas hacia los archivos
+# que debo leer.
+
+aficonf=~/sop/conf/afinstal.conf
+# Recupero las rutas a todos los directorios y archivos que necesito
+
+DATADIR=`grep -n "DATADIR" $aficonf | grep 15 | sed s?.*DATADIR\ =\ ??`
+SOURCEDIR="$DATADIR/aprocesar/"
+ACEPTDIR="$DATADIR/enproceso/"
+REJECTDIR="$DATADIR/rechazadas/"
+BINDIR=`grep -n "BINDIR" $aficonf | grep 11 | sed s?.*BINDIR\ =\ ??`
+LOGDIR=`grep -n "LOGDIR" $aficonf | grep 32 | sed s?.*LOGDIR\ =\ ??`
+LOGNAME=`grep -n "LOGFILE" $aficonf | grep 33 | sed s?.*LOGFILE\ =\ ??`
+logfile=$LOGDIR/$LOGNAME
+echo $logfile
+# Comienza el ciclo infinito que mueve los archivos
+while [ true ]; do 
+       for file in `ls $SOURCEDIR` ; do
+               checkfilename $file     
+               if [ "$?" -eq 0 ]; then
+                       mv $SOURCEDIR$file $ACEPTDIR #cambiar copiar por mover
+                       fecha=$(date +%d/%m/%Y-%H:%M)
+                       echo "$fecha $USER afimonio:\"Se detecta archivo de llamadas $file\"" >> $logfile
+               else 
+                       mv $SOURCEDIR$file $REJECTDIR #cambiar copiar por mover
+                       fecha=$(date +%d/%m/%Y-%H:%M)
+                       echo "$fecha $USER afimonio:\"Se rechaza el  archivo $file\"" >> $logfile
+               fi
+       done #for
+       # me fijo si el antifraude esta corriendo y si no lo esta lo arranco
+       if ! is_lock "antifraude.pl" ; then
+               echo "DISPARANDO ANTIFRAUDE"
+               $BINDIR/antifraude.pl
+       fi
+       break
+       # sleep 60
+done #while 
+