33943bce9340ec3f87d9aeee7531064801840abf
3 # (C) Copyright IBM Corporation 2005
6 # Permission is hereby granted, free of charge, to any person obtaining a
7 # copy of this software and associated documentation files (the "Software"),
8 # to deal in the Software without restriction, including without limitation
9 # on the rights to use, copy, modify, merge, publish, distribute, sub
10 # license, and/or sell copies of the Software, and to permit persons to whom
11 # the Software is furnished to do so, subject to the following conditions:
13 # The above copyright notice and this permission notice (including the next
14 # paragraph) shall be included in all copies or substantial portions of the
17 # THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
18 # IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
19 # FITNESS FOR A PARTICULAR PURPOSE AND NON-INFRINGEMENT. IN NO EVENT SHALL
20 # IBM AND/OR ITS SUPPLIERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
21 # LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
22 # FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS
26 # Ian Romanick <idr@us.ibm.com>
28 import gl_XML
, license
29 import sys
, getopt
, copy
31 def should_use_push(registers
):
32 for [reg
, offset
] in registers
:
40 def local_size(registers
):
41 # The x86-64 ABI says "the value (%rsp - 8) is always a multiple of
42 # 16 when control is transfered to the function entry point." This
43 # means that the local stack usage must be (16*N)+8 for some value
44 # of N. (16*N)+8 = (8*(2N))+8 = 8*(2N+1). As long as N is odd, we
45 # meet this requirement.
47 N
= (len(registers
) |
1)
51 def save_all_regs(registers
):
53 if not should_use_push(registers
):
54 adjust_stack
= local_size(registers
)
55 print '\tsubq\t$%u, %%rsp' % (adjust_stack
)
57 for [reg
, stack_offset
] in registers
:
58 save_reg( reg
, stack_offset
, adjust_stack
)
62 def restore_all_regs(registers
):
64 if not should_use_push(registers
):
65 adjust_stack
= local_size(registers
)
67 temp
= copy
.deepcopy(registers
)
69 [reg
, stack_offset
] = temp
.pop()
70 restore_reg(reg
, stack_offset
, adjust_stack
)
73 print '\taddq\t$%u, %%rsp' % (adjust_stack
)
77 def save_reg(reg
, offset
, use_move
):
80 print '\tmovq\t%s, (%%rsp)' % (reg
)
82 print '\tmovq\t%s, %u(%%rsp)' % (reg
, offset
)
84 print '\tpushq\t%s' % (reg
)
89 def restore_reg(reg
, offset
, use_move
):
92 print '\tmovq\t(%%rsp), %s' % (reg
)
94 print '\tmovq\t%u(%%rsp), %s' % (offset
, reg
)
96 print '\tpopq\t%s' % (reg
)
101 class PrintGenericStubs(gl_XML
.gl_print_base
):
104 gl_XML
.gl_print_base
.__init
__(self
)
106 self
.name
= "gl_x86-64_asm.py (from Mesa)"
107 self
.license
= license
.bsd_license_template
% ("(C) Copyright IBM Corporation 2005", "IBM")
111 def get_stack_size(self
, f
):
113 for p
in f
.parameterIterator():
114 size
+= p
.get_stack_size()
119 def printRealHeader(self
):
120 print "/* If we build with gcc's -fvisibility=hidden flag, we'll need to change"
121 print " * the symbol visibility mode to 'default'."
124 print '#include "../x86/assyntax.h"'
126 print '#if defined(__GNUC__) && (__GNUC__ * 100 + __GNUC_MINOR__) >= 303'
127 print '# pragma GCC visibility push(default)'
128 print '# define HIDDEN(x) .hidden x'
130 print '# define HIDDEN(x)'
133 print '# if defined(USE_MGL_NAMESPACE)'
134 print '# define GL_PREFIX(n) GLNAME(CONCAT(mgl,n))'
136 print '# define GL_PREFIX(n) GLNAME(CONCAT(gl,n))'
139 print '#if defined(PTHREADS) || defined(USE_XTHREADS) || defined(SOLARIS_THREADS) || defined(WIN32_THREADS) || defined(BEOS_THREADS)'
140 print '# define THREADS'
145 print '#ifdef GLX_USE_TLS'
147 print '\t.globl _x86_64_get_get_dispatch; HIDDEN(_x86_64_get_get_dispatch)'
148 print '_x86_64_get_get_dispatch:'
149 print '\tlea\t_x86_64_get_dispatch(%rip), %rax'
152 print '\t.p2align\t4,,15'
153 print '_x86_64_get_dispatch:'
154 print '\tmovq\t_glapi_tls_Dispatch@GOTTPOFF(%rip), %rax'
155 print '\tmovq\t%fs:(%rax), %rax'
157 print '\t.size\t_x86_64_get_dispatch, .-_x86_64_get_dispatch'
159 print '#elif defined(PTHREADS)'
161 print '\t.extern\t_glapi_Dispatch'
162 print '\t.extern\t_gl_DispatchTSD'
163 print '\t.extern\tpthread_getspecific'
165 print '\t.p2align\t4,,15'
166 print '_x86_64_get_dispatch:'
167 print '\tmovq\t_gl_DispatchTSD(%rip), %rdi'
168 print '\tjmp\tpthread_getspecific@PLT'
170 print '#elif defined(THREADS)'
172 print '\t.extern\t_glapi_get_dispatch'
179 def printRealFooter(self
):
181 print '#if defined(GLX_USE_TLS) && defined(__linux__)'
182 print ' .section ".note.ABI-tag", "a"'
184 print ' .long 1f - 0f /* name length */'
185 print ' .long 3f - 2f /* data length */'
186 print ' .long 1 /* note length */'
187 print '0: .asciz "GNU" /* vendor name */'
188 print '1: .p2align 2'
189 print '2: .long 0 /* note data: the ABI tag */'
190 print ' .long 2,4,20 /* Minimum kernel version w/TLS */'
191 print '3: .p2align 2 /* pad out section */'
192 print '#endif /* GLX_USE_TLS */'
194 print '#if defined (__ELF__) && defined (__linux__)'
195 print ' .section .note.GNU-stack,"",%progbits'
200 def printFunction(self
, f
):
202 # The x86-64 ABI divides function parameters into a couple
203 # classes. For the OpenGL interface, the only ones that are
204 # relevent are INTEGER and SSE. Basically, the first 8
205 # GLfloat or GLdouble parameters are placed in %xmm0 - %xmm7,
206 # the first 6 non-GLfloat / non-GLdouble parameters are placed
207 # in registers listed in int_parameters.
209 # If more parameters than that are required, they are passed
210 # on the stack. Therefore, we just have to make sure that
211 # %esp hasn't changed when we jump to the actual function.
212 # Since we're jumping to the function (and not calling it), we
213 # have to make sure of that anyway!
215 int_parameters
= ["%rdi", "%rsi", "%rdx", "%rcx", "%r8", "%r9"]
221 for p
in f
.parameterIterator():
222 type_name
= p
.get_base_type_string()
224 if p
.is_pointer() or (type_name
!= "GLfloat" and type_name
!= "GLdouble"):
226 registers
.append( [int_parameters
[int_class
], stack_offset
] )
231 registers
.append( ["%%xmm%u" % (sse_class
), stack_offset
] )
235 if ((int_class
& 1) == 0) and (sse_class
== 0):
236 registers
.append( ["%rbp", 0] )
239 if f
.is_static_entry_point(f
.name
):
242 name
= "_dispatch_stub_%u" % (f
.offset
)
244 print '\t.p2align\t4,,15'
245 print '\t.globl\tGL_PREFIX(%s)' % (name
)
246 print '\t.type\tGL_PREFIX(%s), @function' % (name
)
247 if not f
.is_static_entry_point(f
.name
):
248 print '\tHIDDEN(GL_PREFIX(%s))' % (name
)
249 print 'GL_PREFIX(%s):' % (name
)
250 print '#if defined(GLX_USE_TLS)'
251 print '\tcall\t_x86_64_get_dispatch@PLT'
252 print '\tmovq\t%u(%%rax), %%r11' % (f
.offset
* 8)
254 print '#elif defined(PTHREADS)'
256 save_all_regs(registers
)
257 print '\tcall\t_x86_64_get_dispatch@PLT'
258 restore_all_regs(registers
)
261 print '\tmovq\t(%rax), %r11'
263 print '\tmovq\t%u(%%rax), %%r11' % (f
.offset
* 8)
268 print '\tmovq\t_glapi_Dispatch(%rip), %rax'
269 print '\ttestq\t%rax, %rax'
271 print '\tmovq\t%u(%%rax), %%r11' % (f
.offset
* 8)
275 save_all_regs(registers
)
276 print '\tcall\t_glapi_get_dispatch'
277 restore_all_regs(registers
)
279 print '\tmovq\t%u(%%rax), %%r11' % (f
.offset
* 8)
281 print '#endif /* defined(GLX_USE_TLS) */'
283 print '\t.size\tGL_PREFIX(%s), .-GL_PREFIX(%s)' % (name
, name
)
288 def printBody(self
, api
):
289 for f
in api
.functionIterateByOffset():
290 self
.printFunction(f
)
293 for f
in api
.functionIterateByOffset():
294 for n
in f
.entry_points
:
296 if f
.is_static_entry_point(n
):
297 print '\t.globl GL_PREFIX(%s) ; .set GL_PREFIX(%s), GL_PREFIX(%s)' % (n
, n
, f
.name
)
302 print "Usage: %s [-f input_file_name] [-m output_mode]" % sys
.argv
[0]
305 if __name__
== '__main__':
306 file_name
= "gl_API.xml"
310 (args
, trail
) = getopt
.getopt(sys
.argv
[1:], "m:f:")
314 for (arg
,val
) in args
:
320 if mode
== "generic":
321 printer
= PrintGenericStubs()
323 print "ERROR: Invalid mode \"%s\" specified." % mode
326 api
= gl_XML
.parse_GL_API( file_name
)