VirtualBox

source: vbox/trunk/src/VBox/Additions/WINNT/VBoxTray/VBoxLA.cpp@ 62193

Last change on this file since 62193 was 57741, checked in by vboxsync, 9 years ago

Additions/VBoxTray:

  • Refactored internal services to use the RTThread API.
  • First take on cleaning up VBoxTray, separating the services more and more. See @todos.
  • Updated some code areas where deprecated APIs were used.
  • A lot of log formatting fixes and renaming.
  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 41.0 KB
Line 
1/* $Id: VBoxLA.cpp 57741 2015-09-14 15:24:42Z vboxsync $ */
2/** @file
3 * VBoxLA - VBox Location Awareness notifications.
4 */
5
6/*
7 * Copyright (C) 2014-2015 Oracle Corporation
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#define _WIN32_WINNT 0x0501
18#include <windows.h>
19
20#include "VBoxTray.h"
21#include "VBoxLA.h"
22
23#include <iprt/assert.h>
24#include <iprt/alloc.h>
25#include <iprt/list.h>
26#include <iprt/ldr.h>
27
28#ifdef DEBUG
29# define LOG_ENABLED
30# define LOG_GROUP LOG_GROUP_DEFAULT
31#endif
32#include <VBox/log.h>
33
34
35
36#define REG_KEY_LEN 1024
37#define MAX_CLIENT_NAME_CHARS 1024
38
39#define LA_DO_NOTHING 0
40#define LA_DO_ATTACH 1
41#define LA_DO_DETACH 2
42#define LA_DO_DETACH_AND_ATTACH 3
43#define LA_DO_ATTACH_AND_DETACH 4
44
45
46#define LA_UTCINFO_CLIENT_NAME 0
47#define LA_UTCINFO_CLIENT_IPADDR 1
48#define LA_UTCINFO_CLIENT_LOCATION 2
49#define LA_UTCINFO_CLIENT_OTHERINFO 3
50#define LA_UTCINFO_CLIENT_INFO_LAST 3
51
52#define LA_UTCINFO_PROP_NAME 0
53#define LA_UTCINFO_PROP_VALUE 1
54
55
56typedef struct _VBOXLACONTEXT
57{
58 const VBOXSERVICEENV *pEnv;
59
60 bool fLogEnabled;
61 bool fDetachOnDisconnect;
62
63 uint32_t u32GuestPropHandle; /* The client identifier of the guest property system. */
64
65 RTLISTANCHOR listAttachActions;
66 RTLISTANCHOR listDetachActions;
67
68 uint64_t u64LastQuery; /* The timestamp of the last query of the properties. */
69
70 uint32_t u32Action; /* Which action to do: LA_DO_*. */
71 uint32_t u32PrevAction; /* Which action were done last time. */
72
73 struct /* Information about the client, which properties are monitored. */
74 {
75 uint32_t u32ClientId; /* The RDP client identifier. 0 if none. */
76
77 uint32_t u32LastAttach;
78 uint64_t u64LastAttachTimestamp;
79
80 char *pszLastName;
81 uint64_t u64LastNameTimestamp;
82
83 char *pszPropName; /* The actual Client/%ID%/Name property name with client id. */
84 char *pszPropIPAddr; /* The actual Client/%ID%/IPAddr property name with client id. */
85 char *pszPropLocation; /* The actual Client/%ID%/Location property name with client id. */
86 char *pszPropOtherInfo; /* The actual Client/%ID%/OtherInfo property name with client id. */
87
88 char *pszPropAttach; /* The actual Client/%ID%/Attach property name with client id. */
89
90 char *pszPropWaitPattern; /* Which properties are monitored. */
91 } activeClient;
92
93 BOOL (WINAPI * pfnProcessIdToSessionId)(DWORD dwProcessId, DWORD *pSessionId);
94} VBOXLACONTEXT, *PVBOXLACONTEXT;
95
96typedef struct _ACTIONENTRY
97{
98 RTLISTNODE nodeActionEntry;
99 uint32_t u32Index;
100 WCHAR wszCommandLine[1];
101} ACTIONENTRY, *PACTIONENTRY;
102
103
104static VBOXLACONTEXT g_Ctx = { 0 };
105
106static const char *g_pszPropActiveClient = "/VirtualBox/HostInfo/VRDP/ActiveClient";
107
108static const char *g_pszPropAttachTemplate = "/VirtualBox/HostInfo/VRDP/Client/%u/Attach";
109
110static const char *g_pszVolatileEnvironment = "Volatile Environment";
111
112static const WCHAR *g_pwszClientName = L"CLIENTNAME";
113
114static const WCHAR *g_pwszUTCINFOClientInfo[] = {
115 L"UTCINFO_CLIENTNAME",
116 L"UTCINFO_CLIENTIPA",
117 L"UTCINFO_CLIENTLOCATION",
118 L"UTCINFO_CLIENTOTHERINFO"
119 };
120
121static const char *g_pszPropInfoTemplates[] = {
122 "/VirtualBox/HostInfo/VRDP/Client/%u/Name",
123 "/VirtualBox/HostInfo/VRDP/Client/%u/IPAddr",
124 "/VirtualBox/HostInfo/VRDP/Client/%u/Location",
125 "/VirtualBox/HostInfo/VRDP/Client/%u/OtherInfo"
126 };
127
128#ifdef RT_ARCH_AMD64
129const WCHAR *g_pwszRegKeyDisconnectActions = L"Software\\Wow6432Node\\Oracle\\Sun Ray\\ClientInfoAgent\\DisconnectActions";
130const WCHAR *g_pwszRegKeyReconnectActions = L"Software\\Wow6432Node\\Oracle\\Sun Ray\\ClientInfoAgent\\ReconnectActions";
131#else
132const WCHAR *g_pwszRegKeyDisconnectActions = L"Software\\Oracle\\Sun Ray\\ClientInfoAgent\\DisconnectActions";
133const WCHAR *g_pwszRegKeyReconnectActions = L"Software\\Oracle\\Sun Ray\\ClientInfoAgent\\ReconnectActions";
134#endif /* !RT_ARCH_AMD64 */
135
136const char g_szCommandPrefix[] = "Command";
137
138static BOOL laGetRegistryDWORD(WCHAR *pwszRegKey, WCHAR *pwszName, DWORD *pdwValue)
139{
140 LONG lErr;
141
142 HKEY hKey;
143 lErr = RegOpenKeyExW(HKEY_LOCAL_MACHINE,
144 pwszRegKey,
145 0,
146 KEY_QUERY_VALUE,
147 &hKey);
148
149 if (lErr != ERROR_SUCCESS)
150 {
151 LogRel(("LA: RegOpenKeyExW: failed [%ls]\n",
152 pwszRegKey));
153 return FALSE;
154 }
155
156 DWORD nRegData = sizeof(DWORD);
157 DWORD dwType = 0;
158 lErr = RegQueryValueExW(hKey,
159 pwszName,
160 NULL,
161 &dwType,
162 (BYTE *)pdwValue,
163 &nRegData);
164
165 if (lErr != ERROR_SUCCESS)
166 {
167 LogRel(("LA: RegQueryValueExW: failed [%ls/%ls]\n",
168 pwszRegKey, pwszName));
169 RegCloseKey(hKey);
170 return FALSE;
171 }
172
173 if (nRegData != sizeof(DWORD))
174 {
175 LogRel(("LA: buffer overflow reg %d, [%ls]\n",
176 nRegData, pwszRegKey));
177 RegCloseKey(hKey);
178 return FALSE;
179 }
180
181 if (dwType != REG_DWORD)
182 {
183 LogRel(("LA: wrong type %d, [%ls/%ls]\n",
184 dwType, pwszRegKey, pwszName));
185 RegCloseKey(hKey);
186 return FALSE;
187 }
188
189 RegCloseKey(hKey);
190
191 if (lErr != ERROR_SUCCESS)
192 {
193 return FALSE;
194 }
195
196 return TRUE;
197}
198
199static void ActionExecutorDeleteActions(RTLISTANCHOR *listActions)
200{
201 ACTIONENTRY *pIter = NULL;
202 ACTIONENTRY *pIterNext = NULL;
203 RTListForEachSafe(listActions, pIter, pIterNext, ACTIONENTRY, nodeActionEntry)
204 {
205 RTListNodeRemove(&pIter->nodeActionEntry);
206 RTMemFree(pIter);
207 }
208}
209
210static BOOL ActionExecutorEnumerateRegistryKey(const WCHAR *pwszRegKey,
211 RTLISTANCHOR *listActions)
212{
213 BOOL bRet = TRUE;
214 HKEY hKey;
215 DWORD dwErr;
216
217 dwErr = RegOpenKeyExW(HKEY_LOCAL_MACHINE,
218 pwszRegKey,
219 0,
220 KEY_QUERY_VALUE,
221 &hKey);
222
223 if (dwErr != ERROR_SUCCESS)
224 {
225 LogFlowFunc(("Can't open registry key [%ls], error %d\n",
226 pwszRegKey, dwErr));
227 return FALSE;
228 }
229
230 DWORD dwIndex = 0;
231
232 for (;;)
233 {
234 DWORD dwRet;
235
236 WCHAR wszValueName[256];
237 DWORD cchValueName = RT_ELEMENTS(wszValueName);
238 DWORD type;
239 BYTE abData[1024];
240 DWORD cbData = sizeof(abData);
241
242 dwRet = RegEnumValueW(hKey,
243 dwIndex++,
244 wszValueName,
245 &cchValueName,
246 NULL,
247 &type,
248 abData,
249 &cbData);
250
251 if (dwRet == ERROR_NO_MORE_ITEMS)
252 {
253 LogFlowFunc(("Enumeration exhausted\n"));
254 bRet = TRUE;
255 break;
256 }
257 else if (dwRet != ERROR_SUCCESS)
258 {
259 LogFlowFunc(("Enumeration failed, error %d\n",
260 dwRet));
261 bRet = FALSE;
262 break;
263 }
264
265 if ((type != REG_SZ) && (type != REG_EXPAND_SZ))
266 {
267 LogFlowFunc(("skipped type %d\n",
268 type));
269 continue;
270 }
271
272 char szName[256];
273 char *pszName = &szName[0];
274 int rc = RTUtf16ToUtf8Ex(wszValueName,
275 RT_ELEMENTS(wszValueName),
276 &pszName, sizeof(szName), NULL);
277 if (RT_FAILURE(rc))
278 {
279 LogFlowFunc(("RTUtf16ToUtf8Ex for [%ls] rc %Rrc\n",
280 wszValueName, rc));
281 continue;
282 }
283
284 /* Check if the name starts with "Command" */
285 if (RTStrNICmp(szName, g_szCommandPrefix, RT_ELEMENTS(g_szCommandPrefix) - 1) != 0)
286 {
287 LogFlowFunc(("skipped prefix %s\n",
288 szName));
289 continue;
290 }
291
292 char *pszIndex = &szName[RT_ELEMENTS(g_szCommandPrefix) - 1];
293
294 uint32_t nIndex = RTStrToUInt32(pszIndex);
295 if (nIndex == 0)
296 {
297 LogFlowFunc(("skipped index %s\n",
298 szName));
299 continue;
300 }
301
302 /* Allocate with terminating nul after data. */
303 ACTIONENTRY *pEntry = (ACTIONENTRY *)RTMemAlloc(sizeof(ACTIONENTRY) + cbData);
304 if (!pEntry)
305 {
306 LogFlowFunc(("RTMemAlloc failed\n"));
307 bRet = FALSE;
308 break;
309 }
310
311 RT_ZERO(pEntry->nodeActionEntry);
312 pEntry->u32Index = nIndex;
313 memcpy(pEntry->wszCommandLine, abData, cbData);
314 pEntry->wszCommandLine[cbData / sizeof(WCHAR)] = 0;
315
316 /* Insert the new entry to the list. Sort by index. */
317 if (RTListIsEmpty(listActions))
318 {
319 RTListAppend(listActions, &pEntry->nodeActionEntry);
320 }
321 else
322 {
323 bool fAdded = false;
324 ACTIONENTRY *pIter = NULL;
325 RTListForEach(listActions, pIter, ACTIONENTRY, nodeActionEntry)
326 {
327 if (pIter->u32Index > nIndex)
328 {
329 RTListNodeInsertBefore(&pIter->nodeActionEntry, &pEntry->nodeActionEntry);
330 fAdded = true;
331 break;
332 }
333 }
334 if (!fAdded)
335 {
336 RTListAppend(listActions, &pEntry->nodeActionEntry);
337 }
338 }
339
340 LogFlowFunc(("added %d %ls\n",
341 pEntry->u32Index, pEntry->wszCommandLine));
342 }
343
344 RegCloseKey(hKey);
345
346#ifdef LOG_ENABLED
347 ACTIONENTRY *pIter = NULL;
348 RTListForEach(listActions, pIter, ACTIONENTRY, nodeActionEntry)
349 {
350 LogFlowFunc(("[%u]: [%ls]\n",
351 pIter->u32Index, pIter->wszCommandLine));
352 }
353#endif
354
355 if (!bRet)
356 {
357 ActionExecutorDeleteActions(listActions);
358 }
359
360 LogFlowFunc(("action enum %d\n",
361 bRet));
362
363 return bRet;
364}
365
366static void ActionExecutorExecuteActions(RTLISTANCHOR *listActions)
367{
368 LogFlowFunc(("ExecuteActions\n"));
369
370 ACTIONENTRY *pIter = NULL;
371 RTListForEach(listActions, pIter, ACTIONENTRY, nodeActionEntry)
372 {
373 LogFlowFunc(("[%u]: [%ls]\n",
374 pIter->u32Index, pIter->wszCommandLine));
375
376 STARTUPINFOW si;
377 PROCESS_INFORMATION pi;
378
379 GetStartupInfoW(&si);
380
381 if (!CreateProcessW(NULL, // lpApplicationName
382 pIter->wszCommandLine, // lpCommandLine
383 NULL, // lpProcessAttributes
384 NULL, // lpThreadAttributes
385 FALSE, // bInheritHandles
386 0, // dwCreationFlags
387 NULL, // lpEnvironment
388 NULL, // lpCurrentDirectory
389 &si, // lpStartupInfo
390 &pi)) // lpProcessInformation
391 {
392 LogFlowFunc(("Executing [%ls] failed, error %d\n",
393 pIter->wszCommandLine, GetLastError()));
394 }
395 else
396 {
397 LogFlowFunc(("Executing [%ls] succeeded\n",
398 pIter->wszCommandLine));
399
400 /* Don't care about waiting on the new process, so close these. */
401 CloseHandle(pi.hProcess);
402 CloseHandle(pi.hThread);
403 }
404 }
405
406 LogFlowFunc(("ExecuteActions leave\n"));
407}
408
409static BOOL GetVolatileEnvironmentKey(PVBOXLACONTEXT pCtx, WCHAR *pwszRegKey, DWORD cbRegKey)
410{
411 BOOL fFound = FALSE;
412
413 DWORD nSessionID;
414 LONG lErr;
415 HKEY hKey;
416 char szRegKey[REG_KEY_LEN];
417
418 /* Attempt to open HKCU\Volatile Environment\<session ID> first. */
419 if ( pCtx->pfnProcessIdToSessionId
420 && pCtx->pfnProcessIdToSessionId(GetCurrentProcessId(), &nSessionID))
421 {
422 RTStrPrintf(szRegKey, sizeof(szRegKey),
423 "%s\\%d",
424 g_pszVolatileEnvironment, nSessionID);
425
426 lErr = RegOpenKeyExA(HKEY_CURRENT_USER,
427 szRegKey,
428 0,
429 KEY_SET_VALUE,
430 &hKey);
431
432 if (lErr == ERROR_SUCCESS)
433 {
434 RegCloseKey(hKey);
435 fFound = TRUE;
436 }
437 }
438
439 if (!fFound)
440 {
441 /* Fall back to HKCU\Volatile Environment. */
442 RTStrPrintf(szRegKey, sizeof(szRegKey),
443 "%s",
444 g_pszVolatileEnvironment);
445
446 lErr = RegOpenKeyExA(HKEY_CURRENT_USER,
447 szRegKey,
448 0,
449 KEY_SET_VALUE,
450 &hKey);
451
452 if (lErr == ERROR_SUCCESS)
453 {
454 RegCloseKey(hKey);
455 fFound = TRUE;
456 }
457 }
458
459 if (fFound)
460 {
461 LogFlowFunc(("GetVolatileEnvironmentKey: [%s]\n", szRegKey));
462
463 /* Convert szRegKey to Utf16 string. */
464 PRTUTF16 putf16Unicode = pwszRegKey;
465 size_t cchUnicode = cbRegKey / sizeof(WCHAR);
466
467 int rc = RTStrToUtf16Ex(szRegKey, RTSTR_MAX,
468 &putf16Unicode, cchUnicode, NULL);
469 if (RT_FAILURE(rc))
470 {
471 LogFlowFunc(("RTStrToUtf16Ex failed %Rrc\n", rc));
472 fFound = FALSE;
473 }
474 else
475 {
476 LogFlowFunc(("unicode [%ls]\n", putf16Unicode));
477 }
478 }
479 else
480 {
481 LogFlowFunc(("GetVolatileEnvironmentKey: not found\n"));
482 }
483
484 return fFound;
485}
486
487static BOOL laGetUtcInfoClientName(PVBOXLACONTEXT pCtx, WCHAR *pwszClientName, DWORD cbClientName)
488{
489 LONG lErr;
490
491 WCHAR wszRegKey[REG_KEY_LEN];
492 if (!GetVolatileEnvironmentKey(pCtx, wszRegKey, sizeof(wszRegKey)))
493 {
494 return FALSE;
495 }
496
497 HKEY hKey;
498 lErr = RegOpenKeyExW(HKEY_CURRENT_USER,
499 wszRegKey,
500 0,
501 KEY_QUERY_VALUE,
502 &hKey);
503
504 if (lErr != ERROR_SUCCESS)
505 {
506 LogFlowFunc(("RegOpenKeyExW: failed [%ls]\n",
507 wszRegKey));
508 return FALSE;
509 }
510
511 DWORD nRegData;
512 DWORD dwType;
513 lErr = RegQueryValueExW(hKey,
514 g_pwszUTCINFOClientInfo[LA_UTCINFO_CLIENT_NAME],
515 NULL,
516 &dwType,
517 NULL,
518 &nRegData);
519
520 if (lErr != ERROR_SUCCESS)
521 {
522 LogFlowFunc(("RegQueryValueExW: failed [%ls]\n",
523 wszRegKey));
524 RegCloseKey(hKey);
525 return FALSE;
526 }
527
528 if (nRegData >= cbClientName)
529 {
530 LogFlowFunc(("buffer overflow reg %d, buffer %d, [%ls]\n",
531 nRegData, cbClientName, wszRegKey));
532 RegCloseKey(hKey);
533 return FALSE;
534 }
535
536 if (dwType != REG_SZ)
537 {
538 LogFlowFunc(("wrong type %d, [%ls]\n",
539 dwType, wszRegKey));
540 RegCloseKey(hKey);
541 return FALSE;
542 }
543
544 ZeroMemory(pwszClientName, cbClientName);
545
546 lErr = RegQueryValueExW(hKey,
547 g_pwszUTCINFOClientInfo[LA_UTCINFO_CLIENT_NAME],
548 NULL,
549 NULL,
550 (BYTE *)pwszClientName,
551 &nRegData);
552
553 RegCloseKey(hKey);
554
555 if (lErr != ERROR_SUCCESS)
556 {
557 return FALSE;
558 }
559
560 return TRUE;
561}
562
563static BOOL laSetClientName(PVBOXLACONTEXT pCtx, const WCHAR *pwszClientName)
564{
565 LONG lErr;
566
567 WCHAR wszRegKey[REG_KEY_LEN];
568 if (!GetVolatileEnvironmentKey(pCtx, wszRegKey, sizeof(wszRegKey)))
569 {
570 return FALSE;
571 }
572
573 HKEY hKey;
574 lErr = RegOpenKeyExW(HKEY_CURRENT_USER,
575 wszRegKey,
576 0,
577 KEY_SET_VALUE,
578 &hKey);
579
580 if (lErr != ERROR_SUCCESS)
581 {
582 return FALSE;
583 }
584
585 DWORD nClientName = (lstrlenW(pwszClientName) + 1) * sizeof(WCHAR);
586 lErr = RegSetValueExW(hKey,
587 g_pwszClientName,
588 0,
589 REG_SZ,
590 (BYTE*)pwszClientName,
591 nClientName);
592
593 RegCloseKey(hKey);
594
595 if (lErr != ERROR_SUCCESS)
596 {
597 return FALSE;
598 }
599
600 return TRUE;
601}
602
603static void laBroadcastSettingChange(void)
604{
605 DWORD_PTR dwResult;
606
607 if (SendMessageTimeoutA(HWND_BROADCAST,
608 WM_SETTINGCHANGE,
609 NULL,
610 (LPARAM)"Environment",
611 SMTO_ABORTIFHUNG,
612 5000,
613 &dwResult) == 0)
614 {
615 LogFlowFunc(("SendMessageTimeout failed, error %ld\n", GetLastError()));
616 }
617}
618
619static void laUpdateClientName(PVBOXLACONTEXT pCtx)
620{
621 WCHAR wszUtcInfoClientName[MAX_CLIENT_NAME_CHARS];
622
623 if (laGetUtcInfoClientName(pCtx, wszUtcInfoClientName, sizeof(wszUtcInfoClientName)))
624 {
625 if (laSetClientName(pCtx, wszUtcInfoClientName))
626 laBroadcastSettingChange();
627 }
628}
629
630static void laOnClientLocationInfo(PVBOXLACONTEXT pCtx, char *pszClientInfo[][2])
631{
632 /*
633 * Write the client location info to:
634 * HKCU\Volatile Environment\<CLIENT_LOCATION_INFO> or
635 * HKCU\Volatile Environment\<SessionID>\<CLIENT_LOCATION_INFO>
636 * depending on whether this is a Terminal Services or desktop session
637 * respectively.
638 * The client location info are: Name, IPAddr, Location, OtherInfo
639 */
640 unsigned int idx;
641 WCHAR wszRegKey[REG_KEY_LEN];
642 if (!GetVolatileEnvironmentKey(pCtx, wszRegKey, sizeof(wszRegKey)))
643 {
644 LogFlowFunc(("Failed to get 'Volatile Environment' registry key\n"));
645 return;
646 }
647
648 /* Now write the client name under the appropriate key. */
649 LONG lRet;
650 HKEY hKey;
651
652 lRet = RegOpenKeyExW(HKEY_CURRENT_USER,
653 wszRegKey,
654 0,
655 KEY_SET_VALUE,
656 &hKey);
657
658 if (lRet != ERROR_SUCCESS)
659 {
660 LogFlowFunc(("Failed to open key [%ls], error %lu\n", wszRegKey, lRet));
661 return;
662 }
663
664 PRTUTF16 putf16UnicodeClientInfo[LA_UTCINFO_CLIENT_INFO_LAST + 1] = {NULL};
665 for (idx = 0; idx <= LA_UTCINFO_CLIENT_INFO_LAST; idx++)
666 {
667 if (pszClientInfo[idx][LA_UTCINFO_PROP_VALUE] == NULL)
668 break;
669
670 /* pszClientInfo is UTF8, make an Unicode copy for registry. */
671 size_t cchUnicodeClientInfo = 0;
672
673 int rc = RTStrToUtf16Ex(pszClientInfo[idx][LA_UTCINFO_PROP_VALUE], MAX_CLIENT_NAME_CHARS,
674 &putf16UnicodeClientInfo[idx], 0, &cchUnicodeClientInfo);
675
676 if (RT_FAILURE(rc))
677 {
678 LogFlowFunc(("RTStrToUniEx failed %Rrc\n", rc));
679 break;
680 }
681
682 DWORD nDataLength = (DWORD)((cchUnicodeClientInfo + 1) * sizeof(WCHAR));
683 lRet = RegSetValueExW(hKey,
684 g_pwszUTCINFOClientInfo[idx],
685 0,
686 REG_SZ,
687 (BYTE *)putf16UnicodeClientInfo[idx],
688 nDataLength);
689
690 if (lRet != ERROR_SUCCESS)
691 {
692 LogFlowFunc(("RegSetValueExW failed error %lu for %s \n", lRet, g_pwszUTCINFOClientInfo[idx]));
693 }
694 }
695
696 RegCloseKey(hKey);
697
698 laBroadcastSettingChange();
699
700 /* Also, write these info (Name, IPAddr, Location and Other Info) to the environment of this process, as it
701 * doesn't listen for WM_SETTINGCHANGE messages.
702 */
703
704 for (idx = 0; idx <= LA_UTCINFO_CLIENT_INFO_LAST; idx++)
705 {
706 if (putf16UnicodeClientInfo[idx] == NULL)
707 break;
708
709 SetEnvironmentVariableW(g_pwszUTCINFOClientInfo[idx], putf16UnicodeClientInfo[idx]);
710
711 RTUtf16Free(putf16UnicodeClientInfo[idx]);
712 }
713}
714
715static void laDoAttach(PVBOXLACONTEXT pCtx)
716{
717 LogFlowFunc(("laDoAttach\n"));
718
719 /* Hardcoded action. */
720 laUpdateClientName(pCtx);
721
722 /* Process configured actions. */
723 ActionExecutorExecuteActions(&pCtx->listAttachActions);
724}
725
726static void laDoDetach(PVBOXLACONTEXT pCtx)
727{
728 LogFlowFunc(("laDoDetach\n"));
729
730 /* Process configured actions. */
731 ActionExecutorExecuteActions(&pCtx->listDetachActions);
732}
733
734static int laGetProperty(uint32_t u32GuestPropHandle, const char *pszName, uint64_t *pu64Timestamp, char **ppszValue)
735{
736 int rc = VINF_SUCCESS;
737
738 /* The buffer for storing the data and its initial size. We leave a bit
739 * of space here in case the maximum values are raised.
740 */
741 uint32_t cbBuf = 1024;
742 void *pvBuf = NULL;
743
744 /* Because there is a race condition between our reading the size of a
745 * property and the guest updating it, we loop a few times here and
746 * hope. Actually this should never go wrong, as we are generous
747 * enough with buffer space.
748 */
749 unsigned i;
750 for (i = 0; i < 3; ++i)
751 {
752 void *pvTmpBuf = RTMemRealloc(pvBuf, cbBuf);
753 if (pvTmpBuf == NULL)
754 {
755 rc = VERR_NO_MEMORY;
756 break;
757 }
758
759 pvBuf = pvTmpBuf;
760
761 rc = VbglR3GuestPropRead(u32GuestPropHandle, pszName, pvBuf, cbBuf,
762 NULL, pu64Timestamp, NULL,
763 &cbBuf);
764 if (rc != VERR_BUFFER_OVERFLOW)
765 {
766 break;
767 }
768
769 cbBuf += 1024;
770 }
771
772 if (RT_SUCCESS(rc))
773 {
774 LogFlowFunc(("laGetProperty: [%s]\n"
775 " value: [%s]\n"
776 " timestamp: %lld ns\n",
777 pszName, (char *)pvBuf, *pu64Timestamp));
778
779 *ppszValue = (char *)pvBuf;
780 }
781 else if (rc == VERR_NOT_FOUND)
782 {
783 LogFlowFunc(("laGetProperty: not found [%s]\n", pszName));
784 RTMemFree(pvBuf);
785 }
786 else
787 {
788 LogFlowFunc(("Failed to retrieve the property value, error %Rrc\n", rc));
789 RTMemFree(pvBuf);
790 }
791
792 return rc;
793}
794
795static int laWaitProperties(uint32_t u32GuestPropHandle,
796 const char *pszPatterns,
797 uint64_t u64LastTimestamp,
798 uint64_t *pu64Timestamp,
799 uint32_t u32Timeout)
800{
801 int rc = VINF_SUCCESS;
802
803 /* The buffer for storing the data and its initial size. We leave a bit
804 * of space here in case the maximum values are raised.
805 */
806 void *pvBuf = NULL;
807 uint32_t cbBuf = 4096;
808
809 /* Because there is a race condition between our reading the size of a
810 * property and the guest updating it, we loop a few times here and
811 * hope. Actually this should never go wrong, as we are generous
812 * enough with buffer space.
813 */
814 unsigned i;
815 for (i = 0; i < 3; ++i)
816 {
817 void *pvTmpBuf = RTMemRealloc(pvBuf, cbBuf);
818 if (NULL == pvTmpBuf)
819 {
820 rc = VERR_NO_MEMORY;
821 break;
822 }
823
824 pvBuf = pvTmpBuf;
825
826 rc = VbglR3GuestPropWait(u32GuestPropHandle, pszPatterns, pvBuf, cbBuf,
827 u64LastTimestamp, u32Timeout,
828 NULL /* ppszName */,
829 NULL /* ppszValue */,
830 pu64Timestamp,
831 NULL /* ppszFlags */,
832 &cbBuf);
833
834 if (rc != VERR_BUFFER_OVERFLOW)
835 break;
836
837 cbBuf += 1024;
838 }
839
840 RTMemFree(pvBuf);
841
842 return rc;
843}
844
845static int laGetUint32(uint32_t u32GuestPropHandle, const char *pszName, uint64_t *pu64Timestamp, uint32_t *pu32Value)
846{
847 uint64_t u64Timestamp = 0;
848 char *pszValue = NULL;
849
850 int rc = laGetProperty(u32GuestPropHandle,
851 pszName,
852 &u64Timestamp,
853 &pszValue);
854 if (RT_SUCCESS(rc))
855 {
856 if (pszValue && *pszValue)
857 {
858 uint32_t u32 = 0;
859 rc = RTStrToUInt32Full(pszValue, 10, &u32);
860
861 if (RT_SUCCESS(rc))
862 {
863 *pu64Timestamp = u64Timestamp;
864 *pu32Value = u32;
865 }
866 }
867 else
868 {
869 rc = VERR_NOT_SUPPORTED;
870 }
871 }
872
873 if (pszValue)
874 RTMemFree(pszValue);
875
876 LogFlowFunc(("laGetUint32: rc = %Rrc, [%s]\n", rc, pszName));
877 return rc;
878}
879
880static int laGetString(uint32_t u32GuestPropHandle, const char *pszName, uint64_t *pu64Timestamp, char **ppszValue)
881{
882 int rc = laGetProperty(u32GuestPropHandle,
883 pszName,
884 pu64Timestamp,
885 ppszValue);
886
887 LogFlowFunc(("laGetString: rc = %Rrc, [%s]\n", rc, pszName));
888 return rc;
889}
890
891static int laGetActiveClient(PVBOXLACONTEXT pCtx, uint64_t *pu64Timestamp, uint32_t *pu32Value)
892{
893 int rc = laGetUint32(pCtx->u32GuestPropHandle,
894 g_pszPropActiveClient,
895 pu64Timestamp,
896 pu32Value);
897
898 LogFlowFunc(("laGetActiveClient: rc %Rrc, %RU32, %RU64\n", rc, *pu32Value, *pu64Timestamp));
899 return rc;
900}
901
902static int laUpdateCurrentState(PVBOXLACONTEXT pCtx, uint32_t u32ActiveClientId, uint64_t u64ActiveClientTS)
903{
904 /* Prepare the current state for the active client.
905 * If u32ActiveClientId is 0, then there is no connected clients.
906 */
907 LogFlowFunc(("laUpdateCurrentState: %RU32 %RU64\n", u32ActiveClientId, u64ActiveClientTS));
908
909 int rc = VINF_SUCCESS;
910
911 int l;
912
913 char **pClientInfoMap[LA_UTCINFO_CLIENT_INFO_LAST + 1] = {
914 &pCtx->activeClient.pszPropName,
915 &pCtx->activeClient.pszPropIPAddr,
916 &pCtx->activeClient.pszPropLocation,
917 &pCtx->activeClient.pszPropOtherInfo,
918 };
919
920 pCtx->activeClient.u32LastAttach = ~0;
921 pCtx->activeClient.u64LastAttachTimestamp = u64ActiveClientTS;
922
923 if (pCtx->activeClient.pszLastName)
924 {
925 RTMemFree(pCtx->activeClient.pszLastName);
926 }
927 pCtx->activeClient.pszLastName = NULL;
928 pCtx->activeClient.u64LastNameTimestamp = u64ActiveClientTS;
929
930 unsigned int idx;
931
932 for (idx = 0; idx <= LA_UTCINFO_CLIENT_INFO_LAST; idx++)
933 {
934 if (*pClientInfoMap[idx])
935 {
936 RTMemFree(*pClientInfoMap[idx]);
937 *pClientInfoMap[idx] = NULL;
938 }
939
940 if (u32ActiveClientId != 0)
941 {
942 l = RTStrAPrintf(pClientInfoMap[idx],
943 g_pszPropInfoTemplates[idx],
944 u32ActiveClientId);
945
946 if (l == -1)
947 {
948 *pClientInfoMap[idx] = NULL;
949 rc = VERR_NO_MEMORY;
950 break;
951 }
952 }
953 }
954
955 if (RT_SUCCESS(rc))
956 {
957 if (pCtx->activeClient.pszPropAttach)
958 {
959 RTMemFree(pCtx->activeClient.pszPropAttach);
960 pCtx->activeClient.pszPropAttach = NULL;
961 }
962 if (u32ActiveClientId != 0)
963 {
964 l = RTStrAPrintf(&pCtx->activeClient.pszPropAttach,
965 g_pszPropAttachTemplate,
966 u32ActiveClientId);
967 if (l == -1)
968 {
969 pCtx->activeClient.pszPropAttach = NULL;
970 rc = VERR_NO_MEMORY;
971 }
972 }
973 }
974
975 if (RT_SUCCESS(rc))
976 {
977 if (pCtx->activeClient.pszPropWaitPattern)
978 {
979 RTMemFree(pCtx->activeClient.pszPropWaitPattern);
980 pCtx->activeClient.pszPropWaitPattern = NULL;
981 }
982 if (u32ActiveClientId != 0)
983 {
984 l = RTStrAPrintf(&pCtx->activeClient.pszPropWaitPattern,
985 "%s|%s|%s|%s|%s",
986 pCtx->activeClient.pszPropName,
987 pCtx->activeClient.pszPropAttach,
988 pCtx->activeClient.pszPropIPAddr,
989 pCtx->activeClient.pszPropLocation,
990 pCtx->activeClient.pszPropOtherInfo);
991 if (l == -1)
992 {
993 pCtx->activeClient.pszPropWaitPattern = NULL;
994 rc = VERR_NO_MEMORY;
995 }
996 }
997 }
998
999 if (RT_SUCCESS(rc))
1000 {
1001 pCtx->activeClient.u32ClientId = u32ActiveClientId;
1002 }
1003 else
1004 {
1005 pCtx->activeClient.u32ClientId = 0;
1006 }
1007
1008 LogFlowFunc(("laUpdateCurrentState rc = %Rrc\n", rc));
1009 return rc;
1010}
1011
1012static int laWait(PVBOXLACONTEXT pCtx, uint64_t *pu64Timestamp, uint32_t u32Timeout)
1013{
1014 LogFlowFunc(("laWait [%s]\n", pCtx->activeClient.pszPropWaitPattern));
1015
1016 int rc = laWaitProperties(pCtx->u32GuestPropHandle,
1017 pCtx->activeClient.pszPropWaitPattern,
1018 pCtx->u64LastQuery,
1019 pu64Timestamp,
1020 u32Timeout);
1021
1022 LogFlowFunc(("laWait rc %Rrc\n", rc));
1023 return rc;
1024}
1025
1026static void laProcessClientInfo(PVBOXLACONTEXT pCtx)
1027{
1028 /* Check if the name was changed. */
1029 /* Get the name string and check if it was changed since last time.
1030 * Write Client name, IPAddr, Location and Other Info to the registry if the name has changed.
1031 */
1032 uint64_t u64Timestamp = 0;
1033 int rc = VINF_SUCCESS;
1034 unsigned int idx;
1035
1036 char *pClientInfoMap[][2] = {
1037 {pCtx->activeClient.pszPropName, NULL},
1038 {pCtx->activeClient.pszPropIPAddr, NULL},
1039 {pCtx->activeClient.pszPropLocation, NULL},
1040 {pCtx->activeClient.pszPropOtherInfo, NULL}
1041 };
1042
1043 for (idx = 0; idx <= LA_UTCINFO_CLIENT_INFO_LAST; idx++)
1044 {
1045 rc = laGetString(pCtx->u32GuestPropHandle,
1046 pClientInfoMap[idx][LA_UTCINFO_PROP_NAME],
1047 &u64Timestamp,
1048 &pClientInfoMap[idx][LA_UTCINFO_PROP_VALUE]);
1049
1050 LogFlowFunc(("laProcessClientInfo: read [%s], at %RU64\n",
1051 pClientInfoMap[idx][LA_UTCINFO_PROP_VALUE], u64Timestamp));
1052
1053 if (RT_FAILURE(rc))
1054 {
1055 LogFlowFunc(("laProcessClientInfo failed at %s\n", pClientInfoMap[idx][LA_UTCINFO_PROP_NAME]));
1056 break;
1057 }
1058 }
1059
1060 if (pClientInfoMap[LA_UTCINFO_CLIENT_NAME][LA_UTCINFO_PROP_VALUE] != NULL)
1061 {
1062 if (u64Timestamp != pCtx->activeClient.u64LastNameTimestamp)
1063 {
1064 laOnClientLocationInfo(pCtx, pClientInfoMap);
1065
1066 pCtx->activeClient.u64LastNameTimestamp = u64Timestamp;
1067 }
1068 }
1069
1070 for (idx = 0; idx <= LA_UTCINFO_CLIENT_INFO_LAST; idx++)
1071 {
1072 if (pClientInfoMap[idx][LA_UTCINFO_PROP_VALUE])
1073 {
1074 RTMemFree(pClientInfoMap[idx][LA_UTCINFO_PROP_VALUE]);
1075 }
1076 }
1077}
1078
1079static void laProcessAttach(PVBOXLACONTEXT pCtx)
1080{
1081 /* Check if the attach was changed. */
1082 pCtx->u32Action = LA_DO_NOTHING;
1083
1084 uint64_t u64Timestamp = 0;
1085 uint32_t u32Attach = ~0;
1086
1087 int rc = laGetUint32(pCtx->u32GuestPropHandle,
1088 pCtx->activeClient.pszPropAttach,
1089 &u64Timestamp,
1090 &u32Attach);
1091
1092 if (RT_SUCCESS(rc))
1093 {
1094 LogFlowFunc(("laProcessAttach: read %RU32, at %RU64\n", u32Attach, u64Timestamp));
1095 if (u64Timestamp != pCtx->activeClient.u64LastAttachTimestamp)
1096 {
1097 if (u32Attach != pCtx->activeClient.u32LastAttach)
1098 {
1099 LogFlowFunc(("laProcessAttach: changed\n"));
1100
1101 /* Just do the last action. */
1102 pCtx->u32Action = u32Attach
1103 ? LA_DO_ATTACH : LA_DO_DETACH;
1104
1105 pCtx->activeClient.u32LastAttach = u32Attach;
1106 }
1107 else
1108 {
1109 LogFlowFunc(("laProcessAttach: same\n"));
1110
1111 /* The property has changed but the value is the same,
1112 * which means that it was changed and restored.
1113 */
1114 pCtx->u32Action = u32Attach
1115 ? LA_DO_DETACH_AND_ATTACH : LA_DO_ATTACH_AND_DETACH;
1116 }
1117
1118 pCtx->activeClient.u64LastAttachTimestamp = u64Timestamp;
1119 }
1120
1121 }
1122
1123 LogFlowFunc(("laProcessAttach: action %RU32\n", pCtx->u32Action));
1124}
1125
1126static void laDoActions(PVBOXLACONTEXT pCtx)
1127{
1128 /*
1129 * Check if the attach was changed.
1130 *
1131 * Caller assumes that this function will filter double actions.
1132 * That is two or more LA_DO_ATTACH will do just one LA_DO_ATTACH.
1133 */
1134 LogFlowFunc(("laDoActions: action %RU32, prev %RU32\n", pCtx->u32Action, pCtx->u32PrevAction));
1135
1136 switch(pCtx->u32Action)
1137 {
1138 case LA_DO_ATTACH:
1139 {
1140 if (pCtx->u32PrevAction != LA_DO_ATTACH)
1141 {
1142 pCtx->u32PrevAction = LA_DO_ATTACH;
1143 laDoAttach(pCtx);
1144 }
1145 } break;
1146
1147 case LA_DO_DETACH:
1148 {
1149 if (pCtx->u32PrevAction != LA_DO_DETACH)
1150 {
1151 pCtx->u32PrevAction = LA_DO_DETACH;
1152 laDoDetach(pCtx);
1153 }
1154 } break;
1155
1156 case LA_DO_DETACH_AND_ATTACH:
1157 {
1158 if (pCtx->u32PrevAction != LA_DO_DETACH)
1159 {
1160 pCtx->u32PrevAction = LA_DO_DETACH;
1161 laDoDetach(pCtx);
1162 }
1163 pCtx->u32PrevAction = LA_DO_ATTACH;
1164 laDoAttach(pCtx);
1165 } break;
1166
1167 case LA_DO_ATTACH_AND_DETACH:
1168 {
1169 if (pCtx->u32PrevAction != LA_DO_ATTACH)
1170 {
1171 pCtx->u32PrevAction = LA_DO_ATTACH;
1172 laDoAttach(pCtx);
1173 }
1174 pCtx->u32PrevAction = LA_DO_DETACH;
1175 laDoDetach(pCtx);
1176 } break;
1177
1178 case LA_DO_NOTHING:
1179 default:
1180 break;
1181 }
1182
1183 pCtx->u32Action = LA_DO_NOTHING;
1184
1185 LogFlowFunc(("laDoActions: leave\n"));
1186}
1187
1188DECLCALLBACK(int) VBoxLAInit(const PVBOXSERVICEENV pEnv, void **ppInstance)
1189{
1190 AssertPtrReturn(pEnv, VERR_INVALID_POINTER);
1191 AssertPtrReturn(ppInstance, VERR_INVALID_POINTER);
1192
1193 LogFlowFuncEnter();
1194
1195 PVBOXLACONTEXT pCtx = &g_Ctx; /* Only one instance at the moment. */
1196 AssertPtr(pCtx);
1197
1198 pCtx->pEnv = pEnv;
1199
1200 DWORD dwValue = 0;
1201 if ( laGetRegistryDWORD(L"SOFTWARE\\Oracle\\VirtualBox Guest Additions", L"VBoxTrayLog", &dwValue)
1202 && (dwValue & 0x10) != 0)
1203 {
1204 pCtx->fLogEnabled = true;
1205 }
1206 else
1207 {
1208 pCtx->fLogEnabled = false;
1209 }
1210
1211 /* DetachOnDisconnect is enabled by default. */
1212 dwValue = 0x02;
1213 if ( laGetRegistryDWORD(L"SOFTWARE\\Oracle\\VirtualBox Guest Additions", L"VBoxTrayLA", &dwValue)
1214 && (dwValue & 0x02) == 0)
1215 {
1216 pCtx->fDetachOnDisconnect = false;
1217 }
1218 else
1219 {
1220 pCtx->fDetachOnDisconnect = true;
1221 }
1222
1223 LogRel(("LA: DetachOnDisconnect=%RTbool\n", pCtx->fDetachOnDisconnect));
1224
1225 int rc = VbglR3GuestPropConnect(&pCtx->u32GuestPropHandle);
1226 if (RT_FAILURE(rc))
1227 return rc;
1228
1229 RTListInit(&pCtx->listAttachActions);
1230 RTListInit(&pCtx->listDetachActions);
1231
1232 RT_ZERO(pCtx->activeClient);
1233
1234 *(void **)&pCtx->pfnProcessIdToSessionId = RTLdrGetSystemSymbol("kernel32.dll", "ProcessIdToSessionId");
1235
1236 *ppInstance = pCtx;
1237 LogFlowFuncLeaveRC(VINF_SUCCESS);
1238 return VINF_SUCCESS;
1239}
1240
1241DECLCALLBACK(void) VBoxLADestroy(void *pInstance)
1242{
1243 AssertPtrReturnVoid(pInstance);
1244
1245 LogFlowFunc(("Destroying pInstance=%p\n", pInstance));
1246
1247 PVBOXLACONTEXT pCtx = (PVBOXLACONTEXT)pInstance;
1248 AssertPtr(pCtx);
1249
1250 if (pCtx->u32GuestPropHandle != 0)
1251 {
1252 VbglR3GuestPropDisconnect(pCtx->u32GuestPropHandle);
1253 }
1254
1255 ActionExecutorDeleteActions(&pCtx->listAttachActions);
1256 ActionExecutorDeleteActions(&pCtx->listDetachActions);
1257
1258 pCtx->pfnProcessIdToSessionId = NULL;
1259}
1260
1261/*
1262 * Thread function to wait for and process property changes
1263 */
1264DECLCALLBACK(int) VBoxLAWorker(void *pInstance, bool volatile *pfShutdown)
1265{
1266 AssertPtr(pInstance);
1267 LogFlowFunc(("pInstance=%p\n", pInstance));
1268
1269 /*
1270 * Tell the control thread that it can continue
1271 * spawning services.
1272 */
1273 RTThreadUserSignal(RTThreadSelf());
1274
1275 PVBOXLACONTEXT pCtx = (PVBOXLACONTEXT)pInstance;
1276
1277 /*
1278 * On name change event (/VirtualBox/HostInfo/VRDP/Client/%ID%/Name)
1279 * Store the name in the registry (HKCU\Volatile Environment\UTCINFO_CLIENTNAME).
1280 * On a client attach event (/VirtualBox/HostInfo/VRDP/Client/%ID%/Attach -> 1):
1281 * Execute ReconnectActions
1282 * On a client detach event (/VirtualBox/HostInfo/VRDP/Client/%ID%/Attach -> 0):
1283 * Execute DisconnectActions
1284 *
1285 * The active connected client id is /VirtualBox/HostInfo/VRDP/ActiveClientClient.
1286 */
1287
1288 if (!ActionExecutorEnumerateRegistryKey(g_pwszRegKeyReconnectActions, &pCtx->listAttachActions))
1289 {
1290 LogFlowFunc(("Can't enumerate registry key %ls\n", g_pwszRegKeyReconnectActions));
1291 }
1292 if (!ActionExecutorEnumerateRegistryKey(g_pwszRegKeyDisconnectActions, &pCtx->listDetachActions))
1293 {
1294 LogFlowFunc(("Can't enumerate registry key %ls\n", g_pwszRegKeyDisconnectActions));
1295 }
1296
1297 /* A non zero timestamp in the past. */
1298 pCtx->u64LastQuery = 1;
1299 /* Start at Detached state. */
1300 pCtx->u32PrevAction = LA_DO_DETACH;
1301
1302 int rc;
1303
1304 for (;;)
1305 {
1306 /* Query current ActiveClient.
1307 * if it differs from the current active client
1308 * rebuild the context;
1309 * wait with timeout for properties change since the active client was changed;
1310 * if 'Name' was changed
1311 * update the name;
1312 * if 'Attach' was changed
1313 * do respective actions.
1314 * remember the query timestamp;
1315 */
1316 uint64_t u64Timestamp = 0;
1317 uint32_t u32ActiveClientId = 0;
1318 rc = laGetActiveClient(pCtx, &u64Timestamp, &u32ActiveClientId);
1319
1320 if (RT_SUCCESS(rc))
1321 {
1322 bool fClientIdChanged = pCtx->activeClient.u32ClientId != u32ActiveClientId;
1323
1324 if (fClientIdChanged)
1325 {
1326 rc = laUpdateCurrentState(pCtx, u32ActiveClientId, u64Timestamp);
1327 }
1328
1329 if (RT_SUCCESS(rc))
1330 {
1331 if (pCtx->activeClient.u32ClientId != 0)
1332 {
1333 rc = laWait(pCtx, &u64Timestamp, 1000);
1334
1335 if (RT_SUCCESS(rc))
1336 {
1337 laProcessAttach(pCtx);
1338
1339 laProcessClientInfo(pCtx);
1340
1341 laDoActions(pCtx);
1342
1343 pCtx->u64LastQuery = u64Timestamp;
1344 }
1345 }
1346 else
1347 {
1348 /* If the client has been disconnected, do the detach actions. */
1349 if ( pCtx->fDetachOnDisconnect
1350 && fClientIdChanged)
1351 {
1352 LogFlowFunc(("Client disconnected\n"));
1353
1354 /* laDoActions will prevent a repeated detach action. So if there
1355 * was a detach already, then this detach will be ignored.
1356 */
1357 pCtx->u32Action = LA_DO_DETACH;
1358
1359 laDoActions(pCtx);
1360
1361 pCtx->u64LastQuery = u64Timestamp;
1362 }
1363 }
1364 }
1365 }
1366
1367 /*
1368 * Check if it is time to exit.
1369 * If the code above failed, wait a bit until repeating to avoid a loop.
1370 * Otherwise just check if the stop event was signalled.
1371 */
1372 RTMSINTERVAL msWait;
1373 if ( rc == VERR_NOT_FOUND
1374 || pCtx->activeClient.u32ClientId == 0)
1375 {
1376 /* No connections, wait longer. */
1377 msWait = 5000;
1378 rc = VINF_SUCCESS;
1379 }
1380 else if (RT_FAILURE(rc))
1381 {
1382 static int s_iBitchedAboutFailedGetActiveClient = 0;
1383 if (s_iBitchedAboutFailedGetActiveClient++ < 32)
1384 LogRel(("LA: Retrieving current client(s) failed with %Rrc\n", rc));
1385
1386 msWait = 10000;
1387 }
1388 else
1389 msWait = 0;
1390
1391 if (*pfShutdown)
1392 break;
1393
1394 if (msWait)
1395 RTThreadSleep(msWait);
1396 }
1397
1398 LogFlowFuncLeaveRC(rc);
1399 return rc;
1400}
1401
1402/**
1403 * The service description.
1404 */
1405VBOXSERVICEDESC g_SvcDescLA =
1406{
1407 /* pszName. */
1408 "LA",
1409 /* pszDescription. */
1410 "Location Awareness",
1411 /* methods */
1412 VBoxLAInit,
1413 VBoxLAWorker,
1414 NULL /* pfnStop */,
1415 VBoxLADestroy
1416};
1417
Note: See TracBrowser for help on using the repository browser.

© 2024 Oracle Support Privacy / Do Not Sell My Info Terms of Use Trademark Policy Automated Access Etiquette