1 ##########################################################################
3 # Copyright 2008-2010 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 ##########################################################################/
26 """Common trace code generation."""
30 from dispatch import Dispatcher
33 def interface_wrap_name(interface):
34 return "Wrap" + interface.expr
37 class DumpDeclarator(stdapi.OnceVisitor):
38 '''Declare helper functions to dump complex types.'''
40 def visit_void(self, literal):
43 def visit_literal(self, literal):
46 def visit_string(self, string):
49 def visit_const(self, const):
50 self.visit(const.type)
52 def visit_struct(self, struct):
53 for type, name in struct.members:
55 print 'static void __traceStruct%s(const %s &value) {' % (struct.id, struct.expr)
56 print ' static const char * members[%u] = {' % (len(struct.members),)
57 for type, name, in struct.members:
58 print ' "%s",' % (name,)
60 print ' static const Trace::StructSig sig = {'
61 print ' %u, "%s", %u, members' % (int(struct.id), struct.name, len(struct.members))
63 print ' Trace::BeginStruct(&sig);'
64 for type, name in struct.members:
65 dump_instance(type, 'value.%s' % (name,))
66 print ' Trace::EndStruct();'
70 def visit_array(self, array):
71 self.visit(array.type)
73 def visit_blob(self, array):
78 def visit_enum(self, enum):
79 print 'static void __traceEnum%s(const %s value) {' % (enum.id, enum.expr)
82 value = enum.values[i]
83 print ' static const Trace::EnumSig sig%u = {%u, "%s", %s};' % (i, DumpDeclarator.__enum_id, value, value)
84 DumpDeclarator.__enum_id += 1
85 print ' const Trace::EnumSig *sig;'
86 print ' switch(value) {'
88 value = enum.values[i]
89 print ' case %s:' % value
90 print ' sig = &sig%u;' % i
93 print ' Trace::LiteralSInt(value);'
96 print ' Trace::LiteralEnum(sig);'
100 def visit_bitmask(self, bitmask):
101 print 'static const Trace::BitmaskVal __bitmask%s_vals[] = {' % (bitmask.id)
102 for value in bitmask.values:
103 print ' {"%s", %s},' % (value, value)
106 print 'static const Trace::BitmaskSig __bitmask%s_sig = {' % (bitmask.id)
107 print ' %u, %u, __bitmask%s_vals' % (int(bitmask.id), len(bitmask.values), bitmask.id)
111 def visit_pointer(self, pointer):
112 self.visit(pointer.type)
114 def visit_handle(self, handle):
115 self.visit(handle.type)
117 def visit_alias(self, alias):
118 self.visit(alias.type)
120 def visit_opaque(self, opaque):
123 def visit_interface(self, interface):
124 print "class %s : public %s " % (interface_wrap_name(interface), interface.name)
127 print " %s(%s * pInstance);" % (interface_wrap_name(interface), interface.name)
128 print " virtual ~%s();" % interface_wrap_name(interface)
130 for method in interface.itermethods():
131 print " " + method.prototype() + ";"
134 print " %s * m_pInstance;" % (interface.name,)
139 class DumpImplementer(stdapi.Visitor):
140 '''Dump an instance.'''
142 def visit_literal(self, literal, instance):
143 print ' Trace::Literal%s(%s);' % (literal.format, instance)
145 def visit_string(self, string, instance):
146 if string.length is not None:
147 print ' Trace::LiteralString((const char *)%s, %s);' % (instance, string.length)
149 print ' Trace::LiteralString((const char *)%s);' % instance
151 def visit_const(self, const, instance):
152 self.visit(const.type, instance)
154 def visit_struct(self, struct, instance):
155 print ' __traceStruct%s(%s);' % (struct.id, instance)
157 def visit_array(self, array, instance):
158 print ' if (%s) {' % instance
159 index = '__i' + array.type.id
160 print ' Trace::BeginArray(%s);' % (array.length,)
161 print ' for (int %s = 0; %s < %s; ++%s) {' % (index, index, array.length, index)
162 print ' Trace::BeginElement();'
163 self.visit(array.type, '(%s)[%s]' % (instance, index))
164 print ' Trace::EndElement();'
166 print ' Trace::EndArray();'
169 print ' Trace::LiteralNull();'
171 def visit_blob(self, blob, instance):
172 print ' Trace::LiteralBlob(%s, %s);' % (instance, blob.size)
174 def visit_enum(self, enum, instance):
175 print ' __traceEnum%s(%s);' % (enum.id, instance)
177 def visit_bitmask(self, bitmask, instance):
178 print ' Trace::LiteralBitmask(__bitmask%s_sig, %s);' % (bitmask.id, instance)
180 def visit_pointer(self, pointer, instance):
181 print ' if (%s) {' % instance
182 print ' Trace::BeginArray(1);'
183 print ' Trace::BeginElement();'
184 dump_instance(pointer.type, "*" + instance)
185 print ' Trace::EndElement();'
186 print ' Trace::EndArray();'
189 print ' Trace::LiteralNull();'
191 def visit_handle(self, handle, instance):
192 self.visit(handle.type, instance)
194 def visit_alias(self, alias, instance):
195 self.visit(alias.type, instance)
197 def visit_opaque(self, opaque, instance):
198 print ' Trace::LiteralOpaque((const void *)%s);' % instance
200 def visit_interface(self, interface, instance):
201 print ' Trace::LiteralOpaque((const void *)&%s);' % instance
204 dump_instance = DumpImplementer().visit
208 class Wrapper(stdapi.Visitor):
209 '''Wrap an instance.'''
211 def visit_void(self, type, instance):
212 raise NotImplementedError
214 def visit_literal(self, type, instance):
217 def visit_string(self, type, instance):
220 def visit_const(self, type, instance):
223 def visit_struct(self, struct, instance):
224 for type, name in struct.members:
225 self.visit(type, "(%s).%s" % (instance, name))
227 def visit_array(self, array, instance):
228 # XXX: actually it is possible to return an array of pointers
231 def visit_blob(self, blob, instance):
234 def visit_enum(self, enum, instance):
237 def visit_bitmask(self, bitmask, instance):
240 def visit_pointer(self, pointer, instance):
241 print " if (%s) {" % instance
242 self.visit(pointer.type, "*" + instance)
245 def visit_handle(self, handle, instance):
246 self.visit(handle.type, instance)
248 def visit_alias(self, alias, instance):
249 self.visit(alias.type, instance)
251 def visit_opaque(self, opaque, instance):
254 def visit_interface(self, interface, instance):
255 assert instance.startswith('*')
256 instance = instance[1:]
257 print " if (%s) {" % instance
258 print " %s = new %s(%s);" % (instance, interface_wrap_name(interface), instance)
262 class Unwrapper(Wrapper):
264 def visit_interface(self, interface, instance):
265 assert instance.startswith('*')
266 instance = instance[1:]
267 print " if (%s) {" % instance
268 print " %s = static_cast<%s *>(%s)->m_pInstance;" % (instance, interface_wrap_name(interface), instance)
272 wrap_instance = Wrapper().visit
273 unwrap_instance = Unwrapper().visit
281 def trace_api(self, api):
287 for header in api.headers:
292 types = api.all_types()
293 visitor = DumpDeclarator()
294 map(visitor.visit, types)
298 interfaces = [type for type in types if isinstance(type, stdapi.Interface)]
299 map(self.interface_wrap_impl, interfaces)
303 map(self.trace_function_decl, api.functions)
304 map(self.trace_function_impl, api.functions)
309 def header(self, api):
312 def footer(self, api):
315 def trace_function_decl(self, function):
316 # Per-function declarations
319 print 'static const char * __%s_args[%u] = {%s};' % (function.name, len(function.args), ', '.join(['"%s"' % arg.name for arg in function.args]))
321 print 'static const char ** __%s_args = NULL;' % (function.name,)
322 print 'static const Trace::FunctionSig __%s_sig = {%u, "%s", %u, __%s_args};' % (function.name, int(function.id), function.name, len(function.args), function.name)
325 def get_dispatch_function(self, function):
326 return '__' + function.name
328 def is_public_function(self, function):
331 def trace_function_impl(self, function):
332 if self.is_public_function(function):
333 print 'extern "C" PUBLIC'
335 print 'extern "C" PRIVATE'
336 print function.prototype() + ' {'
337 if function.type is not stdapi.Void:
338 print ' %s __result;' % function.type
339 self.trace_function_impl_body(function)
340 if function.type is not stdapi.Void:
341 self.wrap_ret(function, "__result")
342 print ' return __result;'
346 def trace_function_impl_body(self, function):
347 print ' unsigned __call = Trace::BeginEnter(__%s_sig);' % (function.name,)
348 for arg in function.args:
350 self.unwrap_arg(function, arg)
351 self.dump_arg(function, arg)
352 print ' Trace::EndEnter();'
353 self.dispatch_function(function)
354 print ' Trace::BeginLeave(__call);'
355 for arg in function.args:
357 self.dump_arg(function, arg)
358 self.wrap_arg(function, arg)
359 if function.type is not stdapi.Void:
360 self.dump_ret(function, "__result")
361 print ' Trace::EndLeave();'
363 def dispatch_function(self, function):
364 if function.type is stdapi.Void:
367 result = '__result = '
368 dispatch = self.get_dispatch_function(function)
369 print ' %s%s(%s);' % (result, dispatch, ', '.join([str(arg.name) for arg in function.args]))
371 def dump_arg(self, function, arg):
372 print ' Trace::BeginArg(%u);' % (arg.index,)
373 self.dump_arg_instance(function, arg)
374 print ' Trace::EndArg();'
376 def dump_arg_instance(self, function, arg):
377 dump_instance(arg.type, arg.name)
379 def wrap_arg(self, function, arg):
380 wrap_instance(arg.type, arg.name)
382 def unwrap_arg(self, function, arg):
383 unwrap_instance(arg.type, arg.name)
385 def dump_ret(self, function, instance):
386 print ' Trace::BeginReturn();'
387 dump_instance(function.type, instance)
388 print ' Trace::EndReturn();'
390 def wrap_ret(self, function, instance):
391 wrap_instance(function.type, instance)
393 def unwrap_ret(self, function, instance):
394 unwrap_instance(function.type, instance)
396 def interface_wrap_impl(self, interface):
397 print '%s::%s(%s * pInstance) {' % (interface_wrap_name(interface), interface_wrap_name(interface), interface.name)
398 print ' m_pInstance = pInstance;'
401 print '%s::~%s() {' % (interface_wrap_name(interface), interface_wrap_name(interface))
404 for method in interface.itermethods():
405 self.trace_method(interface, method)
408 def trace_method(self, interface, method):
409 print method.prototype(interface_wrap_name(interface) + '::' + method.name) + ' {'
410 print ' static const char * __args[%u] = {%s};' % (len(method.args) + 1, ', '.join(['"this"'] + ['"%s"' % arg.name for arg in method.args]))
411 print ' static const Trace::FunctionSig __sig = {%u, "%s", %u, __args};' % (int(method.id), interface.name + '::' + method.name, len(method.args) + 1)
412 print ' unsigned __call = Trace::BeginEnter(__sig);'
413 print ' Trace::BeginArg(0);'
414 print ' Trace::LiteralOpaque((const void *)m_pInstance);'
415 print ' Trace::EndArg();'
416 for arg in method.args:
418 self.unwrap_arg(method, arg)
419 self.dump_arg(method, arg)
420 if method.type is stdapi.Void:
423 print ' %s __result;' % method.type
424 result = '__result = '
425 print ' Trace::EndEnter();'
426 print ' %sm_pInstance->%s(%s);' % (result, method.name, ', '.join([str(arg.name) for arg in method.args]))
427 print ' Trace::BeginLeave(__call);'
428 for arg in method.args:
430 self.dump_arg(method, arg)
431 self.wrap_arg(method, arg)
432 if method.type is not stdapi.Void:
433 print ' Trace::BeginReturn();'
434 dump_instance(method.type, "__result")
435 print ' Trace::EndReturn();'
436 wrap_instance(method.type, '__result')
437 print ' Trace::EndLeave();'
438 if method.name == 'QueryInterface':
439 print ' if (ppvObj && *ppvObj) {'
440 print ' if (*ppvObj == m_pInstance) {'
441 print ' *ppvObj = this;'
443 for iface in self.api.interfaces:
444 print ' else if (riid == IID_%s) {' % iface.name
445 print ' *ppvObj = new Wrap%s((%s *) *ppvObj);' % (iface.name, iface.name)
448 if method.name == 'Release':
449 assert method.type is not stdapi.Void
450 print ' if (!__result)'
451 print ' delete this;'
452 if method.type is not stdapi.Void:
453 print ' return __result;'
458 class DllTracer(Tracer):
460 def __init__(self, dllname):
461 self.dllname = dllname
463 def header(self, api):
465 static HINSTANCE g_hDll = NULL;
468 __getPublicProcAddress(LPCSTR lpProcName)
471 char szDll[MAX_PATH] = {0};
473 if (!GetSystemDirectoryA(szDll, MAX_PATH)) {
477 strcat(szDll, "\\\\%s");
479 g_hDll = LoadLibraryA(szDll);
485 return GetProcAddress(g_hDll, lpProcName);
488 #define __abort() OS::Abort()
491 dispatcher = Dispatcher()
492 dispatcher.dispatch_api(api)
494 Tracer.header(self, api)