rss
Rechercher : dans
Par : Pertinence Date Nom d'utilisateur
Statut : Résolu

[PERL] Telecharger config cisco

Posté par KrSt, le mardi 20 mars 2007 à 12:29:27
Bonjour !
Je cherche en ce moment à telecharger les fichiers de configuration d'un routeur cisco par le biais d'un script perl et d'un serveur tftp.

Le pc et le routeur sont reliés en Ethernet.

Voici mon script actuellement (je découvre perl...)

#!/usr/bin/perl 

use Net::Telnet;
# IP du routeur
$ip = '192.168.0.252';
$telnet = new Net::Telnet (Output_log => 'log',Timeout=>10,Errmode=>'return',Binmode=>'true'­,Telnetmode=>1,Cmd_remove_mode => 1, Host => $ip);
# IP de l'hote TFTP
$iphote = '192.168.0.38';

print "\nConnect to $ip...\n";

if (defined ($telnet))
{
 	  $telnet->print('en');
	  # récupération de la configuration de base
	  $telnet->print('copy flash:config.text tftp://$iphote');
	  # récupération de la VLAN Database
	  $telnet->print('copy flash:vlan.dat tftp://$iphote/vlan.dat');
}


Le script ne fonctionne pas.. est ce que quelqu'un saurait me guider ?

Merci d'avance !
Répondre à KrSt  Signaler ce message aux modérateurs Aller au dernier message

1


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
lami20j, le mardi 20 mars 2007 à 12:44:39
Salut,

tu devrais peut être utiliser le module Net::TFTP lami20j
Répondre à lami20j

2


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
KrSt, le mardi 20 mars 2007 à 14:25:10
Merci pour ta réponse !

J'ai installé le module tftp, et j'ai réecrit mon script de cette façon:

#!/usr/bin/perl 

use Net::TFTP;
# IP du routeur
$ip = '192.168.0.252';
$localfile = 'C:\\Test\\config.txt';

print "\nConnect to $ip...\n";
{
	$tftp = Net::TFTP->new($ip, BlockSize => 1024);
	$tftp->get("flash:config.text", $localfile);
}


Par contre ça ne fonctionne pas. Le fichier "config.txt" est bien crée mais il est vide ...
Est ce que l'erreur vient du chemin que je lui indique ? Je ne sais acceder à la configuration que de cette façon, je ne vois pas quel autre "chemin" je pourrais lui donner en entrée :s

J'en arrive exactement au même point qu'avec mon script precedent.
Répondre à KrSt

3


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
lami20j, le mardi 20 mars 2007 à 14:39:18
je crois que tu dois utiliser l'ip de serveur et pas celui de routeur
lami20j
Répondre à lami20j

4


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
KrSt, le mardi 20 mars 2007 à 14:41:46
Ca fait exactement la meme chose avec l'IP du serveur.
D'ailleurs si je fais ça je ne lui donne à aucun moment l'IP du routeur dont je veux qu'il recupere la config ! :-s
Répondre à KrSt

5


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
lami20j, le mardi 20 mars 2007 à 14:57:37
Je vois que la syntaxe est

$tftp->get("remotefile", "localfile");

Si je comprends bien tu télécharge depuis win sur linux

localfile - ça sera le fichier qui se trouveras sur ton client (linux)
remotefile - c'est le fichier que tu dois télécharger
#!/usr/bin/perl 

use Net::TFTP;
# IP du routeur
$ip = '192.168.0.252';
$remotefile = 'C:\\Test\\config.txt';
$localfile = '/home/krst/config_win.txt';

print "\nConnect to $ip...\n";
{
	$tftp = Net::TFTP->new($ip, BlockSize => 1024);
	$tftp->get($remotefile, $localfile);
}


Je ne suis pas sûr pour le chemin avec C:\\....
lami20j
Répondre à lami20j

6


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
KrSt, le mardi 20 mars 2007 à 15:05:47
Pas tout à fait, je télécharge depuis linux sur win.

En fait, je souhaite aller récupérer le fichier de configuration d'un routeur cisco directement dans le routeur !

D'habitude je me connecte en telnet au routeur et utilise la commande "copy flash:config.text tftp://x.x.x.x"

Je voudrais faire ça à distance en executant un script Perl.

Là je suis en train de me renseigner sur la librairie SNMP
http://search.cpan.org/~dtown/Net-SNMP-5.2.0/lib/Net/SNMP.pm­
Répondre à KrSt

7


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
lami20j, le mardi 20 mars 2007 à 15:27:06
Regarde plutôt Net::Telnet::Cisco
Voir plus bas Backup via TFTP

librairie SNMP
Pour l'info il ne s'agit pas d'une librairie mais d'un module Perl. lami20j
Répondre à lami20j

8


  • 1
    Ce message vous semble utile, votez !
  • Ce message ne vous semble pas utile, votez !
  • Signaler ce message aux modérateurs
KrSt, le mardi 20 mars 2007 à 15:33:13
Oui ! Je pense qu'avec celui là ça devrait aller !
En plus de ça j'utilise pour mes tests un routeur cisco neuf sur auquel je me suis contenté de donner une adresse ip (aucun mot de passe de définit) et je viens de m'apercevoir que si aucun mot de passe n'est defini telnet coupe la connexion !

Donc ça devrait aller mieux ...
Merci beaucoup pour ton aide en tout cas ;)

A voir :
Regarde plutôt Net::Telnet::Cisco
Voir plus bas Backup via TFTP
Répondre à KrSt

9


  • Ce message vous semble utile, votez !
  • Signaler ce message aux modérateurs
 aakao, le mardi 11 mars 2008 à 14:35:14
lut a tous, je voudrais flasher mon PA authomatiquement en telnet, j'ai deja un srcipt qui test si des nouvelles version d'OS sont dispo sur mon serveur, mais je ne connais pas les commande pour flasher authomatiquement, si qqn peut me renseigner merci d'avance.
Répondre à aakao
Discussions pertinentes trouvées dans le forum
02/09 14h56Configuration Cisco 2811 pour l'ADSL2
31/08 19h32Configuration CISCO42
26/06 00h13Configuration cisco2
14/05 17h12Configuration cisco as53500
Plus de discussions sur « [PERL] Telecharger config cisco »
Logiciels pertinents trouvés dans les téléchargements
Télécharger Grabit 1.7.1 ßetaGrabit - Grabit est un grabbeur de news, c'est-à-dire un logiciel permettant de télécharger des vidéos, sons, images et applications...Catégorie: Téléchargement
Licence: Freeware/gratuit
Télécharger VirtualBox 1.6.2VirtualBox - VirtualBox permet d'émuler complètement un PC. C'est comme si vous aviez un second PC dans une simple fenêtre. C'est utile...Catégorie: Système
Licence: Open Source
Télécharger ActivePerl 5.6.1.629ActivePerl - ActivePerl est un interpréteur Perl gratuit et puissant pour plates formes Microsoft Windows. Il nécessite "Microsoft...Catégorie: Perl
Licence: Open Source
Télécharger Aide-mémoire 2.3Aide-mémoire - Ce logiciel permet de coller des aides mémoires (post-it) sur votre bureau. Son but est simple, éviter de décorer votre...Catégorie: Organisation
Licence: Freeware/gratuit
Plus de logiciels gratuits sur « [PERL] Telecharger config cisco »