1   /* Copyright (C) 2008 The Android Open Source Project
2    *
3    * Licensed under the Apache License, Version 2.0 (the "License");
4    * you may not use this file except in compliance with the License.
5    * You may obtain a copy of the License at
6    *
7    * http://www.apache.org/licenses/LICENSE-2.0
8    *
9    * Unless required by applicable law or agreed to in writing, software
10    * distributed under the License is distributed on an "AS IS" BASIS,
11    * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
12    * See the License for the specific language governing permissions and
13    * limitations under the License.
14    */
15
16   /*
17    * File: OP_FLOAT_TO_LONG.S
18    *
19    * Code: Converts a float to a long. Uses no substitutions.
20    *
21    * For: float-to-long
22    *
23    * Description: Convert the float in source register to a long
24    *              and store the result in the destintation register
25    *
26    * Format: B|A|op (12x)
27    *
28    * Syntax: op vA, vB
29    */
30
31    movl        rINST, %edx             # %edx<- BA
32    shr         $$4, rINST              # rINST<- B
33    and         $$15, %edx              # %edx<- A
34    flds        (rFP, rINST, 4)         # push vB to floating point stack
35    fildll      .LvaluePosInfLong       # push max int value
36    fildll      .LvalueNegInfLong       # push min int value
37    fucomip     %st(2), %st(0)          # check for negInf
38    jae         .L${opcode}_negInf      # handle negInf
39    fucomip     %st(1), %st(0)          # check for posInf or NaN
40    jc          .L${opcode}_nanInf      # handle posInf or NaN
41    jmp         .L${opcode}_break       # do conversion
42%break
43
44.L${opcode}_break:
45    fnstcw      -2(%esp)                # save control word
46    orl         $$0xc00, -2(%esp)       # update control
47    fldcw       -2(%esp)                # load control word
48    xorl        $$0xc00, -2(%esp)       # reset control
49    fistpll     (rFP, %edx, 4)          # move converted int
50    fldcw       -2(%esp)                # load saved control word
51    FINISH      1                       # jump to next instruction
52
53.L${opcode}_nanInf:
54    jnp         .L${opcode}_posInf
55    fstpl       (rFP, %edx, 4)          # move converted int
56    movq        .LvalueNanLong, %xmm0   # %xmm0<- NaN
57    movq        %xmm0,  (rFP, %edx, 4)  # vA<- %xmm0; NaN
58    FINISH      1                       # jump to next instruction
59
60.L${opcode}_posInf:
61    fstpl       (rFP, %edx, 4)          # move converted int
62    movq        .LvaluePosInfLong, %xmm0 # %xmm0<- posInf
63    movq        %xmm0, (rFP, %edx, 4)   # vA<- %xmm0; posInf
64    FINISH      1                       # jump to next instruction
65
66.L${opcode}_negInf:
67    fstpl       (rFP, %edx, 4)          # move converted int
68    movq        .LvalueNegInfLong, %xmm0 # %xmm0<- negInf
69    fstpl       (rFP, %edx, 4)          # move converted int
70    movq        %xmm0, (rFP, %edx, 4)   # vA<- %xmm0; negInf
71    FINISH      1                       # jump to next instruction
72
73
74