registry.cpp

   1 #include "nssm.h"\r
   2 \r
   3 extern const TCHAR *exit_action_strings[];\r
   4 \r
   5 int create_messages() {\r
   6   HKEY key;\r
   7 \r
   8   TCHAR registry[KEY_LENGTH];\r
   9   if (_sntprintf_s(registry, _countof(registry), _TRUNCATE, _T("SYSTEM\\CurrentControlSet\\Services\\EventLog\\Application\\%s"), NSSM) < 0) {\r
  10     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, _T("eventlog registry"), _T("create_messages()"), 0);\r
  11     return 1;\r
  12   }\r
  13 \r
  14   if (RegCreateKeyEx(HKEY_LOCAL_MACHINE, registry, 0, 0, REG_OPTION_NON_VOLATILE, KEY_WRITE, 0, &key, 0) != ERROR_SUCCESS) {\r
  15     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OPENKEY_FAILED, registry, error_string(GetLastError()), 0);\r
  16     return 2;\r
  17   }\r
  18 \r
  19   /* Get path of this program */\r
  20   TCHAR path[MAX_PATH];\r
  21   GetModuleFileName(0, path, _countof(path));\r
  22 \r
  23   /* Try to register the module but don't worry so much on failure */\r
  24   RegSetValueEx(key, _T("EventMessageFile"), 0, REG_SZ, (const unsigned char *) path, (unsigned long) (_tcslen(path) +  1) * sizeof(TCHAR));\r
  25   unsigned long types = EVENTLOG_INFORMATION_TYPE | EVENTLOG_WARNING_TYPE | EVENTLOG_ERROR_TYPE;\r
  26   RegSetValueEx(key, _T("TypesSupported"), 0, REG_DWORD, (const unsigned char *) &types, sizeof(types));\r
  27 \r
  28   return 0;\r
  29 }\r
  30 \r
  31 int create_parameters(nssm_service_t *service) {\r
  32   /* Get registry */\r
  33   TCHAR registry[KEY_LENGTH];\r
  34   if (_sntprintf_s(registry, _countof(registry), _TRUNCATE, NSSM_REGISTRY, service->name) < 0) {\r
  35     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, _T("NSSM_REGISTRY"), _T("create_parameters()"), 0);\r
  36     return 1;\r
  37   }\r
  38 \r
  39   /* Try to open the registry */\r
  40   HKEY key;\r
  41   if (RegCreateKeyEx(HKEY_LOCAL_MACHINE, registry, 0, 0, REG_OPTION_NON_VOLATILE, KEY_WRITE, 0, &key, 0) != ERROR_SUCCESS) {\r
  42     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OPENKEY_FAILED, registry, error_string(GetLastError()), 0);\r
  43     return 2;\r
  44   }\r
  45 \r
  46   /* Try to create the parameters */\r
  47   if (set_expand_string(key, NSSM_REG_EXE, service->exe)) {\r
  48     RegDeleteKey(HKEY_LOCAL_MACHINE, NSSM_REGISTRY);\r
  49     RegCloseKey(key);\r
  50     return 3;\r
  51   }\r
  52   if (set_expand_string(key, NSSM_REG_FLAGS, service->flags)) {\r
  53     RegDeleteKey(HKEY_LOCAL_MACHINE, NSSM_REGISTRY);\r
  54     RegCloseKey(key);\r
  55     return 4;\r
  56   }\r
  57   if (set_expand_string(key, NSSM_REG_DIR, service->dir)) {\r
  58     RegDeleteKey(HKEY_LOCAL_MACHINE, NSSM_REGISTRY);\r
  59     RegCloseKey(key);\r
  60     return 5;\r
  61   }\r
  62 \r
  63   /* Other non-default parameters. May fail. */\r
  64   unsigned long stop_method_skip = ~service->stop_method;\r
  65   if (stop_method_skip) set_number(key, NSSM_REG_STOP_METHOD_SKIP, stop_method_skip);\r
  66   if (service->default_exit_action < NSSM_NUM_EXIT_ACTIONS) create_exit_action(service->name, exit_action_strings[service->default_exit_action]);\r
  67   if (service->throttle_delay != NSSM_RESET_THROTTLE_RESTART) set_number(key, NSSM_REG_THROTTLE, service->throttle_delay);\r
  68   if (service->kill_console_delay != NSSM_KILL_CONSOLE_GRACE_PERIOD) set_number(key, NSSM_REG_KILL_CONSOLE_GRACE_PERIOD, service->kill_console_delay);\r
  69   if (service->kill_window_delay != NSSM_KILL_WINDOW_GRACE_PERIOD) set_number(key, NSSM_REG_KILL_WINDOW_GRACE_PERIOD, service->kill_window_delay);\r
  70   if (service->kill_threads_delay != NSSM_KILL_THREADS_GRACE_PERIOD) set_number(key, NSSM_REG_KILL_THREADS_GRACE_PERIOD, service->kill_threads_delay);\r
  71   if (service->stdin_path[0]) {\r
  72     set_expand_string(key, NSSM_REG_STDIN, service->stdin_path);\r
  73     if (service->stdin_sharing != NSSM_STDIN_SHARING) set_createfile_parameter(key, NSSM_REG_STDIN, NSSM_REG_STDIO_SHARING, service->stdin_sharing);\r
  74     if (service->stdin_disposition != NSSM_STDIN_DISPOSITION) set_createfile_parameter(key, NSSM_REG_STDIN, NSSM_REG_STDIO_DISPOSITION, service->stdin_disposition);\r
  75     if (service->stdin_flags != NSSM_STDIN_FLAGS) set_createfile_parameter(key, NSSM_REG_STDIN, NSSM_REG_STDIO_FLAGS, service->stdin_flags);\r
  76   }\r
  77   if (service->stdout_path[0]) {\r
  78     set_expand_string(key, NSSM_REG_STDOUT, service->stdout_path);\r
  79     if (service->stdout_sharing != NSSM_STDOUT_SHARING) set_createfile_parameter(key, NSSM_REG_STDOUT, NSSM_REG_STDIO_SHARING, service->stdout_sharing);\r
  80     if (service->stdout_disposition != NSSM_STDOUT_DISPOSITION) set_createfile_parameter(key, NSSM_REG_STDOUT, NSSM_REG_STDIO_DISPOSITION, service->stdout_disposition);\r
  81     if (service->stdout_flags != NSSM_STDOUT_FLAGS) set_createfile_parameter(key, NSSM_REG_STDOUT, NSSM_REG_STDIO_FLAGS, service->stdout_flags);\r
  82   }\r
  83   if (service->stderr_path[0]) {\r
  84     set_expand_string(key, NSSM_REG_STDERR, service->stderr_path);\r
  85     if (service->stderr_sharing != NSSM_STDERR_SHARING) set_createfile_parameter(key, NSSM_REG_STDERR, NSSM_REG_STDIO_SHARING, service->stderr_sharing);\r
  86     if (service->stderr_disposition != NSSM_STDERR_DISPOSITION) set_createfile_parameter(key, NSSM_REG_STDERR, NSSM_REG_STDIO_DISPOSITION, service->stderr_disposition);\r
  87     if (service->stderr_flags != NSSM_STDERR_FLAGS) set_createfile_parameter(key, NSSM_REG_STDERR, NSSM_REG_STDIO_FLAGS, service->stderr_flags);\r
  88   }\r
  89   if (service->rotate_files) set_number(key, NSSM_REG_ROTATE, 1);\r
  90   if (service->rotate_seconds) set_number(key, NSSM_REG_ROTATE_SECONDS, service->rotate_seconds);\r
  91   if (service->rotate_bytes_low) set_number(key, NSSM_REG_ROTATE_BYTES_LOW, service->rotate_bytes_low);\r
  92   if (service->rotate_bytes_high) set_number(key, NSSM_REG_ROTATE_BYTES_HIGH, service->rotate_bytes_high);\r
  93 \r
  94   /* Environment */\r
  95   if (service->env) {\r
  96     if (RegSetValueEx(key, NSSM_REG_ENV, 0, REG_MULTI_SZ, (const unsigned char *) service->env, (unsigned long) service->envlen * sizeof(TCHAR)) != ERROR_SUCCESS) {\r
  97       log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_SETVALUE_FAILED, NSSM_REG_ENV, error_string(GetLastError()), 0);\r
  98     }\r
  99   }\r
 100   if (service->env_extra) {\r
 101     if (RegSetValueEx(key, NSSM_REG_ENV_EXTRA, 0, REG_MULTI_SZ, (const unsigned char *) service->env_extra, (unsigned long) service->env_extralen * sizeof(TCHAR)) != ERROR_SUCCESS) {\r
 102       log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_SETVALUE_FAILED, NSSM_REG_ENV_EXTRA, error_string(GetLastError()), 0);\r
 103     }\r
 104   }\r
 105 \r
 106   /* Close registry. */\r
 107   RegCloseKey(key);\r
 108 \r
 109   return 0;\r
 110 }\r
 111 \r
 112 int create_exit_action(TCHAR *service_name, const TCHAR *action_string) {\r
 113   /* Get registry */\r
 114   TCHAR registry[KEY_LENGTH];\r
 115   if (_sntprintf_s(registry, _countof(registry), _TRUNCATE, NSSM_REGISTRY _T("\\%s"), service_name, NSSM_REG_EXIT) < 0) {\r
 116     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, _T("NSSM_REG_EXIT"), _T("create_exit_action()"), 0);\r
 117     return 1;\r
 118   }\r
 119 \r
 120   /* Try to open the registry */\r
 121   HKEY key;\r
 122   unsigned long disposition;\r
 123   if (RegCreateKeyEx(HKEY_LOCAL_MACHINE, registry, 0, 0, REG_OPTION_NON_VOLATILE, KEY_WRITE, 0, &key, &disposition) != ERROR_SUCCESS) {\r
 124     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OPENKEY_FAILED, registry, error_string(GetLastError()), 0);\r
 125     return 2;\r
 126   }\r
 127 \r
 128   /* Do nothing if the key already existed */\r
 129   if (disposition == REG_OPENED_EXISTING_KEY) {\r
 130     RegCloseKey(key);\r
 131     return 0;\r
 132   }\r
 133 \r
 134   /* Create the default value */\r
 135   if (RegSetValueEx(key, 0, 0, REG_SZ, (const unsigned char *) action_string, (unsigned long) (_tcslen(action_string) + 1) * sizeof(TCHAR)) != ERROR_SUCCESS) {\r
 136     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_SETVALUE_FAILED, NSSM_REG_EXIT, error_string(GetLastError()), 0);\r
 137     RegCloseKey(key);\r
 138     return 3;\r
 139   }\r
 140 \r
 141   /* Close registry */\r
 142   RegCloseKey(key);\r
 143 \r
 144   return 0;\r
 145 }\r
 146 \r
 147 int set_environment(TCHAR *service_name, HKEY key, TCHAR *value, TCHAR **env, unsigned long *envlen) {\r
 148   unsigned long type = REG_MULTI_SZ;\r
 149 \r
 150   /* Dummy test to find buffer size */\r
 151   unsigned long ret = RegQueryValueEx(key, value, 0, &type, NULL, envlen);\r
 152   if (ret != ERROR_SUCCESS) {\r
 153     *envlen = 0;\r
 154     /* The service probably doesn't have any environment configured */\r
 155     if (ret == ERROR_FILE_NOT_FOUND) return 0;\r
 156     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_QUERYVALUE_FAILED, value, error_string(GetLastError()), 0);\r
 157     return 1;\r
 158   }\r
 159 \r
 160   if (type != REG_MULTI_SZ) {\r
 161     log_event(EVENTLOG_WARNING_TYPE, NSSM_EVENT_INVALID_ENVIRONMENT_STRING_TYPE, value, service_name, 0);\r
 162     return 2;\r
 163   }\r
 164 \r
 165   /* Probably not possible */\r
 166   if (! *envlen) return 0;\r
 167 \r
 168   /* Previously initialised? */\r
 169   if (*env) HeapFree(GetProcessHeap(), 0, *env);\r
 170 \r
 171   *env = (TCHAR *) HeapAlloc(GetProcessHeap(), 0, *envlen);\r
 172   if (! *env) {\r
 173     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, value, _T("set_environment()"), 0);\r
 174     return 3;\r
 175   }\r
 176 \r
 177   /* Actually get the strings */\r
 178   ret = RegQueryValueEx(key, value, 0, &type, (unsigned char *) *env, envlen);\r
 179   if (ret != ERROR_SUCCESS) {\r
 180     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_QUERYVALUE_FAILED, value, error_string(GetLastError()), 0);\r
 181     HeapFree(GetProcessHeap(), 0, *env);\r
 182     *env = 0;\r
 183     *envlen = 0;\r
 184     return 4;\r
 185   }\r
 186 \r
 187   return 0;\r
 188 }\r
 189 \r
 190 int expand_parameter(HKEY key, TCHAR *value, TCHAR *data, unsigned long datalen, bool sanitise, bool must_exist) {\r
 191   TCHAR *buffer = (TCHAR *) HeapAlloc(GetProcessHeap(), 0, datalen);\r
 192   if (! buffer) {\r
 193     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, value, _T("expand_parameter()"), 0);\r
 194     return 1;\r
 195   }\r
 196 \r
 197   ZeroMemory(data, datalen);\r
 198 \r
 199   unsigned long type = REG_EXPAND_SZ;\r
 200   unsigned long buflen = datalen;\r
 201 \r
 202   unsigned long ret = RegQueryValueEx(key, value, 0, &type, (unsigned char *) buffer, &buflen);\r
 203   if (ret != ERROR_SUCCESS) {\r
 204     unsigned long error = GetLastError();\r
 205     HeapFree(GetProcessHeap(), 0, buffer);\r
 206 \r
 207     if (ret == ERROR_FILE_NOT_FOUND) {\r
 208       if (! must_exist) return 0;\r
 209     }\r
 210 \r
 211     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_QUERYVALUE_FAILED, value, error_string(error), 0);\r
 212     return 2;\r
 213   }\r
 214 \r
 215   /* Paths aren't allowed to contain quotes. */\r
 216   if (sanitise) PathUnquoteSpaces(buffer);\r
 217 \r
 218   /* Technically we shouldn't expand environment strings from REG_SZ values */\r
 219   if (type != REG_EXPAND_SZ) {\r
 220     memmove(data, buffer, buflen);\r
 221     HeapFree(GetProcessHeap(), 0, buffer);\r
 222     return 0;\r
 223   }\r
 224 \r
 225   ret = ExpandEnvironmentStrings((TCHAR *) buffer, data, datalen);\r
 226   if (! ret || ret > datalen) {\r
 227     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_EXPANDENVIRONMENTSTRINGS_FAILED, buffer, error_string(GetLastError()), 0);\r
 228     HeapFree(GetProcessHeap(), 0, buffer);\r
 229     return 3;\r
 230   }\r
 231 \r
 232   HeapFree(GetProcessHeap(), 0, buffer);\r
 233   return 0;\r
 234 }\r
 235 \r
 236 int expand_parameter(HKEY key, TCHAR *value, TCHAR *data, unsigned long datalen, bool sanitise) {\r
 237   return expand_parameter(key, value, data, datalen, sanitise, true);\r
 238 }\r
 239 \r
 240 /*\r
 241   Sets a string in the registry.\r
 242   Returns: 0 if it was set.\r
 243            1 on error.\r
 244 */\r
 245 int set_expand_string(HKEY key, TCHAR *value, TCHAR *string) {\r
 246   if (RegSetValueEx(key, value, 0, REG_EXPAND_SZ, (const unsigned char *) string, (unsigned long) (_tcslen(string) + 1) * sizeof(TCHAR)) == ERROR_SUCCESS) return 0;\r
 247   log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_SETVALUE_FAILED, value, error_string(GetLastError()), 0);\r
 248   return 1;\r
 249 }\r
 250 \r
 251 /*\r
 252   Set an unsigned long in the registry.\r
 253   Returns: 0 if it was set.\r
 254            1 on error.\r
 255 */\r
 256 int set_number(HKEY key, TCHAR *value, unsigned long number) {\r
 257   if (RegSetValueEx(key, value, 0, REG_DWORD, (const unsigned char *) &number, sizeof(number)) == ERROR_SUCCESS) return 0;\r
 258   log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_SETVALUE_FAILED, value, error_string(GetLastError()), 0);\r
 259   return 1;\r
 260 }\r
 261 \r
 262 /*\r
 263   Query an unsigned long from the registry.\r
 264   Returns:  1 if a number was retrieved.\r
 265             0 if none was found and must_exist is false.\r
 266            -1 if none was found and must_exist is true.\r
 267            -2 otherwise.\r
 268 */\r
 269 int get_number(HKEY key, TCHAR *value, unsigned long *number, bool must_exist) {\r
 270   unsigned long type = REG_DWORD;\r
 271   unsigned long number_len = sizeof(unsigned long);\r
 272 \r
 273   int ret = RegQueryValueEx(key, value, 0, &type, (unsigned char *) number, &number_len);\r
 274   if (ret == ERROR_SUCCESS) return 1;\r
 275 \r
 276   if (ret == ERROR_FILE_NOT_FOUND) {\r
 277     if (! must_exist) return 0;\r
 278   }\r
 279 \r
 280   log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_QUERYVALUE_FAILED, value, error_string(GetLastError()), 0);\r
 281   if (ret == ERROR_FILE_NOT_FOUND) return -1;\r
 282 \r
 283   return -2;\r
 284 }\r
 285 \r
 286 int get_number(HKEY key, TCHAR *value, unsigned long *number) {\r
 287   return get_number(key, value, number, true);\r
 288 }\r
 289 \r
 290 void override_milliseconds(TCHAR *service_name, HKEY key, TCHAR *value, unsigned long *buffer, unsigned long default_value, unsigned long event) {\r
 291   unsigned long type = REG_DWORD;\r
 292   unsigned long buflen = sizeof(unsigned long);\r
 293   bool ok = false;\r
 294   unsigned long ret = RegQueryValueEx(key, value, 0, &type, (unsigned char *) buffer, &buflen);\r
 295   if (ret != ERROR_SUCCESS) {\r
 296     if (ret != ERROR_FILE_NOT_FOUND) {\r
 297       if (type != REG_DWORD) {\r
 298         TCHAR milliseconds[16];\r
 299         _sntprintf_s(milliseconds, _countof(milliseconds), _TRUNCATE, _T("%lu"), default_value);\r
 300         log_event(EVENTLOG_WARNING_TYPE, event, service_name, value, milliseconds, 0);\r
 301       }\r
 302       else log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_QUERYVALUE_FAILED, value, error_string(GetLastError()), 0);\r
 303     }\r
 304   }\r
 305   else ok = true;\r
 306 \r
 307   if (! ok) *buffer = default_value;\r
 308 }\r
 309 \r
 310 int get_parameters(nssm_service_t *service, STARTUPINFO *si) {\r
 311   unsigned long ret;\r
 312 \r
 313   /* Get registry */\r
 314   TCHAR registry[KEY_LENGTH];\r
 315   if (_sntprintf_s(registry, _countof(registry), _TRUNCATE, NSSM_REGISTRY, service->name) < 0) {\r
 316     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, _T("NSSM_REGISTRY"), _T("get_parameters()"), 0);\r
 317     return 1;\r
 318   }\r
 319 \r
 320   /* Try to open the registry */\r
 321   HKEY key;\r
 322   if (RegOpenKeyEx(HKEY_LOCAL_MACHINE, registry, 0, KEY_READ, &key) != ERROR_SUCCESS) {\r
 323     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OPENKEY_FAILED, registry, error_string(GetLastError()), 0);\r
 324     return 2;\r
 325   }\r
 326 \r
 327   /* Try to get executable file - MUST succeed */\r
 328   if (expand_parameter(key, NSSM_REG_EXE, service->exe, sizeof(service->exe), false)) {\r
 329     RegCloseKey(key);\r
 330     return 3;\r
 331   }\r
 332 \r
 333   /* Try to get flags - may fail and we don't care */\r
 334   if (expand_parameter(key, NSSM_REG_FLAGS, service->flags, sizeof(service->flags), false)) {\r
 335     log_event(EVENTLOG_WARNING_TYPE, NSSM_EVENT_NO_FLAGS, NSSM_REG_FLAGS, service->name, service->exe, 0);\r
 336     ZeroMemory(service->flags, sizeof(service->flags));\r
 337   }\r
 338 \r
 339   /* Try to get startup directory - may fail and we fall back to a default */\r
 340   if (expand_parameter(key, NSSM_REG_DIR, service->dir, sizeof(service->dir), true) || ! service->dir[0]) {\r
 341     _sntprintf_s(service->dir, _countof(service->dir), _TRUNCATE, _T("%s"), service->exe);\r
 342     strip_basename(service->dir);\r
 343     if (service->dir[0] == _T('\0')) {\r
 344       /* Help! */\r
 345       ret = GetWindowsDirectory(service->dir, sizeof(service->dir));\r
 346       if (! ret || ret > sizeof(service->dir)) {\r
 347         log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_NO_DIR_AND_NO_FALLBACK, NSSM_REG_DIR, service->name, 0);\r
 348         RegCloseKey(key);\r
 349         return 4;\r
 350       }\r
 351     }\r
 352     log_event(EVENTLOG_WARNING_TYPE, NSSM_EVENT_NO_DIR, NSSM_REG_DIR, service->name, service->dir, 0);\r
 353   }\r
 354 \r
 355   /* Try to get environment variables - may fail */\r
 356   set_environment(service->name, key, NSSM_REG_ENV, &service->env, &service->envlen);\r
 357   /* Environment variables to add to existing rather than replace - may fail. */\r
 358   set_environment(service->name, key, NSSM_REG_ENV_EXTRA, &service->env_extra, &service->env_extralen);\r
 359 \r
 360   if (service->env_extra) {\r
 361     /* Append these to any other environment variables set. */\r
 362     if (service->env) {\r
 363       /* Append extra variables to configured variables. */\r
 364       unsigned long envlen = service->envlen + service->env_extralen - 1;\r
 365       TCHAR *env = (TCHAR *) HeapAlloc(GetProcessHeap(), 0, envlen);\r
 366       if (env) {\r
 367         memmove(env, service->env, service->envlen - sizeof(TCHAR));\r
 368         /* envlen is in bytes. */\r
 369         memmove(env + (service->envlen / sizeof(TCHAR)) - 1, service->env_extra, service->env_extralen);\r
 370 \r
 371         HeapFree(GetProcessHeap(), 0, service->env);\r
 372         service->env = env;\r
 373         service->envlen = envlen;\r
 374       }\r
 375       else log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, _T("environment"), _T("get_parameters()"), 0);\r
 376     }\r
 377     else {\r
 378       /* Append extra variables to our environment. */\r
 379       TCHAR *env, *s;\r
 380       size_t envlen, len;\r
 381 \r
 382       env = service->env_extra;\r
 383       len = 0;\r
 384       while (*env) {\r
 385         envlen = _tcslen(env) + 1;\r
 386         for (s = env; *s && *s != _T('='); s++);\r
 387         if (*s == _T('=')) *s++ = _T('\0');\r
 388         if (! SetEnvironmentVariable(env, s)) log_event(EVENTLOG_WARNING_TYPE, NSSM_EVENT_SETENVIRONMENTVARIABLE_FAILED, env, s, error_string(GetLastError()));\r
 389         env += envlen;\r
 390       }\r
 391     }\r
 392   }\r
 393 \r
 394   /* Try to get file rotation settings - may fail. */\r
 395   unsigned long rotate_files;\r
 396   if (get_number(key, NSSM_REG_ROTATE, &rotate_files, false) == 1) {\r
 397     if (rotate_files) service->rotate_files = true;\r
 398     else service->rotate_files = false;\r
 399   }\r
 400   else service->rotate_files = false;\r
 401   if (get_number(key, NSSM_REG_ROTATE_SECONDS, &service->rotate_seconds, false) != 1) service->rotate_seconds = 0;\r
 402   if (get_number(key, NSSM_REG_ROTATE_BYTES_LOW, &service->rotate_bytes_low, false) != 1) service->rotate_bytes_low = 0;\r
 403   if (get_number(key, NSSM_REG_ROTATE_BYTES_HIGH, &service->rotate_bytes_high, false) != 1) service->rotate_bytes_high = 0;\r
 404 \r
 405   /* Change to startup directory in case stdout/stderr are relative paths. */\r
 406   TCHAR cwd[MAX_PATH];\r
 407   GetCurrentDirectory(_countof(cwd), cwd);\r
 408   SetCurrentDirectory(service->dir);\r
 409 \r
 410   /* Try to get stdout and stderr */\r
 411   if (get_output_handles(service, key, si)) {\r
 412     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_GET_OUTPUT_HANDLES_FAILED, service->name, 0);\r
 413     RegCloseKey(key);\r
 414     SetCurrentDirectory(cwd);\r
 415     return 5;\r
 416   }\r
 417 \r
 418   /* Change back in case the startup directory needs to be deleted. */\r
 419   SetCurrentDirectory(cwd);\r
 420 \r
 421   /* Try to get throttle restart delay */\r
 422   override_milliseconds(service->name, key, NSSM_REG_THROTTLE, &service->throttle_delay, NSSM_RESET_THROTTLE_RESTART, NSSM_EVENT_BOGUS_THROTTLE);\r
 423 \r
 424   /* Try to get service stop flags. */\r
 425   unsigned long type = REG_DWORD;\r
 426   unsigned long stop_method_skip;\r
 427   unsigned long buflen = sizeof(stop_method_skip);\r
 428   bool stop_ok = false;\r
 429   ret = RegQueryValueEx(key, NSSM_REG_STOP_METHOD_SKIP, 0, &type, (unsigned char *) &stop_method_skip, &buflen);\r
 430   if (ret != ERROR_SUCCESS) {\r
 431     if (ret != ERROR_FILE_NOT_FOUND) {\r
 432       if (type != REG_DWORD) {\r
 433         log_event(EVENTLOG_WARNING_TYPE, NSSM_EVENT_BOGUS_STOP_METHOD_SKIP, service->name, NSSM_REG_STOP_METHOD_SKIP, NSSM, 0);\r
 434       }\r
 435       else log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_QUERYVALUE_FAILED, NSSM_REG_STOP_METHOD_SKIP, error_string(GetLastError()), 0);\r
 436     }\r
 437   }\r
 438   else stop_ok = true;\r
 439 \r
 440   /* Try all methods except those requested to be skipped. */\r
 441   service->stop_method = ~0;\r
 442   if (stop_ok) service->stop_method &= ~stop_method_skip;\r
 443 \r
 444   /* Try to get kill delays - may fail. */\r
 445   override_milliseconds(service->name, key, NSSM_REG_KILL_CONSOLE_GRACE_PERIOD, &service->kill_console_delay, NSSM_KILL_CONSOLE_GRACE_PERIOD, NSSM_EVENT_BOGUS_KILL_CONSOLE_GRACE_PERIOD);\r
 446   override_milliseconds(service->name, key, NSSM_REG_KILL_WINDOW_GRACE_PERIOD, &service->kill_window_delay, NSSM_KILL_WINDOW_GRACE_PERIOD, NSSM_EVENT_BOGUS_KILL_WINDOW_GRACE_PERIOD);\r
 447   override_milliseconds(service->name, key, NSSM_REG_KILL_THREADS_GRACE_PERIOD, &service->kill_threads_delay, NSSM_KILL_THREADS_GRACE_PERIOD, NSSM_EVENT_BOGUS_KILL_THREADS_GRACE_PERIOD);\r
 448 \r
 449   /* Close registry */\r
 450   RegCloseKey(key);\r
 451 \r
 452   return 0;\r
 453 }\r
 454 \r
 455 int get_exit_action(TCHAR *service_name, unsigned long *ret, TCHAR *action, bool *default_action) {\r
 456   /* Are we returning the default action or a status-specific one? */\r
 457   *default_action = ! ret;\r
 458 \r
 459   /* Get registry */\r
 460   TCHAR registry[KEY_LENGTH];\r
 461   if (_sntprintf_s(registry, _countof(registry), _TRUNCATE, NSSM_REGISTRY _T("\\%s"), service_name, NSSM_REG_EXIT) < 0) {\r
 462     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, _T("NSSM_REG_EXIT"), _T("get_exit_action()"), 0);\r
 463     return 1;\r
 464   }\r
 465 \r
 466   /* Try to open the registry */\r
 467   HKEY key;\r
 468   long error = RegOpenKeyEx(HKEY_LOCAL_MACHINE, registry, 0, KEY_READ, &key);\r
 469   if (error != ERROR_SUCCESS && error != ERROR_FILE_NOT_FOUND) {\r
 470     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OPENKEY_FAILED, registry, error_string(GetLastError()), 0);\r
 471     return 2;\r
 472   }\r
 473 \r
 474   unsigned long type = REG_SZ;\r
 475   unsigned long action_len = ACTION_LEN;\r
 476 \r
 477   TCHAR code[16];\r
 478   if (! ret) code[0] = _T('\0');\r
 479   else if (_sntprintf_s(code, _countof(code), _TRUNCATE, _T("%lu"), *ret) < 0) {\r
 480     RegCloseKey(key);\r
 481     return get_exit_action(service_name, 0, action, default_action);\r
 482   }\r
 483   if (RegQueryValueEx(key, code, 0, &type, (unsigned char *) action, &action_len) != ERROR_SUCCESS) {\r
 484     RegCloseKey(key);\r
 485     /* Try again with * as the key if an exit code was defined */\r
 486     if (ret) return get_exit_action(service_name, 0, action, default_action);\r
 487     return 0;\r
 488   }\r
 489 \r
 490   /* Close registry */\r
 491   RegCloseKey(key);\r
 492 \r
 493   return 0;\r
 494 }\r