registry.cpp

   1 #include "nssm.h"\r
   2 \r
   3 extern const char *exit_action_strings[];\r
   4 \r
   5 int create_messages() {\r
   6   HKEY key;\r
   7 \r
   8   char registry[KEY_LENGTH];\r
   9   if (_snprintf_s(registry, sizeof(registry), _TRUNCATE, "SYSTEM\\CurrentControlSet\\Services\\EventLog\\Application\\%s", NSSM) < 0) {\r
  10     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, "eventlog registry", "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   char path[MAX_PATH];\r
  21   GetModuleFileName(0, path, MAX_PATH);\r
  22 \r
  23   /* Try to register the module but don't worry so much on failure */\r
  24   RegSetValueEx(key, "EventMessageFile", 0, REG_SZ, (const unsigned char *) path, (unsigned long) strlen(path) + 1);\r
  25   unsigned long types = EVENTLOG_INFORMATION_TYPE | EVENTLOG_WARNING_TYPE | EVENTLOG_ERROR_TYPE;\r
  26   RegSetValueEx(key, "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   char registry[KEY_LENGTH];\r
  34   if (_snprintf_s(registry, sizeof(registry), _TRUNCATE, NSSM_REGISTRY, service->name) < 0) {\r
  35     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, "NSSM_REGISTRY", "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]) set_expand_string(key, NSSM_REG_STDIN, service->stdin_path);\r
  72   if (service->stdout_path[0]) set_expand_string(key, NSSM_REG_STDOUT, service->stdout_path);\r
  73   if (service->stderr_path[0]) set_expand_string(key, NSSM_REG_STDERR, service->stderr_path);\r
  74 \r
  75   /* Close registry. */\r
  76   RegCloseKey(key);\r
  77 \r
  78   return 0;\r
  79 }\r
  80 \r
  81 int create_exit_action(char *service_name, const char *action_string) {\r
  82   /* Get registry */\r
  83   char registry[KEY_LENGTH];\r
  84   if (_snprintf_s(registry, sizeof(registry), _TRUNCATE, NSSM_REGISTRY "\\%s", service_name, NSSM_REG_EXIT) < 0) {\r
  85     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, "NSSM_REG_EXIT", "create_exit_action()", 0);\r
  86     return 1;\r
  87   }\r
  88 \r
  89   /* Try to open the registry */\r
  90   HKEY key;\r
  91   unsigned long disposition;\r
  92   if (RegCreateKeyEx(HKEY_LOCAL_MACHINE, registry, 0, 0, REG_OPTION_NON_VOLATILE, KEY_WRITE, 0, &key, &disposition) != ERROR_SUCCESS) {\r
  93     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OPENKEY_FAILED, registry, error_string(GetLastError()), 0);\r
  94     return 2;\r
  95   }\r
  96 \r
  97   /* Do nothing if the key already existed */\r
  98   if (disposition == REG_OPENED_EXISTING_KEY) {\r
  99     RegCloseKey(key);\r
 100     return 0;\r
 101   }\r
 102 \r
 103   /* Create the default value */\r
 104   if (RegSetValueEx(key, 0, 0, REG_SZ, (const unsigned char *) action_string, (unsigned long) strlen(action_string) + 1) != ERROR_SUCCESS) {\r
 105     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_SETVALUE_FAILED, NSSM_REG_EXIT, error_string(GetLastError()), 0);\r
 106     RegCloseKey(key);\r
 107     return 3;\r
 108   }\r
 109 \r
 110   /* Close registry */\r
 111   RegCloseKey(key);\r
 112 \r
 113   return 0;\r
 114 }\r
 115 \r
 116 int set_environment(char *service_name, HKEY key, char *value, char **env, unsigned long *envlen) {\r
 117   unsigned long type = REG_MULTI_SZ;\r
 118 \r
 119   /* Dummy test to find buffer size */\r
 120   unsigned long ret = RegQueryValueEx(key, value, 0, &type, NULL, envlen);\r
 121   if (ret != ERROR_SUCCESS) {\r
 122     *envlen = 0;\r
 123     /* The service probably doesn't have any environment configured */\r
 124     if (ret == ERROR_FILE_NOT_FOUND) return 0;\r
 125     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_QUERYVALUE_FAILED, value, error_string(GetLastError()), 0);\r
 126     return 1;\r
 127   }\r
 128 \r
 129   if (type != REG_MULTI_SZ) {\r
 130     log_event(EVENTLOG_WARNING_TYPE, NSSM_EVENT_INVALID_ENVIRONMENT_STRING_TYPE, value, service_name, 0);\r
 131     return 2;\r
 132   }\r
 133 \r
 134   /* Probably not possible */\r
 135   if (! *envlen) return 0;\r
 136 \r
 137   /* Previously initialised? */\r
 138   if (*env) HeapFree(GetProcessHeap(), 0, *env);\r
 139 \r
 140   *env = (char *) HeapAlloc(GetProcessHeap(), 0, *envlen);\r
 141   if (! *env) {\r
 142     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, value, "set_environment()", 0);\r
 143     return 3;\r
 144   }\r
 145 \r
 146   /* Actually get the strings */\r
 147   ret = RegQueryValueEx(key, value, 0, &type, (unsigned char *) *env, envlen);\r
 148   if (ret != ERROR_SUCCESS) {\r
 149     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_QUERYVALUE_FAILED, value, error_string(GetLastError()), 0);\r
 150     HeapFree(GetProcessHeap(), 0, *env);\r
 151     *env = 0;\r
 152     *envlen = 0;\r
 153     return 4;\r
 154   }\r
 155 \r
 156   return 0;\r
 157 }\r
 158 \r
 159 int expand_parameter(HKEY key, char *value, char *data, unsigned long datalen, bool sanitise, bool must_exist) {\r
 160   unsigned char *buffer = (unsigned char *) HeapAlloc(GetProcessHeap(), 0, datalen);\r
 161   if (! buffer) {\r
 162     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, value, "expand_parameter()", 0);\r
 163     return 1;\r
 164   }\r
 165 \r
 166   ZeroMemory(data, datalen);\r
 167 \r
 168   unsigned long type = REG_EXPAND_SZ;\r
 169   unsigned long buflen = datalen;\r
 170 \r
 171   unsigned long ret = RegQueryValueEx(key, value, 0, &type, buffer, &buflen);\r
 172   if (ret != ERROR_SUCCESS) {\r
 173     unsigned long error = GetLastError();\r
 174     HeapFree(GetProcessHeap(), 0, buffer);\r
 175 \r
 176     if (ret == ERROR_FILE_NOT_FOUND) {\r
 177       if (! must_exist) return 0;\r
 178     }\r
 179 \r
 180     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_QUERYVALUE_FAILED, value, error_string(error), 0);\r
 181     return 2;\r
 182   }\r
 183 \r
 184   /* Paths aren't allowed to contain quotes. */\r
 185   if (sanitise) PathUnquoteSpaces((LPSTR) buffer);\r
 186 \r
 187   /* Technically we shouldn't expand environment strings from REG_SZ values */\r
 188   if (type != REG_EXPAND_SZ) {\r
 189     memmove(data, buffer, buflen);\r
 190     HeapFree(GetProcessHeap(), 0, buffer);\r
 191     return 0;\r
 192   }\r
 193 \r
 194   ret = ExpandEnvironmentStrings((char *) buffer, data, datalen);\r
 195   if (! ret || ret > datalen) {\r
 196     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_EXPANDENVIRONMENTSTRINGS_FAILED, buffer, error_string(GetLastError()), 0);\r
 197     HeapFree(GetProcessHeap(), 0, buffer);\r
 198     return 3;\r
 199   }\r
 200 \r
 201   HeapFree(GetProcessHeap(), 0, buffer);\r
 202   return 0;\r
 203 }\r
 204 \r
 205 int expand_parameter(HKEY key, char *value, char *data, unsigned long datalen, bool sanitise) {\r
 206   return expand_parameter(key, value, data, datalen, sanitise, true);\r
 207 }\r
 208 \r
 209 /*\r
 210   Sets a string in the registry.\r
 211   Returns: 0 if it was set.\r
 212            1 on error.\r
 213 */\r
 214 int set_expand_string(HKEY key, char *value, char *string) {\r
 215   if (RegSetValueEx(key, value, 0, REG_EXPAND_SZ, (const unsigned char *) string, (unsigned long) strlen(string) + 1) == ERROR_SUCCESS) return 0;\r
 216   log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_SETVALUE_FAILED, value, error_string(GetLastError()), 0);\r
 217   return 1;\r
 218 }\r
 219 \r
 220 /*\r
 221   Set an unsigned long in the registry.\r
 222   Returns: 0 if it was set.\r
 223            1 on error.\r
 224 */\r
 225 int set_number(HKEY key, char *value, unsigned long number) {\r
 226   if (RegSetValueEx(key, value, 0, REG_DWORD, (const unsigned char *) &number, sizeof(number)) == ERROR_SUCCESS) return 0;\r
 227   log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_SETVALUE_FAILED, value, error_string(GetLastError()), 0);\r
 228   return 1;\r
 229 }\r
 230 \r
 231 /*\r
 232   Query an unsigned long from the registry.\r
 233   Returns:  1 if a number was retrieved.\r
 234             0 if none was found and must_exist is false.\r
 235            -1 if none was found and must_exist is true.\r
 236            -2 otherwise.\r
 237 */\r
 238 int get_number(HKEY key, char *value, unsigned long *number, bool must_exist) {\r
 239   unsigned long type = REG_DWORD;\r
 240   unsigned long number_len = sizeof(unsigned long);\r
 241 \r
 242   int ret = RegQueryValueEx(key, value, 0, &type, (unsigned char *) number, &number_len);\r
 243   if (ret == ERROR_SUCCESS) return 1;\r
 244 \r
 245   if (ret == ERROR_FILE_NOT_FOUND) {\r
 246     if (! must_exist) return 0;\r
 247   }\r
 248 \r
 249   log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_QUERYVALUE_FAILED, value, error_string(GetLastError()), 0);\r
 250   if (ret == ERROR_FILE_NOT_FOUND) return -1;\r
 251 \r
 252   return -2;\r
 253 }\r
 254 \r
 255 int get_number(HKEY key, char *value, unsigned long *number) {\r
 256   return get_number(key, value, number, true);\r
 257 }\r
 258 \r
 259 void override_milliseconds(char *service_name, HKEY key, char *value, unsigned long *buffer, unsigned long default_value, unsigned long event) {\r
 260   unsigned long type = REG_DWORD;\r
 261   unsigned long buflen = sizeof(unsigned long);\r
 262   bool ok = false;\r
 263   unsigned long ret = RegQueryValueEx(key, value, 0, &type, (unsigned char *) buffer, &buflen);\r
 264   if (ret != ERROR_SUCCESS) {\r
 265     if (ret != ERROR_FILE_NOT_FOUND) {\r
 266       if (type != REG_DWORD) {\r
 267         char milliseconds[16];\r
 268         _snprintf_s(milliseconds, sizeof(milliseconds), _TRUNCATE, "%lu", default_value);\r
 269         log_event(EVENTLOG_WARNING_TYPE, event, service_name, value, milliseconds, 0);\r
 270       }\r
 271       else log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_QUERYVALUE_FAILED, value, error_string(GetLastError()), 0);\r
 272     }\r
 273   }\r
 274   else ok = true;\r
 275 \r
 276   if (! ok) *buffer = default_value;\r
 277 }\r
 278 \r
 279 int get_parameters(nssm_service_t *service, STARTUPINFO *si) {\r
 280   unsigned long ret;\r
 281 \r
 282   /* Get registry */\r
 283   char registry[KEY_LENGTH];\r
 284   if (_snprintf_s(registry, sizeof(registry), _TRUNCATE, NSSM_REGISTRY, service->name) < 0) {\r
 285     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, "NSSM_REGISTRY", "get_parameters()", 0);\r
 286     return 1;\r
 287   }\r
 288 \r
 289   /* Try to open the registry */\r
 290   HKEY key;\r
 291   if (RegOpenKeyEx(HKEY_LOCAL_MACHINE, registry, 0, KEY_READ, &key) != ERROR_SUCCESS) {\r
 292     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OPENKEY_FAILED, registry, error_string(GetLastError()), 0);\r
 293     return 2;\r
 294   }\r
 295 \r
 296   /* Try to get executable file - MUST succeed */\r
 297   if (expand_parameter(key, NSSM_REG_EXE, service->exe, sizeof(service->exe), false)) {\r
 298     RegCloseKey(key);\r
 299     return 3;\r
 300   }\r
 301 \r
 302   /* Try to get flags - may fail and we don't care */\r
 303   if (expand_parameter(key, NSSM_REG_FLAGS, service->flags, sizeof(service->flags), false)) {\r
 304     log_event(EVENTLOG_WARNING_TYPE, NSSM_EVENT_NO_FLAGS, NSSM_REG_FLAGS, service->name, service->exe, 0);\r
 305     ZeroMemory(service->flags, sizeof(service->flags));\r
 306   }\r
 307 \r
 308   /* Try to get startup directory - may fail and we fall back to a default */\r
 309   if (expand_parameter(key, NSSM_REG_DIR, service->dir, sizeof(service->dir), true) || ! service->dir[0]) {\r
 310     /* Our buffers are defined to be long enough for this to be safe */\r
 311     size_t i;\r
 312     for (i = strlen(service->exe); i && service->exe[i] != '\\' && service->exe[i] != '/'; i--);\r
 313     if (i) {\r
 314       memmove(service->dir, service->exe, i);\r
 315       service->dir[i] = '\0';\r
 316     }\r
 317     else {\r
 318       /* Help! */\r
 319       ret = GetWindowsDirectory(service->dir, sizeof(service->dir));\r
 320       if (! ret || ret > sizeof(service->dir)) {\r
 321         log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_NO_DIR_AND_NO_FALLBACK, NSSM_REG_DIR, service->name, 0);\r
 322         RegCloseKey(key);\r
 323         return 4;\r
 324       }\r
 325     }\r
 326     log_event(EVENTLOG_WARNING_TYPE, NSSM_EVENT_NO_DIR, NSSM_REG_DIR, service->name, service->dir, 0);\r
 327   }\r
 328 \r
 329   /* Try to get environment variables - may fail */\r
 330   set_environment(service->name, key, NSSM_REG_ENV, &service->env, &service->envlen);\r
 331   /* Environment variables to add to existing rather than replace - may fail. */\r
 332   set_environment(service->name, key, NSSM_REG_ENV_EXTRA, &service->env_extra, &service->env_extralen);\r
 333 \r
 334   if (service->env_extra) {\r
 335     /* Append these to any other environment variables set. */\r
 336     if (service->env) {\r
 337       /* Append extra variables to configured variables. */\r
 338       unsigned long envlen = service->envlen + service->env_extralen - 1;\r
 339       char *env = (char *) HeapAlloc(GetProcessHeap(), 0, envlen);\r
 340       if (env) {\r
 341         memmove(env, service->env, service->envlen - 1);\r
 342         memmove(env + service->envlen - 1, service->env_extra, service->env_extralen);\r
 343 \r
 344         HeapFree(GetProcessHeap(), 0, service->env);\r
 345         service->env = env;\r
 346         service->envlen = envlen;\r
 347       }\r
 348       else log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, "environment", "get_parameters()", 0);\r
 349     }\r
 350     else {\r
 351       /* Append extra variables to our environment. */\r
 352       char *env, *s;\r
 353       size_t envlen, len;\r
 354 \r
 355       env = service->env_extra;\r
 356       len = 0;\r
 357       while (*env) {\r
 358         envlen = strlen(env) + 1;\r
 359         for (s = env; *s && *s != '='; s++);\r
 360         if (*s == '=') *s++ = '\0';\r
 361         if (! SetEnvironmentVariable(env, s)) log_event(EVENTLOG_WARNING_TYPE, NSSM_EVENT_SETENVIRONMENTVARIABLE_FAILED, env, s, error_string(GetLastError()));\r
 362         env += envlen;\r
 363       }\r
 364     }\r
 365   }\r
 366 \r
 367   /* Try to get stdout and stderr */\r
 368   if (get_output_handles(key, si)) {\r
 369     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_GET_OUTPUT_HANDLES_FAILED, service->name, 0);\r
 370     RegCloseKey(key);\r
 371     return 5;\r
 372   }\r
 373 \r
 374   /* Try to get throttle restart delay */\r
 375   override_milliseconds(service->name, key, NSSM_REG_THROTTLE, &service->throttle_delay, NSSM_RESET_THROTTLE_RESTART, NSSM_EVENT_BOGUS_THROTTLE);\r
 376 \r
 377   /* Try to get service stop flags. */\r
 378   unsigned long type = REG_DWORD;\r
 379   unsigned long stop_method_skip;\r
 380   unsigned long buflen = sizeof(stop_method_skip);\r
 381   bool stop_ok = false;\r
 382   ret = RegQueryValueEx(key, NSSM_REG_STOP_METHOD_SKIP, 0, &type, (unsigned char *) &stop_method_skip, &buflen);\r
 383   if (ret != ERROR_SUCCESS) {\r
 384     if (ret != ERROR_FILE_NOT_FOUND) {\r
 385       if (type != REG_DWORD) {\r
 386         log_event(EVENTLOG_WARNING_TYPE, NSSM_EVENT_BOGUS_STOP_METHOD_SKIP, service->name, NSSM_REG_STOP_METHOD_SKIP, NSSM, 0);\r
 387       }\r
 388       else log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_QUERYVALUE_FAILED, NSSM_REG_STOP_METHOD_SKIP, error_string(GetLastError()), 0);\r
 389     }\r
 390   }\r
 391   else stop_ok = true;\r
 392 \r
 393   /* Try all methods except those requested to be skipped. */\r
 394   service->stop_method = ~0;\r
 395   if (stop_ok) service->stop_method &= ~stop_method_skip;\r
 396 \r
 397   /* Try to get kill delays - may fail. */\r
 398   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
 399   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
 400   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
 401 \r
 402   /* Close registry */\r
 403   RegCloseKey(key);\r
 404 \r
 405   return 0;\r
 406 }\r
 407 \r
 408 int get_exit_action(char *service_name, unsigned long *ret, unsigned char *action, bool *default_action) {\r
 409   /* Are we returning the default action or a status-specific one? */\r
 410   *default_action = ! ret;\r
 411 \r
 412   /* Get registry */\r
 413   char registry[KEY_LENGTH];\r
 414   if (_snprintf_s(registry, sizeof(registry), _TRUNCATE, NSSM_REGISTRY "\\%s", service_name, NSSM_REG_EXIT) < 0) {\r
 415     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, "NSSM_REG_EXIT", "get_exit_action()", 0);\r
 416     return 1;\r
 417   }\r
 418 \r
 419   /* Try to open the registry */\r
 420   HKEY key;\r
 421   long error = RegOpenKeyEx(HKEY_LOCAL_MACHINE, registry, 0, KEY_READ, &key);\r
 422   if (error != ERROR_SUCCESS && error != ERROR_FILE_NOT_FOUND) {\r
 423     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OPENKEY_FAILED, registry, error_string(GetLastError()), 0);\r
 424     return 2;\r
 425   }\r
 426 \r
 427   unsigned long type = REG_SZ;\r
 428   unsigned long action_len = ACTION_LEN;\r
 429 \r
 430   char code[64];\r
 431   if (! ret) code[0] = '\0';\r
 432   else if (_snprintf_s(code, sizeof(code), _TRUNCATE, "%lu", *ret) < 0) {\r
 433     RegCloseKey(key);\r
 434     return get_exit_action(service_name, 0, action, default_action);\r
 435   }\r
 436   if (RegQueryValueEx(key, code, 0, &type, action, &action_len) != ERROR_SUCCESS) {\r
 437     RegCloseKey(key);\r
 438     /* Try again with * as the key if an exit code was defined */\r
 439     if (ret) return get_exit_action(service_name, 0, action, default_action);\r
 440     return 0;\r
 441   }\r
 442 \r
 443   /* Close registry */\r
 444   RegCloseKey(key);\r
 445 \r
 446   return 0;\r
 447 }\r