Home | History | Annotate | Line # | Download | only in libc_vfp
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