1 // Copyright 2013 the V8 project authors. All rights reserved.
2 // Redistribution and use in source and binary forms, with or without
3 // modification, are permitted provided that the following conditions are
4 // met:
5 //
6 // * Redistributions of source code must retain the above copyright
7 // notice, this list of conditions and the following disclaimer.
8 // * Redistributions 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 <limits>
31
32 #include "src/v8.h"
33
34 #include "src/base/platform/platform.h"
35 #include "src/code-stubs.h"
36 #include "src/factory.h"
37 #include "src/macro-assembler.h"
38 #include "test/cctest/cctest.h"
39 #include "test/cctest/test-code-stubs.h"
40
41 using namespace v8::internal;
42
43 #define __ assm.
44
MakeConvertDToIFuncTrampoline(Isolate * isolate,Register source_reg,Register destination_reg)45 ConvertDToIFunc MakeConvertDToIFuncTrampoline(Isolate* isolate,
46 Register source_reg,
47 Register destination_reg) {
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 assm(isolate, buffer, static_cast<int>(actual_size),
55 v8::internal::CodeObjectRequired::kYes);
56 int offset =
57 source_reg.is(esp) ? 0 : (HeapNumber::kValueOffset - kSmiTagSize);
58 DoubleToIStub stub(isolate, source_reg, destination_reg, offset, true);
59 byte* start = stub.GetCode()->instruction_start();
60
61 __ push(ebx);
62 __ push(ecx);
63 __ push(edx);
64 __ push(esi);
65 __ push(edi);
66
67 if (!source_reg.is(esp)) {
68 __ lea(source_reg, MemOperand(esp, 6 * kPointerSize - offset));
69 }
70
71 int param_offset = 7 * kPointerSize;
72 // Save registers make sure they don't get clobbered.
73 int reg_num = 0;
74 for (; reg_num < Register::kNumRegisters; ++reg_num) {
75 Register reg = Register::from_code(reg_num);
76 if (reg.IsAllocatable()) {
77 if (!reg.is(esp) && !reg.is(ebp) && !reg.is(destination_reg)) {
78 __ push(reg);
79 param_offset += kPointerSize;
80 }
81 }
82 }
83
84 // Re-push the double argument
85 __ push(MemOperand(esp, param_offset));
86 __ push(MemOperand(esp, param_offset));
87
88 // Call through to the actual stub
89 __ call(start, RelocInfo::EXTERNAL_REFERENCE);
90
91 __ add(esp, Immediate(kDoubleSize));
92
93 // Make sure no registers have been unexpectedly clobbered
94 for (--reg_num; reg_num >= 0; --reg_num) {
95 Register reg = Register::from_code(reg_num);
96 if (reg.IsAllocatable()) {
97 if (!reg.is(esp) && !reg.is(ebp) && !reg.is(destination_reg)) {
98 __ cmp(reg, MemOperand(esp, 0));
99 __ Assert(equal, kRegisterWasClobbered);
100 __ add(esp, Immediate(kPointerSize));
101 }
102 }
103 }
104
105 __ mov(eax, destination_reg);
106
107 __ pop(edi);
108 __ pop(esi);
109 __ pop(edx);
110 __ pop(ecx);
111 __ pop(ebx);
112
113 __ ret(kDoubleSize);
114
115 CodeDesc desc;
116 assm.GetCode(&desc);
117 return reinterpret_cast<ConvertDToIFunc>(
118 reinterpret_cast<intptr_t>(buffer));
119 }
120
121 #undef __
122
123
GetIsolateFrom(LocalContext * context)124 static Isolate* GetIsolateFrom(LocalContext* context) {
125 return reinterpret_cast<Isolate*>((*context)->GetIsolate());
126 }
127
128
TEST(ConvertDToI)129 TEST(ConvertDToI) {
130 CcTest::InitializeVM();
131 LocalContext context;
132 Isolate* isolate = GetIsolateFrom(&context);
133 HandleScope scope(isolate);
134
135 #if DEBUG
136 // Verify that the tests actually work with the C version. In the release
137 // code, the compiler optimizes it away because it's all constant, but does it
138 // wrong, triggering an assert on gcc.
139 RunAllTruncationTests(&ConvertDToICVersion);
140 #endif
141
142 Register source_registers[] = {esp, eax, ebx, ecx, edx, edi, esi};
143 Register dest_registers[] = {eax, ebx, ecx, edx, edi, esi};
144
145 for (size_t s = 0; s < sizeof(source_registers) / sizeof(Register); s++) {
146 for (size_t d = 0; d < sizeof(dest_registers) / sizeof(Register); d++) {
147 RunAllTruncationTests(
148 MakeConvertDToIFuncTrampoline(isolate,
149 source_registers[s],
150 dest_registers[d]));
151 }
152 }
153 }
154