Home | History | Annotate | Download | only in cctest
      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 
     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 
    124 static Isolate* GetIsolateFrom(LocalContext* context) {
    125   return reinterpret_cast<Isolate*>((*context)->GetIsolate());
    126 }
    127 
    128 
    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