Opened by pearl-man at 2005-11-07 11:15
User since
2005-07-25
65 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2005-07-25
65 Artikel
BenutzerIn
Wollte etwas mit Net::RawIP rumspielen, doch das Modul ist meiner Meinung nach noch nicht so ausgereift. Von der wirklich mehr als schlechten Doku mal abgesehen, habe ich mit dem Modul noch nichts sinnvolles schreiben können. Beispiel:
habe den TCP-Traffic mit tcpdump migesnifft:
10:10:38.783338 IP5 bad-hlen 16 (erhalte ich für alle 3 Pakete)
auch reagiert der angesprochenen Host nicht mit einem SYN-ACK-Paket, wie er sollte erhält er solch ein SYN-Paket.
jemand Erfahrung mit dem Modul?
Code: (dl
)
1
2
3
4
5
6
7
8
#!/usr/bin/perl -w
use strict;
use Net::RawIP;
$a = new Net::RawIP({ip => {saddr => '10.1.2.60', daddr =>'10.1.2.70'},
tcp => {source => 1234, dest => 80, syn => 1}});
$a->send(0, 3);
print "[FINISHED]\n";
habe den TCP-Traffic mit tcpdump migesnifft:
10:10:38.783338 IP5 bad-hlen 16 (erhalte ich für alle 3 Pakete)
auch reagiert der angesprochenen Host nicht mit einem SYN-ACK-Paket, wie er sollte erhält er solch ein SYN-Paket.
jemand Erfahrung mit dem Modul?