Port Scan
Publicado por Raffael Fasan 13/08/2007
[ Hits: 8.598 ]
Homepage: http://www.facebook.com/RaffaelFasan
Simples Scaneador de portas em PERL.
#Simples Scaneador de Portas em PEARL # #Raffael F. Santos (mobster) # #raffael (at) gmail (dot) com use Socket; $ARGC=@ARGV; if ($ARGC<2) { print "\nuso:$0 <host> <porta-inicial> <porta-final>\n\n"; exit; } $porta_i=$ARGV[1]; $porta_f=$ARGV[2]; for(;$porta_i <= $porta_f;$porta_i++) { $iaddr= inet_aton($ARGV[0]); $paddr= sockaddr_in($porta_i, $iaddr); $proto= getprotobyname('tcp'); socket(SOCK, AF_INET, SOCK_STREAM, $proto); if(connect(SOCK, $paddr)) { $servico=getservbyport($porta_i,'tcp'); print "Porta $porta_i --> o servico $servico esta aberto\n"; close(SOCK); } } print "\ntermino do scanner\n\n"; exit;
Testando multiplos servers a ataque DoS
Nenhum comentário foi encontrado.
Enviar mensagem ao usuário trabalhando com as opções do php.ini
Meu Fork do Plugin de Integração do CVS para o KDevelop
Compartilhando a tela do Computador no Celular via Deskreen
Como Configurar um Túnel SSH Reverso para Acessar Sua Máquina Local a Partir de uma Máquina Remota
Configuração para desligamento automatizado de Computadores em um Ambiente Comercial
Compartilhamento de Rede com samba em modo Público/Anônimo de forma simples, rápido e fácil
Cups: Mapear/listar todas as impressoras de outro Servidor CUPS de forma rápida e fácil
Criando uma VPC na AWS via CLI
Tem como instalar o gerenciador AMD Adrenalin no Ubuntu 24.04? (15)
Tenho dois Link's ( IP VÁLIDOS ), estou tentando fazer o failover... (0)
Pendrive não formata de jeito nenhum (4)