VirtualBox

source: vbox/trunk/src/VBox/Additions/WINNT/VBoxGINA/Dialog.cpp@ 46155

Last change on this file since 46155 was 40947, checked in by vboxsync, 12 years ago

VBoxGINA: Less verbose logging in release mode.
  • Property svn:eol-style set to native
  • Property svn:keywords set to Author Date Id Revision
File size: 20.0 KB
Line 
1/* $Id: Dialog.cpp 40947 2012-04-16 18:04:08Z vboxsync $ */
2/** @file
3 * VBoxGINA - Windows Logon DLL for VirtualBox, Dialog Code.
4 */
5
6/*
7 *
8 * Copyright (C) 2006-2012 Oracle Corporation
9 *
10 * This file is part of VirtualBox Open Source Edition (OSE), as
11 * available from http://www.virtualbox.org. This file is free software;
12 * you can redistribute it and/or modify it under the terms of the GNU
13 * General Public License (GPL) as published by the Free Software
14 * Foundation, in version 2 as it comes in the "COPYING" file of the
15 * VirtualBox OSE distribution. VirtualBox OSE is distributed in the
16 * hope that it will be useful, but WITHOUT ANY WARRANTY of any kind.
17 */
18
19#include <windows.h>
20#include <stdio.h> /* Needed for swprintf() */
21
22#include <VBox/VboxGuestLib.h>
23
24#include "Dialog.h"
25#include "WinWlx.h"
26#include "Helper.h"
27#include "VBoxGINA.h"
28
29
30/*
31 * Dialog IDs for legacy Windows OSes (e.g. NT 4.0).
32 */
33#define IDD_WLXDIAPLAYSASNOTICE_DIALOG 1400
34#define IDD_WLXLOGGEDOUTSAS_DIALOG 1450
35/** Change password dialog: To change the current
36 * account password. */
37#define IDD_CHANGE_PASSWORD_DIALOG 1550
38#define IDD_WLXLOGGEDONSAS_DIALOG 1650
39/** Security dialog: To lock the workstation, log off
40 * change password, ... */
41#define IDD_SECURITY_DIALOG 1800
42/** Locked dialog: To unlock the currently lockted
43 * workstation. */
44#define IDD_WLXWKSTALOCKEDSAS_DIALOG 1850
45/** Shutdown dialog: To either restart, logoff current
46 * user or shutdown the workstation. */
47#define IDD_SHUTDOWN_DIALOG 2200
48/** Logoff dialog: "Do you really want to logoff?". */
49#define IDD_LOGOFF_DIALOG 2250
50
51
52/*
53 * Dialog IDs for Windows 2000 and up.
54 */
55#define IDD_WLXLOGGEDOUTSAS_DIALOG2 1500
56/** Change password dialog: To change the current
57 * account password. */
58#define IDD_CHANGE_PASSWORD_DIALOG2 1700
59/** Locked dialog: To unlock the currently lockted
60 * workstation. */
61#define IDD_WLXWKSTALOCKEDSAS_DIALOG2 1950
62
63
64/*
65 * Control IDs.
66 */
67#define IDC_WLXLOGGEDOUTSAS_USERNAME 1453
68#define IDC_WLXLOGGEDOUTSAS_USERNAME2 1502
69#define IDC_WLXLOGGEDOUTSAS_PASSWORD 1454
70#define IDC_WLXLOGGEDOUTSAS_PASSWORD2 1503
71#define IDC_WLXLOGGEDOUTSAS_DOMAIN 1455
72#define IDC_WLXLOGGEDOUTSAS_DOMAIN2 1504
73
74#define IDC_WKSTALOCKED_USERNAME 1953
75#define IDC_WKSTALOCKED_PASSWORD 1954
76#define IDC_WKSTALOCKEd_DOMAIN 1856
77#define IDC_WKSTALOCKED_DOMAIN2 1956
78
79
80/*
81 * Own IDs.
82 */
83#define IDT_BASE WM_USER + 1100 /* Timer ID base. */
84#define IDT_LOGGEDONDLG_POLL IDT_BASE + 1
85#define IDT_LOCKEDDLG_POLL IDT_BASE + 2
86
87static DLGPROC g_pfnWlxLoggedOutSASDlgProc = NULL;
88static DLGPROC g_pfnWlxLockedSASDlgProc = NULL;
89
90static PWLX_DIALOG_BOX_PARAM g_pfnWlxDialogBoxParam = NULL;
91
92int WINAPI MyWlxDialogBoxParam (HANDLE, HANDLE, LPWSTR, HWND, DLGPROC, LPARAM);
93
94void hookDialogBoxes(PVOID pWinlogonFunctions, DWORD dwWlxVersion)
95{
96 if (!pWinlogonFunctions) /* Needed for testcase. */
97 return;
98
99 VBoxGINAVerbose(0, "VBoxGINA::hookDialogBoxes\n");
100
101 /* this is version dependent */
102 switch (dwWlxVersion)
103 {
104 case WLX_VERSION_1_0:
105 {
106 g_pfnWlxDialogBoxParam = ((PWLX_DISPATCH_VERSION_1_0)pWinlogonFunctions)->WlxDialogBoxParam;
107 ((PWLX_DISPATCH_VERSION_1_0)pWinlogonFunctions)->WlxDialogBoxParam = MyWlxDialogBoxParam;
108 break;
109 }
110
111 case WLX_VERSION_1_1:
112 {
113 g_pfnWlxDialogBoxParam = ((PWLX_DISPATCH_VERSION_1_1)pWinlogonFunctions)->WlxDialogBoxParam;
114 ((PWLX_DISPATCH_VERSION_1_1)pWinlogonFunctions)->WlxDialogBoxParam = MyWlxDialogBoxParam;
115 break;
116 }
117
118 case WLX_VERSION_1_2:
119 {
120 g_pfnWlxDialogBoxParam = ((PWLX_DISPATCH_VERSION_1_2)pWinlogonFunctions)->WlxDialogBoxParam;
121 ((PWLX_DISPATCH_VERSION_1_2)pWinlogonFunctions)->WlxDialogBoxParam = MyWlxDialogBoxParam;
122 break;
123 }
124
125 case WLX_VERSION_1_3:
126 {
127 g_pfnWlxDialogBoxParam = ((PWLX_DISPATCH_VERSION_1_3)pWinlogonFunctions)->WlxDialogBoxParam;
128 ((PWLX_DISPATCH_VERSION_1_3)pWinlogonFunctions)->WlxDialogBoxParam = MyWlxDialogBoxParam;
129 break;
130 }
131
132 case WLX_VERSION_1_4:
133 {
134 g_pfnWlxDialogBoxParam = ((PWLX_DISPATCH_VERSION_1_4)pWinlogonFunctions)->WlxDialogBoxParam;
135 ((PWLX_DISPATCH_VERSION_1_4)pWinlogonFunctions)->WlxDialogBoxParam = MyWlxDialogBoxParam;
136 break;
137 }
138
139 default:
140 {
141 VBoxGINAVerbose(0, "VBoxGINA::hookDialogBoxes: unrecognized version '%d', nothing hooked!\n", dwWlxVersion);
142 /* not good, don't do anything */
143 break;
144 }
145 }
146}
147
148/**
149 * Enters credentials into the given text fields.
150 *
151 * @return IPRT status code.
152 * @param hwndDlg Handle of dialog to enter credentials into.
153 * @param hwndUserId Handle of username text field. Optional.
154 * @param hwndPassword Handle of password text field. Optional.
155 * @param hwndDomain Handle of domain text field. Optional.
156 * @param pwszUser Username to enter into username text field.
157 * @param pwszPassword Password to enter into password text field.
158 * @param pwszDomain Domain to enter into domain text field.
159 */
160int credentialsToUI(HWND hwndDlg,
161 HWND hwndUserId, HWND hwndPassword, HWND hwndDomain,
162 PCRTUTF16 pwszUser, PCRTUTF16 pwszPassword, PCRTUTF16 pwszDomain)
163{
164 BOOL bIsFQDN = FALSE;
165 wchar_t szUserFQDN[512]; /* VMMDEV_CREDENTIALS_STRLEN + 255 bytes max. for FQDN */
166 if (hwndDomain)
167 {
168 /* search the domain combo box for our required domain and select it */
169 VBoxGINAVerbose(0, "VBoxGINA::MyWlxLoggedOutSASDlgProc: Trying to find domain entry in combo box ...\n");
170 DWORD dwIndex = (DWORD) SendMessage(hwndDomain, CB_FINDSTRING,
171 0, (LPARAM)pwszDomain);
172 if (dwIndex != CB_ERR)
173 {
174 VBoxGINAVerbose(0, "VBoxGINA::MyWlxLoggedOutSASDlgProc: Found domain at combo box pos %ld\n", dwIndex);
175 SendMessage(hwndDomain, CB_SETCURSEL, (WPARAM) dwIndex, 0);
176 EnableWindow(hwndDomain, FALSE);
177 }
178 else
179 {
180 VBoxGINAVerbose(0, "VBoxGINA::MyWlxLoggedOutSASDlgProc: Domain not found in combo box ...\n");
181
182 /* If the domain value has a dot (.) in it, it is a FQDN (Fully Qualified Domain Name)
183 * which will not work with the combo box selection because Windows only keeps the
184 * NETBIOS names to the left most part of the domain name there. Of course a FQDN
185 * then will not be found by the search in the block above.
186 *
187 * To solve this problem the FQDN domain value will be appended at the user name value
188 * (Kerberos style) using an "@", e.g. "<user-name>@full.qualified.domain".
189 *
190 */
191 size_t l = wcslen(pwszDomain);
192 if (l > 255)
193 VBoxGINAVerbose(0, "VBoxGINA::MyWlxLoggedOutSASDlgProc: Warning! FQDN (domain) is too long (max 255 bytes), will be truncated!\n");
194
195 if (wcslen(pwszUser) > 0) /* We need a user name that we can use in caes of a FQDN */
196 {
197 if (l > 16) /* Domain name is longer than 16 chars, cannot be a NetBIOS name anymore */
198 {
199 VBoxGINAVerbose(0, "VBoxGINA::MyWlxLoggedOutSASDlgProc: Domain seems to be a FQDN (length)!\n");
200 bIsFQDN = TRUE;
201 }
202 else if ( l > 0
203 && wcsstr(pwszDomain, L".") != NULL) /* if we found a dot (.) in the domain name, this has to be a FQDN */
204 {
205 VBoxGINAVerbose(0, "VBoxGINA::MyWlxLoggedOutSASDlgProc: Domain seems to be a FQDN (dot)!\n");
206 bIsFQDN = TRUE;
207 }
208
209 if (bIsFQDN)
210 {
211 swprintf(szUserFQDN, sizeof(szUserFQDN) / sizeof(wchar_t), L"%s@%s", pwszUser, pwszDomain);
212 VBoxGINAVerbose(0, "VBoxGINA::MyWlxLoggedOutSASDlgProc: FQDN user name is now: %s!\n", szUserFQDN);
213 }
214 }
215 }
216 }
217 if (hwndUserId)
218 {
219 if (!bIsFQDN)
220 SendMessage(hwndUserId, WM_SETTEXT, 0, (LPARAM)pwszUser);
221 else
222 SendMessage(hwndUserId, WM_SETTEXT, 0, (LPARAM)szUserFQDN);
223 }
224 if (hwndPassword)
225 SendMessage(hwndPassword, WM_SETTEXT, 0, (LPARAM)pwszPassword);
226
227 return VINF_SUCCESS; /** @todo */
228}
229
230/**
231 * Tries to retrieve credentials and enters them into the specified windows,
232 * optionally followed by a button press to confirm/abort the dialog.
233 *
234 * @return IPRT status code.
235 * @param hwndDlg Handle of dialog to enter credentials into.
236 * @param hwndUserId Handle of username text field. Optional.
237 * @param hwndPassword Handle of password text field. Optional.
238 * @param hwndDomain Handle of domain text field. Optional.
239 * @param wButtonToPress Button ID of dialog to press after successful
240 * retrieval + storage. If set to 0 no button will
241 * be pressed.
242 */
243int credentialsHandle(HWND hwndDlg,
244 HWND hwndUserId, HWND hwndPassword, HWND hwndDomain,
245 WORD wButtonToPress)
246{
247 int rc = VINF_SUCCESS;
248
249 if (!VBoxGINAHandleCurrentSession())
250 rc = VERR_NOT_FOUND;
251
252 if (RT_SUCCESS(rc))
253 {
254 rc = VbglR3CredentialsQueryAvailability();
255 if (RT_FAILURE(rc))
256 {
257 if (rc != VERR_NOT_FOUND)
258 VBoxGINAVerbose(0, "VBoxGINA::credentialsHandle: error querying for credentials, rc=%Rrc\n", rc);
259 }
260 }
261
262 if (RT_SUCCESS(rc))
263 {
264 VBoxGINAVerbose(0, "VBoxGINA::credentialsHandle: credentials available\n");
265
266 /*
267 * Set status to "terminating" to let the host know this module now
268 * tries to receive and use passed credentials so that credentials from
269 * the host won't be sent twice.
270 */
271 VBoxGINAReportStatus(VBoxGuestFacilityStatus_Terminating);
272
273 PRTUTF16 pwszUser, pwszPassword, pwszDomain;
274 rc = VbglR3CredentialsRetrieveUtf16(&pwszUser, &pwszPassword, &pwszDomain);
275 if (RT_SUCCESS(rc))
276 {
277#ifdef DEBUG
278 VBoxGINAVerbose(0, "VBoxGINA::credentialsHandle: retrieved credentials: user=%ls, password=%ls, domain=%ls\n",
279 pwszUser, pwszPassword, pwszDomain);
280#else
281 VBoxGINAVerbose(0, "VBoxGINA::credentialsHandle: retrieved credentials: user=%ls, password=XXX, domain=%ls\n",
282 pwszUser, pwszDomain);
283#endif
284 /* Fill in credentials to appropriate UI elements. */
285 rc = credentialsToUI(hwndDlg,
286 hwndUserId, hwndPassword, hwndDomain,
287 pwszUser, pwszPassword, pwszDomain);
288 if (RT_SUCCESS(rc))
289 {
290 /* Confirm/cancel the dialog by pressing the appropriate button. */
291 if (wButtonToPress)
292 {
293 WPARAM wParam = MAKEWPARAM(wButtonToPress, BN_CLICKED);
294 PostMessage(hwndDlg, WM_COMMAND, wParam, 0);
295 }
296 }
297
298 VbglR3CredentialsDestroyUtf16(pwszUser, pwszPassword, pwszDomain,
299 3 /* Passes */);
300 }
301 }
302
303#ifdef DEBUG
304 VBoxGINAVerbose(3, "VBoxGINA::credentialsHandle: returned with rc=%Rrc\n", rc);
305#endif
306 return rc;
307}
308
309INT_PTR CALLBACK MyWlxLoggedOutSASDlgProc(HWND hwndDlg, // handle to dialog box
310 UINT uMsg, // message
311 WPARAM wParam, // first message parameter
312 LPARAM lParam) // second message parameter
313{
314 BOOL bResult;
315 static HWND s_hwndUserId, s_hwndPassword, s_hwndDomain = 0;
316
317 /*VBoxGINAVerbose(0, "VBoxGINA::MyWlxLoggedOutSASDlgProc\n");*/
318
319 //
320 // Pass on to MSGINA first.
321 //
322 bResult = g_pfnWlxLoggedOutSASDlgProc(hwndDlg, uMsg, wParam, lParam);
323
324 //
325 // We are only interested in the WM_INITDIALOG message.
326 //
327 switch (uMsg)
328 {
329 case WM_INITDIALOG:
330 {
331 VBoxGINAVerbose(0, "VBoxGINA::MyWlxLoggedOutSASDlgProc: got WM_INITDIALOG\n");
332
333 /* get the entry fields */
334 s_hwndUserId = GetDlgItem(hwndDlg, IDC_WLXLOGGEDOUTSAS_USERNAME);
335 if (!s_hwndUserId)
336 s_hwndUserId = GetDlgItem(hwndDlg, IDC_WLXLOGGEDOUTSAS_USERNAME2);
337 s_hwndPassword = GetDlgItem(hwndDlg, IDC_WLXLOGGEDOUTSAS_PASSWORD);
338 if (!s_hwndPassword)
339 s_hwndPassword = GetDlgItem(hwndDlg, IDC_WLXLOGGEDOUTSAS_PASSWORD2);
340 s_hwndDomain = GetDlgItem(hwndDlg, IDC_WLXLOGGEDOUTSAS_DOMAIN);
341 if (!s_hwndDomain)
342 s_hwndDomain = GetDlgItem(hwndDlg, IDC_WLXLOGGEDOUTSAS_DOMAIN2);
343
344 VBoxGINAVerbose(0, "VBoxGINA::MyWlxLoggedOutSASDlgProc: hwndUserId: %x, hwndPassword: %d, hwndDomain: %d\n",
345 s_hwndUserId, s_hwndPassword, s_hwndDomain);
346
347 /* terminate the credentials poller thread, it's done is job */
348 VBoxGINACredentialsPollerTerminate();
349
350 int rc = credentialsHandle(hwndDlg,
351 s_hwndUserId, s_hwndPassword, s_hwndDomain,
352 IDOK /* Button */);
353 if (RT_FAILURE(rc))
354 {
355 /*
356 * The dialog is there but we don't have any credentials.
357 * Create a timer and poll for them.
358 */
359 UINT_PTR uTimer = SetTimer(hwndDlg, IDT_LOGGEDONDLG_POLL, 200, NULL);
360 if (!uTimer)
361 VBoxGINAVerbose(0, "VBoxGINA::MyWlxLoggedOutSASDlgProc: failed creating timer! Last error: %ld\n",
362 GetLastError());
363 }
364 break;
365 }
366
367 case WM_TIMER:
368 {
369 /* is it our credentials poller timer? */
370 if (wParam == IDT_LOGGEDONDLG_POLL)
371 {
372 int rc = credentialsHandle(hwndDlg,
373 s_hwndUserId, s_hwndPassword, s_hwndDomain,
374 IDOK /* Button */);
375 if (RT_SUCCESS(rc))
376 {
377 /* we don't need the timer any longer */
378 KillTimer(hwndDlg, IDT_LOGGEDONDLG_POLL);
379 }
380 }
381 break;
382 }
383
384 case WM_DESTROY:
385 KillTimer(hwndDlg, IDT_LOGGEDONDLG_POLL);
386 break;
387 }
388 return bResult;
389}
390
391
392INT_PTR CALLBACK MyWlxLockedSASDlgProc(HWND hwndDlg, // handle to dialog box
393 UINT uMsg, // message
394 WPARAM wParam, // first message parameter
395 LPARAM lParam) // second message parameter
396{
397 BOOL bResult;
398 static HWND s_hwndPassword = 0;
399
400 /*VBoxGINAVerbose(0, "VBoxGINA::MyWlxLockedSASDlgProc\n");*/
401
402 //
403 // Pass on to MSGINA first.
404 //
405 bResult = g_pfnWlxLockedSASDlgProc(hwndDlg, uMsg, wParam, lParam);
406
407 //
408 // We are only interested in the WM_INITDIALOG message.
409 //
410 switch (uMsg)
411 {
412 case WM_INITDIALOG:
413 {
414 VBoxGINAVerbose(0, "VBoxGINA::MyWlxLockedSASDlgProc: WM_INITDIALOG\n");
415
416 /* get the entry fields */
417 s_hwndPassword = GetDlgItem(hwndDlg, IDC_WKSTALOCKED_PASSWORD);
418 VBoxGINAVerbose(0, "VBoxGINA::MyWlxLockedSASDlgProc: hwndPassword: %d\n", s_hwndPassword);
419
420 /* terminate the credentials poller thread, it's done is job */
421 VBoxGINACredentialsPollerTerminate();
422
423 int rc = credentialsHandle(hwndDlg,
424 NULL /* Username */, s_hwndPassword, NULL /* Domain */,
425 IDOK /* Button */);
426 if (RT_FAILURE(rc))
427 {
428 /*
429 * The dialog is there but we don't have any credentials.
430 * Create a timer and poll for them.
431 */
432 UINT_PTR uTimer = SetTimer(hwndDlg, IDT_LOCKEDDLG_POLL, 200, NULL);
433 if (!uTimer)
434 VBoxGINAVerbose(0, "VBoxGINA::MyWlxLockedSASDlgProc: failed creating timer! Last error: %ld\n",
435 GetLastError());
436 }
437 break;
438 }
439
440 case WM_TIMER:
441 {
442 /* is it our credentials poller timer? */
443 if (wParam == IDT_LOCKEDDLG_POLL)
444 {
445 int rc = credentialsHandle(hwndDlg,
446 NULL /* Username */, s_hwndPassword, NULL /* Domain */,
447 IDOK /* Button */);
448 if (RT_SUCCESS(rc))
449 {
450 /* we don't need the timer any longer */
451 KillTimer(hwndDlg, IDT_LOCKEDDLG_POLL);
452 }
453 }
454 break;
455 }
456
457 case WM_DESTROY:
458 {
459 VBoxGINAVerbose(0, "VBoxGINA::MyWlxLockedSASDlgProc: WM_DESTROY\n");
460
461 /* Because this is the only point where we know within our module that the locked
462 * dialog has been closed by a valid unlock password we have to set the appropriate
463 * facility status here. */
464 VBoxGINAReportStatus(VBoxGuestFacilityStatus_Terminated);
465
466 KillTimer(hwndDlg, IDT_LOCKEDDLG_POLL);
467 break;
468 }
469 }
470 return bResult;
471}
472
473
474int WINAPI MyWlxDialogBoxParam(HANDLE hWlx,
475 HANDLE hInst,
476 LPWSTR lpszTemplate,
477 HWND hwndOwner,
478 DLGPROC dlgprc,
479 LPARAM dwInitParam)
480{
481 VBoxGINAVerbose(0, "VBoxGINA::MyWlxDialogBoxParam: lpszTemplate=%ls\n", lpszTemplate);
482
483 VBoxGINAReportStatus(VBoxGuestFacilityStatus_Active);
484
485 //
486 // We only know MSGINA dialogs by identifiers.
487 //
488 if (!HIWORD((int)(void*)lpszTemplate))
489 {
490 //
491 // Hook appropriate dialog boxes as necessary.
492 //
493 switch ((DWORD) lpszTemplate)
494 {
495 case IDD_WLXDIAPLAYSASNOTICE_DIALOG:
496 VBoxGINAVerbose(0, "VBoxGINA::MyWlxDialogBoxParam: SAS notice dialog displayed; not handled\n");
497 break;
498
499 case IDD_WLXLOGGEDOUTSAS_DIALOG: /* Windows NT 4.0. */
500 case IDD_WLXLOGGEDOUTSAS_DIALOG2: /* Windows 2000 and up. */
501 {
502 VBoxGINAVerbose(0, "VBoxGINA::MyWlxDialogBoxParam: returning hooked SAS logged out dialog\n");
503 g_pfnWlxLoggedOutSASDlgProc = dlgprc;
504 return g_pfnWlxDialogBoxParam(hWlx, hInst, lpszTemplate, hwndOwner,
505 MyWlxLoggedOutSASDlgProc, dwInitParam);
506 }
507
508 case IDD_SECURITY_DIALOG:
509 VBoxGINAVerbose(0, "VBoxGINA::MyWlxDialogBoxParam: Security dialog displayed; not handled\n");
510 break;
511
512 case IDD_WLXWKSTALOCKEDSAS_DIALOG: /* Windows NT 4.0. */
513 case IDD_WLXWKSTALOCKEDSAS_DIALOG2: /* Windows 2000 and up. */
514 {
515 VBoxGINAVerbose(0, "VBoxGINA::MyWlxDialogBoxParam: returning hooked SAS locked dialog\n");
516 g_pfnWlxLockedSASDlgProc = dlgprc;
517 return g_pfnWlxDialogBoxParam(hWlx, hInst, lpszTemplate, hwndOwner,
518 MyWlxLockedSASDlgProc, dwInitParam);
519 }
520
521 /** @todo Add other hooking stuff here. */
522
523 default:
524 VBoxGINAVerbose(0, "VBoxGINA::MyWlxDialogBoxParam: dialog %ld not handled\n", (DWORD)lpszTemplate);
525 break;
526 }
527 }
528
529 /* The rest will be redirected. */
530 return g_pfnWlxDialogBoxParam(hWlx, hInst, lpszTemplate,
531 hwndOwner, dlgprc, dwInitParam);
532}
533
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