3 #define NSSM_SOURCE _T("nssm")
\r
4 #define NSSM_ERROR_BUFSIZE 65535
\r
5 #define NSSM_NUM_EVENT_STRINGS 16
\r
6 unsigned long tls_index;
\r
8 /* Convert error code to error string - must call LocalFree() on return value */
\r
9 TCHAR *error_string(unsigned long error) {
\r
10 /* Thread-safe buffer */
\r
11 TCHAR *error_message = (TCHAR *) TlsGetValue(tls_index);
\r
12 if (! error_message) {
\r
13 error_message = (TCHAR *) LocalAlloc(LPTR, NSSM_ERROR_BUFSIZE);
\r
14 if (! error_message) return _T("<out of memory for error message>");
\r
15 TlsSetValue(tls_index, (void *) error_message);
\r
18 if (! FormatMessage(FORMAT_MESSAGE_FROM_SYSTEM | FORMAT_MESSAGE_IGNORE_INSERTS, 0, error, GetUserDefaultLangID(), (TCHAR *) error_message, NSSM_ERROR_BUFSIZE, 0)) {
\r
19 if (! FormatMessage(FORMAT_MESSAGE_FROM_SYSTEM | FORMAT_MESSAGE_IGNORE_INSERTS, 0, error, 0, (TCHAR *) error_message, NSSM_ERROR_BUFSIZE, 0)) {
\r
20 if (_sntprintf_s(error_message, NSSM_ERROR_BUFSIZE, _TRUNCATE, _T("system error %lu"), error) < 0) return 0;
\r
23 return error_message;
\r
26 /* Convert message code to format string */
\r
27 TCHAR *message_string(unsigned long error) {
\r
29 if (! FormatMessage(FORMAT_MESSAGE_ALLOCATE_BUFFER | FORMAT_MESSAGE_FROM_HMODULE | FORMAT_MESSAGE_IGNORE_INSERTS, 0, error, GetUserDefaultLangID(), (LPTSTR) &ret, NSSM_ERROR_BUFSIZE, 0)) {
\r
30 if (! FormatMessage(FORMAT_MESSAGE_ALLOCATE_BUFFER | FORMAT_MESSAGE_FROM_HMODULE | FORMAT_MESSAGE_IGNORE_INSERTS, 0, error, 0, (LPTSTR) &ret, NSSM_ERROR_BUFSIZE, 0)) {
\r
31 ret = (TCHAR *) HeapAlloc(GetProcessHeap(), 0, 32 * sizeof(TCHAR));
\r
32 if (_sntprintf_s(ret, NSSM_ERROR_BUFSIZE, _TRUNCATE, _T("system error %lu"), error) < 0) return 0;
\r
38 /* Log a message to the Event Log */
\r
39 void log_event(unsigned short type, unsigned long id, ...) {
\r
43 TCHAR *strings[NSSM_NUM_EVENT_STRINGS];
\r
45 /* Open event log */
\r
46 HANDLE handle = RegisterEventSource(0, NSSM_SOURCE);
\r
47 if (! handle) return;
\r
52 while ((s = va_arg(arg, TCHAR *)) && count < NSSM_NUM_EVENT_STRINGS - 1) strings[count++] = s;
\r
55 ReportEvent(handle, type, 0, id, 0, count, 0, (const TCHAR **) strings, 0);
\r
57 /* Close event log */
\r
58 DeregisterEventSource(handle);
\r
61 /* Log a message to the console */
\r
62 void print_message(FILE *file, unsigned long id, ...) {
\r
65 TCHAR *format = message_string(id);
\r
66 if (! format) return;
\r
69 _vftprintf(file, format, arg);
\r
75 /* Show a GUI dialogue */
\r
76 int popup_message(HWND owner, unsigned int type, unsigned long id, ...) {
\r
79 TCHAR *format = message_string(id);
\r
81 return MessageBox(0, _T("The message which was supposed to go here is missing!"), NSSM, MB_OK | MB_ICONEXCLAMATION);
\r
84 TCHAR blurb[NSSM_ERROR_BUFSIZE];
\r
86 if (_vsntprintf_s(blurb, _countof(blurb), _TRUNCATE, format, arg) < 0) {
\r
89 return MessageBox(0, _T("The message which was supposed to go here is too big!"), NSSM, MB_OK | MB_ICONEXCLAMATION);
\r
93 MSGBOXPARAMS params;
\r
94 ZeroMemory(¶ms, sizeof(params));
\r
95 params.cbSize = sizeof(params);
\r
96 params.hInstance = GetModuleHandle(0);
\r
97 params.hwndOwner = owner;
\r
98 params.lpszText = blurb;
\r
99 params.lpszCaption = NSSM;
\r
100 params.dwStyle = type;
\r
101 if (type == MB_OK) {
\r
102 params.dwStyle |= MB_USERICON;
\r
103 params.lpszIcon = MAKEINTRESOURCE(IDI_NSSM);
\r
106 int ret = MessageBoxIndirect(¶ms);
\r