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