1 /**************************************************************************
3 * Copyright 2007-2009 VMware, Inc.
6 * Permission is hereby granted, free of charge, to any person obtaining a copy
7 * of this software and associated documentation files (the "Software"), to deal
8 * in the Software without restriction, including without limitation the rights
9 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
10 * copies of the Software, and to permit persons to whom the Software is
11 * furnished to do so, subject to the following conditions:
13 * The above copyright notice and this permission notice shall be included in
14 * all copies or substantial portions of the Software.
16 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
17 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
18 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
19 * AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
20 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
21 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
24 **************************************************************************/
38 #include "trace_write.hpp"
39 #include "trace_format.hpp"
45 static gzFile g_gzFile = NULL;
46 static void _Close(void) {
47 if(g_gzFile != NULL) {
53 static void _Open(const char *szExtension) {
56 static unsigned dwCounter = 0;
58 char szFileName[PATH_MAX];
59 const char *lpFileName;
61 lpFileName = getenv("TRACE_PATH");
63 strncpy(szFileName, lpFileName, PATH_MAX);
66 char szProcessName[PATH_MAX];
67 char szCurrentDir[PATH_MAX];
68 OS::GetProcessName(szProcessName, PATH_MAX);
69 OS::GetCurrentDir(szCurrentDir, PATH_MAX);
75 snprintf(szFileName, PATH_MAX, "%s%c%s.%u.%s", szCurrentDir, PATH_SEP, szProcessName, dwCounter, szExtension);
77 snprintf(szFileName, PATH_MAX, "%s%c%s.%s", szCurrentDir, PATH_SEP, szProcessName, szExtension);
79 file = fopen(szFileName, "rb");
89 OS::DebugMessage("apitrace: tracing to %s\n", szFileName);
91 g_gzFile = gzopen(szFileName, "wb");
94 static inline void Write(const void *sBuffer, size_t dwBytesToWrite) {
98 gzwrite(g_gzFile, sBuffer, dwBytesToWrite);
107 WriteUInt(unsigned long long value) {
108 char buf[2 * sizeof value];
113 assert(len < sizeof buf);
114 buf[len] = 0x80 | (value & 0x7f);
120 buf[len - 1] &= 0x7f;
126 WriteFloat(float value) {
127 assert(sizeof value == 4);
128 Write((const char *)&value, sizeof value);
132 WriteDouble(double value) {
133 assert(sizeof value == 8);
134 Write((const char *)&value, sizeof value);
138 WriteString(const char *str) {
139 size_t len = strlen(str);
147 WriteUInt(TRACE_VERSION);
151 static unsigned call_no = 0;
153 inline bool lookup(std::vector<bool> &map, size_t index) {
154 if (index >= map.size()) {
155 map.resize(index + 1);
162 static std::vector<bool> functions;
163 static std::vector<bool> structs;
164 static std::vector<bool> enums;
165 static std::vector<bool> bitmasks;
171 functions = std::vector<bool>();
172 structs = std::vector<bool>();
173 enums = std::vector<bool>();
174 bitmasks = std::vector<bool>();
177 unsigned BeginEnter(const FunctionSig &function) {
180 WriteByte(Trace::EVENT_ENTER);
181 WriteUInt(function.id);
182 if (!lookup(functions, function.id)) {
183 WriteString(function.name);
184 WriteUInt(function.num_args);
185 for (unsigned i = 0; i < function.num_args; ++i) {
186 WriteString(function.args[i]);
188 functions[function.id] = true;
193 void EndEnter(void) {
194 WriteByte(Trace::CALL_END);
195 gzflush(g_gzFile, Z_SYNC_FLUSH);
199 void BeginLeave(unsigned call) {
201 WriteByte(Trace::EVENT_LEAVE);
205 void EndLeave(void) {
206 WriteByte(Trace::CALL_END);
207 gzflush(g_gzFile, Z_SYNC_FLUSH);
211 void BeginArg(unsigned index) {
212 WriteByte(Trace::CALL_ARG);
216 void BeginReturn(void) {
217 WriteByte(Trace::CALL_RET);
220 void BeginArray(size_t length) {
221 WriteByte(Trace::TYPE_ARRAY);
225 void BeginStruct(const StructSig *sig) {
226 WriteByte(Trace::TYPE_STRUCT);
228 if (!lookup(structs, sig->id)) {
229 WriteString(sig->name);
230 WriteUInt(sig->num_members);
231 for (unsigned i = 0; i < sig->num_members; ++i) {
232 WriteString(sig->members[i]);
234 structs[sig->id] = true;
238 void LiteralBool(bool value) {
239 WriteByte(value ? Trace::TYPE_TRUE : Trace::TYPE_FALSE);
242 void LiteralSInt(signed long long value) {
244 WriteByte(Trace::TYPE_SINT);
247 WriteByte(Trace::TYPE_UINT);
252 void LiteralUInt(unsigned long long value) {
253 WriteByte(Trace::TYPE_UINT);
257 void LiteralFloat(float value) {
258 WriteByte(Trace::TYPE_FLOAT);
262 void LiteralFloat(double value) {
263 WriteByte(Trace::TYPE_DOUBLE);
267 void LiteralString(const char *str) {
272 WriteByte(Trace::TYPE_STRING);
276 void LiteralString(const char *str, size_t len) {
281 WriteByte(Trace::TYPE_STRING);
286 void LiteralWString(const wchar_t *str) {
291 WriteByte(Trace::TYPE_STRING);
292 WriteString("<wide-string>");
295 void LiteralBlob(const void *data, size_t size) {
300 WriteByte(Trace::TYPE_BLOB);
307 void LiteralEnum(const EnumSig *sig) {
308 WriteByte(Trace::TYPE_ENUM);
310 if (!lookup(enums, sig->id)) {
311 WriteString(sig->name);
312 LiteralSInt(sig->value);
313 enums[sig->id] = true;
317 void LiteralBitmask(const BitmaskSig &bitmask, unsigned long long value) {
318 WriteByte(Trace::TYPE_BITMASK);
319 WriteUInt(bitmask.id);
320 if (!lookup(bitmasks, bitmask.id)) {
321 WriteUInt(bitmask.count);
322 for (unsigned i = 0; i < bitmask.count; ++i) {
323 if (i != 0 && bitmask.values[i].value == 0) {
324 OS::DebugMessage("apitrace: bitmask %s is zero but is not first flag\n", bitmask.values[i].name);
326 WriteString(bitmask.values[i].name);
327 WriteUInt(bitmask.values[i].value);
329 bitmasks[bitmask.id] = true;
334 void LiteralNull(void) {
335 WriteByte(Trace::TYPE_NULL);
338 void LiteralOpaque(const void *addr) {
343 WriteByte(Trace::TYPE_OPAQUE);
344 WriteUInt((size_t)addr);
352 } /* namespace Trace */
358 BOOL WINAPI DllMain(HINSTANCE hinstDLL, DWORD fdwReason, LPVOID lpvReserved) {
360 case DLL_PROCESS_ATTACH:
361 case DLL_THREAD_ATTACH:
363 case DLL_THREAD_DETACH:
365 case DLL_PROCESS_DETACH:
377 static void _uninit(void) __attribute__((destructor));
378 static void _uninit(void) {