Monitorear la carpeta para nuevos archivos usando unix ksh shell script o perl script y desencadenar script perl

Question

He estado buscando y desbordando un poco y no he podido encontrar nada utilizable.

Necesito una secuencia de comandos que supervisa una carpeta pública y se desencadena en la creación de archivos nuevos y luego mueve los archivos a una ubicación privada.

Tengo una carpeta compartida de samba /exam/ple/ en Unix mapeada a X:\ en windows. En ciertas acciones, los archivos txt se escriben en el recurso compartido. Quiero secuestrar cualquier archivo de texto que aparezca en la carpeta y colocarlo en una carpeta privada /pri/vate en Unix. Después de mover ese archivo, quiero activar un script de Perl por separado.

EDITAR A la espera de ver un script de shell, si alguien tiene alguna idea ... algo que va a monitorear para los nuevos archivos y luego ejecutar algo como:

#!/bin/ksh 
mv -f /exam/ple/*.txt /pri/vate 

Answer 1

Comprobar incron. Parece hacer exactamente lo que necesitas.

Answer 2

Si entiendo bien, ¿quieres algo como esto?

#!/usr/bin/perl 

use strict; 
use warnings; 

use File::Copy 

my $poll_cycle = 5; 
my $dest_dir = "/pri/vate"; 

while (1) { 
    sleep $poll_cycle; 

    my $dirname = '/exam/ple'; 

    opendir my $dh, $dirname 
     or die "Can't open directory '$dirname' for reading: $!"; 

    my @files = readdir $dh; 
    closedir $dh; 

    if (grep(!/^[.][.]?$/, @files) > 0) { 
     print "Dir is not empty\n"; 

     foreach my $target (@files) { 
      # Move file 
      move("$dirname/$target", "$dest_dir/$target"); 

      # Trigger external Perl script 
      system('./my_script.pl'); 
    } 
} 

Answer 3

File :: ChangeNotify le permite controlar los archivos y directorios de los cambios.

https://metacpan.org/pod/File::ChangeNotify

Answer 4

Esto dará lugar a una buena cantidad de io - stat() llama y similares. Si desea una rápida notificación sin la sobrecarga de tiempo de ejecución (pero esfuerzo más adelantado), echar un vistazo a la FAM/dnotify: link text o link text

Answer 5

#!/bin/ksh 
while true 
do 
    for file in `ls /exam/ple/*.txt` 
    do 
      # mv -f /exam/ple/*.txt /pri/vate 
      # changed to 
      mv -f $file /pri/vate 

    done 
    sleep 30 
done 

Answer 6

$ python autocmd.py /exam/ple .txt,.html /pri/vate some_script.pl 

Ventajas:

• más fácil de instalar que incron debido a pyinotify es puro Python
• orientada a eventos - menos impacto que the perl script

autocmd.py:

#!/usr/bin/env python 
"""autocmd.py 

Adopted from autocompile.py [1] example. 

[1] http://git.dbzteam.org/pyinotify/tree/examples/autocompile.py 

Dependencies: 

Linux, Python, pyinotify 
""" 
import os, shutil, subprocess, sys 

import pyinotify 
from pyinotify import log 

class Handler(pyinotify.ProcessEvent): 
    def my_init(self, **kwargs): 
     self.__dict__.update(kwargs) 

    def process_IN_CLOSE_WRITE(self, event): 
     # file was closed, ready to move it 
     if event.dir or os.path.splitext(event.name)[1] not in self.extensions: 
      # directory or file with uninteresting extension 
      return # do nothing 

     try: 
      log.debug('==> moving %s' % event.name) 
      shutil.move(event.pathname, os.path.join(self.destdir, event.name)) 
      cmd = self.cmd + [event.name] 
      log.debug("==> calling %s in %s" % (cmd, self.destdir)) 
      subprocess.call(cmd, cwd=self.destdir) 
     except (IOError, OSError, shutil.Error), e: 
      log.error(e) 

    def process_default(self, event): 
     pass 


def mainloop(path, handler): 
    wm = pyinotify.WatchManager() 
    notifier = pyinotify.Notifier(wm, default_proc_fun=handler) 
    wm.add_watch(path, pyinotify.ALL_EVENTS, rec=True, auto_add=True) 
    log.debug('==> Start monitoring %s (type c^c to exit)' % path) 
    notifier.loop() 


if __name__ == '__main__': 
    if len(sys.argv) < 5: 
     print >> sys.stderr, "USAGE: %s dir ext[,ext].. destdir cmd [args].." % (
      os.path.basename(sys.argv[0]),) 
     sys.exit(2) 

    path = sys.argv[1] # dir to monitor 
    extensions = set(sys.argv[2].split(',')) 
    destdir = sys.argv[3] 
    cmd = sys.argv[4:] 

    log.setLevel(10) # verbose 

    # Blocks monitoring 
    mainloop(path, Handler(path=path, destdir=destdir, cmd=cmd, 
          extensions=extensions)) 

Answer 7

No consumo ksh pero aquí es como lo hago con sh. Estoy seguro de que se adapta fácilmente a ksh.

#!/bin/sh 
trap 'rm .newer' 0 
touch .newer 
while true; do 
    (($(find /exam/ple -maxdepth 1 -newer .newer -type f -name '*.txt' -print \ 
     -exec mv {} /pri/vate \; | wc -l))) && found-some.pl & 
    touch .newer 
    sleep 10 
done 

Answer 8

Llego tarde a la fiesta, lo sé, pero en interés de la integridad y de proporcionar información a los futuros visitantes;

#!/bin/ksh 
# Check a File path for any new files 
# And execute another script if any are found 

POLLPATH="/path/to/files" 
FILENAME="*.txt" # Or can be a proper filename without wildcards 
ACTION="executeScript.sh argument1 argument2" 
LOCKFILE=`basename $0`.lock 

# Make sure we're not running multiple instances of this script 
if [ -e /tmp/$LOCKFILE ] ; then 
    exit 0 
else 
    touch /tmp/$LOCKFILE 
fi 

# check the dir for the presence of our file 
# if it's there, do something, if not exit 

if [ -e $POLLPATH/$FILENAME ] ; then 
    exec $ACTION 
else 
    rm /tmp/$LOCKFILE 
    exit 0 
fi 

Run it from cron;

*/1 7-22/1 * * * /path/to/poll-script.sh >/dev/null 2>&1

Lo que quiere utilizar el fichero de bloqueo en el script posterior ($ ACCIÓN), y luego limpiarlo en la salida, sólo por lo que no tiene ningún proceso de apilado.