El(On) 17/10/2003 (17:01:54), Folken escribi�(wrote): > Lo que pasa es que no logro los datos de una manera manejable... > entonces prob� directo con tcpdump... y logro ver las cuentas, pero un > grep no anda porque por la forma del paquete la cuenta queda mitad en > una linea y mitad en otra. Un grep USER no anda. > Y no encuentro otra manera de hacerlo salvo algun programa de los que > son orientados a hacking. > Ser�a f�cil, pero son demasiadas cuentas. Y debo determinar cuales de > las 500 hacen uso de pop en vez de exchange.
Yo lo har�a con Perl y tethereal (versi�n texto de Ethereal) as�:
./atrapapop.pl > listadecuentaspop.txt
donde "atrapapop.pl" es �ste script Perl "quick and dirty" que hice
reci�n :)
#!/usr/bin/perl
use warnings;
use strict;
my $marca = 0;
my $cuentapop;
open(SALIDA, "tethereal -V -i eth0 port 110 |");
for (;;) {
while (<SALIDA>) {
if ($marca == 1) {
$_ =~ /Request Arg: (.*)$/;
$cuentapop = $1;
print "$cuentapop\n";
$marca = 0;
last;
};
if ($_ =~ /Request: user/) {
$marca = 1;
}
}
sleep 5;
seek(SALIDA, 0, 1);
}
close SALIDA;
Hice algunas pruebas y "parece" andar bien. Tal vez te sirva.
Saludos.
--
_____________________________________________________________
_____ ____________
Marcelo Ramos | \/ __ |
Debian Sid GNU/Linux 2.6.0-test7 | |_/ /
Socio UYLUG Nro 125 | \
Linux registered user #118109 |____|\/|____|\______\
pgp00000.pgp
Description: PGP signature
