blob: 3c866ac45388ef13eb15581c17e262b1eede16de [file] [log] [blame]
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001
Ben Murdoch3ef787d2012-04-12 10:51:47 +01002// Copyright 2012 the V8 project authors. All rights reserved.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003// Use of this source code is governed by a BSD-style license that can be
4// found in the LICENSE file.
Andrei Popescu31002712010-02-23 13:46:05 +00005
Ben Murdoch257744e2011-11-30 15:57:28 +00006#include <limits.h> // For LONG_MIN, LONG_MAX.
Andrei Popescu31002712010-02-23 13:46:05 +00007
Ben Murdochb8a8cc12014-11-26 15:28:44 +00008#if V8_TARGET_ARCH_MIPS
Leon Clarkef7060e22010-06-03 12:02:55 +01009
Ben Murdochb8a8cc12014-11-26 15:28:44 +000010#include "src/base/bits.h"
11#include "src/base/division-by-constant.h"
12#include "src/bootstrapper.h"
13#include "src/codegen.h"
Ben Murdoch4a90d5f2016-03-22 12:00:34 +000014#include "src/debug/debug.h"
15#include "src/mips/macro-assembler-mips.h"
16#include "src/register-configuration.h"
Emily Bernierd0a1eb72015-03-24 16:35:39 -040017#include "src/runtime/runtime.h"
Andrei Popescu31002712010-02-23 13:46:05 +000018
19namespace v8 {
20namespace internal {
21
Ben Murdoch4a90d5f2016-03-22 12:00:34 +000022MacroAssembler::MacroAssembler(Isolate* arg_isolate, void* buffer, int size,
23 CodeObjectRequired create_code_object)
Ben Murdoch257744e2011-11-30 15:57:28 +000024 : Assembler(arg_isolate, buffer, size),
Andrei Popescu31002712010-02-23 13:46:05 +000025 generating_stub_(false),
Emily Bernierd0a1eb72015-03-24 16:35:39 -040026 has_frame_(false),
27 has_double_zero_reg_set_(false) {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +000028 if (create_code_object == CodeObjectRequired::kYes) {
29 code_object_ =
30 Handle<Object>::New(isolate()->heap()->undefined_value(), isolate());
Ben Murdoch257744e2011-11-30 15:57:28 +000031 }
Andrei Popescu31002712010-02-23 13:46:05 +000032}
33
34
Ben Murdochb8a8cc12014-11-26 15:28:44 +000035void MacroAssembler::Load(Register dst,
36 const MemOperand& src,
37 Representation r) {
38 DCHECK(!r.IsDouble());
39 if (r.IsInteger8()) {
40 lb(dst, src);
41 } else if (r.IsUInteger8()) {
42 lbu(dst, src);
43 } else if (r.IsInteger16()) {
44 lh(dst, src);
45 } else if (r.IsUInteger16()) {
46 lhu(dst, src);
47 } else {
48 lw(dst, src);
49 }
50}
51
52
53void MacroAssembler::Store(Register src,
54 const MemOperand& dst,
55 Representation r) {
56 DCHECK(!r.IsDouble());
57 if (r.IsInteger8() || r.IsUInteger8()) {
58 sb(src, dst);
59 } else if (r.IsInteger16() || r.IsUInteger16()) {
60 sh(src, dst);
61 } else {
62 if (r.IsHeapObject()) {
63 AssertNotSmi(src);
64 } else if (r.IsSmi()) {
65 AssertSmi(src);
66 }
67 sw(src, dst);
68 }
69}
70
71
Andrei Popescu31002712010-02-23 13:46:05 +000072void MacroAssembler::LoadRoot(Register destination,
73 Heap::RootListIndex index) {
Steve Block6ded16b2010-05-10 14:33:55 +010074 lw(destination, MemOperand(s6, index << kPointerSizeLog2));
Andrei Popescu31002712010-02-23 13:46:05 +000075}
76
Steve Block44f0eee2011-05-26 01:26:41 +010077
Andrei Popescu31002712010-02-23 13:46:05 +000078void MacroAssembler::LoadRoot(Register destination,
79 Heap::RootListIndex index,
80 Condition cond,
81 Register src1, const Operand& src2) {
Steve Block44f0eee2011-05-26 01:26:41 +010082 Branch(2, NegateCondition(cond), src1, src2);
Steve Block6ded16b2010-05-10 14:33:55 +010083 lw(destination, MemOperand(s6, index << kPointerSizeLog2));
Andrei Popescu31002712010-02-23 13:46:05 +000084}
85
86
Steve Block44f0eee2011-05-26 01:26:41 +010087void MacroAssembler::StoreRoot(Register source,
88 Heap::RootListIndex index) {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +000089 DCHECK(Heap::RootCanBeWrittenAfterInitialization(index));
Steve Block44f0eee2011-05-26 01:26:41 +010090 sw(source, MemOperand(s6, index << kPointerSizeLog2));
91}
92
93
94void MacroAssembler::StoreRoot(Register source,
95 Heap::RootListIndex index,
96 Condition cond,
97 Register src1, const Operand& src2) {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +000098 DCHECK(Heap::RootCanBeWrittenAfterInitialization(index));
Steve Block44f0eee2011-05-26 01:26:41 +010099 Branch(2, NegateCondition(cond), src1, src2);
100 sw(source, MemOperand(s6, index << kPointerSizeLog2));
101}
102
103
Ben Murdoch257744e2011-11-30 15:57:28 +0000104// Push and pop all registers that can hold pointers.
105void MacroAssembler::PushSafepointRegisters() {
106 // Safepoints expect a block of kNumSafepointRegisters values on the
107 // stack, so adjust the stack for unsaved registers.
108 const int num_unsaved = kNumSafepointRegisters - kNumSafepointSavedRegisters;
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000109 DCHECK(num_unsaved >= 0);
Ben Murdoch3ef787d2012-04-12 10:51:47 +0100110 if (num_unsaved > 0) {
111 Subu(sp, sp, Operand(num_unsaved * kPointerSize));
112 }
Ben Murdoch257744e2011-11-30 15:57:28 +0000113 MultiPush(kSafepointSavedRegisters);
114}
115
Ben Murdoch3fb3ca82011-12-02 17:19:32 +0000116
Ben Murdoch257744e2011-11-30 15:57:28 +0000117void MacroAssembler::PopSafepointRegisters() {
118 const int num_unsaved = kNumSafepointRegisters - kNumSafepointSavedRegisters;
119 MultiPop(kSafepointSavedRegisters);
Ben Murdoch3ef787d2012-04-12 10:51:47 +0100120 if (num_unsaved > 0) {
121 Addu(sp, sp, Operand(num_unsaved * kPointerSize));
122 }
Ben Murdoch257744e2011-11-30 15:57:28 +0000123}
124
Ben Murdoch3fb3ca82011-12-02 17:19:32 +0000125
Ben Murdoch257744e2011-11-30 15:57:28 +0000126void MacroAssembler::StoreToSafepointRegisterSlot(Register src, Register dst) {
127 sw(src, SafepointRegisterSlot(dst));
128}
129
130
131void MacroAssembler::LoadFromSafepointRegisterSlot(Register dst, Register src) {
132 lw(dst, SafepointRegisterSlot(src));
133}
134
135
136int MacroAssembler::SafepointRegisterStackIndex(int reg_code) {
137 // The registers are pushed starting with the highest encoding,
138 // which means that lowest encodings are closest to the stack pointer.
139 return kSafepointRegisterStackIndexMap[reg_code];
140}
141
142
143MemOperand MacroAssembler::SafepointRegisterSlot(Register reg) {
144 return MemOperand(sp, SafepointRegisterStackIndex(reg.code()) * kPointerSize);
145}
146
147
148MemOperand MacroAssembler::SafepointRegistersAndDoublesSlot(Register reg) {
Ben Murdoch3ef787d2012-04-12 10:51:47 +0100149 UNIMPLEMENTED_MIPS();
Ben Murdoch257744e2011-11-30 15:57:28 +0000150 // General purpose registers are pushed last on the stack.
Ben Murdoch4a90d5f2016-03-22 12:00:34 +0000151 int doubles_size = DoubleRegister::kMaxNumRegisters * kDoubleSize;
Ben Murdoch257744e2011-11-30 15:57:28 +0000152 int register_offset = SafepointRegisterStackIndex(reg.code()) * kPointerSize;
153 return MemOperand(sp, doubles_size + register_offset);
154}
155
156
Steve Block44f0eee2011-05-26 01:26:41 +0100157void MacroAssembler::InNewSpace(Register object,
158 Register scratch,
159 Condition cc,
160 Label* branch) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000161 DCHECK(cc == eq || cc == ne);
Steve Block44f0eee2011-05-26 01:26:41 +0100162 And(scratch, object, Operand(ExternalReference::new_space_mask(isolate())));
163 Branch(branch, cc, scratch,
164 Operand(ExternalReference::new_space_start(isolate())));
165}
166
167
Ben Murdoch4a90d5f2016-03-22 12:00:34 +0000168// Clobbers object, dst, value, and ra, if (ra_status == kRAHasBeenSaved)
169// The register 'object' contains a heap object pointer. The heap object
170// tag is shifted away.
Ben Murdoch3ef787d2012-04-12 10:51:47 +0100171void MacroAssembler::RecordWriteField(
172 Register object,
173 int offset,
174 Register value,
175 Register dst,
176 RAStatus ra_status,
177 SaveFPRegsMode save_fp,
178 RememberedSetAction remembered_set_action,
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000179 SmiCheck smi_check,
180 PointersToHereCheck pointers_to_here_check_for_value) {
181 DCHECK(!AreAliased(value, dst, t8, object));
Ben Murdoch3ef787d2012-04-12 10:51:47 +0100182 // First, check if a write barrier is even needed. The tests below
183 // catch stores of Smis.
Steve Block44f0eee2011-05-26 01:26:41 +0100184 Label done;
185
Ben Murdoch3ef787d2012-04-12 10:51:47 +0100186 // Skip barrier if writing a smi.
187 if (smi_check == INLINE_SMI_CHECK) {
188 JumpIfSmi(value, &done);
189 }
Steve Block44f0eee2011-05-26 01:26:41 +0100190
Ben Murdoch3ef787d2012-04-12 10:51:47 +0100191 // Although the object register is tagged, the offset is relative to the start
192 // of the object, so so offset must be a multiple of kPointerSize.
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000193 DCHECK(IsAligned(offset, kPointerSize));
Steve Block44f0eee2011-05-26 01:26:41 +0100194
Ben Murdoch3ef787d2012-04-12 10:51:47 +0100195 Addu(dst, object, Operand(offset - kHeapObjectTag));
196 if (emit_debug_code()) {
197 Label ok;
198 And(t8, dst, Operand((1 << kPointerSizeLog2) - 1));
199 Branch(&ok, eq, t8, Operand(zero_reg));
200 stop("Unaligned cell in write barrier");
201 bind(&ok);
202 }
203
204 RecordWrite(object,
205 dst,
206 value,
207 ra_status,
208 save_fp,
209 remembered_set_action,
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000210 OMIT_SMI_CHECK,
211 pointers_to_here_check_for_value);
Steve Block44f0eee2011-05-26 01:26:41 +0100212
213 bind(&done);
214
Ben Murdoch3ef787d2012-04-12 10:51:47 +0100215 // Clobber clobbered input registers when running with the debug-code flag
Steve Block44f0eee2011-05-26 01:26:41 +0100216 // turned on to provoke errors.
Ben Murdoch257744e2011-11-30 15:57:28 +0000217 if (emit_debug_code()) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000218 li(value, Operand(bit_cast<int32_t>(kZapValue + 4)));
219 li(dst, Operand(bit_cast<int32_t>(kZapValue + 8)));
220 }
221}
222
223
Ben Murdoch4a90d5f2016-03-22 12:00:34 +0000224// Clobbers object, dst, map, and ra, if (ra_status == kRAHasBeenSaved)
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000225void MacroAssembler::RecordWriteForMap(Register object,
226 Register map,
227 Register dst,
228 RAStatus ra_status,
229 SaveFPRegsMode fp_mode) {
230 if (emit_debug_code()) {
231 DCHECK(!dst.is(at));
232 lw(dst, FieldMemOperand(map, HeapObject::kMapOffset));
233 Check(eq,
234 kWrongAddressOrValuePassedToRecordWrite,
235 dst,
236 Operand(isolate()->factory()->meta_map()));
237 }
238
239 if (!FLAG_incremental_marking) {
240 return;
241 }
242
243 if (emit_debug_code()) {
244 lw(at, FieldMemOperand(object, HeapObject::kMapOffset));
245 Check(eq,
246 kWrongAddressOrValuePassedToRecordWrite,
247 map,
248 Operand(at));
249 }
250
251 Label done;
252
253 // A single check of the map's pages interesting flag suffices, since it is
254 // only set during incremental collection, and then it's also guaranteed that
255 // the from object's page's interesting flag is also set. This optimization
256 // relies on the fact that maps can never be in new space.
257 CheckPageFlag(map,
258 map, // Used as scratch.
259 MemoryChunk::kPointersToHereAreInterestingMask,
260 eq,
261 &done);
262
263 Addu(dst, object, Operand(HeapObject::kMapOffset - kHeapObjectTag));
264 if (emit_debug_code()) {
265 Label ok;
266 And(at, dst, Operand((1 << kPointerSizeLog2) - 1));
267 Branch(&ok, eq, at, Operand(zero_reg));
268 stop("Unaligned cell in write barrier");
269 bind(&ok);
270 }
271
272 // Record the actual write.
273 if (ra_status == kRAHasNotBeenSaved) {
274 push(ra);
275 }
276 RecordWriteStub stub(isolate(), object, map, dst, OMIT_REMEMBERED_SET,
277 fp_mode);
278 CallStub(&stub);
279 if (ra_status == kRAHasNotBeenSaved) {
280 pop(ra);
281 }
282
283 bind(&done);
284
285 // Count number of write barriers in generated code.
286 isolate()->counters()->write_barriers_static()->Increment();
287 IncrementCounter(isolate()->counters()->write_barriers_dynamic(), 1, at, dst);
288
289 // Clobber clobbered registers when running with the debug-code flag
290 // turned on to provoke errors.
291 if (emit_debug_code()) {
292 li(dst, Operand(bit_cast<int32_t>(kZapValue + 12)));
293 li(map, Operand(bit_cast<int32_t>(kZapValue + 16)));
Steve Block44f0eee2011-05-26 01:26:41 +0100294 }
295}
296
297
Ben Murdoch4a90d5f2016-03-22 12:00:34 +0000298// Clobbers object, address, value, and ra, if (ra_status == kRAHasBeenSaved)
299// The register 'object' contains a heap object pointer. The heap object
Steve Block44f0eee2011-05-26 01:26:41 +0100300// tag is shifted away.
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000301void MacroAssembler::RecordWrite(
302 Register object,
303 Register address,
304 Register value,
305 RAStatus ra_status,
306 SaveFPRegsMode fp_mode,
307 RememberedSetAction remembered_set_action,
308 SmiCheck smi_check,
309 PointersToHereCheck pointers_to_here_check_for_value) {
310 DCHECK(!AreAliased(object, address, value, t8));
311 DCHECK(!AreAliased(object, address, value, t9));
Ben Murdoch3ef787d2012-04-12 10:51:47 +0100312
313 if (emit_debug_code()) {
314 lw(at, MemOperand(address));
315 Assert(
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000316 eq, kWrongAddressOrValuePassedToRecordWrite, at, Operand(value));
Ben Murdoch3ef787d2012-04-12 10:51:47 +0100317 }
Ben Murdochc7cc0282012-03-05 14:35:55 +0000318
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000319 if (remembered_set_action == OMIT_REMEMBERED_SET &&
320 !FLAG_incremental_marking) {
321 return;
322 }
323
324 // First, check if a write barrier is even needed. The tests below
325 // catch stores of smis and stores into the young generation.
Steve Block44f0eee2011-05-26 01:26:41 +0100326 Label done;
327
Ben Murdoch3ef787d2012-04-12 10:51:47 +0100328 if (smi_check == INLINE_SMI_CHECK) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000329 DCHECK_EQ(0, kSmiTag);
Ben Murdoch3ef787d2012-04-12 10:51:47 +0100330 JumpIfSmi(value, &done);
331 }
332
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000333 if (pointers_to_here_check_for_value != kPointersToHereAreAlwaysInteresting) {
334 CheckPageFlag(value,
335 value, // Used as scratch.
336 MemoryChunk::kPointersToHereAreInterestingMask,
337 eq,
338 &done);
339 }
Ben Murdoch3ef787d2012-04-12 10:51:47 +0100340 CheckPageFlag(object,
341 value, // Used as scratch.
342 MemoryChunk::kPointersFromHereAreInterestingMask,
343 eq,
344 &done);
Steve Block44f0eee2011-05-26 01:26:41 +0100345
346 // Record the actual write.
Ben Murdoch3ef787d2012-04-12 10:51:47 +0100347 if (ra_status == kRAHasNotBeenSaved) {
348 push(ra);
349 }
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000350 RecordWriteStub stub(isolate(), object, value, address, remembered_set_action,
351 fp_mode);
Ben Murdoch3ef787d2012-04-12 10:51:47 +0100352 CallStub(&stub);
353 if (ra_status == kRAHasNotBeenSaved) {
354 pop(ra);
355 }
Steve Block44f0eee2011-05-26 01:26:41 +0100356
357 bind(&done);
358
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000359 // Count number of write barriers in generated code.
360 isolate()->counters()->write_barriers_static()->Increment();
361 IncrementCounter(isolate()->counters()->write_barriers_dynamic(), 1, at,
362 value);
363
Ben Murdoch3ef787d2012-04-12 10:51:47 +0100364 // Clobber clobbered registers when running with the debug-code flag
Steve Block44f0eee2011-05-26 01:26:41 +0100365 // turned on to provoke errors.
Ben Murdoch257744e2011-11-30 15:57:28 +0000366 if (emit_debug_code()) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000367 li(address, Operand(bit_cast<int32_t>(kZapValue + 12)));
368 li(value, Operand(bit_cast<int32_t>(kZapValue + 16)));
Ben Murdoch3ef787d2012-04-12 10:51:47 +0100369 }
370}
371
372
373void MacroAssembler::RememberedSetHelper(Register object, // For debug tests.
374 Register address,
375 Register scratch,
376 SaveFPRegsMode fp_mode,
377 RememberedSetFinalAction and_then) {
378 Label done;
379 if (emit_debug_code()) {
380 Label ok;
381 JumpIfNotInNewSpace(object, scratch, &ok);
382 stop("Remembered set pointer is in new space");
383 bind(&ok);
384 }
385 // Load store buffer top.
386 ExternalReference store_buffer =
387 ExternalReference::store_buffer_top(isolate());
388 li(t8, Operand(store_buffer));
389 lw(scratch, MemOperand(t8));
390 // Store pointer to buffer and increment buffer top.
391 sw(address, MemOperand(scratch));
392 Addu(scratch, scratch, kPointerSize);
393 // Write back new top of buffer.
394 sw(scratch, MemOperand(t8));
395 // Call stub on end of buffer.
396 // Check for end of buffer.
397 And(t8, scratch, Operand(StoreBuffer::kStoreBufferOverflowBit));
398 if (and_then == kFallThroughAtEnd) {
399 Branch(&done, eq, t8, Operand(zero_reg));
400 } else {
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000401 DCHECK(and_then == kReturnAtEnd);
Ben Murdoch3ef787d2012-04-12 10:51:47 +0100402 Ret(eq, t8, Operand(zero_reg));
403 }
404 push(ra);
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000405 StoreBufferOverflowStub store_buffer_overflow(isolate(), fp_mode);
Ben Murdoch3ef787d2012-04-12 10:51:47 +0100406 CallStub(&store_buffer_overflow);
407 pop(ra);
408 bind(&done);
409 if (and_then == kReturnAtEnd) {
410 Ret();
Steve Block44f0eee2011-05-26 01:26:41 +0100411 }
412}
413
414
415// -----------------------------------------------------------------------------
Ben Murdoch257744e2011-11-30 15:57:28 +0000416// Allocation support.
Steve Block44f0eee2011-05-26 01:26:41 +0100417
418
419void MacroAssembler::CheckAccessGlobalProxy(Register holder_reg,
420 Register scratch,
421 Label* miss) {
422 Label same_contexts;
423
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000424 DCHECK(!holder_reg.is(scratch));
425 DCHECK(!holder_reg.is(at));
426 DCHECK(!scratch.is(at));
Steve Block44f0eee2011-05-26 01:26:41 +0100427
428 // Load current lexical context from the stack frame.
429 lw(scratch, MemOperand(fp, StandardFrameConstants::kContextOffset));
430 // In debug mode, make sure the lexical context is set.
431#ifdef DEBUG
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000432 Check(ne, kWeShouldNotHaveAnEmptyLexicalContext,
Steve Block44f0eee2011-05-26 01:26:41 +0100433 scratch, Operand(zero_reg));
434#endif
435
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000436 // Load the native context of the current context.
Ben Murdoch4a90d5f2016-03-22 12:00:34 +0000437 lw(scratch, ContextMemOperand(scratch, Context::NATIVE_CONTEXT_INDEX));
Steve Block44f0eee2011-05-26 01:26:41 +0100438
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000439 // Check the context is a native context.
Ben Murdoch257744e2011-11-30 15:57:28 +0000440 if (emit_debug_code()) {
Ben Murdoch257744e2011-11-30 15:57:28 +0000441 push(holder_reg); // Temporarily save holder on the stack.
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000442 // Read the first word and compare to the native_context_map.
Steve Block44f0eee2011-05-26 01:26:41 +0100443 lw(holder_reg, FieldMemOperand(scratch, HeapObject::kMapOffset));
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000444 LoadRoot(at, Heap::kNativeContextMapRootIndex);
445 Check(eq, kJSGlobalObjectNativeContextShouldBeANativeContext,
Steve Block44f0eee2011-05-26 01:26:41 +0100446 holder_reg, Operand(at));
Ben Murdoch257744e2011-11-30 15:57:28 +0000447 pop(holder_reg); // Restore holder.
Steve Block44f0eee2011-05-26 01:26:41 +0100448 }
449
450 // Check if both contexts are the same.
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000451 lw(at, FieldMemOperand(holder_reg, JSGlobalProxy::kNativeContextOffset));
Steve Block44f0eee2011-05-26 01:26:41 +0100452 Branch(&same_contexts, eq, scratch, Operand(at));
453
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000454 // Check the context is a native context.
Ben Murdoch257744e2011-11-30 15:57:28 +0000455 if (emit_debug_code()) {
Ben Murdoch257744e2011-11-30 15:57:28 +0000456 push(holder_reg); // Temporarily save holder on the stack.
Steve Block44f0eee2011-05-26 01:26:41 +0100457 mov(holder_reg, at); // Move at to its holding place.
458 LoadRoot(at, Heap::kNullValueRootIndex);
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000459 Check(ne, kJSGlobalProxyContextShouldNotBeNull,
Steve Block44f0eee2011-05-26 01:26:41 +0100460 holder_reg, Operand(at));
461
462 lw(holder_reg, FieldMemOperand(holder_reg, HeapObject::kMapOffset));
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000463 LoadRoot(at, Heap::kNativeContextMapRootIndex);
464 Check(eq, kJSGlobalObjectNativeContextShouldBeANativeContext,
Steve Block44f0eee2011-05-26 01:26:41 +0100465 holder_reg, Operand(at));
466 // Restore at is not needed. at is reloaded below.
Ben Murdoch257744e2011-11-30 15:57:28 +0000467 pop(holder_reg); // Restore holder.
Steve Block44f0eee2011-05-26 01:26:41 +0100468 // Restore at to holder's context.
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000469 lw(at, FieldMemOperand(holder_reg, JSGlobalProxy::kNativeContextOffset));
Steve Block44f0eee2011-05-26 01:26:41 +0100470 }
471
472 // Check that the security token in the calling global object is
473 // compatible with the security token in the receiving global
474 // object.
475 int token_offset = Context::kHeaderSize +
476 Context::SECURITY_TOKEN_INDEX * kPointerSize;
477
478 lw(scratch, FieldMemOperand(scratch, token_offset));
479 lw(at, FieldMemOperand(at, token_offset));
480 Branch(miss, ne, scratch, Operand(at));
481
482 bind(&same_contexts);
Andrei Popescu31002712010-02-23 13:46:05 +0000483}
484
485
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000486// Compute the hash code from the untagged key. This must be kept in sync with
487// ComputeIntegerHash in utils.h and KeyedLoadGenericStub in
488// code-stub-hydrogen.cc
Ben Murdochc7cc0282012-03-05 14:35:55 +0000489void MacroAssembler::GetNumberHash(Register reg0, Register scratch) {
490 // First of all we assign the hash seed to scratch.
491 LoadRoot(scratch, Heap::kHashSeedRootIndex);
492 SmiUntag(scratch);
493
494 // Xor original key with a seed.
495 xor_(reg0, reg0, scratch);
496
497 // Compute the hash code from the untagged key. This must be kept in sync
498 // with ComputeIntegerHash in utils.h.
499 //
500 // hash = ~hash + (hash << 15);
501 nor(scratch, reg0, zero_reg);
502 sll(at, reg0, 15);
503 addu(reg0, scratch, at);
504
505 // hash = hash ^ (hash >> 12);
506 srl(at, reg0, 12);
507 xor_(reg0, reg0, at);
508
509 // hash = hash + (hash << 2);
510 sll(at, reg0, 2);
511 addu(reg0, reg0, at);
512
513 // hash = hash ^ (hash >> 4);
514 srl(at, reg0, 4);
515 xor_(reg0, reg0, at);
516
517 // hash = hash * 2057;
Ben Murdoch3ef787d2012-04-12 10:51:47 +0100518 sll(scratch, reg0, 11);
519 sll(at, reg0, 3);
520 addu(reg0, reg0, at);
521 addu(reg0, reg0, scratch);
Ben Murdochc7cc0282012-03-05 14:35:55 +0000522
523 // hash = hash ^ (hash >> 16);
524 srl(at, reg0, 16);
525 xor_(reg0, reg0, at);
Ben Murdoch4a90d5f2016-03-22 12:00:34 +0000526 And(reg0, reg0, Operand(0x3fffffff));
Ben Murdochc7cc0282012-03-05 14:35:55 +0000527}
528
529
Ben Murdoch3fb3ca82011-12-02 17:19:32 +0000530void MacroAssembler::LoadFromNumberDictionary(Label* miss,
531 Register elements,
532 Register key,
533 Register result,
534 Register reg0,
535 Register reg1,
536 Register reg2) {
537 // Register use:
538 //
539 // elements - holds the slow-case elements of the receiver on entry.
540 // Unchanged unless 'result' is the same register.
541 //
542 // key - holds the smi key on entry.
543 // Unchanged unless 'result' is the same register.
544 //
545 //
546 // result - holds the result on exit if the load succeeded.
547 // Allowed to be the same as 'key' or 'result'.
548 // Unchanged on bailout so 'key' or 'result' can be used
549 // in further computation.
550 //
551 // Scratch registers:
552 //
553 // reg0 - holds the untagged key on entry and holds the hash once computed.
554 //
555 // reg1 - Used to hold the capacity mask of the dictionary.
556 //
557 // reg2 - Used for the index into the dictionary.
558 // at - Temporary (avoid MacroAssembler instructions also using 'at').
559 Label done;
560
Ben Murdochc7cc0282012-03-05 14:35:55 +0000561 GetNumberHash(reg0, reg1);
Ben Murdoch3fb3ca82011-12-02 17:19:32 +0000562
563 // Compute the capacity mask.
Ben Murdochc7cc0282012-03-05 14:35:55 +0000564 lw(reg1, FieldMemOperand(elements, SeededNumberDictionary::kCapacityOffset));
Ben Murdoch3fb3ca82011-12-02 17:19:32 +0000565 sra(reg1, reg1, kSmiTagSize);
566 Subu(reg1, reg1, Operand(1));
567
568 // Generate an unrolled loop that performs a few probes before giving up.
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000569 for (int i = 0; i < kNumberDictionaryProbes; i++) {
Ben Murdoch3fb3ca82011-12-02 17:19:32 +0000570 // Use reg2 for index calculations and keep the hash intact in reg0.
571 mov(reg2, reg0);
572 // Compute the masked index: (hash + i + i * i) & mask.
573 if (i > 0) {
Ben Murdochc7cc0282012-03-05 14:35:55 +0000574 Addu(reg2, reg2, Operand(SeededNumberDictionary::GetProbeOffset(i)));
Ben Murdoch3fb3ca82011-12-02 17:19:32 +0000575 }
576 and_(reg2, reg2, reg1);
577
578 // Scale the index by multiplying by the element size.
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000579 DCHECK(SeededNumberDictionary::kEntrySize == 3);
Ben Murdoch3fb3ca82011-12-02 17:19:32 +0000580 sll(at, reg2, 1); // 2x.
581 addu(reg2, reg2, at); // reg2 = reg2 * 3.
582
583 // Check if the key is identical to the name.
584 sll(at, reg2, kPointerSizeLog2);
585 addu(reg2, elements, at);
586
Ben Murdochc7cc0282012-03-05 14:35:55 +0000587 lw(at, FieldMemOperand(reg2, SeededNumberDictionary::kElementsStartOffset));
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000588 if (i != kNumberDictionaryProbes - 1) {
Ben Murdoch3fb3ca82011-12-02 17:19:32 +0000589 Branch(&done, eq, key, Operand(at));
590 } else {
591 Branch(miss, ne, key, Operand(at));
592 }
593 }
594
595 bind(&done);
Emily Bernierd0a1eb72015-03-24 16:35:39 -0400596 // Check that the value is a field property.
Ben Murdoch3fb3ca82011-12-02 17:19:32 +0000597 // reg2: elements + (index * kPointerSize).
598 const int kDetailsOffset =
Ben Murdochc7cc0282012-03-05 14:35:55 +0000599 SeededNumberDictionary::kElementsStartOffset + 2 * kPointerSize;
Ben Murdoch3fb3ca82011-12-02 17:19:32 +0000600 lw(reg1, FieldMemOperand(reg2, kDetailsOffset));
Ben Murdoch4a90d5f2016-03-22 12:00:34 +0000601 DCHECK_EQ(DATA, 0);
Ben Murdoch589d6972011-11-30 16:04:58 +0000602 And(at, reg1, Operand(Smi::FromInt(PropertyDetails::TypeField::kMask)));
Ben Murdoch3fb3ca82011-12-02 17:19:32 +0000603 Branch(miss, ne, at, Operand(zero_reg));
604
605 // Get the value at the masked, scaled index and return.
606 const int kValueOffset =
Ben Murdochc7cc0282012-03-05 14:35:55 +0000607 SeededNumberDictionary::kElementsStartOffset + kPointerSize;
Ben Murdoch3fb3ca82011-12-02 17:19:32 +0000608 lw(result, FieldMemOperand(reg2, kValueOffset));
609}
610
611
Andrei Popescu31002712010-02-23 13:46:05 +0000612// ---------------------------------------------------------------------------
Ben Murdoch257744e2011-11-30 15:57:28 +0000613// Instruction macros.
Andrei Popescu31002712010-02-23 13:46:05 +0000614
Andrei Popescu31002712010-02-23 13:46:05 +0000615void MacroAssembler::Addu(Register rd, Register rs, const Operand& rt) {
616 if (rt.is_reg()) {
617 addu(rd, rs, rt.rm());
618 } else {
Steve Block44f0eee2011-05-26 01:26:41 +0100619 if (is_int16(rt.imm32_) && !MustUseReg(rt.rmode_)) {
Andrei Popescu31002712010-02-23 13:46:05 +0000620 addiu(rd, rs, rt.imm32_);
621 } else {
622 // li handles the relocation.
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000623 DCHECK(!rs.is(at));
Andrei Popescu31002712010-02-23 13:46:05 +0000624 li(at, rt);
625 addu(rd, rs, at);
626 }
627 }
628}
629
630
Steve Block44f0eee2011-05-26 01:26:41 +0100631void MacroAssembler::Subu(Register rd, Register rs, const Operand& rt) {
632 if (rt.is_reg()) {
633 subu(rd, rs, rt.rm());
634 } else {
635 if (is_int16(rt.imm32_) && !MustUseReg(rt.rmode_)) {
636 addiu(rd, rs, -rt.imm32_); // No subiu instr, use addiu(x, y, -imm).
637 } else {
638 // li handles the relocation.
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000639 DCHECK(!rs.is(at));
Steve Block44f0eee2011-05-26 01:26:41 +0100640 li(at, rt);
641 subu(rd, rs, at);
642 }
643 }
644}
645
646
Andrei Popescu31002712010-02-23 13:46:05 +0000647void MacroAssembler::Mul(Register rd, Register rs, const Operand& rt) {
648 if (rt.is_reg()) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000649 if (IsMipsArchVariant(kLoongson)) {
Ben Murdoch3ef787d2012-04-12 10:51:47 +0100650 mult(rs, rt.rm());
651 mflo(rd);
652 } else {
653 mul(rd, rs, rt.rm());
654 }
Andrei Popescu31002712010-02-23 13:46:05 +0000655 } else {
656 // li handles the relocation.
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000657 DCHECK(!rs.is(at));
Andrei Popescu31002712010-02-23 13:46:05 +0000658 li(at, rt);
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000659 if (IsMipsArchVariant(kLoongson)) {
Ben Murdoch3ef787d2012-04-12 10:51:47 +0100660 mult(rs, at);
661 mflo(rd);
662 } else {
663 mul(rd, rs, at);
664 }
Andrei Popescu31002712010-02-23 13:46:05 +0000665 }
666}
667
668
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000669void MacroAssembler::Mul(Register rd_hi, Register rd_lo,
670 Register rs, const Operand& rt) {
671 if (rt.is_reg()) {
672 if (!IsMipsArchVariant(kMips32r6)) {
673 mult(rs, rt.rm());
674 mflo(rd_lo);
675 mfhi(rd_hi);
676 } else {
677 if (rd_lo.is(rs)) {
678 DCHECK(!rd_hi.is(rs));
679 DCHECK(!rd_hi.is(rt.rm()) && !rd_lo.is(rt.rm()));
680 muh(rd_hi, rs, rt.rm());
681 mul(rd_lo, rs, rt.rm());
682 } else {
683 DCHECK(!rd_hi.is(rt.rm()) && !rd_lo.is(rt.rm()));
684 mul(rd_lo, rs, rt.rm());
685 muh(rd_hi, rs, rt.rm());
686 }
687 }
688 } else {
689 // li handles the relocation.
690 DCHECK(!rs.is(at));
691 li(at, rt);
692 if (!IsMipsArchVariant(kMips32r6)) {
693 mult(rs, at);
694 mflo(rd_lo);
695 mfhi(rd_hi);
696 } else {
697 if (rd_lo.is(rs)) {
698 DCHECK(!rd_hi.is(rs));
699 DCHECK(!rd_hi.is(at) && !rd_lo.is(at));
700 muh(rd_hi, rs, at);
701 mul(rd_lo, rs, at);
702 } else {
703 DCHECK(!rd_hi.is(at) && !rd_lo.is(at));
704 mul(rd_lo, rs, at);
705 muh(rd_hi, rs, at);
706 }
707 }
708 }
709}
710
711
712void MacroAssembler::Mulh(Register rd, Register rs, const Operand& rt) {
713 if (rt.is_reg()) {
714 if (!IsMipsArchVariant(kMips32r6)) {
715 mult(rs, rt.rm());
716 mfhi(rd);
717 } else {
718 muh(rd, rs, rt.rm());
719 }
720 } else {
721 // li handles the relocation.
722 DCHECK(!rs.is(at));
723 li(at, rt);
724 if (!IsMipsArchVariant(kMips32r6)) {
725 mult(rs, at);
726 mfhi(rd);
727 } else {
728 muh(rd, rs, at);
729 }
730 }
731}
732
733
Andrei Popescu31002712010-02-23 13:46:05 +0000734void MacroAssembler::Mult(Register rs, const Operand& rt) {
735 if (rt.is_reg()) {
736 mult(rs, rt.rm());
737 } else {
738 // li handles the relocation.
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000739 DCHECK(!rs.is(at));
Andrei Popescu31002712010-02-23 13:46:05 +0000740 li(at, rt);
741 mult(rs, at);
742 }
743}
744
745
Emily Bernierd0a1eb72015-03-24 16:35:39 -0400746void MacroAssembler::Mulhu(Register rd, Register rs, const Operand& rt) {
747 if (rt.is_reg()) {
748 if (!IsMipsArchVariant(kMips32r6)) {
749 multu(rs, rt.rm());
750 mfhi(rd);
751 } else {
752 muhu(rd, rs, rt.rm());
753 }
754 } else {
755 // li handles the relocation.
756 DCHECK(!rs.is(at));
757 li(at, rt);
758 if (!IsMipsArchVariant(kMips32r6)) {
759 multu(rs, at);
760 mfhi(rd);
761 } else {
762 muhu(rd, rs, at);
763 }
764 }
765}
766
767
Andrei Popescu31002712010-02-23 13:46:05 +0000768void MacroAssembler::Multu(Register rs, const Operand& rt) {
769 if (rt.is_reg()) {
770 multu(rs, rt.rm());
771 } else {
772 // li handles the relocation.
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000773 DCHECK(!rs.is(at));
Andrei Popescu31002712010-02-23 13:46:05 +0000774 li(at, rt);
775 multu(rs, at);
776 }
777}
778
779
780void MacroAssembler::Div(Register rs, const Operand& rt) {
781 if (rt.is_reg()) {
782 div(rs, rt.rm());
783 } else {
784 // li handles the relocation.
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000785 DCHECK(!rs.is(at));
Andrei Popescu31002712010-02-23 13:46:05 +0000786 li(at, rt);
787 div(rs, at);
788 }
789}
790
791
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000792void MacroAssembler::Div(Register rem, Register res,
793 Register rs, const Operand& rt) {
794 if (rt.is_reg()) {
795 if (!IsMipsArchVariant(kMips32r6)) {
796 div(rs, rt.rm());
797 mflo(res);
798 mfhi(rem);
799 } else {
800 div(res, rs, rt.rm());
801 mod(rem, rs, rt.rm());
802 }
803 } else {
804 // li handles the relocation.
805 DCHECK(!rs.is(at));
806 li(at, rt);
807 if (!IsMipsArchVariant(kMips32r6)) {
808 div(rs, at);
809 mflo(res);
810 mfhi(rem);
811 } else {
812 div(res, rs, at);
813 mod(rem, rs, at);
814 }
815 }
816}
817
818
Emily Bernierd0a1eb72015-03-24 16:35:39 -0400819void MacroAssembler::Div(Register res, Register rs, const Operand& rt) {
820 if (rt.is_reg()) {
821 if (!IsMipsArchVariant(kMips32r6)) {
822 div(rs, rt.rm());
823 mflo(res);
824 } else {
825 div(res, rs, rt.rm());
826 }
827 } else {
828 // li handles the relocation.
829 DCHECK(!rs.is(at));
830 li(at, rt);
831 if (!IsMipsArchVariant(kMips32r6)) {
832 div(rs, at);
833 mflo(res);
834 } else {
835 div(res, rs, at);
836 }
837 }
838}
839
840
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000841void MacroAssembler::Mod(Register rd, Register rs, const Operand& rt) {
842 if (rt.is_reg()) {
843 if (!IsMipsArchVariant(kMips32r6)) {
844 div(rs, rt.rm());
845 mfhi(rd);
846 } else {
847 mod(rd, rs, rt.rm());
848 }
849 } else {
850 // li handles the relocation.
851 DCHECK(!rs.is(at));
852 li(at, rt);
853 if (!IsMipsArchVariant(kMips32r6)) {
854 div(rs, at);
855 mfhi(rd);
856 } else {
857 mod(rd, rs, at);
858 }
859 }
860}
861
862
Emily Bernierd0a1eb72015-03-24 16:35:39 -0400863void MacroAssembler::Modu(Register rd, Register rs, const Operand& rt) {
864 if (rt.is_reg()) {
865 if (!IsMipsArchVariant(kMips32r6)) {
866 divu(rs, rt.rm());
867 mfhi(rd);
868 } else {
869 modu(rd, rs, rt.rm());
870 }
871 } else {
872 // li handles the relocation.
873 DCHECK(!rs.is(at));
874 li(at, rt);
875 if (!IsMipsArchVariant(kMips32r6)) {
876 divu(rs, at);
877 mfhi(rd);
878 } else {
879 modu(rd, rs, at);
880 }
881 }
882}
883
884
Andrei Popescu31002712010-02-23 13:46:05 +0000885void MacroAssembler::Divu(Register rs, const Operand& rt) {
886 if (rt.is_reg()) {
887 divu(rs, rt.rm());
888 } else {
889 // li handles the relocation.
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000890 DCHECK(!rs.is(at));
Andrei Popescu31002712010-02-23 13:46:05 +0000891 li(at, rt);
892 divu(rs, at);
893 }
894}
895
896
Emily Bernierd0a1eb72015-03-24 16:35:39 -0400897void MacroAssembler::Divu(Register res, Register rs, const Operand& rt) {
898 if (rt.is_reg()) {
899 if (!IsMipsArchVariant(kMips32r6)) {
900 divu(rs, rt.rm());
901 mflo(res);
902 } else {
903 divu(res, rs, rt.rm());
904 }
905 } else {
906 // li handles the relocation.
907 DCHECK(!rs.is(at));
908 li(at, rt);
909 if (!IsMipsArchVariant(kMips32r6)) {
910 divu(rs, at);
911 mflo(res);
912 } else {
913 divu(res, rs, at);
914 }
915 }
916}
917
918
Andrei Popescu31002712010-02-23 13:46:05 +0000919void MacroAssembler::And(Register rd, Register rs, const Operand& rt) {
920 if (rt.is_reg()) {
921 and_(rd, rs, rt.rm());
922 } else {
Steve Block44f0eee2011-05-26 01:26:41 +0100923 if (is_uint16(rt.imm32_) && !MustUseReg(rt.rmode_)) {
Andrei Popescu31002712010-02-23 13:46:05 +0000924 andi(rd, rs, rt.imm32_);
925 } else {
926 // li handles the relocation.
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000927 DCHECK(!rs.is(at));
Andrei Popescu31002712010-02-23 13:46:05 +0000928 li(at, rt);
929 and_(rd, rs, at);
930 }
931 }
932}
933
934
935void MacroAssembler::Or(Register rd, Register rs, const Operand& rt) {
936 if (rt.is_reg()) {
937 or_(rd, rs, rt.rm());
938 } else {
Steve Block44f0eee2011-05-26 01:26:41 +0100939 if (is_uint16(rt.imm32_) && !MustUseReg(rt.rmode_)) {
Andrei Popescu31002712010-02-23 13:46:05 +0000940 ori(rd, rs, rt.imm32_);
941 } else {
942 // li handles the relocation.
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000943 DCHECK(!rs.is(at));
Andrei Popescu31002712010-02-23 13:46:05 +0000944 li(at, rt);
945 or_(rd, rs, at);
946 }
947 }
948}
949
950
951void MacroAssembler::Xor(Register rd, Register rs, const Operand& rt) {
952 if (rt.is_reg()) {
953 xor_(rd, rs, rt.rm());
954 } else {
Steve Block44f0eee2011-05-26 01:26:41 +0100955 if (is_uint16(rt.imm32_) && !MustUseReg(rt.rmode_)) {
Andrei Popescu31002712010-02-23 13:46:05 +0000956 xori(rd, rs, rt.imm32_);
957 } else {
958 // li handles the relocation.
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000959 DCHECK(!rs.is(at));
Andrei Popescu31002712010-02-23 13:46:05 +0000960 li(at, rt);
961 xor_(rd, rs, at);
962 }
963 }
964}
965
966
967void MacroAssembler::Nor(Register rd, Register rs, const Operand& rt) {
968 if (rt.is_reg()) {
969 nor(rd, rs, rt.rm());
970 } else {
971 // li handles the relocation.
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000972 DCHECK(!rs.is(at));
Andrei Popescu31002712010-02-23 13:46:05 +0000973 li(at, rt);
974 nor(rd, rs, at);
975 }
976}
977
978
Ben Murdoch257744e2011-11-30 15:57:28 +0000979void MacroAssembler::Neg(Register rs, const Operand& rt) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000980 DCHECK(rt.is_reg());
981 DCHECK(!at.is(rs));
982 DCHECK(!at.is(rt.rm()));
Ben Murdoch257744e2011-11-30 15:57:28 +0000983 li(at, -1);
984 xor_(rs, rt.rm(), at);
985}
986
987
Andrei Popescu31002712010-02-23 13:46:05 +0000988void MacroAssembler::Slt(Register rd, Register rs, const Operand& rt) {
989 if (rt.is_reg()) {
990 slt(rd, rs, rt.rm());
991 } else {
Steve Block44f0eee2011-05-26 01:26:41 +0100992 if (is_int16(rt.imm32_) && !MustUseReg(rt.rmode_)) {
Andrei Popescu31002712010-02-23 13:46:05 +0000993 slti(rd, rs, rt.imm32_);
994 } else {
995 // li handles the relocation.
Ben Murdochb8a8cc12014-11-26 15:28:44 +0000996 DCHECK(!rs.is(at));
Andrei Popescu31002712010-02-23 13:46:05 +0000997 li(at, rt);
998 slt(rd, rs, at);
999 }
1000 }
1001}
1002
1003
1004void MacroAssembler::Sltu(Register rd, Register rs, const Operand& rt) {
1005 if (rt.is_reg()) {
1006 sltu(rd, rs, rt.rm());
1007 } else {
Steve Block44f0eee2011-05-26 01:26:41 +01001008 if (is_uint16(rt.imm32_) && !MustUseReg(rt.rmode_)) {
Andrei Popescu31002712010-02-23 13:46:05 +00001009 sltiu(rd, rs, rt.imm32_);
1010 } else {
1011 // li handles the relocation.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001012 DCHECK(!rs.is(at));
Andrei Popescu31002712010-02-23 13:46:05 +00001013 li(at, rt);
1014 sltu(rd, rs, at);
1015 }
1016 }
1017}
1018
1019
Steve Block44f0eee2011-05-26 01:26:41 +01001020void MacroAssembler::Ror(Register rd, Register rs, const Operand& rt) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001021 if (IsMipsArchVariant(kMips32r2) || IsMipsArchVariant(kMips32r6)) {
Steve Block44f0eee2011-05-26 01:26:41 +01001022 if (rt.is_reg()) {
1023 rotrv(rd, rs, rt.rm());
1024 } else {
1025 rotr(rd, rs, rt.imm32_);
1026 }
1027 } else {
1028 if (rt.is_reg()) {
1029 subu(at, zero_reg, rt.rm());
1030 sllv(at, rs, at);
1031 srlv(rd, rs, rt.rm());
1032 or_(rd, rd, at);
1033 } else {
1034 if (rt.imm32_ == 0) {
1035 srl(rd, rs, 0);
1036 } else {
1037 srl(at, rs, rt.imm32_);
1038 sll(rd, rs, (0x20 - rt.imm32_) & 0x1f);
1039 or_(rd, rd, at);
1040 }
1041 }
1042 }
Andrei Popescu31002712010-02-23 13:46:05 +00001043}
1044
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001045
1046void MacroAssembler::Pref(int32_t hint, const MemOperand& rs) {
1047 if (IsMipsArchVariant(kLoongson)) {
1048 lw(zero_reg, rs);
1049 } else {
1050 pref(hint, rs);
1051 }
1052}
1053
1054
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001055void MacroAssembler::Lsa(Register rd, Register rt, Register rs, uint8_t sa,
1056 Register scratch) {
1057 if (IsMipsArchVariant(kMips32r6) && sa <= 4) {
1058 lsa(rd, rt, rs, sa);
1059 } else {
1060 Register tmp = rd.is(rt) ? scratch : rd;
1061 DCHECK(!tmp.is(rt));
1062 sll(tmp, rs, sa);
1063 Addu(rd, rt, tmp);
1064 }
1065}
1066
1067
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001068// ------------Pseudo-instructions-------------
1069
1070void MacroAssembler::Ulw(Register rd, const MemOperand& rs) {
1071 lwr(rd, rs);
1072 lwl(rd, MemOperand(rs.rm(), rs.offset() + 3));
1073}
1074
1075
1076void MacroAssembler::Usw(Register rd, const MemOperand& rs) {
1077 swr(rd, rs);
1078 swl(rd, MemOperand(rs.rm(), rs.offset() + 3));
1079}
1080
1081
1082void MacroAssembler::li(Register dst, Handle<Object> value, LiFlags mode) {
1083 AllowDeferredHandleDereference smi_check;
1084 if (value->IsSmi()) {
1085 li(dst, Operand(value), mode);
1086 } else {
1087 DCHECK(value->IsHeapObject());
1088 if (isolate()->heap()->InNewSpace(*value)) {
1089 Handle<Cell> cell = isolate()->factory()->NewCell(value);
1090 li(dst, Operand(cell));
1091 lw(dst, FieldMemOperand(dst, Cell::kValueOffset));
1092 } else {
1093 li(dst, Operand(value));
1094 }
1095 }
1096}
1097
Steve Block44f0eee2011-05-26 01:26:41 +01001098
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001099void MacroAssembler::li(Register rd, Operand j, LiFlags mode) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001100 DCHECK(!j.is_reg());
Steve Block44f0eee2011-05-26 01:26:41 +01001101 BlockTrampolinePoolScope block_trampoline_pool(this);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001102 if (!MustUseReg(j.rmode_) && mode == OPTIMIZE_SIZE) {
Andrei Popescu31002712010-02-23 13:46:05 +00001103 // Normal load of an immediate value which does not need Relocation Info.
1104 if (is_int16(j.imm32_)) {
1105 addiu(rd, zero_reg, j.imm32_);
Steve Block44f0eee2011-05-26 01:26:41 +01001106 } else if (!(j.imm32_ & kHiMask)) {
Andrei Popescu31002712010-02-23 13:46:05 +00001107 ori(rd, zero_reg, j.imm32_);
Steve Block44f0eee2011-05-26 01:26:41 +01001108 } else if (!(j.imm32_ & kImm16Mask)) {
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001109 lui(rd, (j.imm32_ >> kLuiShift) & kImm16Mask);
Andrei Popescu31002712010-02-23 13:46:05 +00001110 } else {
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001111 lui(rd, (j.imm32_ >> kLuiShift) & kImm16Mask);
Steve Block44f0eee2011-05-26 01:26:41 +01001112 ori(rd, rd, (j.imm32_ & kImm16Mask));
Andrei Popescu31002712010-02-23 13:46:05 +00001113 }
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001114 } else {
Steve Block44f0eee2011-05-26 01:26:41 +01001115 if (MustUseReg(j.rmode_)) {
Andrei Popescu31002712010-02-23 13:46:05 +00001116 RecordRelocInfo(j.rmode_, j.imm32_);
1117 }
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001118 // We always need the same number of instructions as we may need to patch
Andrei Popescu31002712010-02-23 13:46:05 +00001119 // this code to load another value which may need 2 instructions to load.
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001120 lui(rd, (j.imm32_ >> kLuiShift) & kImm16Mask);
Ben Murdoch257744e2011-11-30 15:57:28 +00001121 ori(rd, rd, (j.imm32_ & kImm16Mask));
Andrei Popescu31002712010-02-23 13:46:05 +00001122 }
1123}
1124
1125
Andrei Popescu31002712010-02-23 13:46:05 +00001126void MacroAssembler::MultiPush(RegList regs) {
Ben Murdoch589d6972011-11-30 16:04:58 +00001127 int16_t num_to_push = NumberOfBitsSet(regs);
1128 int16_t stack_offset = num_to_push * kPointerSize;
Andrei Popescu31002712010-02-23 13:46:05 +00001129
Ben Murdoch589d6972011-11-30 16:04:58 +00001130 Subu(sp, sp, Operand(stack_offset));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001131 for (int16_t i = kNumRegisters - 1; i >= 0; i--) {
Andrei Popescu31002712010-02-23 13:46:05 +00001132 if ((regs & (1 << i)) != 0) {
Ben Murdoch589d6972011-11-30 16:04:58 +00001133 stack_offset -= kPointerSize;
1134 sw(ToRegister(i), MemOperand(sp, stack_offset));
Andrei Popescu31002712010-02-23 13:46:05 +00001135 }
1136 }
1137}
1138
1139
1140void MacroAssembler::MultiPushReversed(RegList regs) {
Ben Murdoch589d6972011-11-30 16:04:58 +00001141 int16_t num_to_push = NumberOfBitsSet(regs);
1142 int16_t stack_offset = num_to_push * kPointerSize;
Andrei Popescu31002712010-02-23 13:46:05 +00001143
Ben Murdoch589d6972011-11-30 16:04:58 +00001144 Subu(sp, sp, Operand(stack_offset));
Steve Block6ded16b2010-05-10 14:33:55 +01001145 for (int16_t i = 0; i < kNumRegisters; i++) {
Andrei Popescu31002712010-02-23 13:46:05 +00001146 if ((regs & (1 << i)) != 0) {
Ben Murdoch589d6972011-11-30 16:04:58 +00001147 stack_offset -= kPointerSize;
1148 sw(ToRegister(i), MemOperand(sp, stack_offset));
Andrei Popescu31002712010-02-23 13:46:05 +00001149 }
1150 }
1151}
1152
1153
1154void MacroAssembler::MultiPop(RegList regs) {
Ben Murdoch589d6972011-11-30 16:04:58 +00001155 int16_t stack_offset = 0;
Andrei Popescu31002712010-02-23 13:46:05 +00001156
Steve Block6ded16b2010-05-10 14:33:55 +01001157 for (int16_t i = 0; i < kNumRegisters; i++) {
Andrei Popescu31002712010-02-23 13:46:05 +00001158 if ((regs & (1 << i)) != 0) {
Ben Murdoch589d6972011-11-30 16:04:58 +00001159 lw(ToRegister(i), MemOperand(sp, stack_offset));
1160 stack_offset += kPointerSize;
Andrei Popescu31002712010-02-23 13:46:05 +00001161 }
1162 }
Ben Murdoch589d6972011-11-30 16:04:58 +00001163 addiu(sp, sp, stack_offset);
Andrei Popescu31002712010-02-23 13:46:05 +00001164}
1165
1166
1167void MacroAssembler::MultiPopReversed(RegList regs) {
Ben Murdoch589d6972011-11-30 16:04:58 +00001168 int16_t stack_offset = 0;
Andrei Popescu31002712010-02-23 13:46:05 +00001169
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001170 for (int16_t i = kNumRegisters - 1; i >= 0; i--) {
Andrei Popescu31002712010-02-23 13:46:05 +00001171 if ((regs & (1 << i)) != 0) {
Ben Murdoch589d6972011-11-30 16:04:58 +00001172 lw(ToRegister(i), MemOperand(sp, stack_offset));
1173 stack_offset += kPointerSize;
Andrei Popescu31002712010-02-23 13:46:05 +00001174 }
1175 }
Ben Murdoch589d6972011-11-30 16:04:58 +00001176 addiu(sp, sp, stack_offset);
1177}
1178
1179
1180void MacroAssembler::MultiPushFPU(RegList regs) {
Ben Murdoch589d6972011-11-30 16:04:58 +00001181 int16_t num_to_push = NumberOfBitsSet(regs);
1182 int16_t stack_offset = num_to_push * kDoubleSize;
1183
1184 Subu(sp, sp, Operand(stack_offset));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001185 for (int16_t i = kNumRegisters - 1; i >= 0; i--) {
Ben Murdoch589d6972011-11-30 16:04:58 +00001186 if ((regs & (1 << i)) != 0) {
1187 stack_offset -= kDoubleSize;
1188 sdc1(FPURegister::from_code(i), MemOperand(sp, stack_offset));
1189 }
1190 }
1191}
1192
1193
1194void MacroAssembler::MultiPushReversedFPU(RegList regs) {
Ben Murdoch589d6972011-11-30 16:04:58 +00001195 int16_t num_to_push = NumberOfBitsSet(regs);
1196 int16_t stack_offset = num_to_push * kDoubleSize;
1197
1198 Subu(sp, sp, Operand(stack_offset));
1199 for (int16_t i = 0; i < kNumRegisters; i++) {
1200 if ((regs & (1 << i)) != 0) {
1201 stack_offset -= kDoubleSize;
1202 sdc1(FPURegister::from_code(i), MemOperand(sp, stack_offset));
1203 }
1204 }
1205}
1206
1207
1208void MacroAssembler::MultiPopFPU(RegList regs) {
Ben Murdoch589d6972011-11-30 16:04:58 +00001209 int16_t stack_offset = 0;
1210
1211 for (int16_t i = 0; i < kNumRegisters; i++) {
1212 if ((regs & (1 << i)) != 0) {
1213 ldc1(FPURegister::from_code(i), MemOperand(sp, stack_offset));
1214 stack_offset += kDoubleSize;
1215 }
1216 }
1217 addiu(sp, sp, stack_offset);
1218}
1219
1220
1221void MacroAssembler::MultiPopReversedFPU(RegList regs) {
Ben Murdoch589d6972011-11-30 16:04:58 +00001222 int16_t stack_offset = 0;
1223
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001224 for (int16_t i = kNumRegisters - 1; i >= 0; i--) {
Ben Murdoch589d6972011-11-30 16:04:58 +00001225 if ((regs & (1 << i)) != 0) {
1226 ldc1(FPURegister::from_code(i), MemOperand(sp, stack_offset));
1227 stack_offset += kDoubleSize;
1228 }
1229 }
1230 addiu(sp, sp, stack_offset);
Andrei Popescu31002712010-02-23 13:46:05 +00001231}
1232
1233
Steve Block44f0eee2011-05-26 01:26:41 +01001234void MacroAssembler::Ext(Register rt,
1235 Register rs,
1236 uint16_t pos,
1237 uint16_t size) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001238 DCHECK(pos < 32);
1239 DCHECK(pos + size < 33);
Andrei Popescu31002712010-02-23 13:46:05 +00001240
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001241 if (IsMipsArchVariant(kMips32r2) || IsMipsArchVariant(kMips32r6)) {
Steve Block44f0eee2011-05-26 01:26:41 +01001242 ext_(rt, rs, pos, size);
1243 } else {
1244 // Move rs to rt and shift it left then right to get the
1245 // desired bitfield on the right side and zeroes on the left.
Ben Murdoch69a99ed2011-11-30 16:03:39 +00001246 int shift_left = 32 - (pos + size);
1247 sll(rt, rs, shift_left); // Acts as a move if shift_left == 0.
1248
1249 int shift_right = 32 - size;
1250 if (shift_right > 0) {
1251 srl(rt, rt, shift_right);
1252 }
Steve Block44f0eee2011-05-26 01:26:41 +01001253 }
1254}
1255
1256
1257void MacroAssembler::Ins(Register rt,
1258 Register rs,
1259 uint16_t pos,
1260 uint16_t size) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001261 DCHECK(pos < 32);
1262 DCHECK(pos + size <= 32);
1263 DCHECK(size != 0);
Steve Block44f0eee2011-05-26 01:26:41 +01001264
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001265 if (IsMipsArchVariant(kMips32r2) || IsMipsArchVariant(kMips32r6)) {
Steve Block44f0eee2011-05-26 01:26:41 +01001266 ins_(rt, rs, pos, size);
1267 } else {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001268 DCHECK(!rt.is(t8) && !rs.is(t8));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001269 Subu(at, zero_reg, Operand(1));
1270 srl(at, at, 32 - size);
1271 and_(t8, rs, at);
1272 sll(t8, t8, pos);
1273 sll(at, at, pos);
1274 nor(at, at, zero_reg);
1275 and_(at, rt, at);
1276 or_(rt, t8, at);
Steve Block44f0eee2011-05-26 01:26:41 +01001277 }
1278}
1279
1280
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001281void MacroAssembler::Cvt_d_uw(FPURegister fd, Register rs,
Ben Murdoch69a99ed2011-11-30 16:03:39 +00001282 FPURegister scratch) {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001283 // In FP64Mode we do convertion from long.
1284 if (IsFp64Mode()) {
1285 mtc1(rs, scratch);
1286 Mthc1(zero_reg, scratch);
1287 cvt_d_l(fd, scratch);
1288 } else {
1289 // Convert rs to a FP value in fd.
1290 DCHECK(!fd.is(scratch));
1291 DCHECK(!rs.is(at));
Steve Block44f0eee2011-05-26 01:26:41 +01001292
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001293 Label msb_clear, conversion_done;
1294 // For a value which is < 2^31, regard it as a signed positve word.
1295 Branch(&msb_clear, ge, rs, Operand(zero_reg), USE_DELAY_SLOT);
1296 mtc1(rs, fd);
Steve Block44f0eee2011-05-26 01:26:41 +01001297
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001298 li(at, 0x41F00000); // FP value: 2^32.
Steve Block44f0eee2011-05-26 01:26:41 +01001299
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001300 // For unsigned inputs > 2^31, we convert to double as a signed int32,
1301 // then add 2^32 to move it back to unsigned value in range 2^31..2^31-1.
1302 mtc1(zero_reg, scratch);
1303 Mthc1(at, scratch);
Steve Block44f0eee2011-05-26 01:26:41 +01001304
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001305 cvt_d_w(fd, fd);
Steve Block44f0eee2011-05-26 01:26:41 +01001306
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001307 Branch(USE_DELAY_SLOT, &conversion_done);
1308 add_d(fd, fd, scratch);
Steve Block44f0eee2011-05-26 01:26:41 +01001309
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001310 bind(&msb_clear);
1311 cvt_d_w(fd, fd);
Steve Block44f0eee2011-05-26 01:26:41 +01001312
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001313 bind(&conversion_done);
1314 }
Steve Block44f0eee2011-05-26 01:26:41 +01001315}
1316
1317
Ben Murdoch69a99ed2011-11-30 16:03:39 +00001318void MacroAssembler::Trunc_uw_d(FPURegister fd,
1319 FPURegister fs,
1320 FPURegister scratch) {
1321 Trunc_uw_d(fs, t8, scratch);
1322 mtc1(t8, fd);
Steve Block44f0eee2011-05-26 01:26:41 +01001323}
1324
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001325
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001326void MacroAssembler::Trunc_w_d(FPURegister fd, FPURegister fs) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001327 if (IsMipsArchVariant(kLoongson) && fd.is(fs)) {
1328 Mfhc1(t8, fs);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001329 trunc_w_d(fd, fs);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001330 Mthc1(t8, fs);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001331 } else {
1332 trunc_w_d(fd, fs);
1333 }
1334}
1335
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001336
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001337void MacroAssembler::Round_w_d(FPURegister fd, FPURegister fs) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001338 if (IsMipsArchVariant(kLoongson) && fd.is(fs)) {
1339 Mfhc1(t8, fs);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001340 round_w_d(fd, fs);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001341 Mthc1(t8, fs);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001342 } else {
1343 round_w_d(fd, fs);
1344 }
1345}
1346
1347
1348void MacroAssembler::Floor_w_d(FPURegister fd, FPURegister fs) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001349 if (IsMipsArchVariant(kLoongson) && fd.is(fs)) {
1350 Mfhc1(t8, fs);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001351 floor_w_d(fd, fs);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001352 Mthc1(t8, fs);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001353 } else {
1354 floor_w_d(fd, fs);
1355 }
1356}
1357
1358
1359void MacroAssembler::Ceil_w_d(FPURegister fd, FPURegister fs) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001360 if (IsMipsArchVariant(kLoongson) && fd.is(fs)) {
1361 Mfhc1(t8, fs);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001362 ceil_w_d(fd, fs);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001363 Mthc1(t8, fs);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001364 } else {
1365 ceil_w_d(fd, fs);
1366 }
1367}
1368
Steve Block44f0eee2011-05-26 01:26:41 +01001369
Ben Murdoch69a99ed2011-11-30 16:03:39 +00001370void MacroAssembler::Trunc_uw_d(FPURegister fd,
1371 Register rs,
1372 FPURegister scratch) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001373 DCHECK(!fd.is(scratch));
1374 DCHECK(!rs.is(at));
Steve Block44f0eee2011-05-26 01:26:41 +01001375
Ben Murdoch69a99ed2011-11-30 16:03:39 +00001376 // Load 2^31 into scratch as its float representation.
1377 li(at, 0x41E00000);
Ben Murdoch69a99ed2011-11-30 16:03:39 +00001378 mtc1(zero_reg, scratch);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001379 Mthc1(at, scratch);
Ben Murdoch69a99ed2011-11-30 16:03:39 +00001380 // Test if scratch > fd.
Ben Murdoch85b71792012-04-11 18:30:58 +01001381 // If fd < 2^31 we can convert it normally.
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001382 Label simple_convert;
1383 BranchF(&simple_convert, NULL, lt, fd, scratch);
Steve Block44f0eee2011-05-26 01:26:41 +01001384
1385 // First we subtract 2^31 from fd, then trunc it to rs
1386 // and add 2^31 to rs.
Ben Murdoch69a99ed2011-11-30 16:03:39 +00001387 sub_d(scratch, fd, scratch);
1388 trunc_w_d(scratch, scratch);
1389 mfc1(rs, scratch);
1390 Or(rs, rs, 1 << 31);
Steve Block44f0eee2011-05-26 01:26:41 +01001391
1392 Label done;
1393 Branch(&done);
1394 // Simple conversion.
1395 bind(&simple_convert);
Ben Murdoch69a99ed2011-11-30 16:03:39 +00001396 trunc_w_d(scratch, fd);
1397 mfc1(rs, scratch);
Steve Block44f0eee2011-05-26 01:26:41 +01001398
1399 bind(&done);
1400}
1401
1402
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001403void MacroAssembler::Mthc1(Register rt, FPURegister fs) {
1404 if (IsFp64Mode()) {
1405 mthc1(rt, fs);
1406 } else {
1407 mtc1(rt, fs.high());
1408 }
1409}
1410
1411
1412void MacroAssembler::Mfhc1(Register rt, FPURegister fs) {
1413 if (IsFp64Mode()) {
1414 mfhc1(rt, fs);
1415 } else {
1416 mfc1(rt, fs.high());
1417 }
1418}
1419
1420
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001421void MacroAssembler::BranchFCommon(SecondaryField sizeField, Label* target,
1422 Label* nan, Condition cond, FPURegister cmp1,
1423 FPURegister cmp2, BranchDelaySlot bd) {
1424 {
1425 BlockTrampolinePoolScope block_trampoline_pool(this);
1426 if (cond == al) {
1427 Branch(bd, target);
1428 return;
1429 }
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001430
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001431 if (IsMipsArchVariant(kMips32r6)) {
1432 sizeField = sizeField == D ? L : W;
1433 }
1434 DCHECK(nan || target);
1435 // Check for unordered (NaN) cases.
1436 if (nan) {
1437 bool long_branch =
1438 nan->is_bound() ? is_near(nan) : is_trampoline_emitted();
1439 if (!IsMipsArchVariant(kMips32r6)) {
1440 if (long_branch) {
1441 Label skip;
1442 c(UN, sizeField, cmp1, cmp2);
1443 bc1f(&skip);
1444 nop();
1445 BranchLong(nan, bd);
1446 bind(&skip);
1447 } else {
1448 c(UN, sizeField, cmp1, cmp2);
1449 bc1t(nan);
1450 if (bd == PROTECT) {
1451 nop();
1452 }
1453 }
1454 } else {
1455 // Use kDoubleCompareReg for comparison result. It has to be unavailable
1456 // to lithium register allocator.
1457 DCHECK(!cmp1.is(kDoubleCompareReg) && !cmp2.is(kDoubleCompareReg));
1458 if (long_branch) {
1459 Label skip;
1460 cmp(UN, sizeField, kDoubleCompareReg, cmp1, cmp2);
1461 bc1eqz(&skip, kDoubleCompareReg);
1462 nop();
1463 BranchLong(nan, bd);
1464 bind(&skip);
1465 } else {
1466 cmp(UN, sizeField, kDoubleCompareReg, cmp1, cmp2);
1467 bc1nez(nan, kDoubleCompareReg);
1468 if (bd == PROTECT) {
1469 nop();
1470 }
1471 }
1472 }
1473 }
1474
1475 if (target) {
1476 bool long_branch =
1477 target->is_bound() ? is_near(target) : is_trampoline_emitted();
1478 if (long_branch) {
1479 Label skip;
1480 Condition neg_cond = NegateFpuCondition(cond);
1481 BranchShortF(sizeField, &skip, neg_cond, cmp1, cmp2, bd);
1482 BranchLong(target, bd);
1483 bind(&skip);
1484 } else {
1485 BranchShortF(sizeField, target, cond, cmp1, cmp2, bd);
1486 }
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001487 }
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001488 }
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001489}
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001490
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001491void MacroAssembler::BranchShortF(SecondaryField sizeField, Label* target,
1492 Condition cc, FPURegister cmp1,
1493 FPURegister cmp2, BranchDelaySlot bd) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001494 if (!IsMipsArchVariant(kMips32r6)) {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001495 BlockTrampolinePoolScope block_trampoline_pool(this);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001496 if (target) {
1497 // Here NaN cases were either handled by this function or are assumed to
1498 // have been handled by the caller.
1499 switch (cc) {
1500 case lt:
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001501 c(OLT, sizeField, cmp1, cmp2);
1502 bc1t(target);
1503 break;
1504 case ult:
1505 c(ULT, sizeField, cmp1, cmp2);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001506 bc1t(target);
1507 break;
1508 case gt:
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001509 c(ULE, sizeField, cmp1, cmp2);
1510 bc1f(target);
1511 break;
1512 case ugt:
1513 c(OLE, sizeField, cmp1, cmp2);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001514 bc1f(target);
1515 break;
1516 case ge:
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001517 c(ULT, sizeField, cmp1, cmp2);
1518 bc1f(target);
1519 break;
1520 case uge:
1521 c(OLT, sizeField, cmp1, cmp2);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001522 bc1f(target);
1523 break;
1524 case le:
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001525 c(OLE, sizeField, cmp1, cmp2);
1526 bc1t(target);
1527 break;
1528 case ule:
1529 c(ULE, sizeField, cmp1, cmp2);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001530 bc1t(target);
1531 break;
1532 case eq:
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001533 c(EQ, sizeField, cmp1, cmp2);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001534 bc1t(target);
1535 break;
1536 case ueq:
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001537 c(UEQ, sizeField, cmp1, cmp2);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001538 bc1t(target);
1539 break;
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001540 case ne: // Unordered or not equal.
1541 c(EQ, sizeField, cmp1, cmp2);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001542 bc1f(target);
1543 break;
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001544 case ogl:
1545 c(UEQ, sizeField, cmp1, cmp2);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001546 bc1f(target);
1547 break;
1548 default:
1549 CHECK(0);
1550 }
1551 }
1552 } else {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001553 BlockTrampolinePoolScope block_trampoline_pool(this);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001554 if (target) {
1555 // Here NaN cases were either handled by this function or are assumed to
1556 // have been handled by the caller.
1557 // Unsigned conditions are treated as their signed counterpart.
1558 // Use kDoubleCompareReg for comparison result, it is
1559 // valid in fp64 (FR = 1) mode which is implied for mips32r6.
1560 DCHECK(!cmp1.is(kDoubleCompareReg) && !cmp2.is(kDoubleCompareReg));
1561 switch (cc) {
1562 case lt:
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001563 cmp(OLT, sizeField, kDoubleCompareReg, cmp1, cmp2);
1564 bc1nez(target, kDoubleCompareReg);
1565 break;
1566 case ult:
1567 cmp(ULT, sizeField, kDoubleCompareReg, cmp1, cmp2);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001568 bc1nez(target, kDoubleCompareReg);
1569 break;
1570 case gt:
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001571 cmp(ULE, sizeField, kDoubleCompareReg, cmp1, cmp2);
1572 bc1eqz(target, kDoubleCompareReg);
1573 break;
1574 case ugt:
1575 cmp(OLE, sizeField, kDoubleCompareReg, cmp1, cmp2);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001576 bc1eqz(target, kDoubleCompareReg);
1577 break;
1578 case ge:
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001579 cmp(ULT, sizeField, kDoubleCompareReg, cmp1, cmp2);
1580 bc1eqz(target, kDoubleCompareReg);
1581 break;
1582 case uge:
1583 cmp(OLT, sizeField, kDoubleCompareReg, cmp1, cmp2);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001584 bc1eqz(target, kDoubleCompareReg);
1585 break;
1586 case le:
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001587 cmp(OLE, sizeField, kDoubleCompareReg, cmp1, cmp2);
1588 bc1nez(target, kDoubleCompareReg);
1589 break;
1590 case ule:
1591 cmp(ULE, sizeField, kDoubleCompareReg, cmp1, cmp2);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001592 bc1nez(target, kDoubleCompareReg);
1593 break;
1594 case eq:
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001595 cmp(EQ, sizeField, kDoubleCompareReg, cmp1, cmp2);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001596 bc1nez(target, kDoubleCompareReg);
1597 break;
1598 case ueq:
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001599 cmp(UEQ, sizeField, kDoubleCompareReg, cmp1, cmp2);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001600 bc1nez(target, kDoubleCompareReg);
1601 break;
1602 case ne:
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001603 cmp(EQ, sizeField, kDoubleCompareReg, cmp1, cmp2);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001604 bc1eqz(target, kDoubleCompareReg);
1605 break;
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001606 case ogl:
1607 cmp(UEQ, sizeField, kDoubleCompareReg, cmp1, cmp2);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001608 bc1eqz(target, kDoubleCompareReg);
1609 break;
1610 default:
1611 CHECK(0);
1612 }
1613 }
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001614 }
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001615 if (bd == PROTECT) {
1616 nop();
1617 }
1618}
1619
1620
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001621void MacroAssembler::FmoveLow(FPURegister dst, Register src_low) {
1622 if (IsFp64Mode()) {
1623 DCHECK(!src_low.is(at));
1624 mfhc1(at, dst);
1625 mtc1(src_low, dst);
1626 mthc1(at, dst);
1627 } else {
1628 mtc1(src_low, dst);
1629 }
1630}
1631
1632
Emily Bernierd0a1eb72015-03-24 16:35:39 -04001633void MacroAssembler::Move(FPURegister dst, float imm) {
1634 li(at, Operand(bit_cast<int32_t>(imm)));
1635 mtc1(at, dst);
1636}
1637
1638
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001639void MacroAssembler::Move(FPURegister dst, double imm) {
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001640 static const DoubleRepresentation minus_zero(-0.0);
1641 static const DoubleRepresentation zero(0.0);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001642 DoubleRepresentation value_rep(imm);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001643 // Handle special values first.
Emily Bernierd0a1eb72015-03-24 16:35:39 -04001644 if (value_rep == zero && has_double_zero_reg_set_) {
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001645 mov_d(dst, kDoubleRegZero);
Emily Bernierd0a1eb72015-03-24 16:35:39 -04001646 } else if (value_rep == minus_zero && has_double_zero_reg_set_) {
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001647 neg_d(dst, kDoubleRegZero);
1648 } else {
1649 uint32_t lo, hi;
1650 DoubleAsTwoUInt32(imm, &lo, &hi);
1651 // Move the low part of the double into the lower of the corresponding FPU
1652 // register of FPU register pair.
1653 if (lo != 0) {
1654 li(at, Operand(lo));
1655 mtc1(at, dst);
1656 } else {
1657 mtc1(zero_reg, dst);
1658 }
1659 // Move the high part of the double into the higher of the corresponding FPU
1660 // register of FPU register pair.
1661 if (hi != 0) {
1662 li(at, Operand(hi));
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001663 Mthc1(at, dst);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001664 } else {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001665 Mthc1(zero_reg, dst);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001666 }
Emily Bernierd0a1eb72015-03-24 16:35:39 -04001667 if (dst.is(kDoubleRegZero)) has_double_zero_reg_set_ = true;
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001668 }
1669}
1670
1671
1672void MacroAssembler::Movz(Register rd, Register rs, Register rt) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001673 if (IsMipsArchVariant(kLoongson) || IsMipsArchVariant(kMips32r6)) {
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001674 Label done;
1675 Branch(&done, ne, rt, Operand(zero_reg));
1676 mov(rd, rs);
1677 bind(&done);
1678 } else {
1679 movz(rd, rs, rt);
1680 }
1681}
1682
1683
1684void MacroAssembler::Movn(Register rd, Register rs, Register rt) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001685 if (IsMipsArchVariant(kLoongson) || IsMipsArchVariant(kMips32r6)) {
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001686 Label done;
1687 Branch(&done, eq, rt, Operand(zero_reg));
1688 mov(rd, rs);
1689 bind(&done);
1690 } else {
1691 movn(rd, rs, rt);
1692 }
1693}
1694
1695
1696void MacroAssembler::Movt(Register rd, Register rs, uint16_t cc) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001697 if (IsMipsArchVariant(kLoongson)) {
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001698 // Tests an FP condition code and then conditionally move rs to rd.
1699 // We do not currently use any FPU cc bit other than bit 0.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001700 DCHECK(cc == 0);
1701 DCHECK(!(rs.is(t8) || rd.is(t8)));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001702 Label done;
1703 Register scratch = t8;
1704 // For testing purposes we need to fetch content of the FCSR register and
1705 // than test its cc (floating point condition code) bit (for cc = 0, it is
1706 // 24. bit of the FCSR).
1707 cfc1(scratch, FCSR);
1708 // For the MIPS I, II and III architectures, the contents of scratch is
1709 // UNPREDICTABLE for the instruction immediately following CFC1.
1710 nop();
1711 srl(scratch, scratch, 16);
1712 andi(scratch, scratch, 0x0080);
1713 Branch(&done, eq, scratch, Operand(zero_reg));
1714 mov(rd, rs);
1715 bind(&done);
1716 } else {
1717 movt(rd, rs, cc);
1718 }
1719}
1720
1721
1722void MacroAssembler::Movf(Register rd, Register rs, uint16_t cc) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001723 if (IsMipsArchVariant(kLoongson)) {
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001724 // Tests an FP condition code and then conditionally move rs to rd.
1725 // We do not currently use any FPU cc bit other than bit 0.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001726 DCHECK(cc == 0);
1727 DCHECK(!(rs.is(t8) || rd.is(t8)));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001728 Label done;
1729 Register scratch = t8;
1730 // For testing purposes we need to fetch content of the FCSR register and
1731 // than test its cc (floating point condition code) bit (for cc = 0, it is
1732 // 24. bit of the FCSR).
1733 cfc1(scratch, FCSR);
1734 // For the MIPS I, II and III architectures, the contents of scratch is
1735 // UNPREDICTABLE for the instruction immediately following CFC1.
1736 nop();
1737 srl(scratch, scratch, 16);
1738 andi(scratch, scratch, 0x0080);
1739 Branch(&done, ne, scratch, Operand(zero_reg));
1740 mov(rd, rs);
1741 bind(&done);
1742 } else {
1743 movf(rd, rs, cc);
1744 }
1745}
1746
1747
1748void MacroAssembler::Clz(Register rd, Register rs) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001749 if (IsMipsArchVariant(kLoongson)) {
1750 DCHECK(!(rd.is(t8) || rd.is(t9)) && !(rs.is(t8) || rs.is(t9)));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001751 Register mask = t8;
1752 Register scratch = t9;
1753 Label loop, end;
1754 mov(at, rs);
1755 mov(rd, zero_reg);
1756 lui(mask, 0x8000);
1757 bind(&loop);
1758 and_(scratch, at, mask);
1759 Branch(&end, ne, scratch, Operand(zero_reg));
1760 addiu(rd, rd, 1);
1761 Branch(&loop, ne, mask, Operand(zero_reg), USE_DELAY_SLOT);
1762 srl(mask, mask, 1);
1763 bind(&end);
1764 } else {
1765 clz(rd, rs);
1766 }
1767}
1768
1769
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001770void MacroAssembler::EmitFPUTruncate(FPURoundingMode rounding_mode,
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001771 Register result,
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001772 DoubleRegister double_input,
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001773 Register scratch,
1774 DoubleRegister double_scratch,
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001775 Register except_flag,
1776 CheckForInexactConversion check_inexact) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001777 DCHECK(!result.is(scratch));
1778 DCHECK(!double_input.is(double_scratch));
1779 DCHECK(!except_flag.is(scratch));
1780
1781 Label done;
1782
1783 // Clear the except flag (0 = no exception)
1784 mov(except_flag, zero_reg);
1785
1786 // Test for values that can be exactly represented as a signed 32-bit integer.
1787 cvt_w_d(double_scratch, double_input);
1788 mfc1(result, double_scratch);
1789 cvt_d_w(double_scratch, double_scratch);
1790 BranchF(&done, NULL, eq, double_input, double_scratch);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001791
1792 int32_t except_mask = kFCSRFlagMask; // Assume interested in all exceptions.
1793
1794 if (check_inexact == kDontCheckForInexactConversion) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001795 // Ignore inexact exceptions.
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001796 except_mask &= ~kFCSRInexactFlagMask;
1797 }
1798
1799 // Save FCSR.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001800 cfc1(scratch, FCSR);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001801 // Disable FPU exceptions.
1802 ctc1(zero_reg, FCSR);
1803
1804 // Do operation based on rounding mode.
1805 switch (rounding_mode) {
1806 case kRoundToNearest:
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001807 Round_w_d(double_scratch, double_input);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001808 break;
1809 case kRoundToZero:
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001810 Trunc_w_d(double_scratch, double_input);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001811 break;
1812 case kRoundToPlusInf:
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001813 Ceil_w_d(double_scratch, double_input);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001814 break;
1815 case kRoundToMinusInf:
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001816 Floor_w_d(double_scratch, double_input);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001817 break;
1818 } // End of switch-statement.
1819
1820 // Retrieve FCSR.
1821 cfc1(except_flag, FCSR);
1822 // Restore FCSR.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001823 ctc1(scratch, FCSR);
1824 // Move the converted value into the result register.
1825 mfc1(result, double_scratch);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001826
1827 // Check for fpu exceptions.
1828 And(except_flag, except_flag, Operand(except_mask));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001829
Ben Murdoch257744e2011-11-30 15:57:28 +00001830 bind(&done);
1831}
1832
1833
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001834void MacroAssembler::TryInlineTruncateDoubleToI(Register result,
1835 DoubleRegister double_input,
1836 Label* done) {
1837 DoubleRegister single_scratch = kLithiumScratchDouble.low();
1838 Register scratch = at;
1839 Register scratch2 = t9;
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00001840
1841 // Clear cumulative exception flags and save the FCSR.
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00001842 cfc1(scratch2, FCSR);
1843 ctc1(zero_reg, FCSR);
1844 // Try a conversion to a signed integer.
1845 trunc_w_d(single_scratch, double_input);
1846 mfc1(result, single_scratch);
1847 // Retrieve and restore the FCSR.
1848 cfc1(scratch, FCSR);
1849 ctc1(scratch2, FCSR);
1850 // Check for overflow and NaNs.
1851 And(scratch,
1852 scratch,
1853 kFCSROverflowFlagMask | kFCSRUnderflowFlagMask | kFCSRInvalidOpFlagMask);
1854 // If we had no exceptions we are done.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001855 Branch(done, eq, scratch, Operand(zero_reg));
1856}
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00001857
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001858
1859void MacroAssembler::TruncateDoubleToI(Register result,
1860 DoubleRegister double_input) {
1861 Label done;
1862
1863 TryInlineTruncateDoubleToI(result, double_input, &done);
1864
1865 // If we fell through then inline version didn't succeed - call stub instead.
1866 push(ra);
1867 Subu(sp, sp, Operand(kDoubleSize)); // Put input on stack.
1868 sdc1(double_input, MemOperand(sp, 0));
1869
1870 DoubleToIStub stub(isolate(), sp, result, 0, true, true);
1871 CallStub(&stub);
1872
1873 Addu(sp, sp, Operand(kDoubleSize));
1874 pop(ra);
1875
1876 bind(&done);
1877}
1878
1879
1880void MacroAssembler::TruncateHeapNumberToI(Register result, Register object) {
1881 Label done;
1882 DoubleRegister double_scratch = f12;
1883 DCHECK(!result.is(object));
1884
1885 ldc1(double_scratch,
1886 MemOperand(object, HeapNumber::kValueOffset - kHeapObjectTag));
1887 TryInlineTruncateDoubleToI(result, double_scratch, &done);
1888
1889 // If we fell through then inline version didn't succeed - call stub instead.
1890 push(ra);
1891 DoubleToIStub stub(isolate(),
1892 object,
1893 result,
1894 HeapNumber::kValueOffset - kHeapObjectTag,
1895 true,
1896 true);
1897 CallStub(&stub);
1898 pop(ra);
1899
1900 bind(&done);
1901}
1902
1903
1904void MacroAssembler::TruncateNumberToI(Register object,
1905 Register result,
1906 Register heap_number_map,
1907 Register scratch,
1908 Label* not_number) {
1909 Label done;
1910 DCHECK(!result.is(object));
1911
1912 UntagAndJumpIfSmi(result, object, &done);
1913 JumpIfNotHeapNumber(object, heap_number_map, scratch, not_number);
1914 TruncateHeapNumberToI(result, object);
1915
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00001916 bind(&done);
1917}
1918
1919
Ben Murdoch257744e2011-11-30 15:57:28 +00001920void MacroAssembler::GetLeastBitsFromSmi(Register dst,
1921 Register src,
1922 int num_least_bits) {
1923 Ext(dst, src, kSmiTagSize, num_least_bits);
1924}
1925
1926
1927void MacroAssembler::GetLeastBitsFromInt32(Register dst,
1928 Register src,
1929 int num_least_bits) {
1930 And(dst, src, Operand((1 << num_least_bits) - 1));
1931}
1932
1933
Steve Block44f0eee2011-05-26 01:26:41 +01001934// Emulated condtional branches do not emit a nop in the branch delay slot.
1935//
1936// BRANCH_ARGS_CHECK checks that conditional jump arguments are correct.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001937#define BRANCH_ARGS_CHECK(cond, rs, rt) DCHECK( \
Steve Block44f0eee2011-05-26 01:26:41 +01001938 (cond == cc_always && rs.is(zero_reg) && rt.rm().is(zero_reg)) || \
1939 (cond != cc_always && (!rs.is(zero_reg) || !rt.rm().is(zero_reg))))
1940
1941
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001942void MacroAssembler::Branch(int32_t offset, BranchDelaySlot bdslot) {
1943 DCHECK(IsMipsArchVariant(kMips32r6) ? is_int26(offset) : is_int16(offset));
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00001944 BranchShort(offset, bdslot);
1945}
1946
1947
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001948void MacroAssembler::Branch(int32_t offset, Condition cond, Register rs,
1949 const Operand& rt, BranchDelaySlot bdslot) {
1950 bool is_near = BranchShortCheck(offset, nullptr, cond, rs, rt, bdslot);
1951 DCHECK(is_near);
1952 USE(is_near);
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00001953}
1954
1955
1956void MacroAssembler::Branch(Label* L, BranchDelaySlot bdslot) {
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001957 if (L->is_bound()) {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001958 if (is_near_branch(L)) {
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001959 BranchShort(L, bdslot);
1960 } else {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001961 BranchLong(L, bdslot);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001962 }
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00001963 } else {
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001964 if (is_trampoline_emitted()) {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001965 BranchLong(L, bdslot);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001966 } else {
1967 BranchShort(L, bdslot);
1968 }
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00001969 }
1970}
1971
1972
1973void MacroAssembler::Branch(Label* L, Condition cond, Register rs,
1974 const Operand& rt,
1975 BranchDelaySlot bdslot) {
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001976 if (L->is_bound()) {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001977 if (!BranchShortCheck(0, L, cond, rs, rt, bdslot)) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001978 if (cond != cc_always) {
1979 Label skip;
1980 Condition neg_cond = NegateCondition(cond);
1981 BranchShort(&skip, neg_cond, rs, rt);
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001982 BranchLong(L, bdslot);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001983 bind(&skip);
1984 } else {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001985 BranchLong(L, bdslot);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001986 }
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001987 }
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00001988 } else {
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001989 if (is_trampoline_emitted()) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001990 if (cond != cc_always) {
1991 Label skip;
1992 Condition neg_cond = NegateCondition(cond);
1993 BranchShort(&skip, neg_cond, rs, rt);
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001994 BranchLong(L, bdslot);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001995 bind(&skip);
1996 } else {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00001997 BranchLong(L, bdslot);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00001998 }
Ben Murdoch3ef787d2012-04-12 10:51:47 +01001999 } else {
2000 BranchShort(L, cond, rs, rt, bdslot);
2001 }
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00002002 }
2003}
2004
2005
Ben Murdoch3ef787d2012-04-12 10:51:47 +01002006void MacroAssembler::Branch(Label* L,
2007 Condition cond,
2008 Register rs,
2009 Heap::RootListIndex index,
2010 BranchDelaySlot bdslot) {
2011 LoadRoot(at, index);
2012 Branch(L, cond, rs, Operand(at), bdslot);
2013}
2014
2015
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002016void MacroAssembler::BranchShortHelper(int16_t offset, Label* L,
2017 BranchDelaySlot bdslot) {
2018 DCHECK(L == nullptr || offset == 0);
2019 offset = GetOffset(offset, L, OffsetSize::kOffset16);
Steve Block44f0eee2011-05-26 01:26:41 +01002020 b(offset);
2021
2022 // Emit a nop in the branch delay slot if required.
2023 if (bdslot == PROTECT)
2024 nop();
2025}
2026
2027
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002028void MacroAssembler::BranchShortHelperR6(int32_t offset, Label* L) {
2029 DCHECK(L == nullptr || offset == 0);
2030 offset = GetOffset(offset, L, OffsetSize::kOffset26);
2031 bc(offset);
2032}
Steve Block44f0eee2011-05-26 01:26:41 +01002033
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002034
2035void MacroAssembler::BranchShort(int32_t offset, BranchDelaySlot bdslot) {
2036 if (IsMipsArchVariant(kMips32r6) && bdslot == PROTECT) {
2037 DCHECK(is_int26(offset));
2038 BranchShortHelperR6(offset, nullptr);
Steve Block44f0eee2011-05-26 01:26:41 +01002039 } else {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002040 DCHECK(is_int16(offset));
2041 BranchShortHelper(offset, nullptr, bdslot);
Andrei Popescu31002712010-02-23 13:46:05 +00002042 }
2043}
2044
2045
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00002046void MacroAssembler::BranchShort(Label* L, BranchDelaySlot bdslot) {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002047 if (IsMipsArchVariant(kMips32r6) && bdslot == PROTECT) {
2048 BranchShortHelperR6(0, L);
2049 } else {
2050 BranchShortHelper(0, L, bdslot);
2051 }
Andrei Popescu31002712010-02-23 13:46:05 +00002052}
2053
2054
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002055static inline bool IsZero(const Operand& rt) {
Steve Block44f0eee2011-05-26 01:26:41 +01002056 if (rt.is_reg()) {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002057 return rt.rm().is(zero_reg);
2058 } else {
2059 return rt.immediate() == 0;
2060 }
2061}
2062
2063
2064int32_t MacroAssembler::GetOffset(int32_t offset, Label* L, OffsetSize bits) {
2065 if (L) {
2066 offset = branch_offset_helper(L, bits) >> 2;
2067 } else {
2068 DCHECK(is_intn(offset, bits));
2069 }
2070 return offset;
2071}
2072
2073
2074Register MacroAssembler::GetRtAsRegisterHelper(const Operand& rt,
2075 Register scratch) {
2076 Register r2 = no_reg;
2077 if (rt.is_reg()) {
Steve Block44f0eee2011-05-26 01:26:41 +01002078 r2 = rt.rm_;
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002079 } else {
2080 r2 = scratch;
2081 li(r2, rt);
2082 }
2083
2084 return r2;
2085}
2086
2087
2088bool MacroAssembler::BranchShortHelperR6(int32_t offset, Label* L,
2089 Condition cond, Register rs,
2090 const Operand& rt) {
2091 DCHECK(L == nullptr || offset == 0);
2092 Register scratch = rs.is(at) ? t8 : at;
2093 OffsetSize bits = OffsetSize::kOffset16;
2094
2095 // Be careful to always use shifted_branch_offset only just before the
2096 // branch instruction, as the location will be remember for patching the
2097 // target.
2098 {
2099 BlockTrampolinePoolScope block_trampoline_pool(this);
Steve Block44f0eee2011-05-26 01:26:41 +01002100 switch (cond) {
2101 case cc_always:
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002102 bits = OffsetSize::kOffset26;
2103 if (!is_near(L, bits)) return false;
2104 offset = GetOffset(offset, L, bits);
2105 bc(offset);
Steve Block44f0eee2011-05-26 01:26:41 +01002106 break;
2107 case eq:
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002108 if (rs.code() == rt.rm_.reg_code) {
2109 // Pre R6 beq is used here to make the code patchable. Otherwise bc
2110 // should be used which has no condition field so is not patchable.
2111 bits = OffsetSize::kOffset16;
2112 if (!is_near(L, bits)) return false;
2113 scratch = GetRtAsRegisterHelper(rt, scratch);
2114 offset = GetOffset(offset, L, bits);
2115 beq(rs, scratch, offset);
2116 nop();
2117 } else if (IsZero(rt)) {
2118 bits = OffsetSize::kOffset21;
2119 if (!is_near(L, bits)) return false;
2120 offset = GetOffset(offset, L, bits);
2121 beqzc(rs, offset);
2122 } else {
2123 // We don't want any other register but scratch clobbered.
2124 bits = OffsetSize::kOffset16;
2125 if (!is_near(L, bits)) return false;
2126 scratch = GetRtAsRegisterHelper(rt, scratch);
2127 offset = GetOffset(offset, L, bits);
2128 beqc(rs, scratch, offset);
2129 }
Steve Block44f0eee2011-05-26 01:26:41 +01002130 break;
2131 case ne:
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002132 if (rs.code() == rt.rm_.reg_code) {
2133 // Pre R6 bne is used here to make the code patchable. Otherwise we
2134 // should not generate any instruction.
2135 bits = OffsetSize::kOffset16;
2136 if (!is_near(L, bits)) return false;
2137 scratch = GetRtAsRegisterHelper(rt, scratch);
2138 offset = GetOffset(offset, L, bits);
2139 bne(rs, scratch, offset);
2140 nop();
2141 } else if (IsZero(rt)) {
2142 bits = OffsetSize::kOffset21;
2143 if (!is_near(L, bits)) return false;
2144 offset = GetOffset(offset, L, bits);
2145 bnezc(rs, offset);
2146 } else {
2147 // We don't want any other register but scratch clobbered.
2148 bits = OffsetSize::kOffset16;
2149 if (!is_near(L, bits)) return false;
2150 scratch = GetRtAsRegisterHelper(rt, scratch);
2151 offset = GetOffset(offset, L, bits);
2152 bnec(rs, scratch, offset);
2153 }
Steve Block44f0eee2011-05-26 01:26:41 +01002154 break;
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002155
Ben Murdoch257744e2011-11-30 15:57:28 +00002156 // Signed comparison.
Steve Block44f0eee2011-05-26 01:26:41 +01002157 case greater:
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002158 // rs > rt
2159 if (rs.code() == rt.rm_.reg_code) {
2160 break; // No code needs to be emitted.
2161 } else if (rs.is(zero_reg)) {
2162 bits = OffsetSize::kOffset16;
2163 if (!is_near(L, bits)) return false;
2164 scratch = GetRtAsRegisterHelper(rt, scratch);
2165 offset = GetOffset(offset, L, bits);
2166 bltzc(scratch, offset);
2167 } else if (IsZero(rt)) {
2168 bits = OffsetSize::kOffset16;
2169 if (!is_near(L, bits)) return false;
2170 offset = GetOffset(offset, L, bits);
2171 bgtzc(rs, offset);
Steve Block44f0eee2011-05-26 01:26:41 +01002172 } else {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002173 bits = OffsetSize::kOffset16;
2174 if (!is_near(L, bits)) return false;
2175 scratch = GetRtAsRegisterHelper(rt, scratch);
2176 DCHECK(!rs.is(scratch));
2177 offset = GetOffset(offset, L, bits);
2178 bltc(scratch, rs, offset);
Steve Block44f0eee2011-05-26 01:26:41 +01002179 }
2180 break;
2181 case greater_equal:
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002182 // rs >= rt
2183 if (rs.code() == rt.rm_.reg_code) {
2184 bits = OffsetSize::kOffset26;
2185 if (!is_near(L, bits)) return false;
2186 offset = GetOffset(offset, L, bits);
2187 bc(offset);
2188 } else if (rs.is(zero_reg)) {
2189 bits = OffsetSize::kOffset16;
2190 if (!is_near(L, bits)) return false;
2191 scratch = GetRtAsRegisterHelper(rt, scratch);
2192 offset = GetOffset(offset, L, bits);
2193 blezc(scratch, offset);
2194 } else if (IsZero(rt)) {
2195 bits = OffsetSize::kOffset16;
2196 if (!is_near(L, bits)) return false;
2197 offset = GetOffset(offset, L, bits);
2198 bgezc(rs, offset);
Steve Block44f0eee2011-05-26 01:26:41 +01002199 } else {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002200 bits = OffsetSize::kOffset16;
2201 if (!is_near(L, bits)) return false;
2202 scratch = GetRtAsRegisterHelper(rt, scratch);
2203 DCHECK(!rs.is(scratch));
2204 offset = GetOffset(offset, L, bits);
2205 bgec(rs, scratch, offset);
Steve Block44f0eee2011-05-26 01:26:41 +01002206 }
2207 break;
2208 case less:
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002209 // rs < rt
2210 if (rs.code() == rt.rm_.reg_code) {
2211 break; // No code needs to be emitted.
2212 } else if (rs.is(zero_reg)) {
2213 bits = OffsetSize::kOffset16;
2214 if (!is_near(L, bits)) return false;
2215 scratch = GetRtAsRegisterHelper(rt, scratch);
2216 offset = GetOffset(offset, L, bits);
2217 bgtzc(scratch, offset);
2218 } else if (IsZero(rt)) {
2219 bits = OffsetSize::kOffset16;
2220 if (!is_near(L, bits)) return false;
2221 offset = GetOffset(offset, L, bits);
2222 bltzc(rs, offset);
Steve Block44f0eee2011-05-26 01:26:41 +01002223 } else {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002224 bits = OffsetSize::kOffset16;
2225 if (!is_near(L, bits)) return false;
2226 scratch = GetRtAsRegisterHelper(rt, scratch);
2227 DCHECK(!rs.is(scratch));
2228 offset = GetOffset(offset, L, bits);
2229 bltc(rs, scratch, offset);
Steve Block44f0eee2011-05-26 01:26:41 +01002230 }
2231 break;
2232 case less_equal:
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002233 // rs <= rt
2234 if (rs.code() == rt.rm_.reg_code) {
2235 bits = OffsetSize::kOffset26;
2236 if (!is_near(L, bits)) return false;
2237 offset = GetOffset(offset, L, bits);
2238 bc(offset);
2239 } else if (rs.is(zero_reg)) {
2240 bits = OffsetSize::kOffset16;
2241 if (!is_near(L, bits)) return false;
2242 scratch = GetRtAsRegisterHelper(rt, scratch);
2243 offset = GetOffset(offset, L, bits);
2244 bgezc(scratch, offset);
2245 } else if (IsZero(rt)) {
2246 bits = OffsetSize::kOffset16;
2247 if (!is_near(L, bits)) return false;
2248 offset = GetOffset(offset, L, bits);
2249 blezc(rs, offset);
Steve Block44f0eee2011-05-26 01:26:41 +01002250 } else {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002251 bits = OffsetSize::kOffset16;
2252 if (!is_near(L, bits)) return false;
2253 scratch = GetRtAsRegisterHelper(rt, scratch);
2254 DCHECK(!rs.is(scratch));
2255 offset = GetOffset(offset, L, bits);
2256 bgec(scratch, rs, offset);
Steve Block44f0eee2011-05-26 01:26:41 +01002257 }
2258 break;
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002259
Steve Block44f0eee2011-05-26 01:26:41 +01002260 // Unsigned comparison.
2261 case Ugreater:
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002262 // rs > rt
2263 if (rs.code() == rt.rm_.reg_code) {
2264 break; // No code needs to be emitted.
2265 } else if (rs.is(zero_reg)) {
2266 bits = OffsetSize::kOffset21;
2267 if (!is_near(L, bits)) return false;
2268 scratch = GetRtAsRegisterHelper(rt, scratch);
2269 offset = GetOffset(offset, L, bits);
2270 bnezc(scratch, offset);
2271 } else if (IsZero(rt)) {
2272 bits = OffsetSize::kOffset21;
2273 if (!is_near(L, bits)) return false;
2274 offset = GetOffset(offset, L, bits);
2275 bnezc(rs, offset);
Steve Block44f0eee2011-05-26 01:26:41 +01002276 } else {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002277 bits = OffsetSize::kOffset16;
2278 if (!is_near(L, bits)) return false;
2279 scratch = GetRtAsRegisterHelper(rt, scratch);
2280 DCHECK(!rs.is(scratch));
2281 offset = GetOffset(offset, L, bits);
2282 bltuc(scratch, rs, offset);
Steve Block44f0eee2011-05-26 01:26:41 +01002283 }
2284 break;
2285 case Ugreater_equal:
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002286 // rs >= rt
2287 if (rs.code() == rt.rm_.reg_code) {
2288 bits = OffsetSize::kOffset26;
2289 if (!is_near(L, bits)) return false;
2290 offset = GetOffset(offset, L, bits);
2291 bc(offset);
2292 } else if (rs.is(zero_reg)) {
2293 bits = OffsetSize::kOffset21;
2294 if (!is_near(L, bits)) return false;
2295 scratch = GetRtAsRegisterHelper(rt, scratch);
2296 offset = GetOffset(offset, L, bits);
2297 beqzc(scratch, offset);
2298 } else if (IsZero(rt)) {
2299 bits = OffsetSize::kOffset26;
2300 if (!is_near(L, bits)) return false;
2301 offset = GetOffset(offset, L, bits);
2302 bc(offset);
Steve Block44f0eee2011-05-26 01:26:41 +01002303 } else {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002304 bits = OffsetSize::kOffset16;
2305 if (!is_near(L, bits)) return false;
2306 scratch = GetRtAsRegisterHelper(rt, scratch);
2307 DCHECK(!rs.is(scratch));
2308 offset = GetOffset(offset, L, bits);
2309 bgeuc(rs, scratch, offset);
Steve Block44f0eee2011-05-26 01:26:41 +01002310 }
2311 break;
2312 case Uless:
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002313 // rs < rt
2314 if (rs.code() == rt.rm_.reg_code) {
2315 break; // No code needs to be emitted.
2316 } else if (rs.is(zero_reg)) {
2317 bits = OffsetSize::kOffset21;
2318 if (!is_near(L, bits)) return false;
2319 scratch = GetRtAsRegisterHelper(rt, scratch);
2320 offset = GetOffset(offset, L, bits);
2321 bnezc(scratch, offset);
2322 } else if (IsZero(rt)) {
2323 break; // No code needs to be emitted.
Steve Block44f0eee2011-05-26 01:26:41 +01002324 } else {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002325 bits = OffsetSize::kOffset16;
2326 if (!is_near(L, bits)) return false;
2327 scratch = GetRtAsRegisterHelper(rt, scratch);
2328 DCHECK(!rs.is(scratch));
2329 offset = GetOffset(offset, L, bits);
2330 bltuc(rs, scratch, offset);
Steve Block44f0eee2011-05-26 01:26:41 +01002331 }
2332 break;
2333 case Uless_equal:
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002334 // rs <= rt
2335 if (rs.code() == rt.rm_.reg_code) {
2336 bits = OffsetSize::kOffset26;
2337 if (!is_near(L, bits)) return false;
2338 offset = GetOffset(offset, L, bits);
2339 bc(offset);
2340 } else if (rs.is(zero_reg)) {
2341 bits = OffsetSize::kOffset26;
2342 if (!is_near(L, bits)) return false;
2343 scratch = GetRtAsRegisterHelper(rt, scratch);
2344 offset = GetOffset(offset, L, bits);
2345 bc(offset);
2346 } else if (IsZero(rt)) {
2347 bits = OffsetSize::kOffset21;
2348 if (!is_near(L, bits)) return false;
2349 offset = GetOffset(offset, L, bits);
2350 beqzc(rs, offset);
Steve Block44f0eee2011-05-26 01:26:41 +01002351 } else {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002352 bits = OffsetSize::kOffset16;
2353 if (!is_near(L, bits)) return false;
2354 scratch = GetRtAsRegisterHelper(rt, scratch);
2355 DCHECK(!rs.is(scratch));
2356 offset = GetOffset(offset, L, bits);
2357 bgeuc(scratch, rs, offset);
Steve Block44f0eee2011-05-26 01:26:41 +01002358 }
2359 break;
2360 default:
2361 UNREACHABLE();
2362 }
2363 }
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002364 CheckTrampolinePoolQuick(1);
2365 return true;
Steve Block44f0eee2011-05-26 01:26:41 +01002366}
2367
2368
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002369bool MacroAssembler::BranchShortHelper(int16_t offset, Label* L, Condition cond,
2370 Register rs, const Operand& rt,
2371 BranchDelaySlot bdslot) {
2372 DCHECK(L == nullptr || offset == 0);
2373 if (!is_near(L, OffsetSize::kOffset16)) return false;
2374
2375 Register scratch = at;
2376 int32_t offset32;
2377
2378 // Be careful to always use shifted_branch_offset only just before the
2379 // branch instruction, as the location will be remember for patching the
2380 // target.
2381 {
2382 BlockTrampolinePoolScope block_trampoline_pool(this);
2383 switch (cond) {
2384 case cc_always:
2385 offset32 = GetOffset(offset, L, OffsetSize::kOffset16);
2386 b(offset32);
2387 break;
2388 case eq:
2389 if (IsZero(rt)) {
2390 offset32 = GetOffset(offset, L, OffsetSize::kOffset16);
2391 beq(rs, zero_reg, offset32);
2392 } else {
2393 // We don't want any other register but scratch clobbered.
2394 scratch = GetRtAsRegisterHelper(rt, scratch);
2395 offset32 = GetOffset(offset, L, OffsetSize::kOffset16);
2396 beq(rs, scratch, offset32);
2397 }
2398 break;
2399 case ne:
2400 if (IsZero(rt)) {
2401 offset32 = GetOffset(offset, L, OffsetSize::kOffset16);
2402 bne(rs, zero_reg, offset32);
2403 } else {
2404 // We don't want any other register but scratch clobbered.
2405 scratch = GetRtAsRegisterHelper(rt, scratch);
2406 offset32 = GetOffset(offset, L, OffsetSize::kOffset16);
2407 bne(rs, scratch, offset32);
2408 }
2409 break;
2410
2411 // Signed comparison.
2412 case greater:
2413 if (IsZero(rt)) {
2414 offset32 = GetOffset(offset, L, OffsetSize::kOffset16);
2415 bgtz(rs, offset32);
2416 } else {
2417 Slt(scratch, GetRtAsRegisterHelper(rt, scratch), rs);
2418 offset32 = GetOffset(offset, L, OffsetSize::kOffset16);
2419 bne(scratch, zero_reg, offset32);
2420 }
2421 break;
2422 case greater_equal:
2423 if (IsZero(rt)) {
2424 offset32 = GetOffset(offset, L, OffsetSize::kOffset16);
2425 bgez(rs, offset32);
2426 } else {
2427 Slt(scratch, rs, rt);
2428 offset32 = GetOffset(offset, L, OffsetSize::kOffset16);
2429 beq(scratch, zero_reg, offset32);
2430 }
2431 break;
2432 case less:
2433 if (IsZero(rt)) {
2434 offset32 = GetOffset(offset, L, OffsetSize::kOffset16);
2435 bltz(rs, offset32);
2436 } else {
2437 Slt(scratch, rs, rt);
2438 offset32 = GetOffset(offset, L, OffsetSize::kOffset16);
2439 bne(scratch, zero_reg, offset32);
2440 }
2441 break;
2442 case less_equal:
2443 if (IsZero(rt)) {
2444 offset32 = GetOffset(offset, L, OffsetSize::kOffset16);
2445 blez(rs, offset32);
2446 } else {
2447 Slt(scratch, GetRtAsRegisterHelper(rt, scratch), rs);
2448 offset32 = GetOffset(offset, L, OffsetSize::kOffset16);
2449 beq(scratch, zero_reg, offset32);
2450 }
2451 break;
2452
2453 // Unsigned comparison.
2454 case Ugreater:
2455 if (IsZero(rt)) {
2456 offset32 = GetOffset(offset, L, OffsetSize::kOffset16);
2457 bne(rs, zero_reg, offset32);
2458 } else {
2459 Sltu(scratch, GetRtAsRegisterHelper(rt, scratch), rs);
2460 offset32 = GetOffset(offset, L, OffsetSize::kOffset16);
2461 bne(scratch, zero_reg, offset32);
2462 }
2463 break;
2464 case Ugreater_equal:
2465 if (IsZero(rt)) {
2466 offset32 = GetOffset(offset, L, OffsetSize::kOffset16);
2467 b(offset32);
2468 } else {
2469 Sltu(scratch, rs, rt);
2470 offset32 = GetOffset(offset, L, OffsetSize::kOffset16);
2471 beq(scratch, zero_reg, offset32);
2472 }
2473 break;
2474 case Uless:
2475 if (IsZero(rt)) {
2476 return true; // No code needs to be emitted.
2477 } else {
2478 Sltu(scratch, rs, rt);
2479 offset32 = GetOffset(offset, L, OffsetSize::kOffset16);
2480 bne(scratch, zero_reg, offset32);
2481 }
2482 break;
2483 case Uless_equal:
2484 if (IsZero(rt)) {
2485 offset32 = GetOffset(offset, L, OffsetSize::kOffset16);
2486 beq(rs, zero_reg, offset32);
2487 } else {
2488 Sltu(scratch, GetRtAsRegisterHelper(rt, scratch), rs);
2489 offset32 = GetOffset(offset, L, OffsetSize::kOffset16);
2490 beq(scratch, zero_reg, offset32);
2491 }
2492 break;
2493 default:
2494 UNREACHABLE();
2495 }
2496 }
2497 // Emit a nop in the branch delay slot if required.
2498 if (bdslot == PROTECT)
2499 nop();
2500
2501 return true;
2502}
2503
2504
2505bool MacroAssembler::BranchShortCheck(int32_t offset, Label* L, Condition cond,
2506 Register rs, const Operand& rt,
2507 BranchDelaySlot bdslot) {
2508 BRANCH_ARGS_CHECK(cond, rs, rt);
2509
2510 if (!L) {
2511 if (IsMipsArchVariant(kMips32r6) && bdslot == PROTECT) {
2512 DCHECK(is_int26(offset));
2513 return BranchShortHelperR6(offset, nullptr, cond, rs, rt);
2514 } else {
2515 DCHECK(is_int16(offset));
2516 return BranchShortHelper(offset, nullptr, cond, rs, rt, bdslot);
2517 }
2518 } else {
2519 DCHECK(offset == 0);
2520 if (IsMipsArchVariant(kMips32r6) && bdslot == PROTECT) {
2521 return BranchShortHelperR6(0, L, cond, rs, rt);
2522 } else {
2523 return BranchShortHelper(0, L, cond, rs, rt, bdslot);
2524 }
2525 }
2526 return false;
2527}
2528
2529
2530void MacroAssembler::BranchShort(int32_t offset, Condition cond, Register rs,
2531 const Operand& rt, BranchDelaySlot bdslot) {
2532 BranchShortCheck(offset, nullptr, cond, rs, rt, bdslot);
2533}
2534
2535
2536void MacroAssembler::BranchShort(Label* L, Condition cond, Register rs,
2537 const Operand& rt, BranchDelaySlot bdslot) {
2538 BranchShortCheck(0, L, cond, rs, rt, bdslot);
2539}
2540
2541
2542void MacroAssembler::BranchAndLink(int32_t offset, BranchDelaySlot bdslot) {
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00002543 BranchAndLinkShort(offset, bdslot);
2544}
2545
2546
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002547void MacroAssembler::BranchAndLink(int32_t offset, Condition cond, Register rs,
2548 const Operand& rt, BranchDelaySlot bdslot) {
2549 bool is_near = BranchAndLinkShortCheck(offset, nullptr, cond, rs, rt, bdslot);
2550 DCHECK(is_near);
2551 USE(is_near);
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00002552}
2553
2554
2555void MacroAssembler::BranchAndLink(Label* L, BranchDelaySlot bdslot) {
Ben Murdoch3ef787d2012-04-12 10:51:47 +01002556 if (L->is_bound()) {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002557 if (is_near_branch(L)) {
Ben Murdoch3ef787d2012-04-12 10:51:47 +01002558 BranchAndLinkShort(L, bdslot);
2559 } else {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002560 BranchAndLinkLong(L, bdslot);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01002561 }
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00002562 } else {
Ben Murdoch3ef787d2012-04-12 10:51:47 +01002563 if (is_trampoline_emitted()) {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002564 BranchAndLinkLong(L, bdslot);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01002565 } else {
2566 BranchAndLinkShort(L, bdslot);
2567 }
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00002568 }
2569}
2570
2571
2572void MacroAssembler::BranchAndLink(Label* L, Condition cond, Register rs,
2573 const Operand& rt,
2574 BranchDelaySlot bdslot) {
Ben Murdoch3ef787d2012-04-12 10:51:47 +01002575 if (L->is_bound()) {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002576 if (!BranchAndLinkShortCheck(0, L, cond, rs, rt, bdslot)) {
Ben Murdoch3ef787d2012-04-12 10:51:47 +01002577 Label skip;
2578 Condition neg_cond = NegateCondition(cond);
2579 BranchShort(&skip, neg_cond, rs, rt);
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002580 BranchAndLinkLong(L, bdslot);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01002581 bind(&skip);
2582 }
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00002583 } else {
Ben Murdoch3ef787d2012-04-12 10:51:47 +01002584 if (is_trampoline_emitted()) {
2585 Label skip;
2586 Condition neg_cond = NegateCondition(cond);
2587 BranchShort(&skip, neg_cond, rs, rt);
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002588 BranchAndLinkLong(L, bdslot);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01002589 bind(&skip);
2590 } else {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002591 BranchAndLinkShortCheck(0, L, cond, rs, rt, bdslot);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01002592 }
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00002593 }
2594}
2595
2596
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002597void MacroAssembler::BranchAndLinkShortHelper(int16_t offset, Label* L,
2598 BranchDelaySlot bdslot) {
2599 DCHECK(L == nullptr || offset == 0);
2600 offset = GetOffset(offset, L, OffsetSize::kOffset16);
Steve Block44f0eee2011-05-26 01:26:41 +01002601 bal(offset);
Andrei Popescu31002712010-02-23 13:46:05 +00002602
Steve Block44f0eee2011-05-26 01:26:41 +01002603 // Emit a nop in the branch delay slot if required.
2604 if (bdslot == PROTECT)
2605 nop();
Andrei Popescu31002712010-02-23 13:46:05 +00002606}
2607
2608
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002609void MacroAssembler::BranchAndLinkShortHelperR6(int32_t offset, Label* L) {
2610 DCHECK(L == nullptr || offset == 0);
2611 offset = GetOffset(offset, L, OffsetSize::kOffset26);
2612 balc(offset);
2613}
2614
2615
2616void MacroAssembler::BranchAndLinkShort(int32_t offset,
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00002617 BranchDelaySlot bdslot) {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002618 if (IsMipsArchVariant(kMips32r6) && bdslot == PROTECT) {
2619 DCHECK(is_int26(offset));
2620 BranchAndLinkShortHelperR6(offset, nullptr);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00002621 } else {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002622 DCHECK(is_int16(offset));
2623 BranchAndLinkShortHelper(offset, nullptr, bdslot);
Andrei Popescu31002712010-02-23 13:46:05 +00002624 }
Steve Block44f0eee2011-05-26 01:26:41 +01002625}
2626
2627
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00002628void MacroAssembler::BranchAndLinkShort(Label* L, BranchDelaySlot bdslot) {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002629 if (IsMipsArchVariant(kMips32r6) && bdslot == PROTECT) {
2630 BranchAndLinkShortHelperR6(0, L);
2631 } else {
2632 BranchAndLinkShortHelper(0, L, bdslot);
2633 }
Steve Block44f0eee2011-05-26 01:26:41 +01002634}
2635
2636
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002637bool MacroAssembler::BranchAndLinkShortHelperR6(int32_t offset, Label* L,
2638 Condition cond, Register rs,
2639 const Operand& rt) {
2640 DCHECK(L == nullptr || offset == 0);
2641 Register scratch = rs.is(at) ? t8 : at;
2642 OffsetSize bits = OffsetSize::kOffset16;
Steve Block44f0eee2011-05-26 01:26:41 +01002643
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002644 BlockTrampolinePoolScope block_trampoline_pool(this);
2645 DCHECK((cond == cc_always && is_int26(offset)) || is_int16(offset));
2646 switch (cond) {
2647 case cc_always:
2648 bits = OffsetSize::kOffset26;
2649 if (!is_near(L, bits)) return false;
2650 offset = GetOffset(offset, L, bits);
2651 balc(offset);
2652 break;
2653 case eq:
2654 if (!is_near(L, bits)) return false;
2655 Subu(scratch, rs, rt);
2656 offset = GetOffset(offset, L, bits);
2657 beqzalc(scratch, offset);
2658 break;
2659 case ne:
2660 if (!is_near(L, bits)) return false;
2661 Subu(scratch, rs, rt);
2662 offset = GetOffset(offset, L, bits);
2663 bnezalc(scratch, offset);
2664 break;
2665
2666 // Signed comparison.
2667 case greater:
2668 // rs > rt
2669 if (rs.code() == rt.rm_.reg_code) {
2670 break; // No code needs to be emitted.
2671 } else if (rs.is(zero_reg)) {
2672 if (!is_near(L, bits)) return false;
2673 scratch = GetRtAsRegisterHelper(rt, scratch);
2674 offset = GetOffset(offset, L, bits);
2675 bltzalc(scratch, offset);
2676 } else if (IsZero(rt)) {
2677 if (!is_near(L, bits)) return false;
2678 offset = GetOffset(offset, L, bits);
2679 bgtzalc(rs, offset);
2680 } else {
2681 if (!is_near(L, bits)) return false;
2682 Slt(scratch, GetRtAsRegisterHelper(rt, scratch), rs);
2683 offset = GetOffset(offset, L, bits);
2684 bnezalc(scratch, offset);
2685 }
2686 break;
2687 case greater_equal:
2688 // rs >= rt
2689 if (rs.code() == rt.rm_.reg_code) {
2690 bits = OffsetSize::kOffset26;
2691 if (!is_near(L, bits)) return false;
2692 offset = GetOffset(offset, L, bits);
2693 balc(offset);
2694 } else if (rs.is(zero_reg)) {
2695 if (!is_near(L, bits)) return false;
2696 scratch = GetRtAsRegisterHelper(rt, scratch);
2697 offset = GetOffset(offset, L, bits);
2698 blezalc(scratch, offset);
2699 } else if (IsZero(rt)) {
2700 if (!is_near(L, bits)) return false;
2701 offset = GetOffset(offset, L, bits);
2702 bgezalc(rs, offset);
2703 } else {
2704 if (!is_near(L, bits)) return false;
2705 Slt(scratch, rs, rt);
2706 offset = GetOffset(offset, L, bits);
2707 beqzalc(scratch, offset);
2708 }
2709 break;
2710 case less:
2711 // rs < rt
2712 if (rs.code() == rt.rm_.reg_code) {
2713 break; // No code needs to be emitted.
2714 } else if (rs.is(zero_reg)) {
2715 if (!is_near(L, bits)) return false;
2716 scratch = GetRtAsRegisterHelper(rt, scratch);
2717 offset = GetOffset(offset, L, bits);
2718 bgtzalc(scratch, offset);
2719 } else if (IsZero(rt)) {
2720 if (!is_near(L, bits)) return false;
2721 offset = GetOffset(offset, L, bits);
2722 bltzalc(rs, offset);
2723 } else {
2724 if (!is_near(L, bits)) return false;
2725 Slt(scratch, rs, rt);
2726 offset = GetOffset(offset, L, bits);
2727 bnezalc(scratch, offset);
2728 }
2729 break;
2730 case less_equal:
2731 // rs <= r2
2732 if (rs.code() == rt.rm_.reg_code) {
2733 bits = OffsetSize::kOffset26;
2734 if (!is_near(L, bits)) return false;
2735 offset = GetOffset(offset, L, bits);
2736 balc(offset);
2737 } else if (rs.is(zero_reg)) {
2738 if (!is_near(L, bits)) return false;
2739 scratch = GetRtAsRegisterHelper(rt, scratch);
2740 offset = GetOffset(offset, L, bits);
2741 bgezalc(scratch, offset);
2742 } else if (IsZero(rt)) {
2743 if (!is_near(L, bits)) return false;
2744 offset = GetOffset(offset, L, bits);
2745 blezalc(rs, offset);
2746 } else {
2747 if (!is_near(L, bits)) return false;
2748 Slt(scratch, GetRtAsRegisterHelper(rt, scratch), rs);
2749 offset = GetOffset(offset, L, bits);
2750 beqzalc(scratch, offset);
2751 }
2752 break;
2753
2754
2755 // Unsigned comparison.
2756 case Ugreater:
2757 // rs > r2
2758 if (!is_near(L, bits)) return false;
2759 Sltu(scratch, GetRtAsRegisterHelper(rt, scratch), rs);
2760 offset = GetOffset(offset, L, bits);
2761 bnezalc(scratch, offset);
2762 break;
2763 case Ugreater_equal:
2764 // rs >= r2
2765 if (!is_near(L, bits)) return false;
2766 Sltu(scratch, rs, rt);
2767 offset = GetOffset(offset, L, bits);
2768 beqzalc(scratch, offset);
2769 break;
2770 case Uless:
2771 // rs < r2
2772 if (!is_near(L, bits)) return false;
2773 Sltu(scratch, rs, rt);
2774 offset = GetOffset(offset, L, bits);
2775 bnezalc(scratch, offset);
2776 break;
2777 case Uless_equal:
2778 // rs <= r2
2779 if (!is_near(L, bits)) return false;
2780 Sltu(scratch, GetRtAsRegisterHelper(rt, scratch), rs);
2781 offset = GetOffset(offset, L, bits);
2782 beqzalc(scratch, offset);
2783 break;
2784 default:
2785 UNREACHABLE();
Steve Block44f0eee2011-05-26 01:26:41 +01002786 }
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002787 return true;
2788}
Ben Murdochb8a8cc12014-11-26 15:28:44 +00002789
2790
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002791// Pre r6 we need to use a bgezal or bltzal, but they can't be used directly
2792// with the slt instructions. We could use sub or add instead but we would miss
2793// overflow cases, so we keep slt and add an intermediate third instruction.
2794bool MacroAssembler::BranchAndLinkShortHelper(int16_t offset, Label* L,
2795 Condition cond, Register rs,
2796 const Operand& rt,
2797 BranchDelaySlot bdslot) {
2798 DCHECK(L == nullptr || offset == 0);
2799 if (!is_near(L, OffsetSize::kOffset16)) return false;
Ben Murdochb8a8cc12014-11-26 15:28:44 +00002800
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002801 Register scratch = t8;
2802 BlockTrampolinePoolScope block_trampoline_pool(this);
2803
2804 switch (cond) {
2805 case cc_always:
2806 offset = GetOffset(offset, L, OffsetSize::kOffset16);
2807 bal(offset);
2808 break;
2809 case eq:
2810 bne(rs, GetRtAsRegisterHelper(rt, scratch), 2);
2811 nop();
2812 offset = GetOffset(offset, L, OffsetSize::kOffset16);
2813 bal(offset);
2814 break;
2815 case ne:
2816 beq(rs, GetRtAsRegisterHelper(rt, scratch), 2);
2817 nop();
2818 offset = GetOffset(offset, L, OffsetSize::kOffset16);
2819 bal(offset);
2820 break;
2821
2822 // Signed comparison.
2823 case greater:
2824 Slt(scratch, GetRtAsRegisterHelper(rt, scratch), rs);
2825 addiu(scratch, scratch, -1);
2826 offset = GetOffset(offset, L, OffsetSize::kOffset16);
2827 bgezal(scratch, offset);
2828 break;
2829 case greater_equal:
2830 Slt(scratch, rs, rt);
2831 addiu(scratch, scratch, -1);
2832 offset = GetOffset(offset, L, OffsetSize::kOffset16);
2833 bltzal(scratch, offset);
2834 break;
2835 case less:
2836 Slt(scratch, rs, rt);
2837 addiu(scratch, scratch, -1);
2838 offset = GetOffset(offset, L, OffsetSize::kOffset16);
2839 bgezal(scratch, offset);
2840 break;
2841 case less_equal:
2842 Slt(scratch, GetRtAsRegisterHelper(rt, scratch), rs);
2843 addiu(scratch, scratch, -1);
2844 offset = GetOffset(offset, L, OffsetSize::kOffset16);
2845 bltzal(scratch, offset);
2846 break;
2847
2848 // Unsigned comparison.
2849 case Ugreater:
2850 Sltu(scratch, GetRtAsRegisterHelper(rt, scratch), rs);
2851 addiu(scratch, scratch, -1);
2852 offset = GetOffset(offset, L, OffsetSize::kOffset16);
2853 bgezal(scratch, offset);
2854 break;
2855 case Ugreater_equal:
2856 Sltu(scratch, rs, rt);
2857 addiu(scratch, scratch, -1);
2858 offset = GetOffset(offset, L, OffsetSize::kOffset16);
2859 bltzal(scratch, offset);
2860 break;
2861 case Uless:
2862 Sltu(scratch, rs, rt);
2863 addiu(scratch, scratch, -1);
2864 offset = GetOffset(offset, L, OffsetSize::kOffset16);
2865 bgezal(scratch, offset);
2866 break;
2867 case Uless_equal:
2868 Sltu(scratch, GetRtAsRegisterHelper(rt, scratch), rs);
2869 addiu(scratch, scratch, -1);
2870 offset = GetOffset(offset, L, OffsetSize::kOffset16);
2871 bltzal(scratch, offset);
2872 break;
2873
2874 default:
2875 UNREACHABLE();
Steve Block44f0eee2011-05-26 01:26:41 +01002876 }
2877
Steve Block44f0eee2011-05-26 01:26:41 +01002878 // Emit a nop in the branch delay slot if required.
2879 if (bdslot == PROTECT)
2880 nop();
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002881
2882 return true;
2883}
2884
2885
2886bool MacroAssembler::BranchAndLinkShortCheck(int32_t offset, Label* L,
2887 Condition cond, Register rs,
2888 const Operand& rt,
2889 BranchDelaySlot bdslot) {
2890 BRANCH_ARGS_CHECK(cond, rs, rt);
2891
2892 if (!L) {
2893 if (IsMipsArchVariant(kMips32r6) && bdslot == PROTECT) {
2894 DCHECK(is_int26(offset));
2895 return BranchAndLinkShortHelperR6(offset, nullptr, cond, rs, rt);
2896 } else {
2897 DCHECK(is_int16(offset));
2898 return BranchAndLinkShortHelper(offset, nullptr, cond, rs, rt, bdslot);
2899 }
2900 } else {
2901 DCHECK(offset == 0);
2902 if (IsMipsArchVariant(kMips32r6) && bdslot == PROTECT) {
2903 return BranchAndLinkShortHelperR6(0, L, cond, rs, rt);
2904 } else {
2905 return BranchAndLinkShortHelper(0, L, cond, rs, rt, bdslot);
2906 }
2907 }
2908 return false;
Steve Block44f0eee2011-05-26 01:26:41 +01002909}
2910
2911
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00002912void MacroAssembler::Jump(Register target,
Steve Block44f0eee2011-05-26 01:26:41 +01002913 Condition cond,
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00002914 Register rs,
2915 const Operand& rt,
2916 BranchDelaySlot bd) {
2917 BlockTrampolinePoolScope block_trampoline_pool(this);
2918 if (cond == cc_always) {
2919 jr(target);
2920 } else {
2921 BRANCH_ARGS_CHECK(cond, rs, rt);
2922 Branch(2, NegateCondition(cond), rs, rt);
2923 jr(target);
2924 }
2925 // Emit a nop in the branch delay slot if required.
2926 if (bd == PROTECT)
2927 nop();
2928}
2929
2930
2931void MacroAssembler::Jump(intptr_t target,
2932 RelocInfo::Mode rmode,
2933 Condition cond,
2934 Register rs,
2935 const Operand& rt,
2936 BranchDelaySlot bd) {
Ben Murdoch3ef787d2012-04-12 10:51:47 +01002937 Label skip;
2938 if (cond != cc_always) {
2939 Branch(USE_DELAY_SLOT, &skip, NegateCondition(cond), rs, rt);
2940 }
2941 // The first instruction of 'li' may be placed in the delay slot.
2942 // This is not an issue, t9 is expected to be clobbered anyway.
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00002943 li(t9, Operand(target, rmode));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01002944 Jump(t9, al, zero_reg, Operand(zero_reg), bd);
2945 bind(&skip);
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00002946}
2947
2948
2949void MacroAssembler::Jump(Address target,
2950 RelocInfo::Mode rmode,
2951 Condition cond,
2952 Register rs,
2953 const Operand& rt,
2954 BranchDelaySlot bd) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00002955 DCHECK(!RelocInfo::IsCodeTarget(rmode));
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00002956 Jump(reinterpret_cast<intptr_t>(target), rmode, cond, rs, rt, bd);
2957}
2958
2959
2960void MacroAssembler::Jump(Handle<Code> code,
2961 RelocInfo::Mode rmode,
2962 Condition cond,
2963 Register rs,
2964 const Operand& rt,
2965 BranchDelaySlot bd) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00002966 DCHECK(RelocInfo::IsCodeTarget(rmode));
2967 AllowDeferredHandleDereference embedding_raw_address;
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00002968 Jump(reinterpret_cast<intptr_t>(code.location()), rmode, cond, rs, rt, bd);
2969}
2970
2971
2972int MacroAssembler::CallSize(Register target,
2973 Condition cond,
2974 Register rs,
2975 const Operand& rt,
2976 BranchDelaySlot bd) {
2977 int size = 0;
2978
2979 if (cond == cc_always) {
2980 size += 1;
2981 } else {
2982 size += 3;
Steve Block44f0eee2011-05-26 01:26:41 +01002983 }
2984
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00002985 if (bd == PROTECT)
2986 size += 1;
Steve Block44f0eee2011-05-26 01:26:41 +01002987
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00002988 return size * kInstrSize;
2989}
Steve Block44f0eee2011-05-26 01:26:41 +01002990
Steve Block44f0eee2011-05-26 01:26:41 +01002991
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00002992// Note: To call gcc-compiled C code on mips, you must call thru t9.
2993void MacroAssembler::Call(Register target,
2994 Condition cond,
2995 Register rs,
2996 const Operand& rt,
2997 BranchDelaySlot bd) {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00002998#ifdef DEBUG
2999 int size = IsPrevInstrCompactBranch() ? kInstrSize : 0;
3000#endif
3001
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00003002 BlockTrampolinePoolScope block_trampoline_pool(this);
3003 Label start;
3004 bind(&start);
3005 if (cond == cc_always) {
3006 jalr(target);
3007 } else {
3008 BRANCH_ARGS_CHECK(cond, rs, rt);
3009 Branch(2, NegateCondition(cond), rs, rt);
3010 jalr(target);
Steve Block44f0eee2011-05-26 01:26:41 +01003011 }
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00003012 // Emit a nop in the branch delay slot if required.
3013 if (bd == PROTECT)
3014 nop();
3015
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003016#ifdef DEBUG
3017 CHECK_EQ(size + CallSize(target, cond, rs, rt, bd),
3018 SizeOfCodeGeneratedSince(&start));
3019#endif
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00003020}
3021
3022
3023int MacroAssembler::CallSize(Address target,
3024 RelocInfo::Mode rmode,
3025 Condition cond,
3026 Register rs,
3027 const Operand& rt,
3028 BranchDelaySlot bd) {
3029 int size = CallSize(t9, cond, rs, rt, bd);
3030 return size + 2 * kInstrSize;
3031}
3032
3033
3034void MacroAssembler::Call(Address target,
3035 RelocInfo::Mode rmode,
3036 Condition cond,
3037 Register rs,
3038 const Operand& rt,
3039 BranchDelaySlot bd) {
3040 BlockTrampolinePoolScope block_trampoline_pool(this);
3041 Label start;
3042 bind(&start);
3043 int32_t target_int = reinterpret_cast<int32_t>(target);
3044 // Must record previous source positions before the
3045 // li() generates a new code target.
3046 positions_recorder()->WriteRecordedPositions();
Ben Murdoch3ef787d2012-04-12 10:51:47 +01003047 li(t9, Operand(target_int, rmode), CONSTANT_SIZE);
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00003048 Call(t9, cond, rs, rt, bd);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003049 DCHECK_EQ(CallSize(target, rmode, cond, rs, rt, bd),
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00003050 SizeOfCodeGeneratedSince(&start));
3051}
3052
3053
3054int MacroAssembler::CallSize(Handle<Code> code,
3055 RelocInfo::Mode rmode,
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003056 TypeFeedbackId ast_id,
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00003057 Condition cond,
3058 Register rs,
3059 const Operand& rt,
3060 BranchDelaySlot bd) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003061 AllowDeferredHandleDereference using_raw_address;
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00003062 return CallSize(reinterpret_cast<Address>(code.location()),
3063 rmode, cond, rs, rt, bd);
3064}
3065
3066
3067void MacroAssembler::Call(Handle<Code> code,
3068 RelocInfo::Mode rmode,
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003069 TypeFeedbackId ast_id,
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00003070 Condition cond,
3071 Register rs,
3072 const Operand& rt,
3073 BranchDelaySlot bd) {
3074 BlockTrampolinePoolScope block_trampoline_pool(this);
3075 Label start;
3076 bind(&start);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003077 DCHECK(RelocInfo::IsCodeTarget(rmode));
3078 if (rmode == RelocInfo::CODE_TARGET && !ast_id.IsNone()) {
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00003079 SetRecordedAstId(ast_id);
3080 rmode = RelocInfo::CODE_TARGET_WITH_ID;
3081 }
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003082 AllowDeferredHandleDereference embedding_raw_address;
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00003083 Call(reinterpret_cast<Address>(code.location()), rmode, cond, rs, rt, bd);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003084 DCHECK_EQ(CallSize(code, rmode, ast_id, cond, rs, rt, bd),
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00003085 SizeOfCodeGeneratedSince(&start));
3086}
3087
3088
3089void MacroAssembler::Ret(Condition cond,
3090 Register rs,
3091 const Operand& rt,
3092 BranchDelaySlot bd) {
3093 Jump(ra, cond, rs, rt, bd);
3094}
3095
3096
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003097void MacroAssembler::BranchLong(Label* L, BranchDelaySlot bdslot) {
3098 if (IsMipsArchVariant(kMips32r6) && bdslot == PROTECT &&
3099 (!L->is_bound() || is_near_r6(L))) {
3100 BranchShortHelperR6(0, L);
3101 } else {
3102 BlockTrampolinePoolScope block_trampoline_pool(this);
3103 uint32_t imm32;
3104 imm32 = jump_address(L);
3105 {
3106 BlockGrowBufferScope block_buf_growth(this);
3107 // Buffer growth (and relocation) must be blocked for internal references
3108 // until associated instructions are emitted and available to be patched.
3109 RecordRelocInfo(RelocInfo::INTERNAL_REFERENCE_ENCODED);
3110 lui(at, (imm32 & kHiMask) >> kLuiShift);
3111 ori(at, at, (imm32 & kImm16Mask));
3112 }
3113 jr(at);
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00003114
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003115 // Emit a nop in the branch delay slot if required.
3116 if (bdslot == PROTECT) nop();
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00003117 }
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00003118}
3119
3120
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003121void MacroAssembler::BranchAndLinkLong(Label* L, BranchDelaySlot bdslot) {
3122 if (IsMipsArchVariant(kMips32r6) && bdslot == PROTECT &&
3123 (!L->is_bound() || is_near_r6(L))) {
3124 BranchAndLinkShortHelperR6(0, L);
3125 } else {
3126 BlockTrampolinePoolScope block_trampoline_pool(this);
3127 uint32_t imm32;
3128 imm32 = jump_address(L);
3129 {
3130 BlockGrowBufferScope block_buf_growth(this);
3131 // Buffer growth (and relocation) must be blocked for internal references
3132 // until associated instructions are emitted and available to be patched.
3133 RecordRelocInfo(RelocInfo::INTERNAL_REFERENCE_ENCODED);
3134 lui(at, (imm32 & kHiMask) >> kLuiShift);
3135 ori(at, at, (imm32 & kImm16Mask));
3136 }
3137 jalr(at);
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00003138
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003139 // Emit a nop in the branch delay slot if required.
3140 if (bdslot == PROTECT) nop();
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00003141 }
Steve Block44f0eee2011-05-26 01:26:41 +01003142}
3143
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003144
Ben Murdoch3ef787d2012-04-12 10:51:47 +01003145void MacroAssembler::DropAndRet(int drop) {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003146 DCHECK(is_int16(drop * kPointerSize));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01003147 Ret(USE_DELAY_SLOT);
3148 addiu(sp, sp, drop * kPointerSize);
3149}
Steve Block44f0eee2011-05-26 01:26:41 +01003150
3151void MacroAssembler::DropAndRet(int drop,
3152 Condition cond,
3153 Register r1,
3154 const Operand& r2) {
Ben Murdoch3ef787d2012-04-12 10:51:47 +01003155 // Both Drop and Ret need to be conditional.
Steve Block44f0eee2011-05-26 01:26:41 +01003156 Label skip;
3157 if (cond != cc_always) {
3158 Branch(&skip, NegateCondition(cond), r1, r2);
3159 }
3160
3161 Drop(drop);
3162 Ret();
3163
3164 if (cond != cc_always) {
3165 bind(&skip);
3166 }
3167}
3168
3169
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00003170void MacroAssembler::Drop(int count,
3171 Condition cond,
3172 Register reg,
3173 const Operand& op) {
3174 if (count <= 0) {
3175 return;
3176 }
3177
3178 Label skip;
3179
3180 if (cond != al) {
3181 Branch(&skip, NegateCondition(cond), reg, op);
3182 }
3183
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003184 Addu(sp, sp, Operand(count * kPointerSize));
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00003185
3186 if (cond != al) {
3187 bind(&skip);
3188 }
3189}
3190
3191
3192
Steve Block44f0eee2011-05-26 01:26:41 +01003193void MacroAssembler::Swap(Register reg1,
3194 Register reg2,
3195 Register scratch) {
3196 if (scratch.is(no_reg)) {
3197 Xor(reg1, reg1, Operand(reg2));
3198 Xor(reg2, reg2, Operand(reg1));
3199 Xor(reg1, reg1, Operand(reg2));
3200 } else {
3201 mov(scratch, reg1);
3202 mov(reg1, reg2);
3203 mov(reg2, scratch);
3204 }
Andrei Popescu31002712010-02-23 13:46:05 +00003205}
3206
3207
3208void MacroAssembler::Call(Label* target) {
Steve Block44f0eee2011-05-26 01:26:41 +01003209 BranchAndLink(target);
3210}
3211
3212
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00003213void MacroAssembler::Push(Handle<Object> handle) {
3214 li(at, Operand(handle));
3215 push(at);
3216}
3217
3218
Steve Block44f0eee2011-05-26 01:26:41 +01003219void MacroAssembler::DebugBreak() {
Ben Murdoch3ef787d2012-04-12 10:51:47 +01003220 PrepareCEntryArgs(0);
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003221 PrepareCEntryFunction(
3222 ExternalReference(Runtime::kHandleDebuggerStatement, isolate()));
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003223 CEntryStub ces(isolate(), 1);
3224 DCHECK(AllowThisStubCall(&ces));
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003225 Call(ces.GetCode(), RelocInfo::DEBUGGER_STATEMENT);
Steve Block44f0eee2011-05-26 01:26:41 +01003226}
3227
Steve Block6ded16b2010-05-10 14:33:55 +01003228
Andrei Popescu31002712010-02-23 13:46:05 +00003229// ---------------------------------------------------------------------------
Ben Murdoch257744e2011-11-30 15:57:28 +00003230// Exception handling.
Andrei Popescu31002712010-02-23 13:46:05 +00003231
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003232void MacroAssembler::PushStackHandler() {
Steve Block6ded16b2010-05-10 14:33:55 +01003233 // Adjust this code if not the case.
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003234 STATIC_ASSERT(StackHandlerConstants::kSize == 1 * kPointerSize);
Ben Murdoch69a99ed2011-11-30 16:03:39 +00003235 STATIC_ASSERT(StackHandlerConstants::kNextOffset == 0 * kPointerSize);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01003236
3237 // Link the current handler as the next handler.
3238 li(t2, Operand(ExternalReference(Isolate::kHandlerAddress, isolate())));
3239 lw(t1, MemOperand(t2));
3240 push(t1);
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003241
Ben Murdoch3ef787d2012-04-12 10:51:47 +01003242 // Set this new handler as the current one.
3243 sw(sp, MemOperand(t2));
Andrei Popescu31002712010-02-23 13:46:05 +00003244}
3245
3246
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003247void MacroAssembler::PopStackHandler() {
Ben Murdoch69a99ed2011-11-30 16:03:39 +00003248 STATIC_ASSERT(StackHandlerConstants::kNextOffset == 0);
Steve Block44f0eee2011-05-26 01:26:41 +01003249 pop(a1);
3250 Addu(sp, sp, Operand(StackHandlerConstants::kSize - kPointerSize));
Ben Murdoch589d6972011-11-30 16:04:58 +00003251 li(at, Operand(ExternalReference(Isolate::kHandlerAddress, isolate())));
Steve Block44f0eee2011-05-26 01:26:41 +01003252 sw(a1, MemOperand(at));
Andrei Popescu31002712010-02-23 13:46:05 +00003253}
3254
3255
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003256void MacroAssembler::Allocate(int object_size,
3257 Register result,
3258 Register scratch1,
3259 Register scratch2,
3260 Label* gc_required,
3261 AllocationFlags flags) {
3262 DCHECK(object_size <= Page::kMaxRegularHeapObjectSize);
Steve Block44f0eee2011-05-26 01:26:41 +01003263 if (!FLAG_inline_new) {
Ben Murdoch257744e2011-11-30 15:57:28 +00003264 if (emit_debug_code()) {
Steve Block44f0eee2011-05-26 01:26:41 +01003265 // Trash the registers to simulate an allocation failure.
3266 li(result, 0x7091);
3267 li(scratch1, 0x7191);
3268 li(scratch2, 0x7291);
3269 }
3270 jmp(gc_required);
3271 return;
Steve Block6ded16b2010-05-10 14:33:55 +01003272 }
3273
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003274 DCHECK(!AreAliased(result, scratch1, scratch2, t9));
Steve Block6ded16b2010-05-10 14:33:55 +01003275
Steve Block44f0eee2011-05-26 01:26:41 +01003276 // Make object size into bytes.
3277 if ((flags & SIZE_IN_WORDS) != 0) {
3278 object_size *= kPointerSize;
3279 }
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003280 DCHECK_EQ(0, object_size & kObjectAlignmentMask);
Steve Block6ded16b2010-05-10 14:33:55 +01003281
Steve Block44f0eee2011-05-26 01:26:41 +01003282 // Check relative positions of allocation top and limit addresses.
3283 // ARM adds additional checks to make sure the ldm instruction can be
3284 // used. On MIPS we don't have ldm so we don't need additional checks either.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003285 ExternalReference allocation_top =
3286 AllocationUtils::GetAllocationTopReference(isolate(), flags);
3287 ExternalReference allocation_limit =
3288 AllocationUtils::GetAllocationLimitReference(isolate(), flags);
3289
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003290 intptr_t top = reinterpret_cast<intptr_t>(allocation_top.address());
3291 intptr_t limit = reinterpret_cast<intptr_t>(allocation_limit.address());
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003292 DCHECK((limit - top) == kPointerSize);
Steve Block44f0eee2011-05-26 01:26:41 +01003293
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003294 // Set up allocation top address and allocation limit registers.
3295 Register top_address = scratch1;
Steve Block44f0eee2011-05-26 01:26:41 +01003296 // This code stores a temporary value in t9.
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003297 Register alloc_limit = t9;
3298 Register result_end = scratch2;
3299 li(top_address, Operand(allocation_top));
3300
Steve Block44f0eee2011-05-26 01:26:41 +01003301 if ((flags & RESULT_CONTAINS_TOP) == 0) {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003302 // Load allocation top into result and allocation limit into alloc_limit.
3303 lw(result, MemOperand(top_address));
3304 lw(alloc_limit, MemOperand(top_address, kPointerSize));
Steve Block44f0eee2011-05-26 01:26:41 +01003305 } else {
Ben Murdoch257744e2011-11-30 15:57:28 +00003306 if (emit_debug_code()) {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003307 // Assert that result actually contains top on entry.
3308 lw(alloc_limit, MemOperand(top_address));
3309 Check(eq, kUnexpectedAllocationTop, result, Operand(alloc_limit));
Steve Block44f0eee2011-05-26 01:26:41 +01003310 }
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003311 // Load allocation limit. Result already contains allocation top.
3312 lw(alloc_limit, MemOperand(top_address, limit - top));
Steve Block44f0eee2011-05-26 01:26:41 +01003313 }
3314
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003315 if ((flags & DOUBLE_ALIGNMENT) != 0) {
3316 // Align the next allocation. Storing the filler map without checking top is
3317 // safe in new-space because the limit of the heap is aligned there.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003318 DCHECK(kPointerAlignment * 2 == kDoubleAlignment);
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003319 And(result_end, result, Operand(kDoubleAlignmentMask));
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003320 Label aligned;
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003321 Branch(&aligned, eq, result_end, Operand(zero_reg));
3322 if ((flags & PRETENURE) != 0) {
3323 Branch(gc_required, Ugreater_equal, result, Operand(alloc_limit));
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003324 }
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003325 li(result_end, Operand(isolate()->factory()->one_pointer_filler_map()));
3326 sw(result_end, MemOperand(result));
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003327 Addu(result, result, Operand(kDoubleSize / 2));
3328 bind(&aligned);
3329 }
3330
Steve Block44f0eee2011-05-26 01:26:41 +01003331 // Calculate new top and bail out if new space is exhausted. Use result
3332 // to calculate the new top.
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003333 Addu(result_end, result, Operand(object_size));
3334 Branch(gc_required, Ugreater, result_end, Operand(alloc_limit));
3335 sw(result_end, MemOperand(top_address));
Steve Block44f0eee2011-05-26 01:26:41 +01003336
3337 // Tag object if requested.
3338 if ((flags & TAG_OBJECT) != 0) {
3339 Addu(result, result, Operand(kHeapObjectTag));
3340 }
Steve Block6ded16b2010-05-10 14:33:55 +01003341}
3342
3343
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003344void MacroAssembler::Allocate(Register object_size, Register result,
3345 Register result_end, Register scratch,
3346 Label* gc_required, AllocationFlags flags) {
Steve Block44f0eee2011-05-26 01:26:41 +01003347 if (!FLAG_inline_new) {
Ben Murdoch257744e2011-11-30 15:57:28 +00003348 if (emit_debug_code()) {
Steve Block44f0eee2011-05-26 01:26:41 +01003349 // Trash the registers to simulate an allocation failure.
3350 li(result, 0x7091);
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003351 li(scratch, 0x7191);
3352 li(result_end, 0x7291);
Steve Block44f0eee2011-05-26 01:26:41 +01003353 }
3354 jmp(gc_required);
3355 return;
3356 }
3357
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003358 // |object_size| and |result_end| may overlap if the DOUBLE_ALIGNMENT flag
3359 // is not specified. Other registers must not overlap.
3360 DCHECK(!AreAliased(object_size, result, scratch, t9));
3361 DCHECK(!AreAliased(result_end, result, scratch, t9));
3362 DCHECK((flags & DOUBLE_ALIGNMENT) == 0 || !object_size.is(result_end));
Steve Block44f0eee2011-05-26 01:26:41 +01003363
3364 // Check relative positions of allocation top and limit addresses.
3365 // ARM adds additional checks to make sure the ldm instruction can be
3366 // used. On MIPS we don't have ldm so we don't need additional checks either.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003367 ExternalReference allocation_top =
3368 AllocationUtils::GetAllocationTopReference(isolate(), flags);
3369 ExternalReference allocation_limit =
3370 AllocationUtils::GetAllocationLimitReference(isolate(), flags);
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003371 intptr_t top = reinterpret_cast<intptr_t>(allocation_top.address());
3372 intptr_t limit = reinterpret_cast<intptr_t>(allocation_limit.address());
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003373 DCHECK((limit - top) == kPointerSize);
Steve Block44f0eee2011-05-26 01:26:41 +01003374
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003375 // Set up allocation top address and allocation limit registers.
3376 Register top_address = scratch;
Steve Block44f0eee2011-05-26 01:26:41 +01003377 // This code stores a temporary value in t9.
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003378 Register alloc_limit = t9;
3379 li(top_address, Operand(allocation_top));
3380
Steve Block44f0eee2011-05-26 01:26:41 +01003381 if ((flags & RESULT_CONTAINS_TOP) == 0) {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003382 // Load allocation top into result and allocation limit into alloc_limit.
3383 lw(result, MemOperand(top_address));
3384 lw(alloc_limit, MemOperand(top_address, kPointerSize));
Steve Block44f0eee2011-05-26 01:26:41 +01003385 } else {
Ben Murdoch257744e2011-11-30 15:57:28 +00003386 if (emit_debug_code()) {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003387 // Assert that result actually contains top on entry.
3388 lw(alloc_limit, MemOperand(top_address));
3389 Check(eq, kUnexpectedAllocationTop, result, Operand(alloc_limit));
Steve Block44f0eee2011-05-26 01:26:41 +01003390 }
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003391 // Load allocation limit. Result already contains allocation top.
3392 lw(alloc_limit, MemOperand(top_address, limit - top));
Steve Block44f0eee2011-05-26 01:26:41 +01003393 }
3394
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003395 if ((flags & DOUBLE_ALIGNMENT) != 0) {
3396 // Align the next allocation. Storing the filler map without checking top is
3397 // safe in new-space because the limit of the heap is aligned there.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003398 DCHECK(kPointerAlignment * 2 == kDoubleAlignment);
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003399 And(result_end, result, Operand(kDoubleAlignmentMask));
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003400 Label aligned;
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003401 Branch(&aligned, eq, result_end, Operand(zero_reg));
3402 if ((flags & PRETENURE) != 0) {
3403 Branch(gc_required, Ugreater_equal, result, Operand(alloc_limit));
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003404 }
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003405 li(result_end, Operand(isolate()->factory()->one_pointer_filler_map()));
3406 sw(result_end, MemOperand(result));
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003407 Addu(result, result, Operand(kDoubleSize / 2));
3408 bind(&aligned);
3409 }
3410
Steve Block44f0eee2011-05-26 01:26:41 +01003411 // Calculate new top and bail out if new space is exhausted. Use result
3412 // to calculate the new top. Object size may be in words so a shift is
3413 // required to get the number of bytes.
3414 if ((flags & SIZE_IN_WORDS) != 0) {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003415 sll(result_end, object_size, kPointerSizeLog2);
3416 Addu(result_end, result, result_end);
Steve Block44f0eee2011-05-26 01:26:41 +01003417 } else {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003418 Addu(result_end, result, Operand(object_size));
Steve Block44f0eee2011-05-26 01:26:41 +01003419 }
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003420 Branch(gc_required, Ugreater, result_end, Operand(alloc_limit));
Steve Block44f0eee2011-05-26 01:26:41 +01003421
3422 // Update allocation top. result temporarily holds the new top.
Ben Murdoch257744e2011-11-30 15:57:28 +00003423 if (emit_debug_code()) {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003424 And(alloc_limit, result_end, Operand(kObjectAlignmentMask));
3425 Check(eq, kUnalignedAllocationInNewSpace, alloc_limit, Operand(zero_reg));
Steve Block44f0eee2011-05-26 01:26:41 +01003426 }
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003427 sw(result_end, MemOperand(top_address));
Steve Block44f0eee2011-05-26 01:26:41 +01003428
3429 // Tag object if requested.
3430 if ((flags & TAG_OBJECT) != 0) {
3431 Addu(result, result, Operand(kHeapObjectTag));
3432 }
3433}
3434
3435
Steve Block44f0eee2011-05-26 01:26:41 +01003436void MacroAssembler::AllocateTwoByteString(Register result,
3437 Register length,
3438 Register scratch1,
3439 Register scratch2,
3440 Register scratch3,
3441 Label* gc_required) {
3442 // Calculate the number of bytes needed for the characters in the string while
3443 // observing object alignment.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003444 DCHECK((SeqTwoByteString::kHeaderSize & kObjectAlignmentMask) == 0);
Steve Block44f0eee2011-05-26 01:26:41 +01003445 sll(scratch1, length, 1); // Length in bytes, not chars.
3446 addiu(scratch1, scratch1,
3447 kObjectAlignmentMask + SeqTwoByteString::kHeaderSize);
3448 And(scratch1, scratch1, Operand(~kObjectAlignmentMask));
3449
3450 // Allocate two-byte string in new space.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003451 Allocate(scratch1,
3452 result,
3453 scratch2,
3454 scratch3,
3455 gc_required,
3456 TAG_OBJECT);
Steve Block44f0eee2011-05-26 01:26:41 +01003457
3458 // Set the map, length and hash field.
3459 InitializeNewString(result,
3460 length,
3461 Heap::kStringMapRootIndex,
3462 scratch1,
3463 scratch2);
3464}
3465
3466
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003467void MacroAssembler::AllocateOneByteString(Register result, Register length,
3468 Register scratch1, Register scratch2,
3469 Register scratch3,
3470 Label* gc_required) {
Steve Block44f0eee2011-05-26 01:26:41 +01003471 // Calculate the number of bytes needed for the characters in the string
3472 // while observing object alignment.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003473 DCHECK((SeqOneByteString::kHeaderSize & kObjectAlignmentMask) == 0);
3474 DCHECK(kCharSize == 1);
3475 addiu(scratch1, length, kObjectAlignmentMask + SeqOneByteString::kHeaderSize);
Steve Block44f0eee2011-05-26 01:26:41 +01003476 And(scratch1, scratch1, Operand(~kObjectAlignmentMask));
3477
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003478 // Allocate one-byte string in new space.
3479 Allocate(scratch1,
3480 result,
3481 scratch2,
3482 scratch3,
3483 gc_required,
3484 TAG_OBJECT);
Steve Block44f0eee2011-05-26 01:26:41 +01003485
3486 // Set the map, length and hash field.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003487 InitializeNewString(result, length, Heap::kOneByteStringMapRootIndex,
3488 scratch1, scratch2);
Steve Block44f0eee2011-05-26 01:26:41 +01003489}
3490
3491
3492void MacroAssembler::AllocateTwoByteConsString(Register result,
3493 Register length,
3494 Register scratch1,
3495 Register scratch2,
3496 Label* gc_required) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003497 Allocate(ConsString::kSize, result, scratch1, scratch2, gc_required,
3498 TAG_OBJECT);
Steve Block44f0eee2011-05-26 01:26:41 +01003499 InitializeNewString(result,
3500 length,
3501 Heap::kConsStringMapRootIndex,
3502 scratch1,
3503 scratch2);
3504}
3505
3506
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003507void MacroAssembler::AllocateOneByteConsString(Register result, Register length,
3508 Register scratch1,
3509 Register scratch2,
3510 Label* gc_required) {
3511 Allocate(ConsString::kSize,
3512 result,
3513 scratch1,
3514 scratch2,
3515 gc_required,
3516 TAG_OBJECT);
3517
3518 InitializeNewString(result, length, Heap::kConsOneByteStringMapRootIndex,
3519 scratch1, scratch2);
Steve Block44f0eee2011-05-26 01:26:41 +01003520}
3521
3522
Ben Murdoch589d6972011-11-30 16:04:58 +00003523void MacroAssembler::AllocateTwoByteSlicedString(Register result,
3524 Register length,
3525 Register scratch1,
3526 Register scratch2,
3527 Label* gc_required) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003528 Allocate(SlicedString::kSize, result, scratch1, scratch2, gc_required,
3529 TAG_OBJECT);
Ben Murdoch589d6972011-11-30 16:04:58 +00003530
3531 InitializeNewString(result,
3532 length,
3533 Heap::kSlicedStringMapRootIndex,
3534 scratch1,
3535 scratch2);
3536}
3537
3538
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003539void MacroAssembler::AllocateOneByteSlicedString(Register result,
3540 Register length,
3541 Register scratch1,
3542 Register scratch2,
3543 Label* gc_required) {
3544 Allocate(SlicedString::kSize, result, scratch1, scratch2, gc_required,
3545 TAG_OBJECT);
Ben Murdoch589d6972011-11-30 16:04:58 +00003546
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003547 InitializeNewString(result, length, Heap::kSlicedOneByteStringMapRootIndex,
3548 scratch1, scratch2);
3549}
3550
3551
3552void MacroAssembler::JumpIfNotUniqueNameInstanceType(Register reg,
3553 Label* not_unique_name) {
3554 STATIC_ASSERT(kInternalizedTag == 0 && kStringTag == 0);
3555 Label succeed;
3556 And(at, reg, Operand(kIsNotStringMask | kIsNotInternalizedMask));
3557 Branch(&succeed, eq, at, Operand(zero_reg));
3558 Branch(not_unique_name, ne, reg, Operand(SYMBOL_TYPE));
3559
3560 bind(&succeed);
Ben Murdoch589d6972011-11-30 16:04:58 +00003561}
3562
3563
Steve Block44f0eee2011-05-26 01:26:41 +01003564// Allocates a heap number or jumps to the label if the young space is full and
3565// a scavenge is needed.
3566void MacroAssembler::AllocateHeapNumber(Register result,
3567 Register scratch1,
3568 Register scratch2,
3569 Register heap_number_map,
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003570 Label* need_gc,
3571 TaggingMode tagging_mode,
3572 MutableMode mode) {
Steve Block44f0eee2011-05-26 01:26:41 +01003573 // Allocate an object in the heap for the heap number and tag it as a heap
3574 // object.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003575 Allocate(HeapNumber::kSize, result, scratch1, scratch2, need_gc,
3576 tagging_mode == TAG_RESULT ? TAG_OBJECT : NO_ALLOCATION_FLAGS);
3577
3578 Heap::RootListIndex map_index = mode == MUTABLE
3579 ? Heap::kMutableHeapNumberMapRootIndex
3580 : Heap::kHeapNumberMapRootIndex;
3581 AssertIsRoot(heap_number_map, map_index);
Steve Block44f0eee2011-05-26 01:26:41 +01003582
3583 // Store heap number map in the allocated object.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003584 if (tagging_mode == TAG_RESULT) {
3585 sw(heap_number_map, FieldMemOperand(result, HeapObject::kMapOffset));
3586 } else {
3587 sw(heap_number_map, MemOperand(result, HeapObject::kMapOffset));
3588 }
Steve Block44f0eee2011-05-26 01:26:41 +01003589}
3590
3591
3592void MacroAssembler::AllocateHeapNumberWithValue(Register result,
3593 FPURegister value,
3594 Register scratch1,
3595 Register scratch2,
3596 Label* gc_required) {
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00003597 LoadRoot(t8, Heap::kHeapNumberMapRootIndex);
3598 AllocateHeapNumber(result, scratch1, scratch2, t8, gc_required);
Steve Block44f0eee2011-05-26 01:26:41 +01003599 sdc1(value, FieldMemOperand(result, HeapNumber::kValueOffset));
3600}
3601
3602
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003603void MacroAssembler::AllocateJSValue(Register result, Register constructor,
3604 Register value, Register scratch1,
3605 Register scratch2, Label* gc_required) {
3606 DCHECK(!result.is(constructor));
3607 DCHECK(!result.is(scratch1));
3608 DCHECK(!result.is(scratch2));
3609 DCHECK(!result.is(value));
Steve Block44f0eee2011-05-26 01:26:41 +01003610
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003611 // Allocate JSValue in new space.
3612 Allocate(JSValue::kSize, result, scratch1, scratch2, gc_required, TAG_OBJECT);
Steve Block44f0eee2011-05-26 01:26:41 +01003613
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003614 // Initialize the JSValue.
3615 LoadGlobalFunctionInitialMap(constructor, scratch1, scratch2);
3616 sw(scratch1, FieldMemOperand(result, HeapObject::kMapOffset));
3617 LoadRoot(scratch1, Heap::kEmptyFixedArrayRootIndex);
3618 sw(scratch1, FieldMemOperand(result, JSObject::kPropertiesOffset));
3619 sw(scratch1, FieldMemOperand(result, JSObject::kElementsOffset));
3620 sw(value, FieldMemOperand(result, JSValue::kValueOffset));
3621 STATIC_ASSERT(JSValue::kSize == 4 * kPointerSize);
Steve Block44f0eee2011-05-26 01:26:41 +01003622}
3623
3624
Ben Murdoch257744e2011-11-30 15:57:28 +00003625void MacroAssembler::CopyBytes(Register src,
3626 Register dst,
3627 Register length,
3628 Register scratch) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003629 Label align_loop_1, word_loop, byte_loop, byte_loop_1, done;
Ben Murdoch257744e2011-11-30 15:57:28 +00003630
3631 // Align src before copying in word size chunks.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003632 Branch(&byte_loop, le, length, Operand(kPointerSize));
Ben Murdoch257744e2011-11-30 15:57:28 +00003633 bind(&align_loop_1);
3634 And(scratch, src, kPointerSize - 1);
3635 Branch(&word_loop, eq, scratch, Operand(zero_reg));
3636 lbu(scratch, MemOperand(src));
3637 Addu(src, src, 1);
3638 sb(scratch, MemOperand(dst));
3639 Addu(dst, dst, 1);
3640 Subu(length, length, Operand(1));
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003641 Branch(&align_loop_1, ne, length, Operand(zero_reg));
Ben Murdoch257744e2011-11-30 15:57:28 +00003642
3643 // Copy bytes in word size chunks.
3644 bind(&word_loop);
3645 if (emit_debug_code()) {
3646 And(scratch, src, kPointerSize - 1);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003647 Assert(eq, kExpectingAlignmentForCopyBytes,
Ben Murdoch257744e2011-11-30 15:57:28 +00003648 scratch, Operand(zero_reg));
3649 }
3650 Branch(&byte_loop, lt, length, Operand(kPointerSize));
3651 lw(scratch, MemOperand(src));
3652 Addu(src, src, kPointerSize);
3653
3654 // TODO(kalmard) check if this can be optimized to use sw in most cases.
3655 // Can't use unaligned access - copy byte by byte.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003656 if (kArchEndian == kLittle) {
3657 sb(scratch, MemOperand(dst, 0));
3658 srl(scratch, scratch, 8);
3659 sb(scratch, MemOperand(dst, 1));
3660 srl(scratch, scratch, 8);
3661 sb(scratch, MemOperand(dst, 2));
3662 srl(scratch, scratch, 8);
3663 sb(scratch, MemOperand(dst, 3));
3664 } else {
3665 sb(scratch, MemOperand(dst, 3));
3666 srl(scratch, scratch, 8);
3667 sb(scratch, MemOperand(dst, 2));
3668 srl(scratch, scratch, 8);
3669 sb(scratch, MemOperand(dst, 1));
3670 srl(scratch, scratch, 8);
3671 sb(scratch, MemOperand(dst, 0));
3672 }
3673
Ben Murdoch257744e2011-11-30 15:57:28 +00003674 Addu(dst, dst, 4);
3675
3676 Subu(length, length, Operand(kPointerSize));
3677 Branch(&word_loop);
3678
3679 // Copy the last bytes if any left.
3680 bind(&byte_loop);
3681 Branch(&done, eq, length, Operand(zero_reg));
3682 bind(&byte_loop_1);
3683 lbu(scratch, MemOperand(src));
3684 Addu(src, src, 1);
3685 sb(scratch, MemOperand(dst));
3686 Addu(dst, dst, 1);
3687 Subu(length, length, Operand(1));
3688 Branch(&byte_loop_1, ne, length, Operand(zero_reg));
3689 bind(&done);
3690}
3691
3692
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003693void MacroAssembler::InitializeFieldsWithFiller(Register current_address,
3694 Register end_address,
Ben Murdoch3ef787d2012-04-12 10:51:47 +01003695 Register filler) {
3696 Label loop, entry;
3697 Branch(&entry);
3698 bind(&loop);
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003699 sw(filler, MemOperand(current_address));
3700 Addu(current_address, current_address, kPointerSize);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01003701 bind(&entry);
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003702 Branch(&loop, ult, current_address, Operand(end_address));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01003703}
3704
3705
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00003706void MacroAssembler::CheckFastElements(Register map,
3707 Register scratch,
3708 Label* fail) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003709 STATIC_ASSERT(FAST_SMI_ELEMENTS == 0);
3710 STATIC_ASSERT(FAST_HOLEY_SMI_ELEMENTS == 1);
3711 STATIC_ASSERT(FAST_ELEMENTS == 2);
3712 STATIC_ASSERT(FAST_HOLEY_ELEMENTS == 3);
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00003713 lbu(scratch, FieldMemOperand(map, Map::kBitField2Offset));
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003714 Branch(fail, hi, scratch,
3715 Operand(Map::kMaximumBitField2FastHoleyElementValue));
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00003716}
3717
3718
Ben Murdoch3ef787d2012-04-12 10:51:47 +01003719void MacroAssembler::CheckFastObjectElements(Register map,
3720 Register scratch,
3721 Label* fail) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003722 STATIC_ASSERT(FAST_SMI_ELEMENTS == 0);
3723 STATIC_ASSERT(FAST_HOLEY_SMI_ELEMENTS == 1);
3724 STATIC_ASSERT(FAST_ELEMENTS == 2);
3725 STATIC_ASSERT(FAST_HOLEY_ELEMENTS == 3);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01003726 lbu(scratch, FieldMemOperand(map, Map::kBitField2Offset));
3727 Branch(fail, ls, scratch,
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003728 Operand(Map::kMaximumBitField2FastHoleySmiElementValue));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01003729 Branch(fail, hi, scratch,
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003730 Operand(Map::kMaximumBitField2FastHoleyElementValue));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01003731}
3732
3733
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003734void MacroAssembler::CheckFastSmiElements(Register map,
3735 Register scratch,
3736 Label* fail) {
3737 STATIC_ASSERT(FAST_SMI_ELEMENTS == 0);
3738 STATIC_ASSERT(FAST_HOLEY_SMI_ELEMENTS == 1);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01003739 lbu(scratch, FieldMemOperand(map, Map::kBitField2Offset));
3740 Branch(fail, hi, scratch,
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003741 Operand(Map::kMaximumBitField2FastHoleySmiElementValue));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01003742}
3743
3744
3745void MacroAssembler::StoreNumberToDoubleElements(Register value_reg,
3746 Register key_reg,
Ben Murdoch3ef787d2012-04-12 10:51:47 +01003747 Register elements_reg,
3748 Register scratch1,
3749 Register scratch2,
3750 Register scratch3,
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003751 Label* fail,
3752 int elements_offset) {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003753 DCHECK(!AreAliased(value_reg, key_reg, elements_reg, scratch1, scratch2,
3754 scratch3));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01003755 Label smi_value, maybe_nan, have_double_value, is_nan, done;
3756 Register mantissa_reg = scratch2;
3757 Register exponent_reg = scratch3;
3758
3759 // Handle smi values specially.
3760 JumpIfSmi(value_reg, &smi_value);
3761
3762 // Ensure that the object is a heap number
3763 CheckMap(value_reg,
3764 scratch1,
3765 Heap::kHeapNumberMapRootIndex,
3766 fail,
3767 DONT_DO_SMI_CHECK);
3768
3769 // Check for nan: all NaN values have a value greater (signed) than 0x7ff00000
3770 // in the exponent.
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003771 li(scratch1, Operand(kHoleNanUpper32 & HeapNumber::kExponentMask));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01003772 lw(exponent_reg, FieldMemOperand(value_reg, HeapNumber::kExponentOffset));
3773 Branch(&maybe_nan, ge, exponent_reg, Operand(scratch1));
3774
3775 lw(mantissa_reg, FieldMemOperand(value_reg, HeapNumber::kMantissaOffset));
3776
3777 bind(&have_double_value);
3778 sll(scratch1, key_reg, kDoubleSizeLog2 - kSmiTagSize);
3779 Addu(scratch1, scratch1, elements_reg);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003780 sw(mantissa_reg,
3781 FieldMemOperand(scratch1, FixedDoubleArray::kHeaderSize - elements_offset
3782 + kHoleNanLower32Offset));
3783 sw(exponent_reg,
3784 FieldMemOperand(scratch1, FixedDoubleArray::kHeaderSize - elements_offset
3785 + kHoleNanUpper32Offset));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01003786 jmp(&done);
3787
3788 bind(&maybe_nan);
3789 // Could be NaN or Infinity. If fraction is not zero, it's NaN, otherwise
3790 // it's an Infinity, and the non-NaN code path applies.
3791 Branch(&is_nan, gt, exponent_reg, Operand(scratch1));
3792 lw(mantissa_reg, FieldMemOperand(value_reg, HeapNumber::kMantissaOffset));
3793 Branch(&have_double_value, eq, mantissa_reg, Operand(zero_reg));
3794 bind(&is_nan);
3795 // Load canonical NaN for storing into the double array.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003796 LoadRoot(at, Heap::kNanValueRootIndex);
3797 lw(mantissa_reg, FieldMemOperand(at, HeapNumber::kMantissaOffset));
3798 lw(exponent_reg, FieldMemOperand(at, HeapNumber::kExponentOffset));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01003799 jmp(&have_double_value);
3800
3801 bind(&smi_value);
3802 Addu(scratch1, elements_reg,
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003803 Operand(FixedDoubleArray::kHeaderSize - kHeapObjectTag -
3804 elements_offset));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01003805 sll(scratch2, key_reg, kDoubleSizeLog2 - kSmiTagSize);
3806 Addu(scratch1, scratch1, scratch2);
3807 // scratch1 is now effective address of the double element
3808
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003809 Register untagged_value = scratch2;
Ben Murdoch3ef787d2012-04-12 10:51:47 +01003810 SmiUntag(untagged_value, value_reg);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003811 mtc1(untagged_value, f2);
3812 cvt_d_w(f0, f2);
3813 sdc1(f0, MemOperand(scratch1, 0));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01003814 bind(&done);
3815}
3816
3817
3818void MacroAssembler::CompareMapAndBranch(Register obj,
3819 Register scratch,
3820 Handle<Map> map,
3821 Label* early_success,
3822 Condition cond,
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003823 Label* branch_to) {
Ben Murdoch3ef787d2012-04-12 10:51:47 +01003824 lw(scratch, FieldMemOperand(obj, HeapObject::kMapOffset));
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003825 CompareMapAndBranch(scratch, map, early_success, cond, branch_to);
3826}
Ben Murdoch3ef787d2012-04-12 10:51:47 +01003827
Ben Murdoch3ef787d2012-04-12 10:51:47 +01003828
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003829void MacroAssembler::CompareMapAndBranch(Register obj_map,
3830 Handle<Map> map,
3831 Label* early_success,
3832 Condition cond,
3833 Label* branch_to) {
3834 Branch(branch_to, cond, obj_map, Operand(map));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01003835}
3836
3837
Steve Block44f0eee2011-05-26 01:26:41 +01003838void MacroAssembler::CheckMap(Register obj,
3839 Register scratch,
3840 Handle<Map> map,
3841 Label* fail,
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003842 SmiCheckType smi_check_type) {
Ben Murdoch257744e2011-11-30 15:57:28 +00003843 if (smi_check_type == DO_SMI_CHECK) {
Steve Block44f0eee2011-05-26 01:26:41 +01003844 JumpIfSmi(obj, fail);
3845 }
Ben Murdoch3ef787d2012-04-12 10:51:47 +01003846 Label success;
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003847 CompareMapAndBranch(obj, scratch, map, &success, ne, fail);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01003848 bind(&success);
Steve Block44f0eee2011-05-26 01:26:41 +01003849}
3850
3851
Emily Bernierd0a1eb72015-03-24 16:35:39 -04003852void MacroAssembler::DispatchWeakMap(Register obj, Register scratch1,
3853 Register scratch2, Handle<WeakCell> cell,
3854 Handle<Code> success,
3855 SmiCheckType smi_check_type) {
Ben Murdoch257744e2011-11-30 15:57:28 +00003856 Label fail;
3857 if (smi_check_type == DO_SMI_CHECK) {
3858 JumpIfSmi(obj, &fail);
3859 }
Emily Bernierd0a1eb72015-03-24 16:35:39 -04003860 lw(scratch1, FieldMemOperand(obj, HeapObject::kMapOffset));
3861 GetWeakValue(scratch2, cell);
3862 Jump(success, RelocInfo::CODE_TARGET, eq, scratch1, Operand(scratch2));
Ben Murdoch257744e2011-11-30 15:57:28 +00003863 bind(&fail);
3864}
3865
3866
Steve Block44f0eee2011-05-26 01:26:41 +01003867void MacroAssembler::CheckMap(Register obj,
3868 Register scratch,
3869 Heap::RootListIndex index,
3870 Label* fail,
Ben Murdoch257744e2011-11-30 15:57:28 +00003871 SmiCheckType smi_check_type) {
3872 if (smi_check_type == DO_SMI_CHECK) {
Steve Block44f0eee2011-05-26 01:26:41 +01003873 JumpIfSmi(obj, fail);
3874 }
3875 lw(scratch, FieldMemOperand(obj, HeapObject::kMapOffset));
3876 LoadRoot(at, index);
3877 Branch(fail, ne, scratch, Operand(at));
Steve Block6ded16b2010-05-10 14:33:55 +01003878}
3879
3880
Emily Bernierd0a1eb72015-03-24 16:35:39 -04003881void MacroAssembler::GetWeakValue(Register value, Handle<WeakCell> cell) {
3882 li(value, Operand(cell));
3883 lw(value, FieldMemOperand(value, WeakCell::kValueOffset));
3884}
3885
3886
3887void MacroAssembler::LoadWeakValue(Register value, Handle<WeakCell> cell,
3888 Label* miss) {
3889 GetWeakValue(value, cell);
3890 JumpIfSmi(value, miss);
3891}
3892
3893
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003894void MacroAssembler::MovFromFloatResult(DoubleRegister dst) {
Ben Murdoch257744e2011-11-30 15:57:28 +00003895 if (IsMipsSoftFloatABI) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003896 if (kArchEndian == kLittle) {
3897 Move(dst, v0, v1);
3898 } else {
3899 Move(dst, v1, v0);
3900 }
Ben Murdoch257744e2011-11-30 15:57:28 +00003901 } else {
3902 Move(dst, f0); // Reg f0 is o32 ABI FP return value.
3903 }
3904}
3905
3906
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003907void MacroAssembler::MovFromFloatParameter(DoubleRegister dst) {
3908 if (IsMipsSoftFloatABI) {
3909 if (kArchEndian == kLittle) {
3910 Move(dst, a0, a1);
Ben Murdoch257744e2011-11-30 15:57:28 +00003911 } else {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003912 Move(dst, a1, a0);
Ben Murdoch257744e2011-11-30 15:57:28 +00003913 }
3914 } else {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003915 Move(dst, f12); // Reg f12 is o32 ABI FP first argument value.
Ben Murdoch257744e2011-11-30 15:57:28 +00003916 }
3917}
3918
3919
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003920void MacroAssembler::MovToFloatParameter(DoubleRegister src) {
Ben Murdoch257744e2011-11-30 15:57:28 +00003921 if (!IsMipsSoftFloatABI) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003922 Move(f12, src);
Ben Murdoch257744e2011-11-30 15:57:28 +00003923 } else {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003924 if (kArchEndian == kLittle) {
3925 Move(a0, a1, src);
3926 } else {
3927 Move(a1, a0, src);
3928 }
Ben Murdoch257744e2011-11-30 15:57:28 +00003929 }
3930}
3931
3932
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003933void MacroAssembler::MovToFloatResult(DoubleRegister src) {
3934 if (!IsMipsSoftFloatABI) {
3935 Move(f0, src);
Ben Murdoch257744e2011-11-30 15:57:28 +00003936 } else {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003937 if (kArchEndian == kLittle) {
3938 Move(v0, v1, src);
3939 } else {
3940 Move(v1, v0, src);
3941 }
3942 }
3943}
3944
3945
3946void MacroAssembler::MovToFloatParameters(DoubleRegister src1,
3947 DoubleRegister src2) {
3948 if (!IsMipsSoftFloatABI) {
3949 if (src2.is(f12)) {
3950 DCHECK(!src1.is(f14));
3951 Move(f14, src2);
3952 Move(f12, src1);
3953 } else {
3954 Move(f12, src1);
3955 Move(f14, src2);
3956 }
3957 } else {
3958 if (kArchEndian == kLittle) {
3959 Move(a0, a1, src1);
3960 Move(a2, a3, src2);
3961 } else {
3962 Move(a1, a0, src1);
3963 Move(a3, a2, src2);
3964 }
Ben Murdoch257744e2011-11-30 15:57:28 +00003965 }
3966}
3967
3968
Steve Block6ded16b2010-05-10 14:33:55 +01003969// -----------------------------------------------------------------------------
Ben Murdoch257744e2011-11-30 15:57:28 +00003970// JavaScript invokes.
Steve Block6ded16b2010-05-10 14:33:55 +01003971
3972void MacroAssembler::InvokePrologue(const ParameterCount& expected,
3973 const ParameterCount& actual,
Steve Block6ded16b2010-05-10 14:33:55 +01003974 Label* done,
Ben Murdoch3ef787d2012-04-12 10:51:47 +01003975 bool* definitely_mismatches,
Steve Block44f0eee2011-05-26 01:26:41 +01003976 InvokeFlag flag,
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003977 const CallWrapper& call_wrapper) {
Steve Block6ded16b2010-05-10 14:33:55 +01003978 bool definitely_matches = false;
Ben Murdoch3ef787d2012-04-12 10:51:47 +01003979 *definitely_mismatches = false;
Steve Block6ded16b2010-05-10 14:33:55 +01003980 Label regular_invoke;
3981
3982 // Check whether the expected and actual arguments count match. If not,
3983 // setup registers according to contract with ArgumentsAdaptorTrampoline:
3984 // a0: actual arguments count
3985 // a1: function (passed through to callee)
3986 // a2: expected arguments count
Steve Block6ded16b2010-05-10 14:33:55 +01003987
3988 // The code below is made a lot easier because the calling code already sets
3989 // up actual and expected registers according to the contract if values are
3990 // passed in registers.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003991 DCHECK(actual.is_immediate() || actual.reg().is(a0));
3992 DCHECK(expected.is_immediate() || expected.reg().is(a2));
Steve Block6ded16b2010-05-10 14:33:55 +01003993
3994 if (expected.is_immediate()) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00003995 DCHECK(actual.is_immediate());
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00003996 li(a0, Operand(actual.immediate()));
Steve Block6ded16b2010-05-10 14:33:55 +01003997 if (expected.immediate() == actual.immediate()) {
3998 definitely_matches = true;
3999 } else {
Steve Block6ded16b2010-05-10 14:33:55 +01004000 const int sentinel = SharedFunctionInfo::kDontAdaptArgumentsSentinel;
4001 if (expected.immediate() == sentinel) {
4002 // Don't worry about adapting arguments for builtins that
4003 // don't want that done. Skip adaption code by making it look
4004 // like we have a match between expected and actual number of
4005 // arguments.
4006 definitely_matches = true;
4007 } else {
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004008 *definitely_mismatches = true;
Steve Block6ded16b2010-05-10 14:33:55 +01004009 li(a2, Operand(expected.immediate()));
4010 }
4011 }
Ben Murdoch257744e2011-11-30 15:57:28 +00004012 } else if (actual.is_immediate()) {
Ben Murdoch257744e2011-11-30 15:57:28 +00004013 li(a0, Operand(actual.immediate()));
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004014 Branch(&regular_invoke, eq, expected.reg(), Operand(a0));
Steve Block6ded16b2010-05-10 14:33:55 +01004015 } else {
Ben Murdoch257744e2011-11-30 15:57:28 +00004016 Branch(&regular_invoke, eq, expected.reg(), Operand(actual.reg()));
Steve Block6ded16b2010-05-10 14:33:55 +01004017 }
4018
4019 if (!definitely_matches) {
Steve Block44f0eee2011-05-26 01:26:41 +01004020 Handle<Code> adaptor =
4021 isolate()->builtins()->ArgumentsAdaptorTrampoline();
Steve Block6ded16b2010-05-10 14:33:55 +01004022 if (flag == CALL_FUNCTION) {
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00004023 call_wrapper.BeforeCall(CallSize(adaptor));
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00004024 Call(adaptor);
Ben Murdoch257744e2011-11-30 15:57:28 +00004025 call_wrapper.AfterCall();
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004026 if (!*definitely_mismatches) {
4027 Branch(done);
4028 }
Steve Block6ded16b2010-05-10 14:33:55 +01004029 } else {
Steve Block44f0eee2011-05-26 01:26:41 +01004030 Jump(adaptor, RelocInfo::CODE_TARGET);
Steve Block6ded16b2010-05-10 14:33:55 +01004031 }
4032 bind(&regular_invoke);
4033 }
4034}
4035
Steve Block44f0eee2011-05-26 01:26:41 +01004036
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004037void MacroAssembler::FloodFunctionIfStepping(Register fun, Register new_target,
4038 const ParameterCount& expected,
4039 const ParameterCount& actual) {
4040 Label skip_flooding;
4041 ExternalReference step_in_enabled =
4042 ExternalReference::debug_step_in_enabled_address(isolate());
4043 li(t0, Operand(step_in_enabled));
4044 lb(t0, MemOperand(t0));
4045 Branch(&skip_flooding, eq, t0, Operand(zero_reg));
4046 {
4047 FrameScope frame(this,
4048 has_frame() ? StackFrame::NONE : StackFrame::INTERNAL);
4049 if (expected.is_reg()) {
4050 SmiTag(expected.reg());
4051 Push(expected.reg());
4052 }
4053 if (actual.is_reg()) {
4054 SmiTag(actual.reg());
4055 Push(actual.reg());
4056 }
4057 if (new_target.is_valid()) {
4058 Push(new_target);
4059 }
4060 Push(fun);
4061 Push(fun);
4062 CallRuntime(Runtime::kDebugPrepareStepInIfStepping, 1);
4063 Pop(fun);
4064 if (new_target.is_valid()) {
4065 Pop(new_target);
4066 }
4067 if (actual.is_reg()) {
4068 Pop(actual.reg());
4069 SmiUntag(actual.reg());
4070 }
4071 if (expected.is_reg()) {
4072 Pop(expected.reg());
4073 SmiUntag(expected.reg());
4074 }
4075 }
4076 bind(&skip_flooding);
4077}
4078
4079
4080void MacroAssembler::InvokeFunctionCode(Register function, Register new_target,
4081 const ParameterCount& expected,
4082 const ParameterCount& actual,
4083 InvokeFlag flag,
4084 const CallWrapper& call_wrapper) {
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004085 // You can't call a function without a valid frame.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004086 DCHECK(flag == JUMP_FUNCTION || has_frame());
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004087 DCHECK(function.is(a1));
4088 DCHECK_IMPLIES(new_target.is_valid(), new_target.is(a3));
4089
4090 if (call_wrapper.NeedsDebugStepCheck()) {
4091 FloodFunctionIfStepping(function, new_target, expected, actual);
4092 }
4093
4094 // Clear the new.target register if not given.
4095 if (!new_target.is_valid()) {
4096 LoadRoot(a3, Heap::kUndefinedValueRootIndex);
4097 }
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004098
Steve Block6ded16b2010-05-10 14:33:55 +01004099 Label done;
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004100 bool definitely_mismatches = false;
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004101 InvokePrologue(expected, actual, &done, &definitely_mismatches, flag,
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004102 call_wrapper);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004103 if (!definitely_mismatches) {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004104 // We call indirectly through the code field in the function to
4105 // allow recompilation to take effect without changing any of the
4106 // call sites.
4107 Register code = t0;
4108 lw(code, FieldMemOperand(function, JSFunction::kCodeEntryOffset));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004109 if (flag == CALL_FUNCTION) {
4110 call_wrapper.BeforeCall(CallSize(code));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004111 Call(code);
4112 call_wrapper.AfterCall();
4113 } else {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004114 DCHECK(flag == JUMP_FUNCTION);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004115 Jump(code);
4116 }
4117 // Continue here if InvokePrologue does handle the invocation due to
4118 // mismatched parameter counts.
4119 bind(&done);
Steve Block6ded16b2010-05-10 14:33:55 +01004120 }
Steve Block6ded16b2010-05-10 14:33:55 +01004121}
4122
4123
Steve Block6ded16b2010-05-10 14:33:55 +01004124void MacroAssembler::InvokeFunction(Register function,
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004125 Register new_target,
Steve Block6ded16b2010-05-10 14:33:55 +01004126 const ParameterCount& actual,
Steve Block44f0eee2011-05-26 01:26:41 +01004127 InvokeFlag flag,
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004128 const CallWrapper& call_wrapper) {
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004129 // You can't call a function without a valid frame.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004130 DCHECK(flag == JUMP_FUNCTION || has_frame());
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004131
Steve Block6ded16b2010-05-10 14:33:55 +01004132 // Contract with called JS functions requires that function is passed in a1.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004133 DCHECK(function.is(a1));
Steve Block6ded16b2010-05-10 14:33:55 +01004134 Register expected_reg = a2;
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004135 Register temp_reg = t0;
Steve Block6ded16b2010-05-10 14:33:55 +01004136
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004137 lw(temp_reg, FieldMemOperand(a1, JSFunction::kSharedFunctionInfoOffset));
Steve Block6ded16b2010-05-10 14:33:55 +01004138 lw(cp, FieldMemOperand(a1, JSFunction::kContextOffset));
4139 lw(expected_reg,
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004140 FieldMemOperand(temp_reg,
4141 SharedFunctionInfo::kFormalParameterCountOffset));
Steve Block44f0eee2011-05-26 01:26:41 +01004142 sra(expected_reg, expected_reg, kSmiTagSize);
Steve Block6ded16b2010-05-10 14:33:55 +01004143
4144 ParameterCount expected(expected_reg);
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004145 InvokeFunctionCode(function, new_target, expected, actual, flag,
4146 call_wrapper);
Steve Block44f0eee2011-05-26 01:26:41 +01004147}
4148
4149
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004150void MacroAssembler::InvokeFunction(Register function,
4151 const ParameterCount& expected,
Steve Block44f0eee2011-05-26 01:26:41 +01004152 const ParameterCount& actual,
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00004153 InvokeFlag flag,
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004154 const CallWrapper& call_wrapper) {
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004155 // You can't call a function without a valid frame.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004156 DCHECK(flag == JUMP_FUNCTION || has_frame());
4157
4158 // Contract with called JS functions requires that function is passed in a1.
4159 DCHECK(function.is(a1));
Steve Block44f0eee2011-05-26 01:26:41 +01004160
4161 // Get the function and setup the context.
Steve Block44f0eee2011-05-26 01:26:41 +01004162 lw(cp, FieldMemOperand(a1, JSFunction::kContextOffset));
4163
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004164 InvokeFunctionCode(a1, no_reg, expected, actual, flag, call_wrapper);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004165}
4166
4167
4168void MacroAssembler::InvokeFunction(Handle<JSFunction> function,
4169 const ParameterCount& expected,
4170 const ParameterCount& actual,
4171 InvokeFlag flag,
4172 const CallWrapper& call_wrapper) {
4173 li(a1, function);
4174 InvokeFunction(a1, expected, actual, flag, call_wrapper);
Steve Block44f0eee2011-05-26 01:26:41 +01004175}
4176
4177
Steve Block44f0eee2011-05-26 01:26:41 +01004178void MacroAssembler::IsObjectJSStringType(Register object,
4179 Register scratch,
4180 Label* fail) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004181 DCHECK(kNotStringTag != 0);
Steve Block44f0eee2011-05-26 01:26:41 +01004182
4183 lw(scratch, FieldMemOperand(object, HeapObject::kMapOffset));
4184 lbu(scratch, FieldMemOperand(scratch, Map::kInstanceTypeOffset));
4185 And(scratch, scratch, Operand(kIsNotStringMask));
4186 Branch(fail, ne, scratch, Operand(zero_reg));
Steve Block6ded16b2010-05-10 14:33:55 +01004187}
4188
4189
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004190void MacroAssembler::IsObjectNameType(Register object,
4191 Register scratch,
4192 Label* fail) {
4193 lw(scratch, FieldMemOperand(object, HeapObject::kMapOffset));
4194 lbu(scratch, FieldMemOperand(scratch, Map::kInstanceTypeOffset));
4195 Branch(fail, hi, scratch, Operand(LAST_NAME_TYPE));
4196}
4197
4198
Steve Block6ded16b2010-05-10 14:33:55 +01004199// ---------------------------------------------------------------------------
4200// Support functions.
4201
Steve Block44f0eee2011-05-26 01:26:41 +01004202
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004203void MacroAssembler::GetMapConstructor(Register result, Register map,
4204 Register temp, Register temp2) {
4205 Label done, loop;
4206 lw(result, FieldMemOperand(map, Map::kConstructorOrBackPointerOffset));
4207 bind(&loop);
4208 JumpIfSmi(result, &done);
4209 GetObjectType(result, temp, temp2);
4210 Branch(&done, ne, temp2, Operand(MAP_TYPE));
4211 lw(result, FieldMemOperand(result, Map::kConstructorOrBackPointerOffset));
4212 Branch(&loop);
4213 bind(&done);
4214}
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004215
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004216
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004217void MacroAssembler::TryGetFunctionPrototype(Register function, Register result,
4218 Register scratch, Label* miss) {
Steve Block44f0eee2011-05-26 01:26:41 +01004219 // Get the prototype or initial map from the function.
4220 lw(result,
4221 FieldMemOperand(function, JSFunction::kPrototypeOrInitialMapOffset));
4222
4223 // If the prototype or initial map is the hole, don't return it and
4224 // simply miss the cache instead. This will allow us to allocate a
4225 // prototype object on-demand in the runtime system.
4226 LoadRoot(t8, Heap::kTheHoleValueRootIndex);
4227 Branch(miss, eq, result, Operand(t8));
4228
4229 // If the function does not have an initial map, we're done.
4230 Label done;
4231 GetObjectType(result, scratch, scratch);
4232 Branch(&done, ne, scratch, Operand(MAP_TYPE));
4233
4234 // Get the prototype from the initial map.
4235 lw(result, FieldMemOperand(result, Map::kPrototypeOffset));
Steve Block44f0eee2011-05-26 01:26:41 +01004236
Steve Block44f0eee2011-05-26 01:26:41 +01004237 // All done.
4238 bind(&done);
4239}
Steve Block6ded16b2010-05-10 14:33:55 +01004240
4241
Steve Block44f0eee2011-05-26 01:26:41 +01004242void MacroAssembler::GetObjectType(Register object,
4243 Register map,
4244 Register type_reg) {
4245 lw(map, FieldMemOperand(object, HeapObject::kMapOffset));
4246 lbu(type_reg, FieldMemOperand(map, Map::kInstanceTypeOffset));
4247}
Steve Block6ded16b2010-05-10 14:33:55 +01004248
4249
4250// -----------------------------------------------------------------------------
Ben Murdoch257744e2011-11-30 15:57:28 +00004251// Runtime calls.
Steve Block6ded16b2010-05-10 14:33:55 +01004252
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004253void MacroAssembler::CallStub(CodeStub* stub,
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004254 TypeFeedbackId ast_id,
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004255 Condition cond,
4256 Register r1,
4257 const Operand& r2,
4258 BranchDelaySlot bd) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004259 DCHECK(AllowThisStubCall(stub)); // Stub calls are not allowed in some stubs.
4260 Call(stub->GetCode(), RelocInfo::CODE_TARGET, ast_id,
4261 cond, r1, r2, bd);
Andrei Popescu31002712010-02-23 13:46:05 +00004262}
4263
4264
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004265void MacroAssembler::TailCallStub(CodeStub* stub,
4266 Condition cond,
4267 Register r1,
4268 const Operand& r2,
4269 BranchDelaySlot bd) {
4270 Jump(stub->GetCode(), RelocInfo::CODE_TARGET, cond, r1, r2, bd);
Andrei Popescu31002712010-02-23 13:46:05 +00004271}
4272
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00004273
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004274bool MacroAssembler::AllowThisStubCall(CodeStub* stub) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004275 return has_frame_ || !stub->SometimesSetsUpAFrame();
Ben Murdoch257744e2011-11-30 15:57:28 +00004276}
4277
Andrei Popescu31002712010-02-23 13:46:05 +00004278
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004279void MacroAssembler::IndexFromHash(Register hash, Register index) {
Steve Block44f0eee2011-05-26 01:26:41 +01004280 // If the hash field contains an array index pick it out. The assert checks
4281 // that the constants for the maximum number of digits for an array index
4282 // cached in the hash field and the number of bits reserved for it does not
4283 // conflict.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004284 DCHECK(TenToThe(String::kMaxCachedArrayIndexLength) <
Steve Block44f0eee2011-05-26 01:26:41 +01004285 (1 << String::kArrayIndexValueBits));
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004286 DecodeFieldToSmi<String::ArrayIndexValueBits>(index, hash);
Steve Block44f0eee2011-05-26 01:26:41 +01004287}
4288
4289
4290void MacroAssembler::ObjectToDoubleFPURegister(Register object,
4291 FPURegister result,
4292 Register scratch1,
4293 Register scratch2,
4294 Register heap_number_map,
4295 Label* not_number,
4296 ObjectToDoubleFlags flags) {
4297 Label done;
4298 if ((flags & OBJECT_NOT_SMI) == 0) {
4299 Label not_smi;
4300 JumpIfNotSmi(object, &not_smi);
4301 // Remove smi tag and convert to double.
4302 sra(scratch1, object, kSmiTagSize);
4303 mtc1(scratch1, result);
4304 cvt_d_w(result, result);
4305 Branch(&done);
4306 bind(&not_smi);
4307 }
4308 // Check for heap number and load double value from it.
4309 lw(scratch1, FieldMemOperand(object, HeapObject::kMapOffset));
4310 Branch(not_number, ne, scratch1, Operand(heap_number_map));
4311
4312 if ((flags & AVOID_NANS_AND_INFINITIES) != 0) {
4313 // If exponent is all ones the number is either a NaN or +/-Infinity.
4314 Register exponent = scratch1;
4315 Register mask_reg = scratch2;
4316 lw(exponent, FieldMemOperand(object, HeapNumber::kExponentOffset));
4317 li(mask_reg, HeapNumber::kExponentMask);
4318
4319 And(exponent, exponent, mask_reg);
4320 Branch(not_number, eq, exponent, Operand(mask_reg));
4321 }
4322 ldc1(result, FieldMemOperand(object, HeapNumber::kValueOffset));
4323 bind(&done);
4324}
4325
4326
Steve Block44f0eee2011-05-26 01:26:41 +01004327void MacroAssembler::SmiToDoubleFPURegister(Register smi,
4328 FPURegister value,
4329 Register scratch1) {
4330 sra(scratch1, smi, kSmiTagSize);
4331 mtc1(scratch1, value);
4332 cvt_d_w(value, value);
4333}
4334
4335
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004336static inline void BranchOvfHelper(MacroAssembler* masm, Register overflow_dst,
4337 Label* overflow_label,
4338 Label* no_overflow_label) {
4339 DCHECK(overflow_label || no_overflow_label);
4340 if (!overflow_label) {
4341 DCHECK(no_overflow_label);
4342 masm->Branch(no_overflow_label, ge, overflow_dst, Operand(zero_reg));
Emily Bernierd0a1eb72015-03-24 16:35:39 -04004343 } else {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004344 masm->Branch(overflow_label, lt, overflow_dst, Operand(zero_reg));
4345 if (no_overflow_label) masm->Branch(no_overflow_label);
4346 }
4347}
4348
4349
4350void MacroAssembler::AddBranchOvf(Register dst, Register left,
4351 const Operand& right, Label* overflow_label,
4352 Label* no_overflow_label, Register scratch) {
4353 if (right.is_reg()) {
4354 AddBranchOvf(dst, left, right.rm(), overflow_label, no_overflow_label,
4355 scratch);
4356 } else {
4357 if (IsMipsArchVariant(kMips32r6)) {
4358 Register right_reg = t9;
4359 DCHECK(!left.is(right_reg));
4360 li(right_reg, Operand(right));
4361 AddBranchOvf(dst, left, right_reg, overflow_label, no_overflow_label);
4362 } else {
4363 Register overflow_dst = t9;
4364 DCHECK(!dst.is(scratch));
4365 DCHECK(!dst.is(overflow_dst));
4366 DCHECK(!scratch.is(overflow_dst));
4367 DCHECK(!left.is(overflow_dst));
4368 if (dst.is(left)) {
4369 mov(scratch, left); // Preserve left.
4370 Addu(dst, left, right.immediate()); // Left is overwritten.
4371 xor_(scratch, dst, scratch); // Original left.
4372 // Load right since xori takes uint16 as immediate.
4373 Addu(overflow_dst, zero_reg, right);
4374 xor_(overflow_dst, dst, overflow_dst);
4375 and_(overflow_dst, overflow_dst, scratch);
4376 } else {
4377 Addu(dst, left, right.immediate());
4378 xor_(overflow_dst, dst, left);
4379 // Load right since xori takes uint16 as immediate.
4380 Addu(scratch, zero_reg, right);
4381 xor_(scratch, dst, scratch);
4382 and_(overflow_dst, scratch, overflow_dst);
4383 }
4384 BranchOvfHelper(this, overflow_dst, overflow_label, no_overflow_label);
4385 }
4386 }
4387}
4388
4389
4390void MacroAssembler::AddBranchOvf(Register dst, Register left, Register right,
4391 Label* overflow_label,
4392 Label* no_overflow_label, Register scratch) {
4393 if (IsMipsArchVariant(kMips32r6)) {
4394 if (!overflow_label) {
4395 DCHECK(no_overflow_label);
4396 DCHECK(!dst.is(scratch));
4397 Register left_reg = left.is(dst) ? scratch : left;
4398 Register right_reg = right.is(dst) ? t9 : right;
4399 DCHECK(!dst.is(left_reg));
4400 DCHECK(!dst.is(right_reg));
4401 Move(left_reg, left);
4402 Move(right_reg, right);
4403 addu(dst, left, right);
4404 bnvc(left_reg, right_reg, no_overflow_label);
4405 } else {
4406 bovc(left, right, overflow_label);
4407 addu(dst, left, right);
4408 if (no_overflow_label) bc(no_overflow_label);
4409 }
4410 } else {
4411 Register overflow_dst = t9;
4412 DCHECK(!dst.is(scratch));
4413 DCHECK(!dst.is(overflow_dst));
4414 DCHECK(!scratch.is(overflow_dst));
4415 DCHECK(!left.is(overflow_dst));
4416 DCHECK(!right.is(overflow_dst));
4417 DCHECK(!left.is(scratch));
4418 DCHECK(!right.is(scratch));
4419
4420 if (left.is(right) && dst.is(left)) {
4421 mov(overflow_dst, right);
4422 right = overflow_dst;
4423 }
4424
Emily Bernierd0a1eb72015-03-24 16:35:39 -04004425 if (dst.is(left)) {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004426 mov(scratch, left); // Preserve left.
4427 addu(dst, left, right); // Left is overwritten.
4428 xor_(scratch, dst, scratch); // Original left.
4429 xor_(overflow_dst, dst, right);
4430 and_(overflow_dst, overflow_dst, scratch);
4431 } else if (dst.is(right)) {
4432 mov(scratch, right); // Preserve right.
4433 addu(dst, left, right); // Right is overwritten.
4434 xor_(scratch, dst, scratch); // Original right.
4435 xor_(overflow_dst, dst, left);
Emily Bernierd0a1eb72015-03-24 16:35:39 -04004436 and_(overflow_dst, overflow_dst, scratch);
4437 } else {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004438 addu(dst, left, right);
Emily Bernierd0a1eb72015-03-24 16:35:39 -04004439 xor_(overflow_dst, dst, left);
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004440 xor_(scratch, dst, right);
Emily Bernierd0a1eb72015-03-24 16:35:39 -04004441 and_(overflow_dst, scratch, overflow_dst);
4442 }
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004443 BranchOvfHelper(this, overflow_dst, overflow_label, no_overflow_label);
Emily Bernierd0a1eb72015-03-24 16:35:39 -04004444 }
4445}
4446
4447
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004448void MacroAssembler::SubBranchOvf(Register dst, Register left,
4449 const Operand& right, Label* overflow_label,
4450 Label* no_overflow_label, Register scratch) {
4451 DCHECK(overflow_label || no_overflow_label);
Emily Bernierd0a1eb72015-03-24 16:35:39 -04004452 if (right.is_reg()) {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004453 SubBranchOvf(dst, left, right.rm(), overflow_label, no_overflow_label,
4454 scratch);
Emily Bernierd0a1eb72015-03-24 16:35:39 -04004455 } else {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004456 Register overflow_dst = t9;
4457 DCHECK(!dst.is(scratch));
4458 DCHECK(!dst.is(overflow_dst));
4459 DCHECK(!scratch.is(overflow_dst));
4460 DCHECK(!left.is(overflow_dst));
4461 DCHECK(!left.is(scratch));
Emily Bernierd0a1eb72015-03-24 16:35:39 -04004462 if (dst.is(left)) {
4463 mov(scratch, left); // Preserve left.
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004464 Subu(dst, left, right.immediate()); // Left is overwritten.
Emily Bernierd0a1eb72015-03-24 16:35:39 -04004465 // Load right since xori takes uint16 as immediate.
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004466 Addu(overflow_dst, zero_reg, right);
4467 xor_(overflow_dst, scratch, overflow_dst); // scratch is original left.
4468 xor_(scratch, dst, scratch); // scratch is original left.
Emily Bernierd0a1eb72015-03-24 16:35:39 -04004469 and_(overflow_dst, scratch, overflow_dst);
4470 } else {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004471 Subu(dst, left, right);
Emily Bernierd0a1eb72015-03-24 16:35:39 -04004472 xor_(overflow_dst, dst, left);
4473 // Load right since xori takes uint16 as immediate.
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004474 Addu(scratch, zero_reg, right);
4475 xor_(scratch, left, scratch);
Emily Bernierd0a1eb72015-03-24 16:35:39 -04004476 and_(overflow_dst, scratch, overflow_dst);
4477 }
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004478 BranchOvfHelper(this, overflow_dst, overflow_label, no_overflow_label);
Emily Bernierd0a1eb72015-03-24 16:35:39 -04004479 }
4480}
4481
4482
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004483void MacroAssembler::SubBranchOvf(Register dst, Register left, Register right,
4484 Label* overflow_label,
4485 Label* no_overflow_label, Register scratch) {
4486 DCHECK(overflow_label || no_overflow_label);
4487 Register overflow_dst = t9;
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004488 DCHECK(!dst.is(scratch));
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004489 DCHECK(!dst.is(overflow_dst));
4490 DCHECK(!scratch.is(overflow_dst));
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004491 DCHECK(!overflow_dst.is(left));
4492 DCHECK(!overflow_dst.is(right));
4493 DCHECK(!scratch.is(left));
4494 DCHECK(!scratch.is(right));
Ben Murdoch257744e2011-11-30 15:57:28 +00004495
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004496 // This happens with some crankshaft code. Since Subu works fine if
4497 // left == right, let's not make that restriction here.
4498 if (left.is(right)) {
4499 mov(dst, zero_reg);
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004500 if (no_overflow_label) {
4501 Branch(no_overflow_label);
4502 }
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004503 }
4504
Ben Murdoch257744e2011-11-30 15:57:28 +00004505 if (dst.is(left)) {
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00004506 mov(scratch, left); // Preserve left.
4507 subu(dst, left, right); // Left is overwritten.
4508 xor_(overflow_dst, dst, scratch); // scratch is original left.
4509 xor_(scratch, scratch, right); // scratch is original left.
4510 and_(overflow_dst, scratch, overflow_dst);
Ben Murdoch257744e2011-11-30 15:57:28 +00004511 } else if (dst.is(right)) {
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00004512 mov(scratch, right); // Preserve right.
4513 subu(dst, left, right); // Right is overwritten.
4514 xor_(overflow_dst, dst, left);
4515 xor_(scratch, left, scratch); // Original right.
4516 and_(overflow_dst, scratch, overflow_dst);
Ben Murdoch257744e2011-11-30 15:57:28 +00004517 } else {
4518 subu(dst, left, right);
4519 xor_(overflow_dst, dst, left);
4520 xor_(scratch, left, right);
4521 and_(overflow_dst, scratch, overflow_dst);
4522 }
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004523 BranchOvfHelper(this, overflow_dst, overflow_label, no_overflow_label);
Ben Murdoch257744e2011-11-30 15:57:28 +00004524}
4525
4526
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004527void MacroAssembler::CallRuntime(const Runtime::Function* f, int num_arguments,
4528 SaveFPRegsMode save_doubles,
4529 BranchDelaySlot bd) {
Steve Block6ded16b2010-05-10 14:33:55 +01004530 // All parameters are on the stack. v0 has the return value after call.
4531
4532 // If the expected number of arguments of the runtime function is
4533 // constant, we check that the actual number of arguments match the
4534 // expectation.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004535 CHECK(f->nargs < 0 || f->nargs == num_arguments);
Steve Block6ded16b2010-05-10 14:33:55 +01004536
4537 // TODO(1236192): Most runtime routines don't need the number of
4538 // arguments passed in because it is constant. At some point we
4539 // should remove this need and make the runtime routine entry code
4540 // smarter.
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004541 PrepareCEntryArgs(num_arguments);
4542 PrepareCEntryFunction(ExternalReference(f, isolate()));
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004543 CEntryStub stub(isolate(), 1, save_doubles);
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004544 CallStub(&stub, TypeFeedbackId::None(), al, zero_reg, Operand(zero_reg), bd);
Andrei Popescu31002712010-02-23 13:46:05 +00004545}
4546
4547
Steve Block44f0eee2011-05-26 01:26:41 +01004548void MacroAssembler::CallExternalReference(const ExternalReference& ext,
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004549 int num_arguments,
4550 BranchDelaySlot bd) {
4551 PrepareCEntryArgs(num_arguments);
4552 PrepareCEntryFunction(ext);
Steve Block44f0eee2011-05-26 01:26:41 +01004553
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004554 CEntryStub stub(isolate(), 1);
4555 CallStub(&stub, TypeFeedbackId::None(), al, zero_reg, Operand(zero_reg), bd);
Steve Block44f0eee2011-05-26 01:26:41 +01004556}
4557
4558
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004559void MacroAssembler::TailCallRuntime(Runtime::FunctionId fid) {
4560 const Runtime::Function* function = Runtime::FunctionForId(fid);
4561 DCHECK_EQ(1, function->result_size);
4562 if (function->nargs >= 0) {
4563 PrepareCEntryArgs(function->nargs);
4564 }
4565 JumpToExternalReference(ExternalReference(fid, isolate()));
Andrei Popescu31002712010-02-23 13:46:05 +00004566}
4567
4568
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004569void MacroAssembler::JumpToExternalReference(const ExternalReference& builtin,
4570 BranchDelaySlot bd) {
4571 PrepareCEntryFunction(builtin);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004572 CEntryStub stub(isolate(), 1);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004573 Jump(stub.GetCode(),
4574 RelocInfo::CODE_TARGET,
4575 al,
4576 zero_reg,
4577 Operand(zero_reg),
4578 bd);
Andrei Popescu31002712010-02-23 13:46:05 +00004579}
4580
4581
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004582void MacroAssembler::InvokeBuiltin(int native_context_index, InvokeFlag flag,
Ben Murdoch257744e2011-11-30 15:57:28 +00004583 const CallWrapper& call_wrapper) {
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004584 // You can't call a builtin without a valid frame.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004585 DCHECK(flag == JUMP_FUNCTION || has_frame());
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004586
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004587 // Fake a parameter count to avoid emitting code to do the check.
4588 ParameterCount expected(0);
4589 LoadNativeContextSlot(native_context_index, a1);
4590 InvokeFunctionCode(a1, no_reg, expected, expected, flag, call_wrapper);
Andrei Popescu31002712010-02-23 13:46:05 +00004591}
4592
4593
4594void MacroAssembler::SetCounter(StatsCounter* counter, int value,
4595 Register scratch1, Register scratch2) {
Steve Block44f0eee2011-05-26 01:26:41 +01004596 if (FLAG_native_code_counters && counter->Enabled()) {
4597 li(scratch1, Operand(value));
4598 li(scratch2, Operand(ExternalReference(counter)));
4599 sw(scratch1, MemOperand(scratch2));
4600 }
Andrei Popescu31002712010-02-23 13:46:05 +00004601}
4602
4603
4604void MacroAssembler::IncrementCounter(StatsCounter* counter, int value,
4605 Register scratch1, Register scratch2) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004606 DCHECK(value > 0);
Steve Block44f0eee2011-05-26 01:26:41 +01004607 if (FLAG_native_code_counters && counter->Enabled()) {
4608 li(scratch2, Operand(ExternalReference(counter)));
4609 lw(scratch1, MemOperand(scratch2));
4610 Addu(scratch1, scratch1, Operand(value));
4611 sw(scratch1, MemOperand(scratch2));
4612 }
Andrei Popescu31002712010-02-23 13:46:05 +00004613}
4614
4615
4616void MacroAssembler::DecrementCounter(StatsCounter* counter, int value,
4617 Register scratch1, Register scratch2) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004618 DCHECK(value > 0);
Steve Block44f0eee2011-05-26 01:26:41 +01004619 if (FLAG_native_code_counters && counter->Enabled()) {
4620 li(scratch2, Operand(ExternalReference(counter)));
4621 lw(scratch1, MemOperand(scratch2));
4622 Subu(scratch1, scratch1, Operand(value));
4623 sw(scratch1, MemOperand(scratch2));
4624 }
Andrei Popescu31002712010-02-23 13:46:05 +00004625}
4626
4627
Steve Block6ded16b2010-05-10 14:33:55 +01004628// -----------------------------------------------------------------------------
Ben Murdoch257744e2011-11-30 15:57:28 +00004629// Debugging.
Andrei Popescu31002712010-02-23 13:46:05 +00004630
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004631void MacroAssembler::Assert(Condition cc, BailoutReason reason,
Andrei Popescu31002712010-02-23 13:46:05 +00004632 Register rs, Operand rt) {
Ben Murdoch257744e2011-11-30 15:57:28 +00004633 if (emit_debug_code())
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004634 Check(cc, reason, rs, rt);
Steve Block44f0eee2011-05-26 01:26:41 +01004635}
4636
4637
4638void MacroAssembler::AssertFastElements(Register elements) {
Ben Murdoch257744e2011-11-30 15:57:28 +00004639 if (emit_debug_code()) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004640 DCHECK(!elements.is(at));
Steve Block44f0eee2011-05-26 01:26:41 +01004641 Label ok;
Ben Murdoch257744e2011-11-30 15:57:28 +00004642 push(elements);
Steve Block44f0eee2011-05-26 01:26:41 +01004643 lw(elements, FieldMemOperand(elements, HeapObject::kMapOffset));
4644 LoadRoot(at, Heap::kFixedArrayMapRootIndex);
4645 Branch(&ok, eq, elements, Operand(at));
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00004646 LoadRoot(at, Heap::kFixedDoubleArrayMapRootIndex);
4647 Branch(&ok, eq, elements, Operand(at));
Steve Block44f0eee2011-05-26 01:26:41 +01004648 LoadRoot(at, Heap::kFixedCOWArrayMapRootIndex);
4649 Branch(&ok, eq, elements, Operand(at));
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004650 Abort(kJSObjectWithFastElementsMapHasSlowElements);
Steve Block44f0eee2011-05-26 01:26:41 +01004651 bind(&ok);
Ben Murdoch257744e2011-11-30 15:57:28 +00004652 pop(elements);
Steve Block44f0eee2011-05-26 01:26:41 +01004653 }
Andrei Popescu31002712010-02-23 13:46:05 +00004654}
4655
4656
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004657void MacroAssembler::Check(Condition cc, BailoutReason reason,
Andrei Popescu31002712010-02-23 13:46:05 +00004658 Register rs, Operand rt) {
Steve Block44f0eee2011-05-26 01:26:41 +01004659 Label L;
4660 Branch(&L, cc, rs, rt);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004661 Abort(reason);
Ben Murdoch257744e2011-11-30 15:57:28 +00004662 // Will not return here.
Steve Block44f0eee2011-05-26 01:26:41 +01004663 bind(&L);
Andrei Popescu31002712010-02-23 13:46:05 +00004664}
4665
4666
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004667void MacroAssembler::Abort(BailoutReason reason) {
Steve Block44f0eee2011-05-26 01:26:41 +01004668 Label abort_start;
4669 bind(&abort_start);
Steve Block44f0eee2011-05-26 01:26:41 +01004670#ifdef DEBUG
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004671 const char* msg = GetBailoutReason(reason);
Steve Block44f0eee2011-05-26 01:26:41 +01004672 if (msg != NULL) {
4673 RecordComment("Abort message: ");
4674 RecordComment(msg);
4675 }
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004676
4677 if (FLAG_trap_on_abort) {
4678 stop(msg);
4679 return;
4680 }
Steve Block44f0eee2011-05-26 01:26:41 +01004681#endif
Steve Block44f0eee2011-05-26 01:26:41 +01004682
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004683 li(a0, Operand(Smi::FromInt(reason)));
Ben Murdoch257744e2011-11-30 15:57:28 +00004684 push(a0);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004685 // Disable stub call restrictions to always allow calls to abort.
4686 if (!has_frame_) {
4687 // We don't actually want to generate a pile of code for this, so just
4688 // claim there is a stack frame, without generating one.
4689 FrameScope scope(this, StackFrame::NONE);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004690 CallRuntime(Runtime::kAbort, 1);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004691 } else {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004692 CallRuntime(Runtime::kAbort, 1);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004693 }
Ben Murdoch257744e2011-11-30 15:57:28 +00004694 // Will not return here.
Steve Block44f0eee2011-05-26 01:26:41 +01004695 if (is_trampoline_pool_blocked()) {
4696 // If the calling code cares about the exact number of
4697 // instructions generated, we insert padding here to keep the size
4698 // of the Abort macro constant.
4699 // Currently in debug mode with debug_code enabled the number of
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004700 // generated instructions is 10, so we use this as a maximum value.
4701 static const int kExpectedAbortInstructions = 10;
Steve Block44f0eee2011-05-26 01:26:41 +01004702 int abort_instructions = InstructionsGeneratedSince(&abort_start);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004703 DCHECK(abort_instructions <= kExpectedAbortInstructions);
Steve Block44f0eee2011-05-26 01:26:41 +01004704 while (abort_instructions++ < kExpectedAbortInstructions) {
4705 nop();
4706 }
4707 }
4708}
4709
4710
4711void MacroAssembler::LoadContext(Register dst, int context_chain_length) {
4712 if (context_chain_length > 0) {
4713 // Move up the chain of contexts to the context containing the slot.
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00004714 lw(dst, MemOperand(cp, Context::SlotOffset(Context::PREVIOUS_INDEX)));
Steve Block44f0eee2011-05-26 01:26:41 +01004715 for (int i = 1; i < context_chain_length; i++) {
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00004716 lw(dst, MemOperand(dst, Context::SlotOffset(Context::PREVIOUS_INDEX)));
Steve Block44f0eee2011-05-26 01:26:41 +01004717 }
Ben Murdoch257744e2011-11-30 15:57:28 +00004718 } else {
4719 // Slot is in the current function context. Move it into the
4720 // destination register in case we store into it (the write barrier
4721 // cannot be allowed to destroy the context in esi).
4722 Move(dst, cp);
4723 }
Steve Block44f0eee2011-05-26 01:26:41 +01004724}
4725
4726
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004727void MacroAssembler::LoadTransitionedArrayMapConditional(
4728 ElementsKind expected_kind,
4729 ElementsKind transitioned_kind,
4730 Register map_in_out,
4731 Register scratch,
4732 Label* no_map_match) {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004733 DCHECK(IsFastElementsKind(expected_kind));
4734 DCHECK(IsFastElementsKind(transitioned_kind));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004735
4736 // Check that the function's map is the same as the expected cached map.
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004737 lw(scratch, NativeContextMemOperand());
4738 lw(at, ContextMemOperand(scratch, Context::ArrayMapIndex(expected_kind)));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004739 Branch(no_map_match, ne, map_in_out, Operand(at));
4740
4741 // Use the transitioned cached map.
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004742 lw(map_in_out,
4743 ContextMemOperand(scratch, Context::ArrayMapIndex(transitioned_kind)));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004744}
4745
4746
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004747void MacroAssembler::LoadNativeContextSlot(int index, Register dst) {
4748 lw(dst, NativeContextMemOperand());
4749 lw(dst, ContextMemOperand(dst, index));
Steve Block44f0eee2011-05-26 01:26:41 +01004750}
4751
4752
4753void MacroAssembler::LoadGlobalFunctionInitialMap(Register function,
4754 Register map,
4755 Register scratch) {
4756 // Load the initial map. The global functions all have initial maps.
4757 lw(map, FieldMemOperand(function, JSFunction::kPrototypeOrInitialMapOffset));
Ben Murdoch257744e2011-11-30 15:57:28 +00004758 if (emit_debug_code()) {
Steve Block44f0eee2011-05-26 01:26:41 +01004759 Label ok, fail;
Ben Murdoch257744e2011-11-30 15:57:28 +00004760 CheckMap(map, scratch, Heap::kMetaMapRootIndex, &fail, DO_SMI_CHECK);
Steve Block44f0eee2011-05-26 01:26:41 +01004761 Branch(&ok);
4762 bind(&fail);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004763 Abort(kGlobalFunctionsMustHaveInitialMap);
Steve Block44f0eee2011-05-26 01:26:41 +01004764 bind(&ok);
4765 }
Andrei Popescu31002712010-02-23 13:46:05 +00004766}
4767
Steve Block6ded16b2010-05-10 14:33:55 +01004768
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004769void MacroAssembler::StubPrologue() {
4770 Push(ra, fp, cp);
4771 Push(Smi::FromInt(StackFrame::STUB));
4772 // Adjust FP to point to saved FP.
4773 Addu(fp, sp, Operand(StandardFrameConstants::kFixedFrameSizeFromFp));
4774}
4775
4776
4777void MacroAssembler::Prologue(bool code_pre_aging) {
4778 PredictableCodeSizeScope predictible_code_size_scope(
4779 this, kNoCodeAgeSequenceLength);
4780 // The following three instructions must remain together and unmodified
4781 // for code aging to work properly.
4782 if (code_pre_aging) {
4783 // Pre-age the code.
4784 Code* stub = Code::GetPreAgedCodeAgeStub(isolate());
4785 nop(Assembler::CODE_AGE_MARKER_NOP);
4786 // Load the stub address to t9 and call it,
4787 // GetCodeAgeAndParity() extracts the stub address from this instruction.
4788 li(t9,
4789 Operand(reinterpret_cast<uint32_t>(stub->instruction_start())),
4790 CONSTANT_SIZE);
4791 nop(); // Prevent jalr to jal optimization.
4792 jalr(t9, a0);
4793 nop(); // Branch delay slot nop.
4794 nop(); // Pad the empty space.
4795 } else {
4796 Push(ra, fp, cp, a1);
4797 nop(Assembler::CODE_AGE_SEQUENCE_NOP);
4798 // Adjust fp to point to caller's fp.
4799 Addu(fp, sp, Operand(StandardFrameConstants::kFixedFrameSizeFromFp));
4800 }
4801}
4802
4803
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004804void MacroAssembler::EmitLoadTypeFeedbackVector(Register vector) {
4805 lw(vector, MemOperand(fp, JavaScriptFrameConstants::kFunctionOffset));
4806 lw(vector, FieldMemOperand(vector, JSFunction::kSharedFunctionInfoOffset));
4807 lw(vector,
4808 FieldMemOperand(vector, SharedFunctionInfo::kFeedbackVectorOffset));
4809}
4810
4811
Emily Bernierd0a1eb72015-03-24 16:35:39 -04004812void MacroAssembler::EnterFrame(StackFrame::Type type,
4813 bool load_constant_pool_pointer_reg) {
4814 // Out-of-line constant pool not implemented on mips.
4815 UNREACHABLE();
4816}
4817
4818
Steve Block6ded16b2010-05-10 14:33:55 +01004819void MacroAssembler::EnterFrame(StackFrame::Type type) {
4820 addiu(sp, sp, -5 * kPointerSize);
Steve Block44f0eee2011-05-26 01:26:41 +01004821 li(t8, Operand(Smi::FromInt(type)));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004822 li(t9, Operand(CodeObject()), CONSTANT_SIZE);
Steve Block6ded16b2010-05-10 14:33:55 +01004823 sw(ra, MemOperand(sp, 4 * kPointerSize));
4824 sw(fp, MemOperand(sp, 3 * kPointerSize));
4825 sw(cp, MemOperand(sp, 2 * kPointerSize));
Steve Block44f0eee2011-05-26 01:26:41 +01004826 sw(t8, MemOperand(sp, 1 * kPointerSize));
4827 sw(t9, MemOperand(sp, 0 * kPointerSize));
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004828 // Adjust FP to point to saved FP.
4829 Addu(fp, sp,
4830 Operand(StandardFrameConstants::kFixedFrameSizeFromFp + kPointerSize));
Steve Block6ded16b2010-05-10 14:33:55 +01004831}
4832
4833
4834void MacroAssembler::LeaveFrame(StackFrame::Type type) {
4835 mov(sp, fp);
4836 lw(fp, MemOperand(sp, 0 * kPointerSize));
4837 lw(ra, MemOperand(sp, 1 * kPointerSize));
4838 addiu(sp, sp, 2 * kPointerSize);
4839}
4840
4841
Ben Murdoch257744e2011-11-30 15:57:28 +00004842void MacroAssembler::EnterExitFrame(bool save_doubles,
4843 int stack_space) {
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004844 // Set up the frame structure on the stack.
Ben Murdoch257744e2011-11-30 15:57:28 +00004845 STATIC_ASSERT(2 * kPointerSize == ExitFrameConstants::kCallerSPDisplacement);
4846 STATIC_ASSERT(1 * kPointerSize == ExitFrameConstants::kCallerPCOffset);
4847 STATIC_ASSERT(0 * kPointerSize == ExitFrameConstants::kCallerFPOffset);
Steve Block6ded16b2010-05-10 14:33:55 +01004848
Ben Murdoch257744e2011-11-30 15:57:28 +00004849 // This is how the stack will look:
4850 // fp + 2 (==kCallerSPDisplacement) - old stack's end
4851 // [fp + 1 (==kCallerPCOffset)] - saved old ra
4852 // [fp + 0 (==kCallerFPOffset)] - saved old fp
4853 // [fp - 1 (==kSPOffset)] - sp of the called function
4854 // [fp - 2 (==kCodeOffset)] - CodeObject
4855 // fp - (2 + stack_space + alignment) == sp == [fp - kSPOffset] - top of the
4856 // new stack (will contain saved ra)
Steve Block6ded16b2010-05-10 14:33:55 +01004857
4858 // Save registers.
Ben Murdoch257744e2011-11-30 15:57:28 +00004859 addiu(sp, sp, -4 * kPointerSize);
4860 sw(ra, MemOperand(sp, 3 * kPointerSize));
4861 sw(fp, MemOperand(sp, 2 * kPointerSize));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004862 addiu(fp, sp, 2 * kPointerSize); // Set up new frame pointer.
Steve Block6ded16b2010-05-10 14:33:55 +01004863
Ben Murdoch257744e2011-11-30 15:57:28 +00004864 if (emit_debug_code()) {
4865 sw(zero_reg, MemOperand(fp, ExitFrameConstants::kSPOffset));
4866 }
4867
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004868 // Accessed from ExitFrame::code_slot.
4869 li(t8, Operand(CodeObject()), CONSTANT_SIZE);
Ben Murdoch257744e2011-11-30 15:57:28 +00004870 sw(t8, MemOperand(fp, ExitFrameConstants::kCodeOffset));
Steve Block6ded16b2010-05-10 14:33:55 +01004871
4872 // Save the frame pointer and the context in top.
Ben Murdoch589d6972011-11-30 16:04:58 +00004873 li(t8, Operand(ExternalReference(Isolate::kCEntryFPAddress, isolate())));
Steve Block44f0eee2011-05-26 01:26:41 +01004874 sw(fp, MemOperand(t8));
Ben Murdoch589d6972011-11-30 16:04:58 +00004875 li(t8, Operand(ExternalReference(Isolate::kContextAddress, isolate())));
Steve Block44f0eee2011-05-26 01:26:41 +01004876 sw(cp, MemOperand(t8));
Steve Block6ded16b2010-05-10 14:33:55 +01004877
Ben Murdoch257744e2011-11-30 15:57:28 +00004878 const int frame_alignment = MacroAssembler::ActivationFrameAlignment();
Steve Block44f0eee2011-05-26 01:26:41 +01004879 if (save_doubles) {
Ben Murdoch257744e2011-11-30 15:57:28 +00004880 // The stack must be allign to 0 modulo 8 for stores with sdc1.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004881 DCHECK(kDoubleSize == frame_alignment);
Ben Murdoch257744e2011-11-30 15:57:28 +00004882 if (frame_alignment > 0) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004883 DCHECK(base::bits::IsPowerOfTwo32(frame_alignment));
Ben Murdoch257744e2011-11-30 15:57:28 +00004884 And(sp, sp, Operand(-frame_alignment)); // Align stack.
4885 }
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004886 int space = FPURegister::kMaxNumRegisters * kDoubleSize;
Steve Block44f0eee2011-05-26 01:26:41 +01004887 Subu(sp, sp, Operand(space));
4888 // Remember: we only need to save every 2nd double FPU value.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004889 for (int i = 0; i < FPURegister::kMaxNumRegisters; i+=2) {
Steve Block44f0eee2011-05-26 01:26:41 +01004890 FPURegister reg = FPURegister::from_code(i);
Ben Murdoch257744e2011-11-30 15:57:28 +00004891 sdc1(reg, MemOperand(sp, i * kDoubleSize));
Steve Block44f0eee2011-05-26 01:26:41 +01004892 }
Steve Block44f0eee2011-05-26 01:26:41 +01004893 }
Ben Murdoch257744e2011-11-30 15:57:28 +00004894
4895 // Reserve place for the return address, stack space and an optional slot
4896 // (used by the DirectCEntryStub to hold the return value if a struct is
4897 // returned) and align the frame preparing for calling the runtime function.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004898 DCHECK(stack_space >= 0);
Ben Murdoch257744e2011-11-30 15:57:28 +00004899 Subu(sp, sp, Operand((stack_space + 2) * kPointerSize));
4900 if (frame_alignment > 0) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004901 DCHECK(base::bits::IsPowerOfTwo32(frame_alignment));
Ben Murdoch257744e2011-11-30 15:57:28 +00004902 And(sp, sp, Operand(-frame_alignment)); // Align stack.
4903 }
4904
4905 // Set the exit frame sp value to point just before the return address
4906 // location.
4907 addiu(at, sp, kPointerSize);
4908 sw(at, MemOperand(fp, ExitFrameConstants::kSPOffset));
Steve Block6ded16b2010-05-10 14:33:55 +01004909}
4910
4911
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004912void MacroAssembler::LeaveExitFrame(bool save_doubles, Register argument_count,
4913 bool restore_context, bool do_return,
4914 bool argument_count_is_length) {
Steve Block44f0eee2011-05-26 01:26:41 +01004915 // Optionally restore all double registers.
4916 if (save_doubles) {
Steve Block44f0eee2011-05-26 01:26:41 +01004917 // Remember: we only need to restore every 2nd double FPU value.
Ben Murdoch257744e2011-11-30 15:57:28 +00004918 lw(t8, MemOperand(fp, ExitFrameConstants::kSPOffset));
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004919 for (int i = 0; i < FPURegister::kMaxNumRegisters; i+=2) {
Steve Block44f0eee2011-05-26 01:26:41 +01004920 FPURegister reg = FPURegister::from_code(i);
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004921 ldc1(reg, MemOperand(t8, i * kDoubleSize + kPointerSize));
Steve Block44f0eee2011-05-26 01:26:41 +01004922 }
4923 }
4924
Steve Block6ded16b2010-05-10 14:33:55 +01004925 // Clear top frame.
Ben Murdoch589d6972011-11-30 16:04:58 +00004926 li(t8, Operand(ExternalReference(Isolate::kCEntryFPAddress, isolate())));
Steve Block44f0eee2011-05-26 01:26:41 +01004927 sw(zero_reg, MemOperand(t8));
Steve Block6ded16b2010-05-10 14:33:55 +01004928
4929 // Restore current context from top and clear it in debug mode.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004930 if (restore_context) {
4931 li(t8, Operand(ExternalReference(Isolate::kContextAddress, isolate())));
4932 lw(cp, MemOperand(t8));
4933 }
Steve Block6ded16b2010-05-10 14:33:55 +01004934#ifdef DEBUG
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004935 li(t8, Operand(ExternalReference(Isolate::kContextAddress, isolate())));
Steve Block44f0eee2011-05-26 01:26:41 +01004936 sw(a3, MemOperand(t8));
Steve Block6ded16b2010-05-10 14:33:55 +01004937#endif
4938
4939 // Pop the arguments, restore registers, and return.
4940 mov(sp, fp); // Respect ABI stack constraint.
Ben Murdoch257744e2011-11-30 15:57:28 +00004941 lw(fp, MemOperand(sp, ExitFrameConstants::kCallerFPOffset));
4942 lw(ra, MemOperand(sp, ExitFrameConstants::kCallerPCOffset));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004943
Ben Murdoch257744e2011-11-30 15:57:28 +00004944 if (argument_count.is_valid()) {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00004945 if (argument_count_is_length) {
4946 addu(sp, sp, argument_count);
4947 } else {
4948 sll(t8, argument_count, kPointerSizeLog2);
4949 addu(sp, sp, t8);
4950 }
Ben Murdoch257744e2011-11-30 15:57:28 +00004951 }
Ben Murdoch3ef787d2012-04-12 10:51:47 +01004952
4953 if (do_return) {
4954 Ret(USE_DELAY_SLOT);
4955 // If returning, the instruction in the delay slot will be the addiu below.
4956 }
4957 addiu(sp, sp, 8);
Steve Block6ded16b2010-05-10 14:33:55 +01004958}
4959
4960
Steve Block44f0eee2011-05-26 01:26:41 +01004961void MacroAssembler::InitializeNewString(Register string,
4962 Register length,
4963 Heap::RootListIndex map_index,
4964 Register scratch1,
4965 Register scratch2) {
4966 sll(scratch1, length, kSmiTagSize);
4967 LoadRoot(scratch2, map_index);
4968 sw(scratch1, FieldMemOperand(string, String::kLengthOffset));
4969 li(scratch1, Operand(String::kEmptyHashField));
4970 sw(scratch2, FieldMemOperand(string, HeapObject::kMapOffset));
4971 sw(scratch1, FieldMemOperand(string, String::kHashFieldOffset));
4972}
4973
4974
4975int MacroAssembler::ActivationFrameAlignment() {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004976#if V8_HOST_ARCH_MIPS
Steve Block44f0eee2011-05-26 01:26:41 +01004977 // Running on the real platform. Use the alignment as mandated by the local
4978 // environment.
4979 // Note: This will break if we ever start generating snapshots on one Mips
4980 // platform for another Mips platform with a different alignment.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004981 return base::OS::ActivationFrameAlignment();
4982#else // V8_HOST_ARCH_MIPS
Steve Block44f0eee2011-05-26 01:26:41 +01004983 // If we are using the simulator then we should always align to the expected
4984 // alignment. As the simulator is used to generate snapshots we do not know
4985 // if the target platform will need alignment, so this is controlled from a
4986 // flag.
4987 return FLAG_sim_stack_alignment;
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004988#endif // V8_HOST_ARCH_MIPS
Steve Block44f0eee2011-05-26 01:26:41 +01004989}
4990
Ben Murdoch3fb3ca82011-12-02 17:19:32 +00004991
Ben Murdoch257744e2011-11-30 15:57:28 +00004992void MacroAssembler::AssertStackIsAligned() {
4993 if (emit_debug_code()) {
4994 const int frame_alignment = ActivationFrameAlignment();
4995 const int frame_alignment_mask = frame_alignment - 1;
Steve Block44f0eee2011-05-26 01:26:41 +01004996
Ben Murdoch257744e2011-11-30 15:57:28 +00004997 if (frame_alignment > kPointerSize) {
4998 Label alignment_as_expected;
Ben Murdochb8a8cc12014-11-26 15:28:44 +00004999 DCHECK(base::bits::IsPowerOfTwo32(frame_alignment));
Ben Murdoch257744e2011-11-30 15:57:28 +00005000 andi(at, sp, frame_alignment_mask);
5001 Branch(&alignment_as_expected, eq, at, Operand(zero_reg));
5002 // Don't use Check here, as it will call Runtime_Abort re-entering here.
5003 stop("Unexpected stack alignment");
5004 bind(&alignment_as_expected);
5005 }
Steve Block6ded16b2010-05-10 14:33:55 +01005006 }
Steve Block6ded16b2010-05-10 14:33:55 +01005007}
5008
Steve Block44f0eee2011-05-26 01:26:41 +01005009
Steve Block44f0eee2011-05-26 01:26:41 +01005010void MacroAssembler::JumpIfNotPowerOfTwoOrZero(
5011 Register reg,
5012 Register scratch,
5013 Label* not_power_of_two_or_zero) {
5014 Subu(scratch, reg, Operand(1));
5015 Branch(USE_DELAY_SLOT, not_power_of_two_or_zero, lt,
5016 scratch, Operand(zero_reg));
5017 and_(at, scratch, reg); // In the delay slot.
5018 Branch(not_power_of_two_or_zero, ne, at, Operand(zero_reg));
5019}
5020
5021
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005022void MacroAssembler::SmiTagCheckOverflow(Register reg, Register overflow) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005023 DCHECK(!reg.is(overflow));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005024 mov(overflow, reg); // Save original value.
5025 SmiTag(reg);
5026 xor_(overflow, overflow, reg); // Overflow if (value ^ 2 * value) < 0.
5027}
5028
5029
5030void MacroAssembler::SmiTagCheckOverflow(Register dst,
5031 Register src,
5032 Register overflow) {
5033 if (dst.is(src)) {
5034 // Fall back to slower case.
5035 SmiTagCheckOverflow(dst, overflow);
5036 } else {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005037 DCHECK(!dst.is(src));
5038 DCHECK(!dst.is(overflow));
5039 DCHECK(!src.is(overflow));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005040 SmiTag(dst, src);
5041 xor_(overflow, dst, src); // Overflow if (value ^ 2 * value) < 0.
5042 }
5043}
5044
5045
5046void MacroAssembler::UntagAndJumpIfSmi(Register dst,
5047 Register src,
5048 Label* smi_case) {
5049 JumpIfSmi(src, smi_case, at, USE_DELAY_SLOT);
5050 SmiUntag(dst, src);
5051}
5052
5053
5054void MacroAssembler::UntagAndJumpIfNotSmi(Register dst,
5055 Register src,
5056 Label* non_smi_case) {
5057 JumpIfNotSmi(src, non_smi_case, at, USE_DELAY_SLOT);
5058 SmiUntag(dst, src);
5059}
5060
5061void MacroAssembler::JumpIfSmi(Register value,
5062 Label* smi_label,
5063 Register scratch,
5064 BranchDelaySlot bd) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005065 DCHECK_EQ(0, kSmiTag);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005066 andi(scratch, value, kSmiTagMask);
5067 Branch(bd, smi_label, eq, scratch, Operand(zero_reg));
5068}
5069
5070void MacroAssembler::JumpIfNotSmi(Register value,
5071 Label* not_smi_label,
5072 Register scratch,
5073 BranchDelaySlot bd) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005074 DCHECK_EQ(0, kSmiTag);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005075 andi(scratch, value, kSmiTagMask);
5076 Branch(bd, not_smi_label, ne, scratch, Operand(zero_reg));
5077}
5078
5079
Steve Block44f0eee2011-05-26 01:26:41 +01005080void MacroAssembler::JumpIfNotBothSmi(Register reg1,
5081 Register reg2,
5082 Label* on_not_both_smi) {
5083 STATIC_ASSERT(kSmiTag == 0);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005084 DCHECK_EQ(1, kSmiTagMask);
Steve Block44f0eee2011-05-26 01:26:41 +01005085 or_(at, reg1, reg2);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005086 JumpIfNotSmi(at, on_not_both_smi);
Steve Block44f0eee2011-05-26 01:26:41 +01005087}
5088
5089
5090void MacroAssembler::JumpIfEitherSmi(Register reg1,
5091 Register reg2,
5092 Label* on_either_smi) {
5093 STATIC_ASSERT(kSmiTag == 0);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005094 DCHECK_EQ(1, kSmiTagMask);
Steve Block44f0eee2011-05-26 01:26:41 +01005095 // Both Smi tags must be 1 (not Smi).
5096 and_(at, reg1, reg2);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005097 JumpIfSmi(at, on_either_smi);
Steve Block44f0eee2011-05-26 01:26:41 +01005098}
5099
5100
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005101void MacroAssembler::AssertNotSmi(Register object) {
5102 if (emit_debug_code()) {
5103 STATIC_ASSERT(kSmiTag == 0);
5104 andi(at, object, kSmiTagMask);
5105 Check(ne, kOperandIsASmi, at, Operand(zero_reg));
5106 }
Steve Block44f0eee2011-05-26 01:26:41 +01005107}
5108
5109
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005110void MacroAssembler::AssertSmi(Register object) {
5111 if (emit_debug_code()) {
5112 STATIC_ASSERT(kSmiTag == 0);
5113 andi(at, object, kSmiTagMask);
5114 Check(eq, kOperandIsASmi, at, Operand(zero_reg));
5115 }
Steve Block44f0eee2011-05-26 01:26:41 +01005116}
5117
5118
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005119void MacroAssembler::AssertString(Register object) {
5120 if (emit_debug_code()) {
5121 STATIC_ASSERT(kSmiTag == 0);
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00005122 SmiTst(object, t8);
5123 Check(ne, kOperandIsASmiAndNotAString, t8, Operand(zero_reg));
5124 GetObjectType(object, t8, t8);
5125 Check(lo, kOperandIsNotAString, t8, Operand(FIRST_NONSTRING_TYPE));
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005126 }
Ben Murdoch257744e2011-11-30 15:57:28 +00005127}
5128
5129
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005130void MacroAssembler::AssertName(Register object) {
5131 if (emit_debug_code()) {
5132 STATIC_ASSERT(kSmiTag == 0);
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00005133 SmiTst(object, t8);
5134 Check(ne, kOperandIsASmiAndNotAName, t8, Operand(zero_reg));
5135 GetObjectType(object, t8, t8);
5136 Check(le, kOperandIsNotAName, t8, Operand(LAST_NAME_TYPE));
5137 }
5138}
5139
5140
5141void MacroAssembler::AssertFunction(Register object) {
5142 if (emit_debug_code()) {
5143 STATIC_ASSERT(kSmiTag == 0);
5144 SmiTst(object, t8);
5145 Check(ne, kOperandIsASmiAndNotAFunction, t8, Operand(zero_reg));
5146 GetObjectType(object, t8, t8);
5147 Check(eq, kOperandIsNotAFunction, t8, Operand(JS_FUNCTION_TYPE));
5148 }
5149}
5150
5151
5152void MacroAssembler::AssertBoundFunction(Register object) {
5153 if (emit_debug_code()) {
5154 STATIC_ASSERT(kSmiTag == 0);
5155 SmiTst(object, t8);
5156 Check(ne, kOperandIsASmiAndNotABoundFunction, t8, Operand(zero_reg));
5157 GetObjectType(object, t8, t8);
5158 Check(eq, kOperandIsNotABoundFunction, t8, Operand(JS_BOUND_FUNCTION_TYPE));
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005159 }
5160}
5161
5162
5163void MacroAssembler::AssertUndefinedOrAllocationSite(Register object,
5164 Register scratch) {
5165 if (emit_debug_code()) {
5166 Label done_checking;
5167 AssertNotSmi(object);
5168 LoadRoot(scratch, Heap::kUndefinedValueRootIndex);
5169 Branch(&done_checking, eq, object, Operand(scratch));
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00005170 lw(t8, FieldMemOperand(object, HeapObject::kMapOffset));
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005171 LoadRoot(scratch, Heap::kAllocationSiteMapRootIndex);
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00005172 Assert(eq, kExpectedUndefinedOrCell, t8, Operand(scratch));
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005173 bind(&done_checking);
5174 }
5175}
5176
5177
5178void MacroAssembler::AssertIsRoot(Register reg, Heap::RootListIndex index) {
5179 if (emit_debug_code()) {
5180 DCHECK(!reg.is(at));
5181 LoadRoot(at, index);
5182 Check(eq, kHeapNumberMapRegisterClobbered, reg, Operand(at));
5183 }
Steve Block44f0eee2011-05-26 01:26:41 +01005184}
5185
5186
5187void MacroAssembler::JumpIfNotHeapNumber(Register object,
5188 Register heap_number_map,
5189 Register scratch,
5190 Label* on_not_heap_number) {
5191 lw(scratch, FieldMemOperand(object, HeapObject::kMapOffset));
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005192 AssertIsRoot(heap_number_map, Heap::kHeapNumberMapRootIndex);
Steve Block44f0eee2011-05-26 01:26:41 +01005193 Branch(on_not_heap_number, ne, scratch, Operand(heap_number_map));
5194}
5195
5196
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005197void MacroAssembler::JumpIfNonSmisNotBothSequentialOneByteStrings(
5198 Register first, Register second, Register scratch1, Register scratch2,
Steve Block44f0eee2011-05-26 01:26:41 +01005199 Label* failure) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005200 // Test that both first and second are sequential one-byte strings.
Steve Block44f0eee2011-05-26 01:26:41 +01005201 // Assume that they are non-smis.
5202 lw(scratch1, FieldMemOperand(first, HeapObject::kMapOffset));
5203 lw(scratch2, FieldMemOperand(second, HeapObject::kMapOffset));
5204 lbu(scratch1, FieldMemOperand(scratch1, Map::kInstanceTypeOffset));
5205 lbu(scratch2, FieldMemOperand(scratch2, Map::kInstanceTypeOffset));
5206
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005207 JumpIfBothInstanceTypesAreNotSequentialOneByte(scratch1, scratch2, scratch1,
5208 scratch2, failure);
Steve Block44f0eee2011-05-26 01:26:41 +01005209}
5210
5211
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005212void MacroAssembler::JumpIfNotBothSequentialOneByteStrings(Register first,
5213 Register second,
5214 Register scratch1,
5215 Register scratch2,
5216 Label* failure) {
Steve Block44f0eee2011-05-26 01:26:41 +01005217 // Check that neither is a smi.
5218 STATIC_ASSERT(kSmiTag == 0);
5219 And(scratch1, first, Operand(second));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005220 JumpIfSmi(scratch1, failure);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005221 JumpIfNonSmisNotBothSequentialOneByteStrings(first, second, scratch1,
5222 scratch2, failure);
Steve Block44f0eee2011-05-26 01:26:41 +01005223}
5224
5225
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005226void MacroAssembler::JumpIfBothInstanceTypesAreNotSequentialOneByte(
5227 Register first, Register second, Register scratch1, Register scratch2,
Steve Block44f0eee2011-05-26 01:26:41 +01005228 Label* failure) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005229 const int kFlatOneByteStringMask =
Steve Block44f0eee2011-05-26 01:26:41 +01005230 kIsNotStringMask | kStringEncodingMask | kStringRepresentationMask;
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005231 const int kFlatOneByteStringTag =
5232 kStringTag | kOneByteStringTag | kSeqStringTag;
5233 DCHECK(kFlatOneByteStringTag <= 0xffff); // Ensure this fits 16-bit immed.
5234 andi(scratch1, first, kFlatOneByteStringMask);
5235 Branch(failure, ne, scratch1, Operand(kFlatOneByteStringTag));
5236 andi(scratch2, second, kFlatOneByteStringMask);
5237 Branch(failure, ne, scratch2, Operand(kFlatOneByteStringTag));
Steve Block44f0eee2011-05-26 01:26:41 +01005238}
5239
5240
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005241void MacroAssembler::JumpIfInstanceTypeIsNotSequentialOneByte(Register type,
5242 Register scratch,
5243 Label* failure) {
5244 const int kFlatOneByteStringMask =
Steve Block44f0eee2011-05-26 01:26:41 +01005245 kIsNotStringMask | kStringEncodingMask | kStringRepresentationMask;
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005246 const int kFlatOneByteStringTag =
5247 kStringTag | kOneByteStringTag | kSeqStringTag;
5248 And(scratch, type, Operand(kFlatOneByteStringMask));
5249 Branch(failure, ne, scratch, Operand(kFlatOneByteStringTag));
Steve Block44f0eee2011-05-26 01:26:41 +01005250}
5251
5252
5253static const int kRegisterPassedArguments = 4;
5254
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005255int MacroAssembler::CalculateStackPassedWords(int num_reg_arguments,
5256 int num_double_arguments) {
5257 int stack_passed_words = 0;
5258 num_reg_arguments += 2 * num_double_arguments;
5259
5260 // Up to four simple arguments are passed in registers a0..a3.
5261 if (num_reg_arguments > kRegisterPassedArguments) {
5262 stack_passed_words += num_reg_arguments - kRegisterPassedArguments;
5263 }
5264 stack_passed_words += kCArgSlotCount;
5265 return stack_passed_words;
5266}
5267
5268
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005269void MacroAssembler::EmitSeqStringSetCharCheck(Register string,
5270 Register index,
5271 Register value,
5272 Register scratch,
5273 uint32_t encoding_mask) {
5274 Label is_object;
5275 SmiTst(string, at);
5276 Check(ne, kNonObject, at, Operand(zero_reg));
5277
5278 lw(at, FieldMemOperand(string, HeapObject::kMapOffset));
5279 lbu(at, FieldMemOperand(at, Map::kInstanceTypeOffset));
5280
5281 andi(at, at, kStringRepresentationMask | kStringEncodingMask);
5282 li(scratch, Operand(encoding_mask));
5283 Check(eq, kUnexpectedStringType, at, Operand(scratch));
5284
5285 // The index is assumed to be untagged coming in, tag it to compare with the
5286 // string length without using a temp register, it is restored at the end of
5287 // this function.
5288 Label index_tag_ok, index_tag_bad;
5289 TrySmiTag(index, scratch, &index_tag_bad);
5290 Branch(&index_tag_ok);
5291 bind(&index_tag_bad);
5292 Abort(kIndexIsTooLarge);
5293 bind(&index_tag_ok);
5294
5295 lw(at, FieldMemOperand(string, String::kLengthOffset));
5296 Check(lt, kIndexIsTooLarge, index, Operand(at));
5297
5298 DCHECK(Smi::FromInt(0) == 0);
5299 Check(ge, kIndexIsNegative, index, Operand(zero_reg));
5300
5301 SmiUntag(index, index);
5302}
5303
5304
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005305void MacroAssembler::PrepareCallCFunction(int num_reg_arguments,
5306 int num_double_arguments,
5307 Register scratch) {
Steve Block44f0eee2011-05-26 01:26:41 +01005308 int frame_alignment = ActivationFrameAlignment();
5309
Steve Block44f0eee2011-05-26 01:26:41 +01005310 // Up to four simple arguments are passed in registers a0..a3.
5311 // Those four arguments must have reserved argument slots on the stack for
5312 // mips, even though those argument slots are not normally used.
5313 // Remaining arguments are pushed on the stack, above (higher address than)
5314 // the argument slots.
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005315 int stack_passed_arguments = CalculateStackPassedWords(
5316 num_reg_arguments, num_double_arguments);
Steve Block44f0eee2011-05-26 01:26:41 +01005317 if (frame_alignment > kPointerSize) {
5318 // Make stack end at alignment and make room for num_arguments - 4 words
5319 // and the original value of sp.
5320 mov(scratch, sp);
5321 Subu(sp, sp, Operand((stack_passed_arguments + 1) * kPointerSize));
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005322 DCHECK(base::bits::IsPowerOfTwo32(frame_alignment));
Steve Block44f0eee2011-05-26 01:26:41 +01005323 And(sp, sp, Operand(-frame_alignment));
5324 sw(scratch, MemOperand(sp, stack_passed_arguments * kPointerSize));
5325 } else {
5326 Subu(sp, sp, Operand(stack_passed_arguments * kPointerSize));
5327 }
5328}
5329
5330
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005331void MacroAssembler::PrepareCallCFunction(int num_reg_arguments,
5332 Register scratch) {
5333 PrepareCallCFunction(num_reg_arguments, 0, scratch);
5334}
5335
5336
Steve Block44f0eee2011-05-26 01:26:41 +01005337void MacroAssembler::CallCFunction(ExternalReference function,
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005338 int num_reg_arguments,
5339 int num_double_arguments) {
5340 li(t8, Operand(function));
5341 CallCFunctionHelper(t8, num_reg_arguments, num_double_arguments);
Steve Block44f0eee2011-05-26 01:26:41 +01005342}
5343
5344
5345void MacroAssembler::CallCFunction(Register function,
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005346 int num_reg_arguments,
5347 int num_double_arguments) {
5348 CallCFunctionHelper(function, num_reg_arguments, num_double_arguments);
5349}
5350
5351
5352void MacroAssembler::CallCFunction(ExternalReference function,
Steve Block44f0eee2011-05-26 01:26:41 +01005353 int num_arguments) {
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005354 CallCFunction(function, num_arguments, 0);
5355}
5356
5357
5358void MacroAssembler::CallCFunction(Register function,
5359 int num_arguments) {
5360 CallCFunction(function, num_arguments, 0);
Steve Block44f0eee2011-05-26 01:26:41 +01005361}
5362
5363
5364void MacroAssembler::CallCFunctionHelper(Register function,
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005365 int num_reg_arguments,
5366 int num_double_arguments) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005367 DCHECK(has_frame());
Steve Block44f0eee2011-05-26 01:26:41 +01005368 // Make sure that the stack is aligned before calling a C function unless
5369 // running in the simulator. The simulator has its own alignment check which
5370 // provides more information.
5371 // The argument stots are presumed to have been set up by
5372 // PrepareCallCFunction. The C function must be called via t9, for mips ABI.
5373
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005374#if V8_HOST_ARCH_MIPS
Steve Block44f0eee2011-05-26 01:26:41 +01005375 if (emit_debug_code()) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005376 int frame_alignment = base::OS::ActivationFrameAlignment();
Steve Block44f0eee2011-05-26 01:26:41 +01005377 int frame_alignment_mask = frame_alignment - 1;
5378 if (frame_alignment > kPointerSize) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005379 DCHECK(base::bits::IsPowerOfTwo32(frame_alignment));
Steve Block44f0eee2011-05-26 01:26:41 +01005380 Label alignment_as_expected;
5381 And(at, sp, Operand(frame_alignment_mask));
5382 Branch(&alignment_as_expected, eq, at, Operand(zero_reg));
5383 // Don't use Check here, as it will call Runtime_Abort possibly
5384 // re-entering here.
5385 stop("Unexpected alignment in CallCFunction");
5386 bind(&alignment_as_expected);
5387 }
5388 }
5389#endif // V8_HOST_ARCH_MIPS
5390
5391 // Just call directly. The function called cannot cause a GC, or
5392 // allow preemption, so the return address in the link register
5393 // stays correct.
Steve Block44f0eee2011-05-26 01:26:41 +01005394
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005395 if (!function.is(t9)) {
Ben Murdoch257744e2011-11-30 15:57:28 +00005396 mov(t9, function);
Steve Block44f0eee2011-05-26 01:26:41 +01005397 function = t9;
5398 }
5399
5400 Call(function);
5401
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005402 int stack_passed_arguments = CalculateStackPassedWords(
5403 num_reg_arguments, num_double_arguments);
Steve Block44f0eee2011-05-26 01:26:41 +01005404
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005405 if (base::OS::ActivationFrameAlignment() > kPointerSize) {
Steve Block44f0eee2011-05-26 01:26:41 +01005406 lw(sp, MemOperand(sp, stack_passed_arguments * kPointerSize));
5407 } else {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00005408 Addu(sp, sp, Operand(stack_passed_arguments * kPointerSize));
Steve Block44f0eee2011-05-26 01:26:41 +01005409 }
5410}
5411
5412
5413#undef BRANCH_ARGS_CHECK
5414
5415
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005416void MacroAssembler::CheckPageFlag(
5417 Register object,
5418 Register scratch,
5419 int mask,
5420 Condition cc,
5421 Label* condition_met) {
5422 And(scratch, object, Operand(~Page::kPageAlignmentMask));
5423 lw(scratch, MemOperand(scratch, MemoryChunk::kFlagsOffset));
5424 And(scratch, scratch, Operand(mask));
5425 Branch(condition_met, cc, scratch, Operand(zero_reg));
5426}
5427
5428
5429void MacroAssembler::JumpIfBlack(Register object,
5430 Register scratch0,
5431 Register scratch1,
5432 Label* on_black) {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00005433 HasColor(object, scratch0, scratch1, on_black, 1, 1); // kBlackBitPattern.
5434 DCHECK(strcmp(Marking::kBlackBitPattern, "11") == 0);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005435}
5436
5437
5438void MacroAssembler::HasColor(Register object,
5439 Register bitmap_scratch,
5440 Register mask_scratch,
5441 Label* has_color,
5442 int first_bit,
5443 int second_bit) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005444 DCHECK(!AreAliased(object, bitmap_scratch, mask_scratch, t8));
5445 DCHECK(!AreAliased(object, bitmap_scratch, mask_scratch, t9));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005446
5447 GetMarkBits(object, bitmap_scratch, mask_scratch);
5448
5449 Label other_color, word_boundary;
5450 lw(t9, MemOperand(bitmap_scratch, MemoryChunk::kHeaderSize));
5451 And(t8, t9, Operand(mask_scratch));
5452 Branch(&other_color, first_bit == 1 ? eq : ne, t8, Operand(zero_reg));
5453 // Shift left 1 by adding.
5454 Addu(mask_scratch, mask_scratch, Operand(mask_scratch));
5455 Branch(&word_boundary, eq, mask_scratch, Operand(zero_reg));
5456 And(t8, t9, Operand(mask_scratch));
5457 Branch(has_color, second_bit == 1 ? ne : eq, t8, Operand(zero_reg));
5458 jmp(&other_color);
5459
5460 bind(&word_boundary);
5461 lw(t9, MemOperand(bitmap_scratch, MemoryChunk::kHeaderSize + kPointerSize));
5462 And(t9, t9, Operand(1));
5463 Branch(has_color, second_bit == 1 ? ne : eq, t9, Operand(zero_reg));
5464 bind(&other_color);
5465}
5466
5467
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005468void MacroAssembler::GetMarkBits(Register addr_reg,
5469 Register bitmap_reg,
5470 Register mask_reg) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005471 DCHECK(!AreAliased(addr_reg, bitmap_reg, mask_reg, no_reg));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005472 And(bitmap_reg, addr_reg, Operand(~Page::kPageAlignmentMask));
5473 Ext(mask_reg, addr_reg, kPointerSizeLog2, Bitmap::kBitsPerCellLog2);
5474 const int kLowBits = kPointerSizeLog2 + Bitmap::kBitsPerCellLog2;
5475 Ext(t8, addr_reg, kLowBits, kPageSizeBits - kLowBits);
5476 sll(t8, t8, kPointerSizeLog2);
5477 Addu(bitmap_reg, bitmap_reg, t8);
5478 li(t8, Operand(1));
5479 sllv(mask_reg, t8, mask_reg);
5480}
5481
5482
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00005483void MacroAssembler::JumpIfWhite(Register value, Register bitmap_scratch,
5484 Register mask_scratch, Register load_scratch,
5485 Label* value_is_white) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005486 DCHECK(!AreAliased(value, bitmap_scratch, mask_scratch, t8));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005487 GetMarkBits(value, bitmap_scratch, mask_scratch);
5488
5489 // If the value is black or grey we don't need to do anything.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005490 DCHECK(strcmp(Marking::kWhiteBitPattern, "00") == 0);
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00005491 DCHECK(strcmp(Marking::kBlackBitPattern, "11") == 0);
5492 DCHECK(strcmp(Marking::kGreyBitPattern, "10") == 0);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005493 DCHECK(strcmp(Marking::kImpossibleBitPattern, "01") == 0);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005494
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005495 // Since both black and grey have a 1 in the first position and white does
5496 // not have a 1 there we only need to check one bit.
5497 lw(load_scratch, MemOperand(bitmap_scratch, MemoryChunk::kHeaderSize));
5498 And(t8, mask_scratch, load_scratch);
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00005499 Branch(value_is_white, eq, t8, Operand(zero_reg));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005500}
5501
5502
Ben Murdoch257744e2011-11-30 15:57:28 +00005503void MacroAssembler::LoadInstanceDescriptors(Register map,
5504 Register descriptors) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005505 lw(descriptors, FieldMemOperand(map, Map::kDescriptorsOffset));
5506}
5507
5508
5509void MacroAssembler::NumberOfOwnDescriptors(Register dst, Register map) {
5510 lw(dst, FieldMemOperand(map, Map::kBitField3Offset));
5511 DecodeField<Map::NumberOfOwnDescriptorsBits>(dst);
5512}
5513
5514
5515void MacroAssembler::EnumLength(Register dst, Register map) {
5516 STATIC_ASSERT(Map::EnumLengthBits::kShift == 0);
5517 lw(dst, FieldMemOperand(map, Map::kBitField3Offset));
5518 And(dst, dst, Operand(Map::EnumLengthBits::kMask));
5519 SmiTag(dst);
Ben Murdoch257744e2011-11-30 15:57:28 +00005520}
5521
5522
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00005523void MacroAssembler::LoadAccessor(Register dst, Register holder,
5524 int accessor_index,
5525 AccessorComponent accessor) {
5526 lw(dst, FieldMemOperand(holder, HeapObject::kMapOffset));
5527 LoadInstanceDescriptors(dst, dst);
5528 lw(dst,
5529 FieldMemOperand(dst, DescriptorArray::GetValueOffset(accessor_index)));
5530 int offset = accessor == ACCESSOR_GETTER ? AccessorPair::kGetterOffset
5531 : AccessorPair::kSetterOffset;
5532 lw(dst, FieldMemOperand(dst, offset));
5533}
5534
5535
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005536void MacroAssembler::CheckEnumCache(Register null_value, Label* call_runtime) {
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005537 Register empty_fixed_array_value = t2;
5538 LoadRoot(empty_fixed_array_value, Heap::kEmptyFixedArrayRootIndex);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005539 Label next, start;
5540 mov(a2, a0);
5541
5542 // Check if the enum length field is properly initialized, indicating that
5543 // there is an enum cache.
5544 lw(a1, FieldMemOperand(a2, HeapObject::kMapOffset));
5545
5546 EnumLength(a3, a1);
5547 Branch(
5548 call_runtime, eq, a3, Operand(Smi::FromInt(kInvalidEnumCacheSentinel)));
5549
5550 jmp(&start);
5551
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005552 bind(&next);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005553 lw(a1, FieldMemOperand(a2, HeapObject::kMapOffset));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005554
5555 // For all objects but the receiver, check that the cache is empty.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005556 EnumLength(a3, a1);
5557 Branch(call_runtime, ne, a3, Operand(Smi::FromInt(0)));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005558
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005559 bind(&start);
5560
5561 // Check that there are no elements. Register a2 contains the current JS
5562 // object we've reached through the prototype chain.
5563 Label no_elements;
5564 lw(a2, FieldMemOperand(a2, JSObject::kElementsOffset));
5565 Branch(&no_elements, eq, a2, Operand(empty_fixed_array_value));
5566
5567 // Second chance, the object may be using the empty slow element dictionary.
5568 LoadRoot(at, Heap::kEmptySlowElementDictionaryRootIndex);
5569 Branch(call_runtime, ne, a2, Operand(at));
5570
5571 bind(&no_elements);
5572 lw(a2, FieldMemOperand(a1, Map::kPrototypeOffset));
5573 Branch(&next, ne, a2, Operand(null_value));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005574}
5575
5576
5577void MacroAssembler::ClampUint8(Register output_reg, Register input_reg) {
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005578 DCHECK(!output_reg.is(input_reg));
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005579 Label done;
5580 li(output_reg, Operand(255));
5581 // Normal branch: nop in delay slot.
5582 Branch(&done, gt, input_reg, Operand(output_reg));
5583 // Use delay slot in this branch.
5584 Branch(USE_DELAY_SLOT, &done, lt, input_reg, Operand(zero_reg));
5585 mov(output_reg, zero_reg); // In delay slot.
5586 mov(output_reg, input_reg); // Value is in range 0..255.
5587 bind(&done);
5588}
5589
5590
5591void MacroAssembler::ClampDoubleToUint8(Register result_reg,
5592 DoubleRegister input_reg,
5593 DoubleRegister temp_double_reg) {
5594 Label above_zero;
5595 Label done;
5596 Label in_bounds;
5597
5598 Move(temp_double_reg, 0.0);
5599 BranchF(&above_zero, NULL, gt, input_reg, temp_double_reg);
5600
5601 // Double value is less than zero, NaN or Inf, return 0.
5602 mov(result_reg, zero_reg);
5603 Branch(&done);
5604
5605 // Double value is >= 255, return 255.
5606 bind(&above_zero);
5607 Move(temp_double_reg, 255.0);
5608 BranchF(&in_bounds, NULL, le, input_reg, temp_double_reg);
5609 li(result_reg, Operand(255));
5610 Branch(&done);
5611
5612 // In 0-255 range, round and truncate.
5613 bind(&in_bounds);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005614 cvt_w_d(temp_double_reg, input_reg);
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005615 mfc1(result_reg, temp_double_reg);
5616 bind(&done);
5617}
5618
5619
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005620void MacroAssembler::TestJSArrayForAllocationMemento(
5621 Register receiver_reg,
5622 Register scratch_reg,
5623 Label* no_memento_found,
5624 Condition cond,
5625 Label* allocation_memento_present) {
5626 ExternalReference new_space_start =
5627 ExternalReference::new_space_start(isolate());
5628 ExternalReference new_space_allocation_top =
5629 ExternalReference::new_space_allocation_top_address(isolate());
5630 Addu(scratch_reg, receiver_reg,
5631 Operand(JSArray::kSize + AllocationMemento::kSize - kHeapObjectTag));
5632 Branch(no_memento_found, lt, scratch_reg, Operand(new_space_start));
5633 li(at, Operand(new_space_allocation_top));
5634 lw(at, MemOperand(at));
5635 Branch(no_memento_found, gt, scratch_reg, Operand(at));
5636 lw(scratch_reg, MemOperand(scratch_reg, -AllocationMemento::kSize));
5637 if (allocation_memento_present) {
5638 Branch(allocation_memento_present, cond, scratch_reg,
5639 Operand(isolate()->factory()->allocation_memento_map()));
5640 }
Ben Murdoch3ef787d2012-04-12 10:51:47 +01005641}
5642
5643
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005644Register GetRegisterThatIsNotOneOf(Register reg1,
5645 Register reg2,
5646 Register reg3,
5647 Register reg4,
5648 Register reg5,
5649 Register reg6) {
5650 RegList regs = 0;
5651 if (reg1.is_valid()) regs |= reg1.bit();
5652 if (reg2.is_valid()) regs |= reg2.bit();
5653 if (reg3.is_valid()) regs |= reg3.bit();
5654 if (reg4.is_valid()) regs |= reg4.bit();
5655 if (reg5.is_valid()) regs |= reg5.bit();
5656 if (reg6.is_valid()) regs |= reg6.bit();
5657
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00005658 const RegisterConfiguration* config =
5659 RegisterConfiguration::ArchDefault(RegisterConfiguration::CRANKSHAFT);
5660 for (int i = 0; i < config->num_allocatable_general_registers(); ++i) {
5661 int code = config->GetAllocatableGeneralCode(i);
5662 Register candidate = Register::from_code(code);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005663 if (regs & candidate.bit()) continue;
5664 return candidate;
5665 }
5666 UNREACHABLE();
5667 return no_reg;
5668}
5669
5670
5671void MacroAssembler::JumpIfDictionaryInPrototypeChain(
5672 Register object,
5673 Register scratch0,
5674 Register scratch1,
5675 Label* found) {
5676 DCHECK(!scratch1.is(scratch0));
5677 Factory* factory = isolate()->factory();
5678 Register current = scratch0;
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00005679 Label loop_again, end;
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005680
5681 // Scratch contained elements pointer.
5682 Move(current, object);
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00005683 lw(current, FieldMemOperand(current, HeapObject::kMapOffset));
5684 lw(current, FieldMemOperand(current, Map::kPrototypeOffset));
5685 Branch(&end, eq, current, Operand(factory->null_value()));
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005686
5687 // Loop based on the map going up the prototype chain.
5688 bind(&loop_again);
5689 lw(current, FieldMemOperand(current, HeapObject::kMapOffset));
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00005690 lbu(scratch1, FieldMemOperand(current, Map::kInstanceTypeOffset));
5691 STATIC_ASSERT(JS_VALUE_TYPE < JS_OBJECT_TYPE);
5692 STATIC_ASSERT(JS_PROXY_TYPE < JS_OBJECT_TYPE);
5693 Branch(found, lo, scratch1, Operand(JS_OBJECT_TYPE));
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005694 lb(scratch1, FieldMemOperand(current, Map::kBitField2Offset));
5695 DecodeField<Map::ElementsKindBits>(scratch1);
5696 Branch(found, eq, scratch1, Operand(DICTIONARY_ELEMENTS));
5697 lw(current, FieldMemOperand(current, Map::kPrototypeOffset));
5698 Branch(&loop_again, ne, current, Operand(factory->null_value()));
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00005699
5700 bind(&end);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005701}
5702
5703
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00005704bool AreAliased(Register reg1, Register reg2, Register reg3, Register reg4,
5705 Register reg5, Register reg6, Register reg7, Register reg8,
5706 Register reg9, Register reg10) {
5707 int n_of_valid_regs = reg1.is_valid() + reg2.is_valid() + reg3.is_valid() +
5708 reg4.is_valid() + reg5.is_valid() + reg6.is_valid() +
5709 reg7.is_valid() + reg8.is_valid() + reg9.is_valid() +
5710 reg10.is_valid();
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005711
5712 RegList regs = 0;
5713 if (reg1.is_valid()) regs |= reg1.bit();
5714 if (reg2.is_valid()) regs |= reg2.bit();
5715 if (reg3.is_valid()) regs |= reg3.bit();
5716 if (reg4.is_valid()) regs |= reg4.bit();
5717 if (reg5.is_valid()) regs |= reg5.bit();
5718 if (reg6.is_valid()) regs |= reg6.bit();
5719 if (reg7.is_valid()) regs |= reg7.bit();
5720 if (reg8.is_valid()) regs |= reg8.bit();
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00005721 if (reg9.is_valid()) regs |= reg9.bit();
5722 if (reg10.is_valid()) regs |= reg10.bit();
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005723 int n_of_non_aliasing_regs = NumRegs(regs);
5724
5725 return n_of_valid_regs != n_of_non_aliasing_regs;
5726}
5727
5728
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00005729CodePatcher::CodePatcher(Isolate* isolate, byte* address, int instructions,
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005730 FlushICache flush_cache)
Steve Block44f0eee2011-05-26 01:26:41 +01005731 : address_(address),
Steve Block44f0eee2011-05-26 01:26:41 +01005732 size_(instructions * Assembler::kInstrSize),
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00005733 masm_(isolate, address, size_ + Assembler::kGap, CodeObjectRequired::kNo),
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005734 flush_cache_(flush_cache) {
Steve Block44f0eee2011-05-26 01:26:41 +01005735 // Create a new macro assembler pointing to the address of the code to patch.
5736 // The size is adjusted with kGap on order for the assembler to generate size
5737 // bytes of instructions without failing with buffer size constraints.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005738 DCHECK(masm_.reloc_info_writer.pos() == address_ + size_ + Assembler::kGap);
Steve Block44f0eee2011-05-26 01:26:41 +01005739}
5740
5741
5742CodePatcher::~CodePatcher() {
5743 // Indicate that code has changed.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005744 if (flush_cache_ == FLUSH) {
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00005745 Assembler::FlushICache(masm_.isolate(), address_, size_);
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005746 }
Steve Block44f0eee2011-05-26 01:26:41 +01005747
5748 // Check that the code was patched as expected.
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005749 DCHECK(masm_.pc_ == address_ + size_);
5750 DCHECK(masm_.reloc_info_writer.pos() == address_ + size_ + Assembler::kGap);
Steve Block44f0eee2011-05-26 01:26:41 +01005751}
5752
5753
Ben Murdoch257744e2011-11-30 15:57:28 +00005754void CodePatcher::Emit(Instr instr) {
5755 masm()->emit(instr);
Steve Block44f0eee2011-05-26 01:26:41 +01005756}
5757
5758
5759void CodePatcher::Emit(Address addr) {
5760 masm()->emit(reinterpret_cast<Instr>(addr));
5761}
5762
5763
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00005764void CodePatcher::ChangeBranchCondition(Instr current_instr,
5765 uint32_t new_opcode) {
5766 current_instr = (current_instr & ~kOpcodeMask) | new_opcode;
5767 masm_.emit(current_instr);
Ben Murdoch257744e2011-11-30 15:57:28 +00005768}
Steve Block44f0eee2011-05-26 01:26:41 +01005769
5770
Ben Murdochb8a8cc12014-11-26 15:28:44 +00005771void MacroAssembler::TruncatingDiv(Register result,
5772 Register dividend,
5773 int32_t divisor) {
5774 DCHECK(!dividend.is(result));
5775 DCHECK(!dividend.is(at));
5776 DCHECK(!result.is(at));
5777 base::MagicNumbersForDivision<uint32_t> mag =
5778 base::SignedDivisionByConstant(static_cast<uint32_t>(divisor));
5779 li(at, Operand(mag.multiplier));
5780 Mulh(result, dividend, Operand(at));
5781 bool neg = (mag.multiplier & (static_cast<uint32_t>(1) << 31)) != 0;
5782 if (divisor > 0 && neg) {
5783 Addu(result, result, Operand(dividend));
5784 }
5785 if (divisor < 0 && !neg && mag.multiplier > 0) {
5786 Subu(result, result, Operand(dividend));
5787 }
5788 if (mag.shift > 0) sra(result, result, mag.shift);
5789 srl(at, dividend, 31);
5790 Addu(result, result, Operand(at));
5791}
5792
5793
Ben Murdoch4a90d5f2016-03-22 12:00:34 +00005794} // namespace internal
5795} // namespace v8
Andrei Popescu31002712010-02-23 13:46:05 +00005796
Leon Clarkef7060e22010-06-03 12:02:55 +01005797#endif // V8_TARGET_ARCH_MIPS