##########################################################################/
-import stdapi
-import glapi
+"""Generic retracing code generator."""
+import sys
+
+import specs.stdapi as stdapi
+import specs.glapi as glapi
+
class ConstRemover(stdapi.Rebuilder):
+ '''Type visitor which strips out const qualifiers from types.'''
- def visit_const(self, const):
+ def visitConst(self, const):
return const.type
- def visit_opaque(self, opaque):
- expr = opaque.expr
- if expr.startswith('const '):
- expr = expr[6:]
- return stdapi.Opaque(expr)
+ def visitOpaque(self, opaque):
+ return opaque
-class ValueExtractor(stdapi.Visitor):
+def lookupHandle(handle, value):
+ if handle.key is None:
+ return "__%s_map[%s]" % (handle.name, value)
+ else:
+ key_name, key_type = handle.key
+ return "__%s_map[%s][%s]" % (handle.name, key_name, value)
- def visit_literal(self, literal, lvalue, rvalue):
- if literal.format == 'Bool':
- print ' %s = static_cast<bool>(%s);' % (lvalue, rvalue)
- else:
- print ' %s = %s;' % (lvalue, rvalue)
- def visit_const(self, const, lvalue, rvalue):
+class ValueDeserializer(stdapi.Visitor):
+
+ def visitLiteral(self, literal, lvalue, rvalue):
+ print ' %s = (%s).to%s();' % (lvalue, rvalue, literal.kind)
+
+ def visitConst(self, const, lvalue, rvalue):
self.visit(const.type, lvalue, rvalue)
- def visit_alias(self, alias, lvalue, rvalue):
+ def visitAlias(self, alias, lvalue, rvalue):
self.visit(alias.type, lvalue, rvalue)
- def visit_enum(self, enum, lvalue, rvalue):
- print ' %s = %s;' % (lvalue, rvalue)
+ def visitEnum(self, enum, lvalue, rvalue):
+ print ' %s = static_cast<%s>((%s).toSInt());' % (lvalue, enum, rvalue)
- def visit_bitmask(self, bitmask, lvalue, rvalue):
+ def visitBitmask(self, bitmask, lvalue, rvalue):
self.visit(bitmask.type, lvalue, rvalue)
- def visit_array(self, array, lvalue, rvalue):
- print ' const Trace::Array *__a%s = dynamic_cast<const Trace::Array *>(&%s);' % (array.id, rvalue)
- print ' if (__a%s) {' % (array.id)
- length = '__a%s->values.size()' % array.id
- print ' %s = new %s[%s];' % (lvalue, array.type, length)
- index = '__j' + array.id
- print ' for(size_t {i} = 0; {i} < {length}; ++{i}) {{'.format(i = index, length = length)
+ def visitArray(self, array, lvalue, rvalue):
+ print ' const trace::Array *__a%s = dynamic_cast<const trace::Array *>(&%s);' % (array.tag, rvalue)
+ print ' if (__a%s) {' % (array.tag)
+ length = '__a%s->values.size()' % array.tag
+ print ' %s = _allocator.alloc<%s>(%s);' % (lvalue, array.type, length)
+ index = '__j' + array.tag
+ print ' for (size_t {i} = 0; {i} < {length}; ++{i}) {{'.format(i = index, length = length)
try:
- self.visit(array.type, '%s[%s]' % (lvalue, index), '*__a%s->values[%s]' % (array.id, index))
+ self.visit(array.type, '%s[%s]' % (lvalue, index), '*__a%s->values[%s]' % (array.tag, index))
finally:
print ' }'
print ' } else {'
print ' %s = NULL;' % lvalue
print ' }'
- def visit_pointer(self, pointer, lvalue, rvalue):
- print ' const Trace::Array *__a%s = dynamic_cast<const Trace::Array *>(&%s);' % (pointer.id, rvalue)
- print ' if (__a%s) {' % (pointer.id)
- print ' %s = new %s;' % (lvalue, pointer.type)
+ def visitPointer(self, pointer, lvalue, rvalue):
+ print ' const trace::Array *__a%s = dynamic_cast<const trace::Array *>(&%s);' % (pointer.tag, rvalue)
+ print ' if (__a%s) {' % (pointer.tag)
+ print ' %s = _allocator.alloc<%s>();' % (lvalue, pointer.type)
try:
- self.visit(pointer.type, '%s[0]' % (lvalue,), '*__a%s->values[0]' % (pointer.id,))
+ self.visit(pointer.type, '%s[0]' % (lvalue,), '*__a%s->values[0]' % (pointer.tag,))
finally:
print ' } else {'
print ' %s = NULL;' % lvalue
print ' }'
- def visit_handle(self, handle, lvalue, rvalue):
- self.visit(handle.type, lvalue, "__%s_map[%s]" %(handle.name, rvalue));
- print ' if (verbosity >= 2)'
- print ' std::cout << "%s " << static_cast<%s>(%s) << " <- " << %s << "\\n";' % (handle.name, handle.type, rvalue, lvalue)
+ def visitIntPointer(self, pointer, lvalue, rvalue):
+ print ' %s = static_cast<%s>((%s).toPointer());' % (lvalue, pointer, rvalue)
+
+ def visitLinearPointer(self, pointer, lvalue, rvalue):
+ print ' %s = static_cast<%s>(retrace::toPointer(%s));' % (lvalue, pointer, rvalue)
+
+ def visitHandle(self, handle, lvalue, rvalue):
+ #OpaqueValueDeserializer().visit(handle.type, lvalue, rvalue);
+ self.visit(handle.type, lvalue, rvalue);
+ new_lvalue = lookupHandle(handle, lvalue)
+ print ' if (retrace::verbosity >= 2) {'
+ print ' std::cout << "%s " << size_t(%s) << " <- " << size_t(%s) << "\\n";' % (handle.name, lvalue, new_lvalue)
+ print ' }'
+ print ' %s = %s;' % (lvalue, new_lvalue)
- def visit_blob(self, blob, lvalue, rvalue):
- print ' %s = static_cast<%s>((%s).blob());' % (lvalue, blob, rvalue)
+ def visitBlob(self, blob, lvalue, rvalue):
+ print ' %s = static_cast<%s>((%s).toPointer());' % (lvalue, blob, rvalue)
- def visit_string(self, string, lvalue, rvalue):
- print ' %s = (%s)((%s).string());' % (lvalue, string.expr, rvalue)
+ def visitString(self, string, lvalue, rvalue):
+ print ' %s = (%s)((%s).toString());' % (lvalue, string.expr, rvalue)
+
+class OpaqueValueDeserializer(ValueDeserializer):
+ '''Value extractor that also understands opaque values.
+ Normally opaque values can't be retraced, unless they are being extracted
+ in the context of handles.'''
-class ValueWrapper(stdapi.Visitor):
+ def visitOpaque(self, opaque, lvalue, rvalue):
+ print ' %s = static_cast<%s>(retrace::toPointer(%s));' % (lvalue, opaque, rvalue)
- def visit_literal(self, literal, lvalue, rvalue):
+
+class SwizzledValueRegistrator(stdapi.Visitor):
+ '''Type visitor which will register (un)swizzled value pairs, to later be
+ swizzled.'''
+
+ def visitLiteral(self, literal, lvalue, rvalue):
pass
- def visit_alias(self, alias, lvalue, rvalue):
+ def visitAlias(self, alias, lvalue, rvalue):
self.visit(alias.type, lvalue, rvalue)
- def visit_enum(self, enum, lvalue, rvalue):
+ def visitEnum(self, enum, lvalue, rvalue):
pass
- def visit_bitmask(self, bitmask, lvalue, rvalue):
+ def visitBitmask(self, bitmask, lvalue, rvalue):
pass
- def visit_array(self, array, lvalue, rvalue):
- print ' const Trace::Array *__a%s = dynamic_cast<const Trace::Array *>(&%s);' % (array.id, rvalue)
- print ' if (__a%s) {' % (array.id)
- length = '__a%s->values.size()' % array.id
- index = '__j' + array.id
- print ' for(size_t {i} = 0; {i} < {length}; ++{i}) {{'.format(i = index, length = length)
+ def visitArray(self, array, lvalue, rvalue):
+ print ' const trace::Array *__a%s = dynamic_cast<const trace::Array *>(&%s);' % (array.tag, rvalue)
+ print ' if (__a%s) {' % (array.tag)
+ length = '__a%s->values.size()' % array.tag
+ index = '__j' + array.tag
+ print ' for (size_t {i} = 0; {i} < {length}; ++{i}) {{'.format(i = index, length = length)
try:
- self.visit(array.type, '%s[%s]' % (lvalue, index), '*__a%s->values[%s]' % (array.id, index))
+ self.visit(array.type, '%s[%s]' % (lvalue, index), '*__a%s->values[%s]' % (array.tag, index))
finally:
print ' }'
print ' }'
- def visit_pointer(self, pointer, lvalue, rvalue):
- print ' const Trace::Array *__a%s = dynamic_cast<const Trace::Array *>(&%s);' % (pointer.id, rvalue)
- print ' if (__a%s) {' % (pointer.id)
+ def visitPointer(self, pointer, lvalue, rvalue):
+ print ' const trace::Array *__a%s = dynamic_cast<const trace::Array *>(&%s);' % (pointer.tag, rvalue)
+ print ' if (__a%s) {' % (pointer.tag)
try:
- self.visit(pointer.type, '%s[0]' % (lvalue,), '*__a%s->values[0]' % (pointer.id,))
+ self.visit(pointer.type, '%s[0]' % (lvalue,), '*__a%s->values[0]' % (pointer.tag,))
finally:
print ' }'
-
- def visit_handle(self, handle, lvalue, rvalue):
+ def visitIntPointer(self, pointer, lvalue, rvalue):
+ pass
+
+ def visitLinearPointer(self, pointer, lvalue, rvalue):
+ assert pointer.size is not None
+ if pointer.size is not None:
+ print r' retrace::addRegion((%s).toUIntPtr(), %s, %s);' % (rvalue, lvalue, pointer.size)
+
+ def visitHandle(self, handle, lvalue, rvalue):
+ print ' %s __orig_result;' % handle.type
+ OpaqueValueDeserializer().visit(handle.type, '__orig_result', rvalue);
if handle.range is None:
- print " __{handle.name}_map[static_cast<{handle.type}>({rvalue})] = {lvalue};".format(**locals())
- print ' if (verbosity >= 2)'
- print ' std::cout << "{handle.name} " << static_cast<{handle.type}>({rvalue}) << " -> " << {lvalue} << "\\n";'.format(**locals())
+ rvalue = "__orig_result"
+ entry = lookupHandle(handle, rvalue)
+ print " %s = %s;" % (entry, lvalue)
+ print ' if (retrace::verbosity >= 2) {'
+ print ' std::cout << "{handle.name} " << {rvalue} << " -> " << {lvalue} << "\\n";'.format(**locals())
+ print ' }'
else:
- i = '__h' + handle.id
- print ' for({handle.type} {i} = 0; {i} < {handle.range}; ++{i}) {{'.format(**locals())
- print ' __{handle.name}_map[static_cast<{handle.type}>({rvalue}) + {i}] = {lvalue} + {i};'.format(**locals())
- print ' if (verbosity >= 2)'
- print ' std::cout << "{handle.name} " << (static_cast<{handle.type}>({rvalue}) + {i}) << " -> " << ({lvalue} + {i}) << "\\n";'.format(**locals())
+ i = '__h' + handle.tag
+ lvalue = "%s + %s" % (lvalue, i)
+ rvalue = "__orig_result + %s" % (i,)
+ entry = lookupHandle(handle, rvalue)
+ print ' for ({handle.type} {i} = 0; {i} < {handle.range}; ++{i}) {{'.format(**locals())
+ print ' {entry} = {lvalue};'.format(**locals())
+ print ' if (retrace::verbosity >= 2) {'
+ print ' std::cout << "{handle.name} " << ({rvalue}) << " -> " << ({lvalue}) << "\\n";'.format(**locals())
+ print ' }'
print ' }'
- def visit_blob(self, blob, lvalue, rvalue):
+ def visitBlob(self, blob, lvalue, rvalue):
pass
- def visit_string(self, string, lvalue, rvalue):
+ def visitString(self, string, lvalue, rvalue):
pass
-
class Retracer:
- def retrace_function(self, function):
- print 'static void retrace_%s(Trace::Call &call) {' % function.name
+ def retraceFunction(self, function):
+ print 'static void retrace_%s(trace::Call &call) {' % function.name
+ self.retraceFunctionBody(function)
+ print '}'
+ print
+
+ def retraceFunctionBody(self, function):
+ if not function.sideeffects:
+ print ' (void)call;'
+ return
+
+ print ' retrace::ScopedAllocator _allocator;'
+ print ' (void)_allocator;'
success = True
for arg in function.args:
arg_type = ConstRemover().visit(arg.type)
rvalue = 'call.arg(%u)' % (arg.index,)
lvalue = arg.name
try:
- self.extract_arg(function, arg, arg_type, lvalue, rvalue)
+ self.extractArg(function, arg, arg_type, lvalue, rvalue)
except NotImplementedError:
success = False
print ' %s = 0; // FIXME' % arg.name
if not success:
- self.fail_function(function)
- self.call_function(function)
+ print ' if (1) {'
+ self.failFunction(function)
+ print ' }'
+ self.invokeFunction(function)
for arg in function.args:
if arg.output:
arg_type = ConstRemover().visit(arg.type)
rvalue = 'call.arg(%u)' % (arg.index,)
lvalue = arg.name
try:
- ValueWrapper().visit(arg_type, lvalue, rvalue)
+ self.regiterSwizzledValue(arg_type, lvalue, rvalue)
except NotImplementedError:
- print ' // FIXME: %s' % arg.name
+ print ' // XXX: %s' % arg.name
if function.type is not stdapi.Void:
rvalue = '*call.ret'
lvalue = '__result'
try:
- ValueWrapper().visit(function.type, lvalue, rvalue)
+ self.regiterSwizzledValue(function.type, lvalue, rvalue)
except NotImplementedError:
- print ' // FIXME: result'
- print '}'
- print
+ print ' // XXX: result'
+ if not success:
+ if function.name[-1].islower():
+ sys.stderr.write('warning: unsupported %s call\n' % function.name)
- def fail_function(self, function):
- print ' std::cerr << "warning: unsupported call %s\\n";' % function.name
+ def failFunction(self, function):
+ print ' if (retrace::verbosity >= 0) {'
+ print ' retrace::unsupported(call);'
+ print ' }'
print ' return;'
- def extract_arg(self, function, arg, arg_type, lvalue, rvalue):
- ValueExtractor().visit(arg_type, lvalue, rvalue)
+ def extractArg(self, function, arg, arg_type, lvalue, rvalue):
+ ValueDeserializer().visit(arg_type, lvalue, rvalue)
+
+ def extractOpaqueArg(self, function, arg, arg_type, lvalue, rvalue):
+ OpaqueValueDeserializer().visit(arg_type, lvalue, rvalue)
+
+ def regiterSwizzledValue(self, type, lvalue, rvalue):
+ visitor = SwizzledValueRegistrator()
+ visitor.visit(type, lvalue, rvalue)
- def call_function(self, function):
- arg_names = ", ".join([arg.name for arg in function.args])
+ def invokeFunction(self, function):
+ arg_names = ", ".join(function.argNames())
if function.type is not stdapi.Void:
print ' %s __result;' % (function.type)
print ' __result = %s(%s);' % (function.name, arg_names)
+ print ' (void)__result;'
else:
print ' %s(%s);' % (function.name, arg_names)
- def filter_function(self, function):
+ def filterFunction(self, function):
return True
- def retrace_functions(self, functions):
- functions = filter(self.filter_function, functions)
+ table_name = 'retrace::callbacks'
- for function in functions:
- if function.sideeffects:
- self.retrace_function(function)
+ def retraceFunctions(self, functions):
+ functions = filter(self.filterFunction, functions)
- print 'static bool retrace_call(Trace::Call &call) {'
for function in functions:
- if not function.sideeffects:
- print ' if (call.name == "%s") {' % function.name
- print ' return true;'
- print ' }'
- print
- print ' if (verbosity >=1 ) {'
- print ' std::cout << call;'
- print ' std::cout.flush();'
- print ' };'
- print
+ self.retraceFunction(function)
+
+ print 'const retrace::Entry %s[] = {' % self.table_name
for function in functions:
- if function.sideeffects:
- print ' if (call.name == "%s") {' % function.name
- print ' retrace_%s(call);' % function.name
- print ' return true;'
- print ' }'
- print ' std::cerr << "warning: unknown call " << call.name << "\\n";'
- print ' return false;'
- print '}'
+ print ' {"%s", &retrace_%s},' % (function.name, function.name)
+ print ' {NULL, NULL}'
+ print '};'
print
- def retrace_api(self, api):
+ def retraceApi(self, api):
+ print '#include "os_time.hpp"'
print '#include "trace_parser.hpp"'
+ print '#include "retrace.hpp"'
print
- types = api.all_types()
+ types = api.getAllTypes()
handles = [type for type in types if isinstance(type, stdapi.Handle)]
handle_names = set()
for handle in handles:
if handle.name not in handle_names:
- print 'static std::map<%s, %s> __%s_map;' % (handle.type, handle.type, handle.name)
+ if handle.key is None:
+ print 'static retrace::map<%s> __%s_map;' % (handle.type, handle.name)
+ else:
+ key_name, key_type = handle.key
+ print 'static std::map<%s, retrace::map<%s> > __%s_map;' % (key_type, handle.type, handle.name)
handle_names.add(handle.name)
print
- print 'unsigned verbosity = 0;'
- print
+ self.retraceFunctions(api.functions)
- self.retrace_functions(api.functions)
-
-
-if __name__ == '__main__':
- print
- print '#include <stdlib.h>'
- print '#include <string.h>'
- print
- print '#ifdef WIN32'
- print '#include <windows.h>'
- print '#endif'
- print
- print '#include <GL/glew.h>'
- print '#include <GL/glut.h>'
- print
- retrace_api(glapi.glapi)
- print '''
-
-Trace::Parser parser;
-
-static bool insideGlBeginEnd;
-
-static void display(void) {
- Trace::Call *call;
-
- while ((call = parser.parse_call())) {
- if (call->name == "glFlush" ||
- call->name == "glXSwapBuffers" ||
- call->name == "wglSwapBuffers") {
- glFlush();
- return;
- }
-
- retrace_call(*call);
-
- if (call->name == "glBegin") {
- insideGlBeginEnd = true;
- }
-
- if (call->name == "glEnd") {
- insideGlBeginEnd = false;
- }
-
- if (!insideGlBeginEnd) {
- GLenum error = glGetError();
- if (error != GL_NO_ERROR) {
- std::cerr << "warning: glGetError() = ";
- switch (error) {
- case GL_INVALID_ENUM:
- std::cerr << "GL_INVALID_ENUM";
- break;
- case GL_INVALID_VALUE:
- std::cerr << "GL_INVALID_VALUE";
- break;
- case GL_INVALID_OPERATION:
- std::cerr << "GL_INVALID_OPERATION";
- break;
- case GL_STACK_OVERFLOW:
- std::cerr << "GL_STACK_OVERFLOW";
- break;
- case GL_STACK_UNDERFLOW:
- std::cerr << "GL_STACK_UNDERFLOW";
- break;
- case GL_OUT_OF_MEMORY:
- std::cerr << "GL_OUT_OF_MEMORY";
- break;
- case GL_INVALID_FRAMEBUFFER_OPERATION:
- std::cerr << "GL_INVALID_FRAMEBUFFER_OPERATION";
- break;
- case GL_TABLE_TOO_LARGE:
- std::cerr << "GL_TABLE_TOO_LARGE";
- break;
- default:
- std::cerr << error;
- break;
- }
- std::cerr << "\\n";
- }
- }
- }
-
- glFlush();
- glutIdleFunc(NULL);
-}
-
-static void idle(void) {
- glutPostRedisplay();
-}
-
-int main(int argc, char **argv)
-{
- glutInit(&argc, argv);
- glutInitWindowPosition(0, 0);
- glutInitWindowSize(800, 600);
- glutInitDisplayMode(GLUT_DEPTH | GLUT_RGB | GLUT_SINGLE);
- glutCreateWindow(argv[0]);
- glewInit();
-
- glutDisplayFunc(&display);
- glutIdleFunc(&idle);
-
- int i;
- for (i = 1; i < argc; ++i) {
- const char *arg = argv[i];
-
- if (arg[0] != '-') {
- break;
- }
-
- if (!strcmp(arg, "--")) {
- break;
- }
- else if (!strcmp(arg, "-v")) {
- ++verbosity;
- } else {
- std::cerr << "error: unknown option " << arg << "\\n";
- return 1;
- }
- }
-
- for ( ; i < argc; ++i) {
- if (parser.open(argv[i])) {
- glutMainLoop();
- parser.close();
- }
- }
-
- return 0;
-}
-
-'''
projects / apitrace / blobdiff