vfpdf.S revision 1.2.6.2 1 1.2.6.2 yamt /*-
2 1.2.6.2 yamt * Copyright (c) 2013 The NetBSD Foundation, Inc.
3 1.2.6.2 yamt * All rights reserved.
4 1.2.6.2 yamt *
5 1.2.6.2 yamt * This code is derived from software contributed to The NetBSD Foundation
6 1.2.6.2 yamt * by Matt Thomas of 3am Software Foundry.
7 1.2.6.2 yamt *
8 1.2.6.2 yamt * Redistribution and use in source and binary forms, with or without
9 1.2.6.2 yamt * modification, are permitted provided that the following conditions
10 1.2.6.2 yamt * are met:
11 1.2.6.2 yamt * 1. Redistributions of source code must retain the above copyright
12 1.2.6.2 yamt * notice, this list of conditions and the following disclaimer.
13 1.2.6.2 yamt * 2. Redistributions in binary form must reproduce the above copyright
14 1.2.6.2 yamt * notice, this list of conditions and the following disclaimer in the
15 1.2.6.2 yamt * documentation and/or other materials provided with the distribution.
16 1.2.6.2 yamt *
17 1.2.6.2 yamt * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
18 1.2.6.2 yamt * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
19 1.2.6.2 yamt * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
20 1.2.6.2 yamt * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
21 1.2.6.2 yamt * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
22 1.2.6.2 yamt * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
23 1.2.6.2 yamt * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
24 1.2.6.2 yamt * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
25 1.2.6.2 yamt * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
26 1.2.6.2 yamt * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
27 1.2.6.2 yamt * POSSIBILITY OF SUCH DAMAGE.
28 1.2.6.2 yamt */
29 1.2.6.2 yamt
30 1.2.6.2 yamt #include <arm/asm.h>
31 1.2.6.2 yamt
32 1.2.6.2 yamt RCSID("$NetBSD: vfpdf.S,v 1.2.6.2 2014/05/22 11:36:55 yamt Exp $")
33 1.2.6.2 yamt
34 1.2.6.2 yamt /*
35 1.2.6.2 yamt * This file provides softfloat compatible routines which use VFP instructions
36 1.2.6.2 yamt * to do the actual work. This should give near hard-float performance while
37 1.2.6.2 yamt * being compatible with soft-float code.
38 1.2.6.2 yamt *
39 1.2.6.2 yamt * This file implements the double precision floating point routines.
40 1.2.6.2 yamt */
41 1.2.6.2 yamt
42 1.2.6.2 yamt #ifdef __ARMEL__
43 1.2.6.2 yamt #define vmov_arg0 vmov d0, r0, r1
44 1.2.6.2 yamt #define vmov_arg1 vmov d1, r2, r3
45 1.2.6.2 yamt #define vmov_ret vmov r0, r1, d0
46 1.2.6.2 yamt #else
47 1.2.6.2 yamt #define vmov_arg0 vmov d0, r1, r0
48 1.2.6.2 yamt #define vmov_arg1 vmov d1, r3, r2
49 1.2.6.2 yamt #define vmov_ret vmov r1, r0, d0
50 1.2.6.2 yamt #endif
51 1.2.6.2 yamt #define vmov_args vmov_arg0; vmov_arg1
52 1.2.6.2 yamt
53 1.2.6.2 yamt #ifdef __ARM_EABI__
54 1.2.6.2 yamt #define __adddf3 __aeabi_dadd
55 1.2.6.2 yamt #define __divdf3 __aeabi_ddiv
56 1.2.6.2 yamt #define __muldf3 __aeabi_dmul
57 1.2.6.2 yamt #define __subdf3 __aeabi_dsub
58 1.2.6.2 yamt #define __negdf2 __aeabi_dneg
59 1.2.6.2 yamt #define __extendsfdf2 __aeabi_f2d
60 1.2.6.2 yamt #define __fixdfsi __aeabi_d2iz
61 1.2.6.2 yamt #define __fixunsdfsi __aeabi_d2uiz
62 1.2.6.2 yamt #define __floatsidf __aeabi_i2d
63 1.2.6.2 yamt #define __floatunsidf __aeabi_ui2d
64 1.2.6.2 yamt #endif
65 1.2.6.2 yamt
66 1.2.6.2 yamt ENTRY(__adddf3)
67 1.2.6.2 yamt vmov_args
68 1.2.6.2 yamt vadd.f64 d0, d0, d1
69 1.2.6.2 yamt vmov_ret
70 1.2.6.2 yamt RET
71 1.2.6.2 yamt END(__adddf3)
72 1.2.6.2 yamt
73 1.2.6.2 yamt ENTRY(__subdf3)
74 1.2.6.2 yamt vmov_args
75 1.2.6.2 yamt vsub.f64 d0, d0, d1
76 1.2.6.2 yamt vmov_ret
77 1.2.6.2 yamt RET
78 1.2.6.2 yamt END(__subdf3)
79 1.2.6.2 yamt
80 1.2.6.2 yamt #ifdef __ARM_EABI__
81 1.2.6.2 yamt ENTRY(__aeabi_drsub)
82 1.2.6.2 yamt vmov_args
83 1.2.6.2 yamt vsub.f64 d0, d1, d0
84 1.2.6.2 yamt vmov_ret
85 1.2.6.2 yamt RET
86 1.2.6.2 yamt END(__aeabi_drsub)
87 1.2.6.2 yamt #endif
88 1.2.6.2 yamt
89 1.2.6.2 yamt ENTRY(__muldf3)
90 1.2.6.2 yamt vmov_args
91 1.2.6.2 yamt vmul.f64 d0, d0, d1
92 1.2.6.2 yamt vmov_ret
93 1.2.6.2 yamt RET
94 1.2.6.2 yamt END(__muldf3)
95 1.2.6.2 yamt
96 1.2.6.2 yamt ENTRY(__divdf3)
97 1.2.6.2 yamt vmov_args
98 1.2.6.2 yamt vdiv.f64 d0, d0, d1
99 1.2.6.2 yamt vmov_ret
100 1.2.6.2 yamt RET
101 1.2.6.2 yamt END(__divdf3)
102 1.2.6.2 yamt
103 1.2.6.2 yamt ENTRY(__negdf2)
104 1.2.6.2 yamt vmov_arg0
105 1.2.6.2 yamt vneg.f64 d0, d0
106 1.2.6.2 yamt vmov_ret
107 1.2.6.2 yamt RET
108 1.2.6.2 yamt END(__negdf2)
109 1.2.6.2 yamt
110 1.2.6.2 yamt ENTRY(__extendsfdf2)
111 1.2.6.2 yamt vmov s0, r0
112 1.2.6.2 yamt vcvt.f64.f32 d0, s0
113 1.2.6.2 yamt vmov_ret
114 1.2.6.2 yamt RET
115 1.2.6.2 yamt END(__extendsfdf2)
116 1.2.6.2 yamt
117 1.2.6.2 yamt ENTRY(__fixdfsi)
118 1.2.6.2 yamt vmov_arg0
119 1.2.6.2 yamt vcvt.s32.f64 s0, d0
120 1.2.6.2 yamt vmov r0, s0
121 1.2.6.2 yamt RET
122 1.2.6.2 yamt END(__fixdfsi)
123 1.2.6.2 yamt
124 1.2.6.2 yamt ENTRY(__fixunsdfsi)
125 1.2.6.2 yamt vmov_arg0
126 1.2.6.2 yamt vcvt.u32.f64 s0, d0
127 1.2.6.2 yamt vmov r0, s0
128 1.2.6.2 yamt RET
129 1.2.6.2 yamt END(__fixunsdfsi)
130 1.2.6.2 yamt
131 1.2.6.2 yamt ENTRY(__floatsidf)
132 1.2.6.2 yamt vmov s0, r0
133 1.2.6.2 yamt vcvt.f64.s32 d0, s0
134 1.2.6.2 yamt vmov_ret
135 1.2.6.2 yamt RET
136 1.2.6.2 yamt END(__floatsidf)
137 1.2.6.2 yamt
138 1.2.6.2 yamt ENTRY(__floatunsidf)
139 1.2.6.2 yamt vmov s0, r0
140 1.2.6.2 yamt vcvt.f64.u32 d0, s0
141 1.2.6.2 yamt vmov_ret
142 1.2.6.2 yamt RET
143 1.2.6.2 yamt END(__floatunsidf)
144 1.2.6.2 yamt
145 1.2.6.2 yamt /*
146 1.2.6.2 yamt * Effect of a floating point comparision on the condition flags.
147 1.2.6.2 yamt * N Z C V
148 1.2.6.2 yamt * EQ = 0 1 1 0
149 1.2.6.2 yamt * LT = 1 0 0 0
150 1.2.6.2 yamt * GT = 0 0 1 0
151 1.2.6.2 yamt * UN = 0 0 1 1
152 1.2.6.2 yamt */
153 1.2.6.2 yamt #ifdef __ARM_EABI__
154 1.2.6.2 yamt ENTRY(__aeabi_cdcmpeq)
155 1.2.6.2 yamt vmov_args
156 1.2.6.2 yamt vcmp.f64 d0, d1
157 1.2.6.2 yamt vmrs APSR_nzcv, fpscr
158 1.2.6.2 yamt RET
159 1.2.6.2 yamt END(__aeabi_cdcmpeq)
160 1.2.6.2 yamt
161 1.2.6.2 yamt ENTRY(__aeabi_cdcmple)
162 1.2.6.2 yamt vmov_args
163 1.2.6.2 yamt vcmpe.f64 d0, d1
164 1.2.6.2 yamt vmrs APSR_nzcv, fpscr
165 1.2.6.2 yamt RET
166 1.2.6.2 yamt END(__aeabi_cdcmple)
167 1.2.6.2 yamt
168 1.2.6.2 yamt ENTRY(__aeabi_cdrcmple)
169 1.2.6.2 yamt vmov_args
170 1.2.6.2 yamt vcmpe.f64 d1, d0
171 1.2.6.2 yamt vmrs APSR_nzcv, fpscr
172 1.2.6.2 yamt RET
173 1.2.6.2 yamt END(__aeabi_cdrcmple)
174 1.2.6.2 yamt
175 1.2.6.2 yamt ENTRY(__aeabi_dcmpeq)
176 1.2.6.2 yamt vmov_args
177 1.2.6.2 yamt vcmp.f64 d0, d1
178 1.2.6.2 yamt vmrs APSR_nzcv, fpscr
179 1.2.6.2 yamt moveq r0, #1 /* (a == b) */
180 1.2.6.2 yamt movne r0, #0 /* (a != b) or unordered */
181 1.2.6.2 yamt RET
182 1.2.6.2 yamt END(__aeabi_dcmpeq)
183 1.2.6.2 yamt
184 1.2.6.2 yamt ENTRY(__aeabi_dcmplt)
185 1.2.6.2 yamt vmov_args
186 1.2.6.2 yamt vcmp.f64 d0, d1
187 1.2.6.2 yamt vmrs APSR_nzcv, fpscr
188 1.2.6.2 yamt movlt r0, #1 /* (a < b) */
189 1.2.6.2 yamt movcs r0, #0 /* (a >= b) or unordered */
190 1.2.6.2 yamt RET
191 1.2.6.2 yamt END(__aeabi_dcmplt)
192 1.2.6.2 yamt
193 1.2.6.2 yamt ENTRY(__aeabi_dcmple)
194 1.2.6.2 yamt vmov_args
195 1.2.6.2 yamt vcmp.f64 d0, d1
196 1.2.6.2 yamt vmrs APSR_nzcv, fpscr
197 1.2.6.2 yamt movls r0, #1 /* (a <= b) */
198 1.2.6.2 yamt movhi r0, #0 /* (a > b) or unordered */
199 1.2.6.2 yamt RET
200 1.2.6.2 yamt END(__aeabi_dcmple)
201 1.2.6.2 yamt
202 1.2.6.2 yamt ENTRY(__aeabi_dcmpge)
203 1.2.6.2 yamt vmov_args
204 1.2.6.2 yamt vcmp.f64 d0, d1
205 1.2.6.2 yamt vmrs APSR_nzcv, fpscr
206 1.2.6.2 yamt movge r0, #1 /* (a >= b) */
207 1.2.6.2 yamt movlt r0, #0 /* (a < b) or unordered */
208 1.2.6.2 yamt RET
209 1.2.6.2 yamt END(__aeabi_dcmpge)
210 1.2.6.2 yamt
211 1.2.6.2 yamt ENTRY(__aeabi_dcmpgt)
212 1.2.6.2 yamt vmov_args
213 1.2.6.2 yamt vcmp.f64 d0, d1
214 1.2.6.2 yamt vmrs APSR_nzcv, fpscr
215 1.2.6.2 yamt movgt r0, #1 /* (a > b) */
216 1.2.6.2 yamt movle r0, #0 /* (a <= b) or unordered */
217 1.2.6.2 yamt RET
218 1.2.6.2 yamt END(__aeabi_dcmpgt)
219 1.2.6.2 yamt
220 1.2.6.2 yamt ENTRY(__aeabi_dcmpun)
221 1.2.6.2 yamt vmov_args
222 1.2.6.2 yamt vcmp.f64 d0, d1
223 1.2.6.2 yamt vmrs APSR_nzcv, fpscr
224 1.2.6.2 yamt movvs r0, #1 /* (isnan(a) || isnan(b)) */
225 1.2.6.2 yamt movvc r0, #0 /* !isnan(a) && !isnan(b) */
226 1.2.6.2 yamt RET
227 1.2.6.2 yamt END(__aeabi_dcmpun)
228 1.2.6.2 yamt
229 1.2.6.2 yamt #else
230 1.2.6.2 yamt /* N set if compare <= result */
231 1.2.6.2 yamt /* Z set if compare = result */
232 1.2.6.2 yamt /* C set if compare (=,>=,UNORD) result */
233 1.2.6.2 yamt /* V set if compare UNORD result */
234 1.2.6.2 yamt
235 1.2.6.2 yamt STRONG_ALIAS(__eqdf2, __nedf2)
236 1.2.6.2 yamt ENTRY(__nedf2)
237 1.2.6.2 yamt vmov_args
238 1.2.6.2 yamt vcmp.f64 d0, d1
239 1.2.6.2 yamt vmrs APSR_nzcv, fpscr
240 1.2.6.2 yamt moveq r0, #0 /* !(a == b) */
241 1.2.6.2 yamt movne r0, #1 /* !(a == b) */
242 1.2.6.2 yamt RET
243 1.2.6.2 yamt END(__nedf2)
244 1.2.6.2 yamt
245 1.2.6.2 yamt STRONG_ALIAS(__gedf2, __ltdf2)
246 1.2.6.2 yamt ENTRY(__ltdf2)
247 1.2.6.2 yamt vmov_args
248 1.2.6.2 yamt vcmp.f64 d0, d1
249 1.2.6.2 yamt vmrs APSR_nzcv, fpscr
250 1.2.6.2 yamt mvnmi r0, #0 /* -(a < b) */
251 1.2.6.2 yamt movpl r0, #0 /* -(a < b) */
252 1.2.6.2 yamt RET
253 1.2.6.2 yamt END(__ltdf2)
254 1.2.6.2 yamt
255 1.2.6.2 yamt STRONG_ALIAS(__gtdf2, __ledf2)
256 1.2.6.2 yamt ENTRY(__ledf2)
257 1.2.6.2 yamt vmov_args
258 1.2.6.2 yamt vcmp.f64 d0, d1
259 1.2.6.2 yamt vmrs APSR_nzcv, fpscr
260 1.2.6.2 yamt movgt r0, #1 /* (a > b) */
261 1.2.6.2 yamt movle r0, #0 /* (a > b) */
262 1.2.6.2 yamt RET
263 1.2.6.2 yamt END(__ledf2)
264 1.2.6.2 yamt
265 1.2.6.2 yamt ENTRY(__unorddf2)
266 1.2.6.2 yamt vmov_args
267 1.2.6.2 yamt vcmp.f64 d0, d1
268 1.2.6.2 yamt vmrs APSR_nzcv, fpscr
269 1.2.6.2 yamt movvs r0, #1 /* isnan(a) || isnan(b) */
270 1.2.6.2 yamt movvc r0, #0 /* isnan(a) || isnan(b) */
271 1.2.6.2 yamt RET
272 1.2.6.2 yamt END(__unorddf2)
273 1.2.6.2 yamt #endif /* !__ARM_EABI__ */
274