xref: /PHP-8.2/win32/wsyslog.c (revision fa65f5ec)
1 /*
2  * This file modified from sources for imap4 for use
3  * in PHP 3
4  */
5 /*
6  * Program:   Unix compatibility routines
7  *
8  * Author:  Mark Crispin
9  *      Networks and Distributed Computing
10  *      Computing & Communications
11  *      University of Washington
12  *      Administration Building, AG-44
13  *      Seattle, WA  98195
14  *      Internet: MRC@CAC.Washington.EDU
15  *
16  * Date:    14 September 1996
17  * Last Edited: 22 October 1996
18  *
19  * Copyright 1996 by the University of Washington
20  *
21  *  Permission to use, copy, modify, and distribute this software and its
22  * documentation for any purpose and without fee is hereby granted, provided
23  * that the above copyright notice appears in all copies and that both the
24  * above copyright notice and this permission notice appear in supporting
25  * documentation, and that the name of the University of Washington not be
26  * used in advertising or publicity pertaining to distribution of the software
27  * without specific, written prior permission.  This software is made available
28  * "as is", and
29  * THE UNIVERSITY OF WASHINGTON DISCLAIMS ALL WARRANTIES, EXPRESS OR IMPLIED,
30  * WITH REGARD TO THIS SOFTWARE, INCLUDING WITHOUT LIMITATION ALL IMPLIED
31  * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE, AND IN
32  * NO EVENT SHALL THE UNIVERSITY OF WASHINGTON BE LIABLE FOR ANY SPECIAL,
33  * INDIRECT OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES WHATSOEVER RESULTING FROM
34  * LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION OF CONTRACT, TORT
35  * (INCLUDING NEGLIGENCE) OR STRICT LIABILITY, ARISING OUT OF OR IN CONNECTION
36  * WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
37  *
38  */
39 
40 
41 /*              DEDICATION
42 
43  *  This file is dedicated to my dog, Unix, also known as Yun-chan and
44  * Unix J. Terwilliker Jehosophat Aloysius Monstrosity Animal Beast.  Unix
45  * passed away at the age of 11 1/2 on September 14, 1996, 12:18 PM PDT, after
46  * a two-month bout with cirrhosis of the liver.
47  *
48  *  He was a dear friend, and I miss him terribly.
49  *
50  *  Lift a leg, Yunie.  Luv ya forever!!!!
51  */
52 
53 #include "php.h"				/*php specific */
54 #include "syslog.h"
55 #include <stdio.h>
56 #include <fcntl.h>
57 #include <process.h>
58 
59 #include "php_win32_globals.h"
60 #include "wsyslog.h"
61 #include "codepage.h"
62 
closelog(void)63 void closelog(void)
64 {
65 	if (INVALID_HANDLE_VALUE != PW32G(log_source)) {
66 		DeregisterEventSource(PW32G(log_source));
67 		PW32G(log_source) = INVALID_HANDLE_VALUE;
68 	}
69 	if (PW32G(log_header)) {
70 		free(PW32G(log_header));
71 		PW32G(log_header) = NULL;
72 	}
73 }
74 
75 /* Emulator for BSD syslog() routine
76  * Accepts: priority
77  *      message
78  *      parameters
79  */
80 
syslog(int priority,const char * message,...)81 void syslog(int priority, const char *message, ...)
82 {
83 	va_list args;
84 
85 	va_start(args, message);	/* initialize vararg mechanism */
86 	vsyslog(priority, message, args);
87 	va_end(args);
88 }
89 
vsyslog(int priority,const char * message,va_list args)90 void vsyslog(int priority, const char *message, va_list args)
91 {
92 	LPTSTR strs[2];
93 	unsigned short etype;
94 	char *tmp = NULL;
95 	DWORD evid;
96 	wchar_t *strsw[2];
97 
98 	/* default event source */
99 	if (INVALID_HANDLE_VALUE == PW32G(log_source))
100 		openlog("php", LOG_PID, LOG_SYSLOG);
101 
102 	switch (priority) {			/* translate UNIX type into NT type */
103 		case LOG_ALERT:
104 			etype = EVENTLOG_ERROR_TYPE;
105 			evid = PHP_SYSLOG_ERROR_TYPE;
106 			break;
107 		case LOG_INFO:
108 			etype = EVENTLOG_INFORMATION_TYPE;
109 			evid = PHP_SYSLOG_INFO_TYPE;
110 			break;
111 		default:
112 			etype = EVENTLOG_WARNING_TYPE;
113 			evid = PHP_SYSLOG_WARNING_TYPE;
114 	}
115 
116 	vspprintf(&tmp, 0, message, args);	/* build message */
117 
118 	strsw[0] = php_win32_cp_any_to_w(PW32G(log_header));
119 	strsw[1] = php_win32_cp_any_to_w(tmp);
120 
121 	/* report the event */
122 	if (strsw[0] && strsw[1]) {
123 		ReportEventW(PW32G(log_source), etype, (unsigned short) priority, evid, NULL, 2, 0, strsw, NULL);
124 		free(strsw[0]);
125 		free(strsw[1]);
126 		efree(tmp);
127 		return;
128 	}
129 
130 	free(strsw[0]);
131 	free(strsw[1]);
132 
133 	strs[0] = PW32G(log_header);	/* write header */
134 	strs[1] = tmp;				/* then the message */
135 
136 	ReportEventA(PW32G(log_source), etype, (unsigned short) priority, evid, NULL, 2, 0, strs, NULL);
137 	efree(tmp);
138 }
139 
140 /* Emulator for BSD openlog() routine
141  * Accepts: identity
142  *      options
143  *      facility
144  */
145 
openlog(const char * ident,int logopt,int facility)146 void openlog(const char *ident, int logopt, int facility)
147 {
148 	size_t header_len;
149 
150 	closelog();
151 
152 	PW32G(log_source) = RegisterEventSource(NULL, "PHP-" PHP_VERSION);
153 	header_len = strlen(ident) + 2 + 11;
154 	PW32G(log_header) = malloc(header_len*sizeof(char));
155 	sprintf_s(PW32G(log_header), header_len, (logopt & LOG_PID) ? "%s[%d]" : "%s", ident, getpid());
156 }
157