Boa tarde,
Tenho um servidor com dois links, um adsl e um ip fixo,
A rota default dele é pelo IP fixo, possuo algumas regras de roteamento para jogar o tráfego web para o adsl,. Estou tendo probelmas quando o velox cai, pois o script id-velox.pl ele faz um teste de ping em um host da internet, se falhar, ele aciona a autenticação. COmo a rota default é o IP, ele nunca falha com isso não consegue autenticar.
Então, gostaria de alterar o script de teste de ping para que ele use a interface onde está conectado o adsl ao invés da rota default.
Abaixo segue a função do teste de ping, qual a modificação que faço para atender os meus objetivos ??
sub ping($)
{
$x=0;
foreach (@HOSTS)
{
if (($_[0] eq 'rapido') && ($x>0))
{ return 0; }
$c = new IO::Socket::INET ( PeerAddr => "$_" , PeerPort => $HOSTPORTA, Proto => 'tcp', Timeout => $HOSTTIMEOUT);
if ($c)
{
$c->close();
return 1;
}
$x++;
}
}
Abraços.