\r
SERVICE_STATUS service_status;\r
SERVICE_STATUS_HANDLE service_handle;\r
+HANDLE process_handle;\r
HANDLE wait_handle;\r
-HANDLE pid;\r
+unsigned long pid;\r
static char service_name[SERVICE_NAME_LENGTH];\r
char exe[EXE_LENGTH];\r
char flags[CMD_LENGTH];\r
char dir[MAX_PATH];\r
+bool stopping;\r
+CRITICAL_SECTION throttle_section;\r
+CONDITION_VARIABLE throttle_condition;\r
\r
static enum { NSSM_EXIT_RESTART, NSSM_EXIT_IGNORE, NSSM_EXIT_REALLY, NSSM_EXIT_UNCLEAN } exit_actions;\r
static const char *exit_action_strings[] = { "Restart", "Ignore", "Exit", "Suicide", 0 };\r
\r
+static unsigned long throttle;\r
+\r
+static inline int throttle_milliseconds() {\r
+ /* pow() operates on doubles. */\r
+ int ret = 1; for (unsigned long i = 1; i < throttle; i++) ret *= 2;\r
+ return ret * 1000;\r
+}\r
+\r
/* Connect to the service manager */\r
SC_HANDLE open_service_manager() {\r
SC_HANDLE ret = OpenSCManager(0, SERVICES_ACTIVE_DATABASE, SC_MANAGER_ALL_ACCESS);\r
\r
/* Arguments are optional */\r
char *flags;\r
- if (argc == 2) flags = "";\r
- else flags = argv[2];\r
+ size_t flagslen = 0;\r
+ size_t s = 0;\r
+ int i;\r
+ for (i = 2; i < argc; i++) flagslen += strlen(argv[i]) + 1;\r
+ if (! flagslen) flagslen = 1;\r
+\r
+ flags = (char *) HeapAlloc(GetProcessHeap(), 0, flagslen);\r
+ if (! flags) {\r
+ log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, "flags", "pre_install_service()", 0);\r
+ return 2;\r
+ }\r
+ ZeroMemory(flags, flagslen);\r
+\r
+ /*\r
+ This probably isn't UTF8-safe and should use std::string or something\r
+ but it's been broken for the best part of a decade and due for a rewrite\r
+ anyway so it'll do as a quick-'n'-dirty fix. Note that we don't free\r
+ the flags buffer but as the program exits that isn't a big problem.\r
+ */\r
+ for (i = 2; i < argc; i++) {\r
+ size_t len = strlen(argv[i]);\r
+ memmove(flags + s, argv[i], len);\r
+ s += len;\r
+ if (i < argc - 1) flags[s++] = ' ';\r
+ }\r
\r
return install_service(argv[0], argv[1], flags);\r
}\r
/* Initialise status */\r
ZeroMemory(&service_status, sizeof(service_status));\r
service_status.dwServiceType = SERVICE_WIN32_OWN_PROCESS | SERVICE_INTERACTIVE_PROCESS;\r
- service_status.dwControlsAccepted = SERVICE_ACCEPT_SHUTDOWN | SERVICE_ACCEPT_STOP;\r
+ service_status.dwControlsAccepted = SERVICE_ACCEPT_SHUTDOWN | SERVICE_ACCEPT_STOP | SERVICE_ACCEPT_PAUSE_CONTINUE;\r
service_status.dwWin32ExitCode = NO_ERROR;\r
service_status.dwServiceSpecificExitCode = 0;\r
service_status.dwCheckPoint = 0;\r
- service_status.dwWaitHint = 1000;\r
+ service_status.dwWaitHint = NSSM_WAITHINT_MARGIN;\r
\r
/* Signal we AREN'T running the server */\r
+ process_handle = 0;\r
pid = 0;\r
\r
/* Register control handler */\r
}\r
\r
service_status.dwCurrentState = SERVICE_START_PENDING;\r
+ service_status.dwWaitHint = NSSM_RESET_THROTTLE_RESTART + NSSM_WAITHINT_MARGIN;\r
SetServiceStatus(service_handle, &service_status);\r
\r
/* Try to create the exit action parameters; we don't care if it fails */\r
\r
set_service_recovery(service_name);\r
\r
+ /* Used for signalling a resume if the service pauses when throttled. */\r
+ InitializeCriticalSection(&throttle_section);\r
+\r
monitor_service();\r
}\r
\r
log_event(EVENTLOG_INFORMATION_TYPE, NSSM_EVENT_STARTED_SERVICE, exe, flags, service_name, dir, 0);\r
\r
/* Monitor service service */\r
- if (! RegisterWaitForSingleObject(&wait_handle, pid, end_service, 0, INFINITE, WT_EXECUTEONLYONCE | WT_EXECUTELONGFUNCTION)) {\r
+ if (! RegisterWaitForSingleObject(&wait_handle, process_handle, end_service, (void *) pid, INFINITE, WT_EXECUTEONLYONCE | WT_EXECUTELONGFUNCTION)) {\r
log_event(EVENTLOG_WARNING_TYPE, NSSM_EVENT_REGISTERWAITFORSINGLEOBJECT_FAILED, service_name, exe, GetLastError(), 0);\r
}\r
\r
case SERVICE_CONTROL_STOP:\r
stop_service(0, true, true);\r
return NO_ERROR;\r
+\r
+ case SERVICE_CONTROL_CONTINUE:\r
+ throttle = 0;\r
+ WakeConditionVariable(&throttle_condition);\r
+ service_status.dwCurrentState = SERVICE_CONTINUE_PENDING;\r
+ service_status.dwWaitHint = throttle_milliseconds() + NSSM_WAITHINT_MARGIN;\r
+ log_event(EVENTLOG_INFORMATION_TYPE, NSSM_EVENT_RESET_THROTTLE, service_name, 0);\r
+ SetServiceStatus(service_handle, &service_status);\r
+ return NO_ERROR;\r
+\r
+ case SERVICE_CONTROL_PAUSE:\r
+ /*\r
+ We don't accept pause messages but it isn't possible to register\r
+ only for continue messages so we have to handle this case.\r
+ */\r
+ return ERROR_CALL_NOT_IMPLEMENTED;\r
}\r
\r
/* Unknown control */\r
\r
/* Start the service */\r
int start_service() {\r
- if (pid) return 0;\r
+ stopping = false;\r
+\r
+ if (process_handle) return 0;\r
\r
/* Allocate a STARTUPINFO structure for a new process */\r
STARTUPINFO si;\r
log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, "command line", "start_service", 0);\r
return stop_service(2, true, true);\r
}\r
- if (! CreateProcess(0, cmd, 0, 0, 0, 0, 0, dir, &si, &pi)) {\r
+\r
+ throttle_restart();\r
+\r
+ if (! CreateProcess(0, cmd, 0, 0, false, 0, 0, dir, &si, &pi)) {\r
log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_CREATEPROCESS_FAILED, service_name, exe, GetLastError(), 0);\r
return stop_service(3, true, true);\r
}\r
- pid = pi.hProcess;\r
+ process_handle = pi.hProcess;\r
+ pid = pi.dwProcessId;\r
\r
/* Signal successful start */\r
service_status.dwCurrentState = SERVICE_RUNNING;\r
SetServiceStatus(service_handle, &service_status);\r
\r
+ /* Wait for a clean startup. */\r
+ if (WaitForSingleObject(process_handle, NSSM_RESET_THROTTLE_RESTART) == WAIT_TIMEOUT) throttle = 0;\r
+\r
return 0;\r
}\r
\r
/* Signal we are stopping */\r
if (graceful) {\r
service_status.dwCurrentState = SERVICE_STOP_PENDING;\r
+ service_status.dwWaitHint = NSSM_KILL_WINDOW_GRACE_PERIOD + NSSM_KILL_THREADS_GRACE_PERIOD + NSSM_WAITHINT_MARGIN;\r
SetServiceStatus(service_handle, &service_status);\r
}\r
\r
if (pid) {\r
/* Shut down server */\r
log_event(EVENTLOG_INFORMATION_TYPE, NSSM_EVENT_TERMINATEPROCESS, service_name, exe, 0);\r
- TerminateProcess(pid, 0);\r
- pid = 0;\r
+ kill_process(service_name, process_handle, pid, 0);\r
+ process_handle = 0;\r
}\r
else log_event(EVENTLOG_INFORMATION_TYPE, NSSM_EVENT_PROCESS_ALREADY_STOPPED, service_name, exe, 0);\r
\r
+ end_service((void *) pid, true);\r
+\r
/* Signal we stopped */\r
if (graceful) {\r
service_status.dwCurrentState = SERVICE_STOPPED;\r
\r
/* Callback function triggered when the server exits */\r
void CALLBACK end_service(void *arg, unsigned char why) {\r
+ if (stopping) return;\r
+\r
+ stopping = true;\r
+\r
+ pid = (unsigned long) arg;\r
+\r
/* Check exit code */\r
- unsigned long ret = 0;\r
- GetExitCodeProcess(pid, &ret);\r
+ unsigned long exitcode = 0;\r
+ GetExitCodeProcess(process_handle, &exitcode);\r
+\r
+ /* Clean up. */\r
+ kill_process_tree(service_name, pid, exitcode, pid);\r
+\r
+ /*\r
+ The why argument is true if our wait timed out or false otherwise.\r
+ Our wait is infinite so why will never be true when called by the system.\r
+ If it is indeed true, assume we were called from stop_service() because\r
+ this is a controlled shutdown, and don't take any restart action.\r
+ */\r
+ if (why) return;\r
\r
char code[16];\r
- _snprintf(code, sizeof(code), "%d", ret);\r
+ _snprintf(code, sizeof(code), "%d", exitcode);\r
log_event(EVENTLOG_INFORMATION_TYPE, NSSM_EVENT_ENDED_SERVICE, exe, service_name, code, 0);\r
\r
/* What action should we take? */\r
int action = NSSM_EXIT_RESTART;\r
unsigned char action_string[ACTION_LEN];\r
bool default_action;\r
- if (! get_exit_action(service_name, &ret, action_string, &default_action)) {\r
+ if (! get_exit_action(service_name, &exitcode, action_string, &default_action)) {\r
for (int i = 0; exit_action_strings[i]; i++) {\r
if (! _strnicmp((const char *) action_string, exit_action_strings[i], ACTION_LEN)) {\r
action = i;\r
}\r
}\r
\r
+ process_handle = 0;\r
pid = 0;\r
switch (action) {\r
/* Try to restart the service or return failure code to service manager */\r
/* Tell the service manager we are finished */\r
case NSSM_EXIT_REALLY:\r
log_event(EVENTLOG_INFORMATION_TYPE, NSSM_EVENT_EXIT_REALLY, service_name, code, exit_action_strings[action], 0);\r
- stop_service(ret, true, default_action);\r
+ stop_service(exitcode, true, default_action);\r
break;\r
\r
/* Fake a crash so pre-Vista service managers will run recovery actions. */\r
case NSSM_EXIT_UNCLEAN:\r
log_event(EVENTLOG_INFORMATION_TYPE, NSSM_EVENT_EXIT_UNCLEAN, service_name, code, exit_action_strings[action], 0);\r
- exit(stop_service(ret, false, default_action));\r
+ exit(stop_service(exitcode, false, default_action));\r
break;\r
}\r
}\r
+\r
+void throttle_restart() {\r
+ /* This can't be a restart if the service is already running. */\r
+ if (! throttle++) return;\r
+\r
+ int ms = throttle_milliseconds();\r
+\r
+ if (throttle > 7) throttle = 8;\r
+\r
+ char threshold[8], milliseconds[8];\r
+ _snprintf(threshold, sizeof(threshold), "%d", NSSM_RESET_THROTTLE_RESTART);\r
+ _snprintf(milliseconds, sizeof(milliseconds), "%d", ms);\r
+ log_event(EVENTLOG_WARNING_TYPE, NSSM_EVENT_THROTTLED, service_name, threshold, milliseconds, 0);\r
+\r
+ EnterCriticalSection(&throttle_section);\r
+\r
+ service_status.dwCurrentState = SERVICE_PAUSED;\r
+ SetServiceStatus(service_handle, &service_status);\r
+\r
+ SleepConditionVariableCS(&throttle_condition, &throttle_section, ms);\r
+\r
+ LeaveCriticalSection(&throttle_section);\r
+}\r