|
|
Setup - מדריכים
הכלת סט-פקודות על רשימת מתגים\נתבים מסוג Cisco / Enterasys (לגירסת הדפסה) |
סקריפט עבור SecureCRT
את הסקריפטים שלהלן, הרצים תחת סביבת SecureCRT , רשמתי למצבים
בהם מתעורר הצורך להרצת סט-פקודות על רשימה ארוכה של נתבים\מתגים.
הם מתבססים על קובץ טקסט פשוט המכיל רשימות הנתבים\מתגים, כך שניתן
לייצא את רשימת ההתקנים מתוכנות שונות ולהדביק אותם ישר לקובץ הטקסט.
לאלו שאינם מכירים את התוכנה המצוינת והפופולרית הזו (SecureCRT ),
מדובר באמולציית טרמינל עבור telnet / ssh וכו'. יתרונה בכך שהיא מאפשרת
לנהל רשימות מסודרות של התקנים רבים, לגשת אליהם בקלות ובפשטות,
וגולת הכותרת - ניתן לכתוב סקריפטים (vbs או js) עבורה.
התוכנה אמנם אינה חינמית (100 דולר) , אך ניתן להתרשם מגירסת-נסיון:
http://www.download.com/3000-2155_4-10684169.html
סקריפטים , הכלת סט-פקודות על רשימת מתגים\נתבים
הסקריפט מכיל קובץ ישום מסוג VBS, ונעזר ב2 קבצי טקסט ( כל הקבצים מצורפים
בקובץ ה ZIP שתבחתית המאמר ).
- קובץ ישום VBS (שינוי סיסמאות בהתאם)
- קובץ hosts.txt (רשימת המתגים\נתבים)
- קובץ Commands.txt (סט הפקודות המבוקש)
לשם הבהרה, ניקח לדוגמא ישום סט-פקודות על מתגי-סיסקו בעזרת הסקריפט:
כך נראה קובץ ה Cisco-Config.vbs:
# $language = "VBScript"
# $interface = "1.0"
Sub Main
'Open the hosts file
set fso = CreateObject("Scripting.FileSystemObject")
Set fileHosts = fso.OpenTextFile("hosts.txt",1,False)
dim passw, passw_en
passw = "password" '****Change the password****
passw_en = "enable_password" '****Change the enabled_password****
do until fileHosts.AtEndOfStream
NextHost = fileHosts.ReadLine
NextHost = Replace(NextHost," ","")
if (Len(NextHost) > 1 and InStr(NextHost,"'") = 0) then
crt.session.connect("/telnet " & NextHost)
crt.Screen.Synchronous = True
crt.Screen.Send VbCr
crt.Screen.WaitForString "assword:"
crt.Screen.Send passw & VbCr
crt.Screen.WaitForString ">"
crt.Screen.Send "en" & VbCr
crt.Screen.WaitForString "assword"
crt.Screen.Send passw_en & VbCr
crt.Screen.WaitForString "#"
Set fileCommands = fso.OpenTextFile("commands.txt",1,False)
do until fileCommands.AtEndOfStream
NextCommand = fileCommands.ReadLine
crt.Screen.Send NextCommand & VbCr
crt.Screen.WaitForString "#"
loop
fileCommands.Close
crt.Screen.Synchronous = False
crt.Sleep 2000
crt.session.disconnect()
end if
Loop
fileHosts.Close
MsgBox "Done!"
Set fileHosts = Nothing
Set fileCommands = Nothing
Set fso = Nothing
End Sub
|
בקובץ זה נצטרך להזין את פקודות המתגים (סיסמא-ראשונית במשתנה passw
וסיסמת enable במשתנה passw_en )
כך נראה קובץ ה hosts.txt
'ניתן להוסיף גרש בראשית השורה ואז הסקריפט ידלג על השורה הזו
10.100.1.1
10.100.1.2
10.100.1.3
10.100.1.4
10.100.1.5
10.100.1.6
|
כמובן לשנות לרשימת המתגים\נתבים בהתאם.
כפי שציינתי בקובץ, ניתן להוסיף גרש בראש כל שורה על מנת שהסקריפט
יתעלם משורה זו, ולא יגש למתג\נתב הספציפי.
כך נראה קובץ ה commands.txt
conf t
int fa0/1
desc test_name
|
כפי שניתן לראות, קובץ זה מכיל את סט הפקודות המבוקש. לשנות בהתאם.
הקובץ מכיל 2 ספריות, אחת עבור Cisco ואחת עבור Enterasys
עם קצת ידע וגישה ניתן לשנות טיפה כך שיעבוד עבור התקנים שונים.
מילות חיפוש: סקריפטים securecrt secure crt scripts for cisco enterasys תוכנת
(לגירסת הדפסה)
|
 לחץ כאן להורדת קובץ הדגמה |
| |
|
|
|
