~ubuntu-branches/ubuntu/vivid/mozjs24/vivid

« back to all changes in this revision

Viewing changes to js/src/ctypes/libffi/src/powerpc/linux64_closure.S

  • Committer: Package Import Robot
  • Author(s): Tim Lunn
  • Date: 2014-02-11 21:55:34 UTC
  • Revision ID: package-import@ubuntu.com-20140211215534-m1zyq5aj59md3y07
Tags: upstream-24.2.0
ImportĀ upstreamĀ versionĀ 24.2.0

Show diffs side-by-side

added added

removed removed

Lines of Context:
 
1
/* -----------------------------------------------------------------------
 
2
   sysv.h - Copyright (c) 2003 Jakub Jelinek <jakub@redhat.com>
 
3
            Copyright (c) 2008 Red Hat, Inc.
 
4
 
 
5
   PowerPC64 Assembly glue.
 
6
 
 
7
   Permission is hereby granted, free of charge, to any person obtaining
 
8
   a copy of this software and associated documentation files (the
 
9
   ``Software''), to deal in the Software without restriction, including
 
10
   without limitation the rights to use, copy, modify, merge, publish,
 
11
   distribute, sublicense, and/or sell copies of the Software, and to
 
12
   permit persons to whom the Software is furnished to do so, subject to
 
13
   the following conditions:
 
14
 
 
15
   The above copyright notice and this permission notice shall be included
 
16
   in all copies or substantial portions of the Software.
 
17
 
 
18
   THE SOFTWARE IS PROVIDED ``AS IS'', WITHOUT WARRANTY OF ANY KIND,
 
19
   EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
 
20
   MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
 
21
   NONINFRINGEMENT.  IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
 
22
   HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
 
23
   WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 
24
   OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
 
25
   DEALINGS IN THE SOFTWARE.
 
26
   ----------------------------------------------------------------------- */
 
27
#define LIBFFI_ASM
 
28
#include <fficonfig.h>
 
29
#include <ffi.h>
 
30
 
 
31
        .file   "linux64_closure.S"
 
32
 
 
33
#ifdef __powerpc64__
 
34
        FFI_HIDDEN (ffi_closure_LINUX64)
 
35
        FFI_HIDDEN (.ffi_closure_LINUX64)
 
36
        .globl  ffi_closure_LINUX64, .ffi_closure_LINUX64
 
37
        .section        ".opd","aw"
 
38
        .align  3
 
39
ffi_closure_LINUX64:
 
40
        .quad   .ffi_closure_LINUX64,.TOC.@tocbase,0
 
41
        .size   ffi_closure_LINUX64,24
 
42
        .type   .ffi_closure_LINUX64,@function
 
43
        .text
 
44
.ffi_closure_LINUX64:
 
45
.LFB1:
 
46
        # save general regs into parm save area
 
47
        std     %r3, 48(%r1)
 
48
        std     %r4, 56(%r1)
 
49
        std     %r5, 64(%r1)
 
50
        std     %r6, 72(%r1)
 
51
        mflr    %r0
 
52
 
 
53
        std     %r7, 80(%r1)
 
54
        std     %r8, 88(%r1)
 
55
        std     %r9, 96(%r1)
 
56
        std     %r10, 104(%r1)
 
57
        std     %r0, 16(%r1)
 
58
 
 
59
        # mandatory 48 bytes special reg save area + 64 bytes parm save area
 
60
        # + 16 bytes retval area + 13*8 bytes fpr save area + round to 16
 
61
        stdu    %r1, -240(%r1)
 
62
.LCFI0:
 
63
 
 
64
        # next save fpr 1 to fpr 13
 
65
        stfd  %f1, 128+(0*8)(%r1)
 
66
        stfd  %f2, 128+(1*8)(%r1)
 
67
        stfd  %f3, 128+(2*8)(%r1)
 
68
        stfd  %f4, 128+(3*8)(%r1)
 
69
        stfd  %f5, 128+(4*8)(%r1)
 
70
        stfd  %f6, 128+(5*8)(%r1)
 
71
        stfd  %f7, 128+(6*8)(%r1)
 
72
        stfd  %f8, 128+(7*8)(%r1)
 
73
        stfd  %f9, 128+(8*8)(%r1)
 
74
        stfd  %f10, 128+(9*8)(%r1)
 
75
        stfd  %f11, 128+(10*8)(%r1)
 
76
        stfd  %f12, 128+(11*8)(%r1)
 
77
        stfd  %f13, 128+(12*8)(%r1)
 
78
 
 
79
        # set up registers for the routine that actually does the work
 
80
        # get the context pointer from the trampoline
 
81
        mr %r3, %r11
 
82
 
 
83
        # now load up the pointer to the result storage
 
84
        addi %r4, %r1, 112
 
85
 
 
86
        # now load up the pointer to the parameter save area
 
87
        # in the previous frame
 
88
        addi %r5, %r1, 240 + 48
 
89
 
 
90
        # now load up the pointer to the saved fpr registers */
 
91
        addi %r6, %r1, 128
 
92
 
 
93
        # make the call
 
94
        bl .ffi_closure_helper_LINUX64
 
95
.Lret:
 
96
 
 
97
        # now r3 contains the return type
 
98
        # so use it to look up in a table
 
99
        # so we know how to deal with each type
 
100
 
 
101
        # look up the proper starting point in table
 
102
        # by using return type as offset
 
103
        mflr %r4                # move address of .Lret to r4
 
104
        sldi %r3, %r3, 4        # now multiply return type by 16
 
105
        addi %r4, %r4, .Lret_type0 - .Lret
 
106
        ld %r0, 240+16(%r1)
 
107
        add %r3, %r3, %r4       # add contents of table to table address
 
108
        mtctr %r3
 
109
        bctr                    # jump to it
 
110
 
 
111
# Each of the ret_typeX code fragments has to be exactly 16 bytes long
 
112
# (4 instructions). For cache effectiveness we align to a 16 byte boundary
 
113
# first.
 
114
        .align 4
 
115
 
 
116
.Lret_type0:
 
117
# case FFI_TYPE_VOID
 
118
        mtlr %r0
 
119
        addi %r1, %r1, 240
 
120
        blr
 
121
        nop
 
122
# case FFI_TYPE_INT
 
123
        lwa %r3, 112+4(%r1)
 
124
        mtlr %r0
 
125
        addi %r1, %r1, 240
 
126
        blr
 
127
# case FFI_TYPE_FLOAT
 
128
        lfs %f1, 112+0(%r1)
 
129
        mtlr %r0
 
130
        addi %r1, %r1, 240
 
131
        blr
 
132
# case FFI_TYPE_DOUBLE
 
133
        lfd %f1, 112+0(%r1)
 
134
        mtlr %r0
 
135
        addi %r1, %r1, 240
 
136
        blr
 
137
# case FFI_TYPE_LONGDOUBLE
 
138
        lfd %f1, 112+0(%r1)
 
139
        mtlr %r0
 
140
        lfd %f2, 112+8(%r1)
 
141
        b .Lfinish
 
142
# case FFI_TYPE_UINT8
 
143
        lbz %r3, 112+7(%r1)
 
144
        mtlr %r0
 
145
        addi %r1, %r1, 240
 
146
        blr
 
147
# case FFI_TYPE_SINT8
 
148
        lbz %r3, 112+7(%r1)
 
149
        extsb %r3,%r3
 
150
        mtlr %r0
 
151
        b .Lfinish
 
152
# case FFI_TYPE_UINT16
 
153
        lhz %r3, 112+6(%r1)
 
154
        mtlr %r0
 
155
.Lfinish:
 
156
        addi %r1, %r1, 240
 
157
        blr
 
158
# case FFI_TYPE_SINT16
 
159
        lha %r3, 112+6(%r1)
 
160
        mtlr %r0
 
161
        addi %r1, %r1, 240
 
162
        blr
 
163
# case FFI_TYPE_UINT32
 
164
        lwz %r3, 112+4(%r1)
 
165
        mtlr %r0
 
166
        addi %r1, %r1, 240
 
167
        blr
 
168
# case FFI_TYPE_SINT32
 
169
        lwa %r3, 112+4(%r1)
 
170
        mtlr %r0
 
171
        addi %r1, %r1, 240
 
172
        blr
 
173
# case FFI_TYPE_UINT64
 
174
        ld %r3, 112+0(%r1)
 
175
        mtlr %r0
 
176
        addi %r1, %r1, 240
 
177
        blr
 
178
# case FFI_TYPE_SINT64
 
179
        ld %r3, 112+0(%r1)
 
180
        mtlr %r0
 
181
        addi %r1, %r1, 240
 
182
        blr
 
183
# case FFI_TYPE_STRUCT
 
184
        mtlr %r0
 
185
        addi %r1, %r1, 240
 
186
        blr
 
187
        nop
 
188
# case FFI_TYPE_POINTER
 
189
        ld %r3, 112+0(%r1)
 
190
        mtlr %r0
 
191
        addi %r1, %r1, 240
 
192
        blr
 
193
# esac
 
194
.LFE1:
 
195
        .long   0
 
196
        .byte   0,12,0,1,128,0,0,0
 
197
        .size   .ffi_closure_LINUX64,.-.ffi_closure_LINUX64
 
198
 
 
199
        .section        .eh_frame,EH_FRAME_FLAGS,@progbits
 
200
.Lframe1:
 
201
        .4byte  .LECIE1-.LSCIE1  # Length of Common Information Entry
 
202
.LSCIE1:
 
203
        .4byte  0x0      # CIE Identifier Tag
 
204
        .byte   0x1      # CIE Version
 
205
        .ascii "zR\0"    # CIE Augmentation
 
206
        .uleb128 0x1     # CIE Code Alignment Factor
 
207
        .sleb128 -8      # CIE Data Alignment Factor
 
208
        .byte   0x41     # CIE RA Column
 
209
        .uleb128 0x1     # Augmentation size
 
210
        .byte   0x14     # FDE Encoding (pcrel udata8)
 
211
        .byte   0xc      # DW_CFA_def_cfa
 
212
        .uleb128 0x1
 
213
        .uleb128 0x0
 
214
        .align 3
 
215
.LECIE1:
 
216
.LSFDE1:
 
217
        .4byte  .LEFDE1-.LASFDE1         # FDE Length
 
218
.LASFDE1:
 
219
        .4byte  .LASFDE1-.Lframe1        # FDE CIE offset
 
220
        .8byte  .LFB1-.  # FDE initial location
 
221
        .8byte  .LFE1-.LFB1      # FDE address range
 
222
        .uleb128 0x0     # Augmentation size
 
223
        .byte   0x2      # DW_CFA_advance_loc1
 
224
        .byte   .LCFI0-.LFB1
 
225
        .byte   0xe      # DW_CFA_def_cfa_offset
 
226
        .uleb128 240
 
227
        .byte   0x11     # DW_CFA_offset_extended_sf
 
228
        .uleb128 0x41
 
229
        .sleb128 -2
 
230
        .align 3
 
231
.LEFDE1:
 
232
#endif
 
233
 
 
234
#if defined __ELF__ && defined __linux__
 
235
        .section        .note.GNU-stack,"",@progbits
 
236
#endif