From: Nicolás Dimov <ndimov@gmail.com>
Date: Tue, 19 Oct 2004 18:58:15 +0000 (+0000)
Subject: bueno, por ahora verifica que el formato del nombre de los archivos sean por lo menos... 
X-Git-Tag: svn_import~112
X-Git-Url: https://git.llucax.com/z.facultad/75.08/llamadas.git/commitdiff_plain/cf83448edec64610ad99f82f4a3969f1787c62d4?hp=cd298eb4af5e06e73979d9ea19465e4bdea269e1

bueno, por ahora verifica que el formato del nombre de los archivos sean por lo menos numeros, depues tendra que validar que sea una fecha, pero eso parece que se repite en el antifraude.pl... no se para que lo piden.. lo que no me acuerdo es donde va a estar el archivo de configuracion para leer los paths a donde voy a leer y mover los archivos... despues le pregunto a Alan que la tiene clara
---

diff --git a/inst/afimonio b/inst/afimonio
index e69de29..5adb156 100644
--- a/inst/afimonio
+++ b/inst/afimonio
@@ -0,0 +1,58 @@
+#!/bin/bash
+
+# Funciones auxiliares
+
+is_number(){
+	num=`echo $1 | sed 's/[0-9]*//g'`
+	if [ -n "$num" ]; then 
+		return 1
+	fi
+	return 0
+}
+
+
+# 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`
+
+	is_number "$date"
+	if [ "$?" -ne 0 ]; then
+		return 1
+	fi
+	is_number "$central"
+	if [ "$?" -ne 0 ]; then
+		return 1
+	fi
+	return 0		
+}
+	
+# busco el archivo de configuracion para recuperar las rutas hacia los archivos
+# que debo leer.
+
+DATADIR='/home/nico/sop/'
+sourcedir=$DATADIR'util/'
+aceptdir=$DATADIR'/llamadas/enproceso'
+rejectdir=$DATADIR'/llamadas/rechazadas'
+LOGDIR='/home/nico/sop/log/'
+logfile=$LOGDIR/afimonio.log
+
+while [ true ]; do 
+	for file in `ls $sourcedir` ; do
+		
+		checkfilename $file	
+		if [ "$?" -eq 0 ]; then
+			cp $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 
+			cp $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
+	sleep 2
+	done #for
+done #while 
+