3 #define NSSM_ERROR_BUFSIZE 65535
\r
4 #define NSSM_NUM_EVENT_STRINGS 16
\r
5 unsigned long tls_index;
\r
7 /* Convert error code to error string - must call LocalFree() on return value */
\r
8 char *error_string(unsigned long error) {
\r
9 /* Thread-safe buffer */
\r
10 char *error_message = (char *) TlsGetValue(tls_index);
\r
11 if (! error_message) {
\r
12 error_message = (char *) LocalAlloc(LPTR, NSSM_ERROR_BUFSIZE);
\r
13 if (! error_message) return "<out of memory for error message>";
\r
14 TlsSetValue(tls_index, (void *) error_message);
\r
17 if (! FormatMessage(FORMAT_MESSAGE_FROM_SYSTEM | FORMAT_MESSAGE_IGNORE_INSERTS, 0, error, MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), (char *) error_message, NSSM_ERROR_BUFSIZE, 0)) {
\r
18 if (_snprintf_s(error_message, NSSM_ERROR_BUFSIZE, _TRUNCATE, "system error %lu", error) < 0) return 0;
\r
20 return error_message;
\r
23 /* Convert message code to format string */
\r
24 char *message_string(unsigned long error) {
\r
26 if (! FormatMessage(FORMAT_MESSAGE_ALLOCATE_BUFFER | FORMAT_MESSAGE_FROM_HMODULE | FORMAT_MESSAGE_IGNORE_INSERTS, 0, error, MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), (LPSTR) &ret, NSSM_ERROR_BUFSIZE, 0)) {
\r
27 ret = (char *) HeapAlloc(GetProcessHeap(), 0, 32);
\r
28 if (_snprintf_s(ret, NSSM_ERROR_BUFSIZE, _TRUNCATE, "system error %lu", error) < 0) return 0;
\r
33 /* Log a message to the Event Log */
\r
34 void log_event(unsigned short type, unsigned long id, ...) {
\r
38 char *strings[NSSM_NUM_EVENT_STRINGS];
\r
40 /* Open event log */
\r
41 HANDLE handle = RegisterEventSource(0, TEXT(NSSM));
\r
42 if (! handle) return;
\r
47 while ((s = va_arg(arg, char *)) && count < NSSM_NUM_EVENT_STRINGS - 1) strings[count++] = s;
\r
50 ReportEvent(handle, type, 0, id, 0, count, 0, (const char **) strings, 0);
\r
52 /* Close event log */
\r
53 DeregisterEventSource(handle);
\r
56 /* Log a message to the console */
\r
57 void print_message(FILE *file, unsigned long id, ...) {
\r
60 char *format = message_string(id);
\r
61 if (! format) return;
\r
64 vfprintf(file, format, arg);
\r
70 /* Show a GUI dialogue */
\r
71 int popup_message(unsigned int type, unsigned long id, ...) {
\r
74 char *format = message_string(id);
\r
76 return MessageBox(0, "Message %lu was supposed to go here!", NSSM, MB_OK | MB_ICONEXCLAMATION);
\r
81 if (vsnprintf_s(blurb, sizeof(blurb), _TRUNCATE, format, arg) < 0) {
\r
84 return MessageBox(0, "Message %lu was supposed to go here!", NSSM, MB_OK | MB_ICONEXCLAMATION);
\r
88 int ret = MessageBox(0, blurb, NSSM, type);
\r