OLD | NEW |
1 // Copyright 2012 the V8 project authors. All rights reserved. | 1 // Copyright 2012 the V8 project authors. All rights reserved. |
2 // Use of this source code is governed by a BSD-style license that can be | 2 // Use of this source code is governed by a BSD-style license that can be |
3 // found in the LICENSE file. | 3 // found in the LICENSE file. |
4 | 4 |
5 #if V8_TARGET_ARCH_ARM | 5 #if V8_TARGET_ARCH_ARM |
6 | 6 |
7 #include "src/code-stubs.h" | 7 #include "src/code-stubs.h" |
8 #include "src/api-arguments.h" | 8 #include "src/api-arguments.h" |
9 #include "src/base/bits.h" | 9 #include "src/base/bits.h" |
10 #include "src/bootstrapper.h" | 10 #include "src/bootstrapper.h" |
(...skipping 4346 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
4357 } | 4357 } |
4358 __ b(&done_allocate); | 4358 __ b(&done_allocate); |
4359 | 4359 |
4360 // Fall back to %NewStrictArguments. | 4360 // Fall back to %NewStrictArguments. |
4361 __ bind(&too_big_for_new_space); | 4361 __ bind(&too_big_for_new_space); |
4362 __ push(r1); | 4362 __ push(r1); |
4363 __ TailCallRuntime(Runtime::kNewStrictArguments); | 4363 __ TailCallRuntime(Runtime::kNewStrictArguments); |
4364 } | 4364 } |
4365 | 4365 |
4366 | 4366 |
4367 void StoreGlobalViaContextStub::Generate(MacroAssembler* masm) { | |
4368 Register value = r0; | |
4369 Register slot = r2; | |
4370 | |
4371 Register cell = r1; | |
4372 Register cell_details = r4; | |
4373 Register cell_value = r5; | |
4374 Register cell_value_map = r6; | |
4375 Register scratch = r9; | |
4376 | |
4377 Register context = cp; | |
4378 Register context_temp = cell; | |
4379 | |
4380 Label fast_heapobject_case, fast_smi_case, slow_case; | |
4381 | |
4382 if (FLAG_debug_code) { | |
4383 __ CompareRoot(value, Heap::kTheHoleValueRootIndex); | |
4384 __ Check(ne, kUnexpectedValue); | |
4385 } | |
4386 | |
4387 // Go up the context chain to the script context. | |
4388 for (int i = 0; i < depth(); i++) { | |
4389 __ ldr(context_temp, ContextMemOperand(context, Context::PREVIOUS_INDEX)); | |
4390 context = context_temp; | |
4391 } | |
4392 | |
4393 // Load the PropertyCell at the specified slot. | |
4394 __ add(cell, context, Operand(slot, LSL, kPointerSizeLog2)); | |
4395 __ ldr(cell, ContextMemOperand(cell)); | |
4396 | |
4397 // Load PropertyDetails for the cell (actually only the cell_type and kind). | |
4398 __ ldr(cell_details, FieldMemOperand(cell, PropertyCell::kDetailsOffset)); | |
4399 __ SmiUntag(cell_details); | |
4400 __ and_(cell_details, cell_details, | |
4401 Operand(PropertyDetails::PropertyCellTypeField::kMask | | |
4402 PropertyDetails::KindField::kMask | | |
4403 PropertyDetails::kAttributesReadOnlyMask)); | |
4404 | |
4405 // Check if PropertyCell holds mutable data. | |
4406 Label not_mutable_data; | |
4407 __ cmp(cell_details, Operand(PropertyDetails::PropertyCellTypeField::encode( | |
4408 PropertyCellType::kMutable) | | |
4409 PropertyDetails::KindField::encode(kData))); | |
4410 __ b(ne, ¬_mutable_data); | |
4411 __ JumpIfSmi(value, &fast_smi_case); | |
4412 | |
4413 __ bind(&fast_heapobject_case); | |
4414 __ str(value, FieldMemOperand(cell, PropertyCell::kValueOffset)); | |
4415 // RecordWriteField clobbers the value register, so we copy it before the | |
4416 // call. | |
4417 __ mov(r4, Operand(value)); | |
4418 __ RecordWriteField(cell, PropertyCell::kValueOffset, r4, scratch, | |
4419 kLRHasNotBeenSaved, kDontSaveFPRegs, EMIT_REMEMBERED_SET, | |
4420 OMIT_SMI_CHECK); | |
4421 __ Ret(); | |
4422 | |
4423 __ bind(¬_mutable_data); | |
4424 // Check if PropertyCell value matches the new value (relevant for Constant, | |
4425 // ConstantType and Undefined cells). | |
4426 Label not_same_value; | |
4427 __ ldr(cell_value, FieldMemOperand(cell, PropertyCell::kValueOffset)); | |
4428 __ cmp(cell_value, value); | |
4429 __ b(ne, ¬_same_value); | |
4430 | |
4431 // Make sure the PropertyCell is not marked READ_ONLY. | |
4432 __ tst(cell_details, Operand(PropertyDetails::kAttributesReadOnlyMask)); | |
4433 __ b(ne, &slow_case); | |
4434 | |
4435 if (FLAG_debug_code) { | |
4436 Label done; | |
4437 // This can only be true for Constant, ConstantType and Undefined cells, | |
4438 // because we never store the_hole via this stub. | |
4439 __ cmp(cell_details, Operand(PropertyDetails::PropertyCellTypeField::encode( | |
4440 PropertyCellType::kConstant) | | |
4441 PropertyDetails::KindField::encode(kData))); | |
4442 __ b(eq, &done); | |
4443 __ cmp(cell_details, Operand(PropertyDetails::PropertyCellTypeField::encode( | |
4444 PropertyCellType::kConstantType) | | |
4445 PropertyDetails::KindField::encode(kData))); | |
4446 __ b(eq, &done); | |
4447 __ cmp(cell_details, Operand(PropertyDetails::PropertyCellTypeField::encode( | |
4448 PropertyCellType::kUndefined) | | |
4449 PropertyDetails::KindField::encode(kData))); | |
4450 __ Check(eq, kUnexpectedValue); | |
4451 __ bind(&done); | |
4452 } | |
4453 __ Ret(); | |
4454 __ bind(¬_same_value); | |
4455 | |
4456 // Check if PropertyCell contains data with constant type (and is not | |
4457 // READ_ONLY). | |
4458 __ cmp(cell_details, Operand(PropertyDetails::PropertyCellTypeField::encode( | |
4459 PropertyCellType::kConstantType) | | |
4460 PropertyDetails::KindField::encode(kData))); | |
4461 __ b(ne, &slow_case); | |
4462 | |
4463 // Now either both old and new values must be smis or both must be heap | |
4464 // objects with same map. | |
4465 Label value_is_heap_object; | |
4466 __ JumpIfNotSmi(value, &value_is_heap_object); | |
4467 __ JumpIfNotSmi(cell_value, &slow_case); | |
4468 // Old and new values are smis, no need for a write barrier here. | |
4469 __ bind(&fast_smi_case); | |
4470 __ str(value, FieldMemOperand(cell, PropertyCell::kValueOffset)); | |
4471 __ Ret(); | |
4472 | |
4473 __ bind(&value_is_heap_object); | |
4474 __ JumpIfSmi(cell_value, &slow_case); | |
4475 | |
4476 __ ldr(cell_value_map, FieldMemOperand(cell_value, HeapObject::kMapOffset)); | |
4477 __ ldr(scratch, FieldMemOperand(value, HeapObject::kMapOffset)); | |
4478 __ cmp(cell_value_map, scratch); | |
4479 __ b(eq, &fast_heapobject_case); | |
4480 | |
4481 // Fallback to runtime. | |
4482 __ bind(&slow_case); | |
4483 __ SmiTag(slot); | |
4484 __ Push(slot, value); | |
4485 __ TailCallRuntime(is_strict(language_mode()) | |
4486 ? Runtime::kStoreGlobalViaContext_Strict | |
4487 : Runtime::kStoreGlobalViaContext_Sloppy); | |
4488 } | |
4489 | |
4490 | |
4491 static int AddressOffset(ExternalReference ref0, ExternalReference ref1) { | 4367 static int AddressOffset(ExternalReference ref0, ExternalReference ref1) { |
4492 return ref0.address() - ref1.address(); | 4368 return ref0.address() - ref1.address(); |
4493 } | 4369 } |
4494 | 4370 |
4495 | 4371 |
4496 // Calls an API function. Allocates HandleScope, extracts returned value | 4372 // Calls an API function. Allocates HandleScope, extracts returned value |
4497 // from handle and propagates exceptions. Restores context. stack_space | 4373 // from handle and propagates exceptions. Restores context. stack_space |
4498 // - space to be unwound on exit (includes the call JS arguments space and | 4374 // - space to be unwound on exit (includes the call JS arguments space and |
4499 // the additional space allocated for the fast call). | 4375 // the additional space allocated for the fast call). |
4500 static void CallApiFunctionAndReturn(MacroAssembler* masm, | 4376 static void CallApiFunctionAndReturn(MacroAssembler* masm, |
(...skipping 295 matching lines...) Expand 10 before | Expand all | Expand 10 after Loading... |
4796 CallApiFunctionAndReturn(masm, api_function_address, thunk_ref, | 4672 CallApiFunctionAndReturn(masm, api_function_address, thunk_ref, |
4797 kStackUnwindSpace, NULL, return_value_operand, NULL); | 4673 kStackUnwindSpace, NULL, return_value_operand, NULL); |
4798 } | 4674 } |
4799 | 4675 |
4800 #undef __ | 4676 #undef __ |
4801 | 4677 |
4802 } // namespace internal | 4678 } // namespace internal |
4803 } // namespace v8 | 4679 } // namespace v8 |
4804 | 4680 |
4805 #endif // V8_TARGET_ARCH_ARM | 4681 #endif // V8_TARGET_ARCH_ARM |
OLD | NEW |