MachineImpl.cpp@ 11699

Last change on this file since 11699 was 11699, checked in by vboxsync, 16 years ago
Main: reading guest properties in IMachine requires AutoCaller, not AutoLimitedCaller
Property svn:eol-style set to `native` Property svn:keywords set to `Author Date Id Revision`
File size: 340.8 KB

Line
1	/* $Id: MachineImpl.cpp 11699 2008-08-27 13:54:30Z vboxsync $ */
2	/** @file
3	* Implementation of IMachine in VBoxSVC.
4	*/
5
6	/*
7	* Copyright (C) 2006-2007 Sun Microsystems, Inc.
8	*
9	* This file is part of VirtualBox Open Source Edition (OSE), as
10	* available from http://www.virtualbox.org. This file is free software;
11	* you can redistribute it and/or modify it under the terms of the GNU
12	* General Public License (GPL) as published by the Free Software
13	* Foundation, in version 2 as it comes in the "COPYING" file of the
14	* VirtualBox OSE distribution. VirtualBox OSE is distributed in the
15	* hope that it will be useful, but WITHOUT ANY WARRANTY of any kind.
16	*
17	* Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa
18	* Clara, CA 95054 USA or visit http://www.sun.com if you need
19	* additional information or have any questions.
20	*/
21
22	/* Make sure all the stdint.h macros are included - must come first! */
23	#ifndef __STDC_LIMIT_MACROS
24	# define __STDC_LIMIT_MACROS
25	#endif
26	#ifndef __STDC_CONSTANT_MACROS
27	# define __STDC_CONSTANT_MACROS
28	#endif
29
30	#if defined(RT_OS_WINDOWS)
31	#elif defined(RT_OS_LINUX)
32	#endif
33
34	#ifdef VBOX_WITH_SYS_V_IPC_SESSION_WATCHER
35	# include <errno.h>
36	# include <sys/types.h>
37	# include <sys/stat.h>
38	# include <sys/ipc.h>
39	# include <sys/sem.h>
40	#endif
41
42	#include "VirtualBoxImpl.h"
43	#include "MachineImpl.h"
44	#include "HardDiskImpl.h"
45	#include "ProgressImpl.h"
46	#include "HardDiskAttachmentImpl.h"
47	#include "USBControllerImpl.h"
48	#include "HostImpl.h"
49	#include "SystemPropertiesImpl.h"
50	#include "SharedFolderImpl.h"
51	#include "GuestOSTypeImpl.h"
52	#include "VirtualBoxErrorInfoImpl.h"
53	#include "GuestImpl.h"
54	#include "SATAControllerImpl.h"
55
56	#ifdef VBOX_WITH_USB
57	# include "USBProxyService.h"
58	#endif
59
60	#include "VirtualBoxXMLUtil.h"
61
62	#include "Logging.h"
63
64	#include <stdio.h>
65	#include <stdlib.h>
66
67	#include <iprt/path.h>
68	#include <iprt/dir.h>
69	#include <iprt/asm.h>
70	#include <iprt/process.h>
71	#include <iprt/cpputils.h>
72	#include <iprt/env.h>
73
74	#include <VBox/err.h>
75	#include <VBox/param.h>
76	#ifdef VBOX_WITH_GUEST_PROPS
77	# include <VBox/HostServices/GuestPropertySvc.h>
78	# include <VBox/com/array.h>
79	#endif
80
81	#include <algorithm>
82
83	#include <typeinfo>
84
85	#if defined(RT_OS_WINDOWS) \|\| defined(RT_OS_OS2)
86	#define HOSTSUFF_EXE ".exe"
87	#else /* !RT_OS_WINDOWS */
88	#define HOSTSUFF_EXE ""
89	#endif /* !RT_OS_WINDOWS */
90
91	// defines / prototypes
92	/////////////////////////////////////////////////////////////////////////////
93
94	// globals
95	/////////////////////////////////////////////////////////////////////////////
96
97	/**
98	* @note The template is NOT completely valid according to VBOX_XML_SCHEMA
99	* (when loading a newly created settings file, validation will be turned off)
100	*/
101	static const char DefaultMachineConfig[] =
102	{
103	"<?xml version=\"1.0\" encoding=\"UTF-8\" ?>" RTFILE_LINEFEED
104	"<!-- Sun xVM VirtualBox Machine Configuration -->" RTFILE_LINEFEED
105	"<VirtualBox xmlns=\"" VBOX_XML_NAMESPACE "\" "
106	"version=\"" VBOX_XML_VERSION_FULL "\">" RTFILE_LINEFEED
107	"</VirtualBox>" RTFILE_LINEFEED
108	};
109
110	/**
111	* Progress callback handler for lengthy operations
112	* (corresponds to the FNRTPROGRESS typedef).
113	*
114	* @param uPercentage Completetion precentage (0-100).
115	* @param pvUser Pointer to the Progress instance.
116	*/
117	static DECLCALLBACK(int) progressCallback (unsigned uPercentage, void *pvUser)
118	{
119	Progress progress = static_cast <Progress > (pvUser);
120
121	/* update the progress object */
122	if (progress)
123	progress->notifyProgress (uPercentage);
124
125	return VINF_SUCCESS;
126	}
127
128	/////////////////////////////////////////////////////////////////////////////
129	// Machine::Data structure
130	/////////////////////////////////////////////////////////////////////////////
131
132	Machine::Data::Data()
133	{
134	mRegistered = FALSE;
135	mAccessible = FALSE;
136	/* mUuid is initialized in Machine::init() */
137
138	mMachineState = MachineState_PoweredOff;
139	RTTimeNow (&mLastStateChange);
140
141	mMachineStateDeps = 0;
142	mMachineStateDepsSem = NIL_RTSEMEVENTMULTI;
143	mMachineStateChangePending = 0;
144
145	mCurrentStateModified = TRUE;
146	mHandleCfgFile = NIL_RTFILE;
147
148	mSession.mPid = NIL_RTPROCESS;
149	mSession.mState = SessionState_Closed;
150	}
151
152	Machine::Data::~Data()
153	{
154	if (mMachineStateDepsSem != NIL_RTSEMEVENTMULTI)
155	{
156	RTSemEventMultiDestroy (mMachineStateDepsSem);
157	mMachineStateDepsSem = NIL_RTSEMEVENTMULTI;
158	}
159	}
160
161	/////////////////////////////////////////////////////////////////////////////
162	// Machine::UserData structure
163	/////////////////////////////////////////////////////////////////////////////
164
165	Machine::UserData::UserData()
166	{
167	/* default values for a newly created machine */
168
169	mNameSync = TRUE;
170
171	/* mName, mOSTypeId, mSnapshotFolder, mSnapshotFolderFull are initialized in
172	* Machine::init() */
173	}
174
175	Machine::UserData::~UserData()
176	{
177	}
178
179	/////////////////////////////////////////////////////////////////////////////
180	// Machine::HWData structure
181	/////////////////////////////////////////////////////////////////////////////
182
183	Machine::HWData::HWData()
184	{
185	/* default values for a newly created machine */
186	mMemorySize = 128;
187	mMemoryBalloonSize = 0;
188	mStatisticsUpdateInterval = 0;
189	mVRAMSize = 8;
190	mMonitorCount = 1;
191	mHWVirtExEnabled = TSBool_False;
192	mHWVirtExNestedPagingEnabled = true;
193	mPAEEnabled = false;
194
195	/* default boot order: floppy - DVD - HDD */
196	mBootOrder [0] = DeviceType_Floppy;
197	mBootOrder [1] = DeviceType_DVD;
198	mBootOrder [2] = DeviceType_HardDisk;
199	for (size_t i = 3; i < ELEMENTS (mBootOrder); i++)
200	mBootOrder [i] = DeviceType_Null;
201
202	mClipboardMode = ClipboardMode_Bidirectional;
203	}
204
205	Machine::HWData::~HWData()
206	{
207	}
208
209	bool Machine::HWData::operator== (const HWData &that) const
210	{
211	if (this == &that)
212	return true;
213
214	if (mMemorySize != that.mMemorySize \|\|
215	mMemoryBalloonSize != that.mMemoryBalloonSize \|\|
216	mStatisticsUpdateInterval != that.mStatisticsUpdateInterval \|\|
217	mVRAMSize != that.mVRAMSize \|\|
218	mMonitorCount != that.mMonitorCount \|\|
219	mHWVirtExEnabled != that.mHWVirtExEnabled \|\|
220	mHWVirtExNestedPagingEnabled != that.mHWVirtExNestedPagingEnabled \|\|
221	mPAEEnabled != that.mPAEEnabled \|\|
222	mClipboardMode != that.mClipboardMode)
223	return false;
224
225	for (size_t i = 0; i < ELEMENTS (mBootOrder); ++ i)
226	if (mBootOrder [i] != that.mBootOrder [i])
227	return false;
228
229	if (mSharedFolders.size() != that.mSharedFolders.size())
230	return false;
231
232	if (mSharedFolders.size() == 0)
233	return true;
234
235	/* Make copies to speed up comparison */
236	SharedFolderList folders = mSharedFolders;
237	SharedFolderList thatFolders = that.mSharedFolders;
238
239	SharedFolderList::iterator it = folders.begin();
240	while (it != folders.end())
241	{
242	bool found = false;
243	SharedFolderList::iterator thatIt = thatFolders.begin();
244	while (thatIt != thatFolders.end())
245	{
246	if ((it)->name() == (thatIt)->name() &&
247	RTPathCompare (Utf8Str ((*it)->hostPath()),
248	Utf8Str ((*thatIt)->hostPath())) == 0)
249	{
250	thatFolders.erase (thatIt);
251	found = true;
252	break;
253	}
254	else
255	++ thatIt;
256	}
257	if (found)
258	it = folders.erase (it);
259	else
260	return false;
261	}
262
263	Assert (folders.size() == 0 && thatFolders.size() == 0);
264
265	return true;
266	}
267
268	/////////////////////////////////////////////////////////////////////////////
269	// Machine::HDData structure
270	/////////////////////////////////////////////////////////////////////////////
271
272	Machine::HDData::HDData()
273	{
274	/* default values for a newly created machine */
275	mHDAttachmentsChanged = false;
276	}
277
278	Machine::HDData::~HDData()
279	{
280	}
281
282	bool Machine::HDData::operator== (const HDData &that) const
283	{
284	if (this == &that)
285	return true;
286
287	if (mHDAttachments.size() != that.mHDAttachments.size())
288	return false;
289
290	if (mHDAttachments.size() == 0)
291	return true;
292
293	/* Make copies to speed up comparison */
294	HDAttachmentList atts = mHDAttachments;
295	HDAttachmentList thatAtts = that.mHDAttachments;
296
297	HDAttachmentList::iterator it = atts.begin();
298	while (it != atts.end())
299	{
300	bool found = false;
301	HDAttachmentList::iterator thatIt = thatAtts.begin();
302	while (thatIt != thatAtts.end())
303	{
304	if ((it)->bus() == (thatIt)->bus() &&
305	(it)->channel() == (thatIt)->channel() &&
306	(it)->device() == (thatIt)->device() &&
307	(it)->hardDisk().equalsTo ((thatIt)->hardDisk()))
308	{
309	thatAtts.erase (thatIt);
310	found = true;
311	break;
312	}
313	else
314	++ thatIt;
315	}
316	if (found)
317	it = atts.erase (it);
318	else
319	return false;
320	}
321
322	Assert (atts.size() == 0 && thatAtts.size() == 0);
323
324	return true;
325	}
326
327	/////////////////////////////////////////////////////////////////////////////
328	// Machine class
329	/////////////////////////////////////////////////////////////////////////////
330
331	// constructor / destructor
332	/////////////////////////////////////////////////////////////////////////////
333
334	Machine::Machine() : mType (IsMachine) {}
335
336	Machine::~Machine() {}
337
338	HRESULT Machine::FinalConstruct()
339	{
340	LogFlowThisFunc (("\n"));
341	return S_OK;
342	}
343
344	void Machine::FinalRelease()
345	{
346	LogFlowThisFunc (("\n"));
347	uninit();
348	}
349
350	/**
351	* Initializes the instance.
352	*
353	* @param aParent Associated parent object
354	* @param aConfigFile Local file system path to the VM settings file (can
355	* be relative to the VirtualBox config directory).
356	* @param aMode Init_New, Init_Existing or Init_Registered
357	* @param aName name for the machine when aMode is Init_New
358	* (ignored otherwise)
359	* @param aNameSync \|TRUE\| to automatically sync settings dir and file
360	* name with the machine name. \|FALSE\| is used for legacy
361	* machines where the file name is specified by the
362	* user and should never change. Used only in Init_New
363	* mode (ignored otherwise).
364	* @param aId UUID of the machine. Required for aMode==Init_Registered
365	* and optional for aMode==Init_New. Used for consistency
366	* check when aMode is Init_Registered; must match UUID
367	* stored in the settings file. Used for predefining the
368	* UUID of a VM when aMode is Init_New.
369	*
370	* @return Success indicator. if not S_OK, the machine object is invalid
371	*/
372	HRESULT Machine::init (VirtualBox *aParent, const BSTR aConfigFile,
373	InitMode aMode, const BSTR aName /* = NULL */,
374	BOOL aNameSync /* = TRUE */,
375	const Guid aId / = NULL */)
376	{
377	LogFlowThisFuncEnter();
378	LogFlowThisFunc (("aConfigFile='%ls', aMode=%d\n", aConfigFile, aMode));
379
380	AssertReturn (aParent, E_INVALIDARG);
381	AssertReturn (aConfigFile, E_INVALIDARG);
382	AssertReturn (aMode != Init_New \|\| (aName != NULL && *aName != '\0'),
383	E_INVALIDARG);
384	AssertReturn (aMode != Init_Registered \|\| aId != NULL, E_FAIL);
385
386	/* Enclose the state transition NotReady->InInit->Ready */
387	AutoInitSpan autoInitSpan (this);
388	AssertReturn (autoInitSpan.isOk(), E_UNEXPECTED);
389
390	HRESULT rc = S_OK;
391
392	/* share the parent weakly */
393	unconst (mParent) = aParent;
394
395	/* register with parent early, since uninit() will unconditionally
396	* unregister on failure */
397	mParent->addDependentChild (this);
398
399	/* allocate the essential machine data structure (the rest will be
400	* allocated later by initDataAndChildObjects() */
401	mData.allocate();
402
403	char configFileFull [RTPATH_MAX] = {0};
404
405	/* memorize the config file name (as provided) */
406	mData->mConfigFile = aConfigFile;
407
408	/* get the full file name */
409	int vrc = RTPathAbsEx (mParent->homeDir(), Utf8Str (aConfigFile),
410	configFileFull, sizeof (configFileFull));
411	if (VBOX_FAILURE (vrc))
412	return setError (E_FAIL,
413	tr ("Invalid settings file name: '%ls' (%Vrc)"),
414	aConfigFile, vrc);
415	mData->mConfigFileFull = configFileFull;
416
417	if (aMode == Init_Registered)
418	{
419	mData->mRegistered = TRUE;
420
421	/* store the supplied UUID (will be used to check for UUID consistency
422	* in loadSettings() */
423	unconst (mData->mUuid) = *aId;
424	rc = registeredInit();
425	}
426	else
427	{
428	if (aMode == Init_Existing)
429	{
430	/* lock the settings file */
431	rc = lockConfig();
432	}
433	else if (aMode == Init_New)
434	{
435	/* check for the file existence */
436	RTFILE f = NIL_RTFILE;
437	int vrc = RTFileOpen (&f, configFileFull, RTFILE_O_READ);
438	if (VBOX_SUCCESS (vrc) \|\| vrc == VERR_SHARING_VIOLATION)
439	{
440	rc = setError (E_FAIL,
441	tr ("Settings file '%s' already exists"), configFileFull);
442	if (VBOX_SUCCESS (vrc))
443	RTFileClose (f);
444	}
445	else
446	{
447	if (vrc != VERR_FILE_NOT_FOUND && vrc != VERR_PATH_NOT_FOUND)
448	rc = setError (E_FAIL,
449	tr ("Invalid settings file name: '%ls' (%Vrc)"),
450	mData->mConfigFileFull.raw(), vrc);
451	}
452	}
453	else
454	AssertFailed();
455
456	if (SUCCEEDED (rc))
457	rc = initDataAndChildObjects();
458
459	if (SUCCEEDED (rc))
460	{
461	/* set to true now to cause uninit() to call
462	* uninitDataAndChildObjects() on failure */
463	mData->mAccessible = TRUE;
464
465	if (aMode != Init_New)
466	{
467	rc = loadSettings (false /* aRegistered */);
468	}
469	else
470	{
471	/* create the machine UUID */
472	if (aId)
473	unconst (mData->mUuid) = *aId;
474	else
475	unconst (mData->mUuid).create();
476
477	/* memorize the provided new machine's name */
478	mUserData->mName = aName;
479	mUserData->mNameSync = aNameSync;
480
481	/* initialize the default snapshots folder
482	* (note: depends on the name value set above!) */
483	rc = COMSETTER(SnapshotFolder) (NULL);
484	AssertComRC (rc);
485	}
486
487	/* commit all changes made during the initialization */
488	if (SUCCEEDED (rc))
489	commit();
490	}
491	}
492
493	/* Confirm a successful initialization when it's the case */
494	if (SUCCEEDED (rc))
495	{
496	if (mData->mAccessible)
497	autoInitSpan.setSucceeded();
498	else
499	autoInitSpan.setLimited();
500	}
501
502	LogFlowThisFunc (("mName='%ls', mRegistered=%RTbool, mAccessible=%RTbool "
503	"rc=%08X\n",
504	!!mUserData ? mUserData->mName.raw() : NULL,
505	mData->mRegistered, mData->mAccessible, rc));
506
507	LogFlowThisFuncLeave();
508
509	return rc;
510	}
511
512	/**
513	* Initializes the registered machine by loading the settings file.
514	* This method is separated from #init() in order to make it possible to
515	* retry the operation after VirtualBox startup instead of refusing to
516	* startup the whole VirtualBox server in case if the settings file of some
517	* registered VM is invalid or inaccessible.
518	*
519	* @note Must be always called from this object's write lock
520	* (unless called from #init() that doesn't need any locking).
521	* @note Locks the mUSBController method for writing.
522	* @note Subclasses must not call this method.
523	*/
524	HRESULT Machine::registeredInit()
525	{
526	AssertReturn (mType == IsMachine, E_FAIL);
527	AssertReturn (!mData->mUuid.isEmpty(), E_FAIL);
528	AssertReturn (!mData->mAccessible, E_FAIL);
529
530	HRESULT rc = lockConfig();
531
532	if (SUCCEEDED (rc))
533	rc = initDataAndChildObjects();
534
535	if (SUCCEEDED (rc))
536	{
537	/* Temporarily reset the registered flag in order to let setters
538	* potentially called from loadSettings() succeed (isMutable() used in
539	* all setters will return FALSE for a Machine instance if mRegistered
540	* is TRUE). */
541	mData->mRegistered = FALSE;
542
543	rc = loadSettings (true /* aRegistered */);
544
545	/* Restore the registered flag (even on failure) */
546	mData->mRegistered = TRUE;
547
548	if (FAILED (rc))
549	unlockConfig();
550	}
551
552	if (SUCCEEDED (rc))
553	{
554	/* Set mAccessible to TRUE only if we successfully locked and loaded
555	* the settings file */
556	mData->mAccessible = TRUE;
557
558	/* commit all changes made during loading the settings file */
559	commit();
560
561	/* VirtualBox will not call trySetRegistered(), so
562	* inform the USB proxy about all attached USB filters */
563	mUSBController->onMachineRegistered (TRUE);
564	}
565	else
566	{
567	/* If the machine is registered, then, instead of returning a
568	* failure, we mark it as inaccessible and set the result to
569	* success to give it a try later */
570
571	/* fetch the current error info */
572	mData->mAccessError = com::ErrorInfo();
573	LogWarning (("Machine {%Vuuid} is inaccessible! [%ls]\n",
574	mData->mUuid.raw(),
575	mData->mAccessError.getText().raw()));
576
577	/* rollback all changes */
578	rollback (false /* aNotify */);
579
580	/* uninitialize the common part to make sure all data is reset to
581	* default (null) values */
582	uninitDataAndChildObjects();
583
584	rc = S_OK;
585	}
586
587	return rc;
588	}
589
590	/**
591	* Uninitializes the instance.
592	* Called either from FinalRelease() or by the parent when it gets destroyed.
593	*
594	* @note The caller of this method must make sure that this object
595	* a) doesn't have active callers on the current thread and b) is not locked
596	* by the current thread; otherwise uninit() will hang either a) due to
597	* AutoUninitSpan waiting for a number of calls to drop to zero or b) due to
598	* a dead-lock caused by this thread waiting for all callers on the other
599	* threads are are done but preventing them from doing so by holding a lock.
600	*/
601	void Machine::uninit()
602	{
603	LogFlowThisFuncEnter();
604
605	Assert (!isWriteLockOnCurrentThread());
606
607	/* Enclose the state transition Ready->InUninit->NotReady */
608	AutoUninitSpan autoUninitSpan (this);
609	if (autoUninitSpan.uninitDone())
610	return;
611
612	Assert (mType == IsMachine);
613	Assert (!!mData);
614
615	LogFlowThisFunc (("initFailed()=%d\n", autoUninitSpan.initFailed()));
616	LogFlowThisFunc (("mRegistered=%d\n", mData->mRegistered));
617
618	/* Enter this object lock because there may be a SessionMachine instance
619	* somewhere around, that shares our data and lock but doesn't use our
620	* addCaller()/removeCaller(), and it may be also accessing the same data
621	* members. mParent lock is necessary as well because of
622	* SessionMachine::uninit(), etc.
623	*/
624	AutoMultiWriteLock2 alock (mParent, this);
625
626	if (!mData->mSession.mMachine.isNull())
627	{
628	/* Theoretically, this can only happen if the VirtualBox server has been
629	* terminated while there were clients running that owned open direct
630	* sessions. Since in this case we are definitely called by
631	* VirtualBox::uninit(), we may be sure that SessionMachine::uninit()
632	* won't happen on the client watcher thread (because it does
633	* VirtualBox::addCaller() for the duration of the
634	* SessionMachine::checkForDeath() call, so that VirtualBox::uninit()
635	* cannot happen until the VirtualBox caller is released). This is
636	* important, because SessionMachine::uninit() cannot correctly operate
637	* after we return from this method (it expects the Machine instance is
638	* still valid). We'll call it ourselves below.
639	*/
640	LogWarningThisFunc (("Session machine is not NULL (%p), "
641	"the direct session is still open!\n",
642	(SessionMachine *) mData->mSession.mMachine));
643
644	if (mData->mMachineState >= MachineState_Running)
645	{
646	LogWarningThisFunc (("Setting state to Aborted!\n"));
647	/* set machine state using SessionMachine reimplementation */
648	static_cast <Machine *> (mData->mSession.mMachine)
649	->setMachineState (MachineState_Aborted);
650	}
651
652	/*
653	* Uninitialize SessionMachine using public uninit() to indicate
654	* an unexpected uninitialization.
655	*/
656	mData->mSession.mMachine->uninit();
657	/* SessionMachine::uninit() must set mSession.mMachine to null */
658	Assert (mData->mSession.mMachine.isNull());
659	}
660
661	/* the lock is no more necessary (SessionMachine is uninitialized) */
662	alock.leave();
663
664	/* make sure the configuration is unlocked */
665	unlockConfig();
666
667	if (isModified())
668	{
669	LogWarningThisFunc (("Discarding unsaved settings changes!\n"));
670	rollback (false /* aNotify */);
671	}
672
673	if (mData->mAccessible)
674	uninitDataAndChildObjects();
675
676	/* free the essential data structure last */
677	mData.free();
678
679	mParent->removeDependentChild (this);
680
681	LogFlowThisFuncLeave();
682	}
683
684	// IMachine properties
685	/////////////////////////////////////////////////////////////////////////////
686
687	STDMETHODIMP Machine::COMGETTER(Parent) (IVirtualBox **aParent)
688	{
689	if (!aParent)
690	return E_POINTER;
691
692	AutoLimitedCaller autoCaller (this);
693	CheckComRCReturnRC (autoCaller.rc());
694
695	/* mParent is constant during life time, no need to lock */
696	mParent.queryInterfaceTo (aParent);
697
698	return S_OK;
699	}
700
701	STDMETHODIMP Machine::COMGETTER(Accessible) (BOOL *aAccessible)
702	{
703	if (!aAccessible)
704	return E_POINTER;
705
706	AutoLimitedCaller autoCaller (this);
707	CheckComRCReturnRC (autoCaller.rc());
708
709	AutoWriteLock alock (this);
710
711	HRESULT rc = S_OK;
712
713	if (!mData->mAccessible)
714	{
715	/* try to initialize the VM once more if not accessible */
716
717	AutoReadySpan autoReadySpan (this);
718	AssertReturn (autoReadySpan.isOk(), E_FAIL);
719
720	rc = registeredInit();
721
722	if (mData->mAccessible)
723	autoReadySpan.setSucceeded();
724	}
725
726	if (SUCCEEDED (rc))
727	*aAccessible = mData->mAccessible;
728
729	return rc;
730	}
731
732	STDMETHODIMP Machine::COMGETTER(AccessError) (IVirtualBoxErrorInfo **aAccessError)
733	{
734	if (!aAccessError)
735	return E_POINTER;
736
737	AutoLimitedCaller autoCaller (this);
738	CheckComRCReturnRC (autoCaller.rc());
739
740	AutoReadLock alock (this);
741
742	if (mData->mAccessible \|\| !mData->mAccessError.isBasicAvailable())
743	{
744	/* return shortly */
745	aAccessError = NULL;
746	return S_OK;
747	}
748
749	HRESULT rc = S_OK;
750
751	ComObjPtr <VirtualBoxErrorInfo> errorInfo;
752	rc = errorInfo.createObject();
753	if (SUCCEEDED (rc))
754	{
755	errorInfo->init (mData->mAccessError.getResultCode(),
756	mData->mAccessError.getInterfaceID(),
757	mData->mAccessError.getComponent(),
758	mData->mAccessError.getText());
759	rc = errorInfo.queryInterfaceTo (aAccessError);
760	}
761
762	return rc;
763	}
764
765	STDMETHODIMP Machine::COMGETTER(Name) (BSTR *aName)
766	{
767	if (!aName)
768	return E_POINTER;
769
770	AutoCaller autoCaller (this);
771	CheckComRCReturnRC (autoCaller.rc());
772
773	AutoReadLock alock (this);
774
775	mUserData->mName.cloneTo (aName);
776
777	return S_OK;
778	}
779
780	STDMETHODIMP Machine::COMSETTER(Name) (INPTR BSTR aName)
781	{
782	if (!aName)
783	return E_INVALIDARG;
784
785	if (!*aName)
786	return setError (E_INVALIDARG,
787	tr ("Machine name cannot be empty"));
788
789	AutoCaller autoCaller (this);
790	CheckComRCReturnRC (autoCaller.rc());
791
792	AutoWriteLock alock (this);
793
794	HRESULT rc = checkStateDependency (MutableStateDep);
795	CheckComRCReturnRC (rc);
796
797	mUserData.backup();
798	mUserData->mName = aName;
799
800	return S_OK;
801	}
802
803	STDMETHODIMP Machine::COMGETTER(Description) (BSTR *aDescription)
804	{
805	if (!aDescription)
806	return E_POINTER;
807
808	AutoCaller autoCaller (this);
809	CheckComRCReturnRC (autoCaller.rc());
810
811	AutoReadLock alock (this);
812
813	mUserData->mDescription.cloneTo (aDescription);
814
815	return S_OK;
816	}
817
818	STDMETHODIMP Machine::COMSETTER(Description) (INPTR BSTR aDescription)
819	{
820	AutoCaller autoCaller (this);
821	CheckComRCReturnRC (autoCaller.rc());
822
823	AutoWriteLock alock (this);
824
825	HRESULT rc = checkStateDependency (MutableStateDep);
826	CheckComRCReturnRC (rc);
827
828	mUserData.backup();
829	mUserData->mDescription = aDescription;
830
831	return S_OK;
832	}
833
834	STDMETHODIMP Machine::COMGETTER(Id) (GUIDPARAMOUT aId)
835	{
836	if (!aId)
837	return E_POINTER;
838
839	AutoLimitedCaller autoCaller (this);
840	CheckComRCReturnRC (autoCaller.rc());
841
842	AutoReadLock alock (this);
843
844	mData->mUuid.cloneTo (aId);
845
846	return S_OK;
847	}
848
849	STDMETHODIMP Machine::COMGETTER(OSTypeId) (BSTR *aOSTypeId)
850	{
851	if (!aOSTypeId)
852	return E_POINTER;
853
854	AutoCaller autoCaller (this);
855	CheckComRCReturnRC (autoCaller.rc());
856
857	AutoReadLock alock (this);
858
859	mUserData->mOSTypeId.cloneTo (aOSTypeId);
860
861	return S_OK;
862	}
863
864	STDMETHODIMP Machine::COMSETTER(OSTypeId) (INPTR BSTR aOSTypeId)
865	{
866	if (!aOSTypeId)
867	return E_INVALIDARG;
868
869	AutoCaller autoCaller (this);
870	CheckComRCReturnRC (autoCaller.rc());
871
872	/* look up the object by Id to check it is valid */
873	ComPtr <IGuestOSType> guestOSType;
874	HRESULT rc = mParent->GetGuestOSType (aOSTypeId,
875	guestOSType.asOutParam());
876	CheckComRCReturnRC (rc);
877
878	AutoWriteLock alock (this);
879
880	rc = checkStateDependency (MutableStateDep);
881	CheckComRCReturnRC (rc);
882
883	mUserData.backup();
884	mUserData->mOSTypeId = aOSTypeId;
885
886	return S_OK;
887	}
888
889	STDMETHODIMP Machine::COMGETTER(MemorySize) (ULONG *memorySize)
890	{
891	if (!memorySize)
892	return E_POINTER;
893
894	AutoCaller autoCaller (this);
895	CheckComRCReturnRC (autoCaller.rc());
896
897	AutoReadLock alock (this);
898
899	*memorySize = mHWData->mMemorySize;
900
901	return S_OK;
902	}
903
904	STDMETHODIMP Machine::COMSETTER(MemorySize) (ULONG memorySize)
905	{
906	/* check RAM limits */
907	if (memorySize < SchemaDefs::MinGuestRAM \|\|
908	memorySize > SchemaDefs::MaxGuestRAM)
909	return setError (E_INVALIDARG,
910	tr ("Invalid RAM size: %lu MB (must be in range [%lu, %lu] MB)"),
911	memorySize, SchemaDefs::MinGuestRAM, SchemaDefs::MaxGuestRAM);
912
913	AutoCaller autoCaller (this);
914	CheckComRCReturnRC (autoCaller.rc());
915
916	AutoWriteLock alock (this);
917
918	HRESULT rc = checkStateDependency (MutableStateDep);
919	CheckComRCReturnRC (rc);
920
921	mHWData.backup();
922	mHWData->mMemorySize = memorySize;
923
924	return S_OK;
925	}
926
927	STDMETHODIMP Machine::COMGETTER(VRAMSize) (ULONG *memorySize)
928	{
929	if (!memorySize)
930	return E_POINTER;
931
932	AutoCaller autoCaller (this);
933	CheckComRCReturnRC (autoCaller.rc());
934
935	AutoReadLock alock (this);
936
937	*memorySize = mHWData->mVRAMSize;
938
939	return S_OK;
940	}
941
942	STDMETHODIMP Machine::COMSETTER(VRAMSize) (ULONG memorySize)
943	{
944	/* check VRAM limits */
945	if (memorySize < SchemaDefs::MinGuestVRAM \|\|
946	memorySize > SchemaDefs::MaxGuestVRAM)
947	return setError (E_INVALIDARG,
948	tr ("Invalid VRAM size: %lu MB (must be in range [%lu, %lu] MB)"),
949	memorySize, SchemaDefs::MinGuestVRAM, SchemaDefs::MaxGuestVRAM);
950
951	AutoCaller autoCaller (this);
952	CheckComRCReturnRC (autoCaller.rc());
953
954	AutoWriteLock alock (this);
955
956	HRESULT rc = checkStateDependency (MutableStateDep);
957	CheckComRCReturnRC (rc);
958
959	mHWData.backup();
960	mHWData->mVRAMSize = memorySize;
961
962	return S_OK;
963	}
964
965	/** @todo this method should not be public */
966	STDMETHODIMP Machine::COMGETTER(MemoryBalloonSize) (ULONG *memoryBalloonSize)
967	{
968	if (!memoryBalloonSize)
969	return E_POINTER;
970
971	AutoCaller autoCaller (this);
972	CheckComRCReturnRC (autoCaller.rc());
973
974	AutoReadLock alock (this);
975
976	*memoryBalloonSize = mHWData->mMemoryBalloonSize;
977
978	return S_OK;
979	}
980
981	/** @todo this method should not be public */
982	STDMETHODIMP Machine::COMSETTER(MemoryBalloonSize) (ULONG memoryBalloonSize)
983	{
984	/* check limits */
985	if (memoryBalloonSize >= VMMDEV_MAX_MEMORY_BALLOON(mHWData->mMemorySize))
986	return setError (E_INVALIDARG,
987	tr ("Invalid memory balloon size: %lu MB (must be in range [%lu, %lu] MB)"),
988	memoryBalloonSize, 0, VMMDEV_MAX_MEMORY_BALLOON(mHWData->mMemorySize));
989
990	AutoCaller autoCaller (this);
991	CheckComRCReturnRC (autoCaller.rc());
992
993	AutoWriteLock alock (this);
994
995	HRESULT rc = checkStateDependency (MutableStateDep);
996	CheckComRCReturnRC (rc);
997
998	mHWData.backup();
999	mHWData->mMemoryBalloonSize = memoryBalloonSize;
1000
1001	return S_OK;
1002	}
1003
1004	/** @todo this method should not be public */
1005	STDMETHODIMP Machine::COMGETTER(StatisticsUpdateInterval) (ULONG *statisticsUpdateInterval)
1006	{
1007	if (!statisticsUpdateInterval)
1008	return E_POINTER;
1009
1010	AutoCaller autoCaller (this);
1011	CheckComRCReturnRC (autoCaller.rc());
1012
1013	AutoReadLock alock (this);
1014
1015	*statisticsUpdateInterval = mHWData->mStatisticsUpdateInterval;
1016
1017	return S_OK;
1018	}
1019
1020	/** @todo this method should not be public */
1021	STDMETHODIMP Machine::COMSETTER(StatisticsUpdateInterval) (ULONG statisticsUpdateInterval)
1022	{
1023	AutoCaller autoCaller (this);
1024	CheckComRCReturnRC (autoCaller.rc());
1025
1026	AutoWriteLock alock (this);
1027
1028	HRESULT rc = checkStateDependency (MutableStateDep);
1029	CheckComRCReturnRC (rc);
1030
1031	mHWData.backup();
1032	mHWData->mStatisticsUpdateInterval = statisticsUpdateInterval;
1033
1034	return S_OK;
1035	}
1036
1037
1038	STDMETHODIMP Machine::COMGETTER(MonitorCount) (ULONG *monitorCount)
1039	{
1040	if (!monitorCount)
1041	return E_POINTER;
1042
1043	AutoCaller autoCaller (this);
1044	CheckComRCReturnRC (autoCaller.rc());
1045
1046	AutoReadLock alock (this);
1047
1048	*monitorCount = mHWData->mMonitorCount;
1049
1050	return S_OK;
1051	}
1052
1053	STDMETHODIMP Machine::COMSETTER(MonitorCount) (ULONG monitorCount)
1054	{
1055	/* make sure monitor count is a sensible number */
1056	if (monitorCount < 1 \|\| monitorCount > SchemaDefs::MaxGuestMonitors)
1057	return setError (E_INVALIDARG,
1058	tr ("Invalid monitor count: %lu (must be in range [%lu, %lu])"),
1059	monitorCount, 1, SchemaDefs::MaxGuestMonitors);
1060
1061	AutoCaller autoCaller (this);
1062	CheckComRCReturnRC (autoCaller.rc());
1063
1064	AutoWriteLock alock (this);
1065
1066	HRESULT rc = checkStateDependency (MutableStateDep);
1067	CheckComRCReturnRC (rc);
1068
1069	mHWData.backup();
1070	mHWData->mMonitorCount = monitorCount;
1071
1072	return S_OK;
1073	}
1074
1075	STDMETHODIMP Machine::COMGETTER(BIOSSettings)(IBIOSSettings **biosSettings)
1076	{
1077	if (!biosSettings)
1078	return E_POINTER;
1079
1080	AutoCaller autoCaller (this);
1081	CheckComRCReturnRC (autoCaller.rc());
1082
1083	/* mBIOSSettings is constant during life time, no need to lock */
1084	mBIOSSettings.queryInterfaceTo (biosSettings);
1085
1086	return S_OK;
1087	}
1088
1089	STDMETHODIMP Machine::COMGETTER(HWVirtExEnabled)(TSBool_T *enabled)
1090	{
1091	if (!enabled)
1092	return E_POINTER;
1093
1094	AutoCaller autoCaller (this);
1095	CheckComRCReturnRC (autoCaller.rc());
1096
1097	AutoReadLock alock (this);
1098
1099	*enabled = mHWData->mHWVirtExEnabled;
1100
1101	return S_OK;
1102	}
1103
1104	STDMETHODIMP Machine::COMSETTER(HWVirtExEnabled)(TSBool_T enable)
1105	{
1106	AutoCaller autoCaller (this);
1107	CheckComRCReturnRC (autoCaller.rc());
1108
1109	AutoWriteLock alock (this);
1110
1111	HRESULT rc = checkStateDependency (MutableStateDep);
1112	CheckComRCReturnRC (rc);
1113
1114	/** @todo check validity! */
1115
1116	mHWData.backup();
1117	mHWData->mHWVirtExEnabled = enable;
1118
1119	return S_OK;
1120	}
1121
1122	STDMETHODIMP Machine::COMGETTER(HWVirtExNestedPagingEnabled)(BOOL *enabled)
1123	{
1124	if (!enabled)
1125	return E_POINTER;
1126
1127	AutoCaller autoCaller (this);
1128	CheckComRCReturnRC (autoCaller.rc());
1129
1130	AutoReadLock alock (this);
1131
1132	*enabled = mHWData->mHWVirtExNestedPagingEnabled;
1133
1134	return S_OK;
1135	}
1136
1137	STDMETHODIMP Machine::COMSETTER(HWVirtExNestedPagingEnabled)(BOOL enable)
1138	{
1139	AutoCaller autoCaller (this);
1140	CheckComRCReturnRC (autoCaller.rc());
1141
1142	AutoWriteLock alock (this);
1143
1144	HRESULT rc = checkStateDependency (MutableStateDep);
1145	CheckComRCReturnRC (rc);
1146
1147	/** @todo check validity! */
1148
1149	mHWData.backup();
1150	mHWData->mHWVirtExNestedPagingEnabled = enable;
1151
1152	return S_OK;
1153	}
1154
1155
1156	STDMETHODIMP Machine::COMGETTER(PAEEnabled)(BOOL *enabled)
1157	{
1158	if (!enabled)
1159	return E_POINTER;
1160
1161	AutoCaller autoCaller (this);
1162	CheckComRCReturnRC (autoCaller.rc());
1163
1164	AutoReadLock alock (this);
1165
1166	*enabled = mHWData->mPAEEnabled;
1167
1168	return S_OK;
1169	}
1170
1171	STDMETHODIMP Machine::COMSETTER(PAEEnabled)(BOOL enable)
1172	{
1173	AutoCaller autoCaller (this);
1174	CheckComRCReturnRC (autoCaller.rc());
1175
1176	AutoWriteLock alock (this);
1177
1178	HRESULT rc = checkStateDependency (MutableStateDep);
1179	CheckComRCReturnRC (rc);
1180
1181	/** @todo check validity! */
1182
1183	mHWData.backup();
1184	mHWData->mPAEEnabled = enable;
1185
1186	return S_OK;
1187	}
1188
1189	STDMETHODIMP Machine::COMGETTER(SnapshotFolder) (BSTR *aSnapshotFolder)
1190	{
1191	if (!aSnapshotFolder)
1192	return E_POINTER;
1193
1194	AutoCaller autoCaller (this);
1195	CheckComRCReturnRC (autoCaller.rc());
1196
1197	AutoReadLock alock (this);
1198
1199	mUserData->mSnapshotFolderFull.cloneTo (aSnapshotFolder);
1200
1201	return S_OK;
1202	}
1203
1204	STDMETHODIMP Machine::COMSETTER(SnapshotFolder) (INPTR BSTR aSnapshotFolder)
1205	{
1206	/* @todo (r=dmik):
1207	* 1. Allow to change the name of the snapshot folder containing snapshots
1208	* 2. Rename the folder on disk instead of just changing the property
1209	* value (to be smart and not to leave garbage). Note that it cannot be
1210	* done here because the change may be rolled back. Thus, the right
1211	* place is #saveSettings().
1212	*/
1213
1214	AutoCaller autoCaller (this);
1215	CheckComRCReturnRC (autoCaller.rc());
1216
1217	AutoWriteLock alock (this);
1218
1219	HRESULT rc = checkStateDependency (MutableStateDep);
1220	CheckComRCReturnRC (rc);
1221
1222	if (!mData->mCurrentSnapshot.isNull())
1223	return setError (E_FAIL,
1224	tr ("The snapshot folder of a machine with snapshots cannot "
1225	"be changed (please discard all snapshots first)"));
1226
1227	Utf8Str snapshotFolder = aSnapshotFolder;
1228
1229	if (snapshotFolder.isEmpty())
1230	{
1231	if (isInOwnDir())
1232	{
1233	/* the default snapshots folder is 'Snapshots' in the machine dir */
1234	snapshotFolder = Utf8Str ("Snapshots");
1235	}
1236	else
1237	{
1238	/* the default snapshots folder is {UUID}, for backwards
1239	* compatibility and to resolve conflicts */
1240	snapshotFolder = Utf8StrFmt ("{%Vuuid}", mData->mUuid.raw());
1241	}
1242	}
1243
1244	int vrc = calculateFullPath (snapshotFolder, snapshotFolder);
1245	if (VBOX_FAILURE (vrc))
1246	return setError (E_FAIL,
1247	tr ("Invalid snapshot folder: '%ls' (%Vrc)"),
1248	aSnapshotFolder, vrc);
1249
1250	mUserData.backup();
1251	mUserData->mSnapshotFolder = aSnapshotFolder;
1252	mUserData->mSnapshotFolderFull = snapshotFolder;
1253
1254	return S_OK;
1255	}
1256
1257	STDMETHODIMP Machine::COMGETTER(HardDiskAttachments) (IHardDiskAttachmentCollection **attachments)
1258	{
1259	if (!attachments)
1260	return E_POINTER;
1261
1262	AutoCaller autoCaller (this);
1263	CheckComRCReturnRC (autoCaller.rc());
1264
1265	AutoReadLock alock (this);
1266
1267	ComObjPtr <HardDiskAttachmentCollection> collection;
1268	collection.createObject();
1269	collection->init (mHDData->mHDAttachments);
1270	collection.queryInterfaceTo (attachments);
1271
1272	return S_OK;
1273	}
1274
1275	STDMETHODIMP Machine::COMGETTER(VRDPServer)(IVRDPServer **vrdpServer)
1276	{
1277	#ifdef VBOX_VRDP
1278	if (!vrdpServer)
1279	return E_POINTER;
1280
1281	AutoCaller autoCaller (this);
1282	CheckComRCReturnRC (autoCaller.rc());
1283
1284	AutoReadLock alock (this);
1285
1286	Assert (!!mVRDPServer);
1287	mVRDPServer.queryInterfaceTo (vrdpServer);
1288
1289	return S_OK;
1290	#else
1291	return E_NOTIMPL;
1292	#endif
1293	}
1294
1295	STDMETHODIMP Machine::COMGETTER(DVDDrive) (IDVDDrive **dvdDrive)
1296	{
1297	if (!dvdDrive)
1298	return E_POINTER;
1299
1300	AutoCaller autoCaller (this);
1301	CheckComRCReturnRC (autoCaller.rc());
1302
1303	AutoReadLock alock (this);
1304
1305	Assert (!!mDVDDrive);
1306	mDVDDrive.queryInterfaceTo (dvdDrive);
1307	return S_OK;
1308	}
1309
1310	STDMETHODIMP Machine::COMGETTER(FloppyDrive) (IFloppyDrive **floppyDrive)
1311	{
1312	if (!floppyDrive)
1313	return E_POINTER;
1314
1315	AutoCaller autoCaller (this);
1316	CheckComRCReturnRC (autoCaller.rc());
1317
1318	AutoReadLock alock (this);
1319
1320	Assert (!!mFloppyDrive);
1321	mFloppyDrive.queryInterfaceTo (floppyDrive);
1322	return S_OK;
1323	}
1324
1325	STDMETHODIMP Machine::COMGETTER(AudioAdapter)(IAudioAdapter **audioAdapter)
1326	{
1327	if (!audioAdapter)
1328	return E_POINTER;
1329
1330	AutoCaller autoCaller (this);
1331	CheckComRCReturnRC (autoCaller.rc());
1332
1333	AutoReadLock alock (this);
1334
1335	mAudioAdapter.queryInterfaceTo (audioAdapter);
1336	return S_OK;
1337	}
1338
1339	STDMETHODIMP Machine::COMGETTER(USBController) (IUSBController **aUSBController)
1340	{
1341	#ifdef VBOX_WITH_USB
1342	if (!aUSBController)
1343	return E_POINTER;
1344
1345	AutoCaller autoCaller (this);
1346	CheckComRCReturnRC (autoCaller.rc());
1347
1348	MultiResult rc = mParent->host()->checkUSBProxyService();
1349	CheckComRCReturnRC (rc);
1350
1351	AutoReadLock alock (this);
1352
1353	return rc = mUSBController.queryInterfaceTo (aUSBController);
1354	#else
1355	/* Note: The GUI depends on this method returning E_NOTIMPL with no
1356	* extended error info to indicate that USB is simply not available
1357	* (w/o treting it as a failure), for example, as in OSE */
1358	return E_NOTIMPL;
1359	#endif
1360	}
1361
1362	STDMETHODIMP Machine::COMGETTER(SATAController) (ISATAController **aSATAController)
1363	{
1364	#ifdef VBOX_WITH_AHCI
1365	if (!aSATAController)
1366	return E_POINTER;
1367
1368	AutoCaller autoCaller (this);
1369	CheckComRCReturnRC (autoCaller.rc());
1370
1371	AutoReadLock alock (this);
1372
1373	return mSATAController.queryInterfaceTo (aSATAController);
1374	#else
1375	/* Note: The GUI depends on this method returning E_NOTIMPL with no
1376	* extended error info to indicate that SATA is simply not available
1377	* (w/o treting it as a failure), for example, as in OSE */
1378	return E_NOTIMPL;
1379	#endif
1380	}
1381
1382	STDMETHODIMP Machine::COMGETTER(SettingsFilePath) (BSTR *aFilePath)
1383	{
1384	if (!aFilePath)
1385	return E_POINTER;
1386
1387	AutoLimitedCaller autoCaller (this);
1388	CheckComRCReturnRC (autoCaller.rc());
1389
1390	AutoReadLock alock (this);
1391
1392	mData->mConfigFileFull.cloneTo (aFilePath);
1393	return S_OK;
1394	}
1395
1396	STDMETHODIMP Machine::
1397	COMGETTER(SettingsFileVersion) (BSTR *aSettingsFileVersion)
1398	{
1399	if (!aSettingsFileVersion)
1400	return E_INVALIDARG;
1401
1402	AutoCaller autoCaller (this);
1403	CheckComRCReturnRC (autoCaller.rc());
1404
1405	AutoReadLock alock (this);
1406
1407	mData->mSettingsFileVersion.cloneTo (aSettingsFileVersion);
1408	return S_OK;
1409	}
1410
1411	STDMETHODIMP Machine::COMGETTER(SettingsModified) (BOOL *aModified)
1412	{
1413	if (!aModified)
1414	return E_POINTER;
1415
1416	AutoCaller autoCaller (this);
1417	CheckComRCReturnRC (autoCaller.rc());
1418
1419	AutoWriteLock alock (this);
1420
1421	HRESULT rc = checkStateDependency (MutableStateDep);
1422	CheckComRCReturnRC (rc);
1423
1424	if (!isConfigLocked())
1425	{
1426	/*
1427	* if we're ready and isConfigLocked() is FALSE then it means
1428	* that no config file exists yet, so always return TRUE
1429	*/
1430	*aModified = TRUE;
1431	}
1432	else
1433	{
1434	*aModified = isModified();
1435	}
1436
1437	return S_OK;
1438	}
1439
1440	STDMETHODIMP Machine::COMGETTER(SessionState) (SessionState_T *aSessionState)
1441	{
1442	if (!aSessionState)
1443	return E_POINTER;
1444
1445	AutoCaller autoCaller (this);
1446	CheckComRCReturnRC (autoCaller.rc());
1447
1448	AutoReadLock alock (this);
1449
1450	*aSessionState = mData->mSession.mState;
1451
1452	return S_OK;
1453	}
1454
1455	STDMETHODIMP Machine::COMGETTER(SessionType) (BSTR *aSessionType)
1456	{
1457	if (!aSessionType)
1458	return E_POINTER;
1459
1460	AutoCaller autoCaller (this);
1461	CheckComRCReturnRC (autoCaller.rc());
1462
1463	AutoReadLock alock (this);
1464
1465	mData->mSession.mType.cloneTo (aSessionType);
1466
1467	return S_OK;
1468	}
1469
1470	STDMETHODIMP Machine::COMGETTER(SessionPid) (ULONG *aSessionPid)
1471	{
1472	if (!aSessionPid)
1473	return E_POINTER;
1474
1475	AutoCaller autoCaller (this);
1476	CheckComRCReturnRC (autoCaller.rc());
1477
1478	AutoReadLock alock (this);
1479
1480	*aSessionPid = mData->mSession.mPid;
1481
1482	return S_OK;
1483	}
1484
1485	STDMETHODIMP Machine::COMGETTER(State) (MachineState_T *machineState)
1486	{
1487	if (!machineState)
1488	return E_POINTER;
1489
1490	AutoCaller autoCaller (this);
1491	CheckComRCReturnRC (autoCaller.rc());
1492
1493	AutoReadLock alock (this);
1494
1495	*machineState = mData->mMachineState;
1496
1497	return S_OK;
1498	}
1499
1500	STDMETHODIMP Machine::COMGETTER(LastStateChange) (LONG64 *aLastStateChange)
1501	{
1502	if (!aLastStateChange)
1503	return E_POINTER;
1504
1505	AutoCaller autoCaller (this);
1506	CheckComRCReturnRC (autoCaller.rc());
1507
1508	AutoReadLock alock (this);
1509
1510	*aLastStateChange = RTTimeSpecGetMilli (&mData->mLastStateChange);
1511
1512	return S_OK;
1513	}
1514
1515	STDMETHODIMP Machine::COMGETTER(StateFilePath) (BSTR *aStateFilePath)
1516	{
1517	if (!aStateFilePath)
1518	return E_POINTER;
1519
1520	AutoCaller autoCaller (this);
1521	CheckComRCReturnRC (autoCaller.rc());
1522
1523	AutoReadLock alock (this);
1524
1525	mSSData->mStateFilePath.cloneTo (aStateFilePath);
1526
1527	return S_OK;
1528	}
1529
1530	STDMETHODIMP Machine::COMGETTER(LogFolder) (BSTR *aLogFolder)
1531	{
1532	if (!aLogFolder)
1533	return E_POINTER;
1534
1535	AutoCaller autoCaller (this);
1536	AssertComRCReturnRC (autoCaller.rc());
1537
1538	AutoReadLock alock (this);
1539
1540	Utf8Str logFolder;
1541	getLogFolder (logFolder);
1542
1543	Bstr (logFolder).cloneTo (aLogFolder);
1544
1545	return S_OK;
1546	}
1547
1548	STDMETHODIMP Machine::COMGETTER(CurrentSnapshot) (ISnapshot **aCurrentSnapshot)
1549	{
1550	if (!aCurrentSnapshot)
1551	return E_POINTER;
1552
1553	AutoCaller autoCaller (this);
1554	CheckComRCReturnRC (autoCaller.rc());
1555
1556	AutoReadLock alock (this);
1557
1558	mData->mCurrentSnapshot.queryInterfaceTo (aCurrentSnapshot);
1559
1560	return S_OK;
1561	}
1562
1563	STDMETHODIMP Machine::COMGETTER(SnapshotCount) (ULONG *aSnapshotCount)
1564	{
1565	if (!aSnapshotCount)
1566	return E_POINTER;
1567
1568	AutoCaller autoCaller (this);
1569	CheckComRCReturnRC (autoCaller.rc());
1570
1571	AutoReadLock alock (this);
1572
1573	*aSnapshotCount = !mData->mFirstSnapshot ? 0 :
1574	mData->mFirstSnapshot->descendantCount() + 1 /* self */;
1575
1576	return S_OK;
1577	}
1578
1579	STDMETHODIMP Machine::COMGETTER(CurrentStateModified) (BOOL *aCurrentStateModified)
1580	{
1581	if (!aCurrentStateModified)
1582	return E_POINTER;
1583
1584	AutoCaller autoCaller (this);
1585	CheckComRCReturnRC (autoCaller.rc());
1586
1587	AutoReadLock alock (this);
1588
1589	/*
1590	* Note: for machines with no snapshots, we always return FALSE
1591	* (mData->mCurrentStateModified will be TRUE in this case, for historical
1592	* reasons :)
1593	*/
1594
1595	*aCurrentStateModified = !mData->mFirstSnapshot ? FALSE :
1596	mData->mCurrentStateModified;
1597
1598	return S_OK;
1599	}
1600
1601	STDMETHODIMP
1602	Machine::COMGETTER(SharedFolders) (ISharedFolderCollection **aSharedFolders)
1603	{
1604	if (!aSharedFolders)
1605	return E_POINTER;
1606
1607	AutoCaller autoCaller (this);
1608	CheckComRCReturnRC (autoCaller.rc());
1609
1610	AutoReadLock alock (this);
1611
1612	ComObjPtr <SharedFolderCollection> coll;
1613	coll.createObject();
1614	coll->init (mHWData->mSharedFolders);
1615	coll.queryInterfaceTo (aSharedFolders);
1616
1617	return S_OK;
1618	}
1619
1620	STDMETHODIMP
1621	Machine::COMGETTER(ClipboardMode) (ClipboardMode_T *aClipboardMode)
1622	{
1623	if (!aClipboardMode)
1624	return E_POINTER;
1625
1626	AutoCaller autoCaller (this);
1627	CheckComRCReturnRC (autoCaller.rc());
1628
1629	AutoReadLock alock (this);
1630
1631	*aClipboardMode = mHWData->mClipboardMode;
1632
1633	return S_OK;
1634	}
1635
1636	STDMETHODIMP
1637	Machine::COMSETTER(ClipboardMode) (ClipboardMode_T aClipboardMode)
1638	{
1639	AutoCaller autoCaller (this);
1640	CheckComRCReturnRC (autoCaller.rc());
1641
1642	AutoWriteLock alock (this);
1643
1644	HRESULT rc = checkStateDependency (MutableStateDep);
1645	CheckComRCReturnRC (rc);
1646
1647	mHWData.backup();
1648	mHWData->mClipboardMode = aClipboardMode;
1649
1650	return S_OK;
1651	}
1652
1653	// IMachine methods
1654	/////////////////////////////////////////////////////////////////////////////
1655
1656	STDMETHODIMP Machine::SetBootOrder (ULONG aPosition, DeviceType_T aDevice)
1657	{
1658	if (aPosition < 1 \|\| aPosition > SchemaDefs::MaxBootPosition)
1659	return setError (E_INVALIDARG,
1660	tr ("Invalid boot position: %lu (must be in range [1, %lu])"),
1661	aPosition, SchemaDefs::MaxBootPosition);
1662
1663	if (aDevice == DeviceType_USB)
1664	return setError (E_FAIL,
1665	tr ("Booting from USB devices is not currently supported"));
1666
1667	AutoCaller autoCaller (this);
1668	CheckComRCReturnRC (autoCaller.rc());
1669
1670	AutoWriteLock alock (this);
1671
1672	HRESULT rc = checkStateDependency (MutableStateDep);
1673	CheckComRCReturnRC (rc);
1674
1675	mHWData.backup();
1676	mHWData->mBootOrder [aPosition - 1] = aDevice;
1677
1678	return S_OK;
1679	}
1680
1681	STDMETHODIMP Machine::GetBootOrder (ULONG aPosition, DeviceType_T *aDevice)
1682	{
1683	if (aPosition < 1 \|\| aPosition > SchemaDefs::MaxBootPosition)
1684	return setError (E_INVALIDARG,
1685	tr ("Invalid boot position: %lu (must be in range [1, %lu])"),
1686	aPosition, SchemaDefs::MaxBootPosition);
1687
1688	AutoCaller autoCaller (this);
1689	CheckComRCReturnRC (autoCaller.rc());
1690
1691	AutoReadLock alock (this);
1692
1693	*aDevice = mHWData->mBootOrder [aPosition - 1];
1694
1695	return S_OK;
1696	}
1697
1698	STDMETHODIMP Machine::AttachHardDisk (INPTR GUIDPARAM aId,
1699	StorageBus_T aBus, LONG aChannel, LONG aDevice)
1700	{
1701	Guid id = aId;
1702
1703	if (id.isEmpty())
1704	return E_INVALIDARG;
1705
1706	if (aBus == StorageBus_SATA)
1707	{
1708	/* The device property is not used for SATA yet. Thus it is always zero. */
1709	if (aDevice != 0)
1710	return setError (E_INVALIDARG,
1711	tr ("Invalid device number: %l (must be always 0)"),
1712	aDevice);
1713
1714	/*
1715	* We suport 30 ports.
1716	* @todo: r=aeichner make max port count a system property.
1717	*/
1718	if ((aChannel < 0) \|\| (aChannel >= 30))
1719	return setError (E_INVALIDARG,
1720	tr ("Invalid channel number: %l (must be in range [%lu, %lu])"),
1721	aChannel, 0, 29);
1722	}
1723	else if (aBus == StorageBus_IDE)
1724	{
1725	/* Validate input for IDE drives. */
1726	if (aChannel == 0)
1727	{
1728	if ((aDevice < 0) \|\| (aDevice > 1))
1729	return setError (E_INVALIDARG,
1730	tr ("Invalid device number: %l (must be in range [%lu, %lu])"),
1731	aDevice, 0, 1);
1732	}
1733	else if (aChannel == 1)
1734	{
1735	/* The first device is assigned to the CD/DVD drive. */
1736	if (aDevice != 1)
1737	return setError (E_INVALIDARG,
1738	tr ("Invalid device number: %l (must be %lu)"),
1739	aDevice, 1);
1740	}
1741	else
1742	return setError (E_INVALIDARG,
1743	tr ("Invalid channel number: %l (must be in range [%lu, %lu])"),
1744	aChannel, 0, 1);
1745	}
1746	else
1747	return E_INVALIDARG;
1748
1749	AutoCaller autoCaller (this);
1750	CheckComRCReturnRC (autoCaller.rc());
1751
1752	/* VirtualBox::getHardDisk() need read lock */
1753	AutoMultiLock2 alock (mParent->rlock(), this->wlock());
1754
1755	HRESULT rc = checkStateDependency (MutableStateDep);
1756	CheckComRCReturnRC (rc);
1757
1758	if (!mData->mRegistered)
1759	return setError (E_FAIL,
1760	tr ("Cannot attach hard disks to an unregistered machine"));
1761
1762	AssertReturn (mData->mMachineState != MachineState_Saved, E_FAIL);
1763
1764	if (mData->mMachineState >= MachineState_Running)
1765	return setError (E_FAIL,
1766	tr ("Invalid machine state: %d"), mData->mMachineState);
1767
1768	/* see if the device on the controller is already busy */
1769	for (HDData::HDAttachmentList::const_iterator it = mHDData->mHDAttachments.begin();
1770	it != mHDData->mHDAttachments.end(); ++ it)
1771	{
1772	ComObjPtr <HardDiskAttachment> hda = *it;
1773	if (hda->bus() == aBus && hda->channel() == aChannel && hda->device() == aDevice)
1774	{
1775	ComObjPtr <HardDisk> hd = hda->hardDisk();
1776	AutoWriteLock hdLock (hd);
1777	return setError (E_FAIL,
1778	tr ("Hard disk '%ls' is already attached to device slot %d on "
1779	"channel %d of bus %d"),
1780	hd->toString().raw(), aDevice, aChannel, aBus);
1781	}
1782	}
1783
1784	/* find a hard disk by UUID */
1785	ComObjPtr <HardDisk> hd;
1786	rc = mParent->getHardDisk (id, hd);
1787	CheckComRCReturnRC (rc);
1788
1789	/* create an attachment object early to let it check argiuments */
1790	ComObjPtr <HardDiskAttachment> attachment;
1791	attachment.createObject();
1792	rc = attachment->init (hd, aBus, aChannel, aDevice, false /* aDirty */);
1793	CheckComRCReturnRC (rc);
1794
1795	AutoWriteLock hdLock (hd);
1796
1797	if (hd->isDifferencing())
1798	return setError (E_FAIL,
1799	tr ("Cannot attach the differencing hard disk '%ls'"),
1800	hd->toString().raw());
1801
1802	bool dirty = false;
1803
1804	switch (hd->type())
1805	{
1806	case HardDiskType_Immutable:
1807	{
1808	Assert (hd->machineId().isEmpty());
1809	/*
1810	* increase readers to protect from unregistration
1811	* until rollback()/commit() is done
1812	*/
1813	hd->addReader();
1814	Log3 (("A: %ls proteced\n", hd->toString().raw()));
1815	dirty = true;
1816	break;
1817	}
1818	case HardDiskType_Writethrough:
1819	{
1820	Assert (hd->children().size() == 0);
1821	Assert (hd->snapshotId().isEmpty());
1822	/* fall through */
1823	}
1824	case HardDiskType_Normal:
1825	{
1826	if (hd->machineId().isEmpty())
1827	{
1828	/* attach directly */
1829	hd->setMachineId (mData->mUuid);
1830	Log3 (("A: %ls associated with %Vuuid\n",
1831	hd->toString().raw(), mData->mUuid.raw()));
1832	dirty = true;
1833	}
1834	else
1835	{
1836	/* determine what the hard disk is already attached to */
1837	if (hd->snapshotId().isEmpty())
1838	{
1839	/* attached to some VM in its current state */
1840	if (hd->machineId() == mData->mUuid)
1841	{
1842	/*
1843	* attached to us, either in the backed up list of the
1844	* attachments or in the current one; the former is ok
1845	* (reattachment takes place within the same
1846	* "transaction") the latter is an error so check for it
1847	*/
1848	for (HDData::HDAttachmentList::const_iterator it =
1849	mHDData->mHDAttachments.begin();
1850	it != mHDData->mHDAttachments.end(); ++ it)
1851	{
1852	if ((*it)->hardDisk().equalsTo (hd))
1853	{
1854	return setError (E_FAIL,
1855	tr ("Normal/Writethrough hard disk '%ls' is "
1856	"currently attached to device slot %d on channel %d "
1857	"of bus %d of this machine"),
1858	hd->toString().raw(),
1859	(*it)->device(),
1860	(it)->channel(), (it)->bus());
1861	}
1862	}
1863	/*
1864	* dirty = false to indicate we didn't set machineId
1865	* and prevent it from being reset in DetachHardDisk()
1866	*/
1867	Log3 (("A: %ls found in old\n", hd->toString().raw()));
1868	}
1869	else
1870	{
1871	/* attached to other VM */
1872	return setError (E_FAIL,
1873	tr ("Normal/Writethrough hard disk '%ls' is "
1874	"currently attached to a machine with "
1875	"UUID {%Vuuid}"),
1876	hd->toString().raw(), hd->machineId().raw());
1877	}
1878	}
1879	else
1880	{
1881	/*
1882	* here we go when the HardDiskType_Normal
1883	* is attached to some VM (probably to this one, too)
1884	* at some particular snapshot, so we can create a diff
1885	* based on it
1886	*/
1887	Assert (!hd->machineId().isEmpty());
1888	/*
1889	* increase readers to protect from unregistration
1890	* until rollback()/commit() is done
1891	*/
1892	hd->addReader();
1893	Log3 (("A: %ls proteced\n", hd->toString().raw()));
1894	dirty = true;
1895	}
1896	}
1897
1898	break;
1899	}
1900	}
1901
1902	attachment->setDirty (dirty);
1903
1904	mHDData.backup();
1905	mHDData->mHDAttachments.push_back (attachment);
1906	Log3 (("A: %ls attached\n", hd->toString().raw()));
1907
1908	/* note: diff images are actually created only in commit() */
1909
1910	return S_OK;
1911	}
1912
1913	STDMETHODIMP Machine::GetHardDisk (StorageBus_T aBus, LONG aChannel,
1914	LONG aDevice, IHardDisk **aHardDisk)
1915	{
1916	if (aBus == StorageBus_Null)
1917	return E_INVALIDARG;
1918
1919	AutoCaller autoCaller (this);
1920	CheckComRCReturnRC (autoCaller.rc());
1921
1922	AutoReadLock alock (this);
1923
1924	*aHardDisk = NULL;
1925
1926	for (HDData::HDAttachmentList::const_iterator it = mHDData->mHDAttachments.begin();
1927	it != mHDData->mHDAttachments.end(); ++ it)
1928	{
1929	ComObjPtr <HardDiskAttachment> hda = *it;
1930	if (hda->bus() == aBus && hda->channel() == aChannel && hda->device() == aDevice)
1931	{
1932	hda->hardDisk().queryInterfaceTo (aHardDisk);
1933	return S_OK;
1934	}
1935	}
1936
1937	return setError (E_INVALIDARG,
1938	tr ("No hard disk attached to device slot %d on channel %d of bus %d"),
1939	aDevice, aChannel, aBus);
1940	}
1941
1942	STDMETHODIMP Machine::DetachHardDisk (StorageBus_T aBus, LONG aChannel, LONG aDevice)
1943	{
1944	if (aBus == StorageBus_Null)
1945	return E_INVALIDARG;
1946
1947	AutoCaller autoCaller (this);
1948	CheckComRCReturnRC (autoCaller.rc());
1949
1950	AutoWriteLock alock (this);
1951
1952	HRESULT rc = checkStateDependency (MutableStateDep);
1953	CheckComRCReturnRC (rc);
1954
1955	AssertReturn (mData->mMachineState != MachineState_Saved, E_FAIL);
1956
1957	if (mData->mMachineState >= MachineState_Running)
1958	return setError (E_FAIL,
1959	tr ("Invalid machine state: %d"), mData->mMachineState);
1960
1961	for (HDData::HDAttachmentList::iterator it = mHDData->mHDAttachments.begin();
1962	it != mHDData->mHDAttachments.end(); ++ it)
1963	{
1964	ComObjPtr <HardDiskAttachment> hda = *it;
1965	if (hda->bus() == aBus && hda->channel() == aChannel && hda->device() == aDevice)
1966	{
1967	ComObjPtr <HardDisk> hd = hda->hardDisk();
1968	AutoWriteLock hdLock (hd);
1969
1970	ComAssertRet (hd->children().size() == 0 &&
1971	hd->machineId() == mData->mUuid, E_FAIL);
1972
1973	if (hda->isDirty())
1974	{
1975	switch (hd->type())
1976	{
1977	case HardDiskType_Immutable:
1978	{
1979	/* decrease readers increased in AttachHardDisk() */
1980	hd->releaseReader();
1981	Log3 (("D: %ls released\n", hd->toString().raw()));
1982	break;
1983	}
1984	case HardDiskType_Writethrough:
1985	{
1986	/* deassociate from this machine */
1987	hd->setMachineId (Guid());
1988	Log3 (("D: %ls deassociated\n", hd->toString().raw()));
1989	break;
1990	}
1991	case HardDiskType_Normal:
1992	{
1993	if (hd->snapshotId().isEmpty())
1994	{
1995	/* deassociate from this machine */
1996	hd->setMachineId (Guid());
1997	Log3 (("D: %ls deassociated\n", hd->toString().raw()));
1998	}
1999	else
2000	{
2001	/* decrease readers increased in AttachHardDisk() */
2002	hd->releaseReader();
2003	Log3 (("%ls released\n", hd->toString().raw()));
2004	}
2005
2006	break;
2007	}
2008	}
2009	}
2010
2011	mHDData.backup();
2012	/*
2013	* we cannot use erase (it) below because backup() above will create
2014	* a copy of the list and make this copy active, but the iterator
2015	* still refers to the original and is not valid for a copy
2016	*/
2017	mHDData->mHDAttachments.remove (hda);
2018	Log3 (("D: %ls detached\n", hd->toString().raw()));
2019
2020	/*
2021	* note: Non-dirty hard disks are actually deassociated
2022	* and diff images are deleted only in commit()
2023	*/
2024
2025	return S_OK;
2026	}
2027	}
2028
2029	return setError (E_INVALIDARG,
2030	tr ("No hard disk attached to device slot %d on channel %d of bus %d"),
2031	aDevice, aChannel, aBus);
2032	}
2033
2034	STDMETHODIMP Machine::GetSerialPort (ULONG slot, ISerialPort **port)
2035	{
2036	if (!port)
2037	return E_POINTER;
2038	if (slot >= ELEMENTS (mSerialPorts))
2039	return setError (E_INVALIDARG, tr ("Invalid slot number: %d"), slot);
2040
2041	AutoCaller autoCaller (this);
2042	CheckComRCReturnRC (autoCaller.rc());
2043
2044	AutoReadLock alock (this);
2045
2046	mSerialPorts [slot].queryInterfaceTo (port);
2047
2048	return S_OK;
2049	}
2050
2051	STDMETHODIMP Machine::GetParallelPort (ULONG slot, IParallelPort **port)
2052	{
2053	if (!port)
2054	return E_POINTER;
2055	if (slot >= ELEMENTS (mParallelPorts))
2056	return setError (E_INVALIDARG, tr ("Invalid slot number: %d"), slot);
2057
2058	AutoCaller autoCaller (this);
2059	CheckComRCReturnRC (autoCaller.rc());
2060
2061	AutoReadLock alock (this);
2062
2063	mParallelPorts [slot].queryInterfaceTo (port);
2064
2065	return S_OK;
2066	}
2067
2068	STDMETHODIMP Machine::GetNetworkAdapter (ULONG slot, INetworkAdapter **adapter)
2069	{
2070	if (!adapter)
2071	return E_POINTER;
2072	if (slot >= ELEMENTS (mNetworkAdapters))
2073	return setError (E_INVALIDARG, tr ("Invalid slot number: %d"), slot);
2074
2075	AutoCaller autoCaller (this);
2076	CheckComRCReturnRC (autoCaller.rc());
2077
2078	AutoReadLock alock (this);
2079
2080	mNetworkAdapters [slot].queryInterfaceTo (adapter);
2081
2082	return S_OK;
2083	}
2084
2085	/**
2086	* @note Locks this object for reading.
2087	*/
2088	STDMETHODIMP Machine::GetNextExtraDataKey (INPTR BSTR aKey, BSTR aNextKey, BSTR aNextValue)
2089	{
2090	if (!aNextKey)
2091	return E_POINTER;
2092
2093	AutoCaller autoCaller (this);
2094	CheckComRCReturnRC (autoCaller.rc());
2095
2096	/* serialize file access (prevent writes) */
2097	AutoReadLock alock (this);
2098
2099	/* start with nothing found */
2100	*aNextKey = NULL;
2101	if (aNextValue)
2102	*aNextValue = NULL;
2103
2104	/* if we're ready and isConfigLocked() is FALSE then it means
2105	* that no config file exists yet, so return shortly */
2106	if (!isConfigLocked())
2107	return S_OK;
2108
2109	HRESULT rc = S_OK;
2110
2111	try
2112	{
2113	using namespace settings;
2114
2115	/* load the settings file (we don't reuse the existing handle but
2116	* request a new one to allow for concurrent multithreaded reads) */
2117	File file (File::Mode_Read, Utf8Str (mData->mConfigFileFull));
2118	XmlTreeBackend tree;
2119
2120	rc = VirtualBox::loadSettingsTree_Again (tree, file);
2121	CheckComRCReturnRC (rc);
2122
2123	Key machineNode = tree.rootKey().key ("Machine");
2124	Key extraDataNode = machineNode.findKey ("ExtraData");
2125
2126	if (!extraDataNode.isNull())
2127	{
2128	Key::List items = extraDataNode.keys ("ExtraDataItem");
2129	if (items.size())
2130	{
2131	for (Key::List::const_iterator it = items.begin();
2132	it != items.end(); ++ it)
2133	{
2134	Bstr key = (*it).stringValue ("name");
2135
2136	/* if we're supposed to return the first one */
2137	if (aKey == NULL)
2138	{
2139	key.cloneTo (aNextKey);
2140	if (aNextValue)
2141	{
2142	Bstr val = (*it).stringValue ("value");
2143	val.cloneTo (aNextValue);
2144	}
2145	return S_OK;
2146	}
2147
2148	/* did we find the key we're looking for? */
2149	if (key == aKey)
2150	{
2151	++ it;
2152	/* is there another item? */
2153	if (it != items.end())
2154	{
2155	Bstr key = (*it).stringValue ("name");
2156	key.cloneTo (aNextKey);
2157	if (aNextValue)
2158	{
2159	Bstr val = (*it).stringValue ("value");
2160	val.cloneTo (aNextValue);
2161	}
2162	}
2163	/* else it's the last one, arguments are already NULL */
2164	return S_OK;
2165	}
2166	}
2167	}
2168	}
2169
2170	/* Here we are when a) there are no items at all or b) there are items
2171	* but none of them equals to the requested non-NULL key. b) is an
2172	* error as well as a) if the key is non-NULL. When the key is NULL
2173	* (which is the case only when there are no items), we just fall
2174	* through to return NULLs and S_OK. */
2175
2176	if (aKey != NULL)
2177	return setError (E_FAIL,
2178	tr ("Could not find the extra data key '%ls'"), aKey);
2179	}
2180	catch (...)
2181	{
2182	rc = VirtualBox::handleUnexpectedExceptions (RT_SRC_POS);
2183	}
2184
2185	return rc;
2186	}
2187
2188	/**
2189	* @note Locks this object for reading.
2190	*/
2191	STDMETHODIMP Machine::GetExtraData (INPTR BSTR aKey, BSTR *aValue)
2192	{
2193	if (!aKey)
2194	return E_INVALIDARG;
2195	if (!aValue)
2196	return E_POINTER;
2197
2198	AutoCaller autoCaller (this);
2199	CheckComRCReturnRC (autoCaller.rc());
2200
2201	/* serialize file access (prevent writes) */
2202	AutoReadLock alock (this);
2203
2204	/* start with nothing found */
2205	*aValue = NULL;
2206
2207	/* if we're ready and isConfigLocked() is FALSE then it means
2208	* that no config file exists yet, so return shortly */
2209	if (!isConfigLocked())
2210	return S_OK;
2211
2212	HRESULT rc = S_OK;
2213
2214	try
2215	{
2216	using namespace settings;
2217
2218	/* load the settings file (we don't reuse the existing handle but
2219	* request a new one to allow for concurrent multithreaded reads) */
2220	File file (File::Mode_Read, Utf8Str (mData->mConfigFileFull));
2221	XmlTreeBackend tree;
2222
2223	rc = VirtualBox::loadSettingsTree_Again (tree, file);
2224	CheckComRCReturnRC (rc);
2225
2226	const Utf8Str key = aKey;
2227
2228	Key machineNode = tree.rootKey().key ("Machine");
2229	Key extraDataNode = machineNode.findKey ("ExtraData");
2230
2231	if (!extraDataNode.isNull())
2232	{
2233	/* check if the key exists */
2234	Key::List items = extraDataNode.keys ("ExtraDataItem");
2235	for (Key::List::const_iterator it = items.begin();
2236	it != items.end(); ++ it)
2237	{
2238	if (key == (*it).stringValue ("name"))
2239	{
2240	Bstr val = (*it).stringValue ("value");
2241	val.cloneTo (aValue);
2242	break;
2243	}
2244	}
2245	}
2246	}
2247	catch (...)
2248	{
2249	rc = VirtualBox::handleUnexpectedExceptions (RT_SRC_POS);
2250	}
2251
2252	return rc;
2253	}
2254
2255	/**
2256	* @note Locks mParent for writing + this object for writing.
2257	*/
2258	STDMETHODIMP Machine::SetExtraData (INPTR BSTR aKey, INPTR BSTR aValue)
2259	{
2260	if (!aKey)
2261	return E_INVALIDARG;
2262
2263	AutoCaller autoCaller (this);
2264	CheckComRCReturnRC (autoCaller.rc());
2265
2266	/* VirtualBox::onExtraDataCanChange() and saveSettings() need mParent
2267	* lock (saveSettings() needs a write one). This object's write lock is
2268	* also necessary to serialize file access (prevent concurrent reads and
2269	* writes). */
2270	AutoMultiWriteLock2 alock (mParent, this);
2271
2272	if (mType == IsSnapshotMachine)
2273	{
2274	HRESULT rc = checkStateDependency (MutableStateDep);
2275	CheckComRCReturnRC (rc);
2276	}
2277
2278	bool changed = false;
2279	HRESULT rc = S_OK;
2280
2281	/* If we're ready and isConfigLocked() is FALSE then it means that no
2282	* config file exists yet, so call saveSettings() to create one. */
2283	if (!isConfigLocked())
2284	{
2285	rc = saveSettings (false /* aMarkCurStateAsModified */);
2286	CheckComRCReturnRC (rc);
2287	}
2288
2289	try
2290	{
2291	using namespace settings;
2292
2293	/* load the settings file */
2294	File file (mData->mHandleCfgFile, Utf8Str (mData->mConfigFileFull));
2295	XmlTreeBackend tree;
2296
2297	rc = VirtualBox::loadSettingsTree_ForUpdate (tree, file);
2298	CheckComRCReturnRC (rc);
2299
2300	const Utf8Str key = aKey;
2301	Bstr oldVal;
2302
2303	Key machineNode = tree.rootKey().key ("Machine");
2304	Key extraDataNode = machineNode.createKey ("ExtraData");
2305	Key extraDataItemNode;
2306
2307	Key::List items = extraDataNode.keys ("ExtraDataItem");
2308	for (Key::List::const_iterator it = items.begin();
2309	it != items.end(); ++ it)
2310	{
2311	if (key == (*it).stringValue ("name"))
2312	{
2313	extraDataItemNode = *it;
2314	oldVal = (*it).stringValue ("value");
2315	break;
2316	}
2317	}
2318
2319	/* When no key is found, oldVal is null */
2320	changed = oldVal != aValue;
2321
2322	if (changed)
2323	{
2324	/* ask for permission from all listeners */
2325	Bstr error;
2326	if (!mParent->onExtraDataCanChange (mData->mUuid, aKey, aValue, error))
2327	{
2328	const char *sep = error.isEmpty() ? "" : ": ";
2329	const BSTR err = error.isNull() ? (const BSTR) L"" : error.raw();
2330	LogWarningFunc (("Someone vetoed! Change refused%s%ls\n",
2331	sep, err));
2332	return setError (E_ACCESSDENIED,
2333	tr ("Could not set extra data because someone refused "
2334	"the requested change of '%ls' to '%ls'%s%ls"),
2335	aKey, aValue, sep, err);
2336	}
2337
2338	if (aValue != NULL)
2339	{
2340	if (extraDataItemNode.isNull())
2341	{
2342	extraDataItemNode = extraDataNode.appendKey ("ExtraDataItem");
2343	extraDataItemNode.setStringValue ("name", key);
2344	}
2345	extraDataItemNode.setStringValue ("value", Utf8Str (aValue));
2346	}
2347	else
2348	{
2349	/* an old value does for sure exist here (XML schema
2350	* guarantees that "value" may not absent in the
2351	* <ExtraDataItem> element) */
2352	Assert (!extraDataItemNode.isNull());
2353	extraDataItemNode.zap();
2354	}
2355
2356	/* save settings on success */
2357	rc = VirtualBox::saveSettingsTree (tree, file,
2358	mData->mSettingsFileVersion);
2359	CheckComRCReturnRC (rc);
2360	}
2361	}
2362	catch (...)
2363	{
2364	rc = VirtualBox::handleUnexpectedExceptions (RT_SRC_POS);
2365	}
2366
2367	/* fire a notification */
2368	if (SUCCEEDED (rc) && changed)
2369	mParent->onExtraDataChange (mData->mUuid, aKey, aValue);
2370
2371	return rc;
2372	}
2373
2374	STDMETHODIMP Machine::SaveSettings()
2375	{
2376	AutoCaller autoCaller (this);
2377	CheckComRCReturnRC (autoCaller.rc());
2378
2379	/* saveSettings() needs mParent lock */
2380	AutoMultiWriteLock2 alock (mParent, this);
2381
2382	HRESULT rc = checkStateDependency (MutableStateDep);
2383	CheckComRCReturnRC (rc);
2384
2385	/* the settings file path may never be null */
2386	ComAssertRet (mData->mConfigFileFull, E_FAIL);
2387
2388	/* save all VM data excluding snapshots */
2389	return saveSettings();
2390	}
2391
2392	STDMETHODIMP Machine::SaveSettingsWithBackup (BSTR *aBakFileName)
2393	{
2394	if (!aBakFileName)
2395	return E_POINTER;
2396
2397	AutoCaller autoCaller (this);
2398	CheckComRCReturnRC (autoCaller.rc());
2399
2400	/* saveSettings() needs mParent lock */
2401	AutoMultiWriteLock2 alock (mParent, this);
2402
2403	HRESULT rc = checkStateDependency (MutableStateDep);
2404	CheckComRCReturnRC (rc);
2405
2406	/* the settings file path may never be null */
2407	ComAssertRet (mData->mConfigFileFull, E_FAIL);
2408
2409	/* perform backup only when there was auto-conversion */
2410	if (mData->mSettingsFileVersion != VBOX_XML_VERSION_FULL)
2411	{
2412	Bstr bakFileName;
2413
2414	HRESULT rc = VirtualBox::backupSettingsFile (mData->mConfigFileFull,
2415	mData->mSettingsFileVersion,
2416	bakFileName);
2417	CheckComRCReturnRC (rc);
2418
2419	bakFileName.cloneTo (aBakFileName);
2420	}
2421
2422	/* save all VM data excluding snapshots */
2423	return saveSettings();
2424	}
2425
2426	STDMETHODIMP Machine::DiscardSettings()
2427	{
2428	AutoCaller autoCaller (this);
2429	CheckComRCReturnRC (autoCaller.rc());
2430
2431	AutoWriteLock alock (this);
2432
2433	HRESULT rc = checkStateDependency (MutableStateDep);
2434	CheckComRCReturnRC (rc);
2435
2436	/*
2437	* during this rollback, the session will be notified if data has
2438	* been actually changed
2439	*/
2440	rollback (true /* aNotify */);
2441
2442	return S_OK;
2443	}
2444
2445	STDMETHODIMP Machine::DeleteSettings()
2446	{
2447	AutoCaller autoCaller (this);
2448	CheckComRCReturnRC (autoCaller.rc());
2449
2450	AutoWriteLock alock (this);
2451
2452	HRESULT rc = checkStateDependency (MutableStateDep);
2453	CheckComRCReturnRC (rc);
2454
2455	if (mData->mRegistered)
2456	return setError (E_FAIL,
2457	tr ("Cannot delete settings of a registered machine"));
2458
2459	/* delete the settings only when the file actually exists */
2460	if (isConfigLocked())
2461	{
2462	unlockConfig();
2463	int vrc = RTFileDelete (Utf8Str (mData->mConfigFileFull));
2464	if (VBOX_FAILURE (vrc))
2465	return setError (E_FAIL,
2466	tr ("Could not delete the settings file '%ls' (%Vrc)"),
2467	mData->mConfigFileFull.raw(), vrc);
2468
2469	/* delete the Logs folder, nothing important should be left
2470	* there (we don't check for errors because the user might have
2471	* some private files there that we don't want to delete) */
2472	Utf8Str logFolder;
2473	getLogFolder (logFolder);
2474	Assert (!logFolder.isEmpty());
2475	if (RTDirExists (logFolder))
2476	{
2477	/* Delete all VBox.log[.N] files from the Logs folder
2478	* (this must be in sync with the rotation logic in
2479	* Console::powerUpThread()). Also, delete the VBox.png[.N]
2480	* files that may have been created by the GUI. */
2481	Utf8Str log = Utf8StrFmt ("%s/VBox.log", logFolder.raw());
2482	RTFileDelete (log);
2483	log = Utf8StrFmt ("%s/VBox.png", logFolder.raw());
2484	RTFileDelete (log);
2485	for (int i = 3; i >= 0; i--)
2486	{
2487	log = Utf8StrFmt ("%s/VBox.log.%d", logFolder.raw(), i);
2488	RTFileDelete (log);
2489	log = Utf8StrFmt ("%s/VBox.png.%d", logFolder.raw(), i);
2490	RTFileDelete (log);
2491	}
2492
2493	RTDirRemove (logFolder);
2494	}
2495
2496	/* delete the Snapshots folder, nothing important should be left
2497	* there (we don't check for errors because the user might have
2498	* some private files there that we don't want to delete) */
2499	Utf8Str snapshotFolder = mUserData->mSnapshotFolderFull;
2500	Assert (!snapshotFolder.isEmpty());
2501	if (RTDirExists (snapshotFolder))
2502	RTDirRemove (snapshotFolder);
2503
2504	/* delete the directory that contains the settings file, but only
2505	* if it matches the VM name (i.e. a structure created by default in
2506	* prepareSaveSettings()) */
2507	{
2508	Utf8Str settingsDir;
2509	if (isInOwnDir (&settingsDir))
2510	RTDirRemove (settingsDir);
2511	}
2512	}
2513
2514	return S_OK;
2515	}
2516
2517	STDMETHODIMP Machine::GetSnapshot (INPTR GUIDPARAM aId, ISnapshot **aSnapshot)
2518	{
2519	if (!aSnapshot)
2520	return E_POINTER;
2521
2522	AutoCaller autoCaller (this);
2523	CheckComRCReturnRC (autoCaller.rc());
2524
2525	AutoReadLock alock (this);
2526
2527	Guid id = aId;
2528	ComObjPtr <Snapshot> snapshot;
2529
2530	HRESULT rc = findSnapshot (id, snapshot, true /* aSetError */);
2531	snapshot.queryInterfaceTo (aSnapshot);
2532
2533	return rc;
2534	}
2535
2536	STDMETHODIMP Machine::FindSnapshot (INPTR BSTR aName, ISnapshot **aSnapshot)
2537	{
2538	if (!aName)
2539	return E_INVALIDARG;
2540	if (!aSnapshot)
2541	return E_POINTER;
2542
2543	AutoCaller autoCaller (this);
2544	CheckComRCReturnRC (autoCaller.rc());
2545
2546	AutoReadLock alock (this);
2547
2548	ComObjPtr <Snapshot> snapshot;
2549
2550	HRESULT rc = findSnapshot (aName, snapshot, true /* aSetError */);
2551	snapshot.queryInterfaceTo (aSnapshot);
2552
2553	return rc;
2554	}
2555
2556	STDMETHODIMP Machine::SetCurrentSnapshot (INPTR GUIDPARAM aId)
2557	{
2558	/// @todo (dmik) don't forget to set
2559	// mData->mCurrentStateModified to FALSE
2560
2561	return setError (E_NOTIMPL, "Not implemented");
2562	}
2563
2564	STDMETHODIMP
2565	Machine::CreateSharedFolder (INPTR BSTR aName, INPTR BSTR aHostPath, BOOL aWritable)
2566	{
2567	if (!aName \|\| !aHostPath)
2568	return E_INVALIDARG;
2569
2570	AutoCaller autoCaller (this);
2571	CheckComRCReturnRC (autoCaller.rc());
2572
2573	AutoWriteLock alock (this);
2574
2575	HRESULT rc = checkStateDependency (MutableStateDep);
2576	CheckComRCReturnRC (rc);
2577
2578	ComObjPtr <SharedFolder> sharedFolder;
2579	rc = findSharedFolder (aName, sharedFolder, false /* aSetError */);
2580	if (SUCCEEDED (rc))
2581	return setError (E_FAIL,
2582	tr ("Shared folder named '%ls' already exists"), aName);
2583
2584	sharedFolder.createObject();
2585	rc = sharedFolder->init (machine(), aName, aHostPath, aWritable);
2586	CheckComRCReturnRC (rc);
2587
2588	BOOL accessible = FALSE;
2589	rc = sharedFolder->COMGETTER(Accessible) (&accessible);
2590	CheckComRCReturnRC (rc);
2591
2592	if (!accessible)
2593	return setWarning (E_FAIL,
2594	tr ("Shared folder host path '%ls' is not accessible"), aHostPath);
2595
2596	mHWData.backup();
2597	mHWData->mSharedFolders.push_back (sharedFolder);
2598
2599	/* inform the direct session if any */
2600	alock.leave();
2601	onSharedFolderChange();
2602
2603	return S_OK;
2604	}
2605
2606	STDMETHODIMP Machine::RemoveSharedFolder (INPTR BSTR aName)
2607	{
2608	if (!aName)
2609	return E_INVALIDARG;
2610
2611	AutoCaller autoCaller (this);
2612	CheckComRCReturnRC (autoCaller.rc());
2613
2614	AutoWriteLock alock (this);
2615
2616	HRESULT rc = checkStateDependency (MutableStateDep);
2617	CheckComRCReturnRC (rc);
2618
2619	ComObjPtr <SharedFolder> sharedFolder;
2620	rc = findSharedFolder (aName, sharedFolder, true /* aSetError */);
2621	CheckComRCReturnRC (rc);
2622
2623	mHWData.backup();
2624	mHWData->mSharedFolders.remove (sharedFolder);
2625
2626	/* inform the direct session if any */
2627	alock.leave();
2628	onSharedFolderChange();
2629
2630	return S_OK;
2631	}
2632
2633	STDMETHODIMP Machine::CanShowConsoleWindow (BOOL *aCanShow)
2634	{
2635	if (!aCanShow)
2636	return E_POINTER;
2637
2638	/* start with No */
2639	*aCanShow = FALSE;
2640
2641	AutoCaller autoCaller (this);
2642	AssertComRCReturnRC (autoCaller.rc());
2643
2644	ComPtr <IInternalSessionControl> directControl;
2645	{
2646	AutoReadLock alock (this);
2647
2648	if (mData->mSession.mState != SessionState_Open)
2649	return setError (E_FAIL,
2650	tr ("Machine session is not open (session state: %d)"),
2651	mData->mSession.mState);
2652
2653	directControl = mData->mSession.mDirectControl;
2654	}
2655
2656	/* ignore calls made after #OnSessionEnd() is called */
2657	if (!directControl)
2658	return S_OK;
2659
2660	ULONG64 dummy;
2661	return directControl->OnShowWindow (TRUE /* aCheck */, aCanShow, &dummy);
2662	}
2663
2664	STDMETHODIMP Machine::ShowConsoleWindow (ULONG64 *aWinId)
2665	{
2666	if (!aWinId)
2667	return E_POINTER;
2668
2669	AutoCaller autoCaller (this);
2670	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
2671
2672	ComPtr <IInternalSessionControl> directControl;
2673	{
2674	AutoReadLock alock (this);
2675
2676	if (mData->mSession.mState != SessionState_Open)
2677	return setError (E_FAIL,
2678	tr ("Machine session is not open (session state: %d)"),
2679	mData->mSession.mState);
2680
2681	directControl = mData->mSession.mDirectControl;
2682	}
2683
2684	/* ignore calls made after #OnSessionEnd() is called */
2685	if (!directControl)
2686	return S_OK;
2687
2688	BOOL dummy;
2689	return directControl->OnShowWindow (FALSE /* aCheck */, &dummy, aWinId);
2690	}
2691
2692	STDMETHODIMP Machine::GetGuestProperty (INPTR BSTR aKey, BSTR aValue, ULONG64 aTimestamp, BSTR *aFlags)
2693	{
2694	#if !defined (VBOX_WITH_GUEST_PROPS)
2695	return E_NOTIMPL;
2696	#else
2697	if (!VALID_PTR (aKey))
2698	return E_INVALIDARG;
2699	if (!VALID_PTR (aValue))
2700	return E_POINTER;
2701	if (!VALID_PTR (aTimestamp))
2702	return E_POINTER;
2703	if (!VALID_PTR (aFlags))
2704	return E_POINTER;
2705
2706	AutoCaller autoCaller (this);
2707	CheckComRCReturnRC (autoCaller.rc());
2708
2709	AutoReadLock alock (this);
2710
2711	using namespace guestProp;
2712	HRESULT rc = E_FAIL;
2713
2714	if (!mHWData->mPropertyServiceActive)
2715	{
2716	bool found = false;
2717	for (HWData::GuestPropertyList::const_iterator it = mHWData->mGuestProperties.begin();
2718	(it != mHWData->mGuestProperties.end()) && !found; ++it)
2719	{
2720	if (it->mName == aKey)
2721	{
2722	it->mValue.cloneTo(aValue);
2723	*aTimestamp = it->mTimestamp;
2724	it->mFlags.cloneTo(aFlags);
2725	found = true;
2726	}
2727	}
2728	rc = S_OK;
2729	}
2730	else
2731	{
2732	ComPtr <IInternalSessionControl> directControl =
2733	mData->mSession.mDirectControl;
2734
2735	/* just be on the safe side when calling another process */
2736	alock.unlock();
2737
2738	rc = directControl->AccessGuestProperty (aKey, NULL, NULL,
2739	false /* isSetter */,
2740	aValue, aTimestamp, aFlags);
2741	}
2742	return rc;
2743	#endif /* else !defined (VBOX_WITH_GUEST_PROPS) */
2744	}
2745
2746	STDMETHODIMP Machine::GetGuestPropertyValue (INPTR BSTR aKey, BSTR *aValue)
2747	{
2748	ULONG64 dummyTimestamp;
2749	BSTR dummyFlags;
2750	return GetGuestProperty(aKey, aValue, &dummyTimestamp, &dummyFlags);
2751	}
2752
2753	STDMETHODIMP Machine::GetGuestPropertyTimestamp (INPTR BSTR aKey, ULONG64 *aTimestamp)
2754	{
2755	BSTR dummyValue;
2756	BSTR dummyFlags;
2757	return GetGuestProperty(aKey, &dummyValue, aTimestamp, &dummyFlags);
2758	}
2759
2760	STDMETHODIMP Machine::SetGuestProperty (INPTR BSTR aName, INPTR BSTR aValue, INPTR BSTR aFlags)
2761	{
2762	#if !defined (VBOX_WITH_GUEST_PROPS)
2763	return E_NOTIMPL;
2764	#else
2765	if (!VALID_PTR (aName))
2766	return E_INVALIDARG;
2767	if ((aValue != NULL) && !VALID_PTR (aValue))
2768	return E_INVALIDARG;
2769	if ((aFlags != NULL) && !VALID_PTR (aFlags))
2770	return E_INVALIDARG;
2771
2772	/* For now there are no valid flags, so check this. */
2773	if (aFlags != NULL)
2774	for (size_t i = 0; aFlags[i] != '\0'; ++i)
2775	if (aFlags[i] != ' ')
2776	return E_INVALIDARG;
2777
2778	AutoCaller autoCaller (this);
2779	CheckComRCReturnRC (autoCaller.rc());
2780
2781	AutoWriteLock alock (this);
2782
2783	HRESULT rc = checkStateDependency (MutableStateDep);
2784	CheckComRCReturnRC (rc);
2785
2786	using namespace guestProp;
2787	rc = E_FAIL;
2788
2789	if (!mHWData->mPropertyServiceActive)
2790	{
2791	bool found = false;
2792	HWData::GuestProperty property;
2793	for (HWData::GuestPropertyList::iterator it = mHWData->mGuestProperties.begin();
2794	(it != mHWData->mGuestProperties.end()) && !found; ++it)
2795	if (it->mName == aName)
2796	{
2797	property = *it;
2798	mHWData.backup();
2799	/* The backup() operation invalidates our iterator, so get a
2800	* new one. */
2801	for (it = mHWData->mGuestProperties.begin();
2802	it->mName != aName; ++it);
2803	mHWData->mGuestProperties.erase(it);
2804	found = true;
2805	}
2806	if (found)
2807	{
2808	if (NULL != aValue)
2809	{
2810	RTTIMESPEC time;
2811	property.mValue = aValue;
2812	property.mTimestamp = RTTimeSpecGetNano(RTTimeNow(&time));
2813	if (aFlags != NULL)
2814	property.mFlags = aFlags;
2815	mHWData->mGuestProperties.push_back(property);
2816	}
2817	}
2818	else if (aValue != NULL)
2819	{
2820	RTTIMESPEC time;
2821	mHWData.backup();
2822	property.mName = aName;
2823	property.mValue = aValue;
2824	property.mTimestamp = RTTimeSpecGetNano(RTTimeNow(&time));
2825	property.mFlags = (aFlags != NULL ? Bstr(aFlags) : Bstr(""));
2826	mHWData->mGuestProperties.push_back(property);
2827	}
2828	rc = S_OK;
2829	}
2830	else
2831	{
2832	ComPtr <IInternalSessionControl> directControl =
2833	mData->mSession.mDirectControl;
2834
2835	/* just be on the safe side when calling another process */
2836	alock.leave();
2837
2838	BSTR dummy = NULL;
2839	ULONG64 dummy64;
2840	rc = directControl->AccessGuestProperty (aName, aValue, aFlags,
2841	true /* isSetter */,
2842	&dummy, &dummy64, &dummy);
2843	}
2844	return rc;
2845	#endif /* else !defined (VBOX_WITH_GUEST_PROPS) */
2846	}
2847
2848	STDMETHODIMP Machine::SetGuestPropertyValue (INPTR BSTR aName, INPTR BSTR aValue)
2849	{
2850	return SetGuestProperty(aName, aValue, NULL);
2851	}
2852
2853	/**
2854	* Matches a sample name against a pattern.
2855	*
2856	* @returns True if matches, false if not.
2857	* @param pszPat Pattern.
2858	* @param pszName Name to match against the pattern.
2859	* @todo move this into IPRT
2860	*/
2861	static bool matchesSinglePattern(const char pszPat, const char pszName)
2862	{
2863	/* ASSUMES ASCII */
2864	for (;;)
2865	{
2866	char chPat = *pszPat;
2867	switch (chPat)
2868	{
2869	default:
2870	if (*pszName != chPat)
2871	return false;
2872	break;
2873
2874	case '*':
2875	{
2876	while ((chPat = ++pszPat) == '' \|\| chPat == '?')
2877	/* nothing */;
2878
2879	for (;;)
2880	{
2881	char ch = *pszName++;
2882	if ( ch == chPat
2883	&& ( !chPat
2884	\|\| matchesSinglePattern(pszPat + 1, pszName)))
2885	return true;
2886	if (!ch)
2887	return false;
2888	}
2889	/* won't ever get here */
2890	break;
2891	}
2892
2893	case '?':
2894	if (!*pszName)
2895	return false;
2896	break;
2897
2898	case '\0':
2899	return !*pszName;
2900	}
2901	pszName++;
2902	pszPat++;
2903	}
2904	return true;
2905	}
2906
2907	/* Checks to see if the given string matches against one of the patterns in
2908	* the list. */
2909	static bool matchesPattern(const char *paszPatterns, size_t cchPatterns,
2910	const char *pszString)
2911	{
2912	size_t iOffs = 0;
2913	/* If the first pattern in the list is empty, treat it as "match all". */
2914	bool matched = (cchPatterns > 0) && (0 == *paszPatterns) ? true : false;
2915	while ((iOffs < cchPatterns) && !matched)
2916	{
2917	size_t cchCurrent;
2918	if ( RT_SUCCESS(RTStrNLenEx(paszPatterns + iOffs,
2919	cchPatterns - iOffs, &cchCurrent))
2920	&& (cchCurrent > 0)
2921	)
2922	{
2923	matched = matchesSinglePattern(paszPatterns + iOffs, pszString);
2924	iOffs += cchCurrent + 1;
2925	}
2926	else
2927	iOffs = cchPatterns;
2928	}
2929	return matched;
2930	}
2931
2932	STDMETHODIMP Machine::EnumerateGuestProperties (INPTR BSTR aPatterns, ComSafeArrayOut(BSTR, aNames), ComSafeArrayOut(BSTR, aValues), ComSafeArrayOut(ULONG64, aTimestamps), ComSafeArrayOut(BSTR, aFlags))
2933	{
2934	#if !defined (VBOX_WITH_GUEST_PROPS)
2935	return E_NOTIMPL;
2936	#else
2937	if (!VALID_PTR (aPatterns) && (aPatterns != NULL))
2938	return E_POINTER;
2939	if (ComSafeArrayOutIsNull (aNames))
2940	return E_POINTER;
2941	if (ComSafeArrayOutIsNull (aValues))
2942	return E_POINTER;
2943	if (ComSafeArrayOutIsNull (aTimestamps))
2944	return E_POINTER;
2945	if (ComSafeArrayOutIsNull (aFlags))
2946	return E_POINTER;
2947
2948	AutoCaller autoCaller (this);
2949	CheckComRCReturnRC (autoCaller.rc());
2950
2951	AutoReadLock alock (this);
2952
2953	using namespace guestProp;
2954	HRESULT rc = E_FAIL;
2955
2956	if (!mHWData->mPropertyServiceActive)
2957	{
2958
2959	/*
2960	* Set up the pattern parameter, translating the comma-separated list to a
2961	* double-terminated zero-separated one.
2962	*/
2963	/** @todo skip this conversion. */
2964	Utf8Str Utf8PatternsIn = aPatterns;
2965	if ((aPatterns != NULL) && Utf8PatternsIn.isNull())
2966	return E_OUTOFMEMORY;
2967	size_t cchPatterns = Utf8PatternsIn.length();
2968	Utf8Str Utf8Patterns(cchPatterns + 2); /* Double terminator */
2969	if (Utf8Patterns.isNull())
2970	return E_OUTOFMEMORY;
2971	char *pszPatterns = Utf8Patterns.mutableRaw();
2972	unsigned iPatterns = 0;
2973	for (unsigned i = 0; i < cchPatterns; ++i)
2974	{
2975	char cIn = Utf8PatternsIn.raw()[i];
2976	if ((cIn != ',') && (cIn != ' '))
2977	pszPatterns[iPatterns] = cIn;
2978	else if (cIn != ' ')
2979	pszPatterns[iPatterns] = '\0';
2980	if (cIn != ' ')
2981	++iPatterns;
2982	}
2983	pszPatterns[iPatterns] = '\0';
2984	++iPatterns;
2985
2986	/*
2987	* Look for matching patterns and build up a list.
2988	*/
2989	HWData::GuestPropertyList propList;
2990	for (HWData::GuestPropertyList::iterator it = mHWData->mGuestProperties.begin();
2991	it != mHWData->mGuestProperties.end(); ++it)
2992	if (matchesPattern(pszPatterns, iPatterns, Utf8Str(it->mName).raw()))
2993	propList.push_back(*it);
2994
2995	/*
2996	* And build up the arrays for returning the property information.
2997	*/
2998	size_t cEntries = propList.size();
2999	SafeArray <BSTR> names(cEntries);
3000	SafeArray <BSTR> values(cEntries);
3001	SafeArray <ULONG64> timestamps(cEntries);
3002	SafeArray <BSTR> flags(cEntries);
3003	size_t iProp = 0;
3004	for (HWData::GuestPropertyList::iterator it = propList.begin();
3005	it != propList.end(); ++it)
3006	{
3007	it->mName.cloneTo(&names[iProp]);
3008	it->mValue.cloneTo(&values[iProp]);
3009	timestamps[iProp] = it->mTimestamp;
3010	it->mFlags.cloneTo(&flags[iProp]);
3011	++iProp;
3012	}
3013	names.detachTo(ComSafeArrayOutArg (aNames));
3014	values.detachTo(ComSafeArrayOutArg (aValues));
3015	timestamps.detachTo(ComSafeArrayOutArg (aTimestamps));
3016	flags.detachTo(ComSafeArrayOutArg (aFlags));
3017	rc = S_OK;
3018	}
3019	else
3020	{
3021	ComPtr <IInternalSessionControl> directControl =
3022	mData->mSession.mDirectControl;
3023
3024	/* just be on the safe side when calling another process */
3025	alock.unlock();
3026
3027	rc = directControl->EnumerateGuestProperties(aPatterns,
3028	ComSafeArrayOutArg(aNames),
3029	ComSafeArrayOutArg(aValues),
3030	ComSafeArrayOutArg(aTimestamps),
3031	ComSafeArrayOutArg(aFlags));
3032	}
3033	return rc;
3034	#endif /* else !defined (VBOX_WITH_GUEST_PROPS) */
3035	}
3036
3037
3038	// public methods for internal purposes
3039	/////////////////////////////////////////////////////////////////////////////
3040
3041	/**
3042	* Returns the session machine object associated with the this machine.
3043	* The returned session machine is null if no direct session is currently open.
3044	*
3045	* @note locks this object for reading.
3046	*/
3047	ComObjPtr <SessionMachine> Machine::sessionMachine()
3048	{
3049	ComObjPtr <SessionMachine> sm;
3050
3051	AutoLimitedCaller autoCaller (this);
3052	AssertComRCReturn (autoCaller.rc(), sm);
3053
3054	/* return null for inaccessible machines */
3055	if (autoCaller.state() != Ready)
3056	return sm;
3057
3058	AutoReadLock alock (this);
3059
3060	sm = mData->mSession.mMachine;
3061	Assert (!sm.isNull() \|\|
3062	mData->mSession.mState != SessionState_Open);
3063
3064	return sm;
3065	}
3066
3067	/**
3068	* Saves the registry entry of this machine to the given configuration node.
3069	*
3070	* @param aEntryNode Node to save the registry entry to.
3071	*
3072	* @note locks this object for reading.
3073	*/
3074	HRESULT Machine::saveRegistryEntry (settings::Key &aEntryNode)
3075	{
3076	AssertReturn (!aEntryNode.isNull(), E_FAIL);
3077
3078	AutoLimitedCaller autoCaller (this);
3079	AssertComRCReturnRC (autoCaller.rc());
3080
3081	AutoReadLock alock (this);
3082
3083	/* UUID */
3084	aEntryNode.setValue <Guid> ("uuid", mData->mUuid);
3085	/* settings file name (possibly, relative) */
3086	aEntryNode.setValue <Bstr> ("src", mData->mConfigFile);
3087
3088	return S_OK;
3089	}
3090
3091	/**
3092	* Calculates the absolute path of the given path taking the directory of
3093	* the machine settings file as the current directory.
3094	*
3095	* @param aPath path to calculate the absolute path for
3096	* @param aResult where to put the result (used only on success,
3097	* so can be the same Utf8Str instance as passed as \a aPath)
3098	* @return VirtualBox result
3099	*
3100	* @note Locks this object for reading.
3101	*/
3102	int Machine::calculateFullPath (const char *aPath, Utf8Str &aResult)
3103	{
3104	AutoCaller autoCaller (this);
3105	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
3106
3107	AutoReadLock alock (this);
3108
3109	AssertReturn (!mData->mConfigFileFull.isNull(), VERR_GENERAL_FAILURE);
3110
3111	Utf8Str settingsDir = mData->mConfigFileFull;
3112
3113	RTPathStripFilename (settingsDir.mutableRaw());
3114	char folder [RTPATH_MAX];
3115	int vrc = RTPathAbsEx (settingsDir, aPath,
3116	folder, sizeof (folder));
3117	if (VBOX_SUCCESS (vrc))
3118	aResult = folder;
3119
3120	return vrc;
3121	}
3122
3123	/**
3124	* Tries to calculate the relative path of the given absolute path using the
3125	* directory of the machine settings file as the base directory.
3126	*
3127	* @param aPath absolute path to calculate the relative path for
3128	* @param aResult where to put the result (used only when it's possible to
3129	* make a relative path from the given absolute path;
3130	* otherwise left untouched)
3131	*
3132	* @note Locks this object for reading.
3133	*/
3134	void Machine::calculateRelativePath (const char *aPath, Utf8Str &aResult)
3135	{
3136	AutoCaller autoCaller (this);
3137	AssertComRCReturn (autoCaller.rc(), (void) 0);
3138
3139	AutoReadLock alock (this);
3140
3141	AssertReturnVoid (!mData->mConfigFileFull.isNull());
3142
3143	Utf8Str settingsDir = mData->mConfigFileFull;
3144
3145	RTPathStripFilename (settingsDir.mutableRaw());
3146	if (RTPathStartsWith (aPath, settingsDir))
3147	{
3148	/* when assigning, we create a separate Utf8Str instance because both
3149	* aPath and aResult can point to the same memory location when this
3150	* func is called (if we just do aResult = aPath, aResult will be freed
3151	* first, and since its the same as aPath, an attempt to copy garbage
3152	* will be made. */
3153	aResult = Utf8Str (aPath + settingsDir.length() + 1);
3154	}
3155	}
3156
3157	/**
3158	* Returns the full path to the machine's log folder in the
3159	* \a aLogFolder argument.
3160	*/
3161	void Machine::getLogFolder (Utf8Str &aLogFolder)
3162	{
3163	AutoCaller autoCaller (this);
3164	AssertComRCReturnVoid (autoCaller.rc());
3165
3166	AutoReadLock alock (this);
3167
3168	Utf8Str settingsDir;
3169	if (isInOwnDir (&settingsDir))
3170	{
3171	/* Log folder is <Machines>/<VM_Name>/Logs */
3172	aLogFolder = Utf8StrFmt ("%s%cLogs", settingsDir.raw(), RTPATH_DELIMITER);
3173	}
3174	else
3175	{
3176	/* Log folder is <Machines>/<VM_SnapshotFolder>/Logs */
3177	Assert (!mUserData->mSnapshotFolderFull.isEmpty());
3178	aLogFolder = Utf8StrFmt ("%ls%cLogs", mUserData->mSnapshotFolderFull.raw(),
3179	RTPATH_DELIMITER);
3180	}
3181	}
3182
3183	/**
3184	* Returns @c true if the given DVD image is attached to this machine either
3185	* in the current state or in any of the snapshots.
3186	*
3187	* @param aId Image ID to check.
3188	* @param aUsage Type of the check.
3189	*
3190	* @note Locks this object + DVD object for reading.
3191	*/
3192	bool Machine::isDVDImageUsed (const Guid &aId, ResourceUsage_T aUsage)
3193	{
3194	AutoLimitedCaller autoCaller (this);
3195	AssertComRCReturn (autoCaller.rc(), false);
3196
3197	/* answer 'not attached' if the VM is limited */
3198	if (autoCaller.state() == Limited)
3199	return false;
3200
3201	AutoReadLock alock (this);
3202
3203	Machine *m = this;
3204
3205	/* take the session machine when appropriate */
3206	if (!mData->mSession.mMachine.isNull())
3207	m = mData->mSession.mMachine;
3208
3209	/* first, check the current state */
3210	{
3211	const ComObjPtr <DVDDrive> &dvd = m->mDVDDrive;
3212	AssertReturn (!dvd.isNull(), false);
3213
3214	AutoReadLock dvdLock (dvd);
3215
3216	/* loop over the backed up (permanent) and current (temporary) DVD data */
3217	DVDDrive::Data *d [2];
3218	if (dvd->data().isBackedUp())
3219	{
3220	d [0] = dvd->data().backedUpData();
3221	d [1] = dvd->data().data();
3222	}
3223	else
3224	{
3225	d [0] = dvd->data().data();
3226	d [1] = NULL;
3227	}
3228
3229	if (!(aUsage & ResourceUsage_Permanent))
3230	d [0] = NULL;
3231	if (!(aUsage & ResourceUsage_Temporary))
3232	d [1] = NULL;
3233
3234	for (unsigned i = 0; i < ELEMENTS (d); ++ i)
3235	{
3236	if (d [i] &&
3237	d [i]->mDriveState == DriveState_ImageMounted)
3238	{
3239	Guid id;
3240	HRESULT rc = d [i]->mDVDImage->COMGETTER(Id) (id.asOutParam());
3241	AssertComRC (rc);
3242	if (id == aId)
3243	return true;
3244	}
3245	}
3246	}
3247
3248	/* then, check snapshots if any */
3249	if (aUsage & ResourceUsage_Permanent)
3250	{
3251	if (!mData->mFirstSnapshot.isNull() &&
3252	mData->mFirstSnapshot->isDVDImageUsed (aId))
3253	return true;
3254	}
3255
3256	return false;
3257	}
3258
3259	/**
3260	* Returns @c true if the given Floppy image is attached to this machine either
3261	* in the current state or in any of the snapshots.
3262	*
3263	* @param aId Image ID to check.
3264	* @param aUsage Type of the check.
3265	*
3266	* @note Locks this object + Floppy object for reading.
3267	*/
3268	bool Machine::isFloppyImageUsed (const Guid &aId, ResourceUsage_T aUsage)
3269	{
3270	AutoCaller autoCaller (this);
3271	AssertComRCReturn (autoCaller.rc(), false);
3272
3273	/* answer 'not attached' if the VM is limited */
3274	if (autoCaller.state() == Limited)
3275	return false;
3276
3277	AutoReadLock alock (this);
3278
3279	Machine *m = this;
3280
3281	/* take the session machine when appropriate */
3282	if (!mData->mSession.mMachine.isNull())
3283	m = mData->mSession.mMachine;
3284
3285	/* first, check the current state */
3286	{
3287	const ComObjPtr <FloppyDrive> &floppy = m->mFloppyDrive;
3288	AssertReturn (!floppy.isNull(), false);
3289
3290	AutoReadLock floppyLock (floppy);
3291
3292	/* loop over the backed up (permanent) and current (temporary) Floppy data */
3293	FloppyDrive::Data *d [2];
3294	if (floppy->data().isBackedUp())
3295	{
3296	d [0] = floppy->data().backedUpData();
3297	d [1] = floppy->data().data();
3298	}
3299	else
3300	{
3301	d [0] = floppy->data().data();
3302	d [1] = NULL;
3303	}
3304
3305	if (!(aUsage & ResourceUsage_Permanent))
3306	d [0] = NULL;
3307	if (!(aUsage & ResourceUsage_Temporary))
3308	d [1] = NULL;
3309
3310	for (unsigned i = 0; i < ELEMENTS (d); ++ i)
3311	{
3312	if (d [i] &&
3313	d [i]->mDriveState == DriveState_ImageMounted)
3314	{
3315	Guid id;
3316	HRESULT rc = d [i]->mFloppyImage->COMGETTER(Id) (id.asOutParam());
3317	AssertComRC (rc);
3318	if (id == aId)
3319	return true;
3320	}
3321	}
3322	}
3323
3324	/* then, check snapshots if any */
3325	if (aUsage & ResourceUsage_Permanent)
3326	{
3327	if (!mData->mFirstSnapshot.isNull() &&
3328	mData->mFirstSnapshot->isFloppyImageUsed (aId))
3329	return true;
3330	}
3331
3332	return false;
3333	}
3334
3335	/**
3336	* @note Locks mParent and this object for writing,
3337	* calls the client process (outside the lock).
3338	*/
3339	HRESULT Machine::openSession (IInternalSessionControl *aControl)
3340	{
3341	LogFlowThisFuncEnter();
3342
3343	AssertReturn (aControl, E_FAIL);
3344
3345	AutoCaller autoCaller (this);
3346	CheckComRCReturnRC (autoCaller.rc());
3347
3348	/* We need VirtualBox lock because of Progress::notifyComplete() */
3349	AutoMultiWriteLock2 alock (mParent, this);
3350
3351	if (!mData->mRegistered)
3352	return setError (E_UNEXPECTED,
3353	tr ("The machine '%ls' is not registered"), mUserData->mName.raw());
3354
3355	LogFlowThisFunc (("mSession.mState=%d\n", mData->mSession.mState));
3356
3357	if (mData->mSession.mState == SessionState_Open \|\|
3358	mData->mSession.mState == SessionState_Closing)
3359	return setError (E_ACCESSDENIED,
3360	tr ("A session for the machine '%ls' is currently open "
3361	"(or being closed)"),
3362	mUserData->mName.raw());
3363
3364	/* may not be Running */
3365	AssertReturn (mData->mMachineState < MachineState_Running, E_FAIL);
3366
3367	/* get the sesion PID */
3368	RTPROCESS pid = NIL_RTPROCESS;
3369	AssertCompile (sizeof (ULONG) == sizeof (RTPROCESS));
3370	aControl->GetPID ((ULONG *) &pid);
3371	Assert (pid != NIL_RTPROCESS);
3372
3373	if (mData->mSession.mState == SessionState_Spawning)
3374	{
3375	/* This machine is awaiting for a spawning session to be opened, so
3376	* reject any other open attempts from processes other than one
3377	* started by #openRemoteSession(). */
3378
3379	LogFlowThisFunc (("mSession.mPid=%d(0x%x)\n",
3380	mData->mSession.mPid, mData->mSession.mPid));
3381	LogFlowThisFunc (("session.pid=%d(0x%x)\n", pid, pid));
3382
3383	if (mData->mSession.mPid != pid)
3384	return setError (E_ACCESSDENIED,
3385	tr ("An unexpected process (PID=0x%08X) has tried to open a direct "
3386	"session with the machine named '%ls', while only a process "
3387	"started by OpenRemoteSession (PID=0x%08X) is allowed"),
3388	pid, mUserData->mName.raw(), mData->mSession.mPid);
3389	}
3390
3391	/* create a SessionMachine object */
3392	ComObjPtr <SessionMachine> sessionMachine;
3393	sessionMachine.createObject();
3394	HRESULT rc = sessionMachine->init (this);
3395	AssertComRC (rc);
3396
3397	if (SUCCEEDED (rc))
3398	{
3399	/*
3400	* Set the session state to Spawning to protect against subsequent
3401	* attempts to open a session and to unregister the machine after
3402	* we leave the lock.
3403	*/
3404	SessionState_T origState = mData->mSession.mState;
3405	mData->mSession.mState = SessionState_Spawning;
3406
3407	/*
3408	* Leave the lock before calling the client process -- it will call
3409	* Machine/SessionMachine methods. Leaving the lock here is quite safe
3410	* because the state is Spawning, so that openRemotesession() and
3411	* openExistingSession() calls will fail. This method, called before we
3412	* enter the lock again, will fail because of the wrong PID.
3413	*
3414	* Note that mData->mSession.mRemoteControls accessed outside
3415	* the lock may not be modified when state is Spawning, so it's safe.
3416	*/
3417	alock.leave();
3418
3419	LogFlowThisFunc (("Calling AssignMachine()...\n"));
3420	rc = aControl->AssignMachine (sessionMachine);
3421	LogFlowThisFunc (("AssignMachine() returned %08X\n", rc));
3422
3423	/* The failure may w/o any error info (from RPC), so provide one */
3424	if (FAILED (rc))
3425	setError (rc,
3426	tr ("Failed to assign the machine to the session"));
3427
3428	if (SUCCEEDED (rc) && origState == SessionState_Spawning)
3429	{
3430	/* complete the remote session initialization */
3431
3432	/* get the console from the direct session */
3433	ComPtr <IConsole> console;
3434	rc = aControl->GetRemoteConsole (console.asOutParam());
3435	ComAssertComRC (rc);
3436
3437	if (SUCCEEDED (rc) && !console)
3438	{
3439	ComAssert (!!console);
3440	rc = E_FAIL;
3441	}
3442
3443	/* assign machine & console to the remote sesion */
3444	if (SUCCEEDED (rc))
3445	{
3446	/*
3447	* after openRemoteSession(), the first and the only
3448	* entry in remoteControls is that remote session
3449	*/
3450	LogFlowThisFunc (("Calling AssignRemoteMachine()...\n"));
3451	rc = mData->mSession.mRemoteControls.front()->
3452	AssignRemoteMachine (sessionMachine, console);
3453	LogFlowThisFunc (("AssignRemoteMachine() returned %08X\n", rc));
3454
3455	/* The failure may w/o any error info (from RPC), so provide one */
3456	if (FAILED (rc))
3457	setError (rc,
3458	tr ("Failed to assign the machine to the remote session"));
3459	}
3460
3461	if (FAILED (rc))
3462	aControl->Uninitialize();
3463	}
3464
3465	/* enter the lock again */
3466	alock.enter();
3467
3468	/* Restore the session state */
3469	mData->mSession.mState = origState;
3470	}
3471
3472	/* finalize spawning amyway (this is why we don't return on errors above) */
3473	if (mData->mSession.mState == SessionState_Spawning)
3474	{
3475	/* Note that the progress object is finalized later */
3476
3477	/* We don't reset mSession.mPid and mType here because both are
3478	* necessary for SessionMachine::uninit() to reap the child process
3479	* later. */
3480
3481	if (FAILED (rc))
3482	{
3483	/* Remove the remote control from the list on failure
3484	* and reset session state to Closed. */
3485	mData->mSession.mRemoteControls.clear();
3486	mData->mSession.mState = SessionState_Closed;
3487	}
3488	}
3489	else
3490	{
3491	/* memorize PID of the directly opened session */
3492	if (SUCCEEDED (rc))
3493	mData->mSession.mPid = pid;
3494	}
3495
3496	if (SUCCEEDED (rc))
3497	{
3498	/* memorize the direct session control and cache IUnknown for it */
3499	mData->mSession.mDirectControl = aControl;
3500	mData->mSession.mState = SessionState_Open;
3501	/* associate the SessionMachine with this Machine */
3502	mData->mSession.mMachine = sessionMachine;
3503
3504	/* request an IUnknown pointer early from the remote party for later
3505	* identity checks (it will be internally cached within mDirectControl
3506	* at least on XPCOM) */
3507	ComPtr <IUnknown> unk = mData->mSession.mDirectControl;
3508	NOREF (unk);
3509	}
3510
3511	if (mData->mSession.mProgress)
3512	{
3513	/* finalize the progress after setting the state, for consistency */
3514	mData->mSession.mProgress->notifyComplete (rc);
3515	mData->mSession.mProgress.setNull();
3516	}
3517
3518	/* uninitialize the created session machine on failure */
3519	if (FAILED (rc))
3520	sessionMachine->uninit();
3521
3522	LogFlowThisFunc (("rc=%08X\n", rc));
3523	LogFlowThisFuncLeave();
3524	return rc;
3525	}
3526
3527	/**
3528	* @note Locks this object for writing, calls the client process
3529	* (inside the lock).
3530	*/
3531	HRESULT Machine::openRemoteSession (IInternalSessionControl *aControl,
3532	INPTR BSTR aType, INPTR BSTR aEnvironment,
3533	Progress *aProgress)
3534	{
3535	LogFlowThisFuncEnter();
3536
3537	AssertReturn (aControl, E_FAIL);
3538	AssertReturn (aProgress, E_FAIL);
3539
3540	AutoCaller autoCaller (this);
3541	CheckComRCReturnRC (autoCaller.rc());
3542
3543	AutoWriteLock alock (this);
3544
3545	if (!mData->mRegistered)
3546	return setError (E_UNEXPECTED,
3547	tr ("The machine '%ls' is not registered"), mUserData->mName.raw());
3548
3549	LogFlowThisFunc (("mSession.mState=%d\n", mData->mSession.mState));
3550
3551	if (mData->mSession.mState == SessionState_Open \|\|
3552	mData->mSession.mState == SessionState_Spawning \|\|
3553	mData->mSession.mState == SessionState_Closing)
3554	return setError (E_ACCESSDENIED,
3555	tr ("A session for the machine '%ls' is currently open "
3556	"(or being opened or closed)"),
3557	mUserData->mName.raw());
3558
3559	/* may not be Running */
3560	AssertReturn (mData->mMachineState < MachineState_Running, E_FAIL);
3561
3562	/* get the path to the executable */
3563	char path [RTPATH_MAX];
3564	RTPathAppPrivateArch (path, RTPATH_MAX);
3565	size_t sz = strlen (path);
3566	path [sz++] = RTPATH_DELIMITER;
3567	path [sz] = 0;
3568	char *cmd = path + sz;
3569	sz = RTPATH_MAX - sz;
3570
3571	int vrc = VINF_SUCCESS;
3572	RTPROCESS pid = NIL_RTPROCESS;
3573
3574	RTENV env = RTENV_DEFAULT;
3575
3576	if (aEnvironment)
3577	{
3578	char *newEnvStr = NULL;
3579
3580	do
3581	{
3582	/* clone the current environment */
3583	int vrc2 = RTEnvClone (&env, RTENV_DEFAULT);
3584	AssertRCBreakStmt (vrc2, vrc = vrc2);
3585
3586	newEnvStr = RTStrDup(Utf8Str (aEnvironment));
3587	AssertPtrBreakStmt (newEnvStr, vrc = vrc2);
3588
3589	/* put new variables to the environment
3590	* (ignore empty variable names here since RTEnv API
3591	* intentionally doesn't do that) */
3592	char *var = newEnvStr;
3593	for (char p = newEnvStr; p; ++ p)
3594	{
3595	if (p == '\n' && (p == newEnvStr \|\| (p - 1) != '\\'))
3596	{
3597	*p = '\0';
3598	if (*var)
3599	{
3600	char *val = strchr (var, '=');
3601	if (val)
3602	{
3603	*val++ = '\0';
3604	vrc2 = RTEnvSetEx (env, var, val);
3605	}
3606	else
3607	vrc2 = RTEnvUnsetEx (env, var);
3608	if (VBOX_FAILURE (vrc2))
3609	break;
3610	}
3611	var = p + 1;
3612	}
3613	}
3614	if (VBOX_SUCCESS (vrc2) && *var)
3615	vrc2 = RTEnvPutEx (env, var);
3616
3617	AssertRCBreakStmt (vrc2, vrc = vrc2);
3618	}
3619	while (0);
3620
3621	if (newEnvStr != NULL)
3622	RTStrFree(newEnvStr);
3623	}
3624
3625	Bstr type (aType);
3626	if (type == "gui" \|\| type == "GUI/Qt3")
3627	{
3628	#ifdef RT_OS_DARWIN /* Avoid Lanuch Services confusing this with the selector by using a helper app. */
3629	const char VirtualBox_exe[] = "../Resources/VirtualBoxVM.app/Contents/MacOS/VirtualBoxVM3";
3630	#else
3631	const char VirtualBox_exe[] = "VirtualBox3" HOSTSUFF_EXE;
3632	#endif
3633	Assert (sz >= sizeof (VirtualBox_exe));
3634	strcpy (cmd, VirtualBox_exe);
3635
3636	Utf8Str idStr = mData->mUuid.toString();
3637	#ifdef RT_OS_WINDOWS /** @todo drop this once the RTProcCreate bug has been fixed */
3638	const char * args[] = {path, "-startvm", idStr, 0 };
3639	#else
3640	Utf8Str name = mUserData->mName;
3641	const char * args[] = {path, "-comment", name, "-startvm", idStr, 0 };
3642	#endif
3643	vrc = RTProcCreate (path, args, env, 0, &pid);
3644	}
3645	else
3646	if (type == "GUI/Qt4")
3647	{
3648	#ifdef RT_OS_DARWIN /* Avoid Lanuch Services confusing this with the selector by using a helper app. */
3649	const char VirtualBox_exe[] = "../Resources/VirtualBoxVM.app/Contents/MacOS/VirtualBoxVM";
3650	#else
3651	const char VirtualBox_exe[] = "VirtualBox" HOSTSUFF_EXE;
3652	#endif
3653	Assert (sz >= sizeof (VirtualBox_exe));
3654	strcpy (cmd, VirtualBox_exe);
3655
3656	Utf8Str idStr = mData->mUuid.toString();
3657	#ifdef RT_OS_WINDOWS /** @todo drop this once the RTProcCreate bug has been fixed */
3658	const char * args[] = {path, "-startvm", idStr, 0 };
3659	#else
3660	Utf8Str name = mUserData->mName;
3661	const char * args[] = {path, "-comment", name, "-startvm", idStr, 0 };
3662	#endif
3663	vrc = RTProcCreate (path, args, env, 0, &pid);
3664	}
3665	else
3666	#ifdef VBOX_VRDP
3667	if (type == "vrdp")
3668	{
3669	const char VBoxVRDP_exe[] = "VBoxHeadless" HOSTSUFF_EXE;
3670	Assert (sz >= sizeof (VBoxVRDP_exe));
3671	strcpy (cmd, VBoxVRDP_exe);
3672
3673	Utf8Str idStr = mData->mUuid.toString();
3674	#ifdef RT_OS_WINDOWS
3675	const char * args[] = {path, "-startvm", idStr, 0 };
3676	#else
3677	Utf8Str name = mUserData->mName;
3678	const char * args[] = {path, "-comment", name, "-startvm", idStr, 0 };
3679	#endif
3680	vrc = RTProcCreate (path, args, env, 0, &pid);
3681	}
3682	else
3683	#endif /* VBOX_VRDP */
3684	if (type == "capture")
3685	{
3686	const char VBoxVRDP_exe[] = "VBoxHeadless" HOSTSUFF_EXE;
3687	Assert (sz >= sizeof (VBoxVRDP_exe));
3688	strcpy (cmd, VBoxVRDP_exe);
3689
3690	Utf8Str idStr = mData->mUuid.toString();
3691	#ifdef RT_OS_WINDOWS
3692	const char * args[] = {path, "-startvm", idStr, "-capture", 0 };
3693	#else
3694	Utf8Str name = mUserData->mName;
3695	const char * args[] = {path, "-comment", name, "-startvm", idStr, "-capture", 0 };
3696	#endif
3697	vrc = RTProcCreate (path, args, env, 0, &pid);
3698	}
3699	else
3700	{
3701	RTEnvDestroy (env);
3702	return setError (E_INVALIDARG,
3703	tr ("Invalid session type: '%ls'"), aType);
3704	}
3705
3706	RTEnvDestroy (env);
3707
3708	if (VBOX_FAILURE (vrc))
3709	return setError (E_FAIL,
3710	tr ("Could not launch a process for the machine '%ls' (%Vrc)"),
3711	mUserData->mName.raw(), vrc);
3712
3713	LogFlowThisFunc (("launched.pid=%d(0x%x)\n", pid, pid));
3714
3715	/*
3716	* Note that we don't leave the lock here before calling the client,
3717	* because it doesn't need to call us back if called with a NULL argument.
3718	* Leaving the lock herer is dangerous because we didn't prepare the
3719	* launch data yet, but the client we've just started may happen to be
3720	* too fast and call openSession() that will fail (because of PID, etc.),
3721	* so that the Machine will never get out of the Spawning session state.
3722	*/
3723
3724	/* inform the session that it will be a remote one */
3725	LogFlowThisFunc (("Calling AssignMachine (NULL)...\n"));
3726	HRESULT rc = aControl->AssignMachine (NULL);
3727	LogFlowThisFunc (("AssignMachine (NULL) returned %08X\n", rc));
3728
3729	if (FAILED (rc))
3730	{
3731	/* restore the session state */
3732	mData->mSession.mState = SessionState_Closed;
3733	/* The failure may w/o any error info (from RPC), so provide one */
3734	return setError (rc,
3735	tr ("Failed to assign the machine to the session"));
3736	}
3737
3738	/* attach launch data to the machine */
3739	Assert (mData->mSession.mPid == NIL_RTPROCESS);
3740	mData->mSession.mRemoteControls.push_back (aControl);
3741	mData->mSession.mProgress = aProgress;
3742	mData->mSession.mPid = pid;
3743	mData->mSession.mState = SessionState_Spawning;
3744	mData->mSession.mType = type;
3745
3746	LogFlowThisFuncLeave();
3747	return S_OK;
3748	}
3749
3750	/**
3751	* @note Locks this object for writing, calls the client process
3752	* (outside the lock).
3753	*/
3754	HRESULT Machine::openExistingSession (IInternalSessionControl *aControl)
3755	{
3756	LogFlowThisFuncEnter();
3757
3758	AssertReturn (aControl, E_FAIL);
3759
3760	AutoCaller autoCaller (this);
3761	CheckComRCReturnRC (autoCaller.rc());
3762
3763	AutoWriteLock alock (this);
3764
3765	if (!mData->mRegistered)
3766	return setError (E_UNEXPECTED,
3767	tr ("The machine '%ls' is not registered"), mUserData->mName.raw());
3768
3769	LogFlowThisFunc (("mSession.state=%d\n", mData->mSession.mState));
3770
3771	if (mData->mSession.mState != SessionState_Open)
3772	return setError (E_ACCESSDENIED,
3773	tr ("The machine '%ls' does not have an open session"),
3774	mUserData->mName.raw());
3775
3776	ComAssertRet (!mData->mSession.mDirectControl.isNull(), E_FAIL);
3777
3778	/*
3779	* Get the console from the direct session (note that we don't leave the
3780	* lock here because GetRemoteConsole must not call us back).
3781	*/
3782	ComPtr <IConsole> console;
3783	HRESULT rc = mData->mSession.mDirectControl->
3784	GetRemoteConsole (console.asOutParam());
3785	if (FAILED (rc))
3786	{
3787	/* The failure may w/o any error info (from RPC), so provide one */
3788	return setError (rc,
3789	tr ("Failed to get a console object from the direct session"));
3790	}
3791
3792	ComAssertRet (!console.isNull(), E_FAIL);
3793
3794	ComObjPtr <SessionMachine> sessionMachine = mData->mSession.mMachine;
3795	AssertReturn (!sessionMachine.isNull(), E_FAIL);
3796
3797	/*
3798	* Leave the lock before calling the client process. It's safe here
3799	* since the only thing to do after we get the lock again is to add
3800	* the remote control to the list (which doesn't directly influence
3801	* anything).
3802	*/
3803	alock.leave();
3804
3805	/* attach the remote session to the machine */
3806	LogFlowThisFunc (("Calling AssignRemoteMachine()...\n"));
3807	rc = aControl->AssignRemoteMachine (sessionMachine, console);
3808	LogFlowThisFunc (("AssignRemoteMachine() returned %08X\n", rc));
3809
3810	/* The failure may w/o any error info (from RPC), so provide one */
3811	if (FAILED (rc))
3812	return setError (rc,
3813	tr ("Failed to assign the machine to the session"));
3814
3815	alock.enter();
3816
3817	/* need to revalidate the state after entering the lock again */
3818	if (mData->mSession.mState != SessionState_Open)
3819	{
3820	aControl->Uninitialize();
3821
3822	return setError (E_ACCESSDENIED,
3823	tr ("The machine '%ls' does not have an open session"),
3824	mUserData->mName.raw());
3825	}
3826
3827	/* store the control in the list */
3828	mData->mSession.mRemoteControls.push_back (aControl);
3829
3830	LogFlowThisFuncLeave();
3831	return S_OK;
3832	}
3833
3834	/**
3835	* Checks that the registered flag of the machine can be set according to
3836	* the argument and sets it. On success, commits and saves all settings.
3837	*
3838	* @note When this machine is inaccessible, the only valid value for \a
3839	* aRegistered is FALSE (i.e. unregister the machine) because unregistered
3840	* inaccessible machines are not currently supported. Note that unregistering
3841	* an inaccessible machine will \b uninitialize this machine object. Therefore,
3842	* the caller must make sure there are no active Machine::addCaller() calls
3843	* on the current thread because this will block Machine::uninit().
3844	*
3845	* @note Must be called from mParent's write lock. Locks this object and
3846	* children for writing.
3847	*/
3848	HRESULT Machine::trySetRegistered (BOOL aRegistered)
3849	{
3850	AssertReturn (mParent->isWriteLockOnCurrentThread(), E_FAIL);
3851
3852	AutoLimitedCaller autoCaller (this);
3853	AssertComRCReturnRC (autoCaller.rc());
3854
3855	AutoWriteLock alock (this);
3856
3857	/* wait for state dependants to drop to zero */
3858	ensureNoStateDependencies (alock);
3859
3860	ComAssertRet (mData->mRegistered != aRegistered, E_FAIL);
3861
3862	if (!mData->mAccessible)
3863	{
3864	/* A special case: the machine is not accessible. */
3865
3866	/* inaccessible machines can only be unregistered */
3867	AssertReturn (!aRegistered, E_FAIL);
3868
3869	/* Uninitialize ourselves here because currently there may be no
3870	* unregistered that are inaccessible (this state combination is not
3871	* supported). Note releasing the caller and leaving the lock before
3872	* calling uninit() */
3873
3874	alock.leave();
3875	autoCaller.release();
3876
3877	uninit();
3878
3879	return S_OK;
3880	}
3881
3882	AssertReturn (autoCaller.state() == Ready, E_FAIL);
3883
3884	if (aRegistered)
3885	{
3886	if (mData->mRegistered)
3887	return setError (E_FAIL,
3888	tr ("The machine '%ls' with UUID {%s} is already registered"),
3889	mUserData->mName.raw(),
3890	mData->mUuid.toString().raw());
3891	}
3892	else
3893	{
3894	if (mData->mMachineState == MachineState_Saved)
3895	return setError (E_FAIL,
3896	tr ("Cannot unregister the machine '%ls' because it "
3897	"is in the Saved state"),
3898	mUserData->mName.raw());
3899
3900	size_t snapshotCount = 0;
3901	if (mData->mFirstSnapshot)
3902	snapshotCount = mData->mFirstSnapshot->descendantCount() + 1;
3903	if (snapshotCount)
3904	return setError (E_FAIL,
3905	tr ("Cannot unregister the machine '%ls' because it "
3906	"has %d snapshots"),
3907	mUserData->mName.raw(), snapshotCount);
3908
3909	if (mData->mSession.mState != SessionState_Closed)
3910	return setError (E_FAIL,
3911	tr ("Cannot unregister the machine '%ls' because it has an "
3912	"open session"),
3913	mUserData->mName.raw());
3914
3915	if (mHDData->mHDAttachments.size() != 0)
3916	return setError (E_FAIL,
3917	tr ("Cannot unregister the machine '%ls' because it "
3918	"has %d hard disks attached"),
3919	mUserData->mName.raw(), mHDData->mHDAttachments.size());
3920	}
3921
3922	/* Ensure the settings are saved. If we are going to be registered and
3923	* isConfigLocked() is FALSE then it means that no config file exists yet,
3924	* so create it. */
3925	if (isModified() \|\| (aRegistered && !isConfigLocked()))
3926	{
3927	HRESULT rc = saveSettings();
3928	CheckComRCReturnRC (rc);
3929	}
3930
3931	mData->mRegistered = aRegistered;
3932
3933	/* inform the USB proxy about all attached/detached USB filters */
3934	mUSBController->onMachineRegistered (aRegistered);
3935
3936	return S_OK;
3937	}
3938
3939	/**
3940	* Increases the number of objects dependent on the machine state or on the
3941	* registered state. Guarantees that these two states will not change at least
3942	* until #releaseStateDependency() is called.
3943	*
3944	* Depending on the @a aDepType value, additional state checks may be made.
3945	* These checks will set extended error info on failure. See
3946	* #checkStateDependency() for more info.
3947	*
3948	* If this method returns a failure, the dependency is not added and the caller
3949	* is not allowed to rely on any particular machine state or registration state
3950	* value and may return the failed result code to the upper level.
3951	*
3952	* @param aDepType Dependency type to add.
3953	* @param aState Current machine state (NULL if not interested).
3954	* @param aRegistered Current registered state (NULL if not interested).
3955	*
3956	* @note Locks this object for reading.
3957	*/
3958	HRESULT Machine::addStateDependency (StateDependency aDepType /* = AnyStateDep */,
3959	MachineState_T aState / = NULL */,
3960	BOOL aRegistered / = NULL */)
3961	{
3962	AutoCaller autoCaller (this);
3963	AssertComRCReturnRC (autoCaller.rc());
3964
3965	AutoReadLock alock (this);
3966
3967	HRESULT rc = checkStateDependency (aDepType);
3968	CheckComRCReturnRC (rc);
3969
3970	{
3971	AutoWriteLock stateLock (stateLockHandle());
3972
3973	if (mData->mMachineStateChangePending != 0)
3974	{
3975	/* ensureNoStateDependencies() is waiting for state dependencies to
3976	* drop to zero so don't add more. It may make sense to wait a bit
3977	* and retry before reporting an error (since the pending state
3978	* transition should be really quick) but let's just assert for
3979	* now to see if it ever happens on practice. */
3980
3981	AssertFailed();
3982
3983	return setError (E_ACCESSDENIED,
3984	tr ("Machine state change is in progress. "
3985	"Please retry the operation later."));
3986	}
3987
3988	++ mData->mMachineStateDeps;
3989	Assert (mData->mMachineStateDeps != 0 /* overflow */);
3990	}
3991
3992	if (aState)
3993	*aState = mData->mMachineState;
3994	if (aRegistered)
3995	*aRegistered = mData->mRegistered;
3996
3997	return S_OK;
3998	}
3999
4000	/**
4001	* Decreases the number of objects dependent on the machine state.
4002	* Must always complete the #addStateDependency() call after the state
4003	* dependency is no more necessary.
4004	*/
4005	void Machine::releaseStateDependency()
4006	{
4007	/* stateLockHandle() is the same handle that is used by AutoCaller
4008	* so lock it in advance to avoid two mutex requests in a raw */
4009	AutoWriteLock stateLock (stateLockHandle());
4010
4011	AutoCaller autoCaller (this);
4012	AssertComRCReturnVoid (autoCaller.rc());
4013
4014	AssertReturnVoid (mData->mMachineStateDeps != 0
4015	/* releaseStateDependency() w/o addStateDependency()? */);
4016	-- mData->mMachineStateDeps;
4017
4018	if (mData->mMachineStateDeps == 0)
4019	{
4020	/* inform ensureNoStateDependencies() that there are no more deps */
4021	if (mData->mMachineStateChangePending != 0)
4022	{
4023	Assert (mData->mMachineStateDepsSem != NIL_RTSEMEVENTMULTI);
4024	RTSemEventMultiSignal (mData->mMachineStateDepsSem);
4025	}
4026	}
4027	}
4028
4029	// protected methods
4030	/////////////////////////////////////////////////////////////////////////////
4031
4032	/**
4033	* Performs machine state checks based on the @a aDepType value. If a check
4034	* fails, this method will set extended error info, otherwise it will return
4035	* S_OK. It is supposed, that on failure, the caller will immedieately return
4036	* the return value of this method to the upper level.
4037	*
4038	* When @a aDepType is AnyStateDep, this method always returns S_OK.
4039	*
4040	* When @a aDepType is MutableStateDep, this method returns S_OK only if the
4041	* current state of this machine object allows to change settings of the
4042	* machine (i.e. the machine is not registered, or registered but not running
4043	* and not saved). It is useful to call this method from Machine setters
4044	* before performing any change.
4045	*
4046	* When @a aDepType is MutableOrSavedStateDep, this method behaves the same
4047	* as for MutableStateDep except that if the machine is saved, S_OK is also
4048	* returned. This is useful in setters which allow changing machine
4049	* properties when it is in the saved state.
4050	*
4051	* @param aDepType Dependency type to check.
4052	*
4053	* @note Non Machine based classes should use #addStateDependency() and
4054	* #releaseStateDependency() methods or the smart AutoStateDependency
4055	* template.
4056	*
4057	* @note This method must be called from under this object's read or write
4058	* lock.
4059	*/
4060	HRESULT Machine::checkStateDependency (StateDependency aDepType)
4061	{
4062	switch (aDepType)
4063	{
4064	case AnyStateDep:
4065	{
4066	break;
4067	}
4068	case MutableStateDep:
4069	{
4070	if (mData->mRegistered &&
4071	(mType != IsSessionMachine \|\|
4072	mData->mMachineState > MachineState_Paused \|\|
4073	mData->mMachineState == MachineState_Saved))
4074	return setError (E_ACCESSDENIED,
4075	tr ("The machine is not mutable (state is %d)"),
4076	mData->mMachineState);
4077	break;
4078	}
4079	case MutableOrSavedStateDep:
4080	{
4081	if (mData->mRegistered &&
4082	(mType != IsSessionMachine \|\|
4083	mData->mMachineState > MachineState_Paused))
4084	return setError (E_ACCESSDENIED,
4085	tr ("The machine is not mutable (state is %d)"),
4086	mData->mMachineState);
4087	break;
4088	}
4089	}
4090
4091	return S_OK;
4092	}
4093
4094	/**
4095	* Helper to initialize all associated child objects and allocate data
4096	* structures.
4097	*
4098	* This method must be called as a part of the object's initialization procedure
4099	* (usually done in the #init() method).
4100	*
4101	* @note Must be called only from #init() or from #registeredInit().
4102	*/
4103	HRESULT Machine::initDataAndChildObjects()
4104	{
4105	AutoCaller autoCaller (this);
4106	AssertComRCReturnRC (autoCaller.rc());
4107	AssertComRCReturn (autoCaller.state() == InInit \|\|
4108	autoCaller.state() == Limited, E_FAIL);
4109
4110	AssertReturn (!mData->mAccessible, E_FAIL);
4111
4112	/* allocate data structures */
4113	mSSData.allocate();
4114	mUserData.allocate();
4115	mHWData.allocate();
4116	mHDData.allocate();
4117
4118	/* initialize mOSTypeId */
4119	mUserData->mOSTypeId = mParent->getUnknownOSType()->id();
4120
4121	/* create associated BIOS settings object */
4122	unconst (mBIOSSettings).createObject();
4123	mBIOSSettings->init (this);
4124
4125	#ifdef VBOX_VRDP
4126	/* create an associated VRDPServer object (default is disabled) */
4127	unconst (mVRDPServer).createObject();
4128	mVRDPServer->init (this);
4129	#endif
4130
4131	/* create an associated DVD drive object */
4132	unconst (mDVDDrive).createObject();
4133	mDVDDrive->init (this);
4134
4135	/* create an associated floppy drive object */
4136	unconst (mFloppyDrive).createObject();
4137	mFloppyDrive->init (this);
4138
4139	/* create associated serial port objects */
4140	for (ULONG slot = 0; slot < ELEMENTS (mSerialPorts); slot ++)
4141	{
4142	unconst (mSerialPorts [slot]).createObject();
4143	mSerialPorts [slot]->init (this, slot);
4144	}
4145
4146	/* create associated parallel port objects */
4147	for (ULONG slot = 0; slot < ELEMENTS (mParallelPorts); slot ++)
4148	{
4149	unconst (mParallelPorts [slot]).createObject();
4150	mParallelPorts [slot]->init (this, slot);
4151	}
4152
4153	/* create the audio adapter object (always present, default is disabled) */
4154	unconst (mAudioAdapter).createObject();
4155	mAudioAdapter->init (this);
4156
4157	/* create the USB controller object (always present, default is disabled) */
4158	unconst (mUSBController).createObject();
4159	mUSBController->init (this);
4160
4161	/* create the SATA controller object (always present, default is disabled) */
4162	unconst (mSATAController).createObject();
4163	mSATAController->init (this);
4164
4165	/* create associated network adapter objects */
4166	for (ULONG slot = 0; slot < ELEMENTS (mNetworkAdapters); slot ++)
4167	{
4168	unconst (mNetworkAdapters [slot]).createObject();
4169	mNetworkAdapters [slot]->init (this, slot);
4170	}
4171
4172	return S_OK;
4173	}
4174
4175	/**
4176	* Helper to uninitialize all associated child objects and to free all data
4177	* structures.
4178	*
4179	* This method must be called as a part of the object's uninitialization
4180	* procedure (usually done in the #uninit() method).
4181	*
4182	* @note Must be called only from #uninit() or from #registeredInit().
4183	*/
4184	void Machine::uninitDataAndChildObjects()
4185	{
4186	AutoCaller autoCaller (this);
4187	AssertComRCReturnVoid (autoCaller.rc());
4188	AssertComRCReturnVoid (autoCaller.state() == InUninit \|\|
4189	autoCaller.state() == Limited);
4190
4191	/* uninit all children using addDependentChild()/removeDependentChild()
4192	* in their init()/uninit() methods */
4193	uninitDependentChildren();
4194
4195	/* tell all our other child objects we've been uninitialized */
4196
4197	for (ULONG slot = 0; slot < ELEMENTS (mNetworkAdapters); slot ++)
4198	{
4199	if (mNetworkAdapters [slot])
4200	{
4201	mNetworkAdapters [slot]->uninit();
4202	unconst (mNetworkAdapters [slot]).setNull();
4203	}
4204	}
4205
4206	if (mUSBController)
4207	{
4208	mUSBController->uninit();
4209	unconst (mUSBController).setNull();
4210	}
4211
4212	if (mSATAController)
4213	{
4214	mSATAController->uninit();
4215	unconst (mSATAController).setNull();
4216	}
4217
4218	if (mAudioAdapter)
4219	{
4220	mAudioAdapter->uninit();
4221	unconst (mAudioAdapter).setNull();
4222	}
4223
4224	for (ULONG slot = 0; slot < ELEMENTS (mParallelPorts); slot ++)
4225	{
4226	if (mParallelPorts [slot])
4227	{
4228	mParallelPorts [slot]->uninit();
4229	unconst (mParallelPorts [slot]).setNull();
4230	}
4231	}
4232
4233	for (ULONG slot = 0; slot < ELEMENTS (mSerialPorts); slot ++)
4234	{
4235	if (mSerialPorts [slot])
4236	{
4237	mSerialPorts [slot]->uninit();
4238	unconst (mSerialPorts [slot]).setNull();
4239	}
4240	}
4241
4242	if (mFloppyDrive)
4243	{
4244	mFloppyDrive->uninit();
4245	unconst (mFloppyDrive).setNull();
4246	}
4247
4248	if (mDVDDrive)
4249	{
4250	mDVDDrive->uninit();
4251	unconst (mDVDDrive).setNull();
4252	}
4253
4254	#ifdef VBOX_VRDP
4255	if (mVRDPServer)
4256	{
4257	mVRDPServer->uninit();
4258	unconst (mVRDPServer).setNull();
4259	}
4260	#endif
4261
4262	if (mBIOSSettings)
4263	{
4264	mBIOSSettings->uninit();
4265	unconst (mBIOSSettings).setNull();
4266	}
4267
4268	/* Deassociate hard disks (only when a real Machine or a SnapshotMachine
4269	* instance is uninitialized; SessionMachine instances refer to real
4270	* Machine hard disks). This is necessary for a clean re-initialization of
4271	* the VM after successfully re-checking the accessibility state. Note
4272	* that in case of normal Machine or SnapshotMachine uninitialization (as
4273	* a result of unregistering or discarding the snapshot), outdated hard
4274	* disk attachments will already be uninitialized and deleted, so this
4275	* code will not affect them. */
4276	if (!!mHDData && (mType == IsMachine \|\| mType == IsSnapshotMachine))
4277	{
4278	for (HDData::HDAttachmentList::const_iterator it =
4279	mHDData->mHDAttachments.begin();
4280	it != mHDData->mHDAttachments.end();
4281	++ it)
4282	{
4283	(*it)->hardDisk()->setMachineId (Guid());
4284	}
4285	}
4286
4287	if (mType == IsMachine)
4288	{
4289	/* reset some important fields of mData */
4290	mData->mCurrentSnapshot.setNull();
4291	mData->mFirstSnapshot.setNull();
4292	}
4293
4294	/* free data structures (the essential mData structure is not freed here
4295	* since it may be still in use) */
4296	mHDData.free();
4297	mHWData.free();
4298	mUserData.free();
4299	mSSData.free();
4300	}
4301
4302	/**
4303	* Makes sure that there are no machine state dependants. If necessary, waits
4304	* for the number of dependants to drop to zero. Must be called from under this
4305	* object's write lock which will be released while waiting.
4306	*
4307	* @param aLock This object's write lock.
4308	*
4309	* @warning To be used only in methods that change the machine state!
4310	*/
4311	void Machine::ensureNoStateDependencies (AutoWriteLock &aLock)
4312	{
4313	AssertReturnVoid (aLock.belongsTo (this));
4314	AssertReturnVoid (aLock.isWriteLockOnCurrentThread());
4315
4316	AutoWriteLock stateLock (stateLockHandle());
4317
4318	/* Wait for all state dependants if necessary */
4319	if (mData->mMachineStateDeps != 0)
4320	{
4321	/* lazy semaphore creation */
4322	if (mData->mMachineStateDepsSem == NIL_RTSEMEVENTMULTI)
4323	RTSemEventMultiCreate (&mData->mMachineStateDepsSem);
4324
4325	LogFlowThisFunc (("Waiting for state deps (%d) to drop to zero...\n",
4326	mData->mMachineStateDeps));
4327
4328	++ mData->mMachineStateChangePending;
4329
4330	/* reset the semaphore before waiting, the last dependant will signal
4331	* it */
4332	RTSemEventMultiReset (mData->mMachineStateDepsSem);
4333
4334	stateLock.leave();
4335	aLock.leave();
4336
4337	RTSemEventMultiWait (mData->mMachineStateDepsSem, RT_INDEFINITE_WAIT);
4338
4339	aLock.enter();
4340	stateLock.enter();
4341
4342	-- mData->mMachineStateChangePending;
4343	}
4344	}
4345
4346	/**
4347	* Helper to change the machine state.
4348	*
4349	* @note Locks this object for writing.
4350	*/
4351	HRESULT Machine::setMachineState (MachineState_T aMachineState)
4352	{
4353	LogFlowThisFuncEnter();
4354	LogFlowThisFunc (("aMachineState=%d\n", aMachineState));
4355
4356	AutoCaller autoCaller (this);
4357	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
4358
4359	AutoWriteLock alock (this);
4360
4361	/* wait for state dependants to drop to zero */
4362	ensureNoStateDependencies (alock);
4363
4364	if (mData->mMachineState != aMachineState)
4365	{
4366	mData->mMachineState = aMachineState;
4367
4368	RTTimeNow (&mData->mLastStateChange);
4369
4370	mParent->onMachineStateChange (mData->mUuid, aMachineState);
4371	}
4372
4373	LogFlowThisFuncLeave();
4374	return S_OK;
4375	}
4376
4377	/**
4378	* Searches for a shared folder with the given logical name
4379	* in the collection of shared folders.
4380	*
4381	* @param aName logical name of the shared folder
4382	* @param aSharedFolder where to return the found object
4383	* @param aSetError whether to set the error info if the folder is
4384	* not found
4385	* @return
4386	* S_OK when found or E_INVALIDARG when not found
4387	*
4388	* @note
4389	* must be called from under the object's lock!
4390	*/
4391	HRESULT Machine::findSharedFolder (const BSTR aName,
4392	ComObjPtr <SharedFolder> &aSharedFolder,
4393	bool aSetError /* = false */)
4394	{
4395	bool found = false;
4396	for (HWData::SharedFolderList::const_iterator it = mHWData->mSharedFolders.begin();
4397	!found && it != mHWData->mSharedFolders.end();
4398	++ it)
4399	{
4400	AutoWriteLock alock (*it);
4401	found = (*it)->name() == aName;
4402	if (found)
4403	aSharedFolder = *it;
4404	}
4405
4406	HRESULT rc = found ? S_OK : E_INVALIDARG;
4407
4408	if (aSetError && !found)
4409	setError (rc, tr ("Could not find a shared folder named '%ls'"), aName);
4410
4411	return rc;
4412	}
4413
4414	/**
4415	* Loads all the VM settings by walking down the <Machine> node.
4416	*
4417	* @param aRegistered true when the machine is being loaded on VirtualBox
4418	* startup
4419	*
4420	* @note This method is intended to be called only from init(), so it assumes
4421	* all machine data fields have appropriate default values when it is called.
4422	*
4423	* @note Doesn't lock any objects.
4424	*/
4425	HRESULT Machine::loadSettings (bool aRegistered)
4426	{
4427	LogFlowThisFuncEnter();
4428	AssertReturn (mType == IsMachine, E_FAIL);
4429
4430	AutoCaller autoCaller (this);
4431	AssertReturn (autoCaller.state() == InInit, E_FAIL);
4432
4433	HRESULT rc = S_OK;
4434
4435	try
4436	{
4437	using namespace settings;
4438
4439	/* no concurrent file access is possible in init() so open by handle */
4440	File file (mData->mHandleCfgFile, Utf8Str (mData->mConfigFileFull));
4441	XmlTreeBackend tree;
4442
4443	rc = VirtualBox::loadSettingsTree_FirstTime (tree, file,
4444	mData->mSettingsFileVersion);
4445	CheckComRCThrowRC (rc);
4446
4447	Key machineNode = tree.rootKey().key ("Machine");
4448
4449	/* uuid (required) */
4450	Guid id = machineNode.value <Guid> ("uuid");
4451
4452	/* If the stored UUID is not empty, it means the registered machine
4453	* is being loaded. Compare the loaded UUID with the stored one taken
4454	* from the global registry. */
4455	if (!mData->mUuid.isEmpty())
4456	{
4457	if (mData->mUuid != id)
4458	{
4459	throw setError (E_FAIL,
4460	tr ("Machine UUID {%Vuuid} in '%ls' doesn't match its "
4461	"UUID {%s} in the registry file '%ls'"),
4462	id.raw(), mData->mConfigFileFull.raw(),
4463	mData->mUuid.toString().raw(),
4464	mParent->settingsFileName().raw());
4465	}
4466	}
4467	else
4468	unconst (mData->mUuid) = id;
4469
4470	/* name (required) */
4471	mUserData->mName = machineNode.stringValue ("name");
4472
4473	/* nameSync (optional, default is true) */
4474	mUserData->mNameSync = machineNode.value <bool> ("nameSync");
4475
4476	/* Description (optional, default is null) */
4477	{
4478	Key descNode = machineNode.findKey ("Description");
4479	if (!descNode.isNull())
4480	mUserData->mDescription = descNode.keyStringValue();
4481	else
4482	mUserData->mDescription.setNull();
4483	}
4484
4485	/* OSType (required) */
4486	{
4487	mUserData->mOSTypeId = machineNode.stringValue ("OSType");
4488
4489	/* look up the object by Id to check it is valid */
4490	ComPtr <IGuestOSType> guestOSType;
4491	rc = mParent->GetGuestOSType (mUserData->mOSTypeId,
4492	guestOSType.asOutParam());
4493	CheckComRCThrowRC (rc);
4494	}
4495
4496	/* stateFile (optional) */
4497	{
4498	Bstr stateFilePath = machineNode.stringValue ("stateFile");
4499	if (stateFilePath)
4500	{
4501	Utf8Str stateFilePathFull = stateFilePath;
4502	int vrc = calculateFullPath (stateFilePathFull, stateFilePathFull);
4503	if (VBOX_FAILURE (vrc))
4504	{
4505	throw setError (E_FAIL,
4506	tr ("Invalid saved state file path: '%ls' (%Vrc)"),
4507	stateFilePath.raw(), vrc);
4508	}
4509	mSSData->mStateFilePath = stateFilePathFull;
4510	}
4511	else
4512	mSSData->mStateFilePath.setNull();
4513	}
4514
4515	/*
4516	* currentSnapshot ID (optional)
4517	*
4518	* Note that due to XML Schema constaraints, this attribute, when
4519	* present, will guaranteedly refer to an existing snapshot
4520	* definition in XML
4521	*/
4522	Guid currentSnapshotId = machineNode.valueOr <Guid> ("currentSnapshot",
4523	Guid());
4524
4525	/* snapshotFolder (optional) */
4526	{
4527	Bstr folder = machineNode.stringValue ("snapshotFolder");
4528	rc = COMSETTER(SnapshotFolder) (folder);
4529	CheckComRCThrowRC (rc);
4530	}
4531
4532	/* currentStateModified (optional, default is true) */
4533	mData->mCurrentStateModified = machineNode.value <bool> ("currentStateModified");
4534
4535	/* lastStateChange (optional, defaults to now) */
4536	{
4537	RTTIMESPEC now;
4538	RTTimeNow (&now);
4539	mData->mLastStateChange =
4540	machineNode.valueOr <RTTIMESPEC> ("lastStateChange", now);
4541	}
4542
4543	/* aborted (optional, default is false) */
4544	bool aborted = machineNode.value <bool> ("aborted");
4545
4546	/*
4547	* note: all mUserData members must be assigned prior this point because
4548	* we need to commit changes in order to let mUserData be shared by all
4549	* snapshot machine instances.
4550	*/
4551	mUserData.commitCopy();
4552
4553	/* Snapshot node (optional) */
4554	{
4555	Key snapshotNode = machineNode.findKey ("Snapshot");
4556	if (!snapshotNode.isNull())
4557	{
4558	/* read all snapshots recursively */
4559	rc = loadSnapshot (snapshotNode, currentSnapshotId, NULL);
4560	CheckComRCThrowRC (rc);
4561	}
4562	}
4563
4564	/* Hardware node (required) */
4565	rc = loadHardware (machineNode.key ("Hardware"));
4566	CheckComRCThrowRC (rc);
4567
4568	/* HardDiskAttachments node (required) */
4569	rc = loadHardDisks (machineNode.key ("HardDiskAttachments"), aRegistered);
4570	CheckComRCThrowRC (rc);
4571
4572	/*
4573	* NOTE: the assignment below must be the last thing to do,
4574	* otherwise it will be not possible to change the settings
4575	* somewehere in the code above because all setters will be
4576	* blocked by checkStateDependency (MutableStateDep).
4577	*/
4578
4579	/* set the machine state to Aborted or Saved when appropriate */
4580	if (aborted)
4581	{
4582	Assert (!mSSData->mStateFilePath);
4583	mSSData->mStateFilePath.setNull();
4584
4585	/* no need to use setMachineState() during init() */
4586	mData->mMachineState = MachineState_Aborted;
4587	}
4588	else if (mSSData->mStateFilePath)
4589	{
4590	/* no need to use setMachineState() during init() */
4591	mData->mMachineState = MachineState_Saved;
4592	}
4593	}
4594	catch (HRESULT err)
4595	{
4596	/* we assume that error info is set by the thrower */
4597	rc = err;
4598	}
4599	catch (...)
4600	{
4601	rc = VirtualBox::handleUnexpectedExceptions (RT_SRC_POS);
4602	}
4603
4604	LogFlowThisFuncLeave();
4605	return rc;
4606	}
4607
4608	/**
4609	* Recursively loads all snapshots starting from the given.
4610	*
4611	* @param aNode <Snapshot> node.
4612	* @param aCurSnapshotId Current snapshot ID from the settings file.
4613	* @param aParentSnapshot Parent snapshot.
4614	*/
4615	HRESULT Machine::loadSnapshot (const settings::Key &aNode,
4616	const Guid &aCurSnapshotId,
4617	Snapshot *aParentSnapshot)
4618	{
4619	using namespace settings;
4620
4621	AssertReturn (!aNode.isNull(), E_INVALIDARG);
4622	AssertReturn (mType == IsMachine, E_FAIL);
4623
4624	/* create a snapshot machine object */
4625	ComObjPtr <SnapshotMachine> snapshotMachine;
4626	snapshotMachine.createObject();
4627
4628	HRESULT rc = S_OK;
4629
4630	/* required */
4631	Guid uuid = aNode.value <Guid> ("uuid");
4632
4633	{
4634	/* optional */
4635	Bstr stateFilePath = aNode.stringValue ("stateFile");
4636	if (stateFilePath)
4637	{
4638	Utf8Str stateFilePathFull = stateFilePath;
4639	int vrc = calculateFullPath (stateFilePathFull, stateFilePathFull);
4640	if (VBOX_FAILURE (vrc))
4641	return setError (E_FAIL,
4642	tr ("Invalid saved state file path: '%ls' (%Vrc)"),
4643	stateFilePath.raw(), vrc);
4644
4645	stateFilePath = stateFilePathFull;
4646	}
4647
4648	/* Hardware node (required) */
4649	Key hardwareNode = aNode.key ("Hardware");
4650
4651	/* HardDiskAttachments node (required) */
4652	Key hdasNode = aNode.key ("HardDiskAttachments");
4653
4654	/* initialize the snapshot machine */
4655	rc = snapshotMachine->init (this, hardwareNode, hdasNode,
4656	uuid, stateFilePath);
4657	CheckComRCReturnRC (rc);
4658	}
4659
4660	/* create a snapshot object */
4661	ComObjPtr <Snapshot> snapshot;
4662	snapshot.createObject();
4663
4664	{
4665	/* required */
4666	Bstr name = aNode.stringValue ("name");
4667
4668	/* required */
4669	RTTIMESPEC timeStamp = aNode.value <RTTIMESPEC> ("timeStamp");
4670
4671	/* optional */
4672	Bstr description;
4673	{
4674	Key descNode = aNode.findKey ("Description");
4675	if (!descNode.isNull())
4676	description = descNode.keyStringValue();
4677	}
4678
4679	/* initialize the snapshot */
4680	rc = snapshot->init (uuid, name, description, timeStamp,
4681	snapshotMachine, aParentSnapshot);
4682	CheckComRCReturnRC (rc);
4683	}
4684
4685	/* memorize the first snapshot if necessary */
4686	if (!mData->mFirstSnapshot)
4687	mData->mFirstSnapshot = snapshot;
4688
4689	/* memorize the current snapshot when appropriate */
4690	if (!mData->mCurrentSnapshot && snapshot->data().mId == aCurSnapshotId)
4691	mData->mCurrentSnapshot = snapshot;
4692
4693	/* Snapshots node (optional) */
4694	{
4695	Key snapshotsNode = aNode.findKey ("Snapshots");
4696	if (!snapshotsNode.isNull())
4697	{
4698	Key::List children = snapshotsNode.keys ("Snapshot");
4699	for (Key::List::const_iterator it = children.begin();
4700	it != children.end(); ++ it)
4701	{
4702	rc = loadSnapshot ((*it), aCurSnapshotId, snapshot);
4703	CheckComRCBreakRC (rc);
4704	}
4705	}
4706	}
4707
4708	return rc;
4709	}
4710
4711	/**
4712	* @param aNode <Hardware> node.
4713	*/
4714	HRESULT Machine::loadHardware (const settings::Key &aNode)
4715	{
4716	using namespace settings;
4717
4718	AssertReturn (!aNode.isNull(), E_INVALIDARG);
4719	AssertReturn (mType == IsMachine \|\| mType == IsSnapshotMachine, E_FAIL);
4720
4721	HRESULT rc = S_OK;
4722
4723	/* CPU node (currently not required) */
4724	{
4725	/* default value in case the node is not there */
4726	mHWData->mHWVirtExEnabled = TSBool_Default;
4727	mHWData->mHWVirtExNestedPagingEnabled = true;
4728	mHWData->mPAEEnabled = false;
4729
4730	Key cpuNode = aNode.findKey ("CPU");
4731	if (!cpuNode.isNull())
4732	{
4733	Key hwVirtExNode = cpuNode.key ("HardwareVirtEx");
4734	if (!hwVirtExNode.isNull())
4735	{
4736	const char *enabled = hwVirtExNode.stringValue ("enabled");
4737	if (strcmp (enabled, "false") == 0)
4738	mHWData->mHWVirtExEnabled = TSBool_False;
4739	else if (strcmp (enabled, "true") == 0)
4740	mHWData->mHWVirtExEnabled = TSBool_True;
4741	else
4742	mHWData->mHWVirtExEnabled = TSBool_Default;
4743	}
4744	/* HardwareVirtExNestedPaging (optional, default is true) */
4745	Key HWVirtExNestedPagingNode = cpuNode.findKey ("HardwareVirtExNestedPaging");
4746	if (!HWVirtExNestedPagingNode.isNull())
4747	{
4748	mHWData->mHWVirtExNestedPagingEnabled = HWVirtExNestedPagingNode.value <bool> ("enabled");
4749	}
4750
4751	/* PAE (optional, default is false) */
4752	Key PAENode = cpuNode.findKey ("PAE");
4753	if (!PAENode.isNull())
4754	{
4755	mHWData->mPAEEnabled = PAENode.value <bool> ("enabled");
4756	}
4757	}
4758	}
4759
4760	/* Memory node (required) */
4761	{
4762	Key memoryNode = aNode.key ("Memory");
4763
4764	mHWData->mMemorySize = memoryNode.value <ULONG> ("RAMSize");
4765	}
4766
4767	/* Boot node (required) */
4768	{
4769	/* reset all boot order positions to NoDevice */
4770	for (size_t i = 0; i < ELEMENTS (mHWData->mBootOrder); i++)
4771	mHWData->mBootOrder [i] = DeviceType_Null;
4772
4773	Key bootNode = aNode.key ("Boot");
4774
4775	Key::List orderNodes = bootNode.keys ("Order");
4776	for (Key::List::const_iterator it = orderNodes.begin();
4777	it != orderNodes.end(); ++ it)
4778	{
4779	/* position (required) */
4780	/* position unicity is guaranteed by XML Schema */
4781	uint32_t position = (*it).value <uint32_t> ("position");
4782	-- position;
4783	Assert (position < ELEMENTS (mHWData->mBootOrder));
4784
4785	/* device (required) */
4786	const char device = (it).stringValue ("device");
4787	if (strcmp (device, "None") == 0)
4788	mHWData->mBootOrder [position] = DeviceType_Null;
4789	else if (strcmp (device, "Floppy") == 0)
4790	mHWData->mBootOrder [position] = DeviceType_Floppy;
4791	else if (strcmp (device, "DVD") == 0)
4792	mHWData->mBootOrder [position] = DeviceType_DVD;
4793	else if (strcmp (device, "HardDisk") == 0)
4794	mHWData->mBootOrder [position] = DeviceType_HardDisk;
4795	else if (strcmp (device, "Network") == 0)
4796	mHWData->mBootOrder [position] = DeviceType_Network;
4797	else
4798	ComAssertMsgFailed (("Invalid device: %s\n", device));
4799	}
4800	}
4801
4802	/* Display node (required) */
4803	{
4804	Key displayNode = aNode.key ("Display");
4805
4806	mHWData->mVRAMSize = displayNode.value <ULONG> ("VRAMSize");
4807	mHWData->mMonitorCount = displayNode.value <ULONG> ("MonitorCount");
4808	}
4809
4810	#ifdef VBOX_VRDP
4811	/* RemoteDisplay */
4812	rc = mVRDPServer->loadSettings (aNode);
4813	CheckComRCReturnRC (rc);
4814	#endif
4815
4816	/* BIOS */
4817	rc = mBIOSSettings->loadSettings (aNode);
4818	CheckComRCReturnRC (rc);
4819
4820	/* DVD drive */
4821	rc = mDVDDrive->loadSettings (aNode);
4822	CheckComRCReturnRC (rc);
4823
4824	/* Floppy drive */
4825	rc = mFloppyDrive->loadSettings (aNode);
4826	CheckComRCReturnRC (rc);
4827
4828	/* USB Controller */
4829	rc = mUSBController->loadSettings (aNode);
4830	CheckComRCReturnRC (rc);
4831
4832	/* SATA Controller */
4833	rc = mSATAController->loadSettings (aNode);
4834	CheckComRCReturnRC (rc);
4835
4836	/* Network node (required) */
4837	{
4838	/* we assume that all network adapters are initially disabled
4839	* and detached */
4840
4841	Key networkNode = aNode.key ("Network");
4842
4843	rc = S_OK;
4844
4845	Key::List adapters = networkNode.keys ("Adapter");
4846	for (Key::List::const_iterator it = adapters.begin();
4847	it != adapters.end(); ++ it)
4848	{
4849	/* slot number (required) */
4850	/* slot unicity is guaranteed by XML Schema */
4851	uint32_t slot = (*it).value <uint32_t> ("slot");
4852	AssertBreak (slot < ELEMENTS (mNetworkAdapters));
4853
4854	rc = mNetworkAdapters [slot]->loadSettings (*it);
4855	CheckComRCReturnRC (rc);
4856	}
4857	}
4858
4859	/* Serial node (required) */
4860	{
4861	Key serialNode = aNode.key ("UART");
4862
4863	rc = S_OK;
4864
4865	Key::List ports = serialNode.keys ("Port");
4866	for (Key::List::const_iterator it = ports.begin();
4867	it != ports.end(); ++ it)
4868	{
4869	/* slot number (required) */
4870	/* slot unicity is guaranteed by XML Schema */
4871	uint32_t slot = (*it).value <uint32_t> ("slot");
4872	AssertBreak (slot < ELEMENTS (mSerialPorts));
4873
4874	rc = mSerialPorts [slot]->loadSettings (*it);
4875	CheckComRCReturnRC (rc);
4876	}
4877	}
4878
4879	/* Parallel node (optional) */
4880	{
4881	Key parallelNode = aNode.key ("LPT");
4882
4883	rc = S_OK;
4884
4885	Key::List ports = parallelNode.keys ("Port");
4886	for (Key::List::const_iterator it = ports.begin();
4887	it != ports.end(); ++ it)
4888	{
4889	/* slot number (required) */
4890	/* slot unicity is guaranteed by XML Schema */
4891	uint32_t slot = (*it).value <uint32_t> ("slot");
4892	AssertBreak (slot < ELEMENTS (mSerialPorts));
4893
4894	rc = mParallelPorts [slot]->loadSettings (*it);
4895	CheckComRCReturnRC (rc);
4896	}
4897	}
4898
4899	/* AudioAdapter */
4900	rc = mAudioAdapter->loadSettings (aNode);
4901	CheckComRCReturnRC (rc);
4902
4903	/* Shared folders (required) */
4904	{
4905	Key sharedFoldersNode = aNode.key ("SharedFolders");
4906
4907	rc = S_OK;
4908
4909	Key::List folders = sharedFoldersNode.keys ("SharedFolder");
4910	for (Key::List::const_iterator it = folders.begin();
4911	it != folders.end(); ++ it)
4912	{
4913	/* folder logical name (required) */
4914	Bstr name = (*it).stringValue ("name");
4915	/* folder host path (required) */
4916	Bstr hostPath = (*it).stringValue ("hostPath");
4917
4918	bool writable = (*it).value <bool> ("writable");
4919
4920	rc = CreateSharedFolder (name, hostPath, writable);
4921	CheckComRCReturnRC (rc);
4922	}
4923	}
4924
4925	/* Clipboard node (required) */
4926	{
4927	Key clipNode = aNode.key ("Clipboard");
4928
4929	const char *mode = clipNode.stringValue ("mode");
4930	if (strcmp (mode, "Disabled") == 0)
4931	mHWData->mClipboardMode = ClipboardMode_Disabled;
4932	else if (strcmp (mode, "HostToGuest") == 0)
4933	mHWData->mClipboardMode = ClipboardMode_HostToGuest;
4934	else if (strcmp (mode, "GuestToHost") == 0)
4935	mHWData->mClipboardMode = ClipboardMode_GuestToHost;
4936	else if (strcmp (mode, "Bidirectional") == 0)
4937	mHWData->mClipboardMode = ClipboardMode_Bidirectional;
4938	else
4939	AssertMsgFailed (("Invalid clipboard mode '%s'\n", mode));
4940	}
4941
4942	/* Guest node (required) */
4943	{
4944	Key guestNode = aNode.key ("Guest");
4945
4946	/* optional, defaults to 0 */
4947	mHWData->mMemoryBalloonSize =
4948	guestNode.value <ULONG> ("memoryBalloonSize");
4949	/* optional, defaults to 0 */
4950	mHWData->mStatisticsUpdateInterval =
4951	guestNode.value <ULONG> ("statisticsUpdateInterval");
4952	}
4953
4954	/* Guest properties (optional) */
4955	{
4956	Key guestPropertiesNode = aNode.findKey ("GuestProperties");
4957	if (!guestPropertiesNode.isNull())
4958	{
4959	Key::List properties = guestPropertiesNode.keys ("GuestProperty");
4960	for (Key::List::const_iterator it = properties.begin();
4961	it != properties.end(); ++ it)
4962	{
4963	/* property name (required) */
4964	Bstr name = (*it).stringValue ("name");
4965	/* property value (required) */
4966	Bstr value = (*it).stringValue ("value");
4967	/* property timestamp (optional, defaults to 0) */
4968	ULONG64 timestamp = (*it).value<ULONG64> ("timestamp");
4969	/* property flags (optional, defaults to empty) */
4970	Bstr flags = (*it).stringValue ("flags");
4971
4972	HWData::GuestProperty property = { name, value, timestamp, flags };
4973	mHWData->mGuestProperties.push_back(property);
4974	}
4975	}
4976	mHWData->mPropertyServiceActive = false;
4977	}
4978
4979	AssertComRC (rc);
4980	return rc;
4981	}
4982
4983	/**
4984	* @param aNode <HardDiskAttachments> node.
4985	* @param aRegistered true when the machine is being loaded on VirtualBox
4986	* startup, or when a snapshot is being loaded (wchich
4987	* currently can happen on startup only)
4988	* @param aSnapshotId pointer to the snapshot ID if this is a snapshot machine
4989	*/
4990	HRESULT Machine::loadHardDisks (const settings::Key &aNode, bool aRegistered,
4991	const Guid aSnapshotId / = NULL */)
4992	{
4993	using namespace settings;
4994
4995	AssertReturn (!aNode.isNull(), E_INVALIDARG);
4996	AssertReturn ((mType == IsMachine && aSnapshotId == NULL) \|\|
4997	(mType == IsSnapshotMachine && aSnapshotId != NULL), E_FAIL);
4998
4999	HRESULT rc = S_OK;
5000
5001	Key::List children = aNode.keys ("HardDiskAttachment");
5002
5003	if (!aRegistered && children.size() > 0)
5004	{
5005	/* when the machine is being loaded (opened) from a file, it cannot
5006	* have hard disks attached (this should not happen normally,
5007	* because we don't allow to attach hard disks to an unregistered
5008	* VM at all */
5009	return setError (E_FAIL,
5010	tr ("Unregistered machine '%ls' cannot have hard disks attached "
5011	"(found %d hard disk attachments)"),
5012	mUserData->mName.raw(), children.size());
5013	}
5014
5015
5016	for (Key::List::const_iterator it = children.begin();
5017	it != children.end(); ++ it)
5018	{
5019	/* hardDisk uuid (required) */
5020	Guid uuid = (*it).value <Guid> ("hardDisk");
5021	/* bus (controller) type (required) */
5022	const char busStr = (it).stringValue ("bus");
5023	/* channel (required) */
5024	LONG channel = (*it).value <LONG> ("channel");
5025	/* device (required) */
5026	LONG device = (*it).value <LONG> ("device");
5027
5028	/* find a hard disk by UUID */
5029	ComObjPtr <HardDisk> hd;
5030	rc = mParent->getHardDisk (uuid, hd);
5031	CheckComRCReturnRC (rc);
5032
5033	AutoWriteLock hdLock (hd);
5034
5035	if (!hd->machineId().isEmpty())
5036	{
5037	return setError (E_FAIL,
5038	tr ("Hard disk '%ls' with UUID {%s} is already "
5039	"attached to a machine with UUID {%s} (see '%ls')"),
5040	hd->toString().raw(), uuid.toString().raw(),
5041	hd->machineId().toString().raw(),
5042	mData->mConfigFileFull.raw());
5043	}
5044
5045	if (hd->type() == HardDiskType_Immutable)
5046	{
5047	return setError (E_FAIL,
5048	tr ("Immutable hard disk '%ls' with UUID {%s} cannot be "
5049	"directly attached to a machine (see '%ls')"),
5050	hd->toString().raw(), uuid.toString().raw(),
5051	mData->mConfigFileFull.raw());
5052	}
5053
5054	/* attach the device */
5055	StorageBus_T bus = StorageBus_Null;
5056
5057	if (strcmp (busStr, "IDE") == 0)
5058	{
5059	bus = StorageBus_IDE;
5060	}
5061	else if (strcmp (busStr, "SATA") == 0)
5062	{
5063	bus = StorageBus_SATA;
5064	}
5065	else
5066	ComAssertMsgFailedRet (("Invalid bus '%s'\n", bus),
5067	E_FAIL);
5068
5069	ComObjPtr <HardDiskAttachment> attachment;
5070	attachment.createObject();
5071	rc = attachment->init (hd, bus, channel, device, false /* aDirty */);
5072	CheckComRCBreakRC (rc);
5073
5074	/* associate the hard disk with this machine */
5075	hd->setMachineId (mData->mUuid);
5076
5077	/* associate the hard disk with the given snapshot ID */
5078	if (mType == IsSnapshotMachine)
5079	hd->setSnapshotId (*aSnapshotId);
5080
5081	mHDData->mHDAttachments.push_back (attachment);
5082	}
5083
5084	return rc;
5085	}
5086
5087	/**
5088	* Searches for a <Snapshot> node for the given snapshot.
5089	* If the search is successful, \a aSnapshotNode will contain the found node.
5090	* In this case, \a aSnapshotsNode can be NULL meaning the found node is a
5091	* direct child of \a aMachineNode.
5092	*
5093	* If the search fails, a failure is returned and both \a aSnapshotsNode and
5094	* \a aSnapshotNode are set to 0.
5095	*
5096	* @param aSnapshot Snapshot to search for.
5097	* @param aMachineNode <Machine> node to start from.
5098	* @param aSnapshotsNode <Snapshots> node containing the found <Snapshot> node
5099	* (may be NULL if the caller is not interested).
5100	* @param aSnapshotNode Found <Snapshot> node.
5101	*/
5102	HRESULT Machine::findSnapshotNode (Snapshot *aSnapshot, settings::Key &aMachineNode,
5103	settings::Key *aSnapshotsNode,
5104	settings::Key *aSnapshotNode)
5105	{
5106	using namespace settings;
5107
5108	AssertReturn (aSnapshot && !aMachineNode.isNull()
5109	&& aSnapshotNode != NULL, E_FAIL);
5110
5111	if (aSnapshotsNode)
5112	aSnapshotsNode->setNull();
5113	aSnapshotNode->setNull();
5114
5115	// build the full uuid path (from the top parent to the given snapshot)
5116	std::list <Guid> path;
5117	{
5118	ComObjPtr <Snapshot> parent = aSnapshot;
5119	while (parent)
5120	{
5121	path.push_front (parent->data().mId);
5122	parent = parent->parent();
5123	}
5124	}
5125
5126	Key snapshotsNode = aMachineNode;
5127	Key snapshotNode;
5128
5129	for (std::list <Guid>::const_iterator it = path.begin();
5130	it != path.end();
5131	++ it)
5132	{
5133	if (!snapshotNode.isNull())
5134	{
5135	/* proceed to the nested <Snapshots> node */
5136	snapshotsNode = snapshotNode.key ("Snapshots");
5137	snapshotNode.setNull();
5138	}
5139
5140	AssertReturn (!snapshotsNode.isNull(), E_FAIL);
5141
5142	Key::List children = snapshotsNode.keys ("Snapshot");
5143	for (Key::List::const_iterator ch = children.begin();
5144	ch != children.end();
5145	++ ch)
5146	{
5147	Guid id = (*ch).value <Guid> ("uuid");
5148	if (id == (*it))
5149	{
5150	/* pass over to the outer loop */
5151	snapshotNode = *ch;
5152	break;
5153	}
5154	}
5155
5156	if (!snapshotNode.isNull())
5157	continue;
5158
5159	/* the next uuid is not found, no need to continue... */
5160	AssertFailedBreak();
5161	}
5162
5163	// we must always succesfully find the node
5164	AssertReturn (!snapshotNode.isNull(), E_FAIL);
5165	AssertReturn (!snapshotsNode.isNull(), E_FAIL);
5166
5167	if (aSnapshotsNode && (snapshotsNode != aMachineNode))
5168	*aSnapshotsNode = snapshotsNode;
5169	*aSnapshotNode = snapshotNode;
5170
5171	return S_OK;
5172	}
5173
5174	/**
5175	* Returns the snapshot with the given UUID or fails of no such snapshot.
5176	*
5177	* @param aId snapshot UUID to find (empty UUID refers the first snapshot)
5178	* @param aSnapshot where to return the found snapshot
5179	* @param aSetError true to set extended error info on failure
5180	*/
5181	HRESULT Machine::findSnapshot (const Guid &aId, ComObjPtr <Snapshot> &aSnapshot,
5182	bool aSetError /* = false */)
5183	{
5184	if (!mData->mFirstSnapshot)
5185	{
5186	if (aSetError)
5187	return setError (E_FAIL,
5188	tr ("This machine does not have any snapshots"));
5189	return E_FAIL;
5190	}
5191
5192	if (aId.isEmpty())
5193	aSnapshot = mData->mFirstSnapshot;
5194	else
5195	aSnapshot = mData->mFirstSnapshot->findChildOrSelf (aId);
5196
5197	if (!aSnapshot)
5198	{
5199	if (aSetError)
5200	return setError (E_FAIL,
5201	tr ("Could not find a snapshot with UUID {%s}"),
5202	aId.toString().raw());
5203	return E_FAIL;
5204	}
5205
5206	return S_OK;
5207	}
5208
5209	/**
5210	* Returns the snapshot with the given name or fails of no such snapshot.
5211	*
5212	* @param aName snapshot name to find
5213	* @param aSnapshot where to return the found snapshot
5214	* @param aSetError true to set extended error info on failure
5215	*/
5216	HRESULT Machine::findSnapshot (const BSTR aName, ComObjPtr <Snapshot> &aSnapshot,
5217	bool aSetError /* = false */)
5218	{
5219	AssertReturn (aName, E_INVALIDARG);
5220
5221	if (!mData->mFirstSnapshot)
5222	{
5223	if (aSetError)
5224	return setError (E_FAIL,
5225	tr ("This machine does not have any snapshots"));
5226	return E_FAIL;
5227	}
5228
5229	aSnapshot = mData->mFirstSnapshot->findChildOrSelf (aName);
5230
5231	if (!aSnapshot)
5232	{
5233	if (aSetError)
5234	return setError (E_FAIL,
5235	tr ("Could not find a snapshot named '%ls'"), aName);
5236	return E_FAIL;
5237	}
5238
5239	return S_OK;
5240	}
5241
5242	/**
5243	* Searches for an attachment that contains the given hard disk.
5244	* The hard disk must be associated with some VM and can be optionally
5245	* associated with some snapshot. If the attachment is stored in the snapshot
5246	* (i.e. the hard disk is associated with some snapshot), @a aSnapshot
5247	* will point to a non-null object on output.
5248	*
5249	* @param aHd hard disk to search an attachment for
5250	* @param aMachine where to store the hard disk's machine (can be NULL)
5251	* @param aSnapshot where to store the hard disk's snapshot (can be NULL)
5252	* @param aHda where to store the hard disk's attachment (can be NULL)
5253	*
5254	*
5255	* @note
5256	* It is assumed that the machine where the attachment is found,
5257	* is already placed to the Discarding state, when this method is called.
5258	* @note
5259	* The object returned in @a aHda is the attachment from the snapshot
5260	* machine if the hard disk is associated with the snapshot, not from the
5261	* primary machine object returned returned in @a aMachine.
5262	*/
5263	HRESULT Machine::findHardDiskAttachment (const ComObjPtr <HardDisk> &aHd,
5264	ComObjPtr <Machine> *aMachine,
5265	ComObjPtr <Snapshot> *aSnapshot,
5266	ComObjPtr <HardDiskAttachment> *aHda)
5267	{
5268	AssertReturn (!aHd.isNull(), E_INVALIDARG);
5269
5270	Guid mid = aHd->machineId();
5271	Guid sid = aHd->snapshotId();
5272
5273	AssertReturn (!mid.isEmpty(), E_INVALIDARG);
5274
5275	ComObjPtr <Machine> m;
5276	mParent->getMachine (mid, m);
5277	ComAssertRet (!m.isNull(), E_FAIL);
5278
5279	HDData::HDAttachmentList *attachments = &m->mHDData->mHDAttachments;
5280
5281	ComObjPtr <Snapshot> s;
5282	if (!sid.isEmpty())
5283	{
5284	m->findSnapshot (sid, s);
5285	ComAssertRet (!s.isNull(), E_FAIL);
5286	attachments = &s->data().mMachine->mHDData->mHDAttachments;
5287	}
5288
5289	AssertReturn (attachments, E_FAIL);
5290
5291	for (HDData::HDAttachmentList::const_iterator it = attachments->begin();
5292	it != attachments->end();
5293	++ it)
5294	{
5295	if ((*it)->hardDisk() == aHd)
5296	{
5297	if (aMachine) *aMachine = m;
5298	if (aSnapshot) *aSnapshot = s;
5299	if (aHda) aHda = (it);
5300	return S_OK;
5301	}
5302	}
5303
5304	ComAssertFailed();
5305	return E_FAIL;
5306	}
5307
5308	/**
5309	* Helper for #saveSettings. Cares about renaming the settings directory and
5310	* file if the machine name was changed and about creating a new settings file
5311	* if this is a new machine.
5312	*
5313	* @note Must be never called directly but only from #saveSettings().
5314	*
5315	* @param aRenamed receives \|true\| if the name was changed and the settings
5316	* file was renamed as a result, or \|false\| otherwise. The
5317	* value makes sense only on success.
5318	* @param aNew receives \|true\| if a virgin settings file was created.
5319	*/
5320	HRESULT Machine::prepareSaveSettings (bool &aRenamed, bool &aNew)
5321	{
5322	/* Note: tecnhically, mParent needs to be locked only when the machine is
5323	* registered (see prepareSaveSettings() for details) but we don't
5324	* currently differentiate it in callers of saveSettings() so we don't
5325	* make difference here too. */
5326	AssertReturn (mParent->isWriteLockOnCurrentThread(), E_FAIL);
5327	AssertReturn (isWriteLockOnCurrentThread(), E_FAIL);
5328
5329	HRESULT rc = S_OK;
5330
5331	aRenamed = false;
5332
5333	/* if we're ready and isConfigLocked() is FALSE then it means
5334	* that no config file exists yet (we will create a virgin one) */
5335	aNew = !isConfigLocked();
5336
5337	/* attempt to rename the settings file if machine name is changed */
5338	if (mUserData->mNameSync &&
5339	mUserData.isBackedUp() &&
5340	mUserData.backedUpData()->mName != mUserData->mName)
5341	{
5342	aRenamed = true;
5343
5344	if (!aNew)
5345	{
5346	/* unlock the old config file */
5347	rc = unlockConfig();
5348	CheckComRCReturnRC (rc);
5349	}
5350
5351	bool dirRenamed = false;
5352	bool fileRenamed = false;
5353
5354	Utf8Str configFile, newConfigFile;
5355	Utf8Str configDir, newConfigDir;
5356
5357	do
5358	{
5359	int vrc = VINF_SUCCESS;
5360
5361	Utf8Str name = mUserData.backedUpData()->mName;
5362	Utf8Str newName = mUserData->mName;
5363
5364	configFile = mData->mConfigFileFull;
5365
5366	/* first, rename the directory if it matches the machine name */
5367	configDir = configFile;
5368	RTPathStripFilename (configDir.mutableRaw());
5369	newConfigDir = configDir;
5370	if (RTPathFilename (configDir) == name)
5371	{
5372	RTPathStripFilename (newConfigDir.mutableRaw());
5373	newConfigDir = Utf8StrFmt ("%s%c%s",
5374	newConfigDir.raw(), RTPATH_DELIMITER, newName.raw());
5375	/* new dir and old dir cannot be equal here because of 'if'
5376	* above and because name != newName */
5377	Assert (configDir != newConfigDir);
5378	if (!aNew)
5379	{
5380	/* perform real rename only if the machine is not new */
5381	vrc = RTPathRename (configDir.raw(), newConfigDir.raw(), 0);
5382	if (VBOX_FAILURE (vrc))
5383	{
5384	rc = setError (E_FAIL,
5385	tr ("Could not rename the directory '%s' to '%s' "
5386	"to save the settings file (%Vrc)"),
5387	configDir.raw(), newConfigDir.raw(), vrc);
5388	break;
5389	}
5390	dirRenamed = true;
5391	}
5392	}
5393
5394	newConfigFile = Utf8StrFmt ("%s%c%s.xml",
5395	newConfigDir.raw(), RTPATH_DELIMITER, newName.raw());
5396
5397	/* then try to rename the settings file itself */
5398	if (newConfigFile != configFile)
5399	{
5400	/* get the path to old settings file in renamed directory */
5401	configFile = Utf8StrFmt ("%s%c%s",
5402	newConfigDir.raw(), RTPATH_DELIMITER,
5403	RTPathFilename (configFile));
5404	if (!aNew)
5405	{
5406	/* perform real rename only if the machine is not new */
5407	vrc = RTFileRename (configFile.raw(), newConfigFile.raw(), 0);
5408	if (VBOX_FAILURE (vrc))
5409	{
5410	rc = setError (E_FAIL,
5411	tr ("Could not rename the settings file '%s' to '%s' "
5412	"(%Vrc)"),
5413	configFile.raw(), newConfigFile.raw(), vrc);
5414	break;
5415	}
5416	fileRenamed = true;
5417	}
5418	}
5419
5420	/* update mConfigFileFull amd mConfigFile */
5421	Bstr oldConfigFileFull = mData->mConfigFileFull;
5422	Bstr oldConfigFile = mData->mConfigFile;
5423	mData->mConfigFileFull = newConfigFile;
5424	/* try to get the relative path for mConfigFile */
5425	Utf8Str path = newConfigFile;
5426	mParent->calculateRelativePath (path, path);
5427	mData->mConfigFile = path;
5428
5429	/* last, try to update the global settings with the new path */
5430	if (mData->mRegistered)
5431	{
5432	rc = mParent->updateSettings (configDir, newConfigDir);
5433	if (FAILED (rc))
5434	{
5435	/* revert to old values */
5436	mData->mConfigFileFull = oldConfigFileFull;
5437	mData->mConfigFile = oldConfigFile;
5438	break;
5439	}
5440	}
5441
5442	/* update the snapshot folder */
5443	path = mUserData->mSnapshotFolderFull;
5444	if (RTPathStartsWith (path, configDir))
5445	{
5446	path = Utf8StrFmt ("%s%s", newConfigDir.raw(),
5447	path.raw() + configDir.length());
5448	mUserData->mSnapshotFolderFull = path;
5449	calculateRelativePath (path, path);
5450	mUserData->mSnapshotFolder = path;
5451	}
5452
5453	/* update the saved state file path */
5454	path = mSSData->mStateFilePath;
5455	if (RTPathStartsWith (path, configDir))
5456	{
5457	path = Utf8StrFmt ("%s%s", newConfigDir.raw(),
5458	path.raw() + configDir.length());
5459	mSSData->mStateFilePath = path;
5460	}
5461
5462	/* Update saved state file paths of all online snapshots.
5463	* Note that saveSettings() will recognize name change
5464	* and will save all snapshots in this case. */
5465	if (mData->mFirstSnapshot)
5466	mData->mFirstSnapshot->updateSavedStatePaths (configDir,
5467	newConfigDir);
5468	}
5469	while (0);
5470
5471	if (FAILED (rc))
5472	{
5473	/* silently try to rename everything back */
5474	if (fileRenamed)
5475	RTFileRename (newConfigFile.raw(), configFile.raw(), 0);
5476	if (dirRenamed)
5477	RTPathRename (newConfigDir.raw(), configDir.raw(), 0);
5478	}
5479
5480	if (!aNew)
5481	{
5482	/* lock the config again */
5483	HRESULT rc2 = lockConfig();
5484	if (SUCCEEDED (rc))
5485	rc = rc2;
5486	}
5487
5488	CheckComRCReturnRC (rc);
5489	}
5490
5491	if (aNew)
5492	{
5493	/* create a virgin config file */
5494	int vrc = VINF_SUCCESS;
5495
5496	/* ensure the settings directory exists */
5497	Utf8Str path = mData->mConfigFileFull;
5498	RTPathStripFilename (path.mutableRaw());
5499	if (!RTDirExists (path))
5500	{
5501	vrc = RTDirCreateFullPath (path, 0777);
5502	if (VBOX_FAILURE (vrc))
5503	{
5504	return setError (E_FAIL,
5505	tr ("Could not create a directory '%s' "
5506	"to save the settings file (%Vrc)"),
5507	path.raw(), vrc);
5508	}
5509	}
5510
5511	/* Note: open flags must correlate with RTFileOpen() in lockConfig() */
5512	path = Utf8Str (mData->mConfigFileFull);
5513	vrc = RTFileOpen (&mData->mHandleCfgFile, path,
5514	RTFILE_O_READWRITE \| RTFILE_O_CREATE \|
5515	RTFILE_O_DENY_WRITE);
5516	if (VBOX_SUCCESS (vrc))
5517	{
5518	vrc = RTFileWrite (mData->mHandleCfgFile,
5519	(void *) DefaultMachineConfig,
5520	sizeof (DefaultMachineConfig), NULL);
5521	}
5522	if (VBOX_FAILURE (vrc))
5523	{
5524	mData->mHandleCfgFile = NIL_RTFILE;
5525	return setError (E_FAIL,
5526	tr ("Could not create the settings file '%s' (%Vrc)"),
5527	path.raw(), vrc);
5528	}
5529	/* we do not close the file to simulate lockConfig() */
5530	}
5531
5532	return rc;
5533	}
5534
5535	/**
5536	* Saves machine data, user data and hardware data.
5537	*
5538	* @param aMarkCurStateAsModified
5539	* If true (default), mData->mCurrentStateModified will be set to
5540	* what #isReallyModified() returns prior to saving settings to a file,
5541	* otherwise the current value of mData->mCurrentStateModified will be
5542	* saved.
5543	* @param aInformCallbacksAnyway
5544	* If true, callbacks will be informed even if #isReallyModified()
5545	* returns false. This is necessary for cases when we change machine data
5546	* diectly, not through the backup()/commit() mechanism.
5547	*
5548	* @note Must be called from under mParent write lock (sometimes needed by
5549	* #prepareSaveSettings()) and this object's write lock. Locks children for
5550	* writing. There is one exception when mParent is unused and therefore may
5551	* be left unlocked: if this machine is an unregistered one.
5552	*/
5553	HRESULT Machine::saveSettings (bool aMarkCurStateAsModified /* = true */,
5554	bool aInformCallbacksAnyway /* = false */)
5555	{
5556	LogFlowThisFuncEnter();
5557
5558	/* Note: tecnhically, mParent needs to be locked only when the machine is
5559	* registered (see prepareSaveSettings() for details) but we don't
5560	* currently differentiate it in callers of saveSettings() so we don't
5561	* make difference here too. */
5562	AssertReturn (mParent->isWriteLockOnCurrentThread(), E_FAIL);
5563	AssertReturn (isWriteLockOnCurrentThread(), E_FAIL);
5564
5565	/// @todo (dmik) I guess we should lock all our child objects here
5566	// (such as mVRDPServer etc.) to ensure they are not changed
5567	// until completely saved to disk and committed
5568
5569	/// @todo (dmik) also, we need to delegate saving child objects' settings
5570	// to objects themselves to ensure operations 'commit + save changes'
5571	// are atomic (amd done from the object's lock so that nobody can change
5572	// settings again until completely saved).
5573
5574	AssertReturn (mType == IsMachine \|\| mType == IsSessionMachine, E_FAIL);
5575
5576	bool wasModified;
5577
5578	if (aMarkCurStateAsModified)
5579	{
5580	/*
5581	* We ignore changes to user data when setting mCurrentStateModified
5582	* because the current state will not differ from the current snapshot
5583	* if only user data has been changed (user data is shared by all
5584	* snapshots).
5585	*/
5586	mData->mCurrentStateModified = isReallyModified (true /* aIgnoreUserData */);
5587	wasModified = mUserData.hasActualChanges() \|\| mData->mCurrentStateModified;
5588	}
5589	else
5590	{
5591	wasModified = isReallyModified();
5592	}
5593
5594	HRESULT rc = S_OK;
5595
5596	/* First, prepare to save settings. It will will care about renaming the
5597	* settings directory and file if the machine name was changed and about
5598	* creating a new settings file if this is a new machine. */
5599	bool isRenamed = false;
5600	bool isNew = false;
5601	rc = prepareSaveSettings (isRenamed, isNew);
5602	CheckComRCReturnRC (rc);
5603
5604	try
5605	{
5606	using namespace settings;
5607
5608	/* this object is locked for writing to prevent concurrent reads and writes */
5609	File file (mData->mHandleCfgFile, Utf8Str (mData->mConfigFileFull));
5610	XmlTreeBackend tree;
5611
5612	/* The newly created settings file is incomplete therefore we turn off
5613	* validation. The rest is like in loadSettingsTree_ForUpdate().*/
5614	rc = VirtualBox::loadSettingsTree (tree, file,
5615	!isNew /* aValidate */,
5616	false /* aCatchLoadErrors */,
5617	false /* aAddDefaults */);
5618	CheckComRCThrowRC (rc);
5619
5620
5621	/* ask to save all snapshots when the machine name was changed since
5622	* it may affect saved state file paths for online snapshots (see
5623	* #openConfigLoader() for details) */
5624	bool updateAllSnapshots = isRenamed;
5625
5626	/* commit before saving, since it may change settings
5627	* (for example, perform fixup of lazy hard disk changes) */
5628	rc = commit();
5629	CheckComRCReturnRC (rc);
5630
5631	/* include hard disk changes to the modified flag */
5632	wasModified \|= mHDData->mHDAttachmentsChanged;
5633	if (aMarkCurStateAsModified)
5634	mData->mCurrentStateModified \|= BOOL (mHDData->mHDAttachmentsChanged);
5635
5636	Key machineNode = tree.rootKey().createKey ("Machine");
5637
5638	/* uuid (required) */
5639	Assert (!mData->mUuid.isEmpty());
5640	machineNode.setValue <Guid> ("uuid", mData->mUuid);
5641
5642	/* name (required) */
5643	Assert (!mUserData->mName.isEmpty());
5644	machineNode.setValue <Bstr> ("name", mUserData->mName);
5645
5646	/* nameSync (optional, default is true) */
5647	machineNode.setValueOr <bool> ("nameSync", !!mUserData->mNameSync, true);
5648
5649	/* Description node (optional) */
5650	if (!mUserData->mDescription.isNull())
5651	{
5652	Key descNode = machineNode.createKey ("Description");
5653	descNode.setKeyValue <Bstr> (mUserData->mDescription);
5654	}
5655	else
5656	{
5657	Key descNode = machineNode.findKey ("Description");
5658	if (!descNode.isNull())
5659	descNode.zap();
5660	}
5661
5662	/* OSType (required) */
5663	machineNode.setValue <Bstr> ("OSType", mUserData->mOSTypeId);
5664
5665	/* stateFile (optional) */
5666	if (mData->mMachineState == MachineState_Saved)
5667	{
5668	Assert (!mSSData->mStateFilePath.isEmpty());
5669	/* try to make the file name relative to the settings file dir */
5670	Utf8Str stateFilePath = mSSData->mStateFilePath;
5671	calculateRelativePath (stateFilePath, stateFilePath);
5672	machineNode.setStringValue ("stateFile", stateFilePath);
5673	}
5674	else
5675	{
5676	Assert (mSSData->mStateFilePath.isNull());
5677	machineNode.zapValue ("stateFile");
5678	}
5679
5680	/* currentSnapshot ID (optional) */
5681	if (!mData->mCurrentSnapshot.isNull())
5682	{
5683	Assert (!mData->mFirstSnapshot.isNull());
5684	machineNode.setValue <Guid> ("currentSnapshot",
5685	mData->mCurrentSnapshot->data().mId);
5686	}
5687	else
5688	{
5689	Assert (mData->mFirstSnapshot.isNull());
5690	machineNode.zapValue ("currentSnapshot");
5691	}
5692
5693	/* snapshotFolder (optional) */
5694	/// @todo use the Bstr::NullOrEmpty constant and setValueOr
5695	if (!mUserData->mSnapshotFolder.isEmpty())
5696	machineNode.setValue <Bstr> ("snapshotFolder", mUserData->mSnapshotFolder);
5697	else
5698	machineNode.zapValue ("snapshotFolder");
5699
5700	/* currentStateModified (optional, default is true) */
5701	machineNode.setValueOr <bool> ("currentStateModified",
5702	!!mData->mCurrentStateModified, true);
5703
5704	/* lastStateChange */
5705	machineNode.setValue <RTTIMESPEC> ("lastStateChange",
5706	mData->mLastStateChange);
5707
5708	/* set the aborted attribute when appropriate, defaults to false */
5709	machineNode.setValueOr <bool> ("aborted",
5710	mData->mMachineState == MachineState_Aborted,
5711	false);
5712
5713	/* Hardware node (required) */
5714	{
5715	/* first, delete the entire node if exists */
5716	Key hwNode = machineNode.findKey ("Hardware");
5717	if (!hwNode.isNull())
5718	hwNode.zap();
5719	/* then recreate it */
5720	hwNode = machineNode.createKey ("Hardware");
5721
5722	rc = saveHardware (hwNode);
5723	CheckComRCThrowRC (rc);
5724	}
5725
5726	/* HardDiskAttachments node (required) */
5727	{
5728	/* first, delete the entire node if exists */
5729	Key hdaNode = machineNode.findKey ("HardDiskAttachments");
5730	if (!hdaNode.isNull())
5731	hdaNode.zap();
5732	/* then recreate it */
5733	hdaNode = machineNode.createKey ("HardDiskAttachments");
5734
5735	rc = saveHardDisks (hdaNode);
5736	CheckComRCThrowRC (rc);
5737	}
5738
5739	/* update all snapshots if requested */
5740	if (updateAllSnapshots)
5741	{
5742	rc = saveSnapshotSettingsWorker (machineNode, NULL,
5743	SaveSS_UpdateAllOp);
5744	CheckComRCThrowRC (rc);
5745	}
5746
5747	/* save the settings on success */
5748	rc = VirtualBox::saveSettingsTree (tree, file,
5749	mData->mSettingsFileVersion);
5750	CheckComRCThrowRC (rc);
5751	}
5752	catch (HRESULT err)
5753	{
5754	/* we assume that error info is set by the thrower */
5755	rc = err;
5756	}
5757	catch (...)
5758	{
5759	rc = VirtualBox::handleUnexpectedExceptions (RT_SRC_POS);
5760	}
5761
5762	if (FAILED (rc))
5763	{
5764	/* backup arbitrary data item to cause #isModified() to still return
5765	* true in case of any error */
5766	mHWData.backup();
5767	}
5768
5769	if (wasModified \|\| aInformCallbacksAnyway)
5770	{
5771	/* Fire the data change event, even on failure (since we've already
5772	* committed all data). This is done only for SessionMachines because
5773	* mutable Machine instances are always not registered (i.e. private
5774	* to the client process that creates them) and thus don't need to
5775	* inform callbacks. */
5776	if (mType == IsSessionMachine)
5777	mParent->onMachineDataChange (mData->mUuid);
5778	}
5779
5780	LogFlowThisFunc (("rc=%08X\n", rc));
5781	LogFlowThisFuncLeave();
5782	return rc;
5783	}
5784
5785	/**
5786	* Wrapper for #saveSnapshotSettingsWorker() that opens the settings file
5787	* and locates the <Machine> node in there. See #saveSnapshotSettingsWorker()
5788	* for more details.
5789	*
5790	* @param aSnapshot Snapshot to operate on
5791	* @param aOpFlags Operation to perform, one of SaveSS_NoOp, SaveSS_AddOp
5792	* or SaveSS_UpdateAttrsOp possibly combined with
5793	* SaveSS_UpdateCurrentId.
5794	*
5795	* @note Locks this object for writing + other child objects.
5796	*/
5797	HRESULT Machine::saveSnapshotSettings (Snapshot *aSnapshot, int aOpFlags)
5798	{
5799	AutoCaller autoCaller (this);
5800	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
5801
5802	AssertReturn (mType == IsMachine \|\| mType == IsSessionMachine, E_FAIL);
5803
5804	/* This object's write lock is also necessary to serialize file access
5805	* (prevent concurrent reads and writes) */
5806	AutoWriteLock alock (this);
5807
5808	AssertReturn (isConfigLocked(), E_FAIL);
5809
5810	HRESULT rc = S_OK;
5811
5812	try
5813	{
5814	using namespace settings;
5815
5816	/* load the settings file */
5817	File file (mData->mHandleCfgFile, Utf8Str (mData->mConfigFileFull));
5818	XmlTreeBackend tree;
5819
5820	rc = VirtualBox::loadSettingsTree_ForUpdate (tree, file);
5821	CheckComRCReturnRC (rc);
5822
5823	Key machineNode = tree.rootKey().key ("Machine");
5824
5825	rc = saveSnapshotSettingsWorker (machineNode, aSnapshot, aOpFlags);
5826	CheckComRCReturnRC (rc);
5827
5828	/* save settings on success */
5829	rc = VirtualBox::saveSettingsTree (tree, file,
5830	mData->mSettingsFileVersion);
5831	CheckComRCReturnRC (rc);
5832	}
5833	catch (...)
5834	{
5835	rc = VirtualBox::handleUnexpectedExceptions (RT_SRC_POS);
5836	}
5837
5838	return rc;
5839	}
5840
5841	/**
5842	* Performs the specified operation on the given snapshot
5843	* in the settings file represented by \a aMachineNode.
5844	*
5845	* If \a aOpFlags = SaveSS_UpdateAllOp, \a aSnapshot can be NULL to indicate
5846	* that the whole tree of the snapshots should be updated in <Machine>.
5847	* One particular case is when the last (and the only) snapshot should be
5848	* removed (it is so when both mCurrentSnapshot and mFirstSnapshot are NULL).
5849	*
5850	* \a aOp may be just SaveSS_UpdateCurrentId if only the currentSnapshot
5851	* attribute of <Machine> needs to be updated.
5852	*
5853	* @param aMachineNode <Machine> node in the opened settings file.
5854	* @param aSnapshot Snapshot to operate on.
5855	* @param aOpFlags Operation to perform, one of SaveSS_NoOp, SaveSS_AddOp
5856	* or SaveSS_UpdateAttrsOp possibly combined with
5857	* SaveSS_UpdateCurrentId.
5858	*
5859	* @note Must be called with this object locked for writing.
5860	* Locks child objects.
5861	*/
5862	HRESULT Machine::saveSnapshotSettingsWorker (settings::Key &aMachineNode,
5863	Snapshot *aSnapshot, int aOpFlags)
5864	{
5865	using namespace settings;
5866
5867	AssertReturn (!aMachineNode.isNull(), E_FAIL);
5868
5869	AssertReturn (isWriteLockOnCurrentThread(), E_FAIL);
5870
5871	int op = aOpFlags & SaveSS_OpMask;
5872	AssertReturn (
5873	(aSnapshot && (op == SaveSS_AddOp \|\| op == SaveSS_UpdateAttrsOp \|\|
5874	op == SaveSS_UpdateAllOp)) \|\|
5875	(!aSnapshot && ((op == SaveSS_NoOp && (aOpFlags & SaveSS_UpdateCurrentId)) \|\|
5876	op == SaveSS_UpdateAllOp)),
5877	E_FAIL);
5878
5879	HRESULT rc = S_OK;
5880
5881	bool recreateWholeTree = false;
5882
5883	do
5884	{
5885	if (op == SaveSS_NoOp)
5886	break;
5887
5888	/* quick path: recreate the whole tree of the snapshots */
5889	if (op == SaveSS_UpdateAllOp && !aSnapshot)
5890	{
5891	/* first, delete the entire root snapshot node if it exists */
5892	Key snapshotNode = aMachineNode.findKey ("Snapshot");
5893	if (!snapshotNode.isNull())
5894	snapshotNode.zap();
5895
5896	/* second, if we have any snapshots left, substitute aSnapshot
5897	* with the first snapshot to recreate the whole tree, otherwise
5898	* break */
5899	if (mData->mFirstSnapshot)
5900	{
5901	aSnapshot = mData->mFirstSnapshot;
5902	recreateWholeTree = true;
5903	}
5904	else
5905	break;
5906	}
5907
5908	Assert (!!aSnapshot);
5909	ComObjPtr <Snapshot> parent = aSnapshot->parent();
5910
5911	if (op == SaveSS_AddOp)
5912	{
5913	Key parentNode;
5914
5915	if (parent)
5916	{
5917	rc = findSnapshotNode (parent, aMachineNode, NULL, &parentNode);
5918	CheckComRCBreakRC (rc);
5919
5920	ComAssertBreak (!parentNode.isNull(), rc = E_FAIL);
5921	}
5922
5923	do
5924	{
5925	Key snapshotsNode;
5926
5927	if (!parentNode.isNull())
5928	snapshotsNode = parentNode.createKey ("Snapshots");
5929	else
5930	snapshotsNode = aMachineNode;
5931	do
5932	{
5933	Key snapshotNode = snapshotsNode.appendKey ("Snapshot");
5934	rc = saveSnapshot (snapshotNode, aSnapshot, false /* aAttrsOnly */);
5935	CheckComRCBreakRC (rc);
5936
5937	/* when a new snapshot is added, this means diffs were created
5938	* for every normal/immutable hard disk of the VM, so we need to
5939	* save the current hard disk attachments */
5940
5941	Key hdaNode = aMachineNode.findKey ("HardDiskAttachments");
5942	if (!hdaNode.isNull())
5943	hdaNode.zap();
5944	hdaNode = aMachineNode.createKey ("HardDiskAttachments");
5945
5946	rc = saveHardDisks (hdaNode);
5947	CheckComRCBreakRC (rc);
5948
5949	if (mHDData->mHDAttachments.size() != 0)
5950	{
5951	/* If we have one or more attachments then we definitely
5952	* created diffs for them and associated new diffs with
5953	* current settngs. So, since we don't use saveSettings(),
5954	* we need to inform callbacks manually. */
5955	if (mType == IsSessionMachine)
5956	mParent->onMachineDataChange (mData->mUuid);
5957	}
5958	}
5959	while (0);
5960	}
5961	while (0);
5962
5963	break;
5964	}
5965
5966	Assert ((op == SaveSS_UpdateAttrsOp && !recreateWholeTree) \|\|
5967	op == SaveSS_UpdateAllOp);
5968
5969	Key snapshotsNode;
5970	Key snapshotNode;
5971
5972	if (!recreateWholeTree)
5973	{
5974	rc = findSnapshotNode (aSnapshot, aMachineNode,
5975	&snapshotsNode, &snapshotNode);
5976	CheckComRCBreakRC (rc);
5977	}
5978
5979	if (snapshotsNode.isNull())
5980	snapshotsNode = aMachineNode;
5981
5982	if (op == SaveSS_UpdateAttrsOp)
5983	rc = saveSnapshot (snapshotNode, aSnapshot, true /* aAttrsOnly */);
5984	else
5985	{
5986	if (!snapshotNode.isNull())
5987	snapshotNode.zap();
5988
5989	snapshotNode = snapshotsNode.appendKey ("Snapshot");
5990	rc = saveSnapshot (snapshotNode, aSnapshot, false /* aAttrsOnly */);
5991	CheckComRCBreakRC (rc);
5992	}
5993	}
5994	while (0);
5995
5996	if (SUCCEEDED (rc))
5997	{
5998	/* update currentSnapshot when appropriate */
5999	if (aOpFlags & SaveSS_UpdateCurrentId)
6000	{
6001	if (!mData->mCurrentSnapshot.isNull())
6002	aMachineNode.setValue <Guid> ("currentSnapshot",
6003	mData->mCurrentSnapshot->data().mId);
6004	else
6005	aMachineNode.zapValue ("currentSnapshot");
6006	}
6007	if (aOpFlags & SaveSS_UpdateCurStateModified)
6008	{
6009	aMachineNode.setValue <bool> ("currentStateModified", true);
6010	}
6011	}
6012
6013	return rc;
6014	}
6015
6016	/**
6017	* Saves the given snapshot and all its children (unless \a aAttrsOnly is true).
6018	* It is assumed that the given node is empty (unless \a aAttrsOnly is true).
6019	*
6020	* @param aNode <Snapshot> node to save the snapshot to.
6021	* @param aSnapshot Snapshot to save.
6022	* @param aAttrsOnly If true, only updatge user-changeable attrs.
6023	*/
6024	HRESULT Machine::saveSnapshot (settings::Key &aNode, Snapshot *aSnapshot, bool aAttrsOnly)
6025	{
6026	using namespace settings;
6027
6028	AssertReturn (!aNode.isNull() && aSnapshot, E_INVALIDARG);
6029	AssertReturn (mType == IsMachine \|\| mType == IsSessionMachine, E_FAIL);
6030
6031	/* uuid (required) */
6032	if (!aAttrsOnly)
6033	aNode.setValue <Guid> ("uuid", aSnapshot->data().mId);
6034
6035	/* name (required) */
6036	aNode.setValue <Bstr> ("name", aSnapshot->data().mName);
6037
6038	/* timeStamp (required) */
6039	aNode.setValue <RTTIMESPEC> ("timeStamp", aSnapshot->data().mTimeStamp);
6040
6041	/* Description node (optional) */
6042	if (!aSnapshot->data().mDescription.isNull())
6043	{
6044	Key descNode = aNode.createKey ("Description");
6045	descNode.setKeyValue <Bstr> (aSnapshot->data().mDescription);
6046	}
6047	else
6048	{
6049	Key descNode = aNode.findKey ("Description");
6050	if (!descNode.isNull())
6051	descNode.zap();
6052	}
6053
6054	if (aAttrsOnly)
6055	return S_OK;
6056
6057	/* stateFile (optional) */
6058	if (aSnapshot->stateFilePath())
6059	{
6060	/* try to make the file name relative to the settings file dir */
6061	Utf8Str stateFilePath = aSnapshot->stateFilePath();
6062	calculateRelativePath (stateFilePath, stateFilePath);
6063	aNode.setStringValue ("stateFile", stateFilePath);
6064	}
6065
6066	{
6067	ComObjPtr <SnapshotMachine> snapshotMachine = aSnapshot->data().mMachine;
6068	ComAssertRet (!snapshotMachine.isNull(), E_FAIL);
6069
6070	/* save hardware */
6071	{
6072	Key hwNode = aNode.createKey ("Hardware");
6073	HRESULT rc = snapshotMachine->saveHardware (hwNode);
6074	CheckComRCReturnRC (rc);
6075	}
6076
6077	/* save hard disks */
6078	{
6079	Key hdasNode = aNode.createKey ("HardDiskAttachments");
6080	HRESULT rc = snapshotMachine->saveHardDisks (hdasNode);
6081	CheckComRCReturnRC (rc);
6082	}
6083	}
6084
6085	/* save children */
6086	{
6087	AutoWriteLock listLock (aSnapshot->childrenLock ());
6088
6089	if (aSnapshot->children().size())
6090	{
6091	Key snapshotsNode = aNode.createKey ("Snapshots");
6092
6093	HRESULT rc = S_OK;
6094
6095	for (Snapshot::SnapshotList::const_iterator it = aSnapshot->children().begin();
6096	it != aSnapshot->children().end();
6097	++ it)
6098	{
6099	Key snapshotNode = snapshotsNode.createKey ("Snapshot");
6100	rc = saveSnapshot (snapshotNode, (*it), aAttrsOnly);
6101	CheckComRCReturnRC (rc);
6102	}
6103	}
6104	}
6105
6106	return S_OK;
6107	}
6108
6109	/**
6110	* Saves the VM hardware configuration. It is assumed that the
6111	* given node is empty.
6112	*
6113	* @param aNode <Hardware> node to save the VM hardware confguration to.
6114	*/
6115	HRESULT Machine::saveHardware (settings::Key &aNode)
6116	{
6117	using namespace settings;
6118
6119	AssertReturn (!aNode.isNull(), E_INVALIDARG);
6120
6121	HRESULT rc = S_OK;
6122
6123	/* CPU (optional) */
6124	{
6125	Key cpuNode = aNode.createKey ("CPU");
6126	Key hwVirtExNode = cpuNode.createKey ("HardwareVirtEx");
6127	const char *value = NULL;
6128	switch (mHWData->mHWVirtExEnabled)
6129	{
6130	case TSBool_False:
6131	value = "false";
6132	break;
6133	case TSBool_True:
6134	value = "true";
6135	break;
6136	case TSBool_Default:
6137	value = "default";
6138	break;
6139	}
6140	hwVirtExNode.setStringValue ("enabled", value);
6141
6142	/* Nested paging (optional, default is true) */
6143	Key HWVirtExNestedPagingNode = cpuNode.createKey ("HardwareVirtExNestedPaging");
6144	HWVirtExNestedPagingNode.setValue <bool> ("enabled", !!mHWData->mHWVirtExNestedPagingEnabled);
6145
6146	/* PAE (optional, default is false) */
6147	Key PAENode = cpuNode.createKey ("PAE");
6148	PAENode.setValue <bool> ("enabled", !!mHWData->mPAEEnabled);
6149	}
6150
6151	/* memory (required) */
6152	{
6153	Key memoryNode = aNode.createKey ("Memory");
6154	memoryNode.setValue <ULONG> ("RAMSize", mHWData->mMemorySize);
6155	}
6156
6157	/* boot (required) */
6158	{
6159	Key bootNode = aNode.createKey ("Boot");
6160
6161	for (ULONG pos = 0; pos < ELEMENTS (mHWData->mBootOrder); ++ pos)
6162	{
6163	const char *device = NULL;
6164	switch (mHWData->mBootOrder [pos])
6165	{
6166	case DeviceType_Null:
6167	/* skip, this is allowed for <Order> nodes
6168	* when loading, the default value NoDevice will remain */
6169	continue;
6170	case DeviceType_Floppy: device = "Floppy"; break;
6171	case DeviceType_DVD: device = "DVD"; break;
6172	case DeviceType_HardDisk: device = "HardDisk"; break;
6173	case DeviceType_Network: device = "Network"; break;
6174	default:
6175	{
6176	ComAssertMsgFailedRet (("Invalid boot device: %d\n",
6177	mHWData->mBootOrder [pos]),
6178	E_FAIL);
6179	}
6180	}
6181
6182	Key orderNode = bootNode.appendKey ("Order");
6183	orderNode.setValue <ULONG> ("position", pos + 1);
6184	orderNode.setStringValue ("device", device);
6185	}
6186	}
6187
6188	/* display (required) */
6189	{
6190	Key displayNode = aNode.createKey ("Display");
6191	displayNode.setValue <ULONG> ("VRAMSize", mHWData->mVRAMSize);
6192	displayNode.setValue <ULONG> ("MonitorCount", mHWData->mMonitorCount);
6193	}
6194
6195	#ifdef VBOX_VRDP
6196	/* VRDP settings (optional) */
6197	rc = mVRDPServer->saveSettings (aNode);
6198	CheckComRCReturnRC (rc);
6199	#endif
6200
6201	/* BIOS (required) */
6202	rc = mBIOSSettings->saveSettings (aNode);
6203	CheckComRCReturnRC (rc);
6204
6205	/* DVD drive (required) */
6206	rc = mDVDDrive->saveSettings (aNode);
6207	CheckComRCReturnRC (rc);
6208
6209	/* Flooppy drive (required) */
6210	rc = mFloppyDrive->saveSettings (aNode);
6211	CheckComRCReturnRC (rc);
6212
6213	/* USB Controller (required) */
6214	rc = mUSBController->saveSettings (aNode);
6215	CheckComRCReturnRC (rc);
6216
6217	/* SATA Controller (required) */
6218	rc = mSATAController->saveSettings (aNode);
6219	CheckComRCReturnRC (rc);
6220
6221	/* Network adapters (required) */
6222	{
6223	Key nwNode = aNode.createKey ("Network");
6224
6225	for (ULONG slot = 0; slot < ELEMENTS (mNetworkAdapters); ++ slot)
6226	{
6227	Key adapterNode = nwNode.appendKey ("Adapter");
6228
6229	adapterNode.setValue <ULONG> ("slot", slot);
6230
6231	rc = mNetworkAdapters [slot]->saveSettings (adapterNode);
6232	CheckComRCReturnRC (rc);
6233	}
6234	}
6235
6236	/* Serial ports */
6237	{
6238	Key serialNode = aNode.createKey ("UART");
6239
6240	for (ULONG slot = 0; slot < ELEMENTS (mSerialPorts); ++ slot)
6241	{
6242	Key portNode = serialNode.appendKey ("Port");
6243
6244	portNode.setValue <ULONG> ("slot", slot);
6245
6246	rc = mSerialPorts [slot]->saveSettings (portNode);
6247	CheckComRCReturnRC (rc);
6248	}
6249	}
6250
6251	/* Parallel ports */
6252	{
6253	Key parallelNode = aNode.createKey ("LPT");
6254
6255	for (ULONG slot = 0; slot < ELEMENTS (mParallelPorts); ++ slot)
6256	{
6257	Key portNode = parallelNode.appendKey ("Port");
6258
6259	portNode.setValue <ULONG> ("slot", slot);
6260
6261	rc = mParallelPorts [slot]->saveSettings (portNode);
6262	CheckComRCReturnRC (rc);
6263	}
6264	}
6265
6266	/* Audio adapter */
6267	rc = mAudioAdapter->saveSettings (aNode);
6268	CheckComRCReturnRC (rc);
6269
6270	/* Shared folders */
6271	{
6272	Key sharedFoldersNode = aNode.createKey ("SharedFolders");
6273
6274	for (HWData::SharedFolderList::const_iterator it = mHWData->mSharedFolders.begin();
6275	it != mHWData->mSharedFolders.end();
6276	++ it)
6277	{
6278	ComObjPtr <SharedFolder> folder = *it;
6279
6280	Key folderNode = sharedFoldersNode.appendKey ("SharedFolder");
6281
6282	/* all are mandatory */
6283	folderNode.setValue <Bstr> ("name", folder->name());
6284	folderNode.setValue <Bstr> ("hostPath", folder->hostPath());
6285	folderNode.setValue <bool> ("writable", !!folder->writable());
6286	}
6287	}
6288
6289	/* Clipboard */
6290	{
6291	Key clipNode = aNode.createKey ("Clipboard");
6292
6293	const char *modeStr = "Disabled";
6294	switch (mHWData->mClipboardMode)
6295	{
6296	case ClipboardMode_Disabled:
6297	/* already assigned */
6298	break;
6299	case ClipboardMode_HostToGuest:
6300	modeStr = "HostToGuest";
6301	break;
6302	case ClipboardMode_GuestToHost:
6303	modeStr = "GuestToHost";
6304	break;
6305	case ClipboardMode_Bidirectional:
6306	modeStr = "Bidirectional";
6307	break;
6308	default:
6309	ComAssertMsgFailedRet (("Clipboard mode %d is invalid",
6310	mHWData->mClipboardMode),
6311	E_FAIL);
6312	}
6313	clipNode.setStringValue ("mode", modeStr);
6314	}
6315
6316	/* Guest */
6317	{
6318	Key guestNode = aNode.createKey ("Guest");
6319
6320	guestNode.setValue <ULONG> ("memoryBalloonSize",
6321	mHWData->mMemoryBalloonSize);
6322	guestNode.setValue <ULONG> ("statisticsUpdateInterval",
6323	mHWData->mStatisticsUpdateInterval);
6324	}
6325
6326	/* Guest properties */
6327	{
6328	Key guestPropertiesNode = aNode.createKey ("GuestProperties");
6329
6330	for (HWData::GuestPropertyList::const_iterator it = mHWData->mGuestProperties.begin();
6331	it != mHWData->mGuestProperties.end();
6332	++ it)
6333	{
6334	HWData::GuestProperty property = *it;
6335
6336	Key propertyNode = guestPropertiesNode.appendKey ("GuestProperty");
6337
6338	propertyNode.setValue <Bstr> ("name", property.mName);
6339	propertyNode.setValue <Bstr> ("value", property.mValue);
6340	propertyNode.setValue <ULONG64> ("timestamp", property.mTimestamp);
6341	propertyNode.setValue <Bstr> ("flags", property.mFlags);
6342	}
6343	}
6344
6345	AssertComRC (rc);
6346	return rc;
6347	}
6348
6349	/**
6350	* Saves the hard disk confguration.
6351	* It is assumed that the given node is empty.
6352	*
6353	* @param aNode <HardDiskAttachments> node to save the hard disk confguration to.
6354	*/
6355	HRESULT Machine::saveHardDisks (settings::Key &aNode)
6356	{
6357	using namespace settings;
6358
6359	AssertReturn (!aNode.isNull(), E_INVALIDARG);
6360
6361	for (HDData::HDAttachmentList::const_iterator it = mHDData->mHDAttachments.begin();
6362	it != mHDData->mHDAttachments.end();
6363	++ it)
6364	{
6365	ComObjPtr <HardDiskAttachment> att = *it;
6366
6367	Key hdNode = aNode.appendKey ("HardDiskAttachment");
6368
6369	{
6370	const char *bus = NULL;
6371	switch (att->bus())
6372	{
6373	case StorageBus_IDE: bus = "IDE"; break;
6374	case StorageBus_SATA: bus = "SATA"; break;
6375	default:
6376	ComAssertFailedRet (E_FAIL);
6377	}
6378
6379	hdNode.setValue <Guid> ("hardDisk", att->hardDisk()->id());
6380	hdNode.setStringValue ("bus", bus);
6381	hdNode.setValue <LONG> ("channel", att->channel());
6382	hdNode.setValue <LONG> ("device", att->device());
6383	}
6384	}
6385
6386	return S_OK;
6387	}
6388
6389	/**
6390	* Saves machine state settings as defined by aFlags
6391	* (SaveSTS_* values).
6392	*
6393	* @param aFlags Combination of SaveSTS_* flags.
6394	*
6395	* @note Locks objects for writing.
6396	*/
6397	HRESULT Machine::saveStateSettings (int aFlags)
6398	{
6399	if (aFlags == 0)
6400	return S_OK;
6401
6402	AutoCaller autoCaller (this);
6403	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
6404
6405	/* This object's write lock is also necessary to serialize file access
6406	* (prevent concurrent reads and writes) */
6407	AutoWriteLock alock (this);
6408
6409	AssertReturn (isConfigLocked(), E_FAIL);
6410
6411	HRESULT rc = S_OK;
6412
6413	try
6414	{
6415	using namespace settings;
6416
6417	/* load the settings file */
6418	File file (mData->mHandleCfgFile, Utf8Str (mData->mConfigFileFull));
6419	XmlTreeBackend tree;
6420
6421	rc = VirtualBox::loadSettingsTree_ForUpdate (tree, file);
6422	CheckComRCReturnRC (rc);
6423
6424	Key machineNode = tree.rootKey().key ("Machine");
6425
6426	if (aFlags & SaveSTS_CurStateModified)
6427	{
6428	/* defaults to true */
6429	machineNode.setValueOr <bool> ("currentStateModified",
6430	!!mData->mCurrentStateModified, true);
6431	}
6432
6433	if (aFlags & SaveSTS_StateFilePath)
6434	{
6435	if (mSSData->mStateFilePath)
6436	{
6437	/* try to make the file name relative to the settings file dir */
6438	Utf8Str stateFilePath = mSSData->mStateFilePath;
6439	calculateRelativePath (stateFilePath, stateFilePath);
6440	machineNode.setStringValue ("stateFile", stateFilePath);
6441	}
6442	else
6443	machineNode.zapValue ("stateFile");
6444	}
6445
6446	if (aFlags & SaveSTS_StateTimeStamp)
6447	{
6448	Assert (mData->mMachineState != MachineState_Aborted \|\|
6449	mSSData->mStateFilePath.isNull());
6450
6451	machineNode.setValue <RTTIMESPEC> ("lastStateChange",
6452	mData->mLastStateChange);
6453
6454	/* set the aborted attribute when appropriate, defaults to false */
6455	machineNode.setValueOr <bool> ("aborted",
6456	mData->mMachineState == MachineState_Aborted,
6457	false);
6458	}
6459
6460	/* save settings on success */
6461	rc = VirtualBox::saveSettingsTree (tree, file,
6462	mData->mSettingsFileVersion);
6463	CheckComRCReturnRC (rc);
6464	}
6465	catch (...)
6466	{
6467	rc = VirtualBox::handleUnexpectedExceptions (RT_SRC_POS);
6468	}
6469
6470	return rc;
6471	}
6472
6473	/**
6474	* Cleans up all differencing hard disks based on immutable hard disks.
6475	*
6476	* @note Locks objects!
6477	*/
6478	HRESULT Machine::wipeOutImmutableDiffs()
6479	{
6480	AutoCaller autoCaller (this);
6481	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
6482
6483	AutoReadLock alock (this);
6484
6485	AssertReturn (mData->mMachineState == MachineState_PoweredOff \|\|
6486	mData->mMachineState == MachineState_Aborted, E_FAIL);
6487
6488	for (HDData::HDAttachmentList::const_iterator it = mHDData->mHDAttachments.begin();
6489	it != mHDData->mHDAttachments.end();
6490	++ it)
6491	{
6492	ComObjPtr <HardDisk> hd = (*it)->hardDisk();
6493	AutoWriteLock hdLock (hd);
6494
6495	if(hd->isParentImmutable())
6496	{
6497	/// @todo (dmik) no error handling for now
6498	// (need async error reporting for this)
6499	hd->asVDI()->wipeOutImage();
6500	}
6501	}
6502
6503	return S_OK;
6504	}
6505
6506	/**
6507	* Fixes up lazy hard disk attachments by creating or deleting differencing
6508	* hard disks when machine settings are being committed.
6509	* Must be called only from #commit().
6510	*
6511	* @note Locks objects!
6512	*/
6513	HRESULT Machine::fixupHardDisks (bool aCommit)
6514	{
6515	AutoCaller autoCaller (this);
6516	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
6517
6518	AutoWriteLock alock (this);
6519
6520	/* no attac/detach operations -- nothing to do */
6521	if (!mHDData.isBackedUp())
6522	{
6523	mHDData->mHDAttachmentsChanged = false;
6524	return S_OK;
6525	}
6526
6527	AssertReturn (mData->mRegistered, E_FAIL);
6528
6529	if (aCommit)
6530	{
6531	/*
6532	* changes are being committed,
6533	* perform actual diff image creation, deletion etc.
6534	*/
6535
6536	/* take a copy of backed up attachments (will modify it) */
6537	HDData::HDAttachmentList backedUp = mHDData.backedUpData()->mHDAttachments;
6538	/* list of new diffs created */
6539	std::list <ComObjPtr <HardDisk> > newDiffs;
6540
6541	HRESULT rc = S_OK;
6542
6543	/* go through current attachments */
6544	for (HDData::HDAttachmentList::const_iterator
6545	it = mHDData->mHDAttachments.begin();
6546	it != mHDData->mHDAttachments.end();
6547	++ it)
6548	{
6549	ComObjPtr <HardDiskAttachment> hda = *it;
6550	ComObjPtr <HardDisk> hd = hda->hardDisk();
6551	AutoWriteLock hdLock (hd);
6552
6553	if (!hda->isDirty())
6554	{
6555	/*
6556	* not dirty, therefore was either attached before backing up
6557	* or doesn't need any fixup (already fixed up); try to locate
6558	* this hard disk among backed up attachments and remove from
6559	* there to prevent it from being deassociated/deleted
6560	*/
6561	HDData::HDAttachmentList::iterator oldIt;
6562	for (oldIt = backedUp.begin(); oldIt != backedUp.end(); ++ oldIt)
6563	if ((*oldIt)->hardDisk().equalsTo (hd))
6564	break;
6565	if (oldIt != backedUp.end())
6566	{
6567	/* remove from there */
6568	backedUp.erase (oldIt);
6569	Log3 (("FC: %ls found in old\n", hd->toString().raw()));
6570	}
6571	}
6572	else
6573	{
6574	/* dirty, determine what to do */
6575
6576	bool needDiff = false;
6577	bool searchAmongSnapshots = false;
6578
6579	switch (hd->type())
6580	{
6581	case HardDiskType_Immutable:
6582	{
6583	/* decrease readers increased in AttachHardDisk() */
6584	hd->releaseReader();
6585	Log3 (("FC: %ls released\n", hd->toString().raw()));
6586	/* indicate we need a diff (indirect attachment) */
6587	needDiff = true;
6588	break;
6589	}
6590	case HardDiskType_Writethrough:
6591	{
6592	/* reset the dirty flag */
6593	hda->updateHardDisk (hd, false /* aDirty */);
6594	Log3 (("FC: %ls updated\n", hd->toString().raw()));
6595	break;
6596	}
6597	case HardDiskType_Normal:
6598	{
6599	if (hd->snapshotId().isEmpty())
6600	{
6601	/* reset the dirty flag */
6602	hda->updateHardDisk (hd, false /* aDirty */);
6603	Log3 (("FC: %ls updated\n", hd->toString().raw()));
6604	}
6605	else
6606	{
6607	/* decrease readers increased in AttachHardDisk() */
6608	hd->releaseReader();
6609	Log3 (("FC: %ls released\n", hd->toString().raw()));
6610	/* indicate we need a diff (indirect attachment) */
6611	needDiff = true;
6612	/* search for the most recent base among snapshots */
6613	searchAmongSnapshots = true;
6614	}
6615	break;
6616	}
6617	}
6618
6619	if (!needDiff)
6620	continue;
6621
6622	bool createDiff = false;
6623
6624	/*
6625	* see whether any previously attached hard disk has the
6626	* the currently attached one (Normal or Independent) as
6627	* the root
6628	*/
6629
6630	HDData::HDAttachmentList::iterator foundIt = backedUp.end();
6631
6632	for (HDData::HDAttachmentList::iterator it = backedUp.begin();
6633	it != backedUp.end();
6634	++ it)
6635	{
6636	if ((*it)->hardDisk()->root().equalsTo (hd))
6637	{
6638	/*
6639	* matched dev and ctl (i.e. attached to the same place)
6640	* will win and immediately stop the search; otherwise
6641	* the first attachment that matched the hd only will
6642	* be used
6643	*/
6644	if ((*it)->device() == hda->device() &&
6645	(*it)->channel() == hda->channel() &&
6646	(*it)->bus() == hda->bus())
6647	{
6648	foundIt = it;
6649	break;
6650	}
6651	else
6652	if (foundIt == backedUp.end())
6653	{
6654	/*
6655	* not an exact match; ensure there is no exact match
6656	* among other current attachments referring the same
6657	* root (to prevent this attachmend from reusing the
6658	* hard disk of the other attachment that will later
6659	* give the exact match or already gave it before)
6660	*/
6661	bool canReuse = true;
6662	for (HDData::HDAttachmentList::const_iterator
6663	it2 = mHDData->mHDAttachments.begin();
6664	it2 != mHDData->mHDAttachments.end();
6665	++ it2)
6666	{
6667	if ((it2)->device() == (it)->device() &&
6668	(it2)->channel() == (it)->channel() &&
6669	(it2)->bus() == (it)->bus() &&
6670	(*it2)->hardDisk()->root().equalsTo (hd))
6671	{
6672	/*
6673	* the exact match, either non-dirty or dirty
6674	* one refers the same root: in both cases
6675	* we cannot reuse the hard disk, so break
6676	*/
6677	canReuse = false;
6678	break;
6679	}
6680	}
6681
6682	if (canReuse)
6683	foundIt = it;
6684	}
6685	}
6686	}
6687
6688	if (foundIt != backedUp.end())
6689	{
6690	/* found either one or another, reuse the diff */
6691	hda->updateHardDisk ((*foundIt)->hardDisk(),
6692	false /* aDirty */);
6693	Log3 (("FC: %ls reused as %ls\n", hd->toString().raw(),
6694	(*foundIt)->hardDisk()->toString().raw()));
6695	/* remove from there */
6696	backedUp.erase (foundIt);
6697	}
6698	else
6699	{
6700	/* was not attached, need a diff */
6701	createDiff = true;
6702	}
6703
6704	if (!createDiff)
6705	continue;
6706
6707	ComObjPtr <HardDisk> baseHd = hd;
6708
6709	if (searchAmongSnapshots)
6710	{
6711	/*
6712	* find the most recent diff based on the currently
6713	* attached root (Normal hard disk) among snapshots
6714	*/
6715
6716	ComObjPtr <Snapshot> snap = mData->mCurrentSnapshot;
6717
6718	while (snap)
6719	{
6720	AutoWriteLock snapLock (snap);
6721
6722	const HDData::HDAttachmentList &snapAtts =
6723	snap->data().mMachine->mHDData->mHDAttachments;
6724
6725	HDData::HDAttachmentList::const_iterator foundIt = snapAtts.end();
6726
6727	for (HDData::HDAttachmentList::const_iterator
6728	it = snapAtts.begin(); it != snapAtts.end(); ++ it)
6729	{
6730	if ((*it)->hardDisk()->root().equalsTo (hd))
6731	{
6732	/*
6733	* matched dev and ctl (i.e. attached to the same place)
6734	* will win and immediately stop the search; otherwise
6735	* the first attachment that matched the hd only will
6736	* be used
6737	*/
6738	if ((*it)->device() == hda->device() &&
6739	(*it)->channel() == hda->channel() &&
6740	(*it)->bus() == hda->bus())
6741	{
6742	foundIt = it;
6743	break;
6744	}
6745	else
6746	if (foundIt == snapAtts.end())
6747	foundIt = it;
6748	}
6749	}
6750
6751	if (foundIt != snapAtts.end())
6752	{
6753	/* the most recent diff has been found, use as a base */
6754	baseHd = (*foundIt)->hardDisk();
6755	Log3 (("FC: %ls: recent found %ls\n",
6756	hd->toString().raw(), baseHd->toString().raw()));
6757	break;
6758	}
6759
6760	snap = snap->parent();
6761	}
6762	}
6763
6764	/* create a new diff for the hard disk being indirectly attached */
6765
6766	AutoWriteLock baseHdLock (baseHd);
6767	baseHd->addReader();
6768
6769	ComObjPtr <HVirtualDiskImage> vdi;
6770	rc = baseHd->createDiffHardDisk (mUserData->mSnapshotFolderFull,
6771	mData->mUuid, vdi, NULL);
6772	baseHd->releaseReader();
6773	CheckComRCBreakRC (rc);
6774
6775	newDiffs.push_back (ComObjPtr <HardDisk> (vdi));
6776
6777	/* update the attachment and reset the dirty flag */
6778	hda->updateHardDisk (ComObjPtr <HardDisk> (vdi),
6779	false /* aDirty */);
6780	Log3 (("FC: %ls: diff created %ls\n",
6781	baseHd->toString().raw(), vdi->toString().raw()));
6782	}
6783	}
6784
6785	if (FAILED (rc))
6786	{
6787	/* delete diffs we created */
6788	for (std::list <ComObjPtr <HardDisk> >::const_iterator
6789	it = newDiffs.begin(); it != newDiffs.end(); ++ it)
6790	{
6791	/*
6792	* unregisterDiffHardDisk() is supposed to delete and uninit
6793	* the differencing hard disk
6794	*/
6795	mParent->unregisterDiffHardDisk (*it);
6796	/* too bad if we fail here, but nothing to do, just continue */
6797	}
6798
6799	/* the best is to rollback the changes... */
6800	mHDData.rollback();
6801	mHDData->mHDAttachmentsChanged = false;
6802	Log3 (("FC: ROLLED BACK\n"));
6803	return rc;
6804	}
6805
6806	/*
6807	* go through the rest of old attachments and delete diffs
6808	* or deassociate hard disks from machines (they will become detached)
6809	*/
6810	for (HDData::HDAttachmentList::iterator
6811	it = backedUp.begin(); it != backedUp.end(); ++ it)
6812	{
6813	ComObjPtr <HardDiskAttachment> hda = *it;
6814	ComObjPtr <HardDisk> hd = hda->hardDisk();
6815	AutoWriteLock hdLock (hd);
6816
6817	if (hd->isDifferencing())
6818	{
6819	/*
6820	* unregisterDiffHardDisk() is supposed to delete and uninit
6821	* the differencing hard disk
6822	*/
6823	Log3 (("FC: %ls diff deleted\n", hd->toString().raw()));
6824	rc = mParent->unregisterDiffHardDisk (hd);
6825	/*
6826	* too bad if we fail here, but nothing to do, just continue
6827	* (the last rc will be returned to the caller though)
6828	*/
6829	}
6830	else
6831	{
6832	/* deassociate from this machine */
6833	Log3 (("FC: %ls deassociated\n", hd->toString().raw()));
6834	hd->setMachineId (Guid());
6835	}
6836	}
6837
6838	/* commit all the changes */
6839	mHDData->mHDAttachmentsChanged = mHDData.hasActualChanges();
6840	mHDData.commit();
6841	Log3 (("FC: COMMITTED\n"));
6842
6843	return rc;
6844	}
6845
6846	/*
6847	* changes are being rolled back,
6848	* go trhough all current attachments and fix up dirty ones
6849	* the way it is done in DetachHardDisk()
6850	*/
6851
6852	for (HDData::HDAttachmentList::iterator it = mHDData->mHDAttachments.begin();
6853	it != mHDData->mHDAttachments.end();
6854	++ it)
6855	{
6856	ComObjPtr <HardDiskAttachment> hda = *it;
6857	ComObjPtr <HardDisk> hd = hda->hardDisk();
6858	AutoWriteLock hdLock (hd);
6859
6860	if (hda->isDirty())
6861	{
6862	switch (hd->type())
6863	{
6864	case HardDiskType_Immutable:
6865	{
6866	/* decrease readers increased in AttachHardDisk() */
6867	hd->releaseReader();
6868	Log3 (("FR: %ls released\n", hd->toString().raw()));
6869	break;
6870	}
6871	case HardDiskType_Writethrough:
6872	{
6873	/* deassociate from this machine */
6874	hd->setMachineId (Guid());
6875	Log3 (("FR: %ls deassociated\n", hd->toString().raw()));
6876	break;
6877	}
6878	case HardDiskType_Normal:
6879	{
6880	if (hd->snapshotId().isEmpty())
6881	{
6882	/* deassociate from this machine */
6883	hd->setMachineId (Guid());
6884	Log3 (("FR: %ls deassociated\n", hd->toString().raw()));
6885	}
6886	else
6887	{
6888	/* decrease readers increased in AttachHardDisk() */
6889	hd->releaseReader();
6890	Log3 (("FR: %ls released\n", hd->toString().raw()));
6891	}
6892
6893	break;
6894	}
6895	}
6896	}
6897	}
6898
6899	/* rollback all the changes */
6900	mHDData.rollback();
6901	Log3 (("FR: ROLLED BACK\n"));
6902
6903	return S_OK;
6904	}
6905
6906	/**
6907	* Creates differencing hard disks for all normal hard disks
6908	* and replaces attachments to refer to created disks.
6909	* Used when taking a snapshot or when discarding the current state.
6910	*
6911	* @param aSnapshotId ID of the snapshot being taken
6912	* or NULL if the current state is being discarded
6913	* @param aFolder folder where to create diff. hard disks
6914	* @param aProgress progress object to run (must contain at least as
6915	* many operations left as the number of VDIs attached)
6916	* @param aOnline whether the machine is online (i.e., when the EMT
6917	* thread is paused, OR when current hard disks are
6918	* marked as busy for some other reason)
6919	*
6920	* @note
6921	* The progress object is not marked as completed, neither on success
6922	* nor on failure. This is a responsibility of the caller.
6923	*
6924	* @note Locks mParent + this object for writing
6925	*/
6926	HRESULT Machine::createSnapshotDiffs (const Guid *aSnapshotId,
6927	const Bstr &aFolder,
6928	const ComObjPtr <Progress> &aProgress,
6929	bool aOnline)
6930	{
6931	AssertReturn (!aFolder.isEmpty(), E_FAIL);
6932
6933	AutoCaller autoCaller (this);
6934	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
6935
6936	/* accessing mParent methods below needs mParent lock */
6937	AutoMultiWriteLock2 alock (mParent, this);
6938
6939	HRESULT rc = S_OK;
6940
6941	// first pass: check accessibility before performing changes
6942	if (!aOnline)
6943	{
6944	for (HDData::HDAttachmentList::const_iterator it = mHDData->mHDAttachments.begin();
6945	it != mHDData->mHDAttachments.end();
6946	++ it)
6947	{
6948	ComObjPtr <HardDiskAttachment> hda = *it;
6949	ComObjPtr <HardDisk> hd = hda->hardDisk();
6950	AutoWriteLock hdLock (hd);
6951
6952	ComAssertMsgBreak (hd->type() == HardDiskType_Normal,
6953	("Invalid hard disk type %d\n", hd->type()),
6954	rc = E_FAIL);
6955
6956	ComAssertMsgBreak (!hd->isParentImmutable() \|\|
6957	hd->storageType() == HardDiskStorageType_VirtualDiskImage,
6958	("Invalid hard disk storage type %d\n", hd->storageType()),
6959	rc = E_FAIL);
6960
6961	Bstr accessError;
6962	rc = hd->getAccessible (accessError);
6963	CheckComRCBreakRC (rc);
6964
6965	if (!accessError.isNull())
6966	{
6967	rc = setError (E_FAIL,
6968	tr ("Hard disk '%ls' is not accessible (%ls)"),
6969	hd->toString().raw(), accessError.raw());
6970	break;
6971	}
6972	}
6973	CheckComRCReturnRC (rc);
6974	}
6975
6976	HDData::HDAttachmentList attachments;
6977
6978	// second pass: perform changes
6979	for (HDData::HDAttachmentList::const_iterator it = mHDData->mHDAttachments.begin();
6980	it != mHDData->mHDAttachments.end();
6981	++ it)
6982	{
6983	ComObjPtr <HardDiskAttachment> hda = *it;
6984	ComObjPtr <HardDisk> hd = hda->hardDisk();
6985	AutoWriteLock hdLock (hd);
6986
6987	ComObjPtr <HardDisk> parent = hd->parent();
6988	AutoWriteLock parentHdLock (parent);
6989
6990	ComObjPtr <HardDisk> newHd;
6991
6992	// clear busy flag if the VM is online
6993	if (aOnline)
6994	hd->clearBusy();
6995	// increase readers
6996	hd->addReader();
6997
6998	if (hd->isParentImmutable())
6999	{
7000	aProgress->advanceOperation (Bstr (Utf8StrFmt (
7001	tr ("Preserving immutable hard disk '%ls'"),
7002	parent->toString (true /* aShort */).raw())));
7003
7004	parentHdLock.unlock();
7005	alock.leave();
7006
7007	// create a copy of the independent diff
7008	ComObjPtr <HVirtualDiskImage> vdi;
7009	rc = hd->asVDI()->cloneDiffImage (aFolder, mData->mUuid, vdi,
7010	aProgress);
7011	newHd = vdi;
7012
7013	alock.enter();
7014	parentHdLock.lock();
7015
7016	// decrease readers (hd is no more used for reading in any case)
7017	hd->releaseReader();
7018	}
7019	else
7020	{
7021	// checked in the first pass
7022	Assert (hd->type() == HardDiskType_Normal);
7023
7024	aProgress->advanceOperation (Bstr (Utf8StrFmt (
7025	tr ("Creating a differencing hard disk for '%ls'"),
7026	hd->root()->toString (true /* aShort */).raw())));
7027
7028	parentHdLock.unlock();
7029	alock.leave();
7030
7031	// create a new diff for the image being attached
7032	ComObjPtr <HVirtualDiskImage> vdi;
7033	rc = hd->createDiffHardDisk (aFolder, mData->mUuid, vdi, aProgress);
7034	newHd = vdi;
7035
7036	alock.enter();
7037	parentHdLock.lock();
7038
7039	if (SUCCEEDED (rc))
7040	{
7041	// if online, hd must keep a reader referece
7042	if (!aOnline)
7043	hd->releaseReader();
7044	}
7045	else
7046	{
7047	// decrease readers
7048	hd->releaseReader();
7049	}
7050	}
7051
7052	if (SUCCEEDED (rc))
7053	{
7054	ComObjPtr <HardDiskAttachment> newHda;
7055	newHda.createObject();
7056	rc = newHda->init (newHd, hda->bus(), hda->channel(), hda->device(),
7057	false /* aDirty */);
7058
7059	if (SUCCEEDED (rc))
7060	{
7061	// associate the snapshot id with the old hard disk
7062	if (hd->type() != HardDiskType_Writethrough && aSnapshotId)
7063	hd->setSnapshotId (*aSnapshotId);
7064
7065	// add the new attachment
7066	attachments.push_back (newHda);
7067
7068	// if online, newHd must be marked as busy
7069	if (aOnline)
7070	newHd->setBusy();
7071	}
7072	}
7073
7074	if (FAILED (rc))
7075	{
7076	// set busy flag back if the VM is online
7077	if (aOnline)
7078	hd->setBusy();
7079	break;
7080	}
7081	}
7082
7083	if (SUCCEEDED (rc))
7084	{
7085	// replace the whole list of attachments with the new one
7086	mHDData->mHDAttachments = attachments;
7087	}
7088	else
7089	{
7090	// delete those diffs we've just created
7091	for (HDData::HDAttachmentList::const_iterator it = attachments.begin();
7092	it != attachments.end();
7093	++ it)
7094	{
7095	ComObjPtr <HardDisk> hd = (*it)->hardDisk();
7096	AutoWriteLock hdLock (hd);
7097	Assert (hd->children().size() == 0);
7098	Assert (hd->isDifferencing());
7099	// unregisterDiffHardDisk() is supposed to delete and uninit
7100	// the differencing hard disk
7101	mParent->unregisterDiffHardDisk (hd);
7102	}
7103	}
7104
7105	return rc;
7106	}
7107
7108	/**
7109	* Deletes differencing hard disks created by createSnapshotDiffs() in case
7110	* if snapshot creation was failed.
7111	*
7112	* @param aSnapshot failed snapshot
7113	*
7114	* @note Locks mParent + this object for writing.
7115	*/
7116	HRESULT Machine::deleteSnapshotDiffs (const ComObjPtr <Snapshot> &aSnapshot)
7117	{
7118	AssertReturn (!aSnapshot.isNull(), E_FAIL);
7119
7120	AutoCaller autoCaller (this);
7121	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
7122
7123	/* accessing mParent methods below needs mParent lock */
7124	AutoMultiWriteLock2 alock (mParent, this);
7125
7126	/* short cut: check whether attachments are all the same */
7127	if (mHDData->mHDAttachments == aSnapshot->data().mMachine->mHDData->mHDAttachments)
7128	return S_OK;
7129
7130	HRESULT rc = S_OK;
7131
7132	for (HDData::HDAttachmentList::const_iterator it = mHDData->mHDAttachments.begin();
7133	it != mHDData->mHDAttachments.end();
7134	++ it)
7135	{
7136	ComObjPtr <HardDiskAttachment> hda = *it;
7137	ComObjPtr <HardDisk> hd = hda->hardDisk();
7138	AutoWriteLock hdLock (hd);
7139
7140	ComObjPtr <HardDisk> parent = hd->parent();
7141	AutoWriteLock parentHdLock (parent);
7142
7143	if (!parent \|\| parent->snapshotId() != aSnapshot->data().mId)
7144	continue;
7145
7146	/* must not have children */
7147	ComAssertRet (hd->children().size() == 0, E_FAIL);
7148
7149	/* deassociate the old hard disk from the given snapshot's ID */
7150	parent->setSnapshotId (Guid());
7151
7152	/* unregisterDiffHardDisk() is supposed to delete and uninit
7153	* the differencing hard disk */
7154	rc = mParent->unregisterDiffHardDisk (hd);
7155	/* continue on error */
7156	}
7157
7158	/* restore the whole list of attachments from the failed snapshot */
7159	mHDData->mHDAttachments = aSnapshot->data().mMachine->mHDData->mHDAttachments;
7160
7161	return rc;
7162	}
7163
7164	/**
7165	* Helper to lock the machine configuration for write access.
7166	*
7167	* @return S_OK or E_FAIL and sets error info on failure
7168	*
7169	* @note Doesn't lock anything (must be called from this object's lock)
7170	*/
7171	HRESULT Machine::lockConfig()
7172	{
7173	HRESULT rc = S_OK;
7174
7175	if (!isConfigLocked())
7176	{
7177	/* open the associated config file */
7178	int vrc = RTFileOpen (&mData->mHandleCfgFile,
7179	Utf8Str (mData->mConfigFileFull),
7180	RTFILE_O_READWRITE \| RTFILE_O_OPEN \|
7181	RTFILE_O_DENY_WRITE);
7182	if (VBOX_FAILURE (vrc))
7183	{
7184	mData->mHandleCfgFile = NIL_RTFILE;
7185
7186	rc = setError (E_FAIL,
7187	tr ("Could not lock the settings file '%ls' (%Vrc)"),
7188	mData->mConfigFileFull.raw(), vrc);
7189	}
7190	}
7191
7192	LogFlowThisFunc (("mConfigFile={%ls}, mHandleCfgFile=%d, rc=%08X\n",
7193	mData->mConfigFileFull.raw(), mData->mHandleCfgFile, rc));
7194	return rc;
7195	}
7196
7197	/**
7198	* Helper to unlock the machine configuration from write access
7199	*
7200	* @return S_OK
7201	*
7202	* @note Doesn't lock anything.
7203	* @note Not thread safe (must be called from this object's lock).
7204	*/
7205	HRESULT Machine::unlockConfig()
7206	{
7207	HRESULT rc = S_OK;
7208
7209	if (isConfigLocked())
7210	{
7211	RTFileFlush(mData->mHandleCfgFile);
7212	RTFileClose(mData->mHandleCfgFile);
7213	/** @todo flush the directory. */
7214	mData->mHandleCfgFile = NIL_RTFILE;
7215	}
7216
7217	LogFlowThisFunc (("\n"));
7218
7219	return rc;
7220	}
7221
7222	/**
7223	* Returns true if the settings file is located in the directory named exactly
7224	* as the machine. This will be true if the machine settings structure was
7225	* created by default in #openConfigLoader().
7226	*
7227	* @param aSettingsDir if not NULL, the full machine settings file directory
7228	* name will be assigned there.
7229	*
7230	* @note Doesn't lock anything.
7231	* @note Not thread safe (must be called from this object's lock).
7232	*/
7233	bool Machine::isInOwnDir (Utf8Str aSettingsDir / = NULL */)
7234	{
7235	Utf8Str settingsDir = mData->mConfigFileFull;
7236	RTPathStripFilename (settingsDir.mutableRaw());
7237	char *dirName = RTPathFilename (settingsDir);
7238
7239	AssertReturn (dirName, false);
7240
7241	/* if we don't rename anything on name change, return false shorlty */
7242	if (!mUserData->mNameSync)
7243	return false;
7244
7245	if (aSettingsDir)
7246	*aSettingsDir = settingsDir;
7247
7248	return Bstr (dirName) == mUserData->mName;
7249	}
7250
7251	/**
7252	* @note Locks objects for reading!
7253	*/
7254	bool Machine::isModified()
7255	{
7256	AutoCaller autoCaller (this);
7257	AssertComRCReturn (autoCaller.rc(), false);
7258
7259	AutoReadLock alock (this);
7260
7261	for (ULONG slot = 0; slot < ELEMENTS (mNetworkAdapters); slot ++)
7262	if (mNetworkAdapters [slot] && mNetworkAdapters [slot]->isModified())
7263	return true;
7264
7265	for (ULONG slot = 0; slot < ELEMENTS (mSerialPorts); slot ++)
7266	if (mSerialPorts [slot] && mSerialPorts [slot]->isModified())
7267	return true;
7268
7269	for (ULONG slot = 0; slot < ELEMENTS (mParallelPorts); slot ++)
7270	if (mParallelPorts [slot] && mParallelPorts [slot]->isModified())
7271	return true;
7272
7273	return
7274	mUserData.isBackedUp() \|\|
7275	mHWData.isBackedUp() \|\|
7276	mHDData.isBackedUp() \|\|
7277	#ifdef VBOX_VRDP
7278	(mVRDPServer && mVRDPServer->isModified()) \|\|
7279	#endif
7280	(mDVDDrive && mDVDDrive->isModified()) \|\|
7281	(mFloppyDrive && mFloppyDrive->isModified()) \|\|
7282	(mAudioAdapter && mAudioAdapter->isModified()) \|\|
7283	(mUSBController && mUSBController->isModified()) \|\|
7284	(mSATAController && mSATAController->isModified()) \|\|
7285	(mBIOSSettings && mBIOSSettings->isModified());
7286	}
7287
7288	/**
7289	* @note This method doesn't check (ignores) actual changes to mHDData.
7290	* Use mHDData.mHDAttachmentsChanged right after #commit() instead.
7291	*
7292	* @param aIgnoreUserData \|true\| to ignore changes to mUserData
7293	*
7294	* @note Locks objects for reading!
7295	*/
7296	bool Machine::isReallyModified (bool aIgnoreUserData /* = false */)
7297	{
7298	AutoCaller autoCaller (this);
7299	AssertComRCReturn (autoCaller.rc(), false);
7300
7301	AutoReadLock alock (this);
7302
7303	for (ULONG slot = 0; slot < ELEMENTS (mNetworkAdapters); slot ++)
7304	if (mNetworkAdapters [slot] && mNetworkAdapters [slot]->isReallyModified())
7305	return true;
7306
7307	for (ULONG slot = 0; slot < ELEMENTS (mSerialPorts); slot ++)
7308	if (mSerialPorts [slot] && mSerialPorts [slot]->isReallyModified())
7309	return true;
7310
7311	for (ULONG slot = 0; slot < ELEMENTS (mParallelPorts); slot ++)
7312	if (mParallelPorts [slot] && mParallelPorts [slot]->isReallyModified())
7313	return true;
7314
7315	return
7316	(!aIgnoreUserData && mUserData.hasActualChanges()) \|\|
7317	mHWData.hasActualChanges() \|\|
7318	/* ignore mHDData */
7319	//mHDData.hasActualChanges() \|\|
7320	#ifdef VBOX_VRDP
7321	(mVRDPServer && mVRDPServer->isReallyModified()) \|\|
7322	#endif
7323	(mDVDDrive && mDVDDrive->isReallyModified()) \|\|
7324	(mFloppyDrive && mFloppyDrive->isReallyModified()) \|\|
7325	(mAudioAdapter && mAudioAdapter->isReallyModified()) \|\|
7326	(mUSBController && mUSBController->isReallyModified()) \|\|
7327	(mSATAController && mSATAController->isReallyModified()) \|\|
7328	(mBIOSSettings && mBIOSSettings->isReallyModified());
7329	}
7330
7331	/**
7332	* Discards all changes to machine settings.
7333	*
7334	* @param aNotify whether to notify the direct session about changes or not
7335	*
7336	* @note Locks objects!
7337	*/
7338	void Machine::rollback (bool aNotify)
7339	{
7340	AutoCaller autoCaller (this);
7341	AssertComRCReturn (autoCaller.rc(), (void) 0);
7342
7343	AutoWriteLock alock (this);
7344
7345	/* check for changes in own data */
7346
7347	bool sharedFoldersChanged = false;
7348
7349	if (aNotify && mHWData.isBackedUp())
7350	{
7351	if (mHWData->mSharedFolders.size() !=
7352	mHWData.backedUpData()->mSharedFolders.size())
7353	sharedFoldersChanged = true;
7354	else
7355	{
7356	for (HWData::SharedFolderList::iterator rit =
7357	mHWData->mSharedFolders.begin();
7358	rit != mHWData->mSharedFolders.end() && !sharedFoldersChanged;
7359	++ rit)
7360	{
7361	for (HWData::SharedFolderList::iterator cit =
7362	mHWData.backedUpData()->mSharedFolders.begin();
7363	cit != mHWData.backedUpData()->mSharedFolders.end();
7364	++ cit)
7365	{
7366	if ((cit)->name() != (rit)->name() \|\|
7367	(cit)->hostPath() != (rit)->hostPath())
7368	{
7369	sharedFoldersChanged = true;
7370	break;
7371	}
7372	}
7373	}
7374	}
7375	}
7376
7377	mUserData.rollback();
7378
7379	mHWData.rollback();
7380
7381	if (mHDData.isBackedUp())
7382	fixupHardDisks (false /* aCommit */);
7383
7384	/* check for changes in child objects */
7385
7386	bool vrdpChanged = false, dvdChanged = false, floppyChanged = false,
7387	usbChanged = false, sataChanged = false;
7388
7389	ComPtr <INetworkAdapter> networkAdapters [ELEMENTS (mNetworkAdapters)];
7390	ComPtr <ISerialPort> serialPorts [ELEMENTS (mSerialPorts)];
7391	ComPtr <IParallelPort> parallelPorts [ELEMENTS (mParallelPorts)];
7392
7393	if (mBIOSSettings)
7394	mBIOSSettings->rollback();
7395
7396	#ifdef VBOX_VRDP
7397	if (mVRDPServer)
7398	vrdpChanged = mVRDPServer->rollback();
7399	#endif
7400
7401	if (mDVDDrive)
7402	dvdChanged = mDVDDrive->rollback();
7403
7404	if (mFloppyDrive)
7405	floppyChanged = mFloppyDrive->rollback();
7406
7407	if (mAudioAdapter)
7408	mAudioAdapter->rollback();
7409
7410	if (mUSBController)
7411	usbChanged = mUSBController->rollback();
7412
7413	if (mSATAController)
7414	sataChanged = mSATAController->rollback();
7415
7416	for (ULONG slot = 0; slot < ELEMENTS (mNetworkAdapters); slot ++)
7417	if (mNetworkAdapters [slot])
7418	if (mNetworkAdapters [slot]->rollback())
7419	networkAdapters [slot] = mNetworkAdapters [slot];
7420
7421	for (ULONG slot = 0; slot < ELEMENTS (mSerialPorts); slot ++)
7422	if (mSerialPorts [slot])
7423	if (mSerialPorts [slot]->rollback())
7424	serialPorts [slot] = mSerialPorts [slot];
7425
7426	for (ULONG slot = 0; slot < ELEMENTS (mParallelPorts); slot ++)
7427	if (mParallelPorts [slot])
7428	if (mParallelPorts [slot]->rollback())
7429	parallelPorts [slot] = mParallelPorts [slot];
7430
7431	if (aNotify)
7432	{
7433	/* inform the direct session about changes */
7434
7435	ComObjPtr <Machine> that = this;
7436	alock.leave();
7437
7438	if (sharedFoldersChanged)
7439	that->onSharedFolderChange();
7440
7441	if (vrdpChanged)
7442	that->onVRDPServerChange();
7443	if (dvdChanged)
7444	that->onDVDDriveChange();
7445	if (floppyChanged)
7446	that->onFloppyDriveChange();
7447	if (usbChanged)
7448	that->onUSBControllerChange();
7449	if (sataChanged)
7450	that->onSATAControllerChange();
7451
7452	for (ULONG slot = 0; slot < ELEMENTS (networkAdapters); slot ++)
7453	if (networkAdapters [slot])
7454	that->onNetworkAdapterChange (networkAdapters [slot]);
7455	for (ULONG slot = 0; slot < ELEMENTS (serialPorts); slot ++)
7456	if (serialPorts [slot])
7457	that->onSerialPortChange (serialPorts [slot]);
7458	for (ULONG slot = 0; slot < ELEMENTS (parallelPorts); slot ++)
7459	if (parallelPorts [slot])
7460	that->onParallelPortChange (parallelPorts [slot]);
7461	}
7462	}
7463
7464	/**
7465	* Commits all the changes to machine settings.
7466	*
7467	* Note that when committing fails at some stage, it still continues
7468	* until the end. So, all data will either be actually committed or rolled
7469	* back (for failed cases) and the returned result code will describe the
7470	* first failure encountered. However, #isModified() will still return true
7471	* in case of failure, to indicade that settings in memory and on disk are
7472	* out of sync.
7473	*
7474	* @note Locks objects!
7475	*/
7476	HRESULT Machine::commit()
7477	{
7478	AutoCaller autoCaller (this);
7479	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
7480
7481	AutoWriteLock alock (this);
7482
7483	HRESULT rc = S_OK;
7484
7485	/*
7486	* use safe commit to ensure Snapshot machines (that share mUserData)
7487	* will still refer to a valid memory location
7488	*/
7489	mUserData.commitCopy();
7490
7491	mHWData.commit();
7492
7493	if (mHDData.isBackedUp())
7494	rc = fixupHardDisks (true /* aCommit */);
7495
7496	mBIOSSettings->commit();
7497	#ifdef VBOX_VRDP
7498	mVRDPServer->commit();
7499	#endif
7500	mDVDDrive->commit();
7501	mFloppyDrive->commit();
7502	mAudioAdapter->commit();
7503	mUSBController->commit();
7504	mSATAController->commit();
7505
7506	for (ULONG slot = 0; slot < ELEMENTS (mNetworkAdapters); slot ++)
7507	mNetworkAdapters [slot]->commit();
7508	for (ULONG slot = 0; slot < ELEMENTS (mSerialPorts); slot ++)
7509	mSerialPorts [slot]->commit();
7510	for (ULONG slot = 0; slot < ELEMENTS (mParallelPorts); slot ++)
7511	mParallelPorts [slot]->commit();
7512
7513	if (mType == IsSessionMachine)
7514	{
7515	/* attach new data to the primary machine and reshare it */
7516	mPeer->mUserData.attach (mUserData);
7517	mPeer->mHWData.attach (mHWData);
7518	mPeer->mHDData.attach (mHDData);
7519	}
7520
7521	if (FAILED (rc))
7522	{
7523	/*
7524	* backup arbitrary data item to cause #isModified() to still return
7525	* true in case of any error
7526	*/
7527	mHWData.backup();
7528	}
7529
7530	return rc;
7531	}
7532
7533	/**
7534	* Copies all the hardware data from the given machine.
7535	*
7536	* @note
7537	* This method must be called from under this object's lock.
7538	* @note
7539	* This method doesn't call #commit(), so all data remains backed up
7540	* and unsaved.
7541	*/
7542	void Machine::copyFrom (Machine *aThat)
7543	{
7544	AssertReturn (mType == IsMachine \|\| mType == IsSessionMachine, (void) 0);
7545	AssertReturn (aThat->mType == IsSnapshotMachine, (void) 0);
7546
7547	mHWData.assignCopy (aThat->mHWData);
7548
7549	// create copies of all shared folders (mHWData after attiching a copy
7550	// contains just references to original objects)
7551	for (HWData::SharedFolderList::iterator it = mHWData->mSharedFolders.begin();
7552	it != mHWData->mSharedFolders.end();
7553	++ it)
7554	{
7555	ComObjPtr <SharedFolder> folder;
7556	folder.createObject();
7557	HRESULT rc = folder->initCopy (machine(), *it);
7558	AssertComRC (rc);
7559	*it = folder;
7560	}
7561
7562	mBIOSSettings->copyFrom (aThat->mBIOSSettings);
7563	#ifdef VBOX_VRDP
7564	mVRDPServer->copyFrom (aThat->mVRDPServer);
7565	#endif
7566	mDVDDrive->copyFrom (aThat->mDVDDrive);
7567	mFloppyDrive->copyFrom (aThat->mFloppyDrive);
7568	mAudioAdapter->copyFrom (aThat->mAudioAdapter);
7569	mUSBController->copyFrom (aThat->mUSBController);
7570	mSATAController->copyFrom (aThat->mSATAController);
7571
7572	for (ULONG slot = 0; slot < ELEMENTS (mNetworkAdapters); slot ++)
7573	mNetworkAdapters [slot]->copyFrom (aThat->mNetworkAdapters [slot]);
7574	for (ULONG slot = 0; slot < ELEMENTS (mSerialPorts); slot ++)
7575	mSerialPorts [slot]->copyFrom (aThat->mSerialPorts [slot]);
7576	for (ULONG slot = 0; slot < ELEMENTS (mParallelPorts); slot ++)
7577	mParallelPorts [slot]->copyFrom (aThat->mParallelPorts [slot]);
7578	}
7579
7580	#ifdef VBOX_WITH_RESOURCE_USAGE_API
7581	void Machine::registerMetrics (PerformanceCollector aCollector, Machine aMachine, RTPROCESS pid)
7582	{
7583	pm::MetricFactory *metricFactory = aCollector->getMetricFactory();
7584	/* Create sub metrics */
7585	pm::SubMetric *cpuLoadUser = new pm::SubMetric ("CPU/Load/User",
7586	"Percentage of processor time spent in user mode by VM process.");
7587	pm::SubMetric *cpuLoadKernel = new pm::SubMetric ("CPU/Load/Kernel",
7588	"Percentage of processor time spent in kernel mode by VM process.");
7589	pm::SubMetric *ramUsageUsed = new pm::SubMetric ("RAM/Usage/Used",
7590	"Size of resident portion of VM process in memory.");
7591	/* Create and register base metrics */
7592	IUnknown *objptr;
7593
7594	ComObjPtr<Machine> tmp = aMachine;
7595	tmp.queryInterfaceTo (&objptr);
7596	pm::BaseMetric *cpuLoad =
7597	metricFactory->createMachineCpuLoad (objptr, pid,
7598	cpuLoadUser, cpuLoadKernel);
7599	aCollector->registerBaseMetric (cpuLoad);
7600	pm::BaseMetric *ramUsage =
7601	metricFactory->createMachineRamUsage (objptr, pid, ramUsageUsed);
7602	aCollector->registerBaseMetric (ramUsage);
7603
7604	aCollector->registerMetric (new pm::Metric(cpuLoad, cpuLoadUser, 0));
7605	aCollector->registerMetric (new pm::Metric(cpuLoad, cpuLoadUser,
7606	new pm::AggregateAvg()));
7607	aCollector->registerMetric (new pm::Metric(cpuLoad, cpuLoadUser,
7608	new pm::AggregateMin()));
7609	aCollector->registerMetric (new pm::Metric(cpuLoad, cpuLoadUser,
7610	new pm::AggregateMax()));
7611	aCollector->registerMetric (new pm::Metric(cpuLoad, cpuLoadKernel, 0));
7612	aCollector->registerMetric (new pm::Metric(cpuLoad, cpuLoadKernel,
7613	new pm::AggregateAvg()));
7614	aCollector->registerMetric (new pm::Metric(cpuLoad, cpuLoadKernel,
7615	new pm::AggregateMin()));
7616	aCollector->registerMetric (new pm::Metric(cpuLoad, cpuLoadKernel,
7617	new pm::AggregateMax()));
7618
7619	aCollector->registerMetric (new pm::Metric(ramUsage, ramUsageUsed, 0));
7620	aCollector->registerMetric (new pm::Metric(ramUsage, ramUsageUsed,
7621	new pm::AggregateAvg()));
7622	aCollector->registerMetric (new pm::Metric(ramUsage, ramUsageUsed,
7623	new pm::AggregateMin()));
7624	aCollector->registerMetric (new pm::Metric(ramUsage, ramUsageUsed,
7625	new pm::AggregateMax()));
7626	};
7627
7628	void Machine::unregisterMetrics (PerformanceCollector aCollector, Machine aMachine)
7629	{
7630	aCollector->unregisterMetricsFor (aMachine);
7631	aCollector->unregisterBaseMetricsFor (aMachine);
7632	};
7633	#endif /* VBOX_WITH_RESOURCE_USAGE_API */
7634
7635
7636	/////////////////////////////////////////////////////////////////////////////
7637	// SessionMachine class
7638	/////////////////////////////////////////////////////////////////////////////
7639
7640	/** Task structure for asynchronous VM operations */
7641	struct SessionMachine::Task
7642	{
7643	Task (SessionMachine m, Progress p)
7644	: machine (m), progress (p)
7645	, state (m->mData->mMachineState) // save the current machine state
7646	, subTask (false), settingsChanged (false)
7647	{}
7648
7649	void modifyLastState (MachineState_T s)
7650	{
7651	const_cast <MachineState_T > (&state) = s;
7652	}
7653
7654	virtual void handler() = 0;
7655
7656	const ComObjPtr <SessionMachine> machine;
7657	const ComObjPtr <Progress> progress;
7658	const MachineState_T state;
7659
7660	bool subTask : 1;
7661	bool settingsChanged : 1;
7662	};
7663
7664	/** Take snapshot task */
7665	struct SessionMachine::TakeSnapshotTask : public SessionMachine::Task
7666	{
7667	TakeSnapshotTask (SessionMachine *m)
7668	: Task (m, NULL) {}
7669
7670	void handler() { machine->takeSnapshotHandler (*this); }
7671	};
7672
7673	/** Discard snapshot task */
7674	struct SessionMachine::DiscardSnapshotTask : public SessionMachine::Task
7675	{
7676	DiscardSnapshotTask (SessionMachine m, Progress p, Snapshot *s)
7677	: Task (m, p)
7678	, snapshot (s) {}
7679
7680	DiscardSnapshotTask (const Task &task, Snapshot *s)
7681	: Task (task)
7682	, snapshot (s) {}
7683
7684	void handler() { machine->discardSnapshotHandler (*this); }
7685
7686	const ComObjPtr <Snapshot> snapshot;
7687	};
7688
7689	/** Discard current state task */
7690	struct SessionMachine::DiscardCurrentStateTask : public SessionMachine::Task
7691	{
7692	DiscardCurrentStateTask (SessionMachine m, Progress p,
7693	bool discardCurSnapshot)
7694	: Task (m, p), discardCurrentSnapshot (discardCurSnapshot) {}
7695
7696	void handler() { machine->discardCurrentStateHandler (*this); }
7697
7698	const bool discardCurrentSnapshot;
7699	};
7700
7701	////////////////////////////////////////////////////////////////////////////////
7702
7703	DEFINE_EMPTY_CTOR_DTOR (SessionMachine)
7704
7705	HRESULT SessionMachine::FinalConstruct()
7706	{
7707	LogFlowThisFunc (("\n"));
7708
7709	/* set the proper type to indicate we're the SessionMachine instance */
7710	unconst (mType) = IsSessionMachine;
7711
7712	#if defined(RT_OS_WINDOWS)
7713	mIPCSem = NULL;
7714	#elif defined(RT_OS_OS2)
7715	mIPCSem = NULLHANDLE;
7716	#elif defined(VBOX_WITH_SYS_V_IPC_SESSION_WATCHER)
7717	mIPCSem = -1;
7718	#else
7719	# error "Port me!"
7720	#endif
7721
7722	return S_OK;
7723	}
7724
7725	void SessionMachine::FinalRelease()
7726	{
7727	LogFlowThisFunc (("\n"));
7728
7729	uninit (Uninit::Unexpected);
7730	}
7731
7732	/**
7733	* @note Must be called only by Machine::openSession() from its own write lock.
7734	*/
7735	HRESULT SessionMachine::init (Machine *aMachine)
7736	{
7737	LogFlowThisFuncEnter();
7738	LogFlowThisFunc (("mName={%ls}\n", aMachine->mUserData->mName.raw()));
7739
7740	AssertReturn (aMachine, E_INVALIDARG);
7741
7742	AssertReturn (aMachine->lockHandle()->isWriteLockOnCurrentThread(), E_FAIL);
7743
7744	/* Enclose the state transition NotReady->InInit->Ready */
7745	AutoInitSpan autoInitSpan (this);
7746	AssertReturn (autoInitSpan.isOk(), E_UNEXPECTED);
7747
7748	/* create the interprocess semaphore */
7749	#if defined(RT_OS_WINDOWS)
7750	mIPCSemName = aMachine->mData->mConfigFileFull;
7751	for (size_t i = 0; i < mIPCSemName.length(); i++)
7752	if (mIPCSemName[i] == '\\')
7753	mIPCSemName[i] = '/';
7754	mIPCSem = ::CreateMutex (NULL, FALSE, mIPCSemName);
7755	ComAssertMsgRet (mIPCSem,
7756	("Cannot create IPC mutex '%ls', err=%d\n",
7757	mIPCSemName.raw(), ::GetLastError()),
7758	E_FAIL);
7759	#elif defined(RT_OS_OS2)
7760	Utf8Str ipcSem = Utf8StrFmt ("\\SEM32\\VBOX\\VM\\{%Vuuid}",
7761	aMachine->mData->mUuid.raw());
7762	mIPCSemName = ipcSem;
7763	APIRET arc = ::DosCreateMutexSem ((PSZ) ipcSem.raw(), &mIPCSem, 0, FALSE);
7764	ComAssertMsgRet (arc == NO_ERROR,
7765	("Cannot create IPC mutex '%s', arc=%ld\n",
7766	ipcSem.raw(), arc),
7767	E_FAIL);
7768	#elif defined(VBOX_WITH_SYS_V_IPC_SESSION_WATCHER)
7769	Utf8Str configFile = aMachine->mData->mConfigFileFull;
7770	char *configFileCP = NULL;
7771	int error;
7772	RTStrUtf8ToCurrentCP (&configFileCP, configFile);
7773	key_t key = ::ftok (configFileCP, 0);
7774	RTStrFree (configFileCP);
7775	mIPCSem = ::semget (key, 1, S_IRWXU \| S_IRWXG \| S_IRWXO \| IPC_CREAT);
7776	error = errno;
7777	if (mIPCSem < 0 && error == ENOSYS)
7778	{
7779	setError(E_FAIL,
7780	tr ("Cannot create IPC semaphore. Most likely your host kernel lacks "
7781	"support for SysV IPC. Check the host kernel configuration for "
7782	"CONFIG_SYSVIPC=y"));
7783	return E_FAIL;
7784	}
7785	ComAssertMsgRet (mIPCSem >= 0, ("Cannot create IPC semaphore, errno=%d", error),
7786	E_FAIL);
7787	/* set the initial value to 1 */
7788	int rv = ::semctl (mIPCSem, 0, SETVAL, 1);
7789	ComAssertMsgRet (rv == 0, ("Cannot init IPC semaphore, errno=%d", errno),
7790	E_FAIL);
7791	#else
7792	# error "Port me!"
7793	#endif
7794
7795	/* memorize the peer Machine */
7796	unconst (mPeer) = aMachine;
7797	/* share the parent pointer */
7798	unconst (mParent) = aMachine->mParent;
7799
7800	/* take the pointers to data to share */
7801	mData.share (aMachine->mData);
7802	mSSData.share (aMachine->mSSData);
7803
7804	mUserData.share (aMachine->mUserData);
7805	mHWData.share (aMachine->mHWData);
7806	mHDData.share (aMachine->mHDData);
7807
7808	unconst (mBIOSSettings).createObject();
7809	mBIOSSettings->init (this, aMachine->mBIOSSettings);
7810	#ifdef VBOX_VRDP
7811	/* create another VRDPServer object that will be mutable */
7812	unconst (mVRDPServer).createObject();
7813	mVRDPServer->init (this, aMachine->mVRDPServer);
7814	#endif
7815	/* create another DVD drive object that will be mutable */
7816	unconst (mDVDDrive).createObject();
7817	mDVDDrive->init (this, aMachine->mDVDDrive);
7818	/* create another floppy drive object that will be mutable */
7819	unconst (mFloppyDrive).createObject();
7820	mFloppyDrive->init (this, aMachine->mFloppyDrive);
7821	/* create another audio adapter object that will be mutable */
7822	unconst (mAudioAdapter).createObject();
7823	mAudioAdapter->init (this, aMachine->mAudioAdapter);
7824	/* create a list of serial ports that will be mutable */
7825	for (ULONG slot = 0; slot < ELEMENTS (mSerialPorts); slot ++)
7826	{
7827	unconst (mSerialPorts [slot]).createObject();
7828	mSerialPorts [slot]->init (this, aMachine->mSerialPorts [slot]);
7829	}
7830	/* create a list of parallel ports that will be mutable */
7831	for (ULONG slot = 0; slot < ELEMENTS (mParallelPorts); slot ++)
7832	{
7833	unconst (mParallelPorts [slot]).createObject();
7834	mParallelPorts [slot]->init (this, aMachine->mParallelPorts [slot]);
7835	}
7836	/* create another USB controller object that will be mutable */
7837	unconst (mUSBController).createObject();
7838	mUSBController->init (this, aMachine->mUSBController);
7839	/* create another SATA controller object that will be mutable */
7840	unconst (mSATAController).createObject();
7841	mSATAController->init (this, aMachine->mSATAController);
7842	/* create a list of network adapters that will be mutable */
7843	for (ULONG slot = 0; slot < ELEMENTS (mNetworkAdapters); slot ++)
7844	{
7845	unconst (mNetworkAdapters [slot]).createObject();
7846	mNetworkAdapters [slot]->init (this, aMachine->mNetworkAdapters [slot]);
7847	}
7848
7849	#ifdef VBOX_WITH_RESOURCE_USAGE_API
7850	registerMetrics (mParent->performanceCollector(), aMachine, mData->mSession.mPid);
7851	#endif /* VBOX_WITH_RESOURCE_USAGE_API */
7852
7853	/* Confirm a successful initialization when it's the case */
7854	autoInitSpan.setSucceeded();
7855
7856	LogFlowThisFuncLeave();
7857	return S_OK;
7858	}
7859
7860	/**
7861	* Uninitializes this session object. If the reason is other than
7862	* Uninit::Unexpected, then this method MUST be called from #checkForDeath().
7863	*
7864	* @param aReason uninitialization reason
7865	*
7866	* @note Locks mParent + this object for writing.
7867	*/
7868	void SessionMachine::uninit (Uninit::Reason aReason)
7869	{
7870	LogFlowThisFuncEnter();
7871	LogFlowThisFunc (("reason=%d\n", aReason));
7872
7873	/*
7874	* Strongly reference ourselves to prevent this object deletion after
7875	* mData->mSession.mMachine.setNull() below (which can release the last
7876	* reference and call the destructor). Important: this must be done before
7877	* accessing any members (and before AutoUninitSpan that does it as well).
7878	* This self reference will be released as the very last step on return.
7879	*/
7880	ComObjPtr <SessionMachine> selfRef = this;
7881
7882	/* Enclose the state transition Ready->InUninit->NotReady */
7883	AutoUninitSpan autoUninitSpan (this);
7884	if (autoUninitSpan.uninitDone())
7885	{
7886	LogFlowThisFunc (("Already uninitialized\n"));
7887	LogFlowThisFuncLeave();
7888	return;
7889	}
7890
7891	if (autoUninitSpan.initFailed())
7892	{
7893	/* We've been called by init() because it's failed. It's not really
7894	* necessary (nor it's safe) to perform the regular uninit sequense
7895	* below, the following is enough.
7896	*/
7897	LogFlowThisFunc (("Initialization failed.\n"));
7898	#if defined(RT_OS_WINDOWS)
7899	if (mIPCSem)
7900	::CloseHandle (mIPCSem);
7901	mIPCSem = NULL;
7902	#elif defined(RT_OS_OS2)
7903	if (mIPCSem != NULLHANDLE)
7904	::DosCloseMutexSem (mIPCSem);
7905	mIPCSem = NULLHANDLE;
7906	#elif defined(VBOX_WITH_SYS_V_IPC_SESSION_WATCHER)
7907	if (mIPCSem >= 0)
7908	::semctl (mIPCSem, 0, IPC_RMID);
7909	mIPCSem = -1;
7910	#else
7911	# error "Port me!"
7912	#endif
7913	uninitDataAndChildObjects();
7914	mData.free();
7915	unconst (mParent).setNull();
7916	unconst (mPeer).setNull();
7917	LogFlowThisFuncLeave();
7918	return;
7919	}
7920
7921	/* We need to lock this object in uninit() because the lock is shared
7922	* with mPeer (as well as data we modify below). mParent->addProcessToReap()
7923	* and others need mParent lock. */
7924	AutoMultiWriteLock2 alock (mParent, this);
7925
7926	#ifdef VBOX_WITH_RESOURCE_USAGE_API
7927	unregisterMetrics (mParent->performanceCollector(), mPeer);
7928	#endif /* VBOX_WITH_RESOURCE_USAGE_API */
7929
7930	MachineState_T lastState = mData->mMachineState;
7931
7932	if (aReason == Uninit::Abnormal)
7933	{
7934	LogWarningThisFunc (("ABNORMAL client termination! (wasRunning=%d)\n",
7935	lastState >= MachineState_Running));
7936
7937	/* reset the state to Aborted */
7938	if (mData->mMachineState != MachineState_Aborted)
7939	setMachineState (MachineState_Aborted);
7940	}
7941
7942	if (isModified())
7943	{
7944	LogWarningThisFunc (("Discarding unsaved settings changes!\n"));
7945	rollback (false /* aNotify */);
7946	}
7947
7948	Assert (!mSnapshotData.mStateFilePath \|\| !mSnapshotData.mSnapshot);
7949	if (mSnapshotData.mStateFilePath)
7950	{
7951	LogWarningThisFunc (("canceling failed save state request!\n"));
7952	endSavingState (FALSE /* aSuccess */);
7953	}
7954	else if (!!mSnapshotData.mSnapshot)
7955	{
7956	LogWarningThisFunc (("canceling untaken snapshot!\n"));
7957	endTakingSnapshot (FALSE /* aSuccess */);
7958	}
7959
7960	#ifdef VBOX_WITH_USB
7961	/* release all captured USB devices */
7962	if (aReason == Uninit::Abnormal && lastState >= MachineState_Running)
7963	{
7964	/* Console::captureUSBDevices() is called in the VM process only after
7965	* setting the machine state to Starting or Restoring.
7966	* Console::detachAllUSBDevices() will be called upon successful
7967	* termination. So, we need to release USB devices only if there was
7968	* an abnormal termination of a running VM.
7969	*
7970	* This is identical to SessionMachine::DetachAllUSBDevices except
7971	* for the aAbnormal argument. */
7972	HRESULT rc = mUSBController->notifyProxy (false /* aInsertFilters */);
7973	AssertComRC (rc);
7974	NOREF (rc);
7975
7976	USBProxyService *service = mParent->host()->usbProxyService();
7977	if (service)
7978	service->detachAllDevicesFromVM (this, true /* aDone /, true / aAbnormal */);
7979	}
7980	#endif /* VBOX_WITH_USB */
7981
7982	if (!mData->mSession.mType.isNull())
7983	{
7984	/* mType is not null when this machine's process has been started by
7985	* VirtualBox::OpenRemoteSession(), therefore it is our child. We
7986	* need to queue the PID to reap the process (and avoid zombies on
7987	* Linux). */
7988	Assert (mData->mSession.mPid != NIL_RTPROCESS);
7989	mParent->addProcessToReap (mData->mSession.mPid);
7990	}
7991
7992	mData->mSession.mPid = NIL_RTPROCESS;
7993
7994	if (aReason == Uninit::Unexpected)
7995	{
7996	/* Uninitialization didn't come from #checkForDeath(), so tell the
7997	* client watcher thread to update the set of machines that have open
7998	* sessions. */
7999	mParent->updateClientWatcher();
8000	}
8001
8002	/* uninitialize all remote controls */
8003	if (mData->mSession.mRemoteControls.size())
8004	{
8005	LogFlowThisFunc (("Closing remote sessions (%d):\n",
8006	mData->mSession.mRemoteControls.size()));
8007
8008	Data::Session::RemoteControlList::iterator it =
8009	mData->mSession.mRemoteControls.begin();
8010	while (it != mData->mSession.mRemoteControls.end())
8011	{
8012	LogFlowThisFunc ((" Calling remoteControl->Uninitialize()...\n"));
8013	HRESULT rc = (*it)->Uninitialize();
8014	LogFlowThisFunc ((" remoteControl->Uninitialize() returned %08X\n", rc));
8015	if (FAILED (rc))
8016	LogWarningThisFunc (("Forgot to close the remote session?\n"));
8017	++ it;
8018	}
8019	mData->mSession.mRemoteControls.clear();
8020	}
8021
8022	/*
8023	* An expected uninitialization can come only from #checkForDeath().
8024	* Otherwise it means that something's got really wrong (for examlple,
8025	* the Session implementation has released the VirtualBox reference
8026	* before it triggered #OnSessionEnd(), or before releasing IPC semaphore,
8027	* etc). However, it's also possible, that the client releases the IPC
8028	* semaphore correctly (i.e. before it releases the VirtualBox reference),
8029	* but but the VirtualBox release event comes first to the server process.
8030	* This case is practically possible, so we should not assert on an
8031	* unexpected uninit, just log a warning.
8032	*/
8033
8034	if ((aReason == Uninit::Unexpected))
8035	LogWarningThisFunc (("Unexpected SessionMachine uninitialization!\n"));
8036
8037	if (aReason != Uninit::Normal)
8038	{
8039	mData->mSession.mDirectControl.setNull();
8040	}
8041	else
8042	{
8043	/* this must be null here (see #OnSessionEnd()) */
8044	Assert (mData->mSession.mDirectControl.isNull());
8045	Assert (mData->mSession.mState == SessionState_Closing);
8046	Assert (!mData->mSession.mProgress.isNull());
8047
8048	mData->mSession.mProgress->notifyComplete (S_OK);
8049	mData->mSession.mProgress.setNull();
8050	}
8051
8052	/* remove the association between the peer machine and this session machine */
8053	Assert (mData->mSession.mMachine == this \|\|
8054	aReason == Uninit::Unexpected);
8055
8056	/* reset the rest of session data */
8057	mData->mSession.mMachine.setNull();
8058	mData->mSession.mState = SessionState_Closed;
8059	mData->mSession.mType.setNull();
8060
8061	/* close the interprocess semaphore before leaving the shared lock */
8062	#if defined(RT_OS_WINDOWS)
8063	if (mIPCSem)
8064	::CloseHandle (mIPCSem);
8065	mIPCSem = NULL;
8066	#elif defined(RT_OS_OS2)
8067	if (mIPCSem != NULLHANDLE)
8068	::DosCloseMutexSem (mIPCSem);
8069	mIPCSem = NULLHANDLE;
8070	#elif defined(VBOX_WITH_SYS_V_IPC_SESSION_WATCHER)
8071	if (mIPCSem >= 0)
8072	::semctl (mIPCSem, 0, IPC_RMID);
8073	mIPCSem = -1;
8074	#else
8075	# error "Port me!"
8076	#endif
8077
8078	/* fire an event */
8079	mParent->onSessionStateChange (mData->mUuid, SessionState_Closed);
8080
8081	uninitDataAndChildObjects();
8082
8083	/* free the essential data structure last */
8084	mData.free();
8085
8086	/* leave the shared lock before setting the below two to NULL */
8087	alock.leave();
8088
8089	unconst (mParent).setNull();
8090	unconst (mPeer).setNull();
8091
8092	LogFlowThisFuncLeave();
8093	}
8094
8095	// util::Lockable interface
8096	////////////////////////////////////////////////////////////////////////////////
8097
8098	/**
8099	* Overrides VirtualBoxBase::lockHandle() in order to share the lock handle
8100	* with the primary Machine instance (mPeer).
8101	*/
8102	RWLockHandle *SessionMachine::lockHandle() const
8103	{
8104	AssertReturn (!mPeer.isNull(), NULL);
8105	return mPeer->lockHandle();
8106	}
8107
8108	// IInternalMachineControl methods
8109	////////////////////////////////////////////////////////////////////////////////
8110
8111	/**
8112	* @note Locks the same as #setMachineState() does.
8113	*/
8114	STDMETHODIMP SessionMachine::UpdateState (MachineState_T machineState)
8115	{
8116	return setMachineState (machineState);
8117	}
8118
8119	/**
8120	* @note Locks this object for reading.
8121	*/
8122	STDMETHODIMP SessionMachine::GetIPCId (BSTR *id)
8123	{
8124	AutoCaller autoCaller (this);
8125	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
8126
8127	AutoReadLock alock (this);
8128
8129	#if defined(RT_OS_WINDOWS) \|\| defined(RT_OS_OS2)
8130	mIPCSemName.cloneTo (id);
8131	return S_OK;
8132	#elif defined(VBOX_WITH_SYS_V_IPC_SESSION_WATCHER)
8133	mData->mConfigFileFull.cloneTo (id);
8134	return S_OK;
8135	#else
8136	# error "Port me!"
8137	#endif
8138	}
8139
8140	/**
8141	* Goes through the USB filters of the given machine to see if the given
8142	* device matches any filter or not.
8143	*
8144	* @note Locks the same as USBController::hasMatchingFilter() does.
8145	*/
8146	STDMETHODIMP SessionMachine::RunUSBDeviceFilters (IUSBDevice *aUSBDevice,
8147	BOOL *aMatched,
8148	ULONG *aMaskedIfs)
8149	{
8150	LogFlowThisFunc (("\n"));
8151
8152	if (!aUSBDevice)
8153	return E_INVALIDARG;
8154	if (!aMatched)
8155	return E_POINTER;
8156
8157	AutoCaller autoCaller (this);
8158	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
8159
8160	#ifdef VBOX_WITH_USB
8161	*aMatched = mUSBController->hasMatchingFilter (aUSBDevice, aMaskedIfs);
8162	#else
8163	*aMatched = FALSE;
8164	#endif
8165
8166	return S_OK;
8167	}
8168
8169	/**
8170	* @note Locks the same as Host::captureUSBDevice() does.
8171	*/
8172	STDMETHODIMP SessionMachine::CaptureUSBDevice (INPTR GUIDPARAM aId)
8173	{
8174	LogFlowThisFunc (("\n"));
8175
8176	AutoCaller autoCaller (this);
8177	AssertComRCReturnRC (autoCaller.rc());
8178
8179	#ifdef VBOX_WITH_USB
8180	/* if captureDeviceForVM() fails, it must have set extended error info */
8181	MultiResult rc = mParent->host()->checkUSBProxyService();
8182	CheckComRCReturnRC (rc);
8183
8184	USBProxyService *service = mParent->host()->usbProxyService();
8185	AssertReturn (service, E_FAIL);
8186	return service->captureDeviceForVM (this, aId);
8187	#else
8188	return E_FAIL;
8189	#endif
8190	}
8191
8192	/**
8193	* @note Locks the same as Host::detachUSBDevice() does.
8194	*/
8195	STDMETHODIMP SessionMachine::DetachUSBDevice (INPTR GUIDPARAM aId, BOOL aDone)
8196	{
8197	LogFlowThisFunc (("\n"));
8198
8199	AutoCaller autoCaller (this);
8200	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
8201
8202	#ifdef VBOX_WITH_USB
8203	USBProxyService *service = mParent->host()->usbProxyService();
8204	AssertReturn (service, E_FAIL);
8205	return service->detachDeviceFromVM (this, aId, !!aDone);
8206	#else
8207	return E_FAIL;
8208	#endif
8209	}
8210
8211	/**
8212	* Inserts all machine filters to the USB proxy service and then calls
8213	* Host::autoCaptureUSBDevices().
8214	*
8215	* Called by Console from the VM process upon VM startup.
8216	*
8217	* @note Locks what called methods lock.
8218	*/
8219	STDMETHODIMP SessionMachine::AutoCaptureUSBDevices()
8220	{
8221	LogFlowThisFunc (("\n"));
8222
8223	AutoCaller autoCaller (this);
8224	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
8225
8226	#ifdef VBOX_WITH_USB
8227	HRESULT rc = mUSBController->notifyProxy (true /* aInsertFilters */);
8228	AssertComRC (rc);
8229	NOREF (rc);
8230
8231	USBProxyService *service = mParent->host()->usbProxyService();
8232	AssertReturn (service, E_FAIL);
8233	return service->autoCaptureDevicesForVM (this);
8234	#else
8235	return S_OK;
8236	#endif
8237	}
8238
8239	/**
8240	* Removes all machine filters from the USB proxy service and then calls
8241	* Host::detachAllUSBDevices().
8242	*
8243	* Called by Console from the VM process upon normal VM termination or by
8244	* SessionMachine::uninit() upon abnormal VM termination (from under the
8245	* Machine/SessionMachine lock).
8246	*
8247	* @note Locks what called methods lock.
8248	*/
8249	STDMETHODIMP SessionMachine::DetachAllUSBDevices(BOOL aDone)
8250	{
8251	LogFlowThisFunc (("\n"));
8252
8253	AutoCaller autoCaller (this);
8254	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
8255
8256	#ifdef VBOX_WITH_USB
8257	HRESULT rc = mUSBController->notifyProxy (false /* aInsertFilters */);
8258	AssertComRC (rc);
8259	NOREF (rc);
8260
8261	USBProxyService *service = mParent->host()->usbProxyService();
8262	AssertReturn (service, E_FAIL);
8263	return service->detachAllDevicesFromVM (this, !!aDone, false /* aAbnormal */);
8264	#else
8265	return S_OK;
8266	#endif
8267	}
8268
8269	/**
8270	* @note Locks mParent + this object for writing.
8271	*/
8272	STDMETHODIMP SessionMachine::OnSessionEnd (ISession *aSession,
8273	IProgress **aProgress)
8274	{
8275	LogFlowThisFuncEnter();
8276
8277	AssertReturn (aSession, E_INVALIDARG);
8278	AssertReturn (aProgress, E_INVALIDARG);
8279
8280	AutoCaller autoCaller (this);
8281
8282	LogFlowThisFunc (("state=%d\n", autoCaller.state()));
8283	/*
8284	* We don't assert below because it might happen that a non-direct session
8285	* informs us it is closed right after we've been uninitialized -- it's ok.
8286	*/
8287	CheckComRCReturnRC (autoCaller.rc());
8288
8289	/* get IInternalSessionControl interface */
8290	ComPtr <IInternalSessionControl> control (aSession);
8291
8292	ComAssertRet (!control.isNull(), E_INVALIDARG);
8293
8294	/* Progress::init() needs mParent lock */
8295	AutoMultiWriteLock2 alock (mParent, this);
8296
8297	if (control.equalsTo (mData->mSession.mDirectControl))
8298	{
8299	ComAssertRet (aProgress, E_POINTER);
8300
8301	/* The direct session is being normally closed by the client process
8302	* ----------------------------------------------------------------- */
8303
8304	/* go to the closing state (essential for all open*Session() calls and
8305	* for #checkForDeath()) */
8306	Assert (mData->mSession.mState == SessionState_Open);
8307	mData->mSession.mState = SessionState_Closing;
8308
8309	/* set direct control to NULL to release the remote instance */
8310	mData->mSession.mDirectControl.setNull();
8311	LogFlowThisFunc (("Direct control is set to NULL\n"));
8312
8313	/*
8314	* Create the progress object the client will use to wait until
8315	* #checkForDeath() is called to uninitialize this session object
8316	* after it releases the IPC semaphore.
8317	*/
8318	ComObjPtr <Progress> progress;
8319	progress.createObject();
8320	progress->init (mParent, static_cast <IMachine *> (mPeer),
8321	Bstr (tr ("Closing session")), FALSE /* aCancelable */);
8322	progress.queryInterfaceTo (aProgress);
8323	mData->mSession.mProgress = progress;
8324	}
8325	else
8326	{
8327	/* the remote session is being normally closed */
8328	Data::Session::RemoteControlList::iterator it =
8329	mData->mSession.mRemoteControls.begin();
8330	while (it != mData->mSession.mRemoteControls.end())
8331	{
8332	if (control.equalsTo (*it))
8333	break;
8334	++it;
8335	}
8336	BOOL found = it != mData->mSession.mRemoteControls.end();
8337	ComAssertMsgRet (found, ("The session is not found in the session list!"),
8338	E_INVALIDARG);
8339	mData->mSession.mRemoteControls.remove (*it);
8340	}
8341
8342	LogFlowThisFuncLeave();
8343	return S_OK;
8344	}
8345
8346	/**
8347	* @note Locks mParent + this object for writing.
8348	*/
8349	STDMETHODIMP SessionMachine::BeginSavingState (IProgress aProgress, BSTR aStateFilePath)
8350	{
8351	LogFlowThisFuncEnter();
8352
8353	AssertReturn (aProgress, E_INVALIDARG);
8354	AssertReturn (aStateFilePath, E_POINTER);
8355
8356	AutoCaller autoCaller (this);
8357	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
8358
8359	/* mParent->addProgress() needs mParent lock */
8360	AutoMultiWriteLock2 alock (mParent, this);
8361
8362	AssertReturn (mData->mMachineState == MachineState_Paused &&
8363	mSnapshotData.mLastState == MachineState_Null &&
8364	mSnapshotData.mProgressId.isEmpty() &&
8365	mSnapshotData.mStateFilePath.isNull(),
8366	E_FAIL);
8367
8368	/* memorize the progress ID and add it to the global collection */
8369	Guid progressId;
8370	HRESULT rc = aProgress->COMGETTER(Id) (progressId.asOutParam());
8371	AssertComRCReturn (rc, rc);
8372	rc = mParent->addProgress (aProgress);
8373	AssertComRCReturn (rc, rc);
8374
8375	Bstr stateFilePath;
8376	/* stateFilePath is null when the machine is not running */
8377	if (mData->mMachineState == MachineState_Paused)
8378	{
8379	stateFilePath = Utf8StrFmt ("%ls%c{%Vuuid}.sav",
8380	mUserData->mSnapshotFolderFull.raw(),
8381	RTPATH_DELIMITER, mData->mUuid.raw());
8382	}
8383
8384	/* fill in the snapshot data */
8385	mSnapshotData.mLastState = mData->mMachineState;
8386	mSnapshotData.mProgressId = progressId;
8387	mSnapshotData.mStateFilePath = stateFilePath;
8388
8389	/* set the state to Saving (this is expected by Console::SaveState()) */
8390	setMachineState (MachineState_Saving);
8391
8392	stateFilePath.cloneTo (aStateFilePath);
8393
8394	return S_OK;
8395	}
8396
8397	/**
8398	* @note Locks mParent + this objects for writing.
8399	*/
8400	STDMETHODIMP SessionMachine::EndSavingState (BOOL aSuccess)
8401	{
8402	LogFlowThisFunc (("\n"));
8403
8404	AutoCaller autoCaller (this);
8405	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
8406
8407	/* endSavingState() need mParent lock */
8408	AutoMultiWriteLock2 alock (mParent, this);
8409
8410	AssertReturn (mData->mMachineState == MachineState_Saving &&
8411	mSnapshotData.mLastState != MachineState_Null &&
8412	!mSnapshotData.mProgressId.isEmpty() &&
8413	!mSnapshotData.mStateFilePath.isNull(),
8414	E_FAIL);
8415
8416	/*
8417	* on success, set the state to Saved;
8418	* on failure, set the state to the state we had when BeginSavingState() was
8419	* called (this is expected by Console::SaveState() and
8420	* Console::saveStateThread())
8421	*/
8422	if (aSuccess)
8423	setMachineState (MachineState_Saved);
8424	else
8425	setMachineState (mSnapshotData.mLastState);
8426
8427	return endSavingState (aSuccess);
8428	}
8429
8430	/**
8431	* @note Locks this objects for writing.
8432	*/
8433	STDMETHODIMP SessionMachine::AdoptSavedState (INPTR BSTR aSavedStateFile)
8434	{
8435	LogFlowThisFunc (("\n"));
8436
8437	AssertReturn (aSavedStateFile, E_INVALIDARG);
8438
8439	AutoCaller autoCaller (this);
8440	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
8441
8442	AutoWriteLock alock (this);
8443
8444	AssertReturn (mData->mMachineState == MachineState_PoweredOff \|\|
8445	mData->mMachineState == MachineState_Aborted,
8446	E_FAIL);
8447
8448	Utf8Str stateFilePathFull = aSavedStateFile;
8449	int vrc = calculateFullPath (stateFilePathFull, stateFilePathFull);
8450	if (VBOX_FAILURE (vrc))
8451	return setError (E_FAIL,
8452	tr ("Invalid saved state file path: '%ls' (%Vrc)"),
8453	aSavedStateFile, vrc);
8454
8455	mSSData->mStateFilePath = stateFilePathFull;
8456
8457	/* The below setMachineState() will detect the state transition and will
8458	* update the settings file */
8459
8460	return setMachineState (MachineState_Saved);
8461	}
8462
8463	/**
8464	* @note Locks mParent + this objects for writing.
8465	*/
8466	STDMETHODIMP SessionMachine::BeginTakingSnapshot (
8467	IConsole *aInitiator, INPTR BSTR aName, INPTR BSTR aDescription,
8468	IProgress aProgress, BSTR aStateFilePath,
8469	IProgress **aServerProgress)
8470	{
8471	LogFlowThisFuncEnter();
8472
8473	AssertReturn (aInitiator && aName, E_INVALIDARG);
8474	AssertReturn (aStateFilePath && aServerProgress, E_POINTER);
8475
8476	LogFlowThisFunc (("aName='%ls'\n", aName));
8477
8478	AutoCaller autoCaller (this);
8479	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
8480
8481	/* Progress::init() needs mParent lock */
8482	AutoMultiWriteLock2 alock (mParent, this);
8483
8484	AssertReturn ((mData->mMachineState < MachineState_Running \|\|
8485	mData->mMachineState == MachineState_Paused) &&
8486	mSnapshotData.mLastState == MachineState_Null &&
8487	mSnapshotData.mSnapshot.isNull() &&
8488	mSnapshotData.mServerProgress.isNull() &&
8489	mSnapshotData.mCombinedProgress.isNull(),
8490	E_FAIL);
8491
8492	bool takingSnapshotOnline = mData->mMachineState == MachineState_Paused;
8493
8494	if (!takingSnapshotOnline && mData->mMachineState != MachineState_Saved)
8495	{
8496	/*
8497	* save all current settings to ensure current changes are committed
8498	* and hard disks are fixed up
8499	*/
8500	HRESULT rc = saveSettings();
8501	CheckComRCReturnRC (rc);
8502	}
8503
8504	/* check that there are no Writethrough hard disks attached */
8505	for (HDData::HDAttachmentList::const_iterator
8506	it = mHDData->mHDAttachments.begin();
8507	it != mHDData->mHDAttachments.end();
8508	++ it)
8509	{
8510	ComObjPtr <HardDisk> hd = (*it)->hardDisk();
8511	AutoWriteLock hdLock (hd);
8512	if (hd->type() == HardDiskType_Writethrough)
8513	return setError (E_FAIL,
8514	tr ("Cannot take a snapshot when there is a Writethrough hard "
8515	" disk attached ('%ls')"), hd->toString().raw());
8516	}
8517
8518	AssertReturn (aProgress \|\| !takingSnapshotOnline, E_FAIL);
8519
8520	/* create an ID for the snapshot */
8521	Guid snapshotId;
8522	snapshotId.create();
8523
8524	Bstr stateFilePath;
8525	/* stateFilePath is null when the machine is not online nor saved */
8526	if (takingSnapshotOnline \|\| mData->mMachineState == MachineState_Saved)
8527	stateFilePath = Utf8StrFmt ("%ls%c{%Vuuid}.sav",
8528	mUserData->mSnapshotFolderFull.raw(),
8529	RTPATH_DELIMITER,
8530	snapshotId.ptr());
8531
8532	/* ensure the directory for the saved state file exists */
8533	if (stateFilePath)
8534	{
8535	Utf8Str dir = stateFilePath;
8536	RTPathStripFilename (dir.mutableRaw());
8537	if (!RTDirExists (dir))
8538	{
8539	int vrc = RTDirCreateFullPath (dir, 0777);
8540	if (VBOX_FAILURE (vrc))
8541	return setError (E_FAIL,
8542	tr ("Could not create a directory '%s' to save the "
8543	"VM state to (%Vrc)"),
8544	dir.raw(), vrc);
8545	}
8546	}
8547
8548	/* create a snapshot machine object */
8549	ComObjPtr <SnapshotMachine> snapshotMachine;
8550	snapshotMachine.createObject();
8551	HRESULT rc = snapshotMachine->init (this, snapshotId, stateFilePath);
8552	AssertComRCReturn (rc, rc);
8553
8554	Bstr progressDesc = Bstr (tr ("Taking snapshot of virtual machine"));
8555	Bstr firstOpDesc = Bstr (tr ("Preparing to take snapshot"));
8556
8557	/*
8558	* create a server-side progress object (it will be descriptionless
8559	* when we need to combine it with the VM-side progress, i.e. when we're
8560	* taking a snapshot online). The number of operations is:
8561	* 1 (preparing) + # of VDIs + 1 (if the state is saved so we need to copy it)
8562	*/
8563	ComObjPtr <Progress> serverProgress;
8564	{
8565	ULONG opCount = 1 + mHDData->mHDAttachments.size();
8566	if (mData->mMachineState == MachineState_Saved)
8567	opCount ++;
8568	serverProgress.createObject();
8569	if (takingSnapshotOnline)
8570	rc = serverProgress->init (FALSE, opCount, firstOpDesc);
8571	else
8572	rc = serverProgress->init (mParent, aInitiator, progressDesc, FALSE,
8573	opCount, firstOpDesc);
8574	AssertComRCReturn (rc, rc);
8575	}
8576
8577	/* create a combined server-side progress object when necessary */
8578	ComObjPtr <CombinedProgress> combinedProgress;
8579	if (takingSnapshotOnline)
8580	{
8581	combinedProgress.createObject();
8582	rc = combinedProgress->init (mParent, aInitiator, progressDesc,
8583	serverProgress, aProgress);
8584	AssertComRCReturn (rc, rc);
8585	}
8586
8587	/* create a snapshot object */
8588	RTTIMESPEC time;
8589	ComObjPtr <Snapshot> snapshot;
8590	snapshot.createObject();
8591	rc = snapshot->init (snapshotId, aName, aDescription,
8592	*RTTimeNow (&time), snapshotMachine,
8593	mData->mCurrentSnapshot);
8594	AssertComRCReturnRC (rc);
8595
8596	/*
8597	* create and start the task on a separate thread
8598	* (note that it will not start working until we release alock)
8599	*/
8600	TakeSnapshotTask *task = new TakeSnapshotTask (this);
8601	int vrc = RTThreadCreate (NULL, taskHandler,
8602	(void *) task,
8603	0, RTTHREADTYPE_MAIN_WORKER, 0, "TakeSnapshot");
8604	if (VBOX_FAILURE (vrc))
8605	{
8606	snapshot->uninit();
8607	delete task;
8608	ComAssertFailedRet (E_FAIL);
8609	}
8610
8611	/* fill in the snapshot data */
8612	mSnapshotData.mLastState = mData->mMachineState;
8613	mSnapshotData.mSnapshot = snapshot;
8614	mSnapshotData.mServerProgress = serverProgress;
8615	mSnapshotData.mCombinedProgress = combinedProgress;
8616
8617	/* set the state to Saving (this is expected by Console::TakeSnapshot()) */
8618	setMachineState (MachineState_Saving);
8619
8620	if (takingSnapshotOnline)
8621	stateFilePath.cloneTo (aStateFilePath);
8622	else
8623	*aStateFilePath = NULL;
8624
8625	serverProgress.queryInterfaceTo (aServerProgress);
8626
8627	LogFlowThisFuncLeave();
8628	return S_OK;
8629	}
8630
8631	/**
8632	* @note Locks mParent + this objects for writing.
8633	*/
8634	STDMETHODIMP SessionMachine::EndTakingSnapshot (BOOL aSuccess)
8635	{
8636	LogFlowThisFunc (("\n"));
8637
8638	AutoCaller autoCaller (this);
8639	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
8640
8641	/* Lock mParent because of endTakingSnapshot() */
8642	AutoMultiWriteLock2 alock (mParent, this);
8643
8644	AssertReturn (!aSuccess \|\|
8645	(mData->mMachineState == MachineState_Saving &&
8646	mSnapshotData.mLastState != MachineState_Null &&
8647	!mSnapshotData.mSnapshot.isNull() &&
8648	!mSnapshotData.mServerProgress.isNull() &&
8649	!mSnapshotData.mCombinedProgress.isNull()),
8650	E_FAIL);
8651
8652	/*
8653	* set the state to the state we had when BeginTakingSnapshot() was called
8654	* (this is expected by Console::TakeSnapshot() and
8655	* Console::saveStateThread())
8656	*/
8657	setMachineState (mSnapshotData.mLastState);
8658
8659	return endTakingSnapshot (aSuccess);
8660	}
8661
8662	/**
8663	* @note Locks mParent + this + children objects for writing!
8664	*/
8665	STDMETHODIMP SessionMachine::DiscardSnapshot (
8666	IConsole *aInitiator, INPTR GUIDPARAM aId,
8667	MachineState_T aMachineState, IProgress *aProgress)
8668	{
8669	LogFlowThisFunc (("\n"));
8670
8671	Guid id = aId;
8672	AssertReturn (aInitiator && !id.isEmpty(), E_INVALIDARG);
8673	AssertReturn (aMachineState && aProgress, E_POINTER);
8674
8675	AutoCaller autoCaller (this);
8676	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
8677
8678	/* Progress::init() needs mParent lock */
8679	AutoMultiWriteLock2 alock (mParent, this);
8680
8681	ComAssertRet (mData->mMachineState < MachineState_Running, E_FAIL);
8682
8683	ComObjPtr <Snapshot> snapshot;
8684	HRESULT rc = findSnapshot (id, snapshot, true /* aSetError */);
8685	CheckComRCReturnRC (rc);
8686
8687	AutoWriteLock snapshotLock (snapshot);
8688	if (snapshot == mData->mFirstSnapshot)
8689	{
8690	AutoWriteLock chLock (mData->mFirstSnapshot->childrenLock ());
8691	size_t childrenCount = mData->mFirstSnapshot->children().size();
8692	if (childrenCount > 1)
8693	return setError (E_FAIL,
8694	tr ("Cannot discard the snapshot '%ls' because it is the first "
8695	"snapshot of the machine '%ls' and it has more than one "
8696	"child snapshot (%d)"),
8697	snapshot->data().mName.raw(), mUserData->mName.raw(),
8698	childrenCount);
8699	}
8700
8701	/*
8702	* If the snapshot being discarded is the current one, ensure current
8703	* settings are committed and saved.
8704	*/
8705	if (snapshot == mData->mCurrentSnapshot)
8706	{
8707	if (isModified())
8708	{
8709	rc = saveSettings();
8710	CheckComRCReturnRC (rc);
8711	}
8712	}
8713
8714	/*
8715	* create a progress object. The number of operations is:
8716	* 1 (preparing) + # of VDIs
8717	*/
8718	ComObjPtr <Progress> progress;
8719	progress.createObject();
8720	rc = progress->init (mParent, aInitiator,
8721	Bstr (Utf8StrFmt (tr ("Discarding snapshot '%ls'"),
8722	snapshot->data().mName.raw())),
8723	FALSE /* aCancelable */,
8724	1 + snapshot->data().mMachine->mHDData->mHDAttachments.size(),
8725	Bstr (tr ("Preparing to discard snapshot")));
8726	AssertComRCReturn (rc, rc);
8727
8728	/* create and start the task on a separate thread */
8729	DiscardSnapshotTask *task = new DiscardSnapshotTask (this, progress, snapshot);
8730	int vrc = RTThreadCreate (NULL, taskHandler,
8731	(void *) task,
8732	0, RTTHREADTYPE_MAIN_WORKER, 0, "DiscardSnapshot");
8733	if (VBOX_FAILURE (vrc))
8734	delete task;
8735	ComAssertRCRet (vrc, E_FAIL);
8736
8737	/* set the proper machine state (note: after creating a Task instance) */
8738	setMachineState (MachineState_Discarding);
8739
8740	/* return the progress to the caller */
8741	progress.queryInterfaceTo (aProgress);
8742
8743	/* return the new state to the caller */
8744	*aMachineState = mData->mMachineState;
8745
8746	return S_OK;
8747	}
8748
8749	/**
8750	* @note Locks mParent + this + children objects for writing!
8751	*/
8752	STDMETHODIMP SessionMachine::DiscardCurrentState (
8753	IConsole aInitiator, MachineState_T aMachineState, IProgress **aProgress)
8754	{
8755	LogFlowThisFunc (("\n"));
8756
8757	AssertReturn (aInitiator, E_INVALIDARG);
8758	AssertReturn (aMachineState && aProgress, E_POINTER);
8759
8760	AutoCaller autoCaller (this);
8761	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
8762
8763	/* Progress::init() needs mParent lock */
8764	AutoMultiWriteLock2 alock (mParent, this);
8765
8766	ComAssertRet (mData->mMachineState < MachineState_Running, E_FAIL);
8767
8768	if (mData->mCurrentSnapshot.isNull())
8769	return setError (E_FAIL,
8770	tr ("Could not discard the current state of the machine '%ls' "
8771	"because it doesn't have any snapshots"),
8772	mUserData->mName.raw());
8773
8774	/*
8775	* create a progress object. The number of operations is:
8776	* 1 (preparing) + # of VDIs + 1 (if we need to copy the saved state file)
8777	*/
8778	ComObjPtr <Progress> progress;
8779	progress.createObject();
8780	{
8781	ULONG opCount = 1 + mData->mCurrentSnapshot->data()
8782	.mMachine->mHDData->mHDAttachments.size();
8783	if (mData->mCurrentSnapshot->stateFilePath())
8784	++ opCount;
8785	progress->init (mParent, aInitiator,
8786	Bstr (tr ("Discarding current machine state")),
8787	FALSE /* aCancelable */, opCount,
8788	Bstr (tr ("Preparing to discard current state")));
8789	}
8790
8791	/* create and start the task on a separate thread */
8792	DiscardCurrentStateTask *task =
8793	new DiscardCurrentStateTask (this, progress, false /* discardCurSnapshot */);
8794	int vrc = RTThreadCreate (NULL, taskHandler,
8795	(void *) task,
8796	0, RTTHREADTYPE_MAIN_WORKER, 0, "DiscardCurState");
8797	if (VBOX_FAILURE (vrc))
8798	delete task;
8799	ComAssertRCRet (vrc, E_FAIL);
8800
8801	/* set the proper machine state (note: after creating a Task instance) */
8802	setMachineState (MachineState_Discarding);
8803
8804	/* return the progress to the caller */
8805	progress.queryInterfaceTo (aProgress);
8806
8807	/* return the new state to the caller */
8808	*aMachineState = mData->mMachineState;
8809
8810	return S_OK;
8811	}
8812
8813	/**
8814	* @note Locks mParent + other objects for writing!
8815	*/
8816	STDMETHODIMP SessionMachine::DiscardCurrentSnapshotAndState (
8817	IConsole aInitiator, MachineState_T aMachineState, IProgress **aProgress)
8818	{
8819	LogFlowThisFunc (("\n"));
8820
8821	AssertReturn (aInitiator, E_INVALIDARG);
8822	AssertReturn (aMachineState && aProgress, E_POINTER);
8823
8824	AutoCaller autoCaller (this);
8825	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
8826
8827	/* Progress::init() needs mParent lock */
8828	AutoMultiWriteLock2 alock (mParent, this);
8829
8830	ComAssertRet (mData->mMachineState < MachineState_Running, E_FAIL);
8831
8832	if (mData->mCurrentSnapshot.isNull())
8833	return setError (E_FAIL,
8834	tr ("Could not discard the current state of the machine '%ls' "
8835	"because it doesn't have any snapshots"),
8836	mUserData->mName.raw());
8837
8838	/*
8839	* create a progress object. The number of operations is:
8840	* 1 (preparing) + # of VDIs in the current snapshot +
8841	* # of VDIs in the previous snapshot +
8842	* 1 (if we need to copy the saved state file of the previous snapshot)
8843	* or (if there is no previous snapshot):
8844	* 1 (preparing) + # of VDIs in the current snapshot * 2 +
8845	* 1 (if we need to copy the saved state file of the current snapshot)
8846	*/
8847	ComObjPtr <Progress> progress;
8848	progress.createObject();
8849	{
8850	ComObjPtr <Snapshot> curSnapshot = mData->mCurrentSnapshot;
8851	ComObjPtr <Snapshot> prevSnapshot = mData->mCurrentSnapshot->parent();
8852
8853	ULONG opCount = 1;
8854	if (prevSnapshot)
8855	{
8856	opCount += curSnapshot->data().mMachine->mHDData->mHDAttachments.size();
8857	opCount += prevSnapshot->data().mMachine->mHDData->mHDAttachments.size();
8858	if (prevSnapshot->stateFilePath())
8859	++ opCount;
8860	}
8861	else
8862	{
8863	opCount += curSnapshot->data().mMachine->mHDData->mHDAttachments.size() * 2;
8864	if (curSnapshot->stateFilePath())
8865	++ opCount;
8866	}
8867
8868	progress->init (mParent, aInitiator,
8869	Bstr (tr ("Discarding current machine snapshot and state")),
8870	FALSE /* aCancelable */, opCount,
8871	Bstr (tr ("Preparing to discard current snapshot and state")));
8872	}
8873
8874	/* create and start the task on a separate thread */
8875	DiscardCurrentStateTask *task =
8876	new DiscardCurrentStateTask (this, progress, true /* discardCurSnapshot */);
8877	int vrc = RTThreadCreate (NULL, taskHandler,
8878	(void *) task,
8879	0, RTTHREADTYPE_MAIN_WORKER, 0, "DiscardCurState");
8880	if (VBOX_FAILURE (vrc))
8881	delete task;
8882	ComAssertRCRet (vrc, E_FAIL);
8883
8884	/* set the proper machine state (note: after creating a Task instance) */
8885	setMachineState (MachineState_Discarding);
8886
8887	/* return the progress to the caller */
8888	progress.queryInterfaceTo (aProgress);
8889
8890	/* return the new state to the caller */
8891	*aMachineState = mData->mMachineState;
8892
8893	return S_OK;
8894	}
8895
8896	STDMETHODIMP SessionMachine::PullGuestProperties (ComSafeArrayOut(BSTR, aNames), ComSafeArrayOut(BSTR, aValues),
8897	ComSafeArrayOut(ULONG64, aTimestamps), ComSafeArrayOut(BSTR, aFlags))
8898	{
8899	LogFlowThisFunc (("\n"));
8900
8901	AutoCaller autoCaller (this);
8902	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
8903
8904	AutoReadLock alock (this);
8905
8906	AssertReturn(!ComSafeArrayOutIsNull (aNames), E_POINTER);
8907	AssertReturn(!ComSafeArrayOutIsNull (aValues), E_POINTER);
8908	AssertReturn(!ComSafeArrayOutIsNull (aTimestamps), E_POINTER);
8909	AssertReturn(!ComSafeArrayOutIsNull (aFlags), E_POINTER);
8910
8911	size_t cEntries = mHWData->mGuestProperties.size();
8912	com::SafeArray <BSTR> names(cEntries);
8913	com::SafeArray <BSTR> values(cEntries);
8914	com::SafeArray <ULONG64> timestamps(cEntries);
8915	com::SafeArray <BSTR> flags(cEntries);
8916	unsigned i = 0;
8917	for (HWData::GuestPropertyList::iterator it = mHWData->mGuestProperties.begin();
8918	it != mHWData->mGuestProperties.end(); ++it)
8919	{
8920	it->mName.cloneTo(&names[i]);
8921	it->mValue.cloneTo(&values[i]);
8922	timestamps[i] = it->mTimestamp;
8923	it->mFlags.cloneTo(&flags[i]);
8924	++i;
8925	}
8926	names.detachTo(ComSafeArrayOutArg (aNames));
8927	values.detachTo(ComSafeArrayOutArg (aValues));
8928	timestamps.detachTo(ComSafeArrayOutArg (aTimestamps));
8929	flags.detachTo(ComSafeArrayOutArg (aFlags));
8930	mHWData->mPropertyServiceActive = true;
8931	return S_OK;
8932	}
8933
8934	STDMETHODIMP SessionMachine::PushGuestProperties (ComSafeArrayIn(INPTR BSTR, aNames),
8935	ComSafeArrayIn(INPTR BSTR, aValues),
8936	ComSafeArrayIn(ULONG64, aTimestamps),
8937	ComSafeArrayIn(INPTR BSTR, aFlags))
8938	{
8939	LogFlowThisFunc (("\n"));
8940	AutoCaller autoCaller (this);
8941	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
8942
8943	AutoWriteLock alock (this);
8944
8945	/* Temporarily reset the registered flag, so that our machine state
8946	* changes (i.e. mHWData.backup()) succeed. (isMutable() used in
8947	* all setters will return FALSE for a Machine instance if mRegistered
8948	* is TRUE). This is copied from registeredInit(), and may or may not be
8949	* the right way to handle this. */
8950	mData->mRegistered = FALSE;
8951	HRESULT rc = checkStateDependency (MutableStateDep);
8952	LogRel(("checkStateDependency (MutableStateDep) returned 0x%x\n", rc));
8953	CheckComRCReturnRC (rc);
8954
8955	// ComAssertRet (mData->mMachineState < MachineState_Running, E_FAIL);
8956
8957	AssertReturn(!ComSafeArrayInIsNull (aNames), E_POINTER);
8958	AssertReturn(!ComSafeArrayInIsNull (aValues), E_POINTER);
8959	AssertReturn(!ComSafeArrayInIsNull (aTimestamps), E_POINTER);
8960	AssertReturn(!ComSafeArrayInIsNull (aFlags), E_POINTER);
8961
8962	com::SafeArray <INPTR BSTR> names(ComSafeArrayInArg(aNames));
8963	com::SafeArray <INPTR BSTR> values(ComSafeArrayInArg(aValues));
8964	com::SafeArray <ULONG64> timestamps(ComSafeArrayInArg(aTimestamps));
8965	com::SafeArray <INPTR BSTR> flags(ComSafeArrayInArg(aFlags));
8966	mHWData.backup();
8967	mHWData->mGuestProperties.erase(mHWData->mGuestProperties.begin(),
8968	mHWData->mGuestProperties.end());
8969	for (unsigned i = 0; i < names.size(); ++i)
8970	{
8971	HWData::GuestProperty property = { names[i], values[i], timestamps[i], flags[i] };
8972	mHWData->mGuestProperties.push_back(property);
8973	}
8974	mHWData->mPropertyServiceActive = false;
8975	alock.unlock();
8976	SaveSettings();
8977	/* Restore the mRegistered flag. */
8978	mData->mRegistered = TRUE;
8979	return S_OK;
8980	}
8981
8982	// public methods only for internal purposes
8983	/////////////////////////////////////////////////////////////////////////////
8984
8985	/**
8986	* Called from the client watcher thread to check for unexpected client
8987	* process death.
8988	*
8989	* @note On Win32 and on OS/2, this method is called only when we've got the
8990	* mutex (i.e. the client has either died or terminated normally). This
8991	* method always returns true.
8992	*
8993	* @note On Linux, the method returns true if the client process has
8994	* terminated abnormally (and/or the session has been uninitialized) and
8995	* false if it is still alive.
8996	*
8997	* @note Locks this object for writing.
8998	*/
8999	bool SessionMachine::checkForDeath()
9000	{
9001	Uninit::Reason reason;
9002	bool doUninit = false;
9003	bool ret = false;
9004
9005	/*
9006	* Enclose autoCaller with a block because calling uninit()
9007	* from under it will deadlock.
9008	*/
9009	{
9010	AutoCaller autoCaller (this);
9011	if (!autoCaller.isOk())
9012	{
9013	/*
9014	* return true if not ready, to cause the client watcher to exclude
9015	* the corresponding session from watching
9016	*/
9017	LogFlowThisFunc (("Already uninitialized!"));
9018	return true;
9019	}
9020
9021	AutoWriteLock alock (this);
9022
9023	/*
9024	* Determine the reason of death: if the session state is Closing here,
9025	* everything is fine. Otherwise it means that the client did not call
9026	* OnSessionEnd() before it released the IPC semaphore.
9027	* This may happen either because the client process has abnormally
9028	* terminated, or because it simply forgot to call ISession::Close()
9029	* before exiting. We threat the latter also as an abnormal termination
9030	* (see Session::uninit() for details).
9031	*/
9032	reason = mData->mSession.mState == SessionState_Closing ?
9033	Uninit::Normal :
9034	Uninit::Abnormal;
9035
9036	#if defined(RT_OS_WINDOWS)
9037
9038	AssertMsg (mIPCSem, ("semaphore must be created"));
9039
9040	/* release the IPC mutex */
9041	::ReleaseMutex (mIPCSem);
9042
9043	doUninit = true;
9044
9045	ret = true;
9046
9047	#elif defined(RT_OS_OS2)
9048
9049	AssertMsg (mIPCSem, ("semaphore must be created"));
9050
9051	/* release the IPC mutex */
9052	::DosReleaseMutexSem (mIPCSem);
9053
9054	doUninit = true;
9055
9056	ret = true;
9057
9058	#elif defined(VBOX_WITH_SYS_V_IPC_SESSION_WATCHER)
9059
9060	AssertMsg (mIPCSem >= 0, ("semaphore must be created"));
9061
9062	int val = ::semctl (mIPCSem, 0, GETVAL);
9063	if (val > 0)
9064	{
9065	/* the semaphore is signaled, meaning the session is terminated */
9066	doUninit = true;
9067	}
9068
9069	ret = val > 0;
9070
9071	#else
9072	# error "Port me!"
9073	#endif
9074
9075	} /* AutoCaller block */
9076
9077	if (doUninit)
9078	uninit (reason);
9079
9080	return ret;
9081	}
9082
9083	/**
9084	* @note Locks this object for reading.
9085	*/
9086	HRESULT SessionMachine::onDVDDriveChange()
9087	{
9088	LogFlowThisFunc (("\n"));
9089
9090	AutoCaller autoCaller (this);
9091	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
9092
9093	ComPtr <IInternalSessionControl> directControl;
9094	{
9095	AutoReadLock alock (this);
9096	directControl = mData->mSession.mDirectControl;
9097	}
9098
9099	/* ignore notifications sent after #OnSessionEnd() is called */
9100	if (!directControl)
9101	return S_OK;
9102
9103	return directControl->OnDVDDriveChange();
9104	}
9105
9106	/**
9107	* @note Locks this object for reading.
9108	*/
9109	HRESULT SessionMachine::onFloppyDriveChange()
9110	{
9111	LogFlowThisFunc (("\n"));
9112
9113	AutoCaller autoCaller (this);
9114	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
9115
9116	ComPtr <IInternalSessionControl> directControl;
9117	{
9118	AutoReadLock alock (this);
9119	directControl = mData->mSession.mDirectControl;
9120	}
9121
9122	/* ignore notifications sent after #OnSessionEnd() is called */
9123	if (!directControl)
9124	return S_OK;
9125
9126	return directControl->OnFloppyDriveChange();
9127	}
9128
9129	/**
9130	* @note Locks this object for reading.
9131	*/
9132	HRESULT SessionMachine::onNetworkAdapterChange(INetworkAdapter *networkAdapter)
9133	{
9134	LogFlowThisFunc (("\n"));
9135
9136	AutoCaller autoCaller (this);
9137	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
9138
9139	ComPtr <IInternalSessionControl> directControl;
9140	{
9141	AutoReadLock alock (this);
9142	directControl = mData->mSession.mDirectControl;
9143	}
9144
9145	/* ignore notifications sent after #OnSessionEnd() is called */
9146	if (!directControl)
9147	return S_OK;
9148
9149	return directControl->OnNetworkAdapterChange(networkAdapter);
9150	}
9151
9152	/**
9153	* @note Locks this object for reading.
9154	*/
9155	HRESULT SessionMachine::onSerialPortChange(ISerialPort *serialPort)
9156	{
9157	LogFlowThisFunc (("\n"));
9158
9159	AutoCaller autoCaller (this);
9160	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
9161
9162	ComPtr <IInternalSessionControl> directControl;
9163	{
9164	AutoReadLock alock (this);
9165	directControl = mData->mSession.mDirectControl;
9166	}
9167
9168	/* ignore notifications sent after #OnSessionEnd() is called */
9169	if (!directControl)
9170	return S_OK;
9171
9172	return directControl->OnSerialPortChange(serialPort);
9173	}
9174
9175	/**
9176	* @note Locks this object for reading.
9177	*/
9178	HRESULT SessionMachine::onParallelPortChange(IParallelPort *parallelPort)
9179	{
9180	LogFlowThisFunc (("\n"));
9181
9182	AutoCaller autoCaller (this);
9183	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
9184
9185	ComPtr <IInternalSessionControl> directControl;
9186	{
9187	AutoReadLock alock (this);
9188	directControl = mData->mSession.mDirectControl;
9189	}
9190
9191	/* ignore notifications sent after #OnSessionEnd() is called */
9192	if (!directControl)
9193	return S_OK;
9194
9195	return directControl->OnParallelPortChange(parallelPort);
9196	}
9197
9198	/**
9199	* @note Locks this object for reading.
9200	*/
9201	HRESULT SessionMachine::onVRDPServerChange()
9202	{
9203	LogFlowThisFunc (("\n"));
9204
9205	AutoCaller autoCaller (this);
9206	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
9207
9208	ComPtr <IInternalSessionControl> directControl;
9209	{
9210	AutoReadLock alock (this);
9211	directControl = mData->mSession.mDirectControl;
9212	}
9213
9214	/* ignore notifications sent after #OnSessionEnd() is called */
9215	if (!directControl)
9216	return S_OK;
9217
9218	return directControl->OnVRDPServerChange();
9219	}
9220
9221	/**
9222	* @note Locks this object for reading.
9223	*/
9224	HRESULT SessionMachine::onUSBControllerChange()
9225	{
9226	LogFlowThisFunc (("\n"));
9227
9228	AutoCaller autoCaller (this);
9229	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
9230
9231	ComPtr <IInternalSessionControl> directControl;
9232	{
9233	AutoReadLock alock (this);
9234	directControl = mData->mSession.mDirectControl;
9235	}
9236
9237	/* ignore notifications sent after #OnSessionEnd() is called */
9238	if (!directControl)
9239	return S_OK;
9240
9241	return directControl->OnUSBControllerChange();
9242	}
9243
9244	/**
9245	* @note Locks this object for reading.
9246	*/
9247	HRESULT SessionMachine::onSharedFolderChange()
9248	{
9249	LogFlowThisFunc (("\n"));
9250
9251	AutoCaller autoCaller (this);
9252	AssertComRCReturnRC (autoCaller.rc());
9253
9254	ComPtr <IInternalSessionControl> directControl;
9255	{
9256	AutoReadLock alock (this);
9257	directControl = mData->mSession.mDirectControl;
9258	}
9259
9260	/* ignore notifications sent after #OnSessionEnd() is called */
9261	if (!directControl)
9262	return S_OK;
9263
9264	return directControl->OnSharedFolderChange (FALSE /* aGlobal */);
9265	}
9266
9267	/**
9268	* Returns @c true if this machine's USB controller reports it has a matching
9269	* filter for the given USB device and @c false otherwise.
9270	*
9271	* @note Locks this object for reading.
9272	*/
9273	bool SessionMachine::hasMatchingUSBFilter (const ComObjPtr <HostUSBDevice> &aDevice, ULONG *aMaskedIfs)
9274	{
9275	AutoCaller autoCaller (this);
9276	/* silently return if not ready -- this method may be called after the
9277	* direct machine session has been called */
9278	if (!autoCaller.isOk())
9279	return false;
9280
9281	AutoReadLock alock (this);
9282
9283	#ifdef VBOX_WITH_USB
9284	switch (mData->mMachineState)
9285	{
9286	case MachineState_Starting:
9287	case MachineState_Restoring:
9288	case MachineState_Paused:
9289	case MachineState_Running:
9290	return mUSBController->hasMatchingFilter (aDevice, aMaskedIfs);
9291	default: break;
9292	}
9293	#endif
9294	return false;
9295	}
9296
9297	/**
9298	* @note The calls shall hold no locks. Will temporarily lock this object for reading.
9299	*/
9300	HRESULT SessionMachine::onUSBDeviceAttach (IUSBDevice *aDevice,
9301	IVirtualBoxErrorInfo *aError,
9302	ULONG aMaskedIfs)
9303	{
9304	LogFlowThisFunc (("\n"));
9305
9306	AutoCaller autoCaller (this);
9307
9308	/* This notification may happen after the machine object has been
9309	* uninitialized (the session was closed), so don't assert. */
9310	CheckComRCReturnRC (autoCaller.rc());
9311
9312	ComPtr <IInternalSessionControl> directControl;
9313	{
9314	AutoReadLock alock (this);
9315	directControl = mData->mSession.mDirectControl;
9316	}
9317
9318	/* fail on notifications sent after #OnSessionEnd() is called, it is
9319	* expected by the caller */
9320	if (!directControl)
9321	return E_FAIL;
9322
9323	/* No locks should be held at this point. */
9324	AssertMsg (RTThreadGetWriteLockCount (RTThreadSelf()) == 0, ("%d\n", RTThreadGetWriteLockCount (RTThreadSelf())));
9325	AssertMsg (RTThreadGetReadLockCount (RTThreadSelf()) == 0, ("%d\n", RTThreadGetReadLockCount (RTThreadSelf())));
9326
9327	return directControl->OnUSBDeviceAttach (aDevice, aError, aMaskedIfs);
9328	}
9329
9330	/**
9331	* @note The calls shall hold no locks. Will temporarily lock this object for reading.
9332	*/
9333	HRESULT SessionMachine::onUSBDeviceDetach (INPTR GUIDPARAM aId,
9334	IVirtualBoxErrorInfo *aError)
9335	{
9336	LogFlowThisFunc (("\n"));
9337
9338	AutoCaller autoCaller (this);
9339
9340	/* This notification may happen after the machine object has been
9341	* uninitialized (the session was closed), so don't assert. */
9342	CheckComRCReturnRC (autoCaller.rc());
9343
9344	ComPtr <IInternalSessionControl> directControl;
9345	{
9346	AutoReadLock alock (this);
9347	directControl = mData->mSession.mDirectControl;
9348	}
9349
9350	/* fail on notifications sent after #OnSessionEnd() is called, it is
9351	* expected by the caller */
9352	if (!directControl)
9353	return E_FAIL;
9354
9355	/* No locks should be held at this point. */
9356	AssertMsg (RTThreadGetWriteLockCount (RTThreadSelf()) == 0, ("%d\n", RTThreadGetWriteLockCount (RTThreadSelf())));
9357	AssertMsg (RTThreadGetReadLockCount (RTThreadSelf()) == 0, ("%d\n", RTThreadGetReadLockCount (RTThreadSelf())));
9358
9359	return directControl->OnUSBDeviceDetach (aId, aError);
9360	}
9361
9362	// protected methods
9363	/////////////////////////////////////////////////////////////////////////////
9364
9365	/**
9366	* Helper method to finalize saving the state.
9367	*
9368	* @note Must be called from under this object's lock.
9369	*
9370	* @param aSuccess TRUE if the snapshot has been taken successfully
9371	*
9372	* @note Locks mParent + this objects for writing.
9373	*/
9374	HRESULT SessionMachine::endSavingState (BOOL aSuccess)
9375	{
9376	LogFlowThisFuncEnter();
9377
9378	AutoCaller autoCaller (this);
9379	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
9380
9381	/* mParent->removeProgress() and saveSettings() need mParent lock */
9382	AutoMultiWriteLock2 alock (mParent, this);
9383
9384	HRESULT rc = S_OK;
9385
9386	if (aSuccess)
9387	{
9388	mSSData->mStateFilePath = mSnapshotData.mStateFilePath;
9389
9390	/* save all VM settings */
9391	rc = saveSettings();
9392	}
9393	else
9394	{
9395	/* delete the saved state file (it might have been already created) */
9396	RTFileDelete (Utf8Str (mSnapshotData.mStateFilePath));
9397	}
9398
9399	/* remove the completed progress object */
9400	mParent->removeProgress (mSnapshotData.mProgressId);
9401
9402	/* clear out the temporary saved state data */
9403	mSnapshotData.mLastState = MachineState_Null;
9404	mSnapshotData.mProgressId.clear();
9405	mSnapshotData.mStateFilePath.setNull();
9406
9407	LogFlowThisFuncLeave();
9408	return rc;
9409	}
9410
9411	/**
9412	* Helper method to finalize taking a snapshot.
9413	* Gets called only from #EndTakingSnapshot() that is expected to
9414	* be called by the VM process when it finishes all the tasks related to
9415	* taking a snapshot, either scucessfully or unsuccessfilly.
9416	*
9417	* @param aSuccess TRUE if the snapshot has been taken successfully
9418	*
9419	* @note Locks mParent + this objects for writing.
9420	*/
9421	HRESULT SessionMachine::endTakingSnapshot (BOOL aSuccess)
9422	{
9423	LogFlowThisFuncEnter();
9424
9425	AutoCaller autoCaller (this);
9426	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
9427
9428	/* Progress object uninitialization needs mParent lock */
9429	AutoMultiWriteLock2 alock (mParent, this);
9430
9431	HRESULT rc = S_OK;
9432
9433	if (aSuccess)
9434	{
9435	/* the server progress must be completed on success */
9436	Assert (mSnapshotData.mServerProgress->completed());
9437
9438	mData->mCurrentSnapshot = mSnapshotData.mSnapshot;
9439	/* memorize the first snapshot if necessary */
9440	if (!mData->mFirstSnapshot)
9441	mData->mFirstSnapshot = mData->mCurrentSnapshot;
9442
9443	int opFlags = SaveSS_AddOp \| SaveSS_UpdateCurrentId;
9444	if (mSnapshotData.mLastState != MachineState_Paused && !isModified())
9445	{
9446	/*
9447	* the machine was powered off or saved when taking a snapshot,
9448	* so reset the mCurrentStateModified flag
9449	*/
9450	mData->mCurrentStateModified = FALSE;
9451	opFlags \|= SaveSS_UpdateCurStateModified;
9452	}
9453
9454	rc = saveSnapshotSettings (mSnapshotData.mSnapshot, opFlags);
9455	}
9456
9457	if (!aSuccess \|\| FAILED (rc))
9458	{
9459	if (mSnapshotData.mSnapshot)
9460	{
9461	/* wait for the completion of the server progress (diff VDI creation) */
9462	/// @todo (dmik) later, we will definitely want to cancel it instead
9463	// (when the cancel function is implemented)
9464	mSnapshotData.mServerProgress->WaitForCompletion (-1);
9465
9466	/*
9467	* delete all differencing VDIs created
9468	* (this will attach their parents back)
9469	*/
9470	rc = deleteSnapshotDiffs (mSnapshotData.mSnapshot);
9471	/* continue cleanup on error */
9472
9473	/* delete the saved state file (it might have been already created) */
9474	if (mSnapshotData.mSnapshot->stateFilePath())
9475	RTFileDelete (Utf8Str (mSnapshotData.mSnapshot->stateFilePath()));
9476
9477	mSnapshotData.mSnapshot->uninit();
9478	}
9479	}
9480
9481	/* inform callbacks */
9482	if (aSuccess && SUCCEEDED (rc))
9483	mParent->onSnapshotTaken (mData->mUuid, mSnapshotData.mSnapshot->data().mId);
9484
9485	/* clear out the snapshot data */
9486	mSnapshotData.mLastState = MachineState_Null;
9487	mSnapshotData.mSnapshot.setNull();
9488	mSnapshotData.mServerProgress.setNull();
9489	/* uninitialize the combined progress (to remove it from the VBox collection) */
9490	if (!mSnapshotData.mCombinedProgress.isNull())
9491	{
9492	mSnapshotData.mCombinedProgress->uninit();
9493	mSnapshotData.mCombinedProgress.setNull();
9494	}
9495
9496	LogFlowThisFuncLeave();
9497	return rc;
9498	}
9499
9500	/**
9501	* Take snapshot task handler.
9502	* Must be called only by TakeSnapshotTask::handler()!
9503	*
9504	* The sole purpose of this task is to asynchronously create differencing VDIs
9505	* and copy the saved state file (when necessary). The VM process will wait
9506	* for this task to complete using the mSnapshotData.mServerProgress
9507	* returned to it.
9508	*
9509	* @note Locks mParent + this objects for writing.
9510	*/
9511	void SessionMachine::takeSnapshotHandler (TakeSnapshotTask &aTask)
9512	{
9513	LogFlowThisFuncEnter();
9514
9515	AutoCaller autoCaller (this);
9516
9517	LogFlowThisFunc (("state=%d\n", autoCaller.state()));
9518	if (!autoCaller.isOk())
9519	{
9520	/*
9521	* we might have been uninitialized because the session was
9522	* accidentally closed by the client, so don't assert
9523	*/
9524	LogFlowThisFuncLeave();
9525	return;
9526	}
9527
9528	/* endTakingSnapshot() needs mParent lock */
9529	AutoMultiWriteLock2 alock (mParent, this);
9530
9531	HRESULT rc = S_OK;
9532
9533	LogFlowThisFunc (("Creating differencing VDIs...\n"));
9534
9535	/* create new differencing hard disks and attach them to this machine */
9536	rc = createSnapshotDiffs (&mSnapshotData.mSnapshot->data().mId,
9537	mUserData->mSnapshotFolderFull,
9538	mSnapshotData.mServerProgress,
9539	true /* aOnline */);
9540
9541	if (SUCCEEDED (rc) && mSnapshotData.mLastState == MachineState_Saved)
9542	{
9543	Utf8Str stateFrom = mSSData->mStateFilePath;
9544	Utf8Str stateTo = mSnapshotData.mSnapshot->stateFilePath();
9545
9546	LogFlowThisFunc (("Copying the execution state from '%s' to '%s'...\n",
9547	stateFrom.raw(), stateTo.raw()));
9548
9549	mSnapshotData.mServerProgress->advanceOperation (
9550	Bstr (tr ("Copying the execution state")));
9551
9552	/*
9553	* We can safely leave the lock here:
9554	* mMachineState is MachineState_Saving here
9555	*/
9556	alock.leave();
9557
9558	/* copy the state file */
9559	int vrc = RTFileCopyEx (stateFrom, stateTo, 0, progressCallback,
9560	static_cast <Progress *> (mSnapshotData.mServerProgress));
9561
9562	alock.enter();
9563
9564	if (VBOX_FAILURE (vrc))
9565	rc = setError (E_FAIL,
9566	tr ("Could not copy the state file '%ls' to '%ls' (%Vrc)"),
9567	stateFrom.raw(), stateTo.raw());
9568	}
9569
9570	/*
9571	* we have to call endTakingSnapshot() here if the snapshot was taken
9572	* offline, because the VM process will not do it in this case
9573	*/
9574	if (mSnapshotData.mLastState != MachineState_Paused)
9575	{
9576	LogFlowThisFunc (("Finalizing the taken snapshot (rc=%08X)...\n", rc));
9577
9578	setMachineState (mSnapshotData.mLastState);
9579	updateMachineStateOnClient();
9580
9581	/* finalize the progress after setting the state, for consistency */
9582	mSnapshotData.mServerProgress->notifyComplete (rc);
9583
9584	endTakingSnapshot (SUCCEEDED (rc));
9585	}
9586	else
9587	{
9588	mSnapshotData.mServerProgress->notifyComplete (rc);
9589	}
9590
9591	LogFlowThisFuncLeave();
9592	}
9593
9594	/**
9595	* Discard snapshot task handler.
9596	* Must be called only by DiscardSnapshotTask::handler()!
9597	*
9598	* When aTask.subTask is true, the associated progress object is left
9599	* uncompleted on success. On failure, the progress is marked as completed
9600	* regardless of this parameter.
9601	*
9602	* @note Locks mParent + this + child objects for writing!
9603	*/
9604	void SessionMachine::discardSnapshotHandler (DiscardSnapshotTask &aTask)
9605	{
9606	LogFlowThisFuncEnter();
9607
9608	AutoCaller autoCaller (this);
9609
9610	LogFlowThisFunc (("state=%d\n", autoCaller.state()));
9611	if (!autoCaller.isOk())
9612	{
9613	/*
9614	* we might have been uninitialized because the session was
9615	* accidentally closed by the client, so don't assert
9616	*/
9617	aTask.progress->notifyComplete (
9618	E_FAIL, COM_IIDOF (IMachine), getComponentName(),
9619	tr ("The session has been accidentally closed"));
9620
9621	LogFlowThisFuncLeave();
9622	return;
9623	}
9624
9625	/* Progress::notifyComplete() et al., saveSettings() need mParent lock.
9626	* Also safely lock the snapshot stuff in the direction parent->child */
9627	AutoMultiWriteLock4 alock (mParent->lockHandle(), this->lockHandle(),
9628	aTask.snapshot->lockHandle(),
9629	aTask.snapshot->childrenLock());
9630
9631	ComObjPtr <SnapshotMachine> sm = aTask.snapshot->data().mMachine;
9632	/* no need to lock the snapshot machine since it is const by definiton */
9633
9634	HRESULT rc = S_OK;
9635
9636	/* save the snapshot ID (for callbacks) */
9637	Guid snapshotId = aTask.snapshot->data().mId;
9638
9639	do
9640	{
9641	/* first pass: */
9642	LogFlowThisFunc (("Check hard disk accessibility and affected machines...\n"));
9643
9644	HDData::HDAttachmentList::const_iterator it;
9645	for (it = sm->mHDData->mHDAttachments.begin();
9646	it != sm->mHDData->mHDAttachments.end();
9647	++ it)
9648	{
9649	ComObjPtr <HardDiskAttachment> hda = *it;
9650	ComObjPtr <HardDisk> hd = hda->hardDisk();
9651	ComObjPtr <HardDisk> parent = hd->parent();
9652
9653	AutoWriteLock hdLock (hd);
9654
9655	if (hd->hasForeignChildren())
9656	{
9657	rc = setError (E_FAIL,
9658	tr ("One or more hard disks belonging to other machines are "
9659	"based on the hard disk '%ls' stored in the snapshot '%ls'"),
9660	hd->toString().raw(), aTask.snapshot->data().mName.raw());
9661	break;
9662	}
9663
9664	if (hd->type() == HardDiskType_Normal)
9665	{
9666	AutoWriteLock hdChildrenLock (hd->childrenLock ());
9667	size_t childrenCount = hd->children().size();
9668	if (childrenCount > 1)
9669	{
9670	rc = setError (E_FAIL,
9671	tr ("Normal hard disk '%ls' stored in the snapshot '%ls' "
9672	"has more than one child hard disk (%d)"),
9673	hd->toString().raw(), aTask.snapshot->data().mName.raw(),
9674	childrenCount);
9675	break;
9676	}
9677	}
9678	else
9679	{
9680	ComAssertMsgFailedBreak (("Invalid hard disk type %d\n", hd->type()),
9681	rc = E_FAIL);
9682	}
9683
9684	Bstr accessError;
9685	rc = hd->getAccessibleWithChildren (accessError);
9686	CheckComRCBreakRC (rc);
9687
9688	if (!accessError.isNull())
9689	{
9690	rc = setError (E_FAIL,
9691	tr ("Hard disk '%ls' stored in the snapshot '%ls' is not "
9692	"accessible (%ls)"),
9693	hd->toString().raw(), aTask.snapshot->data().mName.raw(),
9694	accessError.raw());
9695	break;
9696	}
9697
9698	rc = hd->setBusyWithChildren();
9699	if (FAILED (rc))
9700	{
9701	/* reset the busy flag of all previous hard disks */
9702	while (it != sm->mHDData->mHDAttachments.begin())
9703	(*(-- it))->hardDisk()->clearBusyWithChildren();
9704	break;
9705	}
9706	}
9707
9708	CheckComRCBreakRC (rc);
9709
9710	/* second pass: */
9711	LogFlowThisFunc (("Performing actual vdi merging...\n"));
9712
9713	for (it = sm->mHDData->mHDAttachments.begin();
9714	it != sm->mHDData->mHDAttachments.end();
9715	++ it)
9716	{
9717	ComObjPtr <HardDiskAttachment> hda = *it;
9718	ComObjPtr <HardDisk> hd = hda->hardDisk();
9719	ComObjPtr <HardDisk> parent = hd->parent();
9720
9721	AutoWriteLock hdLock (hd);
9722
9723	Bstr hdRootString = hd->root()->toString (true /* aShort */);
9724
9725	if (parent)
9726	{
9727	if (hd->isParentImmutable())
9728	{
9729	aTask.progress->advanceOperation (Bstr (Utf8StrFmt (
9730	tr ("Discarding changes to immutable hard disk '%ls'"),
9731	hdRootString.raw())));
9732
9733	/* clear the busy flag before unregistering */
9734	hd->clearBusy();
9735
9736	/*
9737	* unregisterDiffHardDisk() is supposed to delete and uninit
9738	* the differencing hard disk
9739	*/
9740	rc = mParent->unregisterDiffHardDisk (hd);
9741	CheckComRCBreakRC (rc);
9742	continue;
9743	}
9744	else
9745	{
9746	/*
9747	* differencing VDI:
9748	* merge this image to all its children
9749	*/
9750
9751	aTask.progress->advanceOperation (Bstr (Utf8StrFmt (
9752	tr ("Merging changes to normal hard disk '%ls' to children"),
9753	hdRootString.raw())));
9754
9755	alock.leave();
9756
9757	rc = hd->asVDI()->mergeImageToChildren (aTask.progress);
9758
9759	alock.enter();
9760
9761	// debug code
9762	// if (it != sm->mHDData->mHDAttachments.begin())
9763	// {
9764	// rc = setError (E_FAIL, "Simulated failure");
9765	// break;
9766	//}
9767
9768	if (SUCCEEDED (rc))
9769	rc = mParent->unregisterDiffHardDisk (hd);
9770	else
9771	hd->clearBusyWithChildren();
9772
9773	CheckComRCBreakRC (rc);
9774	}
9775	}
9776	else if (hd->type() == HardDiskType_Normal)
9777	{
9778	/*
9779	* normal vdi has the only child or none
9780	* (checked in the first pass)
9781	*/
9782
9783	ComObjPtr <HardDisk> child;
9784	{
9785	AutoWriteLock hdChildrenLock (hd->childrenLock ());
9786	if (hd->children().size())
9787	child = hd->children().front();
9788	}
9789
9790	if (child.isNull())
9791	{
9792	aTask.progress->advanceOperation (Bstr (Utf8StrFmt (
9793	tr ("Detaching normal hard disk '%ls'"),
9794	hdRootString.raw())));
9795
9796	/* just deassociate the normal image from this machine */
9797	hd->setMachineId (Guid());
9798	hd->setSnapshotId (Guid());
9799
9800	/* clear the busy flag */
9801	hd->clearBusy();
9802	}
9803	else
9804	{
9805	AutoWriteLock childLock (child);
9806
9807	aTask.progress->advanceOperation (Bstr (Utf8StrFmt (
9808	tr ("Preserving changes to normal hard disk '%ls'"),
9809	hdRootString.raw())));
9810
9811	ComObjPtr <Machine> cm;
9812	ComObjPtr <Snapshot> cs;
9813	ComObjPtr <HardDiskAttachment> childHda;
9814	rc = findHardDiskAttachment (child, &cm, &cs, &childHda);
9815	CheckComRCBreakRC (rc);
9816	/* must be the same machine (checked in the first pass) */
9817	ComAssertBreak (cm->mData->mUuid == mData->mUuid, rc = E_FAIL);
9818
9819	/* merge the child to this basic image */
9820
9821	alock.leave();
9822
9823	rc = child->asVDI()->mergeImageToParent (aTask.progress);
9824
9825	alock.enter();
9826
9827	if (SUCCEEDED (rc))
9828	rc = mParent->unregisterDiffHardDisk (child);
9829	else
9830	hd->clearBusyWithChildren();
9831
9832	CheckComRCBreakRC (rc);
9833
9834	/* reset the snapshot Id */
9835	hd->setSnapshotId (Guid());
9836
9837	/* replace the child image in the appropriate place */
9838	childHda->updateHardDisk (hd, FALSE /* aDirty */);
9839
9840	if (!cs)
9841	{
9842	aTask.settingsChanged = true;
9843	}
9844	else
9845	{
9846	rc = cm->saveSnapshotSettings (cs, SaveSS_UpdateAllOp);
9847	CheckComRCBreakRC (rc);
9848	}
9849	}
9850	}
9851	else
9852	{
9853	ComAssertMsgFailedBreak (("Invalid hard disk type %d\n", hd->type()),
9854	rc = E_FAIL);
9855	}
9856	}
9857
9858	/* preserve existing error info */
9859	ErrorInfoKeeper mergeEik;
9860	HRESULT mergeRc = rc;
9861
9862	if (FAILED (rc))
9863	{
9864	/* clear the busy flag on the rest of hard disks */
9865	for (++ it; it != sm->mHDData->mHDAttachments.end(); ++ it)
9866	(*it)->hardDisk()->clearBusyWithChildren();
9867	}
9868
9869	/*
9870	* we have to try to discard the snapshot even if merging failed
9871	* because some images might have been already merged (and deleted)
9872	*/
9873
9874	do
9875	{
9876	LogFlowThisFunc (("Discarding the snapshot (reparenting children)...\n"));
9877
9878	/* It is important to uninitialize and delete all snapshot's hard
9879	* disk attachments as they are no longer valid -- otherwise the
9880	* code in Machine::uninitDataAndChildObjects() will mistakenly
9881	* perform hard disk deassociation. */
9882	for (HDData::HDAttachmentList::iterator it = sm->mHDData->mHDAttachments.begin();
9883	it != sm->mHDData->mHDAttachments.end();)
9884	{
9885	(*it)->uninit();
9886	it = sm->mHDData->mHDAttachments.erase (it);
9887	}
9888
9889	ComObjPtr <Snapshot> parentSnapshot = aTask.snapshot->parent();
9890
9891	/// @todo (dmik):
9892	// when we introduce clones later, discarding the snapshot
9893	// will affect the current and first snapshots of clones, if they are
9894	// direct children of this snapshot. So we will need to lock machines
9895	// associated with child snapshots as well and update mCurrentSnapshot
9896	// and/or mFirstSnapshot fields.
9897
9898	if (aTask.snapshot == mData->mCurrentSnapshot)
9899	{
9900	/* currently, the parent snapshot must refer to the same machine */
9901	ComAssertBreak (
9902	!parentSnapshot \|\|
9903	parentSnapshot->data().mMachine->mData->mUuid == mData->mUuid,
9904	rc = E_FAIL);
9905	mData->mCurrentSnapshot = parentSnapshot;
9906	/* mark the current state as modified */
9907	mData->mCurrentStateModified = TRUE;
9908	}
9909
9910	if (aTask.snapshot == mData->mFirstSnapshot)
9911	{
9912	/*
9913	* the first snapshot must have only one child when discarded,
9914	* or no children at all
9915	*/
9916	ComAssertBreak (aTask.snapshot->children().size() <= 1, rc = E_FAIL);
9917
9918	if (aTask.snapshot->children().size() == 1)
9919	{
9920	ComObjPtr <Snapshot> childSnapshot = aTask.snapshot->children().front();
9921	ComAssertBreak (
9922	childSnapshot->data().mMachine->mData->mUuid == mData->mUuid,
9923	rc = E_FAIL);
9924	mData->mFirstSnapshot = childSnapshot;
9925	}
9926	else
9927	mData->mFirstSnapshot.setNull();
9928	}
9929
9930	/// @todo (dmik)
9931	// if we implement some warning mechanism later, we'll have
9932	// to return a warning if the state file path cannot be deleted
9933	Bstr stateFilePath = aTask.snapshot->stateFilePath();
9934	if (stateFilePath)
9935	RTFileDelete (Utf8Str (stateFilePath));
9936
9937	aTask.snapshot->discard();
9938
9939	rc = saveSnapshotSettings (parentSnapshot,
9940	SaveSS_UpdateAllOp \| SaveSS_UpdateCurrentId);
9941	}
9942	while (0);
9943
9944	/* restore the merge error if any (ErrorInfo will be restored
9945	* automatically) */
9946	if (FAILED (mergeRc))
9947	rc = mergeRc;
9948	}
9949	while (0);
9950
9951	if (!aTask.subTask \|\| FAILED (rc))
9952	{
9953	if (!aTask.subTask)
9954	{
9955	/* preserve existing error info */
9956	ErrorInfoKeeper eik;
9957
9958	/* restore the machine state */
9959	setMachineState (aTask.state);
9960	updateMachineStateOnClient();
9961
9962	/*
9963	* save settings anyway, since we've already changed the current
9964	* machine configuration
9965	*/
9966	if (aTask.settingsChanged)
9967	{
9968	saveSettings (true /* aMarkCurStateAsModified */,
9969	true /* aInformCallbacksAnyway */);
9970	}
9971	}
9972
9973	/* set the result (this will try to fetch current error info on failure) */
9974	aTask.progress->notifyComplete (rc);
9975	}
9976
9977	if (SUCCEEDED (rc))
9978	mParent->onSnapshotDiscarded (mData->mUuid, snapshotId);
9979
9980	LogFlowThisFunc (("Done discarding snapshot (rc=%08X)\n", rc));
9981	LogFlowThisFuncLeave();
9982	}
9983
9984	/**
9985	* Discard current state task handler.
9986	* Must be called only by DiscardCurrentStateTask::handler()!
9987	*
9988	* @note Locks mParent + this object for writing.
9989	*/
9990	void SessionMachine::discardCurrentStateHandler (DiscardCurrentStateTask &aTask)
9991	{
9992	LogFlowThisFuncEnter();
9993
9994	AutoCaller autoCaller (this);
9995
9996	LogFlowThisFunc (("state=%d\n", autoCaller.state()));
9997	if (!autoCaller.isOk())
9998	{
9999	/*
10000	* we might have been uninitialized because the session was
10001	* accidentally closed by the client, so don't assert
10002	*/
10003	aTask.progress->notifyComplete (
10004	E_FAIL, COM_IIDOF (IMachine), getComponentName(),
10005	tr ("The session has been accidentally closed"));
10006
10007	LogFlowThisFuncLeave();
10008	return;
10009	}
10010
10011	/* Progress::notifyComplete() et al., saveSettings() need mParent lock */
10012	AutoMultiWriteLock2 alock (mParent, this);
10013
10014	/*
10015	* discard all current changes to mUserData (name, OSType etc.)
10016	* (note that the machine is powered off, so there is no need
10017	* to inform the direct session)
10018	*/
10019	if (isModified())
10020	rollback (false /* aNotify */);
10021
10022	HRESULT rc = S_OK;
10023
10024	bool errorInSubtask = false;
10025	bool stateRestored = false;
10026
10027	const bool isLastSnapshot = mData->mCurrentSnapshot->parent().isNull();
10028
10029	do
10030	{
10031	/*
10032	* discard the saved state file if the machine was Saved prior
10033	* to this operation
10034	*/
10035	if (aTask.state == MachineState_Saved)
10036	{
10037	Assert (!mSSData->mStateFilePath.isEmpty());
10038	RTFileDelete (Utf8Str (mSSData->mStateFilePath));
10039	mSSData->mStateFilePath.setNull();
10040	aTask.modifyLastState (MachineState_PoweredOff);
10041	rc = saveStateSettings (SaveSTS_StateFilePath);
10042	CheckComRCBreakRC (rc);
10043	}
10044
10045	if (aTask.discardCurrentSnapshot && !isLastSnapshot)
10046	{
10047	/*
10048	* the "discard current snapshot and state" task is in action,
10049	* the current snapshot is not the last one.
10050	* Discard the current snapshot first.
10051	*/
10052
10053	DiscardSnapshotTask subTask (aTask, mData->mCurrentSnapshot);
10054	subTask.subTask = true;
10055	discardSnapshotHandler (subTask);
10056	aTask.settingsChanged = subTask.settingsChanged;
10057	if (aTask.progress->completed())
10058	{
10059	/*
10060	* the progress can be completed by a subtask only if there was
10061	* a failure
10062	*/
10063	Assert (FAILED (aTask.progress->resultCode()));
10064	errorInSubtask = true;
10065	rc = aTask.progress->resultCode();
10066	break;
10067	}
10068	}
10069
10070	RTTIMESPEC snapshotTimeStamp;
10071	RTTimeSpecSetMilli (&snapshotTimeStamp, 0);
10072
10073	{
10074	ComObjPtr <Snapshot> curSnapshot = mData->mCurrentSnapshot;
10075	AutoWriteLock snapshotLock (curSnapshot);
10076
10077	/* remember the timestamp of the snapshot we're restoring from */
10078	snapshotTimeStamp = curSnapshot->data().mTimeStamp;
10079
10080	/* copy all hardware data from the current snapshot */
10081	copyFrom (curSnapshot->data().mMachine);
10082
10083	LogFlowThisFunc (("Restoring VDIs from the snapshot...\n"));
10084
10085	/* restore the attachmends from the snapshot */
10086	mHDData.backup();
10087	mHDData->mHDAttachments =
10088	curSnapshot->data().mMachine->mHDData->mHDAttachments;
10089
10090	snapshotLock.leave();
10091	alock.leave();
10092	rc = createSnapshotDiffs (NULL, mUserData->mSnapshotFolderFull,
10093	aTask.progress,
10094	false /* aOnline */);
10095	alock.enter();
10096	snapshotLock.enter();
10097
10098	if (FAILED (rc))
10099	{
10100	/* here we can still safely rollback, so do it */
10101	/* preserve existing error info */
10102	ErrorInfoKeeper eik;
10103	/* undo all changes */
10104	rollback (false /* aNotify */);
10105	break;
10106	}
10107
10108	/*
10109	* note: old VDIs will be deassociated/deleted on #commit() called
10110	* either from #saveSettings() or directly at the end
10111	*/
10112
10113	/* should not have a saved state file associated at this point */
10114	Assert (mSSData->mStateFilePath.isNull());
10115
10116	if (curSnapshot->stateFilePath())
10117	{
10118	Utf8Str snapStateFilePath = curSnapshot->stateFilePath();
10119
10120	Utf8Str stateFilePath = Utf8StrFmt ("%ls%c{%Vuuid}.sav",
10121	mUserData->mSnapshotFolderFull.raw(),
10122	RTPATH_DELIMITER, mData->mUuid.raw());
10123
10124	LogFlowThisFunc (("Copying saved state file from '%s' to '%s'...\n",
10125	snapStateFilePath.raw(), stateFilePath.raw()));
10126
10127	aTask.progress->advanceOperation (
10128	Bstr (tr ("Restoring the execution state")));
10129
10130	/* copy the state file */
10131	snapshotLock.leave();
10132	alock.leave();
10133	int vrc = RTFileCopyEx (snapStateFilePath, stateFilePath,
10134	0, progressCallback, aTask.progress);
10135	alock.enter();
10136	snapshotLock.enter();
10137
10138	if (VBOX_SUCCESS (vrc))
10139	{
10140	mSSData->mStateFilePath = stateFilePath;
10141	}
10142	else
10143	{
10144	rc = setError (E_FAIL,
10145	tr ("Could not copy the state file '%s' to '%s' (%Vrc)"),
10146	snapStateFilePath.raw(), stateFilePath.raw(), vrc);
10147	break;
10148	}
10149	}
10150	}
10151
10152	bool informCallbacks = false;
10153
10154	if (aTask.discardCurrentSnapshot && isLastSnapshot)
10155	{
10156	/*
10157	* discard the current snapshot and state task is in action,
10158	* the current snapshot is the last one.
10159	* Discard the current snapshot after discarding the current state.
10160	*/
10161
10162	/* commit changes to fixup hard disks before discarding */
10163	rc = commit();
10164	if (SUCCEEDED (rc))
10165	{
10166	DiscardSnapshotTask subTask (aTask, mData->mCurrentSnapshot);
10167	subTask.subTask = true;
10168	discardSnapshotHandler (subTask);
10169	aTask.settingsChanged = subTask.settingsChanged;
10170	if (aTask.progress->completed())
10171	{
10172	/*
10173	* the progress can be completed by a subtask only if there
10174	* was a failure
10175	*/
10176	Assert (FAILED (aTask.progress->resultCode()));
10177	errorInSubtask = true;
10178	rc = aTask.progress->resultCode();
10179	}
10180	}
10181
10182	/*
10183	* we've committed already, so inform callbacks anyway to ensure
10184	* they don't miss some change
10185	*/
10186	informCallbacks = true;
10187	}
10188
10189	/*
10190	* we have already discarded the current state, so set the
10191	* execution state accordingly no matter of the discard snapshot result
10192	*/
10193	if (mSSData->mStateFilePath)
10194	setMachineState (MachineState_Saved);
10195	else
10196	setMachineState (MachineState_PoweredOff);
10197
10198	updateMachineStateOnClient();
10199	stateRestored = true;
10200
10201	if (errorInSubtask)
10202	break;
10203
10204	/* assign the timestamp from the snapshot */
10205	Assert (RTTimeSpecGetMilli (&snapshotTimeStamp) != 0);
10206	mData->mLastStateChange = snapshotTimeStamp;
10207
10208	/* mark the current state as not modified */
10209	mData->mCurrentStateModified = FALSE;
10210
10211	/* save all settings and commit */
10212	rc = saveSettings (false /* aMarkCurStateAsModified */,
10213	informCallbacks);
10214	aTask.settingsChanged = false;
10215	}
10216	while (0);
10217
10218	if (FAILED (rc))
10219	{
10220	/* preserve existing error info */
10221	ErrorInfoKeeper eik;
10222
10223	if (!stateRestored)
10224	{
10225	/* restore the machine state */
10226	setMachineState (aTask.state);
10227	updateMachineStateOnClient();
10228	}
10229
10230	/*
10231	* save all settings and commit if still modified (there is no way to
10232	* rollback properly). Note that isModified() will return true after
10233	* copyFrom(). Also save the settings if requested by the subtask.
10234	*/
10235	if (isModified() \|\| aTask.settingsChanged)
10236	{
10237	if (aTask.settingsChanged)
10238	saveSettings (true /* aMarkCurStateAsModified */,
10239	true /* aInformCallbacksAnyway */);
10240	else
10241	saveSettings();
10242	}
10243	}
10244
10245	if (!errorInSubtask)
10246	{
10247	/* set the result (this will try to fetch current error info on failure) */
10248	aTask.progress->notifyComplete (rc);
10249	}
10250
10251	if (SUCCEEDED (rc))
10252	mParent->onSnapshotDiscarded (mData->mUuid, Guid());
10253
10254	LogFlowThisFunc (("Done discarding current state (rc=%08X)\n", rc));
10255
10256	LogFlowThisFuncLeave();
10257	}
10258
10259	/**
10260	* Helper to change the machine state (reimplementation).
10261	*
10262	* @note Locks this object for writing.
10263	*/
10264	HRESULT SessionMachine::setMachineState (MachineState_T aMachineState)
10265	{
10266	LogFlowThisFuncEnter();
10267	LogFlowThisFunc (("aMachineState=%d\n", aMachineState));
10268
10269	AutoCaller autoCaller (this);
10270	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
10271
10272	AutoWriteLock alock (this);
10273
10274	MachineState_T oldMachineState = mData->mMachineState;
10275
10276	AssertMsgReturn (oldMachineState != aMachineState,
10277	("oldMachineState=%d, aMachineState=%d\n",
10278	oldMachineState, aMachineState), E_FAIL);
10279
10280	HRESULT rc = S_OK;
10281
10282	int stsFlags = 0;
10283	bool deleteSavedState = false;
10284
10285	/* detect some state transitions */
10286
10287	if (oldMachineState < MachineState_Running &&
10288	aMachineState >= MachineState_Running &&
10289	aMachineState != MachineState_Discarding)
10290	{
10291	/*
10292	* the EMT thread is about to start, so mark attached HDDs as busy
10293	* and all its ancestors as being in use
10294	*/
10295	for (HDData::HDAttachmentList::const_iterator it =
10296	mHDData->mHDAttachments.begin();
10297	it != mHDData->mHDAttachments.end();
10298	++ it)
10299	{
10300	ComObjPtr <HardDisk> hd = (*it)->hardDisk();
10301	AutoWriteLock hdLock (hd);
10302	hd->setBusy();
10303	hd->addReaderOnAncestors();
10304	}
10305	}
10306	else
10307	if (oldMachineState >= MachineState_Running &&
10308	oldMachineState != MachineState_Discarding &&
10309	aMachineState < MachineState_Running)
10310	{
10311	/*
10312	* the EMT thread stopped, so mark attached HDDs as no more busy
10313	* and remove the in-use flag from all its ancestors
10314	*/
10315	for (HDData::HDAttachmentList::const_iterator it =
10316	mHDData->mHDAttachments.begin();
10317	it != mHDData->mHDAttachments.end();
10318	++ it)
10319	{
10320	ComObjPtr <HardDisk> hd = (*it)->hardDisk();
10321	AutoWriteLock hdLock (hd);
10322	hd->releaseReaderOnAncestors();
10323	hd->clearBusy();
10324	}
10325	}
10326
10327	if (oldMachineState == MachineState_Restoring)
10328	{
10329	if (aMachineState != MachineState_Saved)
10330	{
10331	/*
10332	* delete the saved state file once the machine has finished
10333	* restoring from it (note that Console sets the state from
10334	* Restoring to Saved if the VM couldn't restore successfully,
10335	* to give the user an ability to fix an error and retry --
10336	* we keep the saved state file in this case)
10337	*/
10338	deleteSavedState = true;
10339	}
10340	}
10341	else
10342	if (oldMachineState == MachineState_Saved &&
10343	(aMachineState == MachineState_PoweredOff \|\|
10344	aMachineState == MachineState_Aborted))
10345	{
10346	/*
10347	* delete the saved state after Console::DiscardSavedState() is called
10348	* or if the VM process (owning a direct VM session) crashed while the
10349	* VM was Saved
10350	*/
10351
10352	/// @todo (dmik)
10353	// Not sure that deleting the saved state file just because of the
10354	// client death before it attempted to restore the VM is a good
10355	// thing. But when it crashes we need to go to the Aborted state
10356	// which cannot have the saved state file associated... The only
10357	// way to fix this is to make the Aborted condition not a VM state
10358	// but a bool flag: i.e., when a crash occurs, set it to true and
10359	// change the state to PoweredOff or Saved depending on the
10360	// saved state presence.
10361
10362	deleteSavedState = true;
10363	mData->mCurrentStateModified = TRUE;
10364	stsFlags \|= SaveSTS_CurStateModified;
10365	}
10366
10367	if (aMachineState == MachineState_Starting \|\|
10368	aMachineState == MachineState_Restoring)
10369	{
10370	/*
10371	* set the current state modified flag to indicate that the
10372	* current state is no more identical to the state in the
10373	* current snapshot
10374	*/
10375	if (!mData->mCurrentSnapshot.isNull())
10376	{
10377	mData->mCurrentStateModified = TRUE;
10378	stsFlags \|= SaveSTS_CurStateModified;
10379	}
10380	}
10381
10382	if (deleteSavedState == true)
10383	{
10384	Assert (!mSSData->mStateFilePath.isEmpty());
10385	RTFileDelete (Utf8Str (mSSData->mStateFilePath));
10386	mSSData->mStateFilePath.setNull();
10387	stsFlags \|= SaveSTS_StateFilePath;
10388	}
10389
10390	/* redirect to the underlying peer machine */
10391	mPeer->setMachineState (aMachineState);
10392
10393	if (aMachineState == MachineState_PoweredOff \|\|
10394	aMachineState == MachineState_Aborted \|\|
10395	aMachineState == MachineState_Saved)
10396	{
10397	/* the machine has stopped execution
10398	* (or the saved state file was adopted) */
10399	stsFlags \|= SaveSTS_StateTimeStamp;
10400	}
10401
10402	if ((oldMachineState == MachineState_PoweredOff \|\|
10403	oldMachineState == MachineState_Aborted) &&
10404	aMachineState == MachineState_Saved)
10405	{
10406	/* the saved state file was adopted */
10407	Assert (!mSSData->mStateFilePath.isNull());
10408	stsFlags \|= SaveSTS_StateFilePath;
10409	}
10410
10411	rc = saveStateSettings (stsFlags);
10412
10413	if ((oldMachineState != MachineState_PoweredOff &&
10414	oldMachineState != MachineState_Aborted) &&
10415	(aMachineState == MachineState_PoweredOff \|\|
10416	aMachineState == MachineState_Aborted))
10417	{
10418	/*
10419	* clear differencing hard disks based on immutable hard disks
10420	* once we've been shut down for any reason
10421	*/
10422	rc = wipeOutImmutableDiffs();
10423	}
10424
10425	LogFlowThisFunc (("rc=%08X\n", rc));
10426	LogFlowThisFuncLeave();
10427	return rc;
10428	}
10429
10430	/**
10431	* Sends the current machine state value to the VM process.
10432	*
10433	* @note Locks this object for reading, then calls a client process.
10434	*/
10435	HRESULT SessionMachine::updateMachineStateOnClient()
10436	{
10437	AutoCaller autoCaller (this);
10438	AssertComRCReturn (autoCaller.rc(), autoCaller.rc());
10439
10440	ComPtr <IInternalSessionControl> directControl;
10441	{
10442	AutoReadLock alock (this);
10443	AssertReturn (!!mData, E_FAIL);
10444	directControl = mData->mSession.mDirectControl;
10445
10446	/* directControl may be already set to NULL here in #OnSessionEnd()
10447	* called too early by the direct session process while there is still
10448	* some operation (like discarding the snapshot) in progress. The client
10449	* process in this case is waiting inside Session::close() for the
10450	* "end session" process object to complete, while #uninit() called by
10451	* #checkForDeath() on the Watcher thread is waiting for the pending
10452	* operation to complete. For now, we accept this inconsitent behavior
10453	* and simply do nothing here. */
10454
10455	if (mData->mSession.mState == SessionState_Closing)
10456	return S_OK;
10457
10458	AssertReturn (!directControl.isNull(), E_FAIL);
10459	}
10460
10461	return directControl->UpdateMachineState (mData->mMachineState);
10462	}
10463
10464	/* static */
10465	DECLCALLBACK(int) SessionMachine::taskHandler (RTTHREAD thread, void *pvUser)
10466	{
10467	AssertReturn (pvUser, VERR_INVALID_POINTER);
10468
10469	Task task = static_cast <Task > (pvUser);
10470	task->handler();
10471
10472	// it's our responsibility to delete the task
10473	delete task;
10474
10475	return 0;
10476	}
10477
10478	/////////////////////////////////////////////////////////////////////////////
10479	// SnapshotMachine class
10480	/////////////////////////////////////////////////////////////////////////////
10481
10482	DEFINE_EMPTY_CTOR_DTOR (SnapshotMachine)
10483
10484	HRESULT SnapshotMachine::FinalConstruct()
10485	{
10486	LogFlowThisFunc (("\n"));
10487
10488	/* set the proper type to indicate we're the SnapshotMachine instance */
10489	unconst (mType) = IsSnapshotMachine;
10490
10491	return S_OK;
10492	}
10493
10494	void SnapshotMachine::FinalRelease()
10495	{
10496	LogFlowThisFunc (("\n"));
10497
10498	uninit();
10499	}
10500
10501	/**
10502	* Initializes the SnapshotMachine object when taking a snapshot.
10503	*
10504	* @param aSessionMachine machine to take a snapshot from
10505	* @param aSnapshotId snapshot ID of this snapshot machine
10506	* @param aStateFilePath file where the execution state will be later saved
10507	* (or NULL for the offline snapshot)
10508	*
10509	* @note The aSessionMachine must be locked for writing.
10510	*/
10511	HRESULT SnapshotMachine::init (SessionMachine *aSessionMachine,
10512	INPTR GUIDPARAM aSnapshotId,
10513	INPTR BSTR aStateFilePath)
10514	{
10515	LogFlowThisFuncEnter();
10516	LogFlowThisFunc (("mName={%ls}\n", aSessionMachine->mUserData->mName.raw()));
10517
10518	AssertReturn (aSessionMachine && !Guid (aSnapshotId).isEmpty(), E_INVALIDARG);
10519
10520	/* Enclose the state transition NotReady->InInit->Ready */
10521	AutoInitSpan autoInitSpan (this);
10522	AssertReturn (autoInitSpan.isOk(), E_UNEXPECTED);
10523
10524	AssertReturn (aSessionMachine->isWriteLockOnCurrentThread(), E_FAIL);
10525
10526	mSnapshotId = aSnapshotId;
10527
10528	/* memorize the primary Machine instance (i.e. not SessionMachine!) */
10529	unconst (mPeer) = aSessionMachine->mPeer;
10530	/* share the parent pointer */
10531	unconst (mParent) = mPeer->mParent;
10532
10533	/* take the pointer to Data to share */
10534	mData.share (mPeer->mData);
10535	/*
10536	* take the pointer to UserData to share
10537	* (our UserData must always be the same as Machine's data)
10538	*/
10539	mUserData.share (mPeer->mUserData);
10540	/* make a private copy of all other data (recent changes from SessionMachine) */
10541	mHWData.attachCopy (aSessionMachine->mHWData);
10542	mHDData.attachCopy (aSessionMachine->mHDData);
10543
10544	/* SSData is always unique for SnapshotMachine */
10545	mSSData.allocate();
10546	mSSData->mStateFilePath = aStateFilePath;
10547
10548	/*
10549	* create copies of all shared folders (mHWData after attiching a copy
10550	* contains just references to original objects)
10551	*/
10552	for (HWData::SharedFolderList::iterator it = mHWData->mSharedFolders.begin();
10553	it != mHWData->mSharedFolders.end();
10554	++ it)
10555	{
10556	ComObjPtr <SharedFolder> folder;
10557	folder.createObject();
10558	HRESULT rc = folder->initCopy (this, *it);
10559	CheckComRCReturnRC (rc);
10560	*it = folder;
10561	}
10562
10563	/* create all other child objects that will be immutable private copies */
10564
10565	unconst (mBIOSSettings).createObject();
10566	mBIOSSettings->initCopy (this, mPeer->mBIOSSettings);
10567
10568	#ifdef VBOX_VRDP
10569	unconst (mVRDPServer).createObject();
10570	mVRDPServer->initCopy (this, mPeer->mVRDPServer);
10571	#endif
10572
10573	unconst (mDVDDrive).createObject();
10574	mDVDDrive->initCopy (this, mPeer->mDVDDrive);
10575
10576	unconst (mFloppyDrive).createObject();
10577	mFloppyDrive->initCopy (this, mPeer->mFloppyDrive);
10578
10579	unconst (mAudioAdapter).createObject();
10580	mAudioAdapter->initCopy (this, mPeer->mAudioAdapter);
10581
10582	unconst (mUSBController).createObject();
10583	mUSBController->initCopy (this, mPeer->mUSBController);
10584
10585	unconst (mSATAController).createObject();
10586	mSATAController->initCopy (this, mPeer->mSATAController);
10587
10588	for (ULONG slot = 0; slot < ELEMENTS (mNetworkAdapters); slot ++)
10589	{
10590	unconst (mNetworkAdapters [slot]).createObject();
10591	mNetworkAdapters [slot]->initCopy (this, mPeer->mNetworkAdapters [slot]);
10592	}
10593
10594	for (ULONG slot = 0; slot < ELEMENTS (mSerialPorts); slot ++)
10595	{
10596	unconst (mSerialPorts [slot]).createObject();
10597	mSerialPorts [slot]->initCopy (this, mPeer->mSerialPorts [slot]);
10598	}
10599
10600	for (ULONG slot = 0; slot < ELEMENTS (mParallelPorts); slot ++)
10601	{
10602	unconst (mParallelPorts [slot]).createObject();
10603	mParallelPorts [slot]->initCopy (this, mPeer->mParallelPorts [slot]);
10604	}
10605
10606	/* Confirm a successful initialization when it's the case */
10607	autoInitSpan.setSucceeded();
10608
10609	LogFlowThisFuncLeave();
10610	return S_OK;
10611	}
10612
10613	/**
10614	* Initializes the SnapshotMachine object when loading from the settings file.
10615	*
10616	* @param aMachine machine the snapshot belngs to
10617	* @param aHWNode <Hardware> node
10618	* @param aHDAsNode <HardDiskAttachments> node
10619	* @param aSnapshotId snapshot ID of this snapshot machine
10620	* @param aStateFilePath file where the execution state is saved
10621	* (or NULL for the offline snapshot)
10622	*
10623	* @note Doesn't lock anything.
10624	*/
10625	HRESULT SnapshotMachine::init (Machine *aMachine,
10626	const settings::Key &aHWNode,
10627	const settings::Key &aHDAsNode,
10628	INPTR GUIDPARAM aSnapshotId, INPTR BSTR aStateFilePath)
10629	{
10630	LogFlowThisFuncEnter();
10631	LogFlowThisFunc (("mName={%ls}\n", aMachine->mUserData->mName.raw()));
10632
10633	AssertReturn (aMachine && !aHWNode.isNull() && !aHDAsNode.isNull() &&
10634	!Guid (aSnapshotId).isEmpty(),
10635	E_INVALIDARG);
10636
10637	/* Enclose the state transition NotReady->InInit->Ready */
10638	AutoInitSpan autoInitSpan (this);
10639	AssertReturn (autoInitSpan.isOk(), E_UNEXPECTED);
10640
10641	/* Don't need to lock aMachine when VirtualBox is starting up */
10642
10643	mSnapshotId = aSnapshotId;
10644
10645	/* memorize the primary Machine instance */
10646	unconst (mPeer) = aMachine;
10647	/* share the parent pointer */
10648	unconst (mParent) = mPeer->mParent;
10649
10650	/* take the pointer to Data to share */
10651	mData.share (mPeer->mData);
10652	/*
10653	* take the pointer to UserData to share
10654	* (our UserData must always be the same as Machine's data)
10655	*/
10656	mUserData.share (mPeer->mUserData);
10657	/* allocate private copies of all other data (will be loaded from settings) */
10658	mHWData.allocate();
10659	mHDData.allocate();
10660
10661	/* SSData is always unique for SnapshotMachine */
10662	mSSData.allocate();
10663	mSSData->mStateFilePath = aStateFilePath;
10664
10665	/* create all other child objects that will be immutable private copies */
10666
10667	unconst (mBIOSSettings).createObject();
10668	mBIOSSettings->init (this);
10669
10670	#ifdef VBOX_VRDP
10671	unconst (mVRDPServer).createObject();
10672	mVRDPServer->init (this);
10673	#endif
10674
10675	unconst (mDVDDrive).createObject();
10676	mDVDDrive->init (this);
10677
10678	unconst (mFloppyDrive).createObject();
10679	mFloppyDrive->init (this);
10680
10681	unconst (mAudioAdapter).createObject();
10682	mAudioAdapter->init (this);
10683
10684	unconst (mUSBController).createObject();
10685	mUSBController->init (this);
10686
10687	unconst (mSATAController).createObject();
10688	mSATAController->init (this);
10689
10690	for (ULONG slot = 0; slot < ELEMENTS (mNetworkAdapters); slot ++)
10691	{
10692	unconst (mNetworkAdapters [slot]).createObject();
10693	mNetworkAdapters [slot]->init (this, slot);
10694	}
10695
10696	for (ULONG slot = 0; slot < ELEMENTS (mSerialPorts); slot ++)
10697	{
10698	unconst (mSerialPorts [slot]).createObject();
10699	mSerialPorts [slot]->init (this, slot);
10700	}
10701
10702	for (ULONG slot = 0; slot < ELEMENTS (mParallelPorts); slot ++)
10703	{
10704	unconst (mParallelPorts [slot]).createObject();
10705	mParallelPorts [slot]->init (this, slot);
10706	}
10707
10708	/* load hardware and harddisk settings */
10709
10710	HRESULT rc = loadHardware (aHWNode);
10711	if (SUCCEEDED (rc))
10712	rc = loadHardDisks (aHDAsNode, true /* aRegistered */, &mSnapshotId);
10713
10714	if (SUCCEEDED (rc))
10715	{
10716	/* commit all changes made during the initialization */
10717	commit();
10718	}
10719
10720	/* Confirm a successful initialization when it's the case */
10721	if (SUCCEEDED (rc))
10722	autoInitSpan.setSucceeded();
10723
10724	LogFlowThisFuncLeave();
10725	return rc;
10726	}
10727
10728	/**
10729	* Uninitializes this SnapshotMachine object.
10730	*/
10731	void SnapshotMachine::uninit()
10732	{
10733	LogFlowThisFuncEnter();
10734
10735	/* Enclose the state transition Ready->InUninit->NotReady */
10736	AutoUninitSpan autoUninitSpan (this);
10737	if (autoUninitSpan.uninitDone())
10738	return;
10739
10740	uninitDataAndChildObjects();
10741
10742	/* free the essential data structure last */
10743	mData.free();
10744
10745	unconst (mParent).setNull();
10746	unconst (mPeer).setNull();
10747
10748	LogFlowThisFuncLeave();
10749	}
10750
10751	// util::Lockable interface
10752	////////////////////////////////////////////////////////////////////////////////
10753
10754	/**
10755	* Overrides VirtualBoxBase::lockHandle() in order to share the lock handle
10756	* with the primary Machine instance (mPeer).
10757	*/
10758	RWLockHandle *SnapshotMachine::lockHandle() const
10759	{
10760	AssertReturn (!mPeer.isNull(), NULL);
10761	return mPeer->lockHandle();
10762	}
10763
10764	// public methods only for internal purposes
10765	////////////////////////////////////////////////////////////////////////////////
10766
10767	/**
10768	* Called by the snapshot object associated with this SnapshotMachine when
10769	* snapshot data such as name or description is changed.
10770	*
10771	* @note Locks this object for writing.
10772	*/
10773	HRESULT SnapshotMachine::onSnapshotChange (Snapshot *aSnapshot)
10774	{
10775	AutoWriteLock alock (this);
10776
10777	mPeer->saveSnapshotSettings (aSnapshot, SaveSS_UpdateAttrsOp);
10778
10779	/* inform callbacks */
10780	mParent->onSnapshotChange (mData->mUuid, aSnapshot->data().mId);
10781
10782	return S_OK;
10783	}
10784
10785

Note: See TracBrowser for help on using the repository browser.

source: vbox/trunk/src/VBox/Main/MachineImpl.cpp@ 11699

Download in other formats: