| 0,0 → 1,273 |
|---|
| #!/usr/bin/env python |
| |
| # (C) Copyright IBM Corporation 2004 |
| # All Rights Reserved. |
| # |
| # Permission is hereby granted, free of charge, to any person obtaining a |
| # copy of this software and associated documentation files (the "Software"), |
| # to deal in the Software without restriction, including without limitation |
| # on the rights to use, copy, modify, merge, publish, distribute, sub |
| # license, and/or sell copies of the Software, and to permit persons to whom |
| # the Software is furnished to do so, subject to the following conditions: |
| # |
| # The above copyright notice and this permission notice (including the next |
| # paragraph) shall be included in all copies or substantial portions of the |
| # Software. |
| # |
| # THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR |
| # IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY, |
| # FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT. IN NO EVENT SHALL |
| # IBM AND/OR ITS SUPPLIERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER |
| # LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING |
| # FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS |
| # IN THE SOFTWARE. |
| # |
| # Authors: |
| # Ian Romanick <idr@us.ibm.com> |
| |
| import license |
| import gl_XML, glX_XML |
| import sys, getopt |
| |
| class PrintGenericStubs(gl_XML.gl_print_base): |
| def __init__(self): |
| gl_XML.gl_print_base.__init__(self) |
| self.name = "gl_SPARC_asm.py (from Mesa)" |
| self.license = license.bsd_license_template % ( \ |
| """Copyright (C) 1999-2003 Brian Paul All Rights Reserved. |
| (C) Copyright IBM Corporation 2004""", "BRIAN PAUL, IBM") |
| |
| |
| def printRealHeader(self): |
| print '#ifdef __arch64__' |
| print '#define GL_OFF(N)\t((N) * 8)' |
| print '#define GL_LL\t\tldx' |
| print '#define GL_TIE_LD(SYM)\t%tie_ldx(SYM)' |
| print '#define GL_STACK_SIZE\t128' |
| print '#else' |
| print '#define GL_OFF(N)\t((N) * 4)' |
| print '#define GL_LL\t\tld' |
| print '#define GL_TIE_LD(SYM)\t%tie_ld(SYM)' |
| print '#define GL_STACK_SIZE\t64' |
| print '#endif' |
| print '' |
| print '#define GLOBL_FN(x) .globl x ; .type x, @function' |
| print '#define HIDDEN(x) .hidden x' |
| print '' |
| print '\t.register %g2, #scratch' |
| print '\t.register %g3, #scratch' |
| print '' |
| print '\t.text' |
| print '' |
| print '\tGLOBL_FN(__glapi_sparc_icache_flush)' |
| print '\tHIDDEN(__glapi_sparc_icache_flush)' |
| print '\t.type\t__glapi_sparc_icache_flush, @function' |
| print '__glapi_sparc_icache_flush: /* %o0 = insn_addr */' |
| print '\tflush\t%o0' |
| print '\tretl' |
| print '\t nop' |
| print '' |
| print '\t.align\t32' |
| print '' |
| print '\t.type\t__glapi_sparc_get_pc, @function' |
| print '__glapi_sparc_get_pc:' |
| print '\tretl' |
| print '\t add\t%o7, %g2, %g2' |
| print '\t.size\t__glapi_sparc_get_pc, .-__glapi_sparc_get_pc' |
| print '' |
| print '#ifdef GLX_USE_TLS' |
| print '' |
| print '\tGLOBL_FN(__glapi_sparc_get_dispatch)' |
| print '\tHIDDEN(__glapi_sparc_get_dispatch)' |
| print '__glapi_sparc_get_dispatch:' |
| print '\tmov\t%o7, %g1' |
| print '\tsethi\t%hi(_GLOBAL_OFFSET_TABLE_-4), %g2' |
| print '\tcall\t__glapi_sparc_get_pc' |
| print '\tadd\t%g2, %lo(_GLOBAL_OFFSET_TABLE_+4), %g2' |
| print '\tmov\t%g1, %o7' |
| print '\tsethi\t%tie_hi22(_glapi_tls_Dispatch), %g1' |
| print '\tadd\t%g1, %tie_lo10(_glapi_tls_Dispatch), %g1' |
| print '\tGL_LL\t[%g2 + %g1], %g2, GL_TIE_LD(_glapi_tls_Dispatch)' |
| print '\tretl' |
| print '\t mov\t%g2, %o0' |
| print '' |
| print '\t.data' |
| print '\t.align\t32' |
| print '' |
| print '\t/* --> sethi %hi(_glapi_tls_Dispatch), %g1 */' |
| print '\t/* --> or %g1, %lo(_glapi_tls_Dispatch), %g1 */' |
| print '\tGLOBL_FN(__glapi_sparc_tls_stub)' |
| print '\tHIDDEN(__glapi_sparc_tls_stub)' |
| print '__glapi_sparc_tls_stub: /* Call offset in %g3 */' |
| print '\tmov\t%o7, %g1' |
| print '\tsethi\t%hi(_GLOBAL_OFFSET_TABLE_-4), %g2' |
| print '\tcall\t__glapi_sparc_get_pc' |
| print '\tadd\t%g2, %lo(_GLOBAL_OFFSET_TABLE_+4), %g2' |
| print '\tmov\t%g1, %o7' |
| print '\tsrl\t%g3, 10, %g3' |
| print '\tsethi\t%tie_hi22(_glapi_tls_Dispatch), %g1' |
| print '\tadd\t%g1, %tie_lo10(_glapi_tls_Dispatch), %g1' |
| print '\tGL_LL\t[%g2 + %g1], %g2, GL_TIE_LD(_glapi_tls_Dispatch)' |
| print '\tGL_LL\t[%g7+%g2], %g1' |
| print '\tGL_LL\t[%g1 + %g3], %g1' |
| print '\tjmp\t%g1' |
| print '\t nop' |
| print '\t.size\t__glapi_sparc_tls_stub, .-__glapi_sparc_tls_stub' |
| print '' |
| print '#define GL_STUB(fn, off)\t\t\t\t\\' |
| print '\tGLOBL_FN(fn);\t\t\t\t\t\\' |
| print 'fn:\tba\t__glapi_sparc_tls_stub;\t\t\t\\' |
| print '\t sethi\tGL_OFF(off), %g3;\t\t\t\\' |
| print '\t.size\tfn,.-fn;' |
| print '' |
| print '#elif defined(PTHREADS)' |
| print '' |
| print '\t/* 64-bit 0x00 --> sethi %hh(_glapi_Dispatch), %g1 */' |
| print '\t/* 64-bit 0x04 --> sethi %lm(_glapi_Dispatch), %g2 */' |
| print '\t/* 64-bit 0x08 --> or %g1, %hm(_glapi_Dispatch), %g1 */' |
| print '\t/* 64-bit 0x0c --> sllx %g1, 32, %g1 */' |
| print '\t/* 64-bit 0x10 --> add %g1, %g2, %g1 */' |
| print '\t/* 64-bit 0x14 --> ldx [%g1 + %lo(_glapi_Dispatch)], %g1 */' |
| print '' |
| print '\t/* 32-bit 0x00 --> sethi %hi(_glapi_Dispatch), %g1 */' |
| print '\t/* 32-bit 0x04 --> ld [%g1 + %lo(_glapi_Dispatch)], %g1 */' |
| print '' |
| print '\t.data' |
| print '\t.align\t32' |
| print '' |
| print '\tGLOBL_FN(__glapi_sparc_pthread_stub)' |
| print '\tHIDDEN(__glapi_sparc_pthread_stub)' |
| print '__glapi_sparc_pthread_stub: /* Call offset in %g3 */' |
| print '\tmov\t%o7, %g1' |
| print '\tsethi\t%hi(_GLOBAL_OFFSET_TABLE_-4), %g2' |
| print '\tcall\t__glapi_sparc_get_pc' |
| print '\t add\t%g2, %lo(_GLOBAL_OFFSET_TABLE_+4), %g2' |
| print '\tmov\t%g1, %o7' |
| print '\tsethi\t%hi(_glapi_Dispatch), %g1' |
| print '\tor\t%g1, %lo(_glapi_Dispatch), %g1' |
| print '\tsrl\t%g3, 10, %g3' |
| print '\tGL_LL\t[%g2+%g1], %g2' |
| print '\tGL_LL\t[%g2], %g1' |
| print '\tcmp\t%g1, 0' |
| print '\tbe\t2f' |
| print '\t nop' |
| print '1:\tGL_LL\t[%g1 + %g3], %g1' |
| print '\tjmp\t%g1' |
| print '\t nop' |
| print '2:\tsave\t%sp, GL_STACK_SIZE, %sp' |
| print '\tmov\t%g3, %l0' |
| print '\tcall\t_glapi_get_dispatch' |
| print '\t nop' |
| print '\tmov\t%o0, %g1' |
| print '\tmov\t%l0, %g3' |
| print '\tba\t1b' |
| print '\t restore %g0, %g0, %g0' |
| print '\t.size\t__glapi_sparc_pthread_stub, .-__glapi_sparc_pthread_stub' |
| print '' |
| print '#define GL_STUB(fn, off)\t\t\t\\' |
| print '\tGLOBL_FN(fn);\t\t\t\t\\' |
| print 'fn:\tba\t__glapi_sparc_pthread_stub;\t\\' |
| print '\t sethi\tGL_OFF(off), %g3;\t\t\\' |
| print '\t.size\tfn,.-fn;' |
| print '' |
| print '#else /* Non-threaded version. */' |
| print '' |
| print '\t.type __glapi_sparc_nothread_stub, @function' |
| print '__glapi_sparc_nothread_stub: /* Call offset in %g3 */' |
| print '\tmov\t%o7, %g1' |
| print '\tsethi\t%hi(_GLOBAL_OFFSET_TABLE_-4), %g2' |
| print '\tcall\t__glapi_sparc_get_pc' |
| print '\t add\t%g2, %lo(_GLOBAL_OFFSET_TABLE_+4), %g2' |
| print '\tmov\t%g1, %o7' |
| print '\tsrl\t%g3, 10, %g3' |
| print '\tsethi\t%hi(_glapi_Dispatch), %g1' |
| print '\tor\t%g1, %lo(_glapi_Dispatch), %g1' |
| print '\tGL_LL\t[%g2+%g1], %g2' |
| print '\tGL_LL\t[%g2], %g1' |
| print '\tGL_LL\t[%g1 + %g3], %g1' |
| print '\tjmp\t%g1' |
| print '\t nop' |
| print '\t.size\t__glapi_sparc_nothread_stub, .-__glapi_sparc_nothread_stub' |
| print '' |
| print '#define GL_STUB(fn, off)\t\t\t\\' |
| print '\tGLOBL_FN(fn);\t\t\t\t\\' |
| print 'fn:\tba\t__glapi_sparc_nothread_stub;\t\\' |
| print '\t sethi\tGL_OFF(off), %g3;\t\t\\' |
| print '\t.size\tfn,.-fn;' |
| print '' |
| print '#endif' |
| print '' |
| print '#define GL_STUB_ALIAS(fn, alias) \\' |
| print ' .globl fn; \\' |
| print ' .set fn, alias' |
| print '' |
| print '\t.text' |
| print '\t.align\t32' |
| print '' |
| print '\t.globl\tgl_dispatch_functions_start' |
| print '\tHIDDEN(gl_dispatch_functions_start)' |
| print 'gl_dispatch_functions_start:' |
| print '' |
| return |
| |
| def printRealFooter(self): |
| print '' |
| print '\t.globl\tgl_dispatch_functions_end' |
| print '\tHIDDEN(gl_dispatch_functions_end)' |
| print 'gl_dispatch_functions_end:' |
| return |
| |
| def printBody(self, api): |
| for f in api.functionIterateByOffset(): |
| name = f.dispatch_name() |
| |
| print '\tGL_STUB(gl%s, %d)' % (name, f.offset) |
| |
| if not f.is_static_entry_point(f.name): |
| print '\tHIDDEN(gl%s)' % (name) |
| |
| for f in api.functionIterateByOffset(): |
| name = f.dispatch_name() |
| |
| if f.is_static_entry_point(f.name): |
| for n in f.entry_points: |
| if n != f.name: |
| text = '\tGL_STUB_ALIAS(gl%s, gl%s)' % (n, f.name) |
| |
| if f.has_different_protocol(n): |
| print '#ifndef GLX_INDIRECT_RENDERING' |
| print text |
| print '#endif' |
| else: |
| print text |
| |
| return |
| |
| |
| def show_usage(): |
| print "Usage: %s [-f input_file_name] [-m output_mode]" % sys.argv[0] |
| sys.exit(1) |
| |
| if __name__ == '__main__': |
| file_name = "gl_API.xml" |
| mode = "generic" |
| |
| try: |
| (args, trail) = getopt.getopt(sys.argv[1:], "m:f:") |
| except Exception,e: |
| show_usage() |
| |
| for (arg,val) in args: |
| if arg == '-m': |
| mode = val |
| elif arg == "-f": |
| file_name = val |
| |
| if mode == "generic": |
| printer = PrintGenericStubs() |
| else: |
| print "ERROR: Invalid mode \"%s\" specified." % mode |
| show_usage() |
| |
| api = gl_XML.parse_GL_API(file_name, glX_XML.glx_item_factory()) |
| printer.Print(api) |