1 | /* $Id: VirtualBoxClientImpl.cpp 98103 2023-01-17 14:15:46Z vboxsync $ */
|
---|
2 | /** @file
|
---|
3 | * VirtualBox COM class implementation
|
---|
4 | */
|
---|
5 |
|
---|
6 | /*
|
---|
7 | * Copyright (C) 2010-2023 Oracle and/or its affiliates.
|
---|
8 | *
|
---|
9 | * This file is part of VirtualBox base platform packages, as
|
---|
10 | * available from https://www.virtualbox.org.
|
---|
11 | *
|
---|
12 | * This program is free software; you can redistribute it and/or
|
---|
13 | * modify it under the terms of the GNU General Public License
|
---|
14 | * as published by the Free Software Foundation, in version 3 of the
|
---|
15 | * License.
|
---|
16 | *
|
---|
17 | * This program is distributed in the hope that it will be useful, but
|
---|
18 | * WITHOUT ANY WARRANTY; without even the implied warranty of
|
---|
19 | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
---|
20 | * General Public License for more details.
|
---|
21 | *
|
---|
22 | * You should have received a copy of the GNU General Public License
|
---|
23 | * along with this program; if not, see <https://www.gnu.org/licenses>.
|
---|
24 | *
|
---|
25 | * SPDX-License-Identifier: GPL-3.0-only
|
---|
26 | */
|
---|
27 |
|
---|
28 | #define LOG_GROUP LOG_GROUP_MAIN_VIRTUALBOXCLIENT
|
---|
29 | #include "LoggingNew.h"
|
---|
30 |
|
---|
31 | #include "VirtualBoxClientImpl.h"
|
---|
32 |
|
---|
33 | #include "AutoCaller.h"
|
---|
34 | #include "VBoxEvents.h"
|
---|
35 | #include "VBox/com/ErrorInfo.h"
|
---|
36 | #include "VBox/com/listeners.h"
|
---|
37 |
|
---|
38 | #include <iprt/asm.h>
|
---|
39 | #include <iprt/thread.h>
|
---|
40 | #include <iprt/critsect.h>
|
---|
41 | #include <iprt/path.h>
|
---|
42 | #include <iprt/semaphore.h>
|
---|
43 | #include <iprt/cpp/utils.h>
|
---|
44 | #include <iprt/utf16.h>
|
---|
45 | #ifdef RT_OS_WINDOWS
|
---|
46 | # include <iprt/err.h>
|
---|
47 | # include <iprt/ldr.h>
|
---|
48 | # include <msi.h>
|
---|
49 | # include <WbemIdl.h>
|
---|
50 | #endif
|
---|
51 |
|
---|
52 | #include <new>
|
---|
53 |
|
---|
54 |
|
---|
55 | /** Waiting time between probing whether VBoxSVC is alive. */
|
---|
56 | #define VBOXCLIENT_DEFAULT_INTERVAL 30000
|
---|
57 |
|
---|
58 |
|
---|
59 | /** Initialize instance counter class variable */
|
---|
60 | uint32_t VirtualBoxClient::g_cInstances = 0;
|
---|
61 |
|
---|
62 | LONG VirtualBoxClient::s_cUnnecessaryAtlModuleLocks = 0;
|
---|
63 |
|
---|
64 | #ifdef VBOX_WITH_MAIN_NLS
|
---|
65 |
|
---|
66 | /* listener class for language updates */
|
---|
67 | class VBoxEventListener
|
---|
68 | {
|
---|
69 | public:
|
---|
70 | VBoxEventListener()
|
---|
71 | {}
|
---|
72 |
|
---|
73 |
|
---|
74 | HRESULT init(void *)
|
---|
75 | {
|
---|
76 | return S_OK;
|
---|
77 | }
|
---|
78 |
|
---|
79 | HRESULT init()
|
---|
80 | {
|
---|
81 | return S_OK;
|
---|
82 | }
|
---|
83 |
|
---|
84 | void uninit()
|
---|
85 | {
|
---|
86 | }
|
---|
87 |
|
---|
88 | virtual ~VBoxEventListener()
|
---|
89 | {
|
---|
90 | }
|
---|
91 |
|
---|
92 | STDMETHOD(HandleEvent)(VBoxEventType_T aType, IEvent *aEvent)
|
---|
93 | {
|
---|
94 | switch(aType)
|
---|
95 | {
|
---|
96 | case VBoxEventType_OnLanguageChanged:
|
---|
97 | {
|
---|
98 | /*
|
---|
99 | * Proceed with uttmost care as we might be racing com::Shutdown()
|
---|
100 | * and have the ground open up beneath us.
|
---|
101 | */
|
---|
102 | LogFunc(("VBoxEventType_OnLanguageChanged\n"));
|
---|
103 | VirtualBoxTranslator *pTranslator = VirtualBoxTranslator::tryInstance();
|
---|
104 | if (pTranslator)
|
---|
105 | {
|
---|
106 | ComPtr<ILanguageChangedEvent> pEvent = aEvent;
|
---|
107 | Assert(pEvent);
|
---|
108 |
|
---|
109 | /* This call may fail if we're racing COM shutdown. */
|
---|
110 | com::Bstr bstrLanguageId;
|
---|
111 | HRESULT hrc = pEvent->COMGETTER(LanguageId)(bstrLanguageId.asOutParam());
|
---|
112 | if (SUCCEEDED(hrc))
|
---|
113 | {
|
---|
114 | try
|
---|
115 | {
|
---|
116 | com::Utf8Str strLanguageId(bstrLanguageId);
|
---|
117 | LogFunc(("New language ID: %s\n", strLanguageId.c_str()));
|
---|
118 | pTranslator->i_loadLanguage(strLanguageId.c_str());
|
---|
119 | }
|
---|
120 | catch (std::bad_alloc &)
|
---|
121 | {
|
---|
122 | LogFunc(("Caught bad_alloc"));
|
---|
123 | }
|
---|
124 | }
|
---|
125 | else
|
---|
126 | LogFunc(("Failed to get new language ID: %Rhrc\n", hrc));
|
---|
127 |
|
---|
128 | pTranslator->release();
|
---|
129 | }
|
---|
130 | break;
|
---|
131 | }
|
---|
132 |
|
---|
133 | default:
|
---|
134 | AssertFailed();
|
---|
135 | }
|
---|
136 |
|
---|
137 | return S_OK;
|
---|
138 | }
|
---|
139 | };
|
---|
140 |
|
---|
141 | typedef ListenerImpl<VBoxEventListener> VBoxEventListenerImpl;
|
---|
142 |
|
---|
143 | VBOX_LISTENER_DECLARE(VBoxEventListenerImpl)
|
---|
144 |
|
---|
145 | #endif /* VBOX_WITH_MAIN_NLS */
|
---|
146 |
|
---|
147 | // constructor / destructor
|
---|
148 | /////////////////////////////////////////////////////////////////////////////
|
---|
149 |
|
---|
150 | /** @relates VirtualBoxClient::FinalConstruct() */
|
---|
151 | HRESULT VirtualBoxClient::FinalConstruct()
|
---|
152 | {
|
---|
153 | HRESULT hrc = init();
|
---|
154 | BaseFinalConstruct();
|
---|
155 | return hrc;
|
---|
156 | }
|
---|
157 |
|
---|
158 | void VirtualBoxClient::FinalRelease()
|
---|
159 | {
|
---|
160 | uninit();
|
---|
161 | BaseFinalRelease();
|
---|
162 | }
|
---|
163 |
|
---|
164 |
|
---|
165 | // public initializer/uninitializer for internal purposes only
|
---|
166 | /////////////////////////////////////////////////////////////////////////////
|
---|
167 |
|
---|
168 | /**
|
---|
169 | * Initializes the VirtualBoxClient object.
|
---|
170 | *
|
---|
171 | * @returns COM result indicator
|
---|
172 | */
|
---|
173 | HRESULT VirtualBoxClient::init()
|
---|
174 | {
|
---|
175 | LogFlowThisFuncEnter();
|
---|
176 |
|
---|
177 | /* Enclose the state transition NotReady->InInit->Ready */
|
---|
178 | AutoInitSpan autoInitSpan(this);
|
---|
179 | AssertReturn(autoInitSpan.isOk(), E_FAIL);
|
---|
180 |
|
---|
181 | /* Important: DO NOT USE any kind of "early return" (except the single
|
---|
182 | * one above, checking the init span success) in this method. It is vital
|
---|
183 | * for correct error handling that it has only one point of return, which
|
---|
184 | * does all the magic on COM to signal object creation success and
|
---|
185 | * reporting the error later for every API method. COM translates any
|
---|
186 | * unsuccessful object creation to REGDB_E_CLASSNOTREG errors or similar
|
---|
187 | * unhelpful ones which cause us a lot of grief with troubleshooting. */
|
---|
188 |
|
---|
189 | HRESULT hrc = S_OK;
|
---|
190 | try
|
---|
191 | {
|
---|
192 | if (ASMAtomicIncU32(&g_cInstances) != 1)
|
---|
193 | AssertFailedStmt(throw setError(E_FAIL, "Attempted to create more than one VirtualBoxClient instance"));
|
---|
194 |
|
---|
195 | mData.m_ThreadWatcher = NIL_RTTHREAD;
|
---|
196 | mData.m_SemEvWatcher = NIL_RTSEMEVENT;
|
---|
197 |
|
---|
198 | hrc = mData.m_pVirtualBox.createLocalObject(CLSID_VirtualBox);
|
---|
199 | if (FAILED(hrc))
|
---|
200 | #ifdef RT_OS_WINDOWS
|
---|
201 | throw i_investigateVirtualBoxObjectCreationFailure(hrc);
|
---|
202 | #else
|
---|
203 | throw hrc;
|
---|
204 | #endif
|
---|
205 |
|
---|
206 | /* VirtualBox error return is postponed to method calls, fetch it. */
|
---|
207 | ULONG rev;
|
---|
208 | hrc = mData.m_pVirtualBox->COMGETTER(Revision)(&rev);
|
---|
209 | if (FAILED(hrc))
|
---|
210 | throw hrc;
|
---|
211 |
|
---|
212 | hrc = unconst(mData.m_pEventSource).createObject();
|
---|
213 | AssertComRCThrow(hrc, setError(hrc, "Could not create EventSource for VirtualBoxClient"));
|
---|
214 | hrc = mData.m_pEventSource->init();
|
---|
215 | AssertComRCThrow(hrc, setError(hrc, "Could not initialize EventSource for VirtualBoxClient"));
|
---|
216 |
|
---|
217 | /* HACK ALERT! This is for DllCanUnloadNow(). */
|
---|
218 | s_cUnnecessaryAtlModuleLocks++;
|
---|
219 | AssertMsg(s_cUnnecessaryAtlModuleLocks == 1, ("%d\n", s_cUnnecessaryAtlModuleLocks));
|
---|
220 |
|
---|
221 | int vrc;
|
---|
222 | #ifdef VBOX_WITH_MAIN_NLS
|
---|
223 | /* Create the translator singelton (must work) and try load translations (non-fatal). */
|
---|
224 | mData.m_pVBoxTranslator = VirtualBoxTranslator::instance();
|
---|
225 | if (mData.m_pVBoxTranslator == NULL)
|
---|
226 | throw setError(VBOX_E_IPRT_ERROR, "Failed to create translator instance");
|
---|
227 |
|
---|
228 | char szNlsPath[RTPATH_MAX];
|
---|
229 | vrc = RTPathAppPrivateNoArch(szNlsPath, sizeof(szNlsPath));
|
---|
230 | if (RT_SUCCESS(vrc))
|
---|
231 | vrc = RTPathAppend(szNlsPath, sizeof(szNlsPath), "nls" RTPATH_SLASH_STR "VirtualBoxAPI");
|
---|
232 |
|
---|
233 | if (RT_SUCCESS(vrc))
|
---|
234 | {
|
---|
235 | vrc = mData.m_pVBoxTranslator->registerTranslation(szNlsPath, true, &mData.m_pTrComponent);
|
---|
236 | if (RT_SUCCESS(vrc))
|
---|
237 | {
|
---|
238 | hrc = i_reloadApiLanguage();
|
---|
239 | if (SUCCEEDED(hrc))
|
---|
240 | i_registerEventListener(); /* for updates */
|
---|
241 | else
|
---|
242 | LogRelFunc(("i_reloadApiLanguage failed: %Rhrc\n", hrc));
|
---|
243 | }
|
---|
244 | else
|
---|
245 | LogRelFunc(("Register translation failed: %Rrc\n", vrc));
|
---|
246 | }
|
---|
247 | else
|
---|
248 | LogRelFunc(("Path constructing failed: %Rrc\n", vrc));
|
---|
249 | #endif
|
---|
250 | /* Setting up the VBoxSVC watcher thread. If anything goes wrong here it
|
---|
251 | * is not considered important enough to cause any sort of visible
|
---|
252 | * failure. The monitoring will not be done, but that's all. */
|
---|
253 | vrc = RTSemEventCreate(&mData.m_SemEvWatcher);
|
---|
254 | if (RT_FAILURE(vrc))
|
---|
255 | {
|
---|
256 | mData.m_SemEvWatcher = NIL_RTSEMEVENT;
|
---|
257 | AssertRCStmt(vrc, throw setErrorBoth(VBOX_E_IPRT_ERROR, vrc, tr("Failed to create semaphore (vrc=%Rrc)"), vrc));
|
---|
258 | }
|
---|
259 |
|
---|
260 | vrc = RTThreadCreate(&mData.m_ThreadWatcher, SVCWatcherThread, this, 0,
|
---|
261 | RTTHREADTYPE_INFREQUENT_POLLER, RTTHREADFLAGS_WAITABLE, "VBoxSVCWatcher");
|
---|
262 | if (RT_FAILURE(vrc))
|
---|
263 | {
|
---|
264 | RTSemEventDestroy(mData.m_SemEvWatcher);
|
---|
265 | mData.m_SemEvWatcher = NIL_RTSEMEVENT;
|
---|
266 | AssertRCStmt(vrc, throw setErrorBoth(VBOX_E_IPRT_ERROR, vrc, tr("Failed to create watcher thread (vrc=%Rrc)"), vrc));
|
---|
267 | }
|
---|
268 | }
|
---|
269 | catch (HRESULT err)
|
---|
270 | {
|
---|
271 | /* we assume that error info is set by the thrower */
|
---|
272 | hrc = err;
|
---|
273 | }
|
---|
274 | catch (...)
|
---|
275 | {
|
---|
276 | hrc = VirtualBoxBase::handleUnexpectedExceptions(this, RT_SRC_POS);
|
---|
277 | }
|
---|
278 |
|
---|
279 | /* Confirm a successful initialization when it's the case. Must be last,
|
---|
280 | * as on failure it will uninitialize the object. */
|
---|
281 | if (SUCCEEDED(hrc))
|
---|
282 | autoInitSpan.setSucceeded();
|
---|
283 | else
|
---|
284 | autoInitSpan.setFailed(hrc);
|
---|
285 |
|
---|
286 | LogFlowThisFunc(("hrc=%Rhrc\n", hrc));
|
---|
287 | LogFlowThisFuncLeave();
|
---|
288 | /* Unconditionally return success, because the error return is delayed to
|
---|
289 | * the attribute/method calls through the InitFailed object state. */
|
---|
290 | return S_OK;
|
---|
291 | }
|
---|
292 |
|
---|
293 | #ifdef RT_OS_WINDOWS
|
---|
294 |
|
---|
295 | /**
|
---|
296 | * Looks into why we failed to create the VirtualBox object.
|
---|
297 | *
|
---|
298 | * @returns hrcCaller thru setError.
|
---|
299 | * @param hrcCaller The failure status code.
|
---|
300 | */
|
---|
301 | HRESULT VirtualBoxClient::i_investigateVirtualBoxObjectCreationFailure(HRESULT hrcCaller)
|
---|
302 | {
|
---|
303 | HRESULT hrc;
|
---|
304 |
|
---|
305 | # ifdef VBOX_WITH_SDS
|
---|
306 | /*
|
---|
307 | * Check that the VBoxSDS service is configured to run as LocalSystem and is enabled.
|
---|
308 | */
|
---|
309 | WCHAR wszBuffer[256];
|
---|
310 | uint32_t uStartType;
|
---|
311 | int vrc = i_getServiceAccountAndStartType(L"VBoxSDS", wszBuffer, RT_ELEMENTS(wszBuffer), &uStartType);
|
---|
312 | if (RT_SUCCESS(vrc))
|
---|
313 | {
|
---|
314 | LogRelFunc(("VBoxSDS service is running under the '%ls' account with start type %u.\n", wszBuffer, uStartType));
|
---|
315 | if (RTUtf16Cmp(wszBuffer, L"LocalSystem") != 0)
|
---|
316 | return setError(hrcCaller,
|
---|
317 | tr("VBoxSDS is misconfigured to run under the '%ls' account instead of the SYSTEM one.\n"
|
---|
318 | "Reinstall VirtualBox to fix it. Alternatively you can fix it using the Windows Service Control "
|
---|
319 | "Manager or by running 'sc config VBoxSDS obj=LocalSystem' on a command line."), wszBuffer);
|
---|
320 | if (uStartType == SERVICE_DISABLED)
|
---|
321 | return setError(hrcCaller,
|
---|
322 | tr("The VBoxSDS windows service is disabled.\n"
|
---|
323 | "Reinstall VirtualBox to fix it. Alternatively try reenable the service by setting it to "
|
---|
324 | " 'Manual' startup type in the Windows Service management console, or by runing "
|
---|
325 | "'sc config VBoxSDS start=demand' on the command line."));
|
---|
326 | }
|
---|
327 | else if (vrc == VERR_NOT_FOUND)
|
---|
328 | return setError(hrcCaller,
|
---|
329 | tr("The VBoxSDS windows service was not found.\n"
|
---|
330 | "Reinstall VirtualBox to fix it. Alternatively you can try start VirtualBox as Administrator, this "
|
---|
331 | "should automatically reinstall the service, or you can run "
|
---|
332 | "'VBoxSDS.exe --regservice' command from an elevated Administrator command line."));
|
---|
333 | else
|
---|
334 | LogRelFunc(("VirtualBoxClient::i_getServiceAccount failed: %Rrc\n", vrc));
|
---|
335 | # endif
|
---|
336 |
|
---|
337 | /*
|
---|
338 | * First step is to try get an IUnknown interface of the VirtualBox object.
|
---|
339 | *
|
---|
340 | * This will succeed even when oleaut32.msm (see @bugref{8016}, @ticketref{12087})
|
---|
341 | * is accidentally installed and messes up COM. It may also succeed when the COM
|
---|
342 | * registration is partially broken (though that's unlikely to happen these days).
|
---|
343 | */
|
---|
344 | IUnknown *pUnknown = NULL;
|
---|
345 | hrc = CoCreateInstance(CLSID_VirtualBox, NULL, CLSCTX_LOCAL_SERVER, IID_IUnknown, (void **)&pUnknown);
|
---|
346 | if (FAILED(hrc))
|
---|
347 | {
|
---|
348 | if (hrc == hrcCaller)
|
---|
349 | return setError(hrcCaller, tr("Completely failed to instantiate CLSID_VirtualBox: %Rhrc"), hrcCaller);
|
---|
350 | return setError(hrcCaller, tr("Completely failed to instantiate CLSID_VirtualBox: %Rhrc & %Rhrc"), hrcCaller, hrc);
|
---|
351 | }
|
---|
352 |
|
---|
353 | /*
|
---|
354 | * Try query the IVirtualBox interface (should fail), if it succeed we return
|
---|
355 | * straight away so we have more columns to spend on long messages below.
|
---|
356 | */
|
---|
357 | IVirtualBox *pVirtualBox;
|
---|
358 | hrc = pUnknown->QueryInterface(IID_IVirtualBox, (void **)&pVirtualBox);
|
---|
359 | if (SUCCEEDED(hrc))
|
---|
360 | {
|
---|
361 | pVirtualBox->Release();
|
---|
362 | pUnknown->Release();
|
---|
363 | return setError(hrcCaller,
|
---|
364 | tr("Failed to instantiate CLSID_VirtualBox the first time, but worked when checking out why ... weird"));
|
---|
365 | }
|
---|
366 |
|
---|
367 | /*
|
---|
368 | * Check for oleaut32.msm traces in the registry.
|
---|
369 | */
|
---|
370 | HKEY hKey;
|
---|
371 | LSTATUS lrc = RegOpenKeyExW(HKEY_CLASSES_ROOT, L"CLSID\\{00020420-0000-0000-C000-000000000046}\\InprocServer32",
|
---|
372 | 0 /*fFlags*/, KEY_QUERY_VALUE | KEY_ENUMERATE_SUB_KEYS | STANDARD_RIGHTS_READ, &hKey);
|
---|
373 | if (lrc == ERROR_SUCCESS)
|
---|
374 | {
|
---|
375 | wchar_t wszBuf[8192];
|
---|
376 | DWORD cbBuf = sizeof(wszBuf) - sizeof(wchar_t);
|
---|
377 | DWORD dwType = 0;
|
---|
378 | lrc = RegQueryValueExW(hKey, L"InprocServer32", NULL /*pvReserved*/, &dwType, (BYTE *)&wszBuf[0], &cbBuf);
|
---|
379 | if (lrc == ERROR_SUCCESS)
|
---|
380 | {
|
---|
381 | wszBuf[cbBuf / sizeof(wchar_t)] = '\0';
|
---|
382 | bool fSetError = false;
|
---|
383 |
|
---|
384 | /*
|
---|
385 | * Try decode the string and improve the message.
|
---|
386 | */
|
---|
387 | typedef UINT (WINAPI *PFNMSIDECOMPOSEDESCRIPTORW)(PCWSTR pwszDescriptor,
|
---|
388 | LPWSTR pwszProductCode /*[40]*/,
|
---|
389 | LPWSTR pwszFeatureId /*[40]*/,
|
---|
390 | LPWSTR pwszComponentCode /*[40]*/,
|
---|
391 | DWORD *poffArguments);
|
---|
392 | PFNMSIDECOMPOSEDESCRIPTORW pfnMsiDecomposeDescriptorW;
|
---|
393 | pfnMsiDecomposeDescriptorW = (PFNMSIDECOMPOSEDESCRIPTORW)RTLdrGetSystemSymbol("msi.dll", "MsiDecomposeDescriptorW");
|
---|
394 | if ( pfnMsiDecomposeDescriptorW
|
---|
395 | && ( dwType == REG_SZ
|
---|
396 | || dwType == REG_MULTI_SZ))
|
---|
397 | {
|
---|
398 | wchar_t wszProductCode[RTUUID_STR_LENGTH + 2 + 16] = { 0 };
|
---|
399 | wchar_t wszFeatureId[RTUUID_STR_LENGTH + 2 + 16] = { 0 };
|
---|
400 | wchar_t wszComponentCode[RTUUID_STR_LENGTH + 2 + 16] = { 0 };
|
---|
401 | DWORD offArguments = ~(DWORD)0;
|
---|
402 | UINT uRc = pfnMsiDecomposeDescriptorW(wszBuf, wszProductCode, wszFeatureId, wszComponentCode, &offArguments);
|
---|
403 | if (uRc == 0)
|
---|
404 | {
|
---|
405 | /*
|
---|
406 | * Can we resolve the product code into a name?
|
---|
407 | */
|
---|
408 | typedef UINT (WINAPI *PFNMSIOPENPRODUCTW)(PCWSTR, MSIHANDLE *);
|
---|
409 | PFNMSIOPENPRODUCTW pfnMsiOpenProductW;
|
---|
410 | pfnMsiOpenProductW = (PFNMSIOPENPRODUCTW)RTLdrGetSystemSymbol("msi.dll", "MsiOpenProductW");
|
---|
411 |
|
---|
412 | typedef UINT (WINAPI *PFNMSICLOSEHANDLE)(MSIHANDLE);
|
---|
413 | PFNMSICLOSEHANDLE pfnMsiCloseHandle;
|
---|
414 | pfnMsiCloseHandle = (PFNMSICLOSEHANDLE)RTLdrGetSystemSymbol("msi.dll", "MsiCloseHandle");
|
---|
415 |
|
---|
416 | typedef UINT (WINAPI *PFNGETPRODUCTPROPERTYW)(MSIHANDLE, PCWSTR, PWSTR, PDWORD);
|
---|
417 | PFNGETPRODUCTPROPERTYW pfnMsiGetProductPropertyW;
|
---|
418 | pfnMsiGetProductPropertyW = (PFNGETPRODUCTPROPERTYW)RTLdrGetSystemSymbol("msi.dll", "MsiGetProductPropertyW");
|
---|
419 | if ( pfnMsiGetProductPropertyW
|
---|
420 | && pfnMsiCloseHandle
|
---|
421 | && pfnMsiOpenProductW)
|
---|
422 | {
|
---|
423 | MSIHANDLE hMsi = 0;
|
---|
424 | uRc = pfnMsiOpenProductW(wszProductCode, &hMsi);
|
---|
425 | if (uRc == 0)
|
---|
426 | {
|
---|
427 | static wchar_t const * const s_apwszProps[] =
|
---|
428 | {
|
---|
429 | INSTALLPROPERTY_INSTALLEDPRODUCTNAME,
|
---|
430 | INSTALLPROPERTY_PRODUCTNAME,
|
---|
431 | INSTALLPROPERTY_PACKAGENAME,
|
---|
432 | };
|
---|
433 |
|
---|
434 | wchar_t wszProductName[1024];
|
---|
435 | DWORD cwcProductName;
|
---|
436 | unsigned i = 0;
|
---|
437 | do
|
---|
438 | {
|
---|
439 | cwcProductName = RT_ELEMENTS(wszProductName) - 1;
|
---|
440 | uRc = pfnMsiGetProductPropertyW(hMsi, s_apwszProps[i], wszProductName, &cwcProductName);
|
---|
441 | }
|
---|
442 | while ( ++i < RT_ELEMENTS(s_apwszProps)
|
---|
443 | && ( uRc != 0
|
---|
444 | || cwcProductName < 2
|
---|
445 | || cwcProductName >= RT_ELEMENTS(wszProductName)) );
|
---|
446 | uRc = pfnMsiCloseHandle(hMsi);
|
---|
447 | if (uRc == 0 && cwcProductName >= 2)
|
---|
448 | {
|
---|
449 | wszProductName[RT_MIN(cwcProductName, RT_ELEMENTS(wszProductName) - 1)] = '\0';
|
---|
450 | setError(hrcCaller,
|
---|
451 | tr("Failed to instantiate CLSID_VirtualBox w/ IVirtualBox, but CLSID_VirtualBox w/ IUnknown works.\n"
|
---|
452 | "PSDispatch looks broken by the '%ls' (%ls) program, suspecting that it features the broken oleaut32.msm module as component %ls.\n"
|
---|
453 | "\n"
|
---|
454 | "We suggest you try uninstall '%ls'.\n"
|
---|
455 | "\n"
|
---|
456 | "See also https://support.microsoft.com/en-us/kb/316911 "),
|
---|
457 | wszProductName, wszProductCode, wszComponentCode, wszProductName);
|
---|
458 | fSetError = true;
|
---|
459 | }
|
---|
460 | }
|
---|
461 | }
|
---|
462 |
|
---|
463 | /* MSI uses COM and may mess up our stuff. So, we wait with the fallback till afterwards in this case. */
|
---|
464 | if (!fSetError)
|
---|
465 | {
|
---|
466 | setError(hrcCaller,
|
---|
467 | tr("Failed to instantiate CLSID_VirtualBox w/ IVirtualBox, CLSID_VirtualBox w/ IUnknown works.\n"
|
---|
468 | "PSDispatch looks broken by installer %ls featuring the broken oleaut32.msm module as component %ls.\n"
|
---|
469 | "\n"
|
---|
470 | "See also https://support.microsoft.com/en-us/kb/316911 "),
|
---|
471 | wszProductCode, wszComponentCode);
|
---|
472 | fSetError = true;
|
---|
473 | }
|
---|
474 | }
|
---|
475 | }
|
---|
476 | if (!fSetError)
|
---|
477 | setError(hrcCaller, tr("Failed to instantiate CLSID_VirtualBox w/ IVirtualBox, CLSID_VirtualBox w/ IUnknown works.\n"
|
---|
478 | "PSDispatch looks broken by some installer featuring the broken oleaut32.msm module as a component.\n"
|
---|
479 | "\n"
|
---|
480 | "See also https://support.microsoft.com/en-us/kb/316911 "));
|
---|
481 | }
|
---|
482 | else if (lrc == ERROR_FILE_NOT_FOUND)
|
---|
483 | setError(hrcCaller, tr("Failed to instantiate CLSID_VirtualBox w/ IVirtualBox, but CLSID_VirtualBox w/ IUnknown works.\n"
|
---|
484 | "PSDispatch looks fine. Weird"));
|
---|
485 | else
|
---|
486 | setError(hrcCaller, tr("Failed to instantiate CLSID_VirtualBox w/ IVirtualBox, but CLSID_VirtualBox w/ IUnknown works.\n"
|
---|
487 | "Checking out PSDispatch registration ended with error: %u (%#x)"), lrc, lrc);
|
---|
488 | RegCloseKey(hKey);
|
---|
489 | }
|
---|
490 |
|
---|
491 | pUnknown->Release();
|
---|
492 | return hrcCaller;
|
---|
493 | }
|
---|
494 |
|
---|
495 | # ifdef VBOX_WITH_SDS
|
---|
496 | /**
|
---|
497 | * Gets the service account name and start type for the given service.
|
---|
498 | *
|
---|
499 | * @returns IPRT status code (for some reason).
|
---|
500 | * @param pwszServiceName The name of the service.
|
---|
501 | * @param pwszAccountName Where to return the account name.
|
---|
502 | * @param cwcAccountName The length of the account name buffer (in WCHARs).
|
---|
503 | * @param puStartType Where to return the start type.
|
---|
504 | */
|
---|
505 | int VirtualBoxClient::i_getServiceAccountAndStartType(const wchar_t *pwszServiceName,
|
---|
506 | wchar_t *pwszAccountName, size_t cwcAccountName, uint32_t *puStartType)
|
---|
507 | {
|
---|
508 | AssertPtr(pwszServiceName);
|
---|
509 | AssertPtr(pwszAccountName);
|
---|
510 | Assert(cwcAccountName);
|
---|
511 | *pwszAccountName = '\0';
|
---|
512 | *puStartType = SERVICE_DEMAND_START;
|
---|
513 |
|
---|
514 | int vrc;
|
---|
515 |
|
---|
516 | // Get a handle to the SCM database.
|
---|
517 | SC_HANDLE hSCManager = OpenSCManagerW(NULL /*pwszMachineName*/, NULL /*pwszDatabaseName*/, SC_MANAGER_CONNECT);
|
---|
518 | if (hSCManager != NULL)
|
---|
519 | {
|
---|
520 | SC_HANDLE hService = OpenServiceW(hSCManager, pwszServiceName, SERVICE_QUERY_CONFIG);
|
---|
521 | if (hService != NULL)
|
---|
522 | {
|
---|
523 | DWORD cbNeeded = sizeof(QUERY_SERVICE_CONFIGW) + _1K;
|
---|
524 | if (!QueryServiceConfigW(hService, NULL, 0, &cbNeeded))
|
---|
525 | {
|
---|
526 | Assert(GetLastError() == ERROR_INSUFFICIENT_BUFFER);
|
---|
527 | LPQUERY_SERVICE_CONFIGW pSc = (LPQUERY_SERVICE_CONFIGW)RTMemTmpAllocZ(cbNeeded + _1K);
|
---|
528 | if (pSc)
|
---|
529 | {
|
---|
530 | DWORD cbNeeded2 = 0;
|
---|
531 | if (QueryServiceConfigW(hService, pSc, cbNeeded + _1K, &cbNeeded2))
|
---|
532 | {
|
---|
533 | *puStartType = pSc->dwStartType;
|
---|
534 | vrc = RTUtf16Copy(pwszAccountName, cwcAccountName, pSc->lpServiceStartName);
|
---|
535 | if (RT_FAILURE(vrc))
|
---|
536 | LogRel(("Error: SDS service name is too long (%Rrc): %ls\n", vrc, pSc->lpServiceStartName));
|
---|
537 | }
|
---|
538 | else
|
---|
539 | {
|
---|
540 | int dwError = GetLastError();
|
---|
541 | vrc = RTErrConvertFromWin32(dwError);
|
---|
542 | LogRel(("Error: Failed querying '%ls' service config: %Rwc (%u) -> %Rrc; cbNeeded=%d cbNeeded2=%d\n",
|
---|
543 | pwszServiceName, dwError, dwError, vrc, cbNeeded, cbNeeded2));
|
---|
544 | }
|
---|
545 | RTMemTmpFree(pSc);
|
---|
546 | }
|
---|
547 | else
|
---|
548 | {
|
---|
549 | LogRel(("Error: Failed allocating %#x bytes of memory for service config!\n", cbNeeded + _1K));
|
---|
550 | vrc = VERR_NO_TMP_MEMORY;
|
---|
551 | }
|
---|
552 | }
|
---|
553 | else
|
---|
554 | {
|
---|
555 | AssertLogRelMsgFailed(("Error: QueryServiceConfigW returns success with zero buffer!\n"));
|
---|
556 | vrc = VERR_IPE_UNEXPECTED_STATUS;
|
---|
557 | }
|
---|
558 | CloseServiceHandle(hService);
|
---|
559 | }
|
---|
560 | else
|
---|
561 | {
|
---|
562 | int dwError = GetLastError();
|
---|
563 | vrc = RTErrConvertFromWin32(dwError);
|
---|
564 | LogRel(("Error: Could not open service '%ls': %Rwc (%u) -> %Rrc\n", pwszServiceName, dwError, dwError, vrc));
|
---|
565 | }
|
---|
566 | CloseServiceHandle(hSCManager);
|
---|
567 | }
|
---|
568 | else
|
---|
569 | {
|
---|
570 | int dwError = GetLastError();
|
---|
571 | vrc = RTErrConvertFromWin32(dwError);
|
---|
572 | LogRel(("Error: Could not open SCM: %Rwc (%u) -> %Rrc\n", dwError, dwError, vrc));
|
---|
573 | }
|
---|
574 | return vrc;
|
---|
575 | }
|
---|
576 | # endif /* VBOX_WITH_SDS */
|
---|
577 |
|
---|
578 | #endif /* RT_OS_WINDOWS */
|
---|
579 |
|
---|
580 | /**
|
---|
581 | * Uninitializes the instance and sets the ready flag to FALSE.
|
---|
582 | * Called either from FinalRelease() or by the parent when it gets destroyed.
|
---|
583 | */
|
---|
584 | void VirtualBoxClient::uninit()
|
---|
585 | {
|
---|
586 | LogFlowThisFunc(("\n"));
|
---|
587 |
|
---|
588 | /* Enclose the state transition Ready->InUninit->NotReady */
|
---|
589 | AutoUninitSpan autoUninitSpan(this);
|
---|
590 | if (autoUninitSpan.uninitDone())
|
---|
591 | {
|
---|
592 | LogFlowThisFunc(("already done\n"));
|
---|
593 | return;
|
---|
594 | }
|
---|
595 |
|
---|
596 | #ifdef VBOX_WITH_MAIN_NLS
|
---|
597 | i_unregisterEventListener();
|
---|
598 | #endif
|
---|
599 |
|
---|
600 | if (mData.m_ThreadWatcher != NIL_RTTHREAD)
|
---|
601 | {
|
---|
602 | /* Signal the event semaphore and wait for the thread to terminate.
|
---|
603 | * if it hangs for some reason exit anyway, this can cause a crash
|
---|
604 | * though as the object will no longer be available. */
|
---|
605 | RTSemEventSignal(mData.m_SemEvWatcher);
|
---|
606 | RTThreadWait(mData.m_ThreadWatcher, 30000, NULL);
|
---|
607 | mData.m_ThreadWatcher = NIL_RTTHREAD;
|
---|
608 | RTSemEventDestroy(mData.m_SemEvWatcher);
|
---|
609 | mData.m_SemEvWatcher = NIL_RTSEMEVENT;
|
---|
610 | }
|
---|
611 | #ifdef VBOX_WITH_MAIN_NLS
|
---|
612 | if (mData.m_pVBoxTranslator != NULL)
|
---|
613 | {
|
---|
614 | mData.m_pVBoxTranslator->release();
|
---|
615 | mData.m_pVBoxTranslator = NULL;
|
---|
616 | mData.m_pTrComponent = NULL;
|
---|
617 | }
|
---|
618 | #endif
|
---|
619 | mData.m_pToken.setNull();
|
---|
620 | mData.m_pVirtualBox.setNull();
|
---|
621 |
|
---|
622 | ASMAtomicDecU32(&g_cInstances);
|
---|
623 |
|
---|
624 | LogFlowThisFunc(("returns\n"));
|
---|
625 | }
|
---|
626 |
|
---|
627 | // IVirtualBoxClient properties
|
---|
628 | /////////////////////////////////////////////////////////////////////////////
|
---|
629 |
|
---|
630 | /**
|
---|
631 | * Returns a reference to the VirtualBox object.
|
---|
632 | *
|
---|
633 | * @returns COM status code
|
---|
634 | * @param aVirtualBox Address of result variable.
|
---|
635 | */
|
---|
636 | HRESULT VirtualBoxClient::getVirtualBox(ComPtr<IVirtualBox> &aVirtualBox)
|
---|
637 | {
|
---|
638 | AutoReadLock alock(this COMMA_LOCKVAL_SRC_POS);
|
---|
639 | aVirtualBox = mData.m_pVirtualBox;
|
---|
640 | return S_OK;
|
---|
641 | }
|
---|
642 |
|
---|
643 | /**
|
---|
644 | * Create a new Session object and return a reference to it.
|
---|
645 | *
|
---|
646 | * @returns COM status code
|
---|
647 | * @param aSession Address of result variable.
|
---|
648 | */
|
---|
649 | HRESULT VirtualBoxClient::getSession(ComPtr<ISession> &aSession)
|
---|
650 | {
|
---|
651 | /* this is not stored in this object, no need to lock */
|
---|
652 | ComPtr<ISession> pSession;
|
---|
653 | HRESULT hrc = pSession.createInprocObject(CLSID_Session);
|
---|
654 | if (SUCCEEDED(hrc))
|
---|
655 | aSession = pSession;
|
---|
656 | return hrc;
|
---|
657 | }
|
---|
658 |
|
---|
659 | /**
|
---|
660 | * Return reference to the EventSource associated with this object.
|
---|
661 | *
|
---|
662 | * @returns COM status code
|
---|
663 | * @param aEventSource Address of result variable.
|
---|
664 | */
|
---|
665 | HRESULT VirtualBoxClient::getEventSource(ComPtr<IEventSource> &aEventSource)
|
---|
666 | {
|
---|
667 | /* this is const, no need to lock */
|
---|
668 | aEventSource = mData.m_pEventSource;
|
---|
669 | return aEventSource.isNull() ? E_FAIL : S_OK;
|
---|
670 | }
|
---|
671 |
|
---|
672 | // IVirtualBoxClient methods
|
---|
673 | /////////////////////////////////////////////////////////////////////////////
|
---|
674 |
|
---|
675 | /**
|
---|
676 | * Checks a Machine object for any pending errors.
|
---|
677 | *
|
---|
678 | * @returns COM status code
|
---|
679 | * @param aMachine Machine object to check.
|
---|
680 | */
|
---|
681 | HRESULT VirtualBoxClient::checkMachineError(const ComPtr<IMachine> &aMachine)
|
---|
682 | {
|
---|
683 | BOOL fAccessible = FALSE;
|
---|
684 | HRESULT hrc = aMachine->COMGETTER(Accessible)(&fAccessible);
|
---|
685 | if (FAILED(hrc))
|
---|
686 | return setError(hrc, tr("Could not check the accessibility status of the VM"));
|
---|
687 | else if (!fAccessible)
|
---|
688 | {
|
---|
689 | ComPtr<IVirtualBoxErrorInfo> pAccessError;
|
---|
690 | hrc = aMachine->COMGETTER(AccessError)(pAccessError.asOutParam());
|
---|
691 | if (FAILED(hrc))
|
---|
692 | return setError(hrc, tr("Could not get the access error message of the VM"));
|
---|
693 | else
|
---|
694 | {
|
---|
695 | ErrorInfo info(pAccessError);
|
---|
696 | ErrorInfoKeeper eik(info);
|
---|
697 | return info.getResultCode();
|
---|
698 | }
|
---|
699 | }
|
---|
700 | return S_OK;
|
---|
701 | }
|
---|
702 |
|
---|
703 | // private methods
|
---|
704 | /////////////////////////////////////////////////////////////////////////////
|
---|
705 |
|
---|
706 |
|
---|
707 | /// @todo AM Add pinging of VBoxSDS
|
---|
708 | /*static*/
|
---|
709 | DECLCALLBACK(int) VirtualBoxClient::SVCWatcherThread(RTTHREAD ThreadSelf,
|
---|
710 | void *pvUser)
|
---|
711 | {
|
---|
712 | NOREF(ThreadSelf);
|
---|
713 | Assert(pvUser);
|
---|
714 | VirtualBoxClient *pThis = (VirtualBoxClient *)pvUser;
|
---|
715 | RTSEMEVENT sem = pThis->mData.m_SemEvWatcher;
|
---|
716 | RTMSINTERVAL cMillies = VBOXCLIENT_DEFAULT_INTERVAL;
|
---|
717 |
|
---|
718 | /* The likelihood of early crashes are high, so start with a short wait. */
|
---|
719 | int vrc = RTSemEventWait(sem, cMillies / 2);
|
---|
720 |
|
---|
721 | /* As long as the waiting times out keep retrying the wait. */
|
---|
722 | while (RT_FAILURE(vrc))
|
---|
723 | {
|
---|
724 | {
|
---|
725 | HRESULT hrc = S_OK;
|
---|
726 | ComPtr<IVirtualBox> pV;
|
---|
727 | {
|
---|
728 | AutoReadLock alock(pThis COMMA_LOCKVAL_SRC_POS);
|
---|
729 | pV = pThis->mData.m_pVirtualBox;
|
---|
730 | }
|
---|
731 | if (!pV.isNull())
|
---|
732 | {
|
---|
733 | ULONG rev;
|
---|
734 | hrc = pV->COMGETTER(Revision)(&rev);
|
---|
735 | if (FAILED_DEAD_INTERFACE(hrc))
|
---|
736 | {
|
---|
737 | LogRel(("VirtualBoxClient: detected unresponsive VBoxSVC (hrc=%Rhrc)\n", hrc));
|
---|
738 | {
|
---|
739 | AutoWriteLock alock(pThis COMMA_LOCKVAL_SRC_POS);
|
---|
740 | /* Throw away the VirtualBox reference, it's no longer
|
---|
741 | * usable as VBoxSVC terminated in the mean time. */
|
---|
742 | pThis->mData.m_pVirtualBox.setNull();
|
---|
743 | }
|
---|
744 | ::FireVBoxSVCAvailabilityChangedEvent(pThis->mData.m_pEventSource, FALSE);
|
---|
745 | }
|
---|
746 | }
|
---|
747 | else
|
---|
748 | {
|
---|
749 | /* Try to get a new VirtualBox reference straight away, and if
|
---|
750 | * this fails use an increased waiting time as very frequent
|
---|
751 | * restart attempts in some wedged config can cause high CPU
|
---|
752 | * and disk load. */
|
---|
753 | ComPtr<IVirtualBox> pVirtualBox;
|
---|
754 | ComPtr<IToken> pToken;
|
---|
755 | hrc = pVirtualBox.createLocalObject(CLSID_VirtualBox);
|
---|
756 | if (FAILED(hrc))
|
---|
757 | cMillies = 3 * VBOXCLIENT_DEFAULT_INTERVAL;
|
---|
758 | else
|
---|
759 | {
|
---|
760 | LogRel(("VirtualBoxClient: detected working VBoxSVC (hrc=%Rhrc)\n", hrc));
|
---|
761 | {
|
---|
762 | AutoWriteLock alock(pThis COMMA_LOCKVAL_SRC_POS);
|
---|
763 | /* Update the VirtualBox reference, there's a working
|
---|
764 | * VBoxSVC again from now on. */
|
---|
765 | pThis->mData.m_pVirtualBox = pVirtualBox;
|
---|
766 | pThis->mData.m_pToken = pToken;
|
---|
767 | #ifdef VBOX_WITH_MAIN_NLS
|
---|
768 | /* update language using new instance of IVirtualBox in case the language settings was changed */
|
---|
769 | pThis->i_reloadApiLanguage();
|
---|
770 | pThis->i_registerEventListener();
|
---|
771 | #endif
|
---|
772 | }
|
---|
773 | ::FireVBoxSVCAvailabilityChangedEvent(pThis->mData.m_pEventSource, TRUE);
|
---|
774 | cMillies = VBOXCLIENT_DEFAULT_INTERVAL;
|
---|
775 | }
|
---|
776 | }
|
---|
777 | }
|
---|
778 | vrc = RTSemEventWait(sem, cMillies);
|
---|
779 | }
|
---|
780 | return 0;
|
---|
781 | }
|
---|
782 |
|
---|
783 | #ifdef VBOX_WITH_MAIN_NLS
|
---|
784 |
|
---|
785 | HRESULT VirtualBoxClient::i_reloadApiLanguage()
|
---|
786 | {
|
---|
787 | if (mData.m_pVBoxTranslator == NULL)
|
---|
788 | return S_OK;
|
---|
789 |
|
---|
790 | HRESULT hrc = mData.m_pVBoxTranslator->loadLanguage(mData.m_pVirtualBox);
|
---|
791 | if (FAILED(hrc))
|
---|
792 | setError(hrc, tr("Failed to load user language instance"));
|
---|
793 | return hrc;
|
---|
794 | }
|
---|
795 |
|
---|
796 | HRESULT VirtualBoxClient::i_registerEventListener()
|
---|
797 | {
|
---|
798 | HRESULT hrc = mData.m_pVirtualBox->COMGETTER(EventSource)(mData.m_pVBoxEventSource.asOutParam());
|
---|
799 | if (SUCCEEDED(hrc))
|
---|
800 | {
|
---|
801 | ComObjPtr<VBoxEventListenerImpl> pVBoxListener;
|
---|
802 | pVBoxListener.createObject();
|
---|
803 | pVBoxListener->init(new VBoxEventListener());
|
---|
804 | mData.m_pVBoxEventListener = pVBoxListener;
|
---|
805 | com::SafeArray<VBoxEventType_T> eventTypes;
|
---|
806 | eventTypes.push_back(VBoxEventType_OnLanguageChanged);
|
---|
807 | hrc = mData.m_pVBoxEventSource->RegisterListener(pVBoxListener, ComSafeArrayAsInParam(eventTypes), true);
|
---|
808 | if (FAILED(hrc))
|
---|
809 | {
|
---|
810 | hrc = setError(hrc, tr("Failed to register listener"));
|
---|
811 | mData.m_pVBoxEventListener.setNull();
|
---|
812 | mData.m_pVBoxEventSource.setNull();
|
---|
813 | }
|
---|
814 | }
|
---|
815 | else
|
---|
816 | hrc = setError(hrc, tr("Failed to get event source from VirtualBox"));
|
---|
817 | return hrc;
|
---|
818 | }
|
---|
819 |
|
---|
820 | void VirtualBoxClient::i_unregisterEventListener()
|
---|
821 | {
|
---|
822 | if (mData.m_pVBoxEventListener.isNotNull())
|
---|
823 | {
|
---|
824 | if (mData.m_pVBoxEventSource.isNotNull())
|
---|
825 | mData.m_pVBoxEventSource->UnregisterListener(mData.m_pVBoxEventListener);
|
---|
826 | mData.m_pVBoxEventListener.setNull();
|
---|
827 | }
|
---|
828 | mData.m_pVBoxEventSource.setNull();
|
---|
829 | }
|
---|
830 |
|
---|
831 | #endif /* VBOX_WITH_MAIN_NLS */
|
---|
832 |
|
---|
833 | /* vi: set tabstop=4 shiftwidth=4 expandtab: */
|
---|