[Date Prev][Date Next] [Thread Prev][Thread Next] [Date Index] [Thread Index]

Re: Una webcam espía



31 wrote:
> Alguno de vosotros ha montado un sistema de seguridad-espía con una
> webcam.
> La historia es que tiene que grabar toda la noche y la webcam esta a
> 20-30 metros del ordenador. ¿Existe forma de hacer algo económico y que
> de algun resultado?
> Nos han entrado a robar por 3º vez....:(((((((

Hola borxa,
El año pasado tuve que hacer algo muy semejante para una "installation
party"; la idea era que los que no pudieran asistir al evento tuvieran
una imagen actualizada que pudieran consultar en la web, pero al mismo
tiempo guardar un resumen de todo el evento para después hacer una
película. El programa perl que hice es bastante simple y te lo pongo
aquí para poder comentarlo:

##################################################################
#!/usr/bin/perl
($secs, $mins, $hour, $day, $mo, $year) = localtime (time);
while (1){
  ($secs, $mins, $hour, $day, $mo, $year) = localtime (time);
  system('/usr/bin/qcam -q 75 -J/var/www/lip-image.jpg');
  $i++;
  unless ($i%4) {
      $dir = "archive$hour";
      $file = "$dir/image$hour:$mins:$secs.jpg";
      system('mkdir '.$dir) unless (-d $dir);
      system('cp /var/www/lip-image.jpg '.$file);
  }
  sleep 1;
}
#################################################################
(copialo en un fichero ejecutable)
Lo que hace el programa es capturar una imagen cada segundo
(aproximadamente, pues ademas de "sleep 1" que espera un segundo, hay
que sumar el tiempo de ejecución de los otros comandos). Esta imagen se
coloca en /var/www/lip-image.jpg para que quede disponible en la web.
Cada cuarta imagen (puedes controlar este parametro cambiando el $i%4)
se graba en un directorio con nombre archiveXX, donde XX es la hora, y
con un nombre "imageHH:MM:SS.jpg, donde HH, MM, SS son la hora, minutos
y segundos. Cada hora se crea un nuevo directorio.
Con esos valores, en un pentium A6 166MHz, quedaron grabadas imagenes
cada 3 segundos; cada imagen ocupó unos 10 kbytes y para cada hora
necesité unos 10 Mbytes de espacio en disco. Lo mejor es que
experimentes y veas que valores necesitas y que opciones para el "qcam"
o el programa de captura que uses.

Saludos,
Jaime

P.S. Si pones las imagenes al vivo en la red, cuentanos para ayudarte
con tu vigilancia. Y si atrapas al ladrón por favor cuentanos y
muestranos la evidencia; ya me estoy imaginando una noticia espectacular
en Barrapunto: "Debian ayudó a descubrir a los ladrones"!



Reply to: