test-code-stubs-mips64.cc 5.76 KB
Newer Older
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33
// Copyright 2013 the V8 project authors. All rights reserved.
// Rrdistribution and use in source and binary forms, with or without
// modification, are permitted provided that the following conditions are
// met:
//
//     * Rrdistributions of source code must retain the above copyright
//       notice, this list of conditions and the following disclaimer.
//     * Rrdistributions in binary form must reproduce the above
//       copyright notice, this list of conditions and the following
//       disclaimer in the documentation and/or other materials provided
//       with the distribution.
//     * Neither the name of Google Inc. nor the names of its
//       contributors may be used to endorse or promote products derived
//       from this software without specific prior written permission.
//
// THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS
// "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
// LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR
// A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT
// OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
// SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
// LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
// DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
// THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
// (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
// OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.

#include <stdlib.h>

#include "src/v8.h"

#include "src/base/platform/platform.h"
#include "src/code-stubs.h"
34
#include "src/heap/factory.h"
35 36
#include "src/macro-assembler.h"
#include "src/mips64/constants-mips64.h"
37
#include "src/objects-inl.h"
38
#include "src/register-configuration.h"
39 40 41 42
#include "src/simulator.h"
#include "test/cctest/cctest.h"
#include "test/cctest/test-code-stubs.h"

43 44
namespace v8 {
namespace internal {
45 46 47 48

#define __ masm.

ConvertDToIFunc MakeConvertDToIFuncTrampoline(Isolate* isolate,
49
                                              Register destination_reg) {
50
  HandleScope handles(isolate);
51 52 53 54

  size_t allocated;
  byte* buffer = AllocateAssemblerBuffer(&allocated);
  MacroAssembler masm(isolate, buffer, static_cast<int>(allocated),
55
                      v8::internal::CodeObjectRequired::kYes);
56

57
  Handle<Code> code = BUILTIN_CODE(isolate, DoubleToI);
58
  Address start = code->InstructionStart();
59 60 61 62

  // Save callee save registers.
  __ MultiPush(kCalleeSaved | ra.bit());

63 64 65 66 67
  // Save callee-saved FPU registers.
  __ MultiPushFPU(kCalleeSavedFPU);
  // Set up the reserved register for 0.0.
  __ Move(kDoubleRegZero, 0.0);

68 69 70 71 72 73
  // For softfp, move the input value into f12.
  if (IsMipsSoftFloatABI) {
    __ Move(f12, a0, a1);
  }
  // Push the double argument.
  __ Dsubu(sp, sp, Operand(kDoubleSize));
74
  __ Sdc1(f12, MemOperand(sp));
75 76 77 78

  // Save registers make sure they don't get clobbered.
  int source_reg_offset = kDoubleSize;
  int reg_num = 2;
79
  const RegisterConfiguration* config = RegisterConfiguration::Default();
80
  for (; reg_num < config->num_allocatable_general_registers(); ++reg_num) {
81
    Register reg = Register::from_code(reg_num);
82
    if (reg != destination_reg) {
83 84 85 86 87 88 89
      __ push(reg);
      source_reg_offset += kPointerSize;
    }
  }

  // Re-push the double argument.
  __ Dsubu(sp, sp, Operand(kDoubleSize));
90
  __ Sdc1(f12, MemOperand(sp));
91 92 93

  // Call through to the actual stub
  __ Call(start, RelocInfo::EXTERNAL_REFERENCE);
94
  __ Ld(destination_reg, MemOperand(sp, 0));
95 96 97 98 99 100

  __ Daddu(sp, sp, Operand(kDoubleSize));

  // Make sure no registers have been unexpectedly clobbered
  for (--reg_num; reg_num >= 2; --reg_num) {
    Register reg = Register::from_code(reg_num);
101
    if (reg != destination_reg) {
102
      __ Ld(at, MemOperand(sp, 0));
103
      __ Assert(eq, AbortReason::kRegisterWasClobbered, reg, Operand(at));
104 105 106 107 108 109 110 111 112 113 114
      __ Daddu(sp, sp, Operand(kPointerSize));
    }
  }

  __ Daddu(sp, sp, Operand(kDoubleSize));

  __ Move(v0, destination_reg);
  Label ok;
  __ Branch(&ok, eq, v0, Operand(zero_reg));
  __ bind(&ok);

115 116 117
  // Restore callee-saved FPU registers.
  __ MultiPopFPU(kCalleeSavedFPU);

118 119 120 121 122 123 124 125 126
  // Restore callee save registers.
  __ MultiPop(kCalleeSaved | ra.bit());

  Label ok1;
  __ Branch(&ok1, eq, v0, Operand(zero_reg));
  __ bind(&ok1);
  __ Ret();

  CodeDesc desc;
127
  masm.GetCode(isolate, &desc);
128
  MakeAssemblerBufferExecutable(buffer, allocated);
129
  Assembler::FlushICache(buffer, allocated);
130 131 132 133 134 135 136 137 138 139 140 141 142 143 144
  return (reinterpret_cast<ConvertDToIFunc>(
      reinterpret_cast<intptr_t>(buffer)));
}

#undef __


static Isolate* GetIsolateFrom(LocalContext* context) {
  return reinterpret_cast<Isolate*>((*context)->GetIsolate());
}


int32_t RunGeneratedCodeCallWrapper(ConvertDToIFunc func,
                                    double from) {
#ifdef USE_SIMULATOR
145 146
  Simulator::current(CcTest::i_isolate())
      ->CallFP(FUNCTION_ADDR(func), from, 0.);
147
  return static_cast<int32_t>(
148
      Simulator::current(CcTest::i_isolate())->get_register(v0.code()));
149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170
#else
  return (*func)(from);
#endif
}


TEST(ConvertDToI) {
  CcTest::InitializeVM();
  LocalContext context;
  Isolate* isolate = GetIsolateFrom(&context);
  HandleScope scope(isolate);

#if DEBUG
  // Verify that the tests actually work with the C version. In the release
  // code, the compiler optimizes it away because it's all constant, but does it
  // wrong, triggering an assert on gcc.
  RunAllTruncationTests(&ConvertDToICVersion);
#endif

  Register dest_registers[] = {
      v0, v1, a0, a1, a2, a3, a4, a5, a6, a7, t0, t1};

171 172 173 174
  for (size_t d = 0; d < sizeof(dest_registers) / sizeof(Register); d++) {
    RunAllTruncationTests(
        RunGeneratedCodeCallWrapper,
        MakeConvertDToIFuncTrampoline(isolate, dest_registers[d]));
175 176
  }
}
177 178 179

}  // namespace internal
}  // namespace v8