deps: update v8 to 4.3.61.21
[platform/upstream/nodejs.git] / deps / v8 / src / ppc / deoptimizer-ppc.cc
1 // Copyright 2014 the V8 project authors. All rights reserved.
2 // Use of this source code is governed by a BSD-style license that can be
3 // found in the LICENSE file.
4
5 #include "src/v8.h"
6
7 #include "src/codegen.h"
8 #include "src/deoptimizer.h"
9 #include "src/full-codegen.h"
10 #include "src/safepoint-table.h"
11
12 namespace v8 {
13 namespace internal {
14
15 const int Deoptimizer::table_entry_size_ = 8;
16
17
18 int Deoptimizer::patch_size() {
19 #if V8_TARGET_ARCH_PPC64
20   const int kCallInstructionSizeInWords = 7;
21 #else
22   const int kCallInstructionSizeInWords = 4;
23 #endif
24   return kCallInstructionSizeInWords * Assembler::kInstrSize;
25 }
26
27
28 void Deoptimizer::EnsureRelocSpaceForLazyDeoptimization(Handle<Code> code) {
29   // Empty because there is no need for relocation information for the code
30   // patching in Deoptimizer::PatchCodeForDeoptimization below.
31 }
32
33
34 void Deoptimizer::PatchCodeForDeoptimization(Isolate* isolate, Code* code) {
35   Address code_start_address = code->instruction_start();
36
37   // Invalidate the relocation information, as it will become invalid by the
38   // code patching below, and is not needed any more.
39   code->InvalidateRelocation();
40
41   if (FLAG_zap_code_space) {
42     // Fail hard and early if we enter this code object again.
43     byte* pointer = code->FindCodeAgeSequence();
44     if (pointer != NULL) {
45       pointer += kNoCodeAgeSequenceLength;
46     } else {
47       pointer = code->instruction_start();
48     }
49     CodePatcher patcher(pointer, 1);
50     patcher.masm()->bkpt(0);
51
52     DeoptimizationInputData* data =
53         DeoptimizationInputData::cast(code->deoptimization_data());
54     int osr_offset = data->OsrPcOffset()->value();
55     if (osr_offset > 0) {
56       CodePatcher osr_patcher(code->instruction_start() + osr_offset, 1);
57       osr_patcher.masm()->bkpt(0);
58     }
59   }
60
61   DeoptimizationInputData* deopt_data =
62       DeoptimizationInputData::cast(code->deoptimization_data());
63 #ifdef DEBUG
64   Address prev_call_address = NULL;
65 #endif
66   // For each LLazyBailout instruction insert a call to the corresponding
67   // deoptimization entry.
68   for (int i = 0; i < deopt_data->DeoptCount(); i++) {
69     if (deopt_data->Pc(i)->value() == -1) continue;
70     Address call_address = code_start_address + deopt_data->Pc(i)->value();
71     Address deopt_entry = GetDeoptimizationEntry(isolate, i, LAZY);
72     // We need calls to have a predictable size in the unoptimized code, but
73     // this is optimized code, so we don't have to have a predictable size.
74     int call_size_in_bytes = MacroAssembler::CallSizeNotPredictableCodeSize(
75         deopt_entry, kRelocInfo_NONEPTR);
76     int call_size_in_words = call_size_in_bytes / Assembler::kInstrSize;
77     DCHECK(call_size_in_bytes % Assembler::kInstrSize == 0);
78     DCHECK(call_size_in_bytes <= patch_size());
79     CodePatcher patcher(call_address, call_size_in_words);
80     patcher.masm()->Call(deopt_entry, kRelocInfo_NONEPTR);
81     DCHECK(prev_call_address == NULL ||
82            call_address >= prev_call_address + patch_size());
83     DCHECK(call_address + patch_size() <= code->instruction_end());
84 #ifdef DEBUG
85     prev_call_address = call_address;
86 #endif
87   }
88 }
89
90
91 void Deoptimizer::FillInputFrame(Address tos, JavaScriptFrame* frame) {
92   // Set the register values. The values are not important as there are no
93   // callee saved registers in JavaScript frames, so all registers are
94   // spilled. Registers fp and sp are set to the correct values though.
95   // We ensure the values are Smis to avoid confusing the garbage
96   // collector in the event that any values are retreived and stored
97   // elsewhere.
98
99   for (int i = 0; i < Register::kNumRegisters; i++) {
100     input_->SetRegister(i, reinterpret_cast<intptr_t>(Smi::FromInt(i)));
101   }
102   input_->SetRegister(sp.code(), reinterpret_cast<intptr_t>(frame->sp()));
103   input_->SetRegister(fp.code(), reinterpret_cast<intptr_t>(frame->fp()));
104   for (int i = 0; i < DoubleRegister::NumAllocatableRegisters(); i++) {
105     input_->SetDoubleRegister(i, 0.0);
106   }
107
108   // Fill the frame content from the actual data on the frame.
109   for (unsigned i = 0; i < input_->GetFrameSize(); i += kPointerSize) {
110     input_->SetFrameSlot(
111         i, reinterpret_cast<intptr_t>(Memory::Address_at(tos + i)));
112   }
113 }
114
115
116 void Deoptimizer::SetPlatformCompiledStubRegisters(
117     FrameDescription* output_frame, CodeStubDescriptor* descriptor) {
118   ApiFunction function(descriptor->deoptimization_handler());
119   ExternalReference xref(&function, ExternalReference::BUILTIN_CALL, isolate_);
120   intptr_t handler = reinterpret_cast<intptr_t>(xref.address());
121   int params = descriptor->GetHandlerParameterCount();
122   output_frame->SetRegister(r3.code(), params);
123   output_frame->SetRegister(r4.code(), handler);
124 }
125
126
127 void Deoptimizer::CopyDoubleRegisters(FrameDescription* output_frame) {
128   for (int i = 0; i < DoubleRegister::kMaxNumRegisters; ++i) {
129     double double_value = input_->GetDoubleRegister(i);
130     output_frame->SetDoubleRegister(i, double_value);
131   }
132 }
133
134
135 bool Deoptimizer::HasAlignmentPadding(JSFunction* function) {
136   // There is no dynamic alignment padding on PPC in the input frame.
137   return false;
138 }
139
140
141 #define __ masm()->
142
143 // This code tries to be close to ia32 code so that any changes can be
144 // easily ported.
145 void Deoptimizer::TableEntryGenerator::Generate() {
146   GeneratePrologue();
147
148   // Unlike on ARM we don't save all the registers, just the useful ones.
149   // For the rest, there are gaps on the stack, so the offsets remain the same.
150   const int kNumberOfRegisters = Register::kNumRegisters;
151
152   RegList restored_regs = kJSCallerSaved | kCalleeSaved;
153   RegList saved_regs = restored_regs | sp.bit();
154
155   const int kDoubleRegsSize =
156       kDoubleSize * DoubleRegister::kMaxNumAllocatableRegisters;
157
158   // Save all FPU registers before messing with them.
159   __ subi(sp, sp, Operand(kDoubleRegsSize));
160   for (int i = 0; i < DoubleRegister::kMaxNumAllocatableRegisters; ++i) {
161     DoubleRegister fpu_reg = DoubleRegister::FromAllocationIndex(i);
162     int offset = i * kDoubleSize;
163     __ stfd(fpu_reg, MemOperand(sp, offset));
164   }
165
166   // Push saved_regs (needed to populate FrameDescription::registers_).
167   // Leave gaps for other registers.
168   __ subi(sp, sp, Operand(kNumberOfRegisters * kPointerSize));
169   for (int16_t i = kNumberOfRegisters - 1; i >= 0; i--) {
170     if ((saved_regs & (1 << i)) != 0) {
171       __ StoreP(ToRegister(i), MemOperand(sp, kPointerSize * i));
172     }
173   }
174
175   __ mov(ip, Operand(ExternalReference(Isolate::kCEntryFPAddress, isolate())));
176   __ StoreP(fp, MemOperand(ip));
177
178   const int kSavedRegistersAreaSize =
179       (kNumberOfRegisters * kPointerSize) + kDoubleRegsSize;
180
181   // Get the bailout id from the stack.
182   __ LoadP(r5, MemOperand(sp, kSavedRegistersAreaSize));
183
184   // Get the address of the location in the code object (r6) (return
185   // address for lazy deoptimization) and compute the fp-to-sp delta in
186   // register r7.
187   __ mflr(r6);
188   // Correct one word for bailout id.
189   __ addi(r7, sp, Operand(kSavedRegistersAreaSize + (1 * kPointerSize)));
190   __ sub(r7, fp, r7);
191
192   // Allocate a new deoptimizer object.
193   // Pass six arguments in r3 to r8.
194   __ PrepareCallCFunction(6, r8);
195   __ LoadP(r3, MemOperand(fp, JavaScriptFrameConstants::kFunctionOffset));
196   __ li(r4, Operand(type()));  // bailout type,
197   // r5: bailout id already loaded.
198   // r6: code address or 0 already loaded.
199   // r7: Fp-to-sp delta.
200   __ mov(r8, Operand(ExternalReference::isolate_address(isolate())));
201   // Call Deoptimizer::New().
202   {
203     AllowExternalCallThatCantCauseGC scope(masm());
204     __ CallCFunction(ExternalReference::new_deoptimizer_function(isolate()), 6);
205   }
206
207   // Preserve "deoptimizer" object in register r3 and get the input
208   // frame descriptor pointer to r4 (deoptimizer->input_);
209   __ LoadP(r4, MemOperand(r3, Deoptimizer::input_offset()));
210
211   // Copy core registers into FrameDescription::registers_[kNumRegisters].
212   DCHECK(Register::kNumRegisters == kNumberOfRegisters);
213   for (int i = 0; i < kNumberOfRegisters; i++) {
214     int offset = (i * kPointerSize) + FrameDescription::registers_offset();
215     __ LoadP(r5, MemOperand(sp, i * kPointerSize));
216     __ StoreP(r5, MemOperand(r4, offset));
217   }
218
219   int double_regs_offset = FrameDescription::double_registers_offset();
220   // Copy VFP registers to
221   // double_registers_[DoubleRegister::kNumAllocatableRegisters]
222   for (int i = 0; i < DoubleRegister::NumAllocatableRegisters(); ++i) {
223     int dst_offset = i * kDoubleSize + double_regs_offset;
224     int src_offset = i * kDoubleSize + kNumberOfRegisters * kPointerSize;
225     __ lfd(d0, MemOperand(sp, src_offset));
226     __ stfd(d0, MemOperand(r4, dst_offset));
227   }
228
229   // Remove the bailout id and the saved registers from the stack.
230   __ addi(sp, sp, Operand(kSavedRegistersAreaSize + (1 * kPointerSize)));
231
232   // Compute a pointer to the unwinding limit in register r5; that is
233   // the first stack slot not part of the input frame.
234   __ LoadP(r5, MemOperand(r4, FrameDescription::frame_size_offset()));
235   __ add(r5, r5, sp);
236
237   // Unwind the stack down to - but not including - the unwinding
238   // limit and copy the contents of the activation frame to the input
239   // frame description.
240   __ addi(r6, r4, Operand(FrameDescription::frame_content_offset()));
241   Label pop_loop;
242   Label pop_loop_header;
243   __ b(&pop_loop_header);
244   __ bind(&pop_loop);
245   __ pop(r7);
246   __ StoreP(r7, MemOperand(r6, 0));
247   __ addi(r6, r6, Operand(kPointerSize));
248   __ bind(&pop_loop_header);
249   __ cmp(r5, sp);
250   __ bne(&pop_loop);
251
252   // Compute the output frame in the deoptimizer.
253   __ push(r3);  // Preserve deoptimizer object across call.
254   // r3: deoptimizer object; r4: scratch.
255   __ PrepareCallCFunction(1, r4);
256   // Call Deoptimizer::ComputeOutputFrames().
257   {
258     AllowExternalCallThatCantCauseGC scope(masm());
259     __ CallCFunction(
260         ExternalReference::compute_output_frames_function(isolate()), 1);
261   }
262   __ pop(r3);  // Restore deoptimizer object (class Deoptimizer).
263
264   // Replace the current (input) frame with the output frames.
265   Label outer_push_loop, inner_push_loop, outer_loop_header, inner_loop_header;
266   // Outer loop state: r7 = current "FrameDescription** output_",
267   // r4 = one past the last FrameDescription**.
268   __ lwz(r4, MemOperand(r3, Deoptimizer::output_count_offset()));
269   __ LoadP(r7, MemOperand(r3, Deoptimizer::output_offset()));  // r7 is output_.
270   __ ShiftLeftImm(r4, r4, Operand(kPointerSizeLog2));
271   __ add(r4, r7, r4);
272   __ b(&outer_loop_header);
273
274   __ bind(&outer_push_loop);
275   // Inner loop state: r5 = current FrameDescription*, r6 = loop index.
276   __ LoadP(r5, MemOperand(r7, 0));  // output_[ix]
277   __ LoadP(r6, MemOperand(r5, FrameDescription::frame_size_offset()));
278   __ b(&inner_loop_header);
279
280   __ bind(&inner_push_loop);
281   __ addi(r6, r6, Operand(-sizeof(intptr_t)));
282   __ add(r9, r5, r6);
283   __ LoadP(r9, MemOperand(r9, FrameDescription::frame_content_offset()));
284   __ push(r9);
285
286   __ bind(&inner_loop_header);
287   __ cmpi(r6, Operand::Zero());
288   __ bne(&inner_push_loop);  // test for gt?
289
290   __ addi(r7, r7, Operand(kPointerSize));
291   __ bind(&outer_loop_header);
292   __ cmp(r7, r4);
293   __ blt(&outer_push_loop);
294
295   __ LoadP(r4, MemOperand(r3, Deoptimizer::input_offset()));
296   for (int i = 0; i < DoubleRegister::kMaxNumAllocatableRegisters; ++i) {
297     const DoubleRegister dreg = DoubleRegister::FromAllocationIndex(i);
298     int src_offset = i * kDoubleSize + double_regs_offset;
299     __ lfd(dreg, MemOperand(r4, src_offset));
300   }
301
302   // Push state, pc, and continuation from the last output frame.
303   __ LoadP(r9, MemOperand(r5, FrameDescription::state_offset()));
304   __ push(r9);
305   __ LoadP(r9, MemOperand(r5, FrameDescription::pc_offset()));
306   __ push(r9);
307   __ LoadP(r9, MemOperand(r5, FrameDescription::continuation_offset()));
308   __ push(r9);
309
310   // Restore the registers from the last output frame.
311   DCHECK(!(ip.bit() & restored_regs));
312   __ mr(ip, r5);
313   for (int i = kNumberOfRegisters - 1; i >= 0; i--) {
314     int offset = (i * kPointerSize) + FrameDescription::registers_offset();
315     if ((restored_regs & (1 << i)) != 0) {
316       __ LoadP(ToRegister(i), MemOperand(ip, offset));
317     }
318   }
319
320   __ InitializeRootRegister();
321
322   __ pop(ip);  // get continuation, leave pc on stack
323   __ pop(r0);
324   __ mtlr(r0);
325   __ Jump(ip);
326   __ stop("Unreachable.");
327 }
328
329
330 void Deoptimizer::TableEntryGenerator::GeneratePrologue() {
331   Assembler::BlockTrampolinePoolScope block_trampoline_pool(masm());
332
333   // Create a sequence of deoptimization entries.
334   // Note that registers are still live when jumping to an entry.
335   Label done;
336   for (int i = 0; i < count(); i++) {
337     int start = masm()->pc_offset();
338     USE(start);
339     __ li(ip, Operand(i));
340     __ b(&done);
341     DCHECK(masm()->pc_offset() - start == table_entry_size_);
342   }
343   __ bind(&done);
344   __ push(ip);
345 }
346
347
348 void FrameDescription::SetCallerPc(unsigned offset, intptr_t value) {
349   SetFrameSlot(offset, value);
350 }
351
352
353 void FrameDescription::SetCallerFp(unsigned offset, intptr_t value) {
354   SetFrameSlot(offset, value);
355 }
356
357
358 void FrameDescription::SetCallerConstantPool(unsigned offset, intptr_t value) {
359   // No out-of-line constant pool support.
360   UNREACHABLE();
361 }
362
363
364 #undef __
365 }
366 }  // namespace v8::internal