Verificar conectividade com IP e Porta

jqueiroz disse:

telnet ip porta

p.ex: telnet 192.168.1.1 25 -> tenta conectar na porta 25 (SMTP).

jqueiroz disse:

Se ele chega a pedir usuário é pq conectou [sinal, aliás, que vc está conectando no serviço telnet --- vc tem que especificar a porta que quer conectar!!!].

Uma vez conectado, use "CTRL-Ç" ou "CTRL-]" para voltar ao prompt "telnet>", daí é só digitar "quit" para encerrar a conexão...

jqueiroz disse:

Ah, você está fazendo isso em programação??? Pq não escreve um programa em Perl ou outra linguagem de programação que domine?

É só mandar abrir um socket para o destino/porta desejado, caso a operação tenha sucesso você fecha o socket e termina o programa com código de retorno zero, ou -1 caso contrário...

#!/bin/bash

# testa uma conexão tcp

addr=141.122.63.10

port=3001



perl <<PERL

use Socket;

socket(SOCK,PF_INET,SOCK_STREAM,getprotobyname('tcp'));

\$sin = sockaddr_in($port, inet_aton("$addr&quot);



if( connect(SOCK,\$sin) ) { 

    close(SOCK);

    exit 0;

} else {

    exit -1;

}

PERL



if [ $? == 0 ] ; then 

    echo funcionou

else

    echo falhou

fi

jqueiroz disse:

Bom, você pode contornar isso usando expect.

O que vai te obrigar a instalar um pacote, criar o script expect, testar, etc.

Ou pode criar um script perl de 4 ou 5 linhas que pode até ficar embutido no seu código shell... algo como:

#!/bin/bash

# testa uma conexão tcp

addr=141.122.63.10

port=3001

 

perl <<PERL

use Socket;

socket(SOCK,PF_INET,SOCK_STREAM,getprotobyname('tcp'));

\$sin = sockaddr_in($port, inet_aton("$addr&quot);

 

if( connect(SOCK,\$sin) ) { 

    close(SOCK);

    exit 0;

} else {

    exit -1;

}

PERL

 

if [ $? == 0 ] ; then 

    echo funcionou

else

    echo falhou

fi