summaryrefslogtreecommitdiffstats
path: root/opengl/libagl/fixed_asm.S
blob: 05044f2cd0a7dc103d9f234af776113b347fb8f4 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
/* libs/opengles/fixed_asm.S
**
** Copyright 2006, The Android Open Source Project
**
** Licensed under the Apache License, Version 2.0 (the "License"); 
** you may not use this file except in compliance with the License. 
** You may obtain a copy of the License at 
**
**     http://www.apache.org/licenses/LICENSE-2.0 
**
** Unless required by applicable law or agreed to in writing, software 
** distributed under the License is distributed on an "AS IS" BASIS, 
** WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. 
** See the License for the specific language governing permissions and 
** limitations under the License.
*/


    .text
    .align
    
    .global gglFloatToFixed
    .type gglFloatToFixed, %function
    .global gglFloatToFixedFast
    .type gglFloatToFixedFast, %function


/*
 * Converts a float to a s15.16 fixed-point number.
 * this doesn't handle floats out of the [-32768, +32768[ range
 * and doesn't performs round-to-nearest.
 * however, it's very fast :-)
 */

gglFloatToFixedFast:
        movs    r1, r0, lsl #1          /* remove bit sign */
        mov     r2, #0x8E               /* 127 + 15 */
        sub     r1, r2, r1, lsr #24     /* compute shift */
        mov     r2, r0, lsl #8          /* mantissa<<8 */
        orr     r2, r2, #0x80000000     /* add the missing 1 */
        mov     r0, r2, lsr r1          /* scale to 16.16 */
        rsbcs   r0, r0, #0              /* negate if needed */
        bx      lr

/*
 * this version rounds-to-nearest and saturates numbers
 * outside the range (but not NaNs).
 */

gglFloatToFixed:
        mov     r1, r0, lsl #1          /* remove bit sign */
        mov     r2, #0x8E               /* 127 + 15 */
        subs    r1, r2, r1, lsr #24     /* compute shift */
        bls     0f                      /* too big */
        mov     r2, r0, lsl #8          /* mantissa<<8 */
        orr     r2, r2, #0x80000000     /* add the missing 1 */
        mov     r3, r0
        movs    r0, r2, lsr r1          /* scale to 16.16 */
        addcs   r0, r0, #1              /* round-to-nearest */
        tst     r3, #0x80000000         /* negative? */
        rsbne   r0, r0, #0              /* negate if needed */
        bx      lr 
 
0:      ands    r0, r0, #0x80000000     /* keep only the sign bit */
        moveq   r0, #0x7fffffff         /* positive, maximum value */
        bx      lr