X-Git-Url: https://git.cworth.org/git?a=blobdiff_plain;f=trace.py;h=7b2ba73941fa60c91aab68326b4838221b050a02;hb=041e5be6105ab6b43841f525b17afb6d982323b0;hp=95e84b5e732cc8cbd676e36fe9de35b43efd7939;hpb=d35973cb47a75034dbbb64e9b0a91fcb4cc971d6;p=apitrace diff --git a/trace.py b/trace.py index 95e84b5..7b2ba73 100644 --- a/trace.py +++ b/trace.py @@ -23,13 +23,15 @@ # ##########################################################################/ -"""C basic types""" +"""Common trace code generation.""" import stdapi +from dispatch import Dispatcher -all_types = {} +def interface_wrap_name(interface): + return "Wrap" + interface.expr class DumpDeclarator(stdapi.OnceVisitor): @@ -51,11 +53,16 @@ class DumpDeclarator(stdapi.OnceVisitor): for type, name in struct.members: self.visit(type) print 'static void __traceStruct%s(const %s &value) {' % (struct.id, struct.expr) - print ' Trace::BeginStruct(%u);' % len(struct.members) + print ' static const char * members[%u] = {' % (len(struct.members),) + for type, name, in struct.members: + print ' "%s",' % (name,) + print ' };' + print ' static const Trace::StructSig sig = {' + print ' %u, "%s", %u, members' % (int(struct.id), struct.name, len(struct.members)) + print ' };' + print ' Trace::BeginStruct(&sig);' for type, name in struct.members: - print ' Trace::BeginMember("%s");' % (name,) dump_instance(type, 'value.%s' % (name,)) - print ' Trace::EndMember();' print ' Trace::EndStruct();' print '}' print @@ -68,15 +75,22 @@ class DumpDeclarator(stdapi.OnceVisitor): def visit_enum(self, enum): print 'static void __traceEnum%s(const %s value) {' % (enum.id, enum.expr) + n = len(enum.values) + for i in range(n): + value = enum.values[i] + print ' static const Trace::EnumSig sig%u = {%u, "%s", %s};' % (i, enum.vid + i, value, value) + print ' const Trace::EnumSig *sig;' print ' switch(value) {' - for value in enum.values: + for i in range(n): + value = enum.values[i] print ' case %s:' % value - print ' Trace::LiteralNamedConstant("%s", %s);' % (value, value) + print ' sig = &sig%u;' % i print ' break;' print ' default:' print ' Trace::LiteralSInt(value);' - print ' break;' + print ' return;' print ' }' + print ' Trace::LiteralEnum(sig);' print '}' print @@ -104,7 +118,19 @@ class DumpDeclarator(stdapi.OnceVisitor): pass def visit_interface(self, interface): - pass + print "class %s : public %s " % (interface_wrap_name(interface), interface.name) + print "{" + print "public:" + print " %s(%s * pInstance);" % (interface_wrap_name(interface), interface.name) + print " virtual ~%s();" % interface_wrap_name(interface) + print + for method in interface.itermethods(): + print " " + method.prototype() + ";" + print + #print "private:" + print " %s * m_pInstance;" % (interface.name,) + print "};" + print class DumpImplementer(stdapi.Visitor): @@ -169,7 +195,7 @@ class DumpImplementer(stdapi.Visitor): print ' Trace::LiteralOpaque((const void *)%s);' % instance def visit_interface(self, interface, instance): - print ' Trace::LiteralOpaque((const void *)%s);' % instance + print ' Trace::LiteralOpaque((const void *)&%s);' % instance dump_instance = DumpImplementer().visit @@ -221,15 +247,20 @@ class Wrapper(stdapi.Visitor): pass def visit_interface(self, interface, instance): + assert instance.startswith('*') + instance = instance[1:] print " if(%s)" % instance - print " %s = new %s(%s);" % (instance, interface.type.wrap_name(), instance) + print " %s = new %s(%s);" % (instance, interface_wrap_name(interface), instance) class Unwrapper(Wrapper): def visit_interface(self, interface, instance): + assert instance.startswith('*') + instance = instance[1:] print " if(%s)" % instance - print " %s = static_cast<%s *>(%s)->m_pInstance;" % (instance, interface.type.wrap_name(), instance) + print " %s = static_cast<%s *>(%s)->m_pInstance;" % (instance, interface_wrap_name(interface), instance) + wrap_instance = Wrapper().visit unwrap_instance = Unwrapper().visit @@ -252,10 +283,8 @@ class Tracer: print # Interfaces wrapers - map(self.interface_wrap_name, api.interfaces) - map(self.interface_pre_decl, api.interfaces) - map(self.interface_decl, api.interfaces) - map(self.interface_wrap_impl, api.interfaces) + interfaces = [type for type in types if isinstance(type, stdapi.Interface)] + map(self.interface_wrap_impl, interfaces) print # Function wrappers @@ -271,58 +300,38 @@ class Tracer: def footer(self, api): pass - def function_pointer_type(self, function): - return 'P' + function.name - - def function_pointer_value(self, function): - return 'p' + function.name - def trace_function_decl(self, function): - ptype = self.function_pointer_type(function) - pvalue = self.function_pointer_value(function) - print 'typedef ' + function.prototype('* %s' % ptype) + ';' - print 'static %s %s = NULL;' % (ptype, pvalue) - print + # Per-function declarations - def trace_function_fail(self, function): - if function.fail is not None: - if function.type is stdapi.Void: - assert function.fail == '' - print ' return;' - else: - assert function.fail != '' - print ' return %s;' % function.fail + if function.args: + print 'static const char * __%s_args[%u] = {%s};' % (function.name, len(function.args), ', '.join(['"%s"' % arg.name for arg in function.args])) else: - print ' Trace::Abort();' - - def get_function_address(self, function): - raise NotImplementedError + print 'static const char ** __%s_args = NULL;' % (function.name,) + print 'static const Trace::FunctionSig __%s_sig = {%u, "%s", %u, __%s_args};' % (function.name, int(function.id), function.name, len(function.args), function.name) + print - def _get_true_pointer(self, function): - ptype = self.function_pointer_type(function) - pvalue = self.function_pointer_value(function) - print ' if(!%s) {' % (pvalue,) - print ' %s = (%s)%s;' % (pvalue, ptype, self.get_function_address(function)) - print ' if(!%s)' % (pvalue,) - self.trace_function_fail(function) - print ' }' + def get_dispatch_function(self, function): + return '__' + function.name def trace_function_impl(self, function): - pvalue = self.function_pointer_value(function) - print function.prototype() + ' {' - if function.type is stdapi.Void: - result = '' - else: + print 'extern "C" ' + function.prototype() + ' {' + if function.type is not stdapi.Void: print ' %s __result;' % function.type - result = '__result = ' - self._get_true_pointer(function) - print ' unsigned __call = Trace::BeginEnter("%s");' % (function.name) + self.trace_function_impl_body(function) + if function.type is not stdapi.Void: + self.wrap_ret(function, "__result") + print ' return __result;' + print '}' + print + + def trace_function_impl_body(self, function): + print ' unsigned __call = Trace::BeginEnter(__%s_sig);' % (function.name,) for arg in function.args: if not arg.output: self.unwrap_arg(function, arg) self.dump_arg(function, arg) print ' Trace::EndEnter();' - print ' %s%s(%s);' % (result, pvalue, ', '.join([str(arg.name) for arg in function.args])) + self.dispatch_function(function) print ' Trace::BeginLeave(__call);' for arg in function.args: if arg.output: @@ -331,17 +340,23 @@ class Tracer: if function.type is not stdapi.Void: self.dump_ret(function, "__result") print ' Trace::EndLeave();' - if function.type is not stdapi.Void: - self.wrap_ret(function, "__result") - print ' return __result;' - print '}' - print + + def dispatch_function(self, function): + if function.type is stdapi.Void: + result = '' + else: + result = '__result = ' + dispatch = self.get_dispatch_function(function) + print ' %s%s(%s);' % (result, dispatch, ', '.join([str(arg.name) for arg in function.args])) def dump_arg(self, function, arg): - print ' Trace::BeginArg(%u, "%s");' % (arg.index, arg.name,) - dump_instance(arg.type, arg.name) + print ' Trace::BeginArg(%u);' % (arg.index,) + self.dump_arg_instance(function, arg) print ' Trace::EndArg();' + def dump_arg_instance(self, function, arg): + dump_instance(arg.type, arg.name) + def wrap_arg(self, function, arg): wrap_instance(arg.type, arg.name) @@ -359,33 +374,12 @@ class Tracer: def unwrap_ret(self, function, instance): unwrap_instance(function.type, instance) - def interface_wrap_name(self, interface): - return "Wrap" + interface.expr - - def interface_pre_decl(self, interface): - print "class %s;" % interface.wrap_name() - - def interface_decl(self, interface): - print "class %s : public %s " % (interface.wrap_name(), interface.name) - print "{" - print "public:" - print " %s(%s * pInstance);" % (interface.wrap_name(), interface.name) - print " virtual ~%s();" % interface.wrap_name() - print - for method in interface.itermethods(): - print " " + method.prototype() + ";" - print - #print "private:" - print " %s * m_pInstance;" % (interface.name,) - print "};" - print - def interface_wrap_impl(self, interface): - print '%s::%s(%s * pInstance) {' % (interface.wrap_name(), interface.wrap_name(), interface.name) + print '%s::%s(%s * pInstance) {' % (interface_wrap_name(interface), interface_wrap_name(interface), interface.name) print ' m_pInstance = pInstance;' print '}' print - print '%s::~%s() {' % (interface.wrap_name(), interface.wrap_name()) + print '%s::~%s() {' % (interface_wrap_name(interface), interface_wrap_name(interface)) print '}' print for method in interface.itermethods(): @@ -393,41 +387,85 @@ class Tracer: print def trace_method(self, interface, method): - print method.prototype(interface.wrap_name() + '::' + method.name) + ' {' - if method.type is Void: - result = '' - else: - print ' %s __result;' % method.type - result = '__result = ' - print ' Trace::BeginCall("%s");' % (interface.name + '::' + method.name) - print ' Trace::BeginArg(0, "this");' + print method.prototype(interface_wrap_name(interface) + '::' + method.name) + ' {' + print ' static const char * __args[%u] = {%s};' % (len(method.args) + 1, ', '.join(['"this"'] + ['"%s"' % arg.name for arg in method.args])) + print ' static const Trace::FunctionSig __sig = {%u, "%s", %u, __args};' % (int(method.id), interface.name + '::' + method.name, len(method.args) + 1) + print ' unsigned __call = Trace::BeginEnter(__sig);' + print ' Trace::BeginArg(0);' print ' Trace::LiteralOpaque((const void *)m_pInstance);' print ' Trace::EndArg();' for arg in method.args: if not arg.output: self.unwrap_arg(method, arg) self.dump_arg(method, arg) + if method.type is stdapi.Void: + result = '' + else: + print ' %s __result;' % method.type + result = '__result = ' + print ' Trace::EndEnter();' print ' %sm_pInstance->%s(%s);' % (result, method.name, ', '.join([str(arg.name) for arg in method.args])) + print ' Trace::BeginLeave(__call);' for arg in method.args: if arg.output: self.dump_arg(method, arg) self.wrap_arg(method, arg) - if method.type is not Void: - print ' Trace::BeginReturn("%s");' % method.type + if method.type is not stdapi.Void: + print ' Trace::BeginReturn();' dump_instance(method.type, "__result") print ' Trace::EndReturn();' wrap_instance(method.type, '__result') - print ' Trace::EndCall();' + print ' Trace::EndLeave();' if method.name == 'QueryInterface': print ' if (*ppvObj == m_pInstance)' print ' *ppvObj = this;' if method.name == 'Release': - assert method.type is not Void + assert method.type is not stdapi.Void print ' if (!__result)' print ' delete this;' - if method.type is not Void: + if method.type is not stdapi.Void: print ' return __result;' print '}' print +class DllTracer(Tracer): + + def __init__(self, dllname): + self.dllname = dllname + + def get_function_address(self, function): + return '__%s' % (function.name,) + + def header(self, api): + print ''' +static HINSTANCE g_hDll = NULL; + +static PROC +__getPublicProcAddress(LPCSTR lpProcName) +{ + if (!g_hDll) { + char szDll[MAX_PATH] = {0}; + + if (!GetSystemDirectoryA(szDll, MAX_PATH)) { + return NULL; + } + + strcat(szDll, "\\\\%s"); + + g_hDll = LoadLibraryA(szDll); + if (!g_hDll) { + return NULL; + } + } + + return GetProcAddress(g_hDll, lpProcName); +} + + ''' % self.dllname + + dispatcher = Dispatcher() + dispatcher.dispatch_api(api) + + Tracer.header(self, api) +