schedsvc.c

Go to the documentation of this file.

/*
 *  ReactOS Services
 *  Copyright (C) 2015 ReactOS Team
 *
 *  This program is free software; you can redistribute it and/or modify
 *  it under the terms of the GNU General Public License as published by
 *  the Free Software Foundation; either version 2 of the License, or
 *  (at your option) any later version.
 *
 *  This program is distributed in the hope that it will be useful,
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *  GNU General Public License for more details.
 *
 *  You should have received a copy of the GNU General Public License along
 *  with this program; if not, write to the Free Software Foundation, Inc.,
 *  51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
 */
/*
 * COPYRIGHT:        See COPYING in the top level directory
 * PROJECT:          ReactOS Services
 * FILE:             base/services/schedsvc/schedsvc.c
 * PURPOSE:          Scheduling service
 * PROGRAMMER:       Eric Kohl <eric.kohl@reactos.org>
 */
 
/* INCLUDES *****************************************************************/
 
#include "precomp.h"
 
WINE_DEFAULT_DEBUG_CHANNEL(schedsvc);
 
/* GLOBALS ******************************************************************/
 
static WCHAR ServiceName[] = L"Schedule";
 
static SERVICE_STATUS_HANDLE ServiceStatusHandle;
static SERVICE_STATUS ServiceStatus;
 
HANDLE Events[3] = {NULL, NULL, NULL}; // StopEvent, UpdateEvent, Timer
 
 
/* FUNCTIONS *****************************************************************/
 
static VOID
UpdateServiceStatus(DWORD dwState)
{
    ServiceStatus.dwServiceType = SERVICE_WIN32_SHARE_PROCESS;
    ServiceStatus.dwCurrentState = dwState;
 
    if (dwState == SERVICE_PAUSED || dwState == SERVICE_RUNNING)
        ServiceStatus.dwControlsAccepted = SERVICE_ACCEPT_STOP |
                                           SERVICE_ACCEPT_SHUTDOWN |
                                           SERVICE_ACCEPT_PAUSE_CONTINUE;
    else
        ServiceStatus.dwControlsAccepted = 0;
 
    ServiceStatus.dwWin32ExitCode = 0;
    ServiceStatus.dwServiceSpecificExitCode = 0;
    ServiceStatus.dwCheckPoint = 0;
 
    if (dwState == SERVICE_START_PENDING ||
        dwState == SERVICE_STOP_PENDING ||
        dwState == SERVICE_PAUSE_PENDING ||
        dwState == SERVICE_CONTINUE_PENDING)
        ServiceStatus.dwWaitHint = 10000;
    else
        ServiceStatus.dwWaitHint = 0;
 
    SetServiceStatus(ServiceStatusHandle,
                     &ServiceStatus);
}
 
 
static DWORD WINAPI
ServiceControlHandler(DWORD dwControl,
                      DWORD dwEventType,
                      LPVOID lpEventData,
                      LPVOID lpContext)
{
    TRACE("ServiceControlHandler()\n");
 
    switch (dwControl)
    {
        case SERVICE_CONTROL_STOP:
        case SERVICE_CONTROL_SHUTDOWN:
            TRACE("  SERVICE_CONTROL_STOP/SERVICE_CONTROL_SHUTDOWN received\n");
            UpdateServiceStatus(SERVICE_STOP_PENDING);
            /* Stop listening to incoming RPC messages */
            RpcMgmtStopServerListening(NULL);
            if (Events[0] != NULL)
                SetEvent(Events[0]);
            return ERROR_SUCCESS;
 
        case SERVICE_CONTROL_PAUSE:
            TRACE("  SERVICE_CONTROL_PAUSE received\n");
            UpdateServiceStatus(SERVICE_PAUSED);
            return ERROR_SUCCESS;
 
        case SERVICE_CONTROL_CONTINUE:
            TRACE("  SERVICE_CONTROL_CONTINUE received\n");
            UpdateServiceStatus(SERVICE_RUNNING);
            return ERROR_SUCCESS;
 
        case SERVICE_CONTROL_INTERROGATE:
            TRACE("  SERVICE_CONTROL_INTERROGATE received\n");
            SetServiceStatus(ServiceStatusHandle,
                             &ServiceStatus);
            return ERROR_SUCCESS;
 
#if 0
        case 128:
            TRACE("  Start Shell control received\n");
            return ERROR_SUCCESS;
 
        case 129:
            TRACE("  Logoff control received\n");
            return ERROR_SUCCESS;
#endif
 
        default:
            TRACE("  Control %lu received\n", dwControl);
            return ERROR_CALL_NOT_IMPLEMENTED;
    }
}
 
 
static
DWORD
ServiceInit(VOID)
{
    HANDLE hThread;
    DWORD dwError;
 
    /* Initialize the job list */
    InitializeListHead(&JobListHead);
 
    /* Initialize the job list lock */
    RtlInitializeResource(&JobListLock);
 
    /* Initialize the start list */
    InitializeListHead(&StartListHead);
 
    /* Initialize the start list lock */
    RtlInitializeResource(&StartListLock);
 
    /* Load stored jobs from the registry */
    dwError = LoadJobs();
    if (dwError != ERROR_SUCCESS)
        return dwError;
 
    /* Start the RPC thread */
    hThread = CreateThread(NULL,
                           0,
                           (LPTHREAD_START_ROUTINE)RpcThreadRoutine,
                           NULL,
                           0,
                           NULL);
    if (!hThread)
    {
        ERR("Could not create the RPC thread\n");
        return GetLastError();
    }
 
    CloseHandle(hThread);
 
    /* Create the stop event */
    Events[0] = CreateEvent(NULL, FALSE, FALSE, NULL);
    if (Events[0] == NULL)
    {
        ERR("Could not create the stop event\n");
        return GetLastError();
    }
 
    /* Create the update event */
    Events[1] = CreateEvent(NULL, FALSE, FALSE, NULL);
    if (Events[1] == NULL)
    {
        ERR("Could not create the update event\n");
        CloseHandle(Events[0]);
        return GetLastError();
    }
 
    Events[2] = CreateWaitableTimerW(NULL, FALSE, NULL);
    if (Events[2] == NULL)
    {
        ERR("Could not create the timer\n");
        CloseHandle(Events[1]);
        CloseHandle(Events[0]);
        return GetLastError();
    }
 
    return ERROR_SUCCESS;
}
 
 
VOID WINAPI
SchedServiceMain(DWORD argc, LPTSTR *argv)
{
    DWORD dwWait, dwError;
 
    UNREFERENCED_PARAMETER(argc);
    UNREFERENCED_PARAMETER(argv);
 
    TRACE("SchedServiceMain()\n");
 
    ServiceStatusHandle = RegisterServiceCtrlHandlerExW(ServiceName,
                                                        ServiceControlHandler,
                                                        NULL);
    if (!ServiceStatusHandle)
    {
        ERR("RegisterServiceCtrlHandlerExW() failed! (Error %lu)\n", GetLastError());
        return;
    }
 
    UpdateServiceStatus(SERVICE_START_PENDING);
 
    dwError = ServiceInit();
    if (dwError != ERROR_SUCCESS)
    {
        ERR("Service stopped (dwError: %lu\n", dwError);
        UpdateServiceStatus(SERVICE_STOPPED);
        return;
    }
 
    UpdateServiceStatus(SERVICE_RUNNING);
 
    GetNextJobTimeout(Events[2]);
 
    for (;;)
    {
        /* Wait for the next event */
        TRACE("Wait for next event!\n");
        dwWait = WaitForMultipleObjects(3, Events, FALSE, INFINITE);
        if (dwWait == WAIT_OBJECT_0)
        {
            TRACE("Stop event signaled!\n");
            break;
        }
        else if (dwWait == WAIT_OBJECT_0 + 1)
        {
            TRACE("Update event signaled!\n");
 
            RtlAcquireResourceShared(&JobListLock, TRUE);
            GetNextJobTimeout(Events[2]);
            RtlReleaseResource(&JobListLock);
        }
        else if (dwWait == WAIT_OBJECT_0 + 2)
        {
            TRACE("Timeout: Start the next job!\n");
 
            RtlAcquireResourceExclusive(&JobListLock, TRUE);
            RunCurrentJobs();
            GetNextJobTimeout(Events[2]);
            RtlReleaseResource(&JobListLock);
        }
    }
 
    /* Close the start and update event handles */
    CloseHandle(Events[0]);
    CloseHandle(Events[1]);
    CloseHandle(Events[2]);
 
    /* Stop the service */
    UpdateServiceStatus(SERVICE_STOPPED);
}
 
 
BOOL WINAPI
DllMain(HINSTANCE hinstDLL,
        DWORD fdwReason,
        LPVOID lpvReserved)
{
    switch (fdwReason)
    {
        case DLL_PROCESS_ATTACH:
            DisableThreadLibraryCalls(hinstDLL);
            break;
 
        case DLL_PROCESS_DETACH:
            break;
    }
 
    return TRUE;
}