OK, guys. Let me share with you my script of TCL to make a lot of test over a CE router.
Thanks to all for the information. Router#Tclsh tftp://xxx.xxx.xxx.xxx/anything.tcl *Next-hop* *interface ** ipaddress* ** Variable **Next-hop* ** Variable interface* ** Variable ipaddress **BOF **set nexthop [lindex $argv 0] set interface [lindex $argv 1] set ipaddress [lindex $argv 2] exec "terminal length 0" puts "############################################" puts "##### SHOW VERSION ####" puts "############################################" puts [show version] puts "############################################" puts "##### SHOW INVENTORY ####" puts "############################################" puts [show inventory] puts "############################################" puts "##### SHOW INTERFACE ####" puts "############################################" puts [show interface] puts "############################################" puts "##### SHOW PROCESSES CPU HISTORY ####" puts "############################################" puts [show processes cpu history] puts "############################################" puts "##### SHOW PROCESSES CPU SORTED 5 MIN. ####" puts "############################################" puts [show processes cpu sorted | e 0.00% 0.00% 0.00%] puts "############################################" puts "##### SHOW RUNNING-CONFIG ####" puts "############################################" puts [show running-config] puts "############################################" puts "##### SHOW IP ROUTE ####" puts "############################################" puts [show ip route] puts "############################################" puts "##### SHOW IP BGP ####" puts "############################################" puts [show ip bgp] puts "############################################" puts "##### SHOW IP BGP SUMMARY ####" puts "############################################" puts [show ip bgp summary] puts "############################################\n" puts "##### SHOW IP BGP ADVERTISED-ROUTES ####\n" puts "############################################\n" puts [show ip bgp neighbor $nexthop advertised-route] puts "##################################################################################\n" puts "##################################################################################\n" puts "############################################\n" puts "##### CONFIGURANDO CALIDADES DE PRUEBA ####\n" puts "############################################\n" puts [conf t] puts [class-map match-any rpvm_voz_P] puts [match ip dscp 24] puts [match ip dscp 40] puts [match ip dscp 46] puts [class-map match-any rpvm_video_P] puts [match ip dscp 34] puts [match ip dscp 36] puts [match ip dscp 38] puts [class-map match-any rpvm_datos_criticos_P] puts [match ip dscp 16] puts [match ip dscp 26] puts [match ip dscp 28] puts [match ip dscp 30] puts [class-map match-any rpvm_business_P] puts [match ip dscp 8] puts [match ip dscp 18] puts [match ip dscp 20] puts [match ip dscp 22] puts [exit] puts [policy-map prueba] puts [class rpvm_voz_P] puts [class rpvm_video_P] puts [class rpvm_datos_criticos_P] puts [class rpvm_business_P] puts [exit] puts [interface $interface] puts [service-policy input prueba] puts [exit] puts [exit] puts "############################################" puts "##### PING CON SWEEP ####" puts "############################################" typeahead "$ipaddress\n\n\n\n\y\n\n\n\n\n\n\V\n\n\y\n100\n1500\n100\n" puts [ping ip] puts "############################################" puts "##### PING 80 PAQUETES CON TOS 96 ####" puts "############################################" typeahead "$ipaddress\n80\n\n\n\y\n\n96\n\n\n\n\n\n\n" puts [ping ip] typeahead "\n" puts "############################################" puts "##### SHOW POLICY-MAP INTERFACE INPUT ####" puts "############################################" puts [show policy-map interface $interface input] puts "############################################" puts "##### FIN ####" puts "############################################" tclquit * *EOF *** I know, there are sure are plenty of script better of this.. But i think, it's good enough for me. See Ya Andres P. Spano ---------------------- NO STREES ECO ATTITUD :D _______________________________________________ cisco-nsp mailing list [email protected] https://puck.nether.net/mailman/listinfo/cisco-nsp archive at http://puck.nether.net/pipermail/cisco-nsp/
