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