nouveau firmware : perte de DNS résolu ?

Invité

salut à tous, et merci pour les super conseils qu'on peut trouver sur le forum Merci

je voudrais savoir si le nouveau firmware règle comme promis le problème aléatoire de perte de DNS ?

sinon, j'aimerais me créer une commande dos pour relancer le DNS, qui se connecterait automatiquement par telnet sur la livebox (sans avoir à se connecter manuellement) qqun sait ?

rappel de la commande manuelle :

Telnet 192.168.1.1, User root Mot de Passe par Défaut 1234
dns
dnsr stop
dnsr start
exit
exit

Hein4

Fred.

Invité

Salut,

Je peux pas t'affirmer à 100% car je ne l'ai encore que peu testé, mais il me semble que le problème a disparu. Depuis le 288 j'ai une machine que j'ai connectée via wifi, je l'ai laissé en DHCP et pour le moment personne ne s'est plaint de problèmes d'accès au net. Hier soir j'ai donc également repassé ma machine perso en DHCP pour tester (vu que j'utilise beaucoup plus le net) et jusqu'à présent je n'ai pas rencontré de problème.

Si d'ici demain je n'ai rencontré aucun problème, je pense que ce sera suffisant pour dire que ça marche Bad

)

Pour le relancement automatique, j'avais essayé d'écrire un petit programme Perl, mais il ne fonctionne pas bien (quand les DNS sont ok, le stop/start passe, mais s'ils sont morts, le stop/start prend plus de temps (ou un truc comme ça) et ça déraille). Voilà le code, si ça t'intéresse :

Code:: #!/usr/bin/perl
#
# Relance le serveur DNS de la LiveBox via telnet
#

# Utilisation du module Expect
use strict;
use Expect;

# Paramètres Livebox
my $user = "root";
my $password = "1234";
my $host = "192.168.1.1";

# Connexion telnet à la LiveBox
my $telnet = Expect->spawn( "telnet $host" );

if( $telnet->expect( 5, "login: " ) ) {
print $telnet "$user\r";
}

if( $telnet->expect( 5, "assword: " ) ) {
print $telnet "$password\r";
}

my $prompt = ']$';
if( !$telnet->expect( 5, $prompt ) ) {
# Une erreur s'est produite, fermeture de la session
print "\nProblème de login sur $host, ".$telnet->exp_error()."\n";
$telnet->hard_close();
exit(1);
}
else {
# OK
print "\nConnexion sur $host acceptée\n";
}

# Exécution des commandes
print "Redémarrage du serveur DNS de la LiveBox...\n";

my @commandes = ("dns", "dnsr stop", "dnsr start");
foreach my $commande (@commandes) {
chomp( $commande );
print $telnet "$commande\r";

if( !$telnet->expect( 20, $prompt ) ) {
   # Une erreur s'est produite, fermeture de la session
   print "\nProblème a la commande $commande sur $host, ".$telnet->exp_error();
   $telnet->hard_close();
   exit(1);
}
}

# Fermeture de la session
print $telnet "exit\r";
$telnet->hard_close();
print "OK\n";

exit(0);

» perte de debit apres changement lb (resolu)