3 int create_messages() {
\r
6 char registry[KEY_LENGTH];
\r
7 if (_snprintf_s(registry, sizeof(registry), _TRUNCATE, "SYSTEM\\CurrentControlSet\\Services\\EventLog\\Application\\%s", NSSM) < 0) {
\r
8 log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, "eventlog registry", "create_messages()", 0);
\r
12 if (RegCreateKeyEx(HKEY_LOCAL_MACHINE, registry, 0, 0, REG_OPTION_NON_VOLATILE, KEY_WRITE, 0, &key, 0) != ERROR_SUCCESS) {
\r
13 log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OPENKEY_FAILED, registry, error_string(GetLastError()), 0);
\r
17 /* Get path of this program */
\r
18 char path[MAX_PATH];
\r
19 GetModuleFileName(0, path, MAX_PATH);
\r
21 /* Try to register the module but don't worry so much on failure */
\r
22 RegSetValueEx(key, "EventMessageFile", 0, REG_SZ, (const unsigned char *) path, (unsigned long) strlen(path) + 1);
\r
23 unsigned long types = EVENTLOG_INFORMATION_TYPE | EVENTLOG_WARNING_TYPE | EVENTLOG_ERROR_TYPE;
\r
24 RegSetValueEx(key, "TypesSupported", 0, REG_DWORD, /*XXX*/(PBYTE) &types, sizeof(types));
\r
29 int create_parameters(char *service_name, char *exe, char *flags, char *dir) {
\r
31 char registry[KEY_LENGTH];
\r
32 if (_snprintf_s(registry, sizeof(registry), _TRUNCATE, NSSM_REGISTRY, service_name) < 0) {
\r
33 log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, "NSSM_REGISTRY", "create_parameters()", 0);
\r
37 /* Try to open the registry */
\r
39 if (RegCreateKeyEx(HKEY_LOCAL_MACHINE, registry, 0, 0, REG_OPTION_NON_VOLATILE, KEY_WRITE, 0, &key, 0) != ERROR_SUCCESS) {
\r
40 log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OPENKEY_FAILED, registry, error_string(GetLastError()), 0);
\r
44 /* Try to create the parameters */
\r
45 if (RegSetValueEx(key, NSSM_REG_EXE, 0, REG_EXPAND_SZ, (const unsigned char *) exe, (unsigned long) strlen(exe) + 1) != ERROR_SUCCESS) {
\r
46 log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_SETVALUE_FAILED, NSSM_REG_EXE, error_string(GetLastError()), 0);
\r
47 RegDeleteKey(HKEY_LOCAL_MACHINE, NSSM_REGISTRY);
\r
51 if (RegSetValueEx(key, NSSM_REG_FLAGS, 0, REG_EXPAND_SZ, (const unsigned char *) flags, (unsigned long) strlen(flags) + 1) != ERROR_SUCCESS) {
\r
52 log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_SETVALUE_FAILED, NSSM_REG_FLAGS, error_string(GetLastError()), 0);
\r
53 RegDeleteKey(HKEY_LOCAL_MACHINE, NSSM_REGISTRY);
\r
57 if (RegSetValueEx(key, NSSM_REG_DIR, 0, REG_EXPAND_SZ, (const unsigned char *) dir, (unsigned long) strlen(dir) + 1) != ERROR_SUCCESS) {
\r
58 log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_SETVALUE_FAILED, NSSM_REG_DIR, error_string(GetLastError()), 0);
\r
59 RegDeleteKey(HKEY_LOCAL_MACHINE, NSSM_REGISTRY);
\r
64 /* Close registry */
\r
70 int create_exit_action(char *service_name, const char *action_string) {
\r
72 char registry[KEY_LENGTH];
\r
73 if (_snprintf_s(registry, sizeof(registry), _TRUNCATE, NSSM_REGISTRY "\\%s", service_name, NSSM_REG_EXIT) < 0) {
\r
74 log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, "NSSM_REG_EXIT", "create_exit_action()", 0);
\r
78 /* Try to open the registry */
\r
80 unsigned long disposition;
\r
81 if (RegCreateKeyEx(HKEY_LOCAL_MACHINE, registry, 0, 0, REG_OPTION_NON_VOLATILE, KEY_WRITE, 0, &key, &disposition) != ERROR_SUCCESS) {
\r
82 log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OPENKEY_FAILED, registry, error_string(GetLastError()), 0);
\r
86 /* Do nothing if the key already existed */
\r
87 if (disposition == REG_OPENED_EXISTING_KEY) {
\r
92 /* Create the default value */
\r
93 if (RegSetValueEx(key, 0, 0, REG_SZ, (const unsigned char *) action_string, (unsigned long) strlen(action_string) + 1) != ERROR_SUCCESS) {
\r
94 log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_SETVALUE_FAILED, NSSM_REG_EXIT, error_string(GetLastError()), 0);
\r
99 /* Close registry */
\r
105 int set_environment(char *service_name, HKEY key, char **env) {
\r
106 unsigned long type = REG_MULTI_SZ;
\r
107 unsigned long envlen = 0;
\r
109 /* Dummy test to find buffer size */
\r
110 unsigned long ret = RegQueryValueEx(key, NSSM_REG_ENV, 0, &type, NULL, &envlen);
\r
111 if (ret != ERROR_SUCCESS) {
\r
112 /* The service probably doesn't have any environment configured */
\r
113 if (ret == ERROR_FILE_NOT_FOUND) return 0;
\r
114 log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_QUERYVALUE_FAILED, NSSM_REG_ENV, error_string(GetLastError()), 0);
\r
118 if (type != REG_MULTI_SZ) {
\r
119 log_event(EVENTLOG_WARNING_TYPE, NSSM_EVENT_INVALID_ENVIRONMENT_STRING_TYPE, NSSM_REG_ENV, service_name, 0);
\r
123 /* Probably not possible */
\r
124 if (! envlen) return 0;
\r
126 *env = (char *) HeapAlloc(GetProcessHeap(), 0, envlen);
\r
128 log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, "environment registry", "set_environment()", 0);
\r
132 /* Actually get the strings */
\r
133 ret = RegQueryValueEx(key, NSSM_REG_ENV, 0, &type, (unsigned char *) *env, &envlen);
\r
134 if (ret != ERROR_SUCCESS) {
\r
135 HeapFree(GetProcessHeap(), 0, *env);
\r
137 log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_QUERYVALUE_FAILED, NSSM_REG_ENV, error_string(GetLastError()), 0);
\r
144 int expand_parameter(HKEY key, char *value, char *data, unsigned long datalen, bool sanitise, bool must_exist) {
\r
145 unsigned char *buffer = (unsigned char *) HeapAlloc(GetProcessHeap(), 0, datalen);
\r
147 log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, value, "expand_parameter()", 0);
\r
151 ZeroMemory(data, datalen);
\r
153 unsigned long type = REG_EXPAND_SZ;
\r
154 unsigned long buflen = datalen;
\r
156 unsigned long ret = RegQueryValueEx(key, value, 0, &type, buffer, &buflen);
\r
157 if (ret != ERROR_SUCCESS) {
\r
158 unsigned long error = GetLastError();
\r
159 HeapFree(GetProcessHeap(), 0, buffer);
\r
161 if (ret == ERROR_FILE_NOT_FOUND) {
\r
162 if (! must_exist) return 0;
\r
165 log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_QUERYVALUE_FAILED, value, error_string(error), 0);
\r
169 /* Paths aren't allowed to contain quotes. */
\r
170 if (sanitise) PathUnquoteSpaces((LPSTR) buffer);
\r
172 /* Technically we shouldn't expand environment strings from REG_SZ values */
\r
173 if (type != REG_EXPAND_SZ) {
\r
174 memmove(data, buffer, buflen);
\r
175 HeapFree(GetProcessHeap(), 0, buffer);
\r
179 ret = ExpandEnvironmentStrings((char *) buffer, data, datalen);
\r
180 if (! ret || ret > datalen) {
\r
181 log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_EXPANDENVIRONMENTSTRINGS_FAILED, buffer, error_string(GetLastError()), 0);
\r
182 HeapFree(GetProcessHeap(), 0, buffer);
\r
186 HeapFree(GetProcessHeap(), 0, buffer);
\r
190 int expand_parameter(HKEY key, char *value, char *data, unsigned long datalen, bool sanitise) {
\r
191 return expand_parameter(key, value, data, datalen, sanitise, true);
\r
195 Query an unsigned long from the registry.
\r
196 Returns: 1 if a number was retrieved.
\r
197 0 if none was found and must_exist is false.
\r
198 -1 if none was found and must_exist is true.
\r
201 int get_number(HKEY key, char *value, unsigned long *number, bool must_exist) {
\r
202 unsigned long type = REG_DWORD;
\r
203 unsigned long number_len = sizeof(unsigned long);
\r
205 int ret = RegQueryValueEx(key, value, 0, &type, (unsigned char *) number, &number_len);
\r
206 if (ret == ERROR_SUCCESS) return 1;
\r
208 if (ret == ERROR_FILE_NOT_FOUND) {
\r
209 if (! must_exist) return 0;
\r
212 log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_QUERYVALUE_FAILED, value, error_string(GetLastError()), 0);
\r
213 if (ret == ERROR_FILE_NOT_FOUND) return -1;
\r
218 int get_number(HKEY key, char *value, unsigned long *number) {
\r
219 return get_number(key, value, number, true);
\r
222 void override_milliseconds(char *service_name, HKEY key, char *value, unsigned long *buffer, unsigned long default_value, unsigned long event) {
\r
223 unsigned long type = REG_DWORD;
\r
224 unsigned long buflen = sizeof(unsigned long);
\r
226 unsigned long ret = RegQueryValueEx(key, value, 0, &type, (unsigned char *) buffer, &buflen);
\r
227 if (ret != ERROR_SUCCESS) {
\r
228 if (ret != ERROR_FILE_NOT_FOUND) {
\r
229 if (type != REG_DWORD) {
\r
230 char milliseconds[16];
\r
231 _snprintf_s(milliseconds, sizeof(milliseconds), _TRUNCATE, "%lu", default_value);
\r
232 log_event(EVENTLOG_WARNING_TYPE, event, service_name, value, milliseconds, 0);
\r
234 else log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_QUERYVALUE_FAILED, value, error_string(GetLastError()), 0);
\r
239 if (! ok) *buffer = default_value;
\r
242 int get_parameters(char *service_name, char *exe, unsigned long exelen, char *flags, unsigned long flagslen, char *dir, unsigned long dirlen, char **env, unsigned long *throttle_delay, unsigned long *stop_method, unsigned long *kill_console_delay, unsigned long *kill_window_delay, unsigned long *kill_threads_delay, STARTUPINFO *si) {
\r
246 char registry[KEY_LENGTH];
\r
247 if (_snprintf_s(registry, sizeof(registry), _TRUNCATE, NSSM_REGISTRY, service_name) < 0) {
\r
248 log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, "NSSM_REGISTRY", "get_parameters()", 0);
\r
252 /* Try to open the registry */
\r
254 if (RegOpenKeyEx(HKEY_LOCAL_MACHINE, registry, 0, KEY_READ, &key) != ERROR_SUCCESS) {
\r
255 log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OPENKEY_FAILED, registry, error_string(GetLastError()), 0);
\r
259 /* Try to get executable file - MUST succeed */
\r
260 if (expand_parameter(key, NSSM_REG_EXE, exe, exelen, false)) {
\r
265 /* Try to get flags - may fail and we don't care */
\r
266 if (expand_parameter(key, NSSM_REG_FLAGS, flags, flagslen, false)) {
\r
267 log_event(EVENTLOG_WARNING_TYPE, NSSM_EVENT_NO_FLAGS, NSSM_REG_FLAGS, service_name, exe, 0);
\r
268 ZeroMemory(flags, flagslen);
\r
271 /* Try to get startup directory - may fail and we fall back to a default */
\r
272 if (expand_parameter(key, NSSM_REG_DIR, dir, dirlen, true) || ! dir[0]) {
\r
273 /* Our buffers are defined to be long enough for this to be safe */
\r
275 for (i = strlen(exe); i && exe[i] != '\\' && exe[i] != '/'; i--);
\r
277 memmove(dir, exe, i);
\r
282 ret = GetWindowsDirectory(dir, dirlen);
\r
283 if (! ret || ret > dirlen) {
\r
284 log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_NO_DIR_AND_NO_FALLBACK, NSSM_REG_DIR, service_name, 0);
\r
289 log_event(EVENTLOG_WARNING_TYPE, NSSM_EVENT_NO_DIR, NSSM_REG_DIR, service_name, dir, 0);
\r
292 /* Try to get environment variables - may fail */
\r
293 set_environment(service_name, key, env);
\r
295 /* Try to get stdout and stderr */
\r
296 if (get_output_handles(key, si)) {
\r
297 log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_GET_OUTPUT_HANDLES_FAILED, service_name, 0);
\r
302 /* Try to get throttle restart delay */
\r
303 override_milliseconds(service_name, key, NSSM_REG_THROTTLE, throttle_delay, NSSM_RESET_THROTTLE_RESTART, NSSM_EVENT_BOGUS_THROTTLE);
\r
305 /* Try to get service stop flags. */
\r
306 unsigned long type = REG_DWORD;
\r
307 unsigned long stop_method_skip;
\r
308 unsigned long buflen = sizeof(stop_method_skip);
\r
309 bool stop_ok = false;
\r
310 ret = RegQueryValueEx(key, NSSM_REG_STOP_METHOD_SKIP, 0, &type, (unsigned char *) &stop_method_skip, &buflen);
\r
311 if (ret != ERROR_SUCCESS) {
\r
312 if (ret != ERROR_FILE_NOT_FOUND) {
\r
313 if (type != REG_DWORD) {
\r
314 log_event(EVENTLOG_WARNING_TYPE, NSSM_EVENT_BOGUS_STOP_METHOD_SKIP, service_name, NSSM_REG_STOP_METHOD_SKIP, NSSM, 0);
\r
316 else log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_QUERYVALUE_FAILED, NSSM_REG_STOP_METHOD_SKIP, error_string(GetLastError()), 0);
\r
319 else stop_ok = true;
\r
321 /* Try all methods except those requested to be skipped. */
\r
323 if (stop_ok) *stop_method &= ~stop_method_skip;
\r
325 /* Try to get kill delays - may fail. */
\r
326 override_milliseconds(service_name, key, NSSM_REG_KILL_CONSOLE_GRACE_PERIOD, kill_console_delay, NSSM_KILL_CONSOLE_GRACE_PERIOD, NSSM_EVENT_BOGUS_KILL_CONSOLE_GRACE_PERIOD);
\r
327 override_milliseconds(service_name, key, NSSM_REG_KILL_WINDOW_GRACE_PERIOD, kill_window_delay, NSSM_KILL_WINDOW_GRACE_PERIOD, NSSM_EVENT_BOGUS_KILL_WINDOW_GRACE_PERIOD);
\r
328 override_milliseconds(service_name, key, NSSM_REG_KILL_THREADS_GRACE_PERIOD, kill_threads_delay, NSSM_KILL_THREADS_GRACE_PERIOD, NSSM_EVENT_BOGUS_KILL_THREADS_GRACE_PERIOD);
\r
330 /* Close registry */
\r
336 int get_exit_action(char *service_name, unsigned long *ret, unsigned char *action, bool *default_action) {
\r
337 /* Are we returning the default action or a status-specific one? */
\r
338 *default_action = ! ret;
\r
341 char registry[KEY_LENGTH];
\r
342 if (_snprintf_s(registry, sizeof(registry), _TRUNCATE, NSSM_REGISTRY "\\%s", service_name, NSSM_REG_EXIT) < 0) {
\r
343 log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, "NSSM_REG_EXIT", "get_exit_action()", 0);
\r
347 /* Try to open the registry */
\r
349 long error = RegOpenKeyEx(HKEY_LOCAL_MACHINE, registry, 0, KEY_READ, &key);
\r
350 if (error != ERROR_SUCCESS && error != ERROR_FILE_NOT_FOUND) {
\r
351 log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OPENKEY_FAILED, registry, error_string(GetLastError()), 0);
\r
355 unsigned long type = REG_SZ;
\r
356 unsigned long action_len = ACTION_LEN;
\r
359 if (! ret) code[0] = '\0';
\r
360 else if (_snprintf_s(code, sizeof(code), _TRUNCATE, "%lu", *ret) < 0) {
\r
362 return get_exit_action(service_name, 0, action, default_action);
\r
364 if (RegQueryValueEx(key, code, 0, &type, action, &action_len) != ERROR_SUCCESS) {
\r
366 /* Try again with * as the key if an exit code was defined */
\r
367 if (ret) return get_exit_action(service_name, 0, action, default_action);
\r
371 /* Close registry */
\r