internettime.c File Reference

#include "timedate.h"
#include <stdlib.h>

Include dependency graph for internettime.c:

Go to the source code of this file.

Functions
DWORD WINAPI	W32TimeSyncNow (LPCWSTR cmdline, UINT blocking, UINT flags)
static VOID	CreateNTPServerList (HWND hwnd)
static VOID	SetNTPServer (HWND hwnd, BOOL bBeginUpdate)
static VOID	EnableDialogText (HWND hwnd)
static VOID	SyncNTPStatusInit (HWND hwnd)
static VOID	UpdateNTPStatus (HWND hwnd, DWORD dwReason)
static VOID	GetSyncSetting (HWND hwnd)
static VOID	OnInitDialog (HWND hwnd)
static VOID	OnAutoSync (BOOL Sync)
static DWORD WINAPI	UpdateThread (_In_ LPVOID lpParameter)
static VOID	OnUpdate (HWND hwndDlg)
INT_PTR CALLBACK	InetTimePageProc (HWND hwndDlg, UINT uMsg, WPARAM wParam, LPARAM lParam)

Variables
SYNC_STATUS	SyncStatus

Function Documentation

CreateNTPServerList()

static VOID CreateNTPServerList ( HWND  hwnd )

static

Definition at line 17 of file internettime.c.

{
    HWND hList;
    WCHAR szValName[MAX_VALUE_NAME];
    WCHAR szData[256];
    DWORD dwIndex = 0;
    DWORD dwValSize;
    DWORD dwNameSize;
    DWORD dwDefault = 1;
    LONG lRet;
    HKEY hKey;

    hList = GetDlgItem(hwnd,
                       IDC_SERVERLIST);

    lRet = RegOpenKeyExW(HKEY_LOCAL_MACHINE,
                        L"SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\DateTime\\Servers",
                        0,
                        KEY_QUERY_VALUE,
                        &hKey);
    if (lRet != ERROR_SUCCESS)
        return;

    while (TRUE)
    {
        dwValSize = MAX_VALUE_NAME * sizeof(WCHAR);
        szValName[0] = L'\0';
        lRet = RegEnumValueW(hKey,
                             dwIndex,
                             szValName,
                             &dwValSize,
                             NULL,
                             NULL,
                             (LPBYTE)szData,
                             &dwNameSize);
        if (lRet == ERROR_SUCCESS)
        {
            /* Get date from default reg value */
            if (wcscmp(szValName, L"") == 0) // if (Index == 0)
            {
                dwDefault = _wtoi(szData);
                dwIndex++;
            }
            else
            {
                SendMessageW(hList,
                             CB_ADDSTRING,
                             0,
                             (LPARAM)szData);
                dwIndex++;
            }
        }
        else if (lRet != ERROR_MORE_DATA)
        {
            break;
        }
    }

    if (dwDefault < 1 || dwDefault > dwIndex)
        dwDefault = 1;

    /* Server reg entries count from 1,
     * Combo boxes count from 0 */
    dwDefault--;

    SendMessageW(hList,
                 CB_SETCURSEL,
                 dwDefault,
                 0);

    RegCloseKey(hKey);
}

Referenced by OnInitDialog().

EnableDialogText()

static VOID EnableDialogText ( HWND  hwnd )

static

Definition at line 175 of file internettime.c.

{
    BOOL bChecked;
    UINT uCheck;

    uCheck = (UINT)SendDlgItemMessageW(hwnd, IDC_AUTOSYNC, BM_GETCHECK, 0, 0);
    bChecked = (uCheck == BST_CHECKED) ? TRUE : FALSE;

    EnableWindow(GetDlgItem(hwnd, IDC_SERVERTEXT), bChecked);
    EnableWindow(GetDlgItem(hwnd, IDC_SERVERLIST), bChecked);
    EnableWindow(GetDlgItem(hwnd, IDC_UPDATEBUTTON), bChecked);
    EnableWindow(GetDlgItem(hwnd, IDC_SUCSYNC), bChecked);
    EnableWindow(GetDlgItem(hwnd, IDC_NEXTSYNC), bChecked);
}

Referenced by InetTimePageProc(), and OnInitDialog().

GetSyncSetting()

static VOID GetSyncSetting ( HWND  hwnd )

static

Definition at line 269 of file internettime.c.

{
    HKEY hKey;
    WCHAR szData[8];
    DWORD dwSize;

    if (RegOpenKeyExW(HKEY_LOCAL_MACHINE,
                      L"SYSTEM\\CurrentControlSet\\Services\\W32Time\\Parameters",
                      0,
                      KEY_QUERY_VALUE,
                      &hKey) == ERROR_SUCCESS)
    {
        dwSize = 8 * sizeof(WCHAR);
        if (RegQueryValueExW(hKey,
                             L"Type",
                             NULL,
                             NULL,
                             (LPBYTE)szData,
                             &dwSize) == ERROR_SUCCESS)
        {
            if (wcscmp(szData, L"NTP") == 0)
                SendDlgItemMessageW(hwnd, IDC_AUTOSYNC, BM_SETCHECK, BST_CHECKED, 0);
            else
                SendDlgItemMessageW(hwnd, IDC_AUTOSYNC, BM_SETCHECK, BST_UNCHECKED, 0);
        }

        RegCloseKey(hKey);
    }
}

Referenced by OnInitDialog().

InetTimePageProc()

INT_PTR CALLBACK InetTimePageProc	(	HWND	hwndDlg,
		UINT	uMsg,
		WPARAM	wParam,
		LPARAM	lParam
	)

Definition at line 381 of file internettime.c.

{
    switch (uMsg)
    {
        case WM_INITDIALOG:
            OnInitDialog(hwndDlg);
            break;

        case WM_COMMAND:
            switch(LOWORD(wParam))
            {
                case IDC_UPDATEBUTTON:
                    OnUpdate(hwndDlg);
                    break;

                case IDC_SERVERLIST:
                    if ((HIWORD(wParam) == CBN_SELCHANGE) || (HIWORD(wParam) == CBN_EDITCHANGE))
                    {
                        /* Enable the 'Apply' button */
                        PropSheet_Changed(GetParent(hwndDlg), hwndDlg);
                    }
                    break;

                case IDC_AUTOSYNC:
                    if (HIWORD(wParam) == BN_CLICKED)
                    {
                        EnableDialogText(hwndDlg);

                        /* Enable the 'Apply' button */
                        PropSheet_Changed(GetParent(hwndDlg), hwndDlg);
                    }
                    break;
            }
            break;

        case WM_DESTROY:
            break;

        case WM_NOTIFY:
        {
            LPNMHDR lpnm = (LPNMHDR)lParam;

            switch (lpnm->code)
            {
                case PSN_APPLY:
                    SetNTPServer(hwndDlg, FALSE);

                    if (SendDlgItemMessageW(hwndDlg, IDC_AUTOSYNC, BM_GETCHECK, 0, 0) == BST_CHECKED)
                        OnAutoSync(TRUE);
                    else
                        OnAutoSync(FALSE);

                    return TRUE;

                default:
                    break;
            }
        }
        break;
    }

    return FALSE;
}

Referenced by Applet().

OnAutoSync()

static VOID OnAutoSync ( BOOL  Sync )

static

Definition at line 311 of file internettime.c.

{
    HKEY hKey;
    LONG lRet;
    LPCWSTR szAuto;

    if (Sync)
        szAuto = L"NTP";
    else
        szAuto = L"NoSync";

    lRet = RegOpenKeyExW(HKEY_LOCAL_MACHINE,
                         L"SYSTEM\\CurrentControlSet\\Services\\W32Time\\Parameters",
                         0,
                         KEY_SET_VALUE,
                         &hKey);
    if (lRet != ERROR_SUCCESS)
    {
        DisplayWin32Error(lRet);
        return;
    }

    lRet = RegSetValueExW(hKey,
                          L"Type",
                          0,
                          REG_SZ,
                          (LPBYTE)szAuto,
                          (wcslen(szAuto) + 1) * sizeof(WCHAR));
    if (lRet != ERROR_SUCCESS)
        DisplayWin32Error(lRet);

    RegCloseKey(hKey);
}

Referenced by InetTimePageProc().

OnInitDialog()

static VOID OnInitDialog ( HWND  hwnd )

static

Definition at line 301 of file internettime.c.

{
    GetSyncSetting(hwnd);
    EnableDialogText(hwnd);
    CreateNTPServerList(hwnd);
    SyncNTPStatusInit(hwnd);
    SetWindowLongPtr(hwnd, DWLP_USER, (LONG_PTR)FALSE);
}

Referenced by InetTimePageProc().

OnUpdate()

static VOID OnUpdate ( HWND  hwndDlg )

static

Definition at line 364 of file internettime.c.

{
    if ((BOOL)GetWindowLongPtr(hwndDlg, DWLP_USER) == FALSE)
    {
        SetWindowLongPtr(hwndDlg, DWLP_USER, (LONG_PTR)TRUE);

        if (CreateThread(NULL, 0, UpdateThread, (PVOID)hwndDlg, 0, NULL) == NULL)
        {
            UpdateNTPStatus(hwndDlg, GetLastError());
            SetWindowLongPtr(hwndDlg, DWLP_USER, (LONG_PTR)FALSE);
        }
    }
}

Referenced by InetTimePageProc().

SetNTPServer()

static VOID SetNTPServer ( HWND  hwnd, BOOL  bBeginUpdate  )

static

Definition at line 93 of file internettime.c.

{
    HKEY hKey;
    HWND hList;
    UINT uSel;
    WCHAR szSel[4];
    LONG lRet;
    WCHAR buffer[256];
    WCHAR szFormat[BUFSIZE];

    hList = GetDlgItem(hwnd,
                       IDC_SERVERLIST);

    uSel = (UINT)SendMessageW(hList, CB_GETCURSEL, 0, 0);

    SendDlgItemMessageW(hwnd, IDC_SERVERLIST, WM_GETTEXT, _countof(buffer), (LPARAM)buffer);

    /* If the condition is true that means the user wants to update (synchronize) the time */
    if (bBeginUpdate)
    {
        /* Inform the user that the synchronization is about to begin (depending on how reachable the NTP server is) */
        StringCchPrintfW(szFormat, _countof(szFormat), SyncStatus.szSyncWait, buffer);
        SetDlgItemTextW(hwnd, IDC_SUCSYNC, szFormat);
    }

    /* If there is new data entered then save it in the registry
       The same key name of "0" is used to store all user entered values
    */
    if (uSel == -1)
    {
        lRet = RegOpenKeyExW(HKEY_LOCAL_MACHINE,
                             L"SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\DateTime\\Servers",
                             0,
                             KEY_SET_VALUE,
                             &hKey);
        if (lRet != ERROR_SUCCESS)
        {
            DisplayWin32Error(lRet);
            return;
        }
        lRet = RegSetValueExW(hKey,
                              L"0",
                              0,
                              REG_SZ,
                              (LPBYTE)buffer,
                              (wcslen(buffer) + 1) * sizeof(WCHAR));
        if (lRet != ERROR_SUCCESS)
            DisplayWin32Error(lRet);
    }

    /* Server reg entries count from 1,
     * Combo boxes count from 0 */
    uSel++;

    /* Convert to wide char */
    _itow(uSel, szSel, 10);

    lRet = RegOpenKeyExW(HKEY_LOCAL_MACHINE,
                         L"SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\DateTime\\Servers",
                         0,
                         KEY_SET_VALUE,
                         &hKey);
    if (lRet != ERROR_SUCCESS)
    {
        DisplayWin32Error(lRet);
        return;
    }

    lRet = RegSetValueExW(hKey,
                          L"",
                          0,
                          REG_SZ,
                          (LPBYTE)szSel,
                          (wcslen(szSel) + 1) * sizeof(WCHAR));
    if (lRet != ERROR_SUCCESS)
        DisplayWin32Error(lRet);

    RegCloseKey(hKey);
}

Referenced by InetTimePageProc(), and UpdateThread().

SyncNTPStatusInit()

static VOID SyncNTPStatusInit ( HWND  hwnd )

static

Definition at line 191 of file internettime.c.

{
    /* Initialize the Synchronization NTP status members */
    LoadStringW(hApplet, IDS_INETTIMEWELCOME, SyncStatus.szSyncInit, _countof(SyncStatus.szSyncInit));
    LoadStringW(hApplet, IDS_INETTIMESUCSYNC, SyncStatus.szSyncSuc, _countof(SyncStatus.szSyncSuc));
    LoadStringW(hApplet, IDS_INETTIMESYNCING, SyncStatus.szSyncWait, _countof(SyncStatus.szSyncWait));
    LoadStringW(hApplet, IDS_INETTIMEERROR, SyncStatus.szSyncErr, _countof(SyncStatus.szSyncErr));
    LoadStringW(hApplet, IDS_INETTIMESUCFILL, SyncStatus.szSyncType, _countof(SyncStatus.szSyncType));

    /*
     * TODO: XP's and Server 2003's timedate.cpl loads the last successful attempt of the NTP synchronization
     * displaying the last time and date of the said sync. I have no idea how does timedate.cpl remember its last
     * successful sync so for the time being, we will only load the initial remark string.
    */
    SetDlgItemTextW(hwnd, IDC_SUCSYNC, SyncStatus.szSyncInit);
}

Referenced by OnInitDialog().

UpdateNTPStatus()

static VOID UpdateNTPStatus ( HWND  hwnd, DWORD  dwReason  )

static

Definition at line 209 of file internettime.c.

{
    WCHAR szFormat[BUFSIZE];
    WCHAR szNtpServerName[MAX_VALUE_NAME];
    WCHAR szLocalDate[BUFSIZE];
    WCHAR szLocalTime[BUFSIZE];
    HWND hDlgComboList;

    /* Retrieve the server NTP name from the edit box */
    hDlgComboList = GetDlgItem(hwnd, IDC_SERVERLIST);
    SendMessageW(hDlgComboList, WM_GETTEXT, _countof(szNtpServerName), (LPARAM)szNtpServerName);

    /* Iterate over the case reasons so we can compute the exact status of the NTP synchronization */
    switch (dwReason)
    {
        /* The NTP time synchronization has completed successfully */
        case ERROR_SUCCESS:
        {
            /* Get the current date based on the locale identifier */
            GetDateFormatW(LOCALE_USER_DEFAULT,
                           DATE_SHORTDATE,
                           NULL,
                           NULL,
                           szLocalDate,
                           _countof(szLocalDate));

            /* Get the current time based on the locale identifier */
            GetTimeFormatW(LOCALE_USER_DEFAULT,
                           TIME_NOSECONDS,
                           NULL,
                           NULL,
                           szLocalTime,
                           _countof(szLocalTime));

            /* Format the resource sting with the given NTP server name and the current time data */
            StringCchPrintfW(szFormat, _countof(szFormat), SyncStatus.szSyncSuc, szNtpServerName, szLocalDate, szLocalTime);
            SetDlgItemTextW(hwnd, IDC_SUCSYNC, szFormat);
            break;
        }

        /* Empty field data has been caught -- simply tell the user to write the NTP name to continue */
        case ERROR_INVALID_DATA:
        {
            SetDlgItemTextW(hwnd, IDC_SUCSYNC, SyncStatus.szSyncType);
            DPRINT("UpdateNTPStatus(): The user didn't submit any NTP server name!\n");
            break;
        }

        /* General failure -- the NTP synchronization has failed for whatever reason */
        default:
        {
            StringCchPrintfW(szFormat, _countof(szFormat), SyncStatus.szSyncErr, szNtpServerName);
            SetDlgItemTextW(hwnd, IDC_SUCSYNC, szFormat);
            DPRINT("UpdateNTPStatus(): Failed to synchronize the time! (Error: %lu).\n", dwReason);
            break;
        }
    }
}

Referenced by OnUpdate(), and UpdateThread().

UpdateThread()

static DWORD WINAPI UpdateThread ( _In_ LPVOID  lpParameter )

static

Definition at line 346 of file internettime.c.

{
    HWND hwndDlg;
    DWORD dwError;

    hwndDlg = (HWND)lpParameter;

    SetNTPServer(hwndDlg, TRUE);

    dwError = W32TimeSyncNow(L"localhost", 0, 0);
    UpdateNTPStatus(hwndDlg, dwError);

    SetWindowLongPtr(hwndDlg, DWLP_USER, (LONG_PTR)FALSE);
    return 0;
}

Referenced by OnUpdate().

W32TimeSyncNow()

DWORD WINAPI W32TimeSyncNow	(	LPCWSTR	cmdline,
		UINT	blocking,
		UINT	flags
	)

Definition at line 345 of file w32time.c.

{
    DWORD result;
    result = SetTime();
    if (result)
    {
        DPRINT("W32TimeSyncNow failed and clock not set.\n");
    }
    else
    {
        DPRINT("W32TimeSyncNow succeeded and clock set.\n");
    }
    return result;
}

Referenced by UpdateThread().

Variable Documentation

SyncStatus

SYNC_STATUS SyncStatus

Definition at line 14 of file internettime.c.

Referenced by PpSetCustomTargetEvent(), SetNTPServer(), SyncNTPStatusInit(), and UpdateNTPStatus().