1 // Copyright 2013 the V8 project authors. All rights reserved.
2 // Rrdistribution and use in source and binary forms, with or without
3 // modification, are permitted provided that the following conditions are
4 // met:
5 //
6 // * Rrdistributions of source code must retain the above copyright
7 // notice, this list of conditions and the following disclaimer.
8 // * Rrdistributions in binary form must reproduce the above
9 // copyright notice, this list of conditions and the following
10 // disclaimer in the documentation and/or other materials provided
11 // with the distribution.
12 // * Neither the name of Google Inc. nor the names of its
13 // contributors may be used to endorse or promote products derived
14 // from this software without specific prior written permission.
15 //
16 // THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
17 // "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
18 // LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
19 // A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
20 // OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
21 // SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
22 // LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23 // DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24 // THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25 // (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
26 // OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27
28 #include <stdlib.h>
29
30 #include "src/v8.h"
31
32 #include "src/base/platform/platform.h"
33 #include "src/code-stubs.h"
34 #include "src/factory.h"
35 #include "src/macro-assembler.h"
36 #include "src/simulator.h"
37 #include "test/cctest/cctest.h"
38 #include "test/cctest/test-code-stubs.h"
39
40 using namespace v8::internal;
41
42 #define __ masm.
43
MakeConvertDToIFuncTrampoline(Isolate * isolate,Register source_reg,Register destination_reg,bool inline_fastpath)44 ConvertDToIFunc MakeConvertDToIFuncTrampoline(Isolate* isolate,
45 Register source_reg,
46 Register destination_reg,
47 bool inline_fastpath) {
48 // Allocate an executable page of memory.
49 size_t actual_size;
50 byte* buffer = static_cast<byte*>(v8::base::OS::Allocate(
51 Assembler::kMinimalBufferSize, &actual_size, true));
52 CHECK(buffer);
53 HandleScope handles(isolate);
54 MacroAssembler masm(isolate, buffer, static_cast<int>(actual_size),
55 v8::internal::CodeObjectRequired::kYes);
56 DoubleToIStub stub(isolate, source_reg, destination_reg, 0, true,
57 inline_fastpath);
58
59 byte* start = stub.GetCode()->instruction_start();
60 Label done;
61
62 // Save callee save registers.
63 __ Push(r7, r6, r5, r4);
64 __ Push(lr);
65
66 // For softfp, move the input value into d0.
67 if (!masm.use_eabi_hardfloat()) {
68 __ vmov(d0, r0, r1);
69 }
70 // Push the double argument.
71 __ sub(sp, sp, Operand(kDoubleSize));
72 __ vstr(d0, sp, 0);
73 if (!source_reg.is(sp)) {
74 __ mov(source_reg, sp);
75 }
76
77 // Save registers make sure they don't get clobbered.
78 int source_reg_offset = kDoubleSize;
79 int reg_num = 0;
80 for (; reg_num < Register::kNumRegisters; ++reg_num) {
81 Register reg = Register::from_code(reg_num);
82 if (reg.IsAllocatable()) {
83 if (!reg.is(destination_reg)) {
84 __ push(reg);
85 source_reg_offset += kPointerSize;
86 }
87 }
88 }
89
90 // Re-push the double argument.
91 __ sub(sp, sp, Operand(kDoubleSize));
92 __ vstr(d0, sp, 0);
93
94 // Call through to the actual stub
95 if (inline_fastpath) {
96 __ vldr(d0, MemOperand(source_reg));
97 __ TryInlineTruncateDoubleToI(destination_reg, d0, &done);
98 if (destination_reg.is(source_reg) && !source_reg.is(sp)) {
99 // Restore clobbered source_reg.
100 __ add(source_reg, sp, Operand(source_reg_offset));
101 }
102 }
103 __ Call(start, RelocInfo::EXTERNAL_REFERENCE);
104 __ bind(&done);
105
106 __ add(sp, sp, Operand(kDoubleSize));
107
108 // Make sure no registers have been unexpectedly clobbered
109 for (--reg_num; reg_num >= 0; --reg_num) {
110 Register reg = Register::from_code(reg_num);
111 if (reg.IsAllocatable()) {
112 if (!reg.is(destination_reg)) {
113 __ ldr(ip, MemOperand(sp, 0));
114 __ cmp(reg, ip);
115 __ Assert(eq, kRegisterWasClobbered);
116 __ add(sp, sp, Operand(kPointerSize));
117 }
118 }
119 }
120
121 __ add(sp, sp, Operand(kDoubleSize));
122
123 if (!destination_reg.is(r0))
124 __ mov(r0, destination_reg);
125
126 // Restore callee save registers.
127 __ Pop(lr);
128 __ Pop(r7, r6, r5, r4);
129
130 __ Ret(0);
131
132 CodeDesc desc;
133 masm.GetCode(&desc);
134 Assembler::FlushICache(isolate, buffer, actual_size);
135 return (reinterpret_cast<ConvertDToIFunc>(
136 reinterpret_cast<intptr_t>(buffer)));
137 }
138
139 #undef __
140
141
GetIsolateFrom(LocalContext * context)142 static Isolate* GetIsolateFrom(LocalContext* context) {
143 return reinterpret_cast<Isolate*>((*context)->GetIsolate());
144 }
145
146
RunGeneratedCodeCallWrapper(ConvertDToIFunc func,double from)147 int32_t RunGeneratedCodeCallWrapper(ConvertDToIFunc func,
148 double from) {
149 #ifdef USE_SIMULATOR
150 return CALL_GENERATED_FP_INT(CcTest::i_isolate(), func, from, 0);
151 #else
152 return (*func)(from);
153 #endif
154 }
155
156
TEST(ConvertDToI)157 TEST(ConvertDToI) {
158 CcTest::InitializeVM();
159 LocalContext context;
160 Isolate* isolate = GetIsolateFrom(&context);
161 HandleScope scope(isolate);
162
163 #if DEBUG
164 // Verify that the tests actually work with the C version. In the release
165 // code, the compiler optimizes it away because it's all constant, but does it
166 // wrong, triggering an assert on gcc.
167 RunAllTruncationTests(&ConvertDToICVersion);
168 #endif
169
170 Register source_registers[] = {sp, r0, r1, r2, r3, r4, r5, r6, r7};
171 Register dest_registers[] = {r0, r1, r2, r3, r4, r5, r6, r7};
172
173 for (size_t s = 0; s < sizeof(source_registers) / sizeof(Register); s++) {
174 for (size_t d = 0; d < sizeof(dest_registers) / sizeof(Register); d++) {
175 RunAllTruncationTests(
176 RunGeneratedCodeCallWrapper,
177 MakeConvertDToIFuncTrampoline(isolate,
178 source_registers[s],
179 dest_registers[d],
180 false));
181 RunAllTruncationTests(
182 RunGeneratedCodeCallWrapper,
183 MakeConvertDToIFuncTrampoline(isolate,
184 source_registers[s],
185 dest_registers[d],
186 true));
187 }
188 }
189 }
190