Added --version command.
[nssm.git] / io.cpp
1 #include "nssm.h"\r
2 \r
3 #define COMPLAINED_READ (1 << 0)\r
4 #define COMPLAINED_WRITE (1 << 1)\r
5 #define COMPLAINED_ROTATE (1 << 2)\r
6 #define TIMESTAMP_FORMAT "%04u-%02u-%02u %02u:%02u:%02u.%03u: "\r
7 #define TIMESTAMP_LEN 25\r
8 \r
9 static int dup_handle(HANDLE source_handle, HANDLE *dest_handle_ptr, TCHAR *source_description, TCHAR *dest_description, unsigned long flags) {\r
10   if (! dest_handle_ptr) return 1;\r
11 \r
12   if (! DuplicateHandle(GetCurrentProcess(), source_handle, GetCurrentProcess(), dest_handle_ptr, 0, true, flags)) {\r
13     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_DUPLICATEHANDLE_FAILED, source_description, dest_description, error_string(GetLastError()), 0);\r
14     return 2;\r
15   }\r
16   return 0;\r
17 }\r
18 \r
19 static int dup_handle(HANDLE source_handle, HANDLE *dest_handle_ptr, TCHAR *source_description, TCHAR *dest_description) {\r
20   return dup_handle(source_handle, dest_handle_ptr, source_description, dest_description, DUPLICATE_SAME_ACCESS);\r
21 }\r
22 \r
23 /*\r
24   read_handle:  read from application\r
25   pipe_handle:  stdout of application\r
26   write_handle: to file\r
27 */\r
28 static HANDLE create_logging_thread(TCHAR *service_name, TCHAR *path, unsigned long sharing, unsigned long disposition, unsigned long flags, HANDLE *read_handle_ptr, HANDLE *pipe_handle_ptr, HANDLE *write_handle_ptr, unsigned long rotate_bytes_low, unsigned long rotate_bytes_high, unsigned long rotate_delay, unsigned long *tid_ptr, unsigned long *rotate_online, bool timestamp_log, bool copy_and_truncate) {\r
29   *tid_ptr = 0;\r
30 \r
31   /* Pipe between application's stdout/stderr and our logging handle. */\r
32   if (read_handle_ptr && ! *read_handle_ptr) {\r
33     if (pipe_handle_ptr && ! *pipe_handle_ptr) {\r
34       if (CreatePipe(read_handle_ptr, pipe_handle_ptr, 0, 0)) {\r
35         SetHandleInformation(*pipe_handle_ptr, HANDLE_FLAG_INHERIT, HANDLE_FLAG_INHERIT);\r
36       }\r
37       else {\r
38         log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_CREATEPIPE_FAILED, service_name, path, error_string(GetLastError()));\r
39         return (HANDLE) 0;\r
40       }\r
41     }\r
42   }\r
43 \r
44   logger_t *logger = (logger_t *) HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY, sizeof(logger_t));\r
45   if (! logger) {\r
46     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, _T("logger"), _T("create_logging_thread()"), 0);\r
47     return (HANDLE) 0;\r
48   }\r
49 \r
50   ULARGE_INTEGER size;\r
51   size.LowPart = rotate_bytes_low;\r
52   size.HighPart = rotate_bytes_high;\r
53 \r
54   logger->service_name = service_name;\r
55   logger->path = path;\r
56   logger->sharing = sharing;\r
57   logger->disposition = disposition;\r
58   logger->flags = flags;\r
59   logger->read_handle = *read_handle_ptr;\r
60   logger->write_handle = *write_handle_ptr;\r
61   logger->size = (__int64) size.QuadPart;\r
62   logger->tid_ptr = tid_ptr;\r
63   logger->timestamp_log = timestamp_log;\r
64   logger->line_length = 0;\r
65   logger->rotate_online = rotate_online;\r
66   logger->rotate_delay = rotate_delay;\r
67   logger->copy_and_truncate = copy_and_truncate;\r
68 \r
69   HANDLE thread_handle = CreateThread(NULL, 0, log_and_rotate, (void *) logger, 0, logger->tid_ptr);\r
70   if (! thread_handle) {\r
71     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_CREATETHREAD_FAILED, error_string(GetLastError()), 0);\r
72     HeapFree(GetProcessHeap(), 0, logger);\r
73   }\r
74 \r
75   return thread_handle;\r
76 }\r
77 \r
78 static inline unsigned long guess_charsize(void *address, unsigned long bufsize) {\r
79   if (IsTextUnicode(address, bufsize, 0)) return (unsigned long) sizeof(wchar_t);\r
80   else return (unsigned long) sizeof(char);\r
81 }\r
82 \r
83 static inline void write_bom(logger_t *logger, unsigned long *out) {\r
84   wchar_t bom = L'\ufeff';\r
85   if (! WriteFile(logger->write_handle, (void *) &bom, sizeof(bom), out, 0)) {\r
86     log_event(EVENTLOG_WARNING_TYPE, NSSM_EVENT_SOMEBODY_SET_UP_US_THE_BOM, logger->service_name, logger->path, error_string(GetLastError()), 0);\r
87   }\r
88 }\r
89 \r
90 void close_handle(HANDLE *handle, HANDLE *remember) {\r
91   if (remember) *remember = INVALID_HANDLE_VALUE;\r
92   if (! handle) return;\r
93   if (! *handle) return;\r
94   CloseHandle(*handle);\r
95   if (remember) *remember = *handle;\r
96   *handle = 0;\r
97 }\r
98 \r
99 void close_handle(HANDLE *handle) {\r
100   close_handle(handle, NULL);\r
101 }\r
102 \r
103 /* Get path, share mode, creation disposition and flags for a stream. */\r
104 int get_createfile_parameters(HKEY key, TCHAR *prefix, TCHAR *path, unsigned long *sharing, unsigned long default_sharing, unsigned long *disposition, unsigned long default_disposition, unsigned long *flags, unsigned long default_flags, bool *copy_and_truncate) {\r
105   TCHAR value[NSSM_STDIO_LENGTH];\r
106 \r
107   /* Path. */\r
108   if (_sntprintf_s(value, _countof(value), _TRUNCATE, _T("%s"), prefix) < 0) {\r
109     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, prefix, _T("get_createfile_parameters()"), 0);\r
110     return 1;\r
111   }\r
112   switch (expand_parameter(key, value, path, PATH_LENGTH, true, false)) {\r
113     case 0: if (! path[0]) return 0; break; /* OK. */\r
114     default: return 2; /* Error. */\r
115   }\r
116 \r
117   /* ShareMode. */\r
118   if (_sntprintf_s(value, _countof(value), _TRUNCATE, _T("%s%s"), prefix, NSSM_REG_STDIO_SHARING) < 0) {\r
119     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, NSSM_REG_STDIO_SHARING, _T("get_createfile_parameters()"), 0);\r
120     return 3;\r
121   }\r
122   switch (get_number(key, value, sharing, false)) {\r
123     case 0: *sharing = default_sharing; break; /* Missing. */\r
124     case 1: break; /* Found. */\r
125     case -2: return 4; /* Error. */\r
126   }\r
127 \r
128   /* CreationDisposition. */\r
129   if (_sntprintf_s(value, _countof(value), _TRUNCATE, _T("%s%s"), prefix, NSSM_REG_STDIO_DISPOSITION) < 0) {\r
130     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, NSSM_REG_STDIO_DISPOSITION, _T("get_createfile_parameters()"), 0);\r
131     return 5;\r
132   }\r
133   switch (get_number(key, value, disposition, false)) {\r
134     case 0: *disposition = default_disposition; break; /* Missing. */\r
135     case 1: break; /* Found. */\r
136     case -2: return 6; /* Error. */\r
137   }\r
138 \r
139   /* Flags. */\r
140   if (_sntprintf_s(value, _countof(value), _TRUNCATE, _T("%s%s"), prefix, NSSM_REG_STDIO_FLAGS) < 0) {\r
141     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, NSSM_REG_STDIO_FLAGS, _T("get_createfile_parameters()"), 0);\r
142     return 7;\r
143   }\r
144   switch (get_number(key, value, flags, false)) {\r
145     case 0: *flags = default_flags; break; /* Missing. */\r
146     case 1: break; /* Found. */\r
147     case -2: return 8; /* Error. */\r
148   }\r
149 \r
150   /* Rotate with CopyFile() and SetEndOfFile(). */\r
151   if (copy_and_truncate) {\r
152     unsigned long data;\r
153     if (_sntprintf_s(value, _countof(value), _TRUNCATE, _T("%s%s"), prefix, NSSM_REG_STDIO_COPY_AND_TRUNCATE) < 0) {\r
154       log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, NSSM_REG_STDIO_COPY_AND_TRUNCATE, _T("get_createfile_parameters()"), 0);\r
155       return 9;\r
156     }\r
157     switch (get_number(key, value, &data, false)) {\r
158       case 0: *copy_and_truncate = false; break; /* Missing. */\r
159       case 1: /* Found. */\r
160         if (data) *copy_and_truncate = true;\r
161         else *copy_and_truncate = false;\r
162         break;\r
163       case -2: return 9; /* Error. */\r
164     }\r
165   }\r
166 \r
167   return 0;\r
168 }\r
169 \r
170 int set_createfile_parameter(HKEY key, TCHAR *prefix, TCHAR *suffix, unsigned long number) {\r
171   TCHAR value[NSSM_STDIO_LENGTH];\r
172 \r
173   if (_sntprintf_s(value, _countof(value), _TRUNCATE, _T("%s%s"), prefix, suffix) < 0) {\r
174     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, suffix, _T("set_createfile_parameter()"), 0);\r
175     return 1;\r
176   }\r
177 \r
178   return set_number(key, value, number);\r
179 }\r
180 \r
181 int delete_createfile_parameter(HKEY key, TCHAR *prefix, TCHAR *suffix) {\r
182   TCHAR value[NSSM_STDIO_LENGTH];\r
183 \r
184   if (_sntprintf_s(value, _countof(value), _TRUNCATE, _T("%s%s"), prefix, suffix) < 0) {\r
185     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_OUT_OF_MEMORY, suffix, _T("delete_createfile_parameter()"), 0);\r
186     return 1;\r
187   }\r
188 \r
189   if (RegDeleteValue(key, value)) return 0;\r
190   return 1;\r
191 }\r
192 \r
193 HANDLE write_to_file(TCHAR *path, unsigned long sharing, SECURITY_ATTRIBUTES *attributes, unsigned long disposition, unsigned long flags) {\r
194   static LARGE_INTEGER offset = { 0 };\r
195   HANDLE ret = CreateFile(path, FILE_WRITE_DATA, sharing, attributes, disposition, flags, 0);\r
196   if (ret != INVALID_HANDLE_VALUE) {\r
197     if (SetFilePointerEx(ret, offset, 0, FILE_END)) SetEndOfFile(ret);\r
198     return ret;\r
199   }\r
200 \r
201   log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_CREATEFILE_FAILED, path, error_string(GetLastError()), 0);\r
202   return ret;\r
203 }\r
204 \r
205 static void rotated_filename(TCHAR *path, TCHAR *rotated, unsigned long rotated_len, SYSTEMTIME *st) {\r
206   if (! st) {\r
207     SYSTEMTIME now;\r
208     st = &now;\r
209     GetSystemTime(st);\r
210   }\r
211 \r
212   TCHAR buffer[PATH_LENGTH];\r
213   memmove(buffer, path, sizeof(buffer));\r
214   TCHAR *ext = PathFindExtension(buffer);\r
215   TCHAR extension[PATH_LENGTH];\r
216   _sntprintf_s(extension, _countof(extension), _TRUNCATE, _T("-%04u%02u%02uT%02u%02u%02u.%03u%s"), st->wYear, st->wMonth, st->wDay, st->wHour, st->wMinute, st->wSecond, st->wMilliseconds, ext);\r
217   *ext = _T('\0');\r
218   _sntprintf_s(rotated, rotated_len, _TRUNCATE, _T("%s%s"), buffer, extension);\r
219 }\r
220 \r
221 void rotate_file(TCHAR *service_name, TCHAR *path, unsigned long seconds, unsigned long delay, unsigned long low, unsigned long high, bool copy_and_truncate) {\r
222   unsigned long error;\r
223 \r
224   /* Now. */\r
225   SYSTEMTIME st;\r
226   GetSystemTime(&st);\r
227 \r
228   BY_HANDLE_FILE_INFORMATION info;\r
229 \r
230   /* Try to open the file to check if it exists and to get attributes. */\r
231   HANDLE file = CreateFile(path, 0, FILE_SHARE_READ | FILE_SHARE_WRITE | FILE_SHARE_DELETE, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, 0);\r
232   if (file != INVALID_HANDLE_VALUE) {\r
233     /* Get file attributes. */\r
234     if (! GetFileInformationByHandle(file, &info)) {\r
235       /* Reuse current time for rotation timestamp. */\r
236       seconds = low = high = 0;\r
237       SystemTimeToFileTime(&st, &info.ftLastWriteTime);\r
238     }\r
239 \r
240     CloseHandle(file);\r
241   }\r
242   else {\r
243     error = GetLastError();\r
244     if (error == ERROR_FILE_NOT_FOUND) return;\r
245     log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_ROTATE_FILE_FAILED, service_name, path, _T("CreateFile()"), path, error_string(error), 0);\r
246     /* Reuse current time for rotation timestamp. */\r
247     seconds = low = high = 0;\r
248     SystemTimeToFileTime(&st, &info.ftLastWriteTime);\r
249   }\r
250 \r
251   /* Check file age. */\r
252   if (seconds) {\r
253     FILETIME ft;\r
254     SystemTimeToFileTime(&st, &ft);\r
255 \r
256     ULARGE_INTEGER s;\r
257     s.LowPart = ft.dwLowDateTime;\r
258     s.HighPart = ft.dwHighDateTime;\r
259     s.QuadPart -= seconds * 10000000LL;\r
260     ft.dwLowDateTime = s.LowPart;\r
261     ft.dwHighDateTime = s.HighPart;\r
262     if (CompareFileTime(&info.ftLastWriteTime, &ft) > 0) return;\r
263   }\r
264 \r
265   /* Check file size. */\r
266   if (low || high) {\r
267     if (info.nFileSizeHigh < high) return;\r
268     if (info.nFileSizeHigh == high && info.nFileSizeLow < low) return;\r
269   }\r
270 \r
271   /* Get new filename. */\r
272   FileTimeToSystemTime(&info.ftLastWriteTime, &st);\r
273 \r
274   TCHAR rotated[PATH_LENGTH];\r
275   rotated_filename(path, rotated, _countof(rotated), &st);\r
276 \r
277   /* Rotate. */\r
278   bool ok = true;\r
279   TCHAR *function;\r
280   if (copy_and_truncate) {\r
281     function = _T("CopyFile()");\r
282     if (CopyFile(path, rotated, TRUE)) {\r
283       file = write_to_file(path, NSSM_STDOUT_SHARING, 0, NSSM_STDOUT_DISPOSITION, NSSM_STDOUT_FLAGS);\r
284       Sleep(delay);\r
285       SetFilePointer(file, 0, 0, FILE_BEGIN);\r
286       SetEndOfFile(file);\r
287       CloseHandle(file);\r
288     }\r
289     else ok = false;\r
290   }\r
291   else {\r
292     function = _T("MoveFile()");\r
293     if (! MoveFile(path, rotated)) ok = false;\r
294   }\r
295   if (ok) {\r
296     log_event(EVENTLOG_INFORMATION_TYPE, NSSM_EVENT_ROTATED, service_name, path, rotated, 0);\r
297     return;\r
298   }\r
299   error = GetLastError();\r
300 \r
301   if (error == ERROR_FILE_NOT_FOUND) return;\r
302   log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_ROTATE_FILE_FAILED, service_name, path, function, rotated, error_string(error), 0);\r
303   return;\r
304 }\r
305 \r
306 int get_output_handles(nssm_service_t *service, STARTUPINFO *si) {\r
307   if (! si) return 1;\r
308 \r
309   /* Allocate a new console so we get a fresh stdin, stdout and stderr. */\r
310   alloc_console(service);\r
311 \r
312   /* stdin */\r
313   if (service->stdin_path[0]) {\r
314     si->hStdInput = CreateFile(service->stdin_path, FILE_READ_DATA, service->stdin_sharing, 0, service->stdin_disposition, service->stdin_flags, 0);\r
315     if (si->hStdInput == INVALID_HANDLE_VALUE) {\r
316       log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_CREATEFILE_FAILED, service->stdin_path, error_string(GetLastError()), 0);\r
317       return 2;\r
318     }\r
319   }\r
320 \r
321   /* stdout */\r
322   if (service->stdout_path[0]) {\r
323     if (service->rotate_files) rotate_file(service->name, service->stdout_path, service->rotate_seconds, service->rotate_bytes_low, service->rotate_bytes_high, service->rotate_delay, service->stdout_copy_and_truncate);\r
324     HANDLE stdout_handle = write_to_file(service->stdout_path, service->stdout_sharing, 0, service->stdout_disposition, service->stdout_flags);\r
325     if (stdout_handle == INVALID_HANDLE_VALUE) return 4;\r
326     service->stdout_si = 0;\r
327 \r
328     if (service->use_stdout_pipe) {\r
329       service->stdout_pipe = si->hStdOutput = 0;\r
330       service->stdout_thread = create_logging_thread(service->name, service->stdout_path, service->stdout_sharing, service->stdout_disposition, service->stdout_flags, &service->stdout_pipe, &service->stdout_si, &stdout_handle, service->rotate_bytes_low, service->rotate_bytes_high, service->rotate_delay, &service->stdout_tid, &service->rotate_stdout_online, service->timestamp_log, service->stdout_copy_and_truncate);\r
331       if (! service->stdout_thread) {\r
332         CloseHandle(service->stdout_pipe);\r
333         CloseHandle(service->stdout_si);\r
334       }\r
335     }\r
336     else service->stdout_thread = 0;\r
337 \r
338     if (! service->stdout_thread) {\r
339       if (dup_handle(stdout_handle, &service->stdout_si, NSSM_REG_STDOUT, _T("stdout"), DUPLICATE_CLOSE_SOURCE | DUPLICATE_SAME_ACCESS)) return 4;\r
340       service->rotate_stdout_online = NSSM_ROTATE_OFFLINE;\r
341     }\r
342 \r
343     if (dup_handle(service->stdout_si, &si->hStdOutput, _T("stdout_si"), _T("stdout"))) close_handle(&service->stdout_thread);\r
344   }\r
345 \r
346   /* stderr */\r
347   if (service->stderr_path[0]) {\r
348     /* Same as stdout? */\r
349     if (str_equiv(service->stderr_path, service->stdout_path)) {\r
350       service->stderr_sharing = service->stdout_sharing;\r
351       service->stderr_disposition = service->stdout_disposition;\r
352       service->stderr_flags = service->stdout_flags;\r
353       service->rotate_stderr_online = NSSM_ROTATE_OFFLINE;\r
354 \r
355       /* Two handles to the same file will create a race. */\r
356       /* XXX: Here we assume that either both or neither handle must be a pipe. */\r
357       if (dup_handle(service->stdout_si, &service->stderr_si, _T("stdout"), _T("stderr"))) return 6;\r
358     }\r
359     else {\r
360       if (service->rotate_files) rotate_file(service->name, service->stderr_path, service->rotate_seconds, service->rotate_bytes_low, service->rotate_bytes_high, service->rotate_delay, service->stderr_copy_and_truncate);\r
361       HANDLE stderr_handle = write_to_file(service->stderr_path, service->stderr_sharing, 0, service->stderr_disposition, service->stderr_flags);\r
362       if (stderr_handle == INVALID_HANDLE_VALUE) return 7;\r
363       service->stderr_si = 0;\r
364 \r
365       if (service->use_stderr_pipe) {\r
366         service->stderr_pipe = si->hStdError = 0;\r
367         service->stderr_thread = create_logging_thread(service->name, service->stderr_path, service->stderr_sharing, service->stderr_disposition, service->stderr_flags, &service->stderr_pipe, &service->stderr_si, &stderr_handle, service->rotate_bytes_low, service->rotate_bytes_high, service->rotate_delay, &service->stderr_tid, &service->rotate_stderr_online, service->timestamp_log, service->stderr_copy_and_truncate);\r
368         if (! service->stderr_thread) {\r
369           CloseHandle(service->stderr_pipe);\r
370           CloseHandle(service->stderr_si);\r
371         }\r
372       }\r
373       else service->stderr_thread = 0;\r
374 \r
375       if (! service->stderr_thread) {\r
376         if (dup_handle(stderr_handle, &service->stderr_si, NSSM_REG_STDERR, _T("stderr"), DUPLICATE_CLOSE_SOURCE | DUPLICATE_SAME_ACCESS)) return 7;\r
377         service->rotate_stderr_online = NSSM_ROTATE_OFFLINE;\r
378       }\r
379     }\r
380 \r
381     if (dup_handle(service->stderr_si, &si->hStdError, _T("stderr_si"), _T("stderr"))) close_handle(&service->stderr_thread);\r
382   }\r
383 \r
384   /*\r
385     We need to set the startup_info flags to make the new handles\r
386     inheritable by the new process.\r
387   */\r
388   si->dwFlags |= STARTF_USESTDHANDLES;\r
389 \r
390   if (service->no_console) return 0;\r
391 \r
392   /* Redirect other handles. */\r
393   if (! si->hStdInput) {\r
394     if (dup_handle(GetStdHandle(STD_INPUT_HANDLE), &si->hStdInput, _T("STD_INPUT_HANDLE"), _T("stdin"))) return 8;\r
395   }\r
396   if (! si->hStdOutput) {\r
397     if (dup_handle(GetStdHandle(STD_OUTPUT_HANDLE), &si->hStdOutput, _T("STD_OUTPUT_HANDLE"), _T("stdout"))) return 9;\r
398   }\r
399   if (! si->hStdError)  {\r
400     if (dup_handle(GetStdHandle(STD_ERROR_HANDLE), &si->hStdError, _T("STD_ERROR_HANDLE"), _T("stderr"))) return 10;\r
401   }\r
402 \r
403   return 0;\r
404 }\r
405 \r
406 /* Reuse output handles for a hook. */\r
407 int use_output_handles(nssm_service_t *service, STARTUPINFO *si) {\r
408   si->dwFlags &= ~STARTF_USESTDHANDLES;\r
409 \r
410   if (service->stdout_si) {\r
411     if (dup_handle(service->stdout_si, &si->hStdOutput, _T("stdout_pipe"), _T("hStdOutput"))) return 1;\r
412     si->dwFlags |= STARTF_USESTDHANDLES;\r
413   }\r
414 \r
415   if (service->stderr_si) {\r
416     if (dup_handle(service->stderr_si, &si->hStdError, _T("stderr_pipe"), _T("hStdError"))) {\r
417       if (si->hStdOutput) {\r
418         si->dwFlags &= ~STARTF_USESTDHANDLES;\r
419         CloseHandle(si->hStdOutput);\r
420       }\r
421       return 2;\r
422     }\r
423     si->dwFlags |= STARTF_USESTDHANDLES;\r
424   }\r
425 \r
426   return 0;\r
427 }\r
428 \r
429 void close_output_handles(STARTUPINFO *si) {\r
430   if (si->hStdInput) CloseHandle(si->hStdInput);\r
431   if (si->hStdOutput) CloseHandle(si->hStdOutput);\r
432   if (si->hStdError) CloseHandle(si->hStdError);\r
433 }\r
434 \r
435 void cleanup_loggers(nssm_service_t *service) {\r
436   unsigned long interval = NSSM_CLEANUP_LOGGERS_DEADLINE;\r
437   HANDLE thread_handle = INVALID_HANDLE_VALUE;\r
438 \r
439   close_handle(&service->stdout_thread, &thread_handle);\r
440   /* Close write end of the data pipe so logging thread can finalise read. */\r
441   close_handle(&service->stdout_si);\r
442   /* Await logging thread then close read end. */\r
443   if (thread_handle != INVALID_HANDLE_VALUE) WaitForSingleObject(thread_handle, interval);\r
444   close_handle(&service->stdout_pipe);\r
445 \r
446   thread_handle = INVALID_HANDLE_VALUE;\r
447   close_handle(&service->stderr_thread, &thread_handle);\r
448   close_handle(&service->stderr_si);\r
449   if (thread_handle != INVALID_HANDLE_VALUE) WaitForSingleObject(thread_handle, interval);\r
450   close_handle(&service->stderr_pipe);\r
451 }\r
452 \r
453 /*\r
454   Try multiple times to read from a file.\r
455   Returns:  0 on success.\r
456             1 on non-fatal error.\r
457            -1 on fatal error.\r
458 */\r
459 static int try_read(logger_t *logger, void *address, unsigned long bufsize, unsigned long *in, int *complained) {\r
460   int ret = 1;\r
461   unsigned long error;\r
462   for (int tries = 0; tries < 5; tries++) {\r
463     if (ReadFile(logger->read_handle, address, bufsize, in, 0)) return 0;\r
464 \r
465     error = GetLastError();\r
466     switch (error) {\r
467       /* Other end closed the pipe. */\r
468       case ERROR_BROKEN_PIPE:\r
469         ret = -1;\r
470         goto complain_read;\r
471 \r
472       /* Couldn't lock the buffer. */\r
473       case ERROR_NOT_ENOUGH_QUOTA:\r
474         Sleep(2000 + tries * 3000);\r
475         ret = 1;\r
476         continue;\r
477 \r
478       /* Write was cancelled by the other end. */\r
479       case ERROR_OPERATION_ABORTED:\r
480         ret = 1;\r
481         goto complain_read;\r
482 \r
483       default:\r
484         ret = -1;\r
485     }\r
486   }\r
487 \r
488 complain_read:\r
489   /* Ignore the error if we've been requested to exit anyway. */\r
490   if (*logger->rotate_online != NSSM_ROTATE_ONLINE) return ret;\r
491   if (! (*complained & COMPLAINED_READ)) log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_READFILE_FAILED, logger->service_name, logger->path, error_string(error), 0);\r
492   *complained |= COMPLAINED_READ;\r
493   return ret;\r
494 }\r
495 \r
496 /*\r
497   Try multiple times to write to a file.\r
498   Returns:  0 on success.\r
499             1 on non-fatal error.\r
500            -1 on fatal error.\r
501 */\r
502 static int try_write(logger_t *logger, void *address, unsigned long bufsize, unsigned long *out, int *complained) {\r
503   int ret = 1;\r
504   unsigned long error;\r
505   for (int tries = 0; tries < 5; tries++) {\r
506     if (WriteFile(logger->write_handle, address, bufsize, out, 0)) return 0;\r
507 \r
508     error = GetLastError();\r
509     if (error == ERROR_IO_PENDING) {\r
510       /* Operation was successful pending flush to disk. */\r
511       return 0;\r
512     }\r
513 \r
514     switch (error) {\r
515       /* Other end closed the pipe. */\r
516       case ERROR_BROKEN_PIPE:\r
517         ret = -1;\r
518         goto complain_write;\r
519 \r
520       /* Couldn't lock the buffer. */\r
521       case ERROR_NOT_ENOUGH_QUOTA:\r
522       /* Out of disk space. */\r
523       case ERROR_DISK_FULL:\r
524         Sleep(2000 + tries * 3000);\r
525         ret = 1;\r
526         continue;\r
527 \r
528       default:\r
529         /* We'll lose this line but try to read and write subsequent ones. */\r
530         ret = 1;\r
531     }\r
532   }\r
533 \r
534 complain_write:\r
535   if (! (*complained & COMPLAINED_WRITE)) log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_WRITEFILE_FAILED, logger->service_name, logger->path, error_string(error), 0);\r
536   *complained |= COMPLAINED_WRITE;\r
537   return ret;\r
538 }\r
539 \r
540 /* Note that the timestamp is created in UTF-8. */\r
541 static inline int write_timestamp(logger_t *logger, unsigned long charsize, unsigned long *out, int *complained) {\r
542   char timestamp[TIMESTAMP_LEN + 1];\r
543 \r
544   SYSTEMTIME now;\r
545   GetSystemTime(&now);\r
546   _snprintf_s(timestamp, _countof(timestamp), _TRUNCATE, TIMESTAMP_FORMAT, now.wYear, now.wMonth, now.wDay, now.wHour, now.wMinute, now.wSecond, now.wMilliseconds);\r
547 \r
548   if (charsize == sizeof(char)) return try_write(logger, (void *) timestamp, TIMESTAMP_LEN, out, complained);\r
549 \r
550   wchar_t *utf16;\r
551   unsigned long utf16len;\r
552   if (to_utf16(timestamp, &utf16, &utf16len)) return -1;\r
553   int ret = try_write(logger, (void *) *utf16, utf16len * sizeof(wchar_t), out, complained);\r
554   HeapFree(GetProcessHeap(), 0, utf16);\r
555   return ret;\r
556 }\r
557 \r
558 static int write_with_timestamp(logger_t *logger, void *address, unsigned long bufsize, unsigned long *out, int *complained, unsigned long charsize) {\r
559   if (logger->timestamp_log) {\r
560     unsigned long log_out;\r
561     int log_complained;\r
562     unsigned long timestamp_out = 0;\r
563     int timestamp_complained;\r
564     if (! logger->line_length) {\r
565       write_timestamp(logger, charsize, &timestamp_out, &timestamp_complained);\r
566       logger->line_length += (__int64) timestamp_out;\r
567       *out += timestamp_out;\r
568       *complained |= timestamp_complained;\r
569     }\r
570 \r
571     unsigned long i;\r
572     void *line = address;\r
573     unsigned long offset = 0;\r
574     int ret;\r
575     for (i = 0; i < bufsize; i++) {\r
576       if (((char *) address)[i] == '\n') {\r
577         ret = try_write(logger, line, i - offset + 1, &log_out, &log_complained);\r
578         line = (void *) ((char *) line + i - offset + 1);\r
579         logger->line_length = 0LL;\r
580         *out += log_out;\r
581         *complained |= log_complained;\r
582         offset = i + 1;\r
583         if (offset < bufsize) {\r
584           write_timestamp(logger, charsize, &timestamp_out, &timestamp_complained);\r
585           logger->line_length += (__int64) timestamp_out;\r
586           *out += timestamp_out;\r
587           *complained |= timestamp_complained;\r
588         }\r
589       }\r
590     }\r
591 \r
592     if (offset < bufsize) {\r
593       ret = try_write(logger, line, bufsize - offset, &log_out, &log_complained);\r
594       *out += log_out;\r
595       *complained |= log_complained;\r
596     }\r
597 \r
598     return ret;\r
599   }\r
600   else return try_write(logger, address, bufsize, out, complained);\r
601 }\r
602 \r
603 /* Wrapper to be called in a new thread for logging. */\r
604 unsigned long WINAPI log_and_rotate(void *arg) {\r
605   logger_t *logger = (logger_t *) arg;\r
606   if (! logger) return 1;\r
607 \r
608   __int64 size;\r
609   BY_HANDLE_FILE_INFORMATION info;\r
610 \r
611   /* Find initial file size. */\r
612   if (! GetFileInformationByHandle(logger->write_handle, &info)) logger->size = 0LL;\r
613   else {\r
614     ULARGE_INTEGER l;\r
615     l.HighPart = info.nFileSizeHigh;\r
616     l.LowPart = info.nFileSizeLow;\r
617     size = l.QuadPart;\r
618   }\r
619 \r
620   char buffer[1024];\r
621   void *address;\r
622   unsigned long in, out;\r
623   unsigned long charsize = 0;\r
624   unsigned long error;\r
625   int ret;\r
626   int complained = 0;\r
627 \r
628   while (true) {\r
629     /* Read data from the pipe. */\r
630     address = &buffer;\r
631     ret = try_read(logger, address, sizeof(buffer), &in, &complained);\r
632     if (ret < 0) {\r
633       close_handle(&logger->read_handle);\r
634       close_handle(&logger->write_handle);\r
635       HeapFree(GetProcessHeap(), 0, logger);\r
636       return 2;\r
637     }\r
638     else if (ret) continue;\r
639 \r
640     if (*logger->rotate_online == NSSM_ROTATE_ONLINE_ASAP || (logger->size && size + (__int64) in >= logger->size)) {\r
641       /* Look for newline. */\r
642       unsigned long i;\r
643       for (i = 0; i < in; i++) {\r
644         if (buffer[i] == '\n') {\r
645           if (! charsize) charsize = guess_charsize(address, in);\r
646           i += charsize;\r
647 \r
648           /* Write up to the newline. */\r
649           ret = try_write(logger, address, i, &out, &complained);\r
650           if (ret < 0) {\r
651             close_handle(&logger->read_handle);\r
652             close_handle(&logger->write_handle);\r
653             HeapFree(GetProcessHeap(), 0, logger);\r
654             return 3;\r
655           }\r
656           size += (__int64) out;\r
657 \r
658           /* Rotate. */\r
659           *logger->rotate_online = NSSM_ROTATE_ONLINE;\r
660           TCHAR rotated[PATH_LENGTH];\r
661           rotated_filename(logger->path, rotated, _countof(rotated), 0);\r
662 \r
663           /*\r
664             Ideally we'd try the rename first then close the handle but\r
665             MoveFile() will fail if the handle is still open so we must\r
666             risk losing everything.\r
667           */\r
668           if (logger->copy_and_truncate) FlushFileBuffers(logger->write_handle);\r
669           close_handle(&logger->write_handle);\r
670           bool ok = true;\r
671           TCHAR *function;\r
672           if (logger->copy_and_truncate) {\r
673             function = _T("CopyFile()");\r
674             if (CopyFile(logger->path, rotated, TRUE)) {\r
675               HANDLE file = write_to_file(logger->path, NSSM_STDOUT_SHARING, 0, NSSM_STDOUT_DISPOSITION, NSSM_STDOUT_FLAGS);\r
676               Sleep(logger->rotate_delay);\r
677               SetFilePointer(file, 0, 0, FILE_BEGIN);\r
678               SetEndOfFile(file);\r
679               CloseHandle(file);\r
680             }\r
681             else ok = false;\r
682           }\r
683           else {\r
684             function = _T("MoveFile()");\r
685             if (! MoveFile(logger->path, rotated)) ok = false;\r
686           }\r
687           if (ok) {\r
688             log_event(EVENTLOG_INFORMATION_TYPE, NSSM_EVENT_ROTATED, logger->service_name, logger->path, rotated, 0);\r
689             size = 0LL;\r
690           }\r
691           else {\r
692             error = GetLastError();\r
693             if (error != ERROR_FILE_NOT_FOUND) {\r
694               if (! (complained & COMPLAINED_ROTATE)) log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_ROTATE_FILE_FAILED, logger->service_name, logger->path, function, rotated, error_string(error), 0);\r
695               complained |= COMPLAINED_ROTATE;\r
696               /* We can at least try to re-open the existing file. */\r
697               logger->disposition = OPEN_ALWAYS;\r
698             }\r
699           }\r
700 \r
701           /* Reopen. */\r
702           logger->write_handle = write_to_file(logger->path, logger->sharing, 0, logger->disposition, logger->flags);\r
703           if (logger->write_handle == INVALID_HANDLE_VALUE) {\r
704             error = GetLastError();\r
705             log_event(EVENTLOG_ERROR_TYPE, NSSM_EVENT_CREATEFILE_FAILED, logger->path, error_string(error), 0);\r
706             /* Oh dear.  Now we can't log anything further. */\r
707             close_handle(&logger->read_handle);\r
708             close_handle(&logger->write_handle);\r
709             HeapFree(GetProcessHeap(), 0, logger);\r
710             return 4;\r
711           }\r
712 \r
713           /* Resume writing after the newline. */\r
714           address = (void *) ((char *) address + i);\r
715           in -= i;\r
716         }\r
717       }\r
718     }\r
719 \r
720     if (! size || logger->timestamp_log) if (! charsize) charsize = guess_charsize(address, in);\r
721     if (! size) {\r
722       /* Write a BOM to the new file. */\r
723       if (charsize == sizeof(wchar_t)) write_bom(logger, &out);\r
724       size += (__int64) out;\r
725     }\r
726 \r
727     /* Write the data, if any. */\r
728     if (! in) continue;\r
729 \r
730     ret = write_with_timestamp(logger, address, in, &out, &complained, charsize);\r
731     size += (__int64) out;\r
732     if (ret < 0) {\r
733       close_handle(&logger->read_handle);\r
734       close_handle(&logger->write_handle);\r
735       HeapFree(GetProcessHeap(), 0, logger);\r
736       return 3;\r
737     }\r
738   }\r
739 \r
740   close_handle(&logger->read_handle);\r
741   close_handle(&logger->write_handle);\r
742   HeapFree(GetProcessHeap(), 0, logger);\r
743   return 0;\r
744 }\r