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 = 4 * Assembler::kMinimalBufferSize;
50 byte* buffer = static_cast<byte*>(
51 v8::base::OS::Allocate(actual_size, &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 __ SetStackPointer(csp);
63 __ PushCalleeSavedRegisters();
64 __ Mov(jssp, csp);
65 __ SetStackPointer(jssp);
66
67 // Push the double argument.
68 __ Push(d0);
69 __ Mov(source_reg, jssp);
70
71 MacroAssembler::PushPopQueue queue(&masm);
72
73 // Save registers make sure they don't get clobbered.
74 int source_reg_offset = kDoubleSize;
75 int reg_num = 0;
76 for (; reg_num < Register::kNumRegisters; ++reg_num) {
77 if (RegisterConfiguration::Crankshaft()->IsAllocatableGeneralCode(
78 reg_num)) {
79 Register reg = Register::from_code(reg_num);
80 if (!reg.is(destination_reg)) {
81 queue.Queue(reg);
82 source_reg_offset += kPointerSize;
83 }
84 }
85 }
86 // Re-push the double argument.
87 queue.Queue(d0);
88
89 queue.PushQueued();
90
91 // Call through to the actual stub
92 if (inline_fastpath) {
93 __ Ldr(d0, MemOperand(source_reg));
94 __ TryConvertDoubleToInt64(destination_reg, d0, &done);
95 if (destination_reg.is(source_reg)) {
96 // Restore clobbered source_reg.
97 __ add(source_reg, jssp, Operand(source_reg_offset));
98 }
99 }
100 __ Call(start, RelocInfo::EXTERNAL_REFERENCE);
101 __ bind(&done);
102
103 __ Drop(1, kDoubleSize);
104
105 // // Make sure no registers have been unexpectedly clobbered
106 for (--reg_num; reg_num >= 0; --reg_num) {
107 if (RegisterConfiguration::Crankshaft()->IsAllocatableGeneralCode(
108 reg_num)) {
109 Register reg = Register::from_code(reg_num);
110 if (!reg.is(destination_reg)) {
111 __ Pop(ip0);
112 __ cmp(reg, ip0);
113 __ Assert(eq, kRegisterWasClobbered);
114 }
115 }
116 }
117
118 __ Drop(1, kDoubleSize);
119
120 if (!destination_reg.is(x0))
121 __ Mov(x0, destination_reg);
122
123 // Restore callee save registers.
124 __ Mov(csp, jssp);
125 __ SetStackPointer(csp);
126 __ PopCalleeSavedRegisters();
127
128 __ Ret();
129
130 CodeDesc desc;
131 masm.GetCode(&desc);
132 Assembler::FlushICache(isolate, buffer, actual_size);
133 return (reinterpret_cast<ConvertDToIFunc>(
134 reinterpret_cast<intptr_t>(buffer)));
135 }
136
137 #undef __
138
139
GetIsolateFrom(LocalContext * context)140 static Isolate* GetIsolateFrom(LocalContext* context) {
141 return reinterpret_cast<Isolate*>((*context)->GetIsolate());
142 }
143
144
RunGeneratedCodeCallWrapper(ConvertDToIFunc func,double from)145 int32_t RunGeneratedCodeCallWrapper(ConvertDToIFunc func,
146 double from) {
147 #ifdef USE_SIMULATOR
148 Simulator::CallArgument args[] = {
149 Simulator::CallArgument(from),
150 Simulator::CallArgument::End()
151 };
152 return static_cast<int32_t>(Simulator::current(CcTest::i_isolate())
153 ->CallInt64(FUNCTION_ADDR(func), args));
154 #else
155 return (*func)(from);
156 #endif
157 }
158
159
TEST(ConvertDToI)160 TEST(ConvertDToI) {
161 CcTest::InitializeVM();
162 LocalContext context;
163 Isolate* isolate = GetIsolateFrom(&context);
164 HandleScope scope(isolate);
165
166 #if DEBUG
167 // Verify that the tests actually work with the C version. In the release
168 // code, the compiler optimizes it away because it's all constant, but does it
169 // wrong, triggering an assert on gcc.
170 RunAllTruncationTests(&ConvertDToICVersion);
171 #endif
172
173 Register source_registers[] = {jssp, x0, x1, x2, x3, x4, x5, x6, x7, x8, x9,
174 x10, x11, x12, x13, x14, x15, x18, x19, x20,
175 x21, x22, x23, x24};
176 Register dest_registers[] = {x0, x1, x2, x3, x4, x5, x6, x7, x8, x9, x10, x11,
177 x12, x13, x14, x15, x18, x19, x20, x21, x22, x23,
178 x24};
179
180 for (size_t s = 0; s < sizeof(source_registers) / sizeof(Register); s++) {
181 for (size_t d = 0; d < sizeof(dest_registers) / sizeof(Register); d++) {
182 RunAllTruncationTests(
183 RunGeneratedCodeCallWrapper,
184 MakeConvertDToIFuncTrampoline(isolate,
185 source_registers[s],
186 dest_registers[d],
187 false));
188 RunAllTruncationTests(
189 RunGeneratedCodeCallWrapper,
190 MakeConvertDToIFuncTrampoline(isolate,
191 source_registers[s],
192 dest_registers[d],
193 true));
194 }
195 }
196 }
197