PPC/s390: [builtins] Construct builtin frame in String/Number ctors

src/s390/builtins-s390.cc

 // Copyright 2014 the V8 project authors. All rights reserved.
 // Use of this source code is governed by a BSD-style license that can be
 // found in the LICENSE file.
 
 #if V8_TARGET_ARCH_S390
 
 #include "src/codegen.h"
 #include "src/debug/debug.h"
 #include "src/deoptimizer.h"
 #include "src/full-codegen/full-codegen.h"
@@ skipping 147 matching lines @@
     // parameter to a number first using the ToNumber builtin if necessary.
     Label convert, convert_smi, convert_number, done_convert;
     __ bind(&convert);
     __ JumpIfSmi(r4, &convert_smi);
     __ LoadP(r5, FieldMemOperand(r4, HeapObject::kMapOffset));
     __ JumpIfRoot(r5, Heap::kHeapNumberMapRootIndex, &convert_number);
     {
       // Parameter is not a Number, use the ToNumber builtin to convert it.
       DCHECK(!FLAG_enable_embedded_constant_pool);
       FrameScope scope(masm, StackFrame::MANUAL);
-      __ PushStandardFrame(r3);
       __ SmiTag(r2);
       __ SmiTag(r6);
-      __ Push(r2, r6, r7);
+      __ EnterBuiltinFrame(cp, r3, r2);
+      __ Push(r6, r7);
       __ LoadRR(r2, r4);
       __ Call(masm->isolate()->builtins()->ToNumber(), RelocInfo::CODE_TARGET);
       __ LoadRR(r4, r2);
-      __ Pop(r2, r6, r7);
+      __ Pop(r6, r7);
+      __ LeaveBuiltinFrame(cp, r3, r2);
+      __ SmiUntag(r6);
+      __ SmiUntag(r2);
       {
         // Restore the double accumulator value (d1).
         Label done_restore;
         __ SmiToDouble(d1, r7);
         __ JumpIfSmi(r7, &done_restore);
         __ LoadDouble(d1, FieldMemOperand(r7, HeapNumber::kValueOffset));
         __ bind(&done_restore);
       }
-      __ SmiUntag(r6);
-      __ SmiUntag(r2);
-      __ Pop(r14, fp, cp, r3);
     }
     __ b(&convert);
     __ bind(&convert_number);
     __ LoadDouble(d2, FieldMemOperand(r4, HeapNumber::kValueOffset));
     __ b(&done_convert);
     __ bind(&convert_smi);
     __ SmiToDouble(d2, r4);
     __ bind(&done_convert);
 
     // Perform the actual comparison with the accumulator value on the left hand
@@ skipping 28 matching lines @@
   __ Drop(r2);
   __ LoadRR(r2, r7);
   __ Ret();
 }
 
 // static
 void Builtins::Generate_NumberConstructor(MacroAssembler* masm) {
   // ----------- S t a t e -------------
   //  -- r2                     : number of arguments
   //  -- r3                     : constructor function
+  //  -- cp                     : context
   //  -- lr                     : return address
   //  -- sp[(argc - n - 1) * 4] : arg[n] (zero based)
   //  -- sp[argc * 4]           : receiver
   // -----------------------------------
 
-  // 1. Load the first argument into r2 and get rid of the rest (including the
-  // receiver).
+  // 1. Load the first argument into r2.
   Label no_arguments;
   {
+    __ LoadRR(r4, r2);  // Store argc in r4.
     __ CmpP(r2, Operand::Zero());
     __ beq(&no_arguments);
     __ SubP(r2, r2, Operand(1));
     __ ShiftLeftP(r2, r2, Operand(kPointerSizeLog2));
-    __ la(sp, MemOperand(sp, r2));
-    __ LoadP(r2, MemOperand(sp));
-    __ Drop(2);
+    __ LoadP(r2, MemOperand(sp, r2));
   }
 
   // 2a. Convert the first argument to a number.
-  __ Jump(masm->isolate()->builtins()->ToNumber(), RelocInfo::CODE_TARGET);
+  {
+    FrameScope scope(masm, StackFrame::MANUAL);
+    __ SmiTag(r4);
+    __ EnterBuiltinFrame(cp, r3, r4);
+    __ Call(masm->isolate()->builtins()->ToNumber(), RelocInfo::CODE_TARGET);
+    __ LeaveBuiltinFrame(cp, r3, r4);
+    __ SmiUntag(r4);
+  }
+
+  {
+    // Drop all arguments including the receiver.
+    __ Drop(r4);
+    __ Ret(1);
+  }
 
   // 2b. No arguments, return +0.
   __ bind(&no_arguments);
   __ LoadSmiLiteral(r2, Smi::FromInt(0));
   __ Ret(1);
 }
 
 // static
 void Builtins::Generate_NumberConstructor_ConstructStub(MacroAssembler* masm) {
   // ----------- S t a t e -------------
   //  -- r2                     : number of arguments
   //  -- r3                     : constructor function
   //  -- r5                     : new target
   //  -- lr                     : return address
   //  -- sp[(argc - n - 1) * 4] : arg[n] (zero based)
   //  -- sp[argc * 4]           : receiver
   // -----------------------------------
 
   // 1. Make sure we operate in the context of the called function.
   __ LoadP(cp, FieldMemOperand(r3, JSFunction::kContextOffset));
 
-  // 2. Load the first argument into r4 and get rid of the rest (including the
-  // receiver).
+  // 2. Load the first argument into r4.
   {
     Label no_arguments, done;
+    __ LoadRR(r8, r2);  // Store argc in r8.
     __ CmpP(r2, Operand::Zero());
     __ beq(&no_arguments);
     __ SubP(r2, r2, Operand(1));
     __ ShiftLeftP(r4, r2, Operand(kPointerSizeLog2));
-    __ la(sp, MemOperand(sp, r4));
-    __ LoadP(r4, MemOperand(sp));
-    __ Drop(2);
+    __ LoadP(r4, MemOperand(sp, r4));
     __ b(&done);
     __ bind(&no_arguments);
     __ LoadSmiLiteral(r4, Smi::FromInt(0));
-    __ Drop(1);
     __ bind(&done);
   }
 
   // 3. Make sure r4 is a number.
   {
     Label done_convert;
     __ JumpIfSmi(r4, &done_convert);
     __ CompareObjectType(r4, r6, r6, HEAP_NUMBER_TYPE);
     __ beq(&done_convert);
     {
-      FrameAndConstantPoolScope scope(masm, StackFrame::INTERNAL);
-      __ Push(r3, r5);
+      FrameScope scope(masm, StackFrame::MANUAL);
+      __ SmiTag(r8);
+      __ EnterBuiltinFrame(cp, r3, r8);
+      __ Push(r5);
       __ LoadRR(r2, r4);
       __ Call(masm->isolate()->builtins()->ToNumber(), RelocInfo::CODE_TARGET);
       __ LoadRR(r4, r2);
-      __ Pop(r3, r5);
+      __ Pop(r5);
+      __ LeaveBuiltinFrame(cp, r3, r8);
+      __ SmiUntag(r8);
     }
     __ bind(&done_convert);
   }
 
   // 4. Check if new target and constructor differ.
-  Label new_object;
+  Label drop_frame_and_ret, new_object;
   __ CmpP(r3, r5);
   __ bne(&new_object);
 
   // 5. Allocate a JSValue wrapper for the number.
   __ AllocateJSValue(r2, r3, r4, r6, r7, &new_object);
-  __ Ret();
+  __ b(&drop_frame_and_ret);
 
   // 6. Fallback to the runtime to create new object.
   __ bind(&new_object);
   {
-    FrameAndConstantPoolScope scope(masm, StackFrame::INTERNAL);
+    FrameScope scope(masm, StackFrame::MANUAL);
+    FastNewObjectStub stub(masm->isolate());
+    __ SmiTag(r8);
+    __ EnterBuiltinFrame(cp, r3, r8);
     __ Push(r4);  // first argument
-    FastNewObjectStub stub(masm->isolate());
     __ CallStub(&stub);
     __ Pop(r4);
+    __ LeaveBuiltinFrame(cp, r3, r8);
+    __ SmiUntag(r8);
   }
   __ StoreP(r4, FieldMemOperand(r2, JSValue::kValueOffset), r0);
-  __ Ret();
+
+  __ bind(&drop_frame_and_ret);
+  {
+    __ Drop(r8);
+    __ Ret(1);
+  }
 }
 
 // static
 void Builtins::Generate_StringConstructor(MacroAssembler* masm) {
   // ----------- S t a t e -------------
   //  -- r2                     : number of arguments
   //  -- r3                     : constructor function
+  //  -- cp                     : context
   //  -- lr                     : return address
   //  -- sp[(argc - n - 1) * 4] : arg[n] (zero based)
   //  -- sp[argc * 4]           : receiver
   // -----------------------------------
-  // 1. Load the first argument into r2 and get rid of the rest (including the
-  // receiver).
+  // 1. Load the first argument into r2.
   Label no_arguments;
   {
+    __ LoadRR(r4, r2);  // Store argc in r4
     __ CmpP(r2, Operand::Zero());
     __ beq(&no_arguments);
     __ SubP(r2, r2, Operand(1));
     __ ShiftLeftP(r2, r2, Operand(kPointerSizeLog2));
-    __ lay(sp, MemOperand(sp, r2));
-    __ LoadP(r2, MemOperand(sp));
-    __ Drop(2);
+    __ LoadP(r2, MemOperand(sp, r2));
   }
 
   // 2a. At least one argument, return r2 if it's a string, otherwise
   // dispatch to appropriate conversion.
-  Label to_string, symbol_descriptive_string;
+  Label drop_frame_and_ret, to_string, symbol_descriptive_string;
   {
     __ JumpIfSmi(r2, &to_string);
     STATIC_ASSERT(FIRST_NONSTRING_TYPE == SYMBOL_TYPE);
-    __ CompareObjectType(r2, r3, r3, FIRST_NONSTRING_TYPE);
+    __ CompareObjectType(r2, r5, r5, FIRST_NONSTRING_TYPE);
     __ bgt(&to_string);
     __ beq(&symbol_descriptive_string);
-    __ Ret();
+    __ b(&drop_frame_and_ret);
   }
 
   // 2b. No arguments, return the empty string (and pop the receiver).
   __ bind(&no_arguments);
   {
     __ LoadRoot(r2, Heap::kempty_stringRootIndex);
     __ Ret(1);
   }
 
   // 3a. Convert r2 to a string.
   __ bind(&to_string);
   {
+    FrameScope scope(masm, StackFrame::MANUAL);
     ToStringStub stub(masm->isolate());
-    __ TailCallStub(&stub);
+    __ SmiTag(r4);
+    __ EnterBuiltinFrame(cp, r3, r4);
+    __ CallStub(&stub);
+    __ LeaveBuiltinFrame(cp, r3, r4);
+    __ SmiUntag(r4);
   }
+  __ b(&drop_frame_and_ret);
   // 3b. Convert symbol in r2 to a string.
   __ bind(&symbol_descriptive_string);
   {
+    __ Drop(r4);
+    __ Drop(1);
     __ Push(r2);
     __ TailCallRuntime(Runtime::kSymbolDescriptiveString);
   }
+
+  __ bind(&drop_frame_and_ret);
+  {
+    __ Drop(r4);
+    __ Ret(1);
+  }
 }
 
 // static
 void Builtins::Generate_StringConstructor_ConstructStub(MacroAssembler* masm) {
   // ----------- S t a t e -------------
   //  -- r2                     : number of arguments
   //  -- r3                     : constructor function
   //  -- r5                     : new target
+  //  -- cp                     : context
   //  -- lr                     : return address
   //  -- sp[(argc - n - 1) * 4] : arg[n] (zero based)
   //  -- sp[argc * 4]           : receiver
   // -----------------------------------
 
   // 1. Make sure we operate in the context of the called function.
   __ LoadP(cp, FieldMemOperand(r3, JSFunction::kContextOffset));
 
-  // 2. Load the first argument into r4 and get rid of the rest (including the
-  // receiver).
+  // 2. Load the first argument into r4.
   {
     Label no_arguments, done;
+    __ LoadRR(r8, r2);  // Store argc in r8.
     __ CmpP(r2, Operand::Zero());
     __ beq(&no_arguments);
     __ SubP(r2, r2, Operand(1));
     __ ShiftLeftP(r4, r2, Operand(kPointerSizeLog2));
-    __ lay(sp, MemOperand(sp, r4));
-    __ LoadP(r4, MemOperand(sp));
-    __ Drop(2);
+    __ LoadP(r4, MemOperand(sp, r4));
     __ b(&done);
     __ bind(&no_arguments);
     __ LoadRoot(r4, Heap::kempty_stringRootIndex);
-    __ Drop(1);
     __ bind(&done);
   }
 
   // 3. Make sure r4 is a string.
   {
     Label convert, done_convert;
     __ JumpIfSmi(r4, &convert);
     __ CompareObjectType(r4, r6, r6, FIRST_NONSTRING_TYPE);
     __ blt(&done_convert);
     __ bind(&convert);
     {
-      FrameAndConstantPoolScope scope(masm, StackFrame::INTERNAL);
+      FrameScope scope(masm, StackFrame::MANUAL);
       ToStringStub stub(masm->isolate());
-      __ Push(r3, r5);
+      __ SmiTag(r8);
+      __ EnterBuiltinFrame(cp, r3, r8);
+      __ Push(r5);
       __ LoadRR(r2, r4);
       __ CallStub(&stub);
       __ LoadRR(r4, r2);
-      __ Pop(r3, r5);
+      __ Pop(r5);
+      __ LeaveBuiltinFrame(cp, r3, r8);
+      __ SmiUntag(r8);
     }
     __ bind(&done_convert);
   }
 
   // 4. Check if new target and constructor differ.
-  Label new_object;
+  Label drop_frame_and_ret, new_object;
   __ CmpP(r3, r5);
   __ bne(&new_object);
 
   // 5. Allocate a JSValue wrapper for the string.
   __ AllocateJSValue(r2, r3, r4, r6, r7, &new_object);
-  __ Ret();
+  __ b(&drop_frame_and_ret);
 
   // 6. Fallback to the runtime to create new object.
   __ bind(&new_object);
   {
-    FrameAndConstantPoolScope scope(masm, StackFrame::INTERNAL);
+    FrameScope scope(masm, StackFrame::MANUAL);
+    FastNewObjectStub stub(masm->isolate());
+    __ SmiTag(r8);
+    __ EnterBuiltinFrame(cp, r3, r8);
     __ Push(r4);  // first argument
-    FastNewObjectStub stub(masm->isolate());
     __ CallStub(&stub);
     __ Pop(r4);
+    __ LeaveBuiltinFrame(cp, r3, r8);
+    __ SmiUntag(r8);
   }
   __ StoreP(r4, FieldMemOperand(r2, JSValue::kValueOffset), r0);
-  __ Ret();
+
+  __ bind(&drop_frame_and_ret);
+  {
+    __ Drop(r8);
+    __ Ret(1);
+  }
 }
 
 static void GenerateTailCallToSharedCode(MacroAssembler* masm) {
   __ LoadP(ip, FieldMemOperand(r3, JSFunction::kSharedFunctionInfoOffset));
   __ LoadP(ip, FieldMemOperand(ip, SharedFunctionInfo::kCodeOffset));
   __ AddP(ip, Operand(Code::kHeaderSize - kHeapObjectTag));
   __ JumpToJSEntry(ip);
 }
 
 static void GenerateTailCallToReturnedCode(MacroAssembler* masm,
@@ skipping 1316 matching lines @@
     __ CallCFunction(
         ExternalReference::get_date_field_function(masm->isolate()), 2);
   }
   __ Ret();
 
   // 3. Raise a TypeError if the receiver is not a date.
   __ bind(&receiver_not_date);
   {
     FrameScope scope(masm, StackFrame::MANUAL);
     __ push(r2);
-    __ PushStandardFrame(r3);
-    __ LoadSmiLiteral(r6, Smi::FromInt(0));
-    __ push(r6);
+    __ LoadSmiLiteral(r2, Smi::FromInt(0));
+    __ EnterBuiltinFrame(cp, r3, r2);
     __ CallRuntime(Runtime::kThrowNotDateError);
   }
 }
 
 // static
 void Builtins::Generate_FunctionPrototypeApply(MacroAssembler* masm) {
   // ----------- S t a t e -------------
   //  -- r2    : argc
   //  -- sp[0] : argArray
   //  -- sp[4] : thisArg
@@ skipping 1154 matching lines @@
     __ bkpt(0);
   }
 }
 
 #undef __
 
 }  // namespace internal
 }  // namespace v8
 
 #endif  // V8_TARGET_ARCH_S390