registry.cpp 9.5 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259
  1. #include "nssm.h"
  2. int create_messages() {
  3. HKEY key;
  4. char registry[KEY_LENGTH];
  5. if (_snprintf(registry, sizeof(registry), "SYSTEM\\CurrentControlSet\\Services\\EventLog\\Application\\%s", NSSM) < 0) {
  6. log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, "eventlog registry", "create_messages()", 0);
  7. return 1;
  8. }
  9. if (RegCreateKeyEx(HKEY_LOCAL_MACHINE, registry, 0, 0, REG_OPTION_NON_VOLATILE, KEY_WRITE, 0, &key, 0) != ERROR_SUCCESS) {
  10. log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OPENKEY_FAILED, registry, error_string(GetLastError()), 0);
  11. return 2;
  12. }
  13. /* Get path of this program */
  14. char path[MAX_PATH];
  15. GetModuleFileName(0, path, MAX_PATH);
  16. /* Try to register the module but don't worry so much on failure */
  17. RegSetValueEx(key, "EventMessageFile", 0, REG_SZ, (const unsigned char *) path, strlen(path) + 1);
  18. unsigned long types = EVENTLOG_INFORMATION_TYPE | EVENTLOG_WARNING_TYPE | EVENTLOG_ERROR_TYPE;
  19. RegSetValueEx(key, "TypesSupported", 0, REG_DWORD, /*XXX*/(PBYTE) &types, sizeof(types));
  20. return 0;
  21. }
  22. int create_parameters(char *service_name, char *exe, char *flags, char *dir) {
  23. /* Get registry */
  24. char registry[KEY_LENGTH];
  25. if (_snprintf(registry, sizeof(registry), NSSM_REGISTRY, service_name) < 0) {
  26. log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, "NSSM_REGISTRY", "create_parameters()", 0);
  27. return 1;
  28. }
  29. /* Try to open the registry */
  30. HKEY key;
  31. if (RegCreateKeyEx(HKEY_LOCAL_MACHINE, registry, 0, 0, REG_OPTION_NON_VOLATILE, KEY_WRITE, 0, &key, 0) != ERROR_SUCCESS) {
  32. log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OPENKEY_FAILED, registry, error_string(GetLastError()), 0);
  33. return 2;
  34. }
  35. /* Try to create the parameters */
  36. if (RegSetValueEx(key, NSSM_REG_EXE, 0, REG_EXPAND_SZ, (const unsigned char *) exe, strlen(exe) + 1) != ERROR_SUCCESS) {
  37. log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_SETVALUE_FAILED, NSSM_REG_EXE, error_string(GetLastError()), 0);
  38. RegDeleteKey(HKEY_LOCAL_MACHINE, NSSM_REGISTRY);
  39. RegCloseKey(key);
  40. return 3;
  41. }
  42. if (RegSetValueEx(key, NSSM_REG_FLAGS, 0, REG_EXPAND_SZ, (const unsigned char *) flags, strlen(flags) + 1) != ERROR_SUCCESS) {
  43. log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_SETVALUE_FAILED, NSSM_REG_FLAGS, error_string(GetLastError()), 0);
  44. RegDeleteKey(HKEY_LOCAL_MACHINE, NSSM_REGISTRY);
  45. RegCloseKey(key);
  46. return 4;
  47. }
  48. if (RegSetValueEx(key, NSSM_REG_DIR, 0, REG_EXPAND_SZ, (const unsigned char *) dir, strlen(dir) + 1) != ERROR_SUCCESS) {
  49. log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_SETVALUE_FAILED, NSSM_REG_DIR, error_string(GetLastError()), 0);
  50. RegDeleteKey(HKEY_LOCAL_MACHINE, NSSM_REGISTRY);
  51. RegCloseKey(key);
  52. return 5;
  53. }
  54. /* Close registry */
  55. RegCloseKey(key);
  56. return 0;
  57. }
  58. int create_exit_action(char *service_name, const char *action_string) {
  59. /* Get registry */
  60. char registry[KEY_LENGTH];
  61. if (_snprintf(registry, sizeof(registry), NSSM_REGISTRY "\\%s", service_name, NSSM_REG_EXIT) < 0) {
  62. log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, "NSSM_REG_EXIT", "create_exit_action()", 0);
  63. return 1;
  64. }
  65. /* Try to open the registry */
  66. HKEY key;
  67. unsigned long disposition;
  68. if (RegCreateKeyEx(HKEY_LOCAL_MACHINE, registry, 0, 0, REG_OPTION_NON_VOLATILE, KEY_WRITE, 0, &key, &disposition) != ERROR_SUCCESS) {
  69. log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OPENKEY_FAILED, registry, error_string(GetLastError()), 0);
  70. return 2;
  71. }
  72. /* Do nothing if the key already existed */
  73. if (disposition == REG_OPENED_EXISTING_KEY) {
  74. RegCloseKey(key);
  75. return 0;
  76. }
  77. /* Create the default value */
  78. if (RegSetValueEx(key, 0, 0, REG_SZ, (const unsigned char *) action_string, strlen(action_string) + 1) != ERROR_SUCCESS) {
  79. log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_SETVALUE_FAILED, NSSM_REG_EXIT, error_string(GetLastError()), 0);
  80. RegCloseKey(key);
  81. return 3;
  82. }
  83. /* Close registry */
  84. RegCloseKey(key);
  85. return 0;
  86. }
  87. int expand_parameter(HKEY key, char *value, char *data, unsigned long datalen, bool sanitise) {
  88. unsigned char *buffer = (unsigned char *) HeapAlloc(GetProcessHeap(), 0, datalen);
  89. if (! buffer) {
  90. log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, value, "expand_parameter()", 0);
  91. return 1;
  92. }
  93. unsigned long type = REG_EXPAND_SZ;
  94. unsigned long buflen = datalen;
  95. unsigned long ret = RegQueryValueEx(key, value, 0, &type, buffer, &buflen);
  96. if (ret != ERROR_SUCCESS) {
  97. if (ret != ERROR_FILE_NOT_FOUND) log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_QUERYVALUE_FAILED, value, error_string(GetLastError()), 0);
  98. HeapFree(GetProcessHeap(), 0, buffer);
  99. return 2;
  100. }
  101. /* Paths aren't allowed to contain quotes. */
  102. if (sanitise) PathUnquoteSpaces((LPSTR) buffer);
  103. ZeroMemory(data, datalen);
  104. /* Technically we shouldn't expand environment strings from REG_SZ values */
  105. if (type != REG_EXPAND_SZ) {
  106. memmove(data, buffer, buflen);
  107. HeapFree(GetProcessHeap(), 0, buffer);
  108. return 0;
  109. }
  110. ret = ExpandEnvironmentStrings((char *) buffer, data, datalen);
  111. if (! ret || ret > datalen) {
  112. log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_EXPANDENVIRONMENTSTRINGS_FAILED, value, buffer, error_string(GetLastError()), 0);
  113. HeapFree(GetProcessHeap(), 0, buffer);
  114. return 3;
  115. }
  116. HeapFree(GetProcessHeap(), 0, buffer);
  117. return 0;
  118. }
  119. int get_parameters(char *service_name, char *exe, int exelen, char *flags, int flagslen, char *dir, int dirlen, unsigned long *throttle_delay) {
  120. unsigned long ret;
  121. /* Get registry */
  122. char registry[KEY_LENGTH];
  123. if (_snprintf(registry, sizeof(registry), NSSM_REGISTRY, service_name) < 0) {
  124. log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, "NSSM_REGISTRY", "get_parameters()", 0);
  125. return 1;
  126. }
  127. /* Try to open the registry */
  128. HKEY key;
  129. if (RegOpenKeyEx(HKEY_LOCAL_MACHINE, registry, 0, KEY_READ, &key) != ERROR_SUCCESS) {
  130. log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OPENKEY_FAILED, registry, error_string(GetLastError()), 0);
  131. return 2;
  132. }
  133. /* Try to get executable file - MUST succeed */
  134. if (expand_parameter(key, NSSM_REG_EXE, exe, exelen, false)) {
  135. RegCloseKey(key);
  136. return 3;
  137. }
  138. /* Try to get flags - may fail and we don't care */
  139. if (expand_parameter(key, NSSM_REG_FLAGS, flags, flagslen, false)) {
  140. log_event(EVENTLOG_WARNING_TYPE, NSSM_EVENT_NO_FLAGS, NSSM_REG_FLAGS, service_name, exe, 0);
  141. ZeroMemory(flags, flagslen);
  142. }
  143. /* Try to get startup directory - may fail and we fall back to a default */
  144. if (expand_parameter(key, NSSM_REG_DIR, dir, dirlen, true) || ! dir[0]) {
  145. /* Our buffers are defined to be long enough for this to be safe */
  146. size_t i;
  147. for (i = strlen(exe); i && exe[i] != '\\' && exe[i] != '/'; i--);
  148. if (i) {
  149. memmove(dir, exe, i);
  150. dir[i] = '\0';
  151. }
  152. else {
  153. /* Help! */
  154. ret = GetWindowsDirectory(dir, dirlen);
  155. if (! ret || ret > dirlen) {
  156. log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_NO_DIR_AND_NO_FALLBACK, NSSM_REG_DIR, service_name, 0);
  157. RegCloseKey(key);
  158. return 4;
  159. }
  160. }
  161. log_event(EVENTLOG_WARNING_TYPE, NSSM_EVENT_NO_DIR, NSSM_REG_DIR, service_name, dir, 0);
  162. }
  163. /* Try to get throttle restart delay */
  164. unsigned long type = REG_DWORD;
  165. unsigned long buflen = sizeof(*throttle_delay);
  166. bool throttle_ok = false;
  167. ret = RegQueryValueEx(key, NSSM_REG_THROTTLE, 0, &type, (unsigned char *) throttle_delay, &buflen);
  168. if (ret != ERROR_SUCCESS) {
  169. if (ret != ERROR_FILE_NOT_FOUND) {
  170. if (type != REG_DWORD) {
  171. char milliseconds[16];
  172. _snprintf(milliseconds, sizeof(milliseconds), "%lu", NSSM_RESET_THROTTLE_RESTART);
  173. log_event(EVENTLOG_WARNING_TYPE, NSSM_EVENT_BOGUS_THROTTLE, service_name, NSSM_REG_THROTTLE, milliseconds, 0);
  174. }
  175. else log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_QUERYVALUE_FAILED, NSSM_REG_THROTTLE, error_string(GetLastError()), 0);
  176. }
  177. }
  178. else throttle_ok = true;
  179. if (! throttle_ok) *throttle_delay = NSSM_RESET_THROTTLE_RESTART;
  180. /* Close registry */
  181. RegCloseKey(key);
  182. return 0;
  183. }
  184. int get_exit_action(char *service_name, unsigned long *ret, unsigned char *action, bool *default_action) {
  185. /* Are we returning the default action or a status-specific one? */
  186. *default_action = ! ret;
  187. /* Get registry */
  188. char registry[KEY_LENGTH];
  189. if (_snprintf(registry, sizeof(registry), NSSM_REGISTRY "\\%s", service_name, NSSM_REG_EXIT) < 0) {
  190. log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, "NSSM_REG_EXIT", "get_exit_action()", 0);
  191. return 1;
  192. }
  193. /* Try to open the registry */
  194. HKEY key;
  195. long error = RegOpenKeyEx(HKEY_LOCAL_MACHINE, registry, 0, KEY_READ, &key);
  196. if (error != ERROR_SUCCESS && error != ERROR_FILE_NOT_FOUND) {
  197. log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OPENKEY_FAILED, registry, error_string(GetLastError()), 0);
  198. return 2;
  199. }
  200. unsigned long type = REG_SZ;
  201. unsigned long action_len = ACTION_LEN;
  202. char code[64];
  203. if (! ret) code[0] = '\0';
  204. else if (_snprintf(code, sizeof(code), "%lu", *ret) < 0) {
  205. RegCloseKey(key);
  206. return get_exit_action(service_name, 0, action, default_action);
  207. }
  208. if (RegQueryValueEx(key, code, 0, &type, action, &action_len) != ERROR_SUCCESS) {
  209. RegCloseKey(key);
  210. /* Try again with * as the key if an exit code was defined */
  211. if (ret) return get_exit_action(service_name, 0, action, default_action);
  212. return 0;
  213. }
  214. /* Close registry */
  215. RegCloseKey(key);
  216. return 0;
  217. }