Upstream version 9.38.207.0
[platform/framework/web/crosswalk.git] / src / v8 / src / ia32 / deoptimizer-ia32.cc
1 // Copyright 2012 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 #if V8_TARGET_ARCH_IA32
8
9 #include "src/codegen.h"
10 #include "src/deoptimizer.h"
11 #include "src/full-codegen.h"
12 #include "src/safepoint-table.h"
13
14 namespace v8 {
15 namespace internal {
16
17 const int Deoptimizer::table_entry_size_ = 10;
18
19
20 int Deoptimizer::patch_size() {
21   return Assembler::kCallInstructionLength;
22 }
23
24
25 void Deoptimizer::EnsureRelocSpaceForLazyDeoptimization(Handle<Code> code) {
26   Isolate* isolate = code->GetIsolate();
27   HandleScope scope(isolate);
28
29   // Compute the size of relocation information needed for the code
30   // patching in Deoptimizer::DeoptimizeFunction.
31   int min_reloc_size = 0;
32   int prev_pc_offset = 0;
33   DeoptimizationInputData* deopt_data =
34       DeoptimizationInputData::cast(code->deoptimization_data());
35   for (int i = 0; i < deopt_data->DeoptCount(); i++) {
36     int pc_offset = deopt_data->Pc(i)->value();
37     if (pc_offset == -1) continue;
38     DCHECK_GE(pc_offset, prev_pc_offset);
39     int pc_delta = pc_offset - prev_pc_offset;
40     // We use RUNTIME_ENTRY reloc info which has a size of 2 bytes
41     // if encodable with small pc delta encoding and up to 6 bytes
42     // otherwise.
43     if (pc_delta <= RelocInfo::kMaxSmallPCDelta) {
44       min_reloc_size += 2;
45     } else {
46       min_reloc_size += 6;
47     }
48     prev_pc_offset = pc_offset;
49   }
50
51   // If the relocation information is not big enough we create a new
52   // relocation info object that is padded with comments to make it
53   // big enough for lazy doptimization.
54   int reloc_length = code->relocation_info()->length();
55   if (min_reloc_size > reloc_length) {
56     int comment_reloc_size = RelocInfo::kMinRelocCommentSize;
57     // Padding needed.
58     int min_padding = min_reloc_size - reloc_length;
59     // Number of comments needed to take up at least that much space.
60     int additional_comments =
61         (min_padding + comment_reloc_size - 1) / comment_reloc_size;
62     // Actual padding size.
63     int padding = additional_comments * comment_reloc_size;
64     // Allocate new relocation info and copy old relocation to the end
65     // of the new relocation info array because relocation info is
66     // written and read backwards.
67     Factory* factory = isolate->factory();
68     Handle<ByteArray> new_reloc =
69         factory->NewByteArray(reloc_length + padding, TENURED);
70     MemCopy(new_reloc->GetDataStartAddress() + padding,
71             code->relocation_info()->GetDataStartAddress(), reloc_length);
72     // Create a relocation writer to write the comments in the padding
73     // space. Use position 0 for everything to ensure short encoding.
74     RelocInfoWriter reloc_info_writer(
75         new_reloc->GetDataStartAddress() + padding, 0);
76     intptr_t comment_string
77         = reinterpret_cast<intptr_t>(RelocInfo::kFillerCommentString);
78     RelocInfo rinfo(0, RelocInfo::COMMENT, comment_string, NULL);
79     for (int i = 0; i < additional_comments; ++i) {
80 #ifdef DEBUG
81       byte* pos_before = reloc_info_writer.pos();
82 #endif
83       reloc_info_writer.Write(&rinfo);
84       DCHECK(RelocInfo::kMinRelocCommentSize ==
85              pos_before - reloc_info_writer.pos());
86     }
87     // Replace relocation information on the code object.
88     code->set_relocation_info(*new_reloc);
89   }
90 }
91
92
93 void Deoptimizer::PatchCodeForDeoptimization(Isolate* isolate, Code* code) {
94   Address code_start_address = code->instruction_start();
95
96   if (FLAG_zap_code_space) {
97     // Fail hard and early if we enter this code object again.
98     byte* pointer = code->FindCodeAgeSequence();
99     if (pointer != NULL) {
100       pointer += kNoCodeAgeSequenceLength;
101     } else {
102       pointer = code->instruction_start();
103     }
104     CodePatcher patcher(pointer, 1);
105     patcher.masm()->int3();
106
107     DeoptimizationInputData* data =
108         DeoptimizationInputData::cast(code->deoptimization_data());
109     int osr_offset = data->OsrPcOffset()->value();
110     if (osr_offset > 0) {
111       CodePatcher osr_patcher(code->instruction_start() + osr_offset, 1);
112       osr_patcher.masm()->int3();
113     }
114   }
115
116   // We will overwrite the code's relocation info in-place. Relocation info
117   // is written backward. The relocation info is the payload of a byte
118   // array.  Later on we will slide this to the start of the byte array and
119   // create a filler object in the remaining space.
120   ByteArray* reloc_info = code->relocation_info();
121   Address reloc_end_address = reloc_info->address() + reloc_info->Size();
122   RelocInfoWriter reloc_info_writer(reloc_end_address, code_start_address);
123
124   // Since the call is a relative encoding, write new
125   // reloc info.  We do not need any of the existing reloc info because the
126   // existing code will not be used again (we zap it in debug builds).
127   //
128   // Emit call to lazy deoptimization at all lazy deopt points.
129   DeoptimizationInputData* deopt_data =
130       DeoptimizationInputData::cast(code->deoptimization_data());
131 #ifdef DEBUG
132   Address prev_call_address = NULL;
133 #endif
134   // For each LLazyBailout instruction insert a call to the corresponding
135   // deoptimization entry.
136   for (int i = 0; i < deopt_data->DeoptCount(); i++) {
137     if (deopt_data->Pc(i)->value() == -1) continue;
138     // Patch lazy deoptimization entry.
139     Address call_address = code_start_address + deopt_data->Pc(i)->value();
140     CodePatcher patcher(call_address, patch_size());
141     Address deopt_entry = GetDeoptimizationEntry(isolate, i, LAZY);
142     patcher.masm()->call(deopt_entry, RelocInfo::NONE32);
143     // We use RUNTIME_ENTRY for deoptimization bailouts.
144     RelocInfo rinfo(call_address + 1,  // 1 after the call opcode.
145                     RelocInfo::RUNTIME_ENTRY,
146                     reinterpret_cast<intptr_t>(deopt_entry),
147                     NULL);
148     reloc_info_writer.Write(&rinfo);
149     DCHECK_GE(reloc_info_writer.pos(),
150               reloc_info->address() + ByteArray::kHeaderSize);
151     DCHECK(prev_call_address == NULL ||
152            call_address >= prev_call_address + patch_size());
153     DCHECK(call_address + patch_size() <= code->instruction_end());
154 #ifdef DEBUG
155     prev_call_address = call_address;
156 #endif
157   }
158
159   // Move the relocation info to the beginning of the byte array.
160   int new_reloc_size = reloc_end_address - reloc_info_writer.pos();
161   MemMove(code->relocation_start(), reloc_info_writer.pos(), new_reloc_size);
162
163   // The relocation info is in place, update the size.
164   reloc_info->set_length(new_reloc_size);
165
166   // Handle the junk part after the new relocation info. We will create
167   // a non-live object in the extra space at the end of the former reloc info.
168   Address junk_address = reloc_info->address() + reloc_info->Size();
169   DCHECK(junk_address <= reloc_end_address);
170   isolate->heap()->CreateFillerObjectAt(junk_address,
171                                         reloc_end_address - junk_address);
172 }
173
174
175 void Deoptimizer::FillInputFrame(Address tos, JavaScriptFrame* frame) {
176   // Set the register values. The values are not important as there are no
177   // callee saved registers in JavaScript frames, so all registers are
178   // spilled. Registers ebp and esp are set to the correct values though.
179
180   for (int i = 0; i < Register::kNumRegisters; i++) {
181     input_->SetRegister(i, i * 4);
182   }
183   input_->SetRegister(esp.code(), reinterpret_cast<intptr_t>(frame->sp()));
184   input_->SetRegister(ebp.code(), reinterpret_cast<intptr_t>(frame->fp()));
185   simd128_value_t zero = {{0.0, 0.0}};
186   for (int i = 0; i < XMMRegister::kMaxNumAllocatableRegisters; i++) {
187     input_->SetSIMD128Register(i, zero);
188   }
189
190   // Fill the frame content from the actual data on the frame.
191   for (unsigned i = 0; i < input_->GetFrameSize(); i += kPointerSize) {
192     input_->SetFrameSlot(i, Memory::uint32_at(tos + i));
193   }
194 }
195
196
197 void Deoptimizer::SetPlatformCompiledStubRegisters(
198     FrameDescription* output_frame, CodeStubInterfaceDescriptor* descriptor) {
199   intptr_t handler =
200       reinterpret_cast<intptr_t>(descriptor->deoptimization_handler());
201   int params = descriptor->GetHandlerParameterCount();
202   output_frame->SetRegister(eax.code(), params);
203   output_frame->SetRegister(ebx.code(), handler);
204 }
205
206
207 void Deoptimizer::CopySIMD128Registers(FrameDescription* output_frame) {
208   for (int i = 0; i < XMMRegister::kMaxNumAllocatableRegisters; ++i) {
209     simd128_value_t xmm_value = input_->GetSIMD128Register(i);
210     output_frame->SetSIMD128Register(i, xmm_value);
211   }
212 }
213
214
215 bool Deoptimizer::HasAlignmentPadding(JSFunction* function) {
216   int parameter_count = function->shared()->formal_parameter_count() + 1;
217   unsigned input_frame_size = input_->GetFrameSize();
218   unsigned alignment_state_offset =
219       input_frame_size - parameter_count * kPointerSize -
220       StandardFrameConstants::kFixedFrameSize -
221       kPointerSize;
222   DCHECK(JavaScriptFrameConstants::kDynamicAlignmentStateOffset ==
223       JavaScriptFrameConstants::kLocal0Offset);
224   int32_t alignment_state = input_->GetFrameSlot(alignment_state_offset);
225   return (alignment_state == kAlignmentPaddingPushed);
226 }
227
228
229 #define __ masm()->
230
231 void Deoptimizer::EntryGenerator::Generate() {
232   GeneratePrologue();
233
234   // Save all general purpose registers before messing with them.
235   const int kNumberOfRegisters = Register::kNumRegisters;
236
237   const int kXMMRegsSize = kSIMD128Size *
238                            XMMRegister::kMaxNumAllocatableRegisters;
239   __ sub(esp, Immediate(kXMMRegsSize));
240   for (int i = 0; i < XMMRegister::kMaxNumAllocatableRegisters; ++i) {
241     XMMRegister xmm_reg = XMMRegister::FromAllocationIndex(i);
242     int offset = i * kSIMD128Size;
243     __ movups(Operand(esp, offset), xmm_reg);
244   }
245
246   __ pushad();
247
248   const int kSavedRegistersAreaSize = kNumberOfRegisters * kPointerSize +
249                                       kXMMRegsSize;
250
251   // Get the bailout id from the stack.
252   __ mov(ebx, Operand(esp, kSavedRegistersAreaSize));
253
254   // Get the address of the location in the code object
255   // and compute the fp-to-sp delta in register edx.
256   __ mov(ecx, Operand(esp, kSavedRegistersAreaSize + 1 * kPointerSize));
257   __ lea(edx, Operand(esp, kSavedRegistersAreaSize + 2 * kPointerSize));
258
259   __ sub(edx, ebp);
260   __ neg(edx);
261
262   // Allocate a new deoptimizer object.
263   __ PrepareCallCFunction(6, eax);
264   __ mov(eax, Operand(ebp, JavaScriptFrameConstants::kFunctionOffset));
265   __ mov(Operand(esp, 0 * kPointerSize), eax);  // Function.
266   __ mov(Operand(esp, 1 * kPointerSize), Immediate(type()));  // Bailout type.
267   __ mov(Operand(esp, 2 * kPointerSize), ebx);  // Bailout id.
268   __ mov(Operand(esp, 3 * kPointerSize), ecx);  // Code address or 0.
269   __ mov(Operand(esp, 4 * kPointerSize), edx);  // Fp-to-sp delta.
270   __ mov(Operand(esp, 5 * kPointerSize),
271          Immediate(ExternalReference::isolate_address(isolate())));
272   {
273     AllowExternalCallThatCantCauseGC scope(masm());
274     __ CallCFunction(ExternalReference::new_deoptimizer_function(isolate()), 6);
275   }
276
277   // Preserve deoptimizer object in register eax and get the input
278   // frame descriptor pointer.
279   __ mov(ebx, Operand(eax, Deoptimizer::input_offset()));
280
281   // Fill in the input registers.
282   for (int i = kNumberOfRegisters - 1; i >= 0; i--) {
283     int offset = (i * kPointerSize) + FrameDescription::registers_offset();
284     __ pop(Operand(ebx, offset));
285   }
286
287   int xmm_regs_offset = FrameDescription::simd128_registers_offset();
288   // Fill in the double input registers.
289   for (int i = 0; i < XMMRegister::kMaxNumAllocatableRegisters; ++i) {
290     int dst_offset = i * kSIMD128Size + xmm_regs_offset;
291     int src_offset = i * kSIMD128Size;
292     __ movups(xmm0, Operand(esp, src_offset));
293     __ movups(Operand(ebx, dst_offset), xmm0);
294   }
295
296   // Clear FPU all exceptions.
297   // TODO(ulan): Find out why the TOP register is not zero here in some cases,
298   // and check that the generated code never deoptimizes with unbalanced stack.
299   __ fnclex();
300
301   // Remove the bailout id, return address and the double registers.
302   __ add(esp, Immediate(kXMMRegsSize + 2 * kPointerSize));
303
304   // Compute a pointer to the unwinding limit in register ecx; that is
305   // the first stack slot not part of the input frame.
306   __ mov(ecx, Operand(ebx, FrameDescription::frame_size_offset()));
307   __ add(ecx, esp);
308
309   // Unwind the stack down to - but not including - the unwinding
310   // limit and copy the contents of the activation frame to the input
311   // frame description.
312   __ lea(edx, Operand(ebx, FrameDescription::frame_content_offset()));
313   Label pop_loop_header;
314   __ jmp(&pop_loop_header);
315   Label pop_loop;
316   __ bind(&pop_loop);
317   __ pop(Operand(edx, 0));
318   __ add(edx, Immediate(sizeof(uint32_t)));
319   __ bind(&pop_loop_header);
320   __ cmp(ecx, esp);
321   __ j(not_equal, &pop_loop);
322
323   // Compute the output frame in the deoptimizer.
324   __ push(eax);
325   __ PrepareCallCFunction(1, ebx);
326   __ mov(Operand(esp, 0 * kPointerSize), eax);
327   {
328     AllowExternalCallThatCantCauseGC scope(masm());
329     __ CallCFunction(
330         ExternalReference::compute_output_frames_function(isolate()), 1);
331   }
332   __ pop(eax);
333
334   // If frame was dynamically aligned, pop padding.
335   Label no_padding;
336   __ cmp(Operand(eax, Deoptimizer::has_alignment_padding_offset()),
337          Immediate(0));
338   __ j(equal, &no_padding);
339   __ pop(ecx);
340   if (FLAG_debug_code) {
341     __ cmp(ecx, Immediate(kAlignmentZapValue));
342     __ Assert(equal, kAlignmentMarkerExpected);
343   }
344   __ bind(&no_padding);
345
346   // Replace the current frame with the output frames.
347   Label outer_push_loop, inner_push_loop,
348       outer_loop_header, inner_loop_header;
349   // Outer loop state: eax = current FrameDescription**, edx = one past the
350   // last FrameDescription**.
351   __ mov(edx, Operand(eax, Deoptimizer::output_count_offset()));
352   __ mov(eax, Operand(eax, Deoptimizer::output_offset()));
353   __ lea(edx, Operand(eax, edx, times_4, 0));
354   __ jmp(&outer_loop_header);
355   __ bind(&outer_push_loop);
356   // Inner loop state: ebx = current FrameDescription*, ecx = loop index.
357   __ mov(ebx, Operand(eax, 0));
358   __ mov(ecx, Operand(ebx, FrameDescription::frame_size_offset()));
359   __ jmp(&inner_loop_header);
360   __ bind(&inner_push_loop);
361   __ sub(ecx, Immediate(sizeof(uint32_t)));
362   __ push(Operand(ebx, ecx, times_1, FrameDescription::frame_content_offset()));
363   __ bind(&inner_loop_header);
364   __ test(ecx, ecx);
365   __ j(not_zero, &inner_push_loop);
366   __ add(eax, Immediate(kPointerSize));
367   __ bind(&outer_loop_header);
368   __ cmp(eax, edx);
369   __ j(below, &outer_push_loop);
370
371   // In case of a failed STUB, we have to restore the XMM registers.
372   for (int i = 0; i < XMMRegister::kMaxNumAllocatableRegisters; ++i) {
373     XMMRegister xmm_reg = XMMRegister::FromAllocationIndex(i);
374     int src_offset = i * kSIMD128Size + xmm_regs_offset;
375     __ movups(xmm_reg, Operand(ebx, src_offset));
376   }
377
378   // Push state, pc, and continuation from the last output frame.
379   __ push(Operand(ebx, FrameDescription::state_offset()));
380   __ push(Operand(ebx, FrameDescription::pc_offset()));
381   __ push(Operand(ebx, FrameDescription::continuation_offset()));
382
383
384   // Push the registers from the last output frame.
385   for (int i = 0; i < kNumberOfRegisters; i++) {
386     int offset = (i * kPointerSize) + FrameDescription::registers_offset();
387     __ push(Operand(ebx, offset));
388   }
389
390   // Restore the registers from the stack.
391   __ popad();
392
393   // Return to the continuation point.
394   __ ret(0);
395 }
396
397
398 void Deoptimizer::TableEntryGenerator::GeneratePrologue() {
399   // Create a sequence of deoptimization entries.
400   Label done;
401   for (int i = 0; i < count(); i++) {
402     int start = masm()->pc_offset();
403     USE(start);
404     __ push_imm32(i);
405     __ jmp(&done);
406     DCHECK(masm()->pc_offset() - start == table_entry_size_);
407   }
408   __ bind(&done);
409 }
410
411
412 void FrameDescription::SetCallerPc(unsigned offset, intptr_t value) {
413   SetFrameSlot(offset, value);
414 }
415
416
417 void FrameDescription::SetCallerFp(unsigned offset, intptr_t value) {
418   SetFrameSlot(offset, value);
419 }
420
421
422 void FrameDescription::SetCallerConstantPool(unsigned offset, intptr_t value) {
423   // No out-of-line constant pool support.
424   UNREACHABLE();
425 }
426
427
428 double FrameDescription::GetDoubleRegister(unsigned n) const {
429   DCHECK(n < ARRAY_SIZE(simd128_registers_));
430   return simd128_registers_[n].d[0];
431 }
432
433
434 void FrameDescription::SetDoubleRegister(unsigned n, double value) {
435   DCHECK(n < ARRAY_SIZE(simd128_registers_));
436   simd128_registers_[n].d[0] = value;
437 }
438
439
440 #undef __
441
442
443 } }  // namespace v8::internal
444
445 #endif  // V8_TARGET_ARCH_IA32