Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

XenServer 6.2 - Kommerzielle Backup Software für die Sicherung der Gäste gesucht

Frage Virtualisierung Xenserver

Mitglied: TiTux

TiTux (Level 2) - Jetzt verbinden

10.04.2012 um 14:23 Uhr, 13449 Aufrufe, 7 Kommentare, 1 Danke

Hi,

wir benutzen hier XenServer in der Version 6.2

Bis jetzt wurden die Gastsysteme (alles Windows Gäste) einfach über die Export Funktion vom XenCenter gesichert.
Nun sind wir auf der Suche nach einer komfortableren Lösung, die auch Hot Backups machen kann, also ein Backup des Gasts erstellen,
ohne diesen erst runterfahren zu müssen. Wir haben mehrere XenServer in Betrieb und dementsprechend auch viele VM Gäste zu sichern.

Wer hat hier Erfahrungen sammeln können und kann mir einen Tipp geben? Scriptlösungen suchen wir nicht, damit funktioniert es zwar
prinzipiell, aber bei Problemen soll jeder damit zurechtkommen und deshalb hätte man auch gerne kommerziellen Support hierfür.

Danke und Grüße

TiTux
Mitglied: Dani
10.04.2012 um 19:06 Uhr
Moin,
welchen Storagehersteller habt ihr im Background am Laufen?
Ansonsten schau mal hier.


Grüße,
Dani
Bitte warten ..
Mitglied: 106150
11.04.2012 um 19:35 Uhr
Gude,

wir machen das mit folgendem Script...
Ich muss dabei sagen das dieses Script nicht von uns ist und ich noch auf der Suche der Originalquelle bin da die entsprechende Person ein danke verdient hat.

Edit: Originalquelle: http://community.spiceworks.com/scripts/show/161-xenserver-live-backup

Das ganze wird in eine vbs gepackt, entsprechende Punkte sind natürlich zu bearbeiten

01.
'User configurable variables 
02.
'Server names must be seperated by a comma.  Names are case sensitive so you have to get the 
03.
'name of your server PERFECT! 
04.
strServers = "ServerName,ServerName2" 
05.
strUser = "root" 
06.
strpw = "mypassword" 
07.
strXenServer = "XenServer IP Address or hostname" 
08.
strBackupPath = "d:\xsbackups" 
09.
'Make sure to use the short file name format 
10.
strXenCenterPath = "C:\Progra~1\Citrix\XenCenter\" 
11.
'Set to TRUE if you want to send a status email 
12.
binSendEmail = TRUE 
13.
strSMTPFrom = "XSLiveBackup@mycompany.com" 
14.
strSMTPTo = "spiceworkshelpdesk@mycompany.com" 
15.
strSMTPRelay = "smtp relay IP address or host name" 
16.
'Number of days to keep the logs and backup files 
17.
numKeepLogs = 10 
18.
numKeepBackups = 5 
19.
 
20.
 
21.
 
22.
'************************************************************************************************ 
23.
'Do not edit beyond this point 
24.
'************************************************************************************************ 
25.
Dim errStatus, strLogName 
26.
Dim fs, logFile 
27.
If Right(strBackupPath, 1) = "\" Then 
28.
	strBackupPath = Left(strBackupPath, Len(strBackupPath) - 1) 
29.
End If 
30.
 
31.
If Right(strXenCenterPath, 1) <> "\" Then 
32.
	strXenCenterPath = strXenCenterPath & "\" 
33.
End If 
34.
 
35.
strRunXE = strXenCenterPath & "xe.exe -s " & strXenServer & " -u " & strUser & " -pw " & strpw & " " 
36.
arrBackups = Split(strServers, ",") 
37.
const ForAppending = 8 
38.
errStatus = 0 
39.
 
40.
'Set some global objects 
41.
Set WshShell = CreateObject ("Wscript.shell") 
42.
 
43.
'Create the log file and introduction information into log file 
44.
Call logSetup 
45.
'Check if XenCenter Path is correct 
46.
If fs.FileExists(strXenCenterPath & "xe.exe") Then 
47.
	'Loop through all selected servers and back them up 
48.
	For iServers = 0 to UBound(arrBackups) 
49.
		Call backupVM(Trim(arrBackups(iServers))) 
50.
	Next 
51.
Else 
52.
	writeLog("XenCenter not found, aborting backup!") 
53.
	errStatus = UBound(arrBackups) + 2 
54.
End If 
55.
 
56.
'Finish up the log file 
57.
Call logClose 
58.
'Send status message via email 
59.
Call sendMsg 
60.
 
61.
'Script completed -- REM line below out if you want to run this in a scheduled task 
62.
wscript.echo "Done!" 
63.
 
64.
 
65.
 
66.
Sub backupVM(strServer) 
67.
	'First, check that the VM exists, and get UUID and name-label information.  It is possible to  
68.
	'name a snapshot as a backup source, but this script does not allow it, so checking for that too 
69.
	Set objExec = WSHshell.Exec(strRunXE & "vm-list params=uuid,name-label,is-a-snapshot name-label=" & strServer) 
70.
	strStatus = "Not Found" 
71.
	Do While Not objExec.StdOut.AtEndOfStream 
72.
		strStatus = "Found" 
73.
		strUUID = stripValue(objExec.StdOut.ReadLine()) 
74.
		strVM = stripValue(objExec.StdOut.ReadLine()) 
75.
		strSnapShot = stripValue(objExec.StdOut.ReadLine()) 
76.
		strTemp = objExec.StdOut.ReadLine() 
77.
		strTemp = objExec.StdOut.ReadLine() 
78.
	 
79.
		If strSnapShot = "false" and strVM <> "Control domain on host" Then 
80.
			strStatus = "Good" 
81.
		End If 
82.
	Loop 
83.
	 
84.
	If strStatus = "Not Found" Then 
85.
		strResult = SetErrorStatus("Add") 
86.
		writeLog("No VM by that name: " & strServer) 
87.
		Exit Sub 
88.
	ElseIf strStatus = "Found" Then 
89.
		strResult = SetErrorStatus("Add") 
90.
		writeLog("VM is a Snapshot or Template, no backup performed: " & strServer) 
91.
		Exit Sub 
92.
	Else 
93.
		writeLog("VM Found: " & strServer) 
94.
	End If 
95.
 
96.
	'Remove old backups 
97.
	writeLog("Cleaning up old backup files") 
98.
	Set oFolder = fs.GetFolder(strBackupPath) 
99.
	Set oAllFiles = oFolder.Files 
100.
	numDM = 0 
101.
	For Each oFile in oAllFiles 
102.
		If Left(oFile.Name, 7) = "Backup-" and DateDiff("d", NOW, oFile.DateLastModified) > numKeepBackups Then 
103.
			numDM = numDM + 1 
104.
			ReDim Preserve arrFileName(numDM) 
105.
			arrFileName(numDM) = oFile.Name 
106.
			fs.DeleteFile oFile.Path 
107.
		End If 
108.
	Next 
109.
	writeLog(numDM & " files deleted") 
110.
	For x = 1 to numDM 
111.
		writeLog("     " & arrFileName(x)) 
112.
	Next 
113.
	 
114.
	'Snapshot the VM 
115.
	writeLog("Snapshoting server: " & strServer) 
116.
	Set objExec = WSHshell.Exec(strRunXE & "vm-snapshot new-name-label=" & strServer & "-XenServer-Live-Backup uuid=" & strUUID) 
117.
	strSSID = objExec.StdOut.ReadLine() 
118.
	strResult = strSSID 
119.
	Do While Not objExec.StdOut.AtEndOfStream 
120.
		strTemp = objExec.StdOut.ReadLine() 
121.
		writeLog(strTemp) 
122.
		strResult = strResult & ":" & strTemp 
123.
	Loop 
124.
	If InStr(UCase(strResult), "ERROR") Then 
125.
		writeLog("Error creating snapshot, see above") 
126.
		Exit Sub 
127.
	End If 
128.
	 
129.
	'Set snapshot to NOT be a template 
130.
	writeLog("Setting snapshot status...") 
131.
	Set objExec = WSHshell.Exec(strRunXE & "template-param-set is-a-template=false uuid=" & strSSID) 
132.
	Do While Not objExec.StdOut.AtEndOfStream 
133.
		writeLog(objExec.StdOut.ReadLine()) 
134.
	Loop 
135.
		 
136.
	'Export to backup destination 
137.
	strTime = Replace(Now(), "/", "-") 
138.
	strTime = Replace(strTime, " ", "-") 
139.
	strTime = Replace(strTime, ":", "-") 
140.
	strName = "Backup-" & strServer & "-" & strTime & ".xva" 
141.
	writeLog("Backup filename: " & strName) 
142.
	Set objExec = WSHshell.Exec(strRunXE & "vm-export vm=" & strSSID & " filename=" & strBackupPath & "\" & strName) 
143.
	strResult = "" 
144.
	Do While Not objExec.StdOut.AtEndOfStream 
145.
		strTemp = objExec.StdOut.ReadLine() 
146.
		writeLog(strTemp) 
147.
		strResult = strResult & ":" & strTemp 
148.
	Loop 
149.
	If InStr(UCase(strResult), "SUCCEEDED") = 0 Then 
150.
		strResult = SetErrorStatus("Add") 
151.
		writeLog("**************   Error during backup of " & strServer & " **************") 
152.
	End If 
153.
	 
154.
	'Remove the snapshot 
155.
	Set objExec = WSHshell.Exec(strRunXE & "vm-uninstall uuid=" & strSSID & " force=true") 
156.
	strResult = "" 
157.
	Do While Not objExec.StdOut.AtEndOfStream 
158.
		strTemp = objExec.StdOut.ReadLine() 
159.
		writeLog(strTemp) 
160.
		strResult = strResult & " " & strTemp 
161.
	Loop 
162.
	If InStr(strResult, "All objects destroyed") = 0 Then 
163.
		strResult = SetErrorStatus("Add") 
164.
		writeLog("**************Error deleting snapshot for " & strServer & " **************") 
165.
	End If 
166.
End Sub 
167.
 
168.
 
169.
Function stripValue(strValue) 
170.
	arrStrip = Split(strValue, ":") 
171.
	stripValue = Trim(arrStrip(1)) 
172.
End Function 
173.
 
174.
 
175.
Sub writeLog(strText) 
176.
	logFile.WriteLine Now() & ":  " & strText 
177.
End Sub 
178.
 
179.
 
180.
Function SetErrorStatus(strTask) 
181.
	If strTask = "Add" Then 
182.
		errStatus = errStatus + 1 
183.
		SetErrorStatus = errStatus 
184.
	Else 
185.
		numServers = UBound(arrBackups) + 1 
186.
		If errStatus = 0 Then 
187.
			SetErrorStatus = "Success" 
188.
		ElseIf errStatus >= numServers Then 
189.
			SetErrorStatus = "Failed" 
190.
		Else 
191.
			SetErrorStatus = "Partial Failure" 
192.
		End If 
193.
	End If 
194.
End Function 
195.
 
196.
 
197.
Sub logSetup 
198.
	Set fs = CreateObject("Scripting.FileSystemObject") 
199.
 
200.
	If Not fs.FolderExists(strBackupPath) Then 
201.
		fs.CreateFolder(strBackupPath) 
202.
	End If 
203.
	 
204.
	Set oFolder = fs.GetFolder(strBackupPath) 
205.
	Set oAllFiles = oFolder.Files 
206.
	For Each oFile in oAllFiles 
207.
		If Left(oFile.Name, 16) = "XenServerBackups" and DateDiff("d", NOW, oFile.DateLastModified) > numKeepLogs Then 
208.
			fs.DeleteFile oFile.Path 
209.
		End If 
210.
	Next 
211.
 
212.
	strLogName = "XenServerBackups-" & Replace(Date, "/", "-") & ".log" 
213.
	Set logFile = fs.OpenTextFile (strBackupPath & "\" & strLogName, ForAppending, True)	 
214.
	 
215.
	logFile.WriteLine "==========================================================================================================" 
216.
	logFile.WriteLine "Backup for:  " & Now() 
217.
	logFile.WriteLine "==========================================================================================================" 
218.
	For x = 0 to UBound(arrBackups) 
219.
		If x = 0 Then 
220.
			logFile.WriteLine "Servers targeted for backup: " & arrBackups(x) 
221.
		Else 
222.
			logFile.WriteLine "                             " & arrBackups(x) 
223.
		End If 
224.
	Next 
225.
	logFile.WriteLine "Backup User                : " & strUser  
226.
	logFile.WriteLine "Password                   : *********"  
227.
	logFile.WriteLine "Xen Server                 : " & strXenServer 
228.
	logFile.WriteLine "Backup Destination         : " & strBackupPath 
229.
	logFile.WriteLine 
230.
End Sub 
231.
 
232.
 
233.
Sub logClose 
234.
	'Finish up the log file 
235.
	logFile.WriteLine 
236.
	strStatus = SetErrorStatus("Read") 
237.
	logFile.WriteLine "Backup completed on " & Now() 
238.
	logFile.WriteLine "Backup Status: " & strStatus 
239.
	logFile.WriteLine 
240.
	logFile.WriteLine 
241.
	logFile.Close 
242.
End Sub 
243.
 
244.
 
245.
Sub sendMsg 
246.
	'Send status message via email 
247.
	If binSendEmail = False Then 
248.
		Exit Sub 
249.
	End If 
250.
	 
251.
	Set oMessage = CreateObject("CDO.Message") 
252.
	oMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2  
253.
	oMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = strSMTPRelay 
254.
	oMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25  
255.
	oMessage.Configuration.Fields.Update 
256.
	 
257.
	strStatus = SetErrorStatus("Read") 
258.
	oMessage.Subject = "XenServer Backup Completed. Status: " & strStatus & ".  Date: " & Now() 
259.
	oMessage.From = strSMTPFrom 
260.
	oMessage.To = strSMTPTo 
261.
	strText = vbCRLF & "XenServer Backup Completed. " & vbCRLF & vbCRLF 
262.
	strText = strText & "Backup User                : " & strUser & vbCRLF 
263.
	strText = strText & "Password                   : *********" & vbCRLF 
264.
	strText = strText & "Xen Server                 : " & strXenServer & vbCRLF 
265.
	strText = strText & "Backup Destination         : " & strBackupPath & vbCRLF 
266.
	strText = strText & vbCRLF 
267.
		strText = strText & "Backup Status              : " & strStatus 
268.
	oMessage.TextBody = strText 
269.
	oMessage.AddAttachment strBackupPath & "\" & strLogName 
270.
	oMessage.Send 
271.
End Sub

Gruß
Bitte warten ..
Mitglied: TiTux
15.04.2012 um 19:16 Uhr
Hi,

als Backup werden derzeit MSAs von HP genutzt, bald auch SAN Maschinen von Synology.

Wir werden jetzt SEP mal testen, hier kann man sich auch eine 30 Tage Demo installieren, dann testen wir mal.

http://www.sep.de/de/produkte/virtual-machine-backup/citrix-xen/

Danke und Grüße

TiTux
Bitte warten ..
Mitglied: MMMNB82
16.04.2012 um 09:32 Uhr
Hi,

schau dir mal ShadowProtect Virtual an -> www.storagecraft.de, du installierst einen Agenten in deinen Gästen und dann machst du im laufenden Betrieb dank VSS Unterstützung konsistente Backups alle 15 Minuten. Kannst dir ja mal eine 30 Tage Testversion besorgen und probieren, läuft sehr zuverlössig


Grüße
Bitte warten ..
Mitglied: TiTux
16.04.2012 um 11:26 Uhr
Hi,

der Vorteil von SEP ist halt, dass ich überhaupt keine Komponenten weder auf dem XenServer selber, noch auf den VMs installieren muss, finde ich schon ganz nett.
Bitte warten ..
Mitglied: ndakota
28.10.2013, aktualisiert 29.10.2014
Schau dir mal das Addware Xenbackup an....eventuell hilft dir das weiter. Sichert VMs von XenServern, Verschieben im laufenden Betrieb mgl....gibt es für einen XenServer auch als Freeware, für mehrere Server ist es dann kostenpflichtig. Nähere Infos dazu findest hier: http://www.addware.de/xenbackup.html
Bitte warten ..
Mitglied: Der-Phil
20.05.2014 um 11:12 Uhr
Hallo!

Der Artikel ist alt, aber vielleicht ists ja trotzdem interessant:

Ich nutze aktuell Xackup von "Fungusware": fungusware.com

Kann nicht super viel, aber ist preiswert und nicht übel - und agentfrei.

Phil
Bitte warten ..
Neuester Wissensbeitrag
CPU, RAM, Mainboards

Angetestet: PC Engines APU 3a2 im Rack-Gehäuse

Erfahrungsbericht von ashnod zum Thema CPU, RAM, Mainboards ...

Ähnliche Inhalte
Xenserver
Xenserver 7 - LOG zu Backup erstellen

Frage von caspi-pirna zum Thema Xenserver ...

Netzwerke
gelöst Software für Netzwerkplan gesucht (unter Windows Open Source) (5)

Frage von sabines zum Thema Netzwerke ...

TK-Netze & Geräte
Erfahrung mit der Software Talkmaster Zentrale gesucht (2)

Frage von scout71 zum Thema TK-Netze & Geräte ...

LAN, WAN, Wireless
Software für Backup oder Datensynchronisation über WAN gesucht (3)

Frage von Rubiks zum Thema LAN, WAN, Wireless ...

Heiß diskutierte Inhalte
Grafikkarten & Monitore
Win 10 Grafikkarte Crash von Software? (13)

Frage von Marabunta zum Thema Grafikkarten & Monitore ...

Windows Server
Mailserver auf Windows Server 2012 (8)

Frage von StefanT81 zum Thema Windows Server ...

Backup
Clients als Server missbrauchen? (8)

Frage von 1410640014 zum Thema Backup ...

DSL, VDSL
DSL-Signal bewerten (8)

Frage von SarekHL zum Thema DSL, VDSL ...