#include "nssm.h"\r
\r
+#define NSSM_ERROR_BUFSIZE 65535\r
+#define NSSM_NUM_EVENT_STRINGS 16\r
+unsigned long tls_index;\r
+\r
/* Convert error code to error string - must call LocalFree() on return value */\r
-char *error_string(unsigned long error) {\r
- char *message;\r
- if (! FormatMessage(FORMAT_MESSAGE_ALLOCATE_BUFFER | FORMAT_MESSAGE_FROM_SYSTEM | FORMAT_MESSAGE_IGNORE_INSERTS, 0, error, MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), (char *) &message, 0, 0)) return 0;\r
- return message;\r
+TCHAR *error_string(unsigned long error) {\r
+ /* Thread-safe buffer */\r
+ TCHAR *error_message = (TCHAR *) TlsGetValue(tls_index);\r
+ if (! error_message) {\r
+ error_message = (TCHAR *) LocalAlloc(LPTR, NSSM_ERROR_BUFSIZE);\r
+ if (! error_message) return _T("<out of memory for error message>");\r
+ TlsSetValue(tls_index, (void *) error_message);\r
+ }\r
+\r
+ if (! FormatMessage(FORMAT_MESSAGE_FROM_SYSTEM | FORMAT_MESSAGE_IGNORE_INSERTS, 0, error, MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), (TCHAR *) error_message, NSSM_ERROR_BUFSIZE, 0)) {\r
+ if (_sntprintf_s(error_message, NSSM_ERROR_BUFSIZE, _TRUNCATE, _T("system error %lu"), error) < 0) return 0;\r
+ }\r
+ return error_message;\r
+}\r
+\r
+/* Convert message code to format string */\r
+TCHAR *message_string(unsigned long error) {\r
+ TCHAR *ret;\r
+ if (! FormatMessage(FORMAT_MESSAGE_ALLOCATE_BUFFER | FORMAT_MESSAGE_FROM_HMODULE | FORMAT_MESSAGE_IGNORE_INSERTS, 0, error, MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), (LPTSTR) &ret, NSSM_ERROR_BUFSIZE, 0)) {\r
+ ret = (TCHAR *) HeapAlloc(GetProcessHeap(), 0, 32 * sizeof(TCHAR));\r
+ if (_sntprintf_s(ret, NSSM_ERROR_BUFSIZE, _TRUNCATE, _T("system error %lu"), error) < 0) return 0;\r
+ }\r
+ return ret;\r
}\r
\r
/* Log a message to the Event Log */\r
-void eventprintf(unsigned short type, char *format, ...) {\r
- char message[4096];\r
- char *strings[2];\r
- int n, size;\r
+void log_event(unsigned short type, unsigned long id, ...) {\r
va_list arg;\r
+ int count;\r
+ TCHAR *s;\r
+ TCHAR *strings[NSSM_NUM_EVENT_STRINGS];\r
\r
- /* Construct the message */\r
- size = sizeof(message);\r
- va_start(arg, format);\r
- n = _vsnprintf(message, size, format, arg);\r
- va_end(arg);\r
-\r
- /* Check success */\r
- if (n < 0 || n >= size) return;\r
-\r
- /* Construct strings array */\r
- strings[0] = message;\r
- strings[1] = 0;\r
- \r
/* Open event log */\r
- HANDLE handle = RegisterEventSource(0, TEXT(NSSM));\r
+ HANDLE handle = RegisterEventSource(0, NSSM);\r
if (! handle) return;\r
\r
/* Log it */\r
- if (! ReportEvent(handle, type, 0, 0, 0, 1, 0, (const char **) strings, 0)) {\r
- printf("ReportEvent(): %s\n", error_string(GetLastError()));\r
- }\r
+ count = 0;\r
+ va_start(arg, id);\r
+ while ((s = va_arg(arg, TCHAR *)) && count < NSSM_NUM_EVENT_STRINGS - 1) strings[count++] = s;\r
+ strings[count] = 0;\r
+ va_end(arg);\r
+ ReportEvent(handle, type, 0, id, 0, count, 0, (const TCHAR **) strings, 0);\r
\r
/* Close event log */\r
DeregisterEventSource(handle);\r
}\r
+\r
+/* Log a message to the console */\r
+void print_message(FILE *file, unsigned long id, ...) {\r
+ va_list arg;\r
+\r
+ TCHAR *format = message_string(id);\r
+ if (! format) return;\r
+\r
+ va_start(arg, id);\r
+ _vftprintf(file, format, arg);\r
+ va_end(arg);\r
+\r
+ LocalFree(format);\r
+}\r
+\r
+/* Show a GUI dialogue */\r
+int popup_message(unsigned int type, unsigned long id, ...) {\r
+ va_list arg;\r
+\r
+ TCHAR *format = message_string(id);\r
+ if (! format) {\r
+ return MessageBox(0, _T("Message %lu was supposed to go here!"), NSSM, MB_OK | MB_ICONEXCLAMATION);\r
+ }\r
+\r
+ TCHAR blurb[256];\r
+ va_start(arg, id);\r
+ if (_vsntprintf_s(blurb, sizeof(blurb), _TRUNCATE, format, arg) < 0) {\r
+ va_end(arg);\r
+ LocalFree(format);\r
+ return MessageBox(0, _T("Message %lu was supposed to go here!"), NSSM, MB_OK | MB_ICONEXCLAMATION);\r
+ }\r
+ va_end(arg);\r
+\r
+ int ret = MessageBox(0, blurb, NSSM, type);\r
+\r
+ LocalFree(format);\r
+\r
+ return ret;\r
+}\r