Command to dump service configuration.
[nssm.git] / registry.cpp
index c93d3ae..93c034d 100644 (file)
@@ -2,6 +2,46 @@
 \r
 extern const TCHAR *exit_action_strings[];\r
 \r
+static int service_registry_path(const TCHAR *service_name, bool parameters, const TCHAR *sub, TCHAR *buffer, unsigned long buflen) {\r
+  int ret;\r
+\r
+  if (parameters) {\r
+    if (sub) ret = _sntprintf_s(buffer, buflen, _TRUNCATE, NSSM_REGISTRY _T("\\") NSSM_REG_PARAMETERS _T("\\%s"), service_name, sub);\r
+    else ret = _sntprintf_s(buffer, buflen, _TRUNCATE, NSSM_REGISTRY _T("\\") NSSM_REG_PARAMETERS, service_name);\r
+  }\r
+  else ret = _sntprintf_s(buffer, buflen, _TRUNCATE, NSSM_REGISTRY, service_name);\r
+\r
+  return ret;\r
+}\r
+\r
+static long open_registry_key(const TCHAR *registry, REGSAM sam, HKEY *key, bool must_exist) {\r
+  long error;\r
+\r
+  if (sam & KEY_SET_VALUE) {\r
+    error = RegCreateKeyEx(HKEY_LOCAL_MACHINE, registry, 0, 0, REG_OPTION_NON_VOLATILE, sam, 0, key, 0);\r
+    if (error != ERROR_SUCCESS) {\r
+      *key = 0;\r
+      log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OPENKEY_FAILED, registry, error_string(GetLastError()), 0);\r
+      return error;\r
+    }\r
+  }\r
+  else {\r
+    error = RegOpenKeyEx(HKEY_LOCAL_MACHINE, registry, 0, sam, key);\r
+    if (error != ERROR_SUCCESS) {\r
+      *key = 0;\r
+      if (error != ERROR_FILE_NOT_FOUND || must_exist) log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OPENKEY_FAILED, registry, error_string(GetLastError()), 0);\r
+    }\r
+  }\r
+\r
+  return error;\r
+}\r
+\r
+static HKEY open_registry_key(const TCHAR *registry, REGSAM sam, bool must_exist) {\r
+  HKEY key;\r
+  long error = open_registry_key(registry, sam, &key, must_exist);\r
+  return key;\r
+}\r
+\r
 int create_messages() {\r
   HKEY key;\r
 \r
@@ -17,8 +57,7 @@ int create_messages() {
   }\r
 \r
   /* Get path of this program */\r
-  TCHAR path[MAX_PATH];\r
-  GetModuleFileName(0, path, _countof(path));\r
+  const TCHAR *path = nssm_unquoted_imagepath();\r
 \r
   /* Try to register the module but don't worry so much on failure */\r
   RegSetValueEx(key, _T("EventMessageFile"), 0, REG_SZ, (const unsigned char *) path, (unsigned long) (_tcslen(path) +  1) * sizeof(TCHAR));\r
@@ -28,24 +67,36 @@ int create_messages() {
   return 0;\r
 }\r
 \r
+long enumerate_registry_values(HKEY key, unsigned long *index, TCHAR *name, unsigned long namelen) {\r
+  unsigned long type;\r
+  unsigned long datalen = namelen;\r
+  long error = RegEnumValue(key, *index, name, &datalen, 0, &type, 0, 0);\r
+  if (error == ERROR_SUCCESS) ++*index;\r
+  return error;\r
+}\r
+\r
 int create_parameters(nssm_service_t *service, bool editing) {\r
   /* Try to open the registry */\r
   HKEY key = open_registry(service->name, KEY_WRITE);\r
   if (! key) return 1;\r
 \r
+  /* Remember parameters in case we need to delete them. */\r
+  TCHAR registry[KEY_LENGTH];\r
+  int ret = service_registry_path(service->name, true, 0, registry, _countof(registry));\r
+\r
   /* Try to create the parameters */\r
   if (set_expand_string(key, NSSM_REG_EXE, service->exe)) {\r
-    RegDeleteKey(HKEY_LOCAL_MACHINE, NSSM_REGISTRY);\r
+    if (ret > 0) RegDeleteKey(HKEY_LOCAL_MACHINE, registry);\r
     RegCloseKey(key);\r
     return 2;\r
   }\r
   if (set_expand_string(key, NSSM_REG_FLAGS, service->flags)) {\r
-    RegDeleteKey(HKEY_LOCAL_MACHINE, NSSM_REGISTRY);\r
+    if (ret > 0) RegDeleteKey(HKEY_LOCAL_MACHINE, registry);\r
     RegCloseKey(key);\r
     return 3;\r
   }\r
   if (set_expand_string(key, NSSM_REG_DIR, service->dir)) {\r
-    RegDeleteKey(HKEY_LOCAL_MACHINE, NSSM_REGISTRY);\r
+    if (ret > 0) RegDeleteKey(HKEY_LOCAL_MACHINE, registry);\r
     RegCloseKey(key);\r
     return 4;\r
   }\r
@@ -53,10 +104,24 @@ int create_parameters(nssm_service_t *service, bool editing) {
   /* Other non-default parameters. May fail. */\r
   if (service->priority != NORMAL_PRIORITY_CLASS) set_number(key, NSSM_REG_PRIORITY, service->priority);\r
   else if (editing) RegDeleteValue(key, NSSM_REG_PRIORITY);\r
+  if (service->affinity) {\r
+    TCHAR *string;\r
+    if (! affinity_mask_to_string(service->affinity, &string)) {\r
+      if (RegSetValueEx(key, NSSM_REG_AFFINITY, 0, REG_SZ, (const unsigned char *) string, (unsigned long) (_tcslen(string) + 1) * sizeof(TCHAR)) != ERROR_SUCCESS) {\r
+        log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_SETVALUE_FAILED, NSSM_REG_AFFINITY, error_string(GetLastError()), 0);\r
+        HeapFree(GetProcessHeap(), 0, string);\r
+        return 5;\r
+      }\r
+    }\r
+    if (string) HeapFree(GetProcessHeap(), 0, string);\r
+  }\r
+  else if (editing) RegDeleteValue(key, NSSM_REG_AFFINITY);\r
   unsigned long stop_method_skip = ~service->stop_method;\r
   if (stop_method_skip) set_number(key, NSSM_REG_STOP_METHOD_SKIP, stop_method_skip);\r
   else if (editing) RegDeleteValue(key, NSSM_REG_STOP_METHOD_SKIP);\r
   if (service->default_exit_action < NSSM_NUM_EXIT_ACTIONS) create_exit_action(service->name, exit_action_strings[service->default_exit_action], editing);\r
+  if (service->restart_delay) set_number(key, NSSM_REG_RESTART_DELAY, service->restart_delay);\r
+  else if (editing) RegDeleteValue(key, NSSM_REG_RESTART_DELAY);\r
   if (service->throttle_delay != NSSM_RESET_THROTTLE_RESTART) set_number(key, NSSM_REG_THROTTLE, service->throttle_delay);\r
   else if (editing) RegDeleteValue(key, NSSM_REG_THROTTLE);\r
   if (service->kill_console_delay != NSSM_KILL_CONSOLE_GRACE_PERIOD) set_number(key, NSSM_REG_KILL_CONSOLE_GRACE_PERIOD, service->kill_console_delay);\r
@@ -65,6 +130,8 @@ int create_parameters(nssm_service_t *service, bool editing) {
   else if (editing) RegDeleteValue(key, NSSM_REG_KILL_WINDOW_GRACE_PERIOD);\r
   if (service->kill_threads_delay != NSSM_KILL_THREADS_GRACE_PERIOD) set_number(key, NSSM_REG_KILL_THREADS_GRACE_PERIOD, service->kill_threads_delay);\r
   else if (editing) RegDeleteValue(key, NSSM_REG_KILL_THREADS_GRACE_PERIOD);\r
+  if (! service->kill_process_tree) set_number(key, NSSM_REG_KILL_PROCESS_TREE, 0);\r
+  else if (editing) RegDeleteValue(key, NSSM_REG_KILL_PROCESS_TREE);\r
   if (service->stdin_path[0] || editing) {\r
     if (service->stdin_path[0]) set_expand_string(key, NSSM_REG_STDIN, service->stdin_path);\r
     else if (editing) RegDeleteValue(key, NSSM_REG_STDIN);\r
@@ -84,6 +151,8 @@ int create_parameters(nssm_service_t *service, bool editing) {
     else if (editing) delete_createfile_parameter(key, NSSM_REG_STDOUT, NSSM_REG_STDIO_DISPOSITION);\r
     if (service->stdout_flags != NSSM_STDOUT_FLAGS) set_createfile_parameter(key, NSSM_REG_STDOUT, NSSM_REG_STDIO_FLAGS, service->stdout_flags);\r
     else if (editing) delete_createfile_parameter(key, NSSM_REG_STDOUT, NSSM_REG_STDIO_FLAGS);\r
+    if (service->stdout_copy_and_truncate) set_createfile_parameter(key, NSSM_REG_STDOUT, NSSM_REG_STDIO_COPY_AND_TRUNCATE, 1);\r
+    else if (editing) delete_createfile_parameter(key, NSSM_REG_STDOUT, NSSM_REG_STDIO_COPY_AND_TRUNCATE);\r
   }\r
   if (service->stderr_path[0] || editing) {\r
     if (service->stderr_path[0]) set_expand_string(key, NSSM_REG_STDERR, service->stderr_path);\r
@@ -94,15 +163,25 @@ int create_parameters(nssm_service_t *service, bool editing) {
     else if (editing) delete_createfile_parameter(key, NSSM_REG_STDERR, NSSM_REG_STDIO_DISPOSITION);\r
     if (service->stderr_flags != NSSM_STDERR_FLAGS) set_createfile_parameter(key, NSSM_REG_STDERR, NSSM_REG_STDIO_FLAGS, service->stderr_flags);\r
     else if (editing) delete_createfile_parameter(key, NSSM_REG_STDERR, NSSM_REG_STDIO_FLAGS);\r
+    if (service->stderr_copy_and_truncate) set_createfile_parameter(key, NSSM_REG_STDERR, NSSM_REG_STDIO_COPY_AND_TRUNCATE, 1);\r
+    else if (editing) delete_createfile_parameter(key, NSSM_REG_STDERR, NSSM_REG_STDIO_COPY_AND_TRUNCATE);\r
   }\r
+  if (service->hook_share_output_handles) set_number(key, NSSM_REG_HOOK_SHARE_OUTPUT_HANDLES, 1);\r
+  else if (editing) RegDeleteValue(key, NSSM_REG_HOOK_SHARE_OUTPUT_HANDLES);\r
   if (service->rotate_files) set_number(key, NSSM_REG_ROTATE, 1);\r
   else if (editing) RegDeleteValue(key, NSSM_REG_ROTATE);\r
+  if (service->rotate_stdout_online) set_number(key, NSSM_REG_ROTATE_ONLINE, 1);\r
+  else if (editing) RegDeleteValue(key, NSSM_REG_ROTATE_ONLINE);\r
   if (service->rotate_seconds) set_number(key, NSSM_REG_ROTATE_SECONDS, service->rotate_seconds);\r
   else if (editing) RegDeleteValue(key, NSSM_REG_ROTATE_SECONDS);\r
   if (service->rotate_bytes_low) set_number(key, NSSM_REG_ROTATE_BYTES_LOW, service->rotate_bytes_low);\r
   else if (editing) RegDeleteValue(key, NSSM_REG_ROTATE_BYTES_LOW);\r
   if (service->rotate_bytes_high) set_number(key, NSSM_REG_ROTATE_BYTES_HIGH, service->rotate_bytes_high);\r
   else if (editing) RegDeleteValue(key, NSSM_REG_ROTATE_BYTES_HIGH);\r
+  if (service->rotate_delay != NSSM_ROTATE_DELAY) set_number(key, NSSM_REG_ROTATE_DELAY, service->rotate_delay);\r
+  else if (editing) RegDeleteValue(key, NSSM_REG_ROTATE_DELAY);\r
+  if (service->no_console) set_number(key, NSSM_REG_NO_CONSOLE, 1);\r
+  else if (editing) RegDeleteValue(key, NSSM_REG_NO_CONSOLE);\r
 \r
   /* Environment */\r
   if (service->env) {\r
@@ -127,7 +206,7 @@ int create_parameters(nssm_service_t *service, bool editing) {
 int create_exit_action(TCHAR *service_name, const TCHAR *action_string, bool editing) {\r
   /* Get registry */\r
   TCHAR registry[KEY_LENGTH];\r
-  if (_sntprintf_s(registry, _countof(registry), _TRUNCATE, NSSM_REGISTRY _T("\\%s"), service_name, NSSM_REG_EXIT) < 0) {\r
+  if (service_registry_path(service_name, true, NSSM_REG_EXIT, registry, _countof(registry)) < 0) {\r
     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, _T("NSSM_REG_EXIT"), _T("create_exit_action()"), 0);\r
     return 1;\r
   }\r
@@ -159,116 +238,63 @@ int create_exit_action(TCHAR *service_name, const TCHAR *action_string, bool edi
   return 0;\r
 }\r
 \r
-int set_environment(TCHAR *service_name, HKEY key, TCHAR *value, TCHAR **env, unsigned long *envlen) {\r
+int get_environment(TCHAR *service_name, HKEY key, TCHAR *value, TCHAR **env, unsigned long *envlen) {\r
   unsigned long type = REG_MULTI_SZ;\r
+  unsigned long envsize;\r
+\r
+  *envlen = 0;\r
 \r
   /* Dummy test to find buffer size */\r
-  unsigned long ret = RegQueryValueEx(key, value, 0, &type, NULL, envlen);\r
+  unsigned long ret = RegQueryValueEx(key, value, 0, &type, NULL, &envsize);\r
   if (ret != ERROR_SUCCESS) {\r
     *env = 0;\r
-    *envlen = 0;\r
     /* The service probably doesn't have any environment configured */\r
     if (ret == ERROR_FILE_NOT_FOUND) return 0;\r
-    log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_QUERYVALUE_FAILED, value, error_string(GetLastError()), 0);\r
+    log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_QUERYVALUE_FAILED, value, error_string(ret), 0);\r
     return 1;\r
   }\r
 \r
   if (type != REG_MULTI_SZ) {\r
-    *env = 0;\r
-    *envlen = 0;\r
     log_event(EVENTLOG_WARNING_TYPE, NSSM_EVENT_INVALID_ENVIRONMENT_STRING_TYPE, value, service_name, 0);\r
+    *env = 0;\r
     return 2;\r
   }\r
 \r
-  /* Probably not possible */\r
-  if (! *envlen) return 0;\r
+  /* Minimum usable environment would be A= NULL NULL. */\r
+  if (envsize < 4 * sizeof(TCHAR)) {\r
+    *env = 0;\r
+    return 3;\r
+  }\r
 \r
   /* Previously initialised? */\r
   if (*env) HeapFree(GetProcessHeap(), 0, *env);\r
 \r
-  *env = (TCHAR *) HeapAlloc(GetProcessHeap(), 0, *envlen);\r
+  *env = (TCHAR *) HeapAlloc(GetProcessHeap(), 0, envsize);\r
   if (! *env) {\r
-    *envlen = 0;\r
-    log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, value, _T("set_environment()"), 0);\r
-    return 3;\r
+    log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, value, _T("get_environment()"), 0);\r
+    return 4;\r
   }\r
 \r
-  /* Actually get the strings */\r
-  ret = RegQueryValueEx(key, value, 0, &type, (unsigned char *) *env, envlen);\r
+  /* Actually get the strings. */\r
+  ret = RegQueryValueEx(key, value, 0, &type, (unsigned char *) *env, &envsize);\r
   if (ret != ERROR_SUCCESS) {\r
+    log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_QUERYVALUE_FAILED, value, error_string(ret), 0);\r
     HeapFree(GetProcessHeap(), 0, *env);\r
     *env = 0;\r
-    *envlen = 0;\r
-    log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_QUERYVALUE_FAILED, value, error_string(GetLastError()), 0);\r
-    return 4;\r
-  }\r
-\r
-  return 0;\r
-}\r
-\r
-/* Replace NULL with CRLF. Leave NULL NULL as the end marker. */\r
-int format_environment(TCHAR *env, unsigned long envlen, TCHAR **formatted, unsigned long *newlen) {\r
-  unsigned long i, j;\r
-  *newlen = envlen;\r
-\r
-  if (! *newlen) {\r
-    *formatted = 0;\r
-    return 0;\r
-  }\r
-\r
-  for (i = 0; i < envlen; i++) if (! env[i] && env[i + 1]) ++*newlen;\r
-\r
-  *formatted = (TCHAR *) HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, *newlen * sizeof(TCHAR));\r
-  if (! *formatted) {\r
-    *newlen = 0;\r
-    return 1;\r
+    return 5;\r
   }\r
 \r
-  for (i = 0, j = 0; i < envlen; i++) {\r
-    (*formatted)[j] = env[i];\r
-    if (! env[i]) {\r
-      if (env[i + 1]) {\r
-        (*formatted)[j] = _T('\r');\r
-        (*formatted)[++j] = _T('\n');\r
-      }\r
-    }\r
-    j++;\r
-  }\r
+  /* Value retrieved by RegQueryValueEx() is SIZE not COUNT. */\r
+  *envlen = (unsigned long) environment_length(*env);\r
 \r
   return 0;\r
 }\r
 \r
-/* Strip CR and replace LF with NULL. */\r
-int unformat_environment(TCHAR *env, unsigned long envlen, TCHAR **unformatted, unsigned long *newlen) {\r
-  unsigned long i, j;\r
-  *newlen = 0;\r
-\r
-  if (! envlen) {\r
-    *unformatted = 0;\r
-    return 0;\r
-  }\r
 \r
-  for (i = 0; i < envlen; i++) if (env[i] != _T('\r')) ++*newlen;\r
-  /* Must end with two NULLs. */\r
-  *newlen += 2;\r
-\r
-  *unformatted = (TCHAR *) HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, *newlen * sizeof(TCHAR));\r
-  if (! *unformatted) return 1;\r
-\r
-  for (i = 0, j = 0; i < envlen; i++) {\r
-    if (env[i] == _T('\r')) continue;\r
-    if (env[i] == _T('\n')) (*unformatted)[j] = _T('\0');\r
-    else (*unformatted)[j] = env[i];\r
-    j++;\r
-  }\r
-\r
-  return 0;\r
-}\r
-\r
-int expand_parameter(HKEY key, TCHAR *value, TCHAR *data, unsigned long datalen, bool sanitise, bool must_exist) {\r
+int get_string(HKEY key, TCHAR *value, TCHAR *data, unsigned long datalen, bool expand, bool sanitise, bool must_exist) {\r
   TCHAR *buffer = (TCHAR *) HeapAlloc(GetProcessHeap(), 0, datalen);\r
   if (! buffer) {\r
-    log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, value, _T("expand_parameter()"), 0);\r
+    log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, value, _T("get_string()"), 0);\r
     return 1;\r
   }\r
 \r
@@ -279,20 +305,24 @@ int expand_parameter(HKEY key, TCHAR *value, TCHAR *data, unsigned long datalen,
 \r
   unsigned long ret = RegQueryValueEx(key, value, 0, &type, (unsigned char *) buffer, &buflen);\r
   if (ret != ERROR_SUCCESS) {\r
-    unsigned long error = GetLastError();\r
     HeapFree(GetProcessHeap(), 0, buffer);\r
 \r
     if (ret == ERROR_FILE_NOT_FOUND) {\r
       if (! must_exist) return 0;\r
     }\r
 \r
-    log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_QUERYVALUE_FAILED, value, error_string(error), 0);\r
+    log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_QUERYVALUE_FAILED, value, error_string(ret), 0);\r
     return 2;\r
   }\r
 \r
   /* Paths aren't allowed to contain quotes. */\r
   if (sanitise) PathUnquoteSpaces(buffer);\r
 \r
+  /* Do we want to expand the string? */\r
+  if (! expand) {\r
+    if (type == REG_EXPAND_SZ) type = REG_SZ;\r
+  }\r
+\r
   /* Technically we shouldn't expand environment strings from REG_SZ values */\r
   if (type != REG_EXPAND_SZ) {\r
     memmove(data, buffer, buflen);\r
@@ -311,6 +341,14 @@ int expand_parameter(HKEY key, TCHAR *value, TCHAR *data, unsigned long datalen,
   return 0;\r
 }\r
 \r
+int get_string(HKEY key, TCHAR *value, TCHAR *data, unsigned long datalen, bool sanitise) {\r
+  return get_string(key, value, data, datalen, false, sanitise, true);\r
+}\r
+\r
+int expand_parameter(HKEY key, TCHAR *value, TCHAR *data, unsigned long datalen, bool sanitise, bool must_exist) {\r
+  return get_string(key, value, data, datalen, true, sanitise, must_exist);\r
+}\r
+\r
 int expand_parameter(HKEY key, TCHAR *value, TCHAR *data, unsigned long datalen, bool sanitise) {\r
   return expand_parameter(key, value, data, datalen, sanitise, true);\r
 }\r
@@ -320,12 +358,21 @@ int expand_parameter(HKEY key, TCHAR *value, TCHAR *data, unsigned long datalen,
   Returns: 0 if it was set.\r
            1 on error.\r
 */\r
-int set_expand_string(HKEY key, TCHAR *value, TCHAR *string) {\r
-  if (RegSetValueEx(key, value, 0, REG_EXPAND_SZ, (const unsigned char *) string, (unsigned long) (_tcslen(string) + 1) * sizeof(TCHAR)) == ERROR_SUCCESS) return 0;\r
+int set_string(HKEY key, TCHAR *value, TCHAR *string, bool expand) {\r
+  unsigned long type = expand ? REG_EXPAND_SZ : REG_SZ;\r
+  if (RegSetValueEx(key, value, 0, type, (const unsigned char *) string, (unsigned long) (_tcslen(string) + 1) * sizeof(TCHAR)) == ERROR_SUCCESS) return 0;\r
   log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_SETVALUE_FAILED, value, error_string(GetLastError()), 0);\r
   return 1;\r
 }\r
 \r
+int set_string(HKEY key, TCHAR *value, TCHAR *string) {\r
+  return set_string(key, value, string, false);\r
+}\r
+\r
+int set_expand_string(HKEY key, TCHAR *value, TCHAR *string) {\r
+  return set_string(key, value, string, true);\r
+}\r
+\r
 /*\r
   Set an unsigned long in the registry.\r
   Returns: 0 if it was set.\r
@@ -355,7 +402,7 @@ int get_number(HKEY key, TCHAR *value, unsigned long *number, bool must_exist) {
     if (! must_exist) return 0;\r
   }\r
 \r
-  log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_QUERYVALUE_FAILED, value, error_string(GetLastError()), 0);\r
+  log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_QUERYVALUE_FAILED, value, error_string(ret), 0);\r
   if (ret == ERROR_FILE_NOT_FOUND) return -1;\r
 \r
   return -2;\r
@@ -365,6 +412,241 @@ int get_number(HKEY key, TCHAR *value, unsigned long *number) {
   return get_number(key, value, number, true);\r
 }\r
 \r
+/* Replace NULL with CRLF. Leave NULL NULL as the end marker. */\r
+int format_double_null(TCHAR *dn, unsigned long dnlen, TCHAR **formatted, unsigned long *newlen) {\r
+  unsigned long i, j;\r
+  *newlen = dnlen;\r
+\r
+  if (! *newlen) {\r
+    *formatted = 0;\r
+    return 0;\r
+  }\r
+\r
+  for (i = 0; i < dnlen; i++) if (! dn[i] && dn[i + 1]) ++*newlen;\r
+\r
+  *formatted = (TCHAR *) HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, *newlen * sizeof(TCHAR));\r
+  if (! *formatted) {\r
+    *newlen = 0;\r
+    return 1;\r
+  }\r
+\r
+  for (i = 0, j = 0; i < dnlen; i++) {\r
+    (*formatted)[j] = dn[i];\r
+    if (! dn[i]) {\r
+      if (dn[i + 1]) {\r
+        (*formatted)[j] = _T('\r');\r
+        (*formatted)[++j] = _T('\n');\r
+      }\r
+    }\r
+    j++;\r
+  }\r
+\r
+  return 0;\r
+}\r
+\r
+/* Strip CR and replace LF with NULL.  */\r
+int unformat_double_null(TCHAR *formatted, unsigned long formattedlen, TCHAR **dn, unsigned long *newlen) {\r
+  unsigned long i, j;\r
+  *newlen = 0;\r
+\r
+  /* Don't count trailing NULLs. */\r
+  for (i = 0; i < formattedlen; i++) {\r
+    if (! formatted[i]) {\r
+      formattedlen = i;\r
+      break;\r
+    }\r
+  }\r
+\r
+  if (! formattedlen) {\r
+    *dn = 0;\r
+    return 0;\r
+  }\r
+\r
+  for (i = 0; i < formattedlen; i++) if (formatted[i] != _T('\r')) ++*newlen;\r
+\r
+  /* Skip blank lines. */\r
+  for (i = 0; i < formattedlen; i++) {\r
+    if (formatted[i] == _T('\r') && formatted[i + 1] == _T('\n')) {\r
+      /* This is the last CRLF. */\r
+      if (i >= formattedlen - 2) break;\r
+\r
+      /*\r
+        Strip at the start of the block or if the next characters are\r
+        CRLF too.\r
+      */\r
+      if (! i || (formatted[i + 2] == _T('\r') && formatted[i + 3] == _T('\n'))) {\r
+        for (j = i + 2; j < formattedlen; j++) formatted[j - 2] = formatted[j];\r
+        formatted[formattedlen--] = _T('\0');\r
+        formatted[formattedlen--] = _T('\0');\r
+        i--;\r
+        --*newlen;\r
+      }\r
+    }\r
+  }\r
+\r
+  /* Must end with two NULLs. */\r
+  *newlen += 2;\r
+\r
+  *dn = (TCHAR *) HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, *newlen * sizeof(TCHAR));\r
+  if (! *dn) return 1;\r
+\r
+  for (i = 0, j = 0; i < formattedlen; i++) {\r
+    if (formatted[i] == _T('\r')) continue;\r
+    if (formatted[i] == _T('\n')) (*dn)[j] = _T('\0');\r
+    else (*dn)[j] = formatted[i];\r
+    j++;\r
+  }\r
+\r
+  return 0;\r
+}\r
+\r
+/* Copy a block. */\r
+int copy_double_null(TCHAR *dn, unsigned long dnlen, TCHAR **newdn) {\r
+  if (! newdn) return 1;\r
+\r
+  *newdn = 0;\r
+  if (! dn) return 0;\r
+\r
+  *newdn = (TCHAR *) HeapAlloc(GetProcessHeap(), 0, dnlen * sizeof(TCHAR));\r
+  if (! *newdn) {\r
+    log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, _T("dn"), _T("copy_double_null()"), 0);\r
+    return 2;\r
+  }\r
+\r
+  memmove(*newdn, dn, dnlen * sizeof(TCHAR));\r
+  return 0;\r
+}\r
+\r
+/*\r
+  Create a new block with all the strings of the first block plus a new string.\r
+  The new string may be specified as <key> <delimiter> <value> and the keylen\r
+  gives the offset into the string to compare against existing entries.\r
+  If the key is already present its value will be overwritten in place.\r
+  If the key is blank or empty the new block will still be allocated and have\r
+  non-zero length.\r
+*/\r
+int append_to_double_null(TCHAR *dn, unsigned long dnlen, TCHAR **newdn, unsigned long *newlen, TCHAR *append, size_t keylen, bool case_sensitive) {\r
+  if (! append || ! append[0]) return copy_double_null(dn, dnlen, newdn);\r
+  size_t appendlen = _tcslen(append);\r
+  int (*fn)(const TCHAR *, const TCHAR *, size_t) = (case_sensitive) ? _tcsncmp : _tcsnicmp;\r
+\r
+  /* Identify the key, if any, or treat the whole string as the key. */\r
+  TCHAR *key = 0;\r
+  if (! keylen || keylen > appendlen) keylen = appendlen;\r
+  key = (TCHAR *) HeapAlloc(GetProcessHeap(), 0, (keylen + 1) * sizeof(TCHAR));\r
+  if (! key) {\r
+    log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, _T("key"), _T("append_to_double_null()"), 0);\r
+    return 1;\r
+  }\r
+  memmove(key, append, keylen * sizeof(TCHAR));\r
+  key[keylen] = _T('\0');\r
+\r
+  /* Find the length of the block not including any existing key. */\r
+  size_t len = 0;\r
+  TCHAR *s;\r
+  for (s = dn; *s; s++) {\r
+    if (fn(s, key, keylen)) len += _tcslen(s) + 1;\r
+    for ( ; *s; s++);\r
+  }\r
+\r
+  /* Account for new entry. */\r
+  len += _tcslen(append) + 1;\r
+\r
+  /* Account for trailing NULL. */\r
+  len++;\r
+\r
+  /* Allocate a new block. */\r
+  *newdn = (TCHAR *) HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, len * sizeof(TCHAR));\r
+  if (! *newdn) {\r
+    log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, _T("newdn"), _T("append_to_double_null()"), 0);\r
+    HeapFree(GetProcessHeap(), 0, key);\r
+    return 2;\r
+  }\r
+\r
+  /* Copy existing entries.*/\r
+  *newlen = (unsigned long) len;\r
+  TCHAR *t = *newdn;\r
+  TCHAR *u;\r
+  bool replaced = false;\r
+  for (s = dn; *s; s++) {\r
+    if (fn(s, key, keylen)) u = s;\r
+    else {\r
+      u = append;\r
+      replaced = true;\r
+    }\r
+    len = _tcslen(u) + 1;\r
+    memmove(t, u, len * sizeof(TCHAR));\r
+    t += len;\r
+    for ( ; *s; s++);\r
+  }\r
+\r
+  /* Add the entry if it wasn't already replaced.  The buffer was zeroed. */\r
+  if (! replaced) memmove(t, append, _tcslen(append) * sizeof(TCHAR));\r
+\r
+  HeapFree(GetProcessHeap(), 0, key);\r
+  return 0;\r
+}\r
+\r
+/*\r
+  Create a new block with all the string of the first block minus the given\r
+  string.\r
+  The keylen parameter gives the offset into the string to compare against\r
+  existing entries.  If a substring of existing value matches the string to\r
+  the given length it will be removed.\r
+  If the last entry is removed the new block will still be allocated and\r
+  have non-zero length.\r
+*/\r
+int remove_from_double_null(TCHAR *dn, unsigned long dnlen, TCHAR **newdn, unsigned long *newlen, TCHAR *remove, size_t keylen, bool case_sensitive) {\r
+  if (! remove || !remove[0]) return copy_double_null(dn, dnlen, newdn);\r
+  size_t removelen = _tcslen(remove);\r
+  int (*fn)(const TCHAR *, const TCHAR *, size_t) = (case_sensitive) ? _tcsncmp : _tcsnicmp;\r
+\r
+  /* Identify the key, if any, or treat the whole string as the key. */\r
+  TCHAR *key = 0;\r
+  if (! keylen || keylen > removelen) keylen = removelen;\r
+  key = (TCHAR *) HeapAlloc(GetProcessHeap(), 0, (keylen + 1) * sizeof(TCHAR));\r
+  if (! key) {\r
+    log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, _T("key"), _T("remove_from_double_null()"), 0);\r
+    return 1;\r
+  }\r
+  memmove(key, remove, keylen * sizeof(TCHAR));\r
+  key[keylen] = _T('\0');\r
+\r
+  /* Find the length of the block not including any existing key. */\r
+  size_t len = 0;\r
+  TCHAR *s;\r
+  for (s = dn; *s; s++) {\r
+    if (fn(s, key, keylen)) len += _tcslen(s) + 1;\r
+    for ( ; *s; s++);\r
+  }\r
+\r
+  /* Account for trailing NULL. */\r
+  if (++len < 2) len = 2;\r
+\r
+  /* Allocate a new block. */\r
+  *newdn = (TCHAR *) HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, len * sizeof(TCHAR));\r
+  if (! *newdn) {\r
+    log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, _T("newdn"), _T("remove_from_double_null()"), 0);\r
+    HeapFree(GetProcessHeap(), 0, key);\r
+    return 2;\r
+  }\r
+\r
+  /* Copy existing entries.*/\r
+  *newlen = (unsigned long) len;\r
+  TCHAR *t = *newdn;\r
+  for (s = dn; *s; s++) {\r
+    if (fn(s, key, keylen)) {\r
+      len = _tcslen(s) + 1;\r
+      memmove(t, s, len * sizeof(TCHAR));\r
+      t += len;\r
+    }\r
+    for ( ; *s; s++);\r
+  }\r
+\r
+  HeapFree(GetProcessHeap(), 0, key);\r
+  return 0;\r
+}\r
+\r
 void override_milliseconds(TCHAR *service_name, HKEY key, TCHAR *value, unsigned long *buffer, unsigned long default_value, unsigned long event) {\r
   unsigned long type = REG_DWORD;\r
   unsigned long buflen = sizeof(unsigned long);\r
@@ -377,7 +659,7 @@ void override_milliseconds(TCHAR *service_name, HKEY key, TCHAR *value, unsigned
         _sntprintf_s(milliseconds, _countof(milliseconds), _TRUNCATE, _T("%lu"), default_value);\r
         log_event(EVENTLOG_WARNING_TYPE, event, service_name, value, milliseconds, 0);\r
       }\r
-      else log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_QUERYVALUE_FAILED, value, error_string(GetLastError()), 0);\r
+      else log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_QUERYVALUE_FAILED, value, error_string(ret), 0);\r
     }\r
   }\r
   else ok = true;\r
@@ -385,37 +667,67 @@ void override_milliseconds(TCHAR *service_name, HKEY key, TCHAR *value, unsigned
   if (! ok) *buffer = default_value;\r
 }\r
 \r
-HKEY open_registry(const TCHAR *service_name, const TCHAR *sub, REGSAM sam) {\r
+/* Open the key of the service itself Services\<service_name>. */\r
+HKEY open_service_registry(const TCHAR *service_name, REGSAM sam, bool must_exist) {\r
   /* Get registry */\r
   TCHAR registry[KEY_LENGTH];\r
-  HKEY key;\r
-  int ret;\r
-\r
-  if (sub) ret = _sntprintf_s(registry, _countof(registry), _TRUNCATE, NSSM_REGISTRY _T("\\%s"), service_name, sub);\r
-  else ret = _sntprintf_s(registry, _countof(registry), _TRUNCATE, NSSM_REGISTRY, service_name);\r
-  if (ret < 0) {\r
-    log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, _T("NSSM_REGISTRY"), _T("open_registry()"), 0);\r
+  if (service_registry_path(service_name, false, 0, registry, _countof(registry)) < 0) {\r
+    log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, NSSM_REGISTRY, _T("open_service_registry()"), 0);\r
     return 0;\r
   }\r
 \r
-  if (sam & KEY_WRITE) {\r
-    if (RegCreateKeyEx(HKEY_LOCAL_MACHINE, registry, 0, 0, REG_OPTION_NON_VOLATILE, sam, 0, &key, 0) != ERROR_SUCCESS) {\r
-      log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OPENKEY_FAILED, registry, error_string(GetLastError()), 0);\r
-      return 0;\r
-    }\r
-  }\r
-  else {\r
-    if (RegOpenKeyEx(HKEY_LOCAL_MACHINE, registry, 0, sam, &key) != ERROR_SUCCESS) {\r
-      log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OPENKEY_FAILED, registry, error_string(GetLastError()), 0);\r
-      return 0;\r
-    }\r
+  return open_registry_key(registry, sam, must_exist);\r
+}\r
+\r
+/* Open a subkey of the service Services\<service_name>\<sub>. */\r
+long open_registry(const TCHAR *service_name, const TCHAR *sub, REGSAM sam, HKEY *key, bool must_exist) {\r
+  /* Get registry */\r
+  TCHAR registry[KEY_LENGTH];\r
+  if (service_registry_path(service_name, true, sub, registry, _countof(registry)) < 0) {\r
+    log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, NSSM_REGISTRY, _T("open_registry()"), 0);\r
+    return 0;\r
   }\r
 \r
+  return open_registry_key(registry, sam, key, must_exist);\r
+}\r
+\r
+HKEY open_registry(const TCHAR *service_name, const TCHAR *sub, REGSAM sam, bool must_exist) {\r
+  HKEY key;\r
+  long error = open_registry(service_name, sub, sam, &key, must_exist);\r
   return key;\r
 }\r
 \r
+HKEY open_registry(const TCHAR *service_name, const TCHAR *sub, REGSAM sam) {\r
+  return open_registry(service_name, sub, sam, true);\r
+}\r
+\r
 HKEY open_registry(const TCHAR *service_name, REGSAM sam) {\r
-  return open_registry(service_name, 0, sam);\r
+  return open_registry(service_name, 0, sam, true);\r
+}\r
+\r
+int get_io_parameters(nssm_service_t *service, HKEY key) {\r
+  /* stdin */\r
+  if (get_createfile_parameters(key, NSSM_REG_STDIN, service->stdin_path, &service->stdin_sharing, NSSM_STDIN_SHARING, &service->stdin_disposition, NSSM_STDIN_DISPOSITION, &service->stdin_flags, NSSM_STDIN_FLAGS, 0)) {\r
+    service->stdin_sharing = service->stdin_disposition = service->stdin_flags = 0;\r
+    ZeroMemory(service->stdin_path, _countof(service->stdin_path) * sizeof(TCHAR));\r
+    return 1;\r
+  }\r
+\r
+  /* stdout */\r
+  if (get_createfile_parameters(key, NSSM_REG_STDOUT, service->stdout_path, &service->stdout_sharing, NSSM_STDOUT_SHARING, &service->stdout_disposition, NSSM_STDOUT_DISPOSITION, &service->stdout_flags, NSSM_STDOUT_FLAGS, &service->stdout_copy_and_truncate)) {\r
+    service->stdout_sharing = service->stdout_disposition = service->stdout_flags = 0;\r
+    ZeroMemory(service->stdout_path, _countof(service->stdout_path) * sizeof(TCHAR));\r
+    return 2;\r
+  }\r
+\r
+  /* stderr */\r
+  if (get_createfile_parameters(key, NSSM_REG_STDERR, service->stderr_path, &service->stderr_sharing, NSSM_STDERR_SHARING, &service->stderr_disposition, NSSM_STDERR_DISPOSITION, &service->stderr_flags, NSSM_STDERR_FLAGS, &service->stderr_copy_and_truncate)) {\r
+    service->stderr_sharing = service->stderr_disposition = service->stderr_flags = 0;\r
+    ZeroMemory(service->stderr_path, _countof(service->stderr_path) * sizeof(TCHAR));\r
+    return 3;\r
+  }\r
+\r
+  return 0;\r
 }\r
 \r
 int get_parameters(nssm_service_t *service, STARTUPINFO *si) {\r
@@ -425,20 +737,31 @@ int get_parameters(nssm_service_t *service, STARTUPINFO *si) {
   HKEY key = open_registry(service->name, KEY_READ);\r
   if (! key) return 1;\r
 \r
+  /* Don't expand parameters when retrieving for the GUI. */\r
+  bool expand = si ? true : false;\r
+\r
+  /* Try to get environment variables - may fail */\r
+  get_environment(service->name, key, NSSM_REG_ENV, &service->env, &service->envlen);\r
+  /* Environment variables to add to existing rather than replace - may fail. */\r
+  get_environment(service->name, key, NSSM_REG_ENV_EXTRA, &service->env_extra, &service->env_extralen);\r
+\r
+  /* Set environment if we are starting the service. */\r
+  if (si) set_service_environment(service);\r
+\r
   /* Try to get executable file - MUST succeed */\r
-  if (expand_parameter(key, NSSM_REG_EXE, service->exe, sizeof(service->exe), false)) {\r
+  if (get_string(key, NSSM_REG_EXE, service->exe, sizeof(service->exe), expand, false, true)) {\r
     RegCloseKey(key);\r
     return 3;\r
   }\r
 \r
   /* Try to get flags - may fail and we don't care */\r
-  if (expand_parameter(key, NSSM_REG_FLAGS, service->flags, sizeof(service->flags), false)) {\r
+  if (get_string(key, NSSM_REG_FLAGS, service->flags, sizeof(service->flags), expand, false, true)) {\r
     log_event(EVENTLOG_WARNING_TYPE, NSSM_EVENT_NO_FLAGS, NSSM_REG_FLAGS, service->name, service->exe, 0);\r
     ZeroMemory(service->flags, sizeof(service->flags));\r
   }\r
 \r
   /* Try to get startup directory - may fail and we fall back to a default */\r
-  if (expand_parameter(key, NSSM_REG_DIR, service->dir, sizeof(service->dir), true) || ! service->dir[0]) {\r
+  if (get_string(key, NSSM_REG_DIR, service->dir, sizeof(service->dir), expand, true, true) || ! service->dir[0]) {\r
     _sntprintf_s(service->dir, _countof(service->dir), _TRUNCATE, _T("%s"), service->exe);\r
     strip_basename(service->dir);\r
     if (service->dir[0] == _T('\0')) {\r
@@ -453,54 +776,46 @@ int get_parameters(nssm_service_t *service, STARTUPINFO *si) {
     log_event(EVENTLOG_WARNING_TYPE, NSSM_EVENT_NO_DIR, NSSM_REG_DIR, service->name, service->dir, 0);\r
   }\r
 \r
-  /* Try to get environment variables - may fail */\r
-  set_environment(service->name, key, NSSM_REG_ENV, &service->env, &service->envlen);\r
-  /* Environment variables to add to existing rather than replace - may fail. */\r
-  set_environment(service->name, key, NSSM_REG_ENV_EXTRA, &service->env_extra, &service->env_extralen);\r
-\r
-  if (si) {\r
-    if (service->env_extra) {\r
-      /* Append these to any other environment variables set. */\r
-      if (service->env) {\r
-        /* Append extra variables to configured variables. */\r
-        unsigned long envlen = service->envlen + service->env_extralen - 1;\r
-        TCHAR *env = (TCHAR *) HeapAlloc(GetProcessHeap(), 0, envlen);\r
-        if (env) {\r
-          memmove(env, service->env, service->envlen - sizeof(TCHAR));\r
-          /* envlen is in bytes. */\r
-          memmove(env + (service->envlen / sizeof(TCHAR)) - 1, service->env_extra, service->env_extralen);\r
-\r
-          HeapFree(GetProcessHeap(), 0, service->env);\r
-          service->env = env;\r
-          service->envlen = envlen;\r
-        }\r
-        else log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, _T("environment"), _T("get_parameters()"), 0);\r
-      }\r
-      else {\r
-        /* Append extra variables to our environment. */\r
-        TCHAR *env, *s;\r
-        size_t envlen, len;\r
-\r
-        env = service->env_extra;\r
-        len = 0;\r
-        while (*env) {\r
-          envlen = _tcslen(env) + 1;\r
-          for (s = env; *s && *s != _T('='); s++);\r
-          if (*s == _T('=')) *s++ = _T('\0');\r
-          if (! SetEnvironmentVariable(env, s)) log_event(EVENTLOG_WARNING_TYPE, NSSM_EVENT_SETENVIRONMENTVARIABLE_FAILED, env, s, error_string(GetLastError()), 0);\r
-          env += envlen;\r
+  /* Try to get processor affinity - may fail. */\r
+  TCHAR buffer[512];\r
+  if (get_string(key, NSSM_REG_AFFINITY, buffer, sizeof(buffer), false, false, false) || ! buffer[0]) service->affinity = 0LL;\r
+  else if (affinity_string_to_mask(buffer, &service->affinity)) {\r
+    log_event(EVENTLOG_WARNING_TYPE, NSSM_EVENT_BOGUS_AFFINITY_MASK, service->name, buffer);\r
+    service->affinity = 0LL;\r
+  }\r
+  else {\r
+    DWORD_PTR affinity, system_affinity;\r
+\r
+    if (GetProcessAffinityMask(GetCurrentProcess(), &affinity, &system_affinity)) {\r
+      _int64 effective_affinity = service->affinity & system_affinity;\r
+      if (effective_affinity != service->affinity) {\r
+        TCHAR *system = 0;\r
+        if (! affinity_mask_to_string(system_affinity, &system)) {\r
+          TCHAR *effective = 0;\r
+          if (! affinity_mask_to_string(effective_affinity, &effective)) {\r
+            log_event(EVENTLOG_WARNING_TYPE, NSSM_EVENT_EFFECTIVE_AFFINITY_MASK, service->name, buffer, system, effective, 0);\r
+          }\r
+          HeapFree(GetProcessHeap(), 0, effective);\r
         }\r
+        HeapFree(GetProcessHeap(), 0, system);\r
       }\r
     }\r
   }\r
 \r
   /* Try to get priority - may fail. */\r
   unsigned long priority;\r
-  if (get_number(key, NSSM_REG_PRIORITY, &priority) == 1) {\r
+  if (get_number(key, NSSM_REG_PRIORITY, &priority, false) == 1) {\r
     if (priority == (priority & priority_mask())) service->priority = priority;\r
     else log_event(EVENTLOG_WARNING_TYPE, NSSM_EVENT_BOGUS_PRIORITY, service->name, NSSM_REG_PRIORITY, 0);\r
   }\r
 \r
+  /* Try to get hook I/O sharing - may fail. */\r
+  unsigned long hook_share_output_handles;\r
+  if (get_number(key, NSSM_REG_HOOK_SHARE_OUTPUT_HANDLES, &hook_share_output_handles, false) == 1) {\r
+    if (hook_share_output_handles) service->hook_share_output_handles = true;\r
+    else service->hook_share_output_handles = false;\r
+  }\r
+  else hook_share_output_handles = false;\r
   /* Try to get file rotation settings - may fail. */\r
   unsigned long rotate_files;\r
   if (get_number(key, NSSM_REG_ROTATE, &rotate_files, false) == 1) {\r
@@ -508,17 +823,29 @@ int get_parameters(nssm_service_t *service, STARTUPINFO *si) {
     else service->rotate_files = false;\r
   }\r
   else service->rotate_files = false;\r
+  if (get_number(key, NSSM_REG_ROTATE_ONLINE, &rotate_files, false) == 1) {\r
+    if (rotate_files) service->rotate_stdout_online = service->rotate_stderr_online = true;\r
+    else service->rotate_stdout_online = service->rotate_stderr_online = false;\r
+  }\r
+  else service->rotate_stdout_online = service->rotate_stderr_online = false;\r
+  /* Hook I/O sharing and online rotation need a pipe. */\r
+  service->use_stdout_pipe = service->rotate_stdout_online || hook_share_output_handles;\r
+  service->use_stderr_pipe = service->rotate_stderr_online || hook_share_output_handles;\r
   if (get_number(key, NSSM_REG_ROTATE_SECONDS, &service->rotate_seconds, false) != 1) service->rotate_seconds = 0;\r
   if (get_number(key, NSSM_REG_ROTATE_BYTES_LOW, &service->rotate_bytes_low, false) != 1) service->rotate_bytes_low = 0;\r
   if (get_number(key, NSSM_REG_ROTATE_BYTES_HIGH, &service->rotate_bytes_high, false) != 1) service->rotate_bytes_high = 0;\r
+  override_milliseconds(service->name, key, NSSM_REG_ROTATE_DELAY, &service->rotate_delay, NSSM_ROTATE_DELAY, NSSM_EVENT_BOGUS_THROTTLE);\r
+\r
+  /* Try to get force new console setting - may fail. */\r
+  if (get_number(key, NSSM_REG_NO_CONSOLE, &service->no_console, false) != 1) service->no_console = 0;\r
 \r
   /* Change to startup directory in case stdout/stderr are relative paths. */\r
-  TCHAR cwd[MAX_PATH];\r
+  TCHAR cwd[PATH_LENGTH];\r
   GetCurrentDirectory(_countof(cwd), cwd);\r
   SetCurrentDirectory(service->dir);\r
 \r
   /* Try to get stdout and stderr */\r
-  if (get_output_handles(service, key, si)) {\r
+  if (get_io_parameters(service, key)) {\r
     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_GET_OUTPUT_HANDLES_FAILED, service->name, 0);\r
     RegCloseKey(key);\r
     SetCurrentDirectory(cwd);\r
@@ -528,6 +855,9 @@ int get_parameters(nssm_service_t *service, STARTUPINFO *si) {
   /* Change back in case the startup directory needs to be deleted. */\r
   SetCurrentDirectory(cwd);\r
 \r
+  /* Try to get mandatory restart delay */\r
+  override_milliseconds(service->name, key, NSSM_REG_RESTART_DELAY, &service->restart_delay, 0, NSSM_EVENT_BOGUS_RESTART_DELAY);\r
+\r
   /* Try to get throttle restart delay */\r
   override_milliseconds(service->name, key, NSSM_REG_THROTTLE, &service->throttle_delay, NSSM_RESET_THROTTLE_RESTART, NSSM_EVENT_BOGUS_THROTTLE);\r
 \r
@@ -542,7 +872,7 @@ int get_parameters(nssm_service_t *service, STARTUPINFO *si) {
       if (type != REG_DWORD) {\r
         log_event(EVENTLOG_WARNING_TYPE, NSSM_EVENT_BOGUS_STOP_METHOD_SKIP, service->name, NSSM_REG_STOP_METHOD_SKIP, NSSM, 0);\r
       }\r
-      else log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_QUERYVALUE_FAILED, NSSM_REG_STOP_METHOD_SKIP, error_string(GetLastError()), 0);\r
+      else log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_QUERYVALUE_FAILED, NSSM_REG_STOP_METHOD_SKIP, error_string(ret), 0);\r
     }\r
   }\r
   else stop_ok = true;\r
@@ -556,6 +886,14 @@ int get_parameters(nssm_service_t *service, STARTUPINFO *si) {
   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
   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
 \r
+  /* Try to get process tree settings - may fail. */\r
+  unsigned long kill_process_tree;\r
+  if (get_number(key, NSSM_REG_KILL_PROCESS_TREE, &kill_process_tree, false) == 1) {\r
+    if (kill_process_tree) service->kill_process_tree = true;\r
+    else service->kill_process_tree = false;\r
+  }\r
+  else service->kill_process_tree = true;\r
+\r
   /* Try to get default exit action. */\r
   bool default_action;\r
   service->default_exit_action = NSSM_EXIT_RESTART;\r
@@ -619,3 +957,64 @@ int get_exit_action(const TCHAR *service_name, unsigned long *ret, TCHAR *action
 \r
   return 0;\r
 }\r
+\r
+int set_hook(const TCHAR *service_name, const TCHAR *hook_event, const TCHAR *hook_action, TCHAR *cmd) {\r
+  /* Try to open the registry */\r
+  TCHAR registry[KEY_LENGTH];\r
+  if (_sntprintf_s(registry, _countof(registry), _TRUNCATE, _T("%s\\%s"), NSSM_REG_HOOK, hook_event) < 0) {\r
+    log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, _T("hook registry"), _T("set_hook()"), 0);\r
+    return 1;\r
+  }\r
+\r
+  HKEY key;\r
+  long error;\r
+\r
+  /* Don't create keys needlessly. */\r
+  if (! _tcslen(cmd)) {\r
+    key = open_registry(service_name, registry, KEY_READ, false);\r
+    if (! key) return 0;\r
+    error = RegQueryValueEx(key, hook_action, 0, 0, 0, 0);\r
+    RegCloseKey(key);\r
+    if (error == ERROR_FILE_NOT_FOUND) return 0;\r
+  }\r
+\r
+  key = open_registry(service_name, registry, KEY_WRITE);\r
+  if (! key) return 1;\r
+\r
+  int ret = 1;\r
+  if (_tcslen(cmd)) ret = set_string(key, (TCHAR *) hook_action, cmd, true);\r
+  else {\r
+    error = RegDeleteValue(key, hook_action);\r
+    if (error == ERROR_SUCCESS || error == ERROR_FILE_NOT_FOUND) ret = 0;\r
+  }\r
+\r
+  /* Close registry */\r
+  RegCloseKey(key);\r
+\r
+  return ret;\r
+}\r
+\r
+int get_hook(const TCHAR *service_name, const TCHAR *hook_event, const TCHAR *hook_action, TCHAR *buffer, unsigned long buflen) {\r
+  /* Try to open the registry */\r
+  TCHAR registry[KEY_LENGTH];\r
+  if (_sntprintf_s(registry, _countof(registry), _TRUNCATE, _T("%s\\%s"), NSSM_REG_HOOK, hook_event) < 0) {\r
+    log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, _T("hook registry"), _T("get_hook()"), 0);\r
+    return 1;\r
+  }\r
+  HKEY key;\r
+  long error = open_registry(service_name, registry, KEY_READ, &key, false);\r
+  if (! key) {\r
+    if (error == ERROR_FILE_NOT_FOUND) {\r
+      ZeroMemory(buffer, buflen);\r
+      return 0;\r
+    }\r
+    return 1;\r
+  }\r
+\r
+  int ret = expand_parameter(key, (TCHAR *) hook_action, buffer, buflen, true, false);\r
+\r
+  /* Close registry */\r
+  RegCloseKey(key);\r
+\r
+  return ret;\r
+}\r