1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
|
/*
* Jitsi, the OpenSource Java VoIP and Instant Messaging client.
*
* Distributable under LGPL license.
* See terms of license at gnu.org.
*/
#include "Log.h"
#include <stdarg.h>
#include "StringUtils.h"
FILE *Log::_stderr = NULL;
#ifdef _UNICODE
int Log::d(LPCTSTR format, LPCSTR str)
{
LPWSTR wstr = StringUtils::MultiByteToWideChar(str);
int ret;
if (wstr)
{
ret = Log::d(format, wstr);
::free(wstr);
}
else
ret = 0;
return ret;
}
#endif /* #ifdef _UNICODE */
int Log::d(LPCTSTR format, ...)
{
va_list args;
va_start(args, format);
int ret = ::_vftprintf(_stderr, format, args);
::fflush(_stderr);
return ret;
}
LPTSTR Log::getModuleFileName()
{
HMODULE module;
LPTSTR ret = NULL;
if (::GetModuleHandleEx(
GET_MODULE_HANDLE_EX_FLAG_FROM_ADDRESS
| GET_MODULE_HANDLE_EX_FLAG_UNCHANGED_REFCOUNT,
(LPCTSTR) (Log::getModuleFileName),
&module))
{
TCHAR path[MAX_PATH + 1];
DWORD pathCapacity = sizeof(path) / sizeof(TCHAR);
DWORD pathLength = ::GetModuleFileName(module, path, pathCapacity);
if (pathLength && (pathLength < pathCapacity))
{
LPTSTR fileName = NULL;
for (LPTSTR str = path + (pathLength - 1); str != path; str--)
{
TCHAR ch = *str;
if ((ch == '\\') || (ch == '/'))
{
fileName = str + 1;
break;
}
else if (ch == '.')
*str = '\0';
}
if (fileName && (*fileName != '\0'))
ret = ::_tcsdup(fileName);
}
}
return ret;
}
FILE *Log::open()
{
LPCTSTR envVarName = _T("USERPROFILE");
DWORD envVarValueLength1 = ::GetEnvironmentVariable(envVarName, NULL, 0);
FILE *_stderr = NULL;
if (envVarValueLength1)
{
LPTSTR moduleFileName = getModuleFileName();
if (moduleFileName)
{
LPCTSTR tracing = _T("\\Tracing\\");
size_t tracingLength = ::_tcslen(tracing);
size_t tracingSize = sizeof(TCHAR) * tracingLength;
size_t moduleFileNameLength = ::_tcslen(moduleFileName);
size_t moduleFileNameSize = sizeof(TCHAR) * moduleFileNameLength;
LPCTSTR log = _T(".log");
size_t logLength = ::_tcslen(log);
size_t logSize = sizeof(TCHAR) * logLength;
LPTSTR logPath
= (LPTSTR)
::malloc(
sizeof(TCHAR) * envVarValueLength1
+ tracingSize
+ moduleFileNameSize
+ logSize);
if (logPath)
{
DWORD envVarValueLength
= ::GetEnvironmentVariable(
envVarName,
logPath,
envVarValueLength1);
if (envVarValueLength
&& (envVarValueLength < envVarValueLength1))
{
LPTSTR str = logPath + envVarValueLength;
::memcpy(str, tracing, tracingSize);
str += tracingLength;
::memcpy(str, moduleFileName, moduleFileNameSize);
str += moduleFileNameLength;
::memcpy(str, log, logSize);
str += logLength;
*str = '\0';
_stderr = ::_tfopen(logPath, _T("w"));
}
::free(logPath);
}
::free(moduleFileName);
}
}
Log::_stderr = _stderr ? _stderr : stderr;
return Log::_stderr;
}
|
