Provide a tagged allocation top pointer.

test/cctest/test-macro-assembler-ia32.cc

 // Copyright 2013 the V8 project authors. All rights reserved.
 // Redistribution and use in source and binary forms, with or without
 // modification, are permitted provided that the following conditions are
 // met:
 //
 //     * Redistributions of source code must retain the above copyright
 //       notice, this list of conditions and the following disclaimer.
 //     * Redistributions in binary form must reproduce the above
 //       copyright notice, this list of conditions and the following
 //       disclaimer in the documentation and/or other materials provided
@@ skipping 15 matching lines @@
 // OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
 
 #include <stdlib.h>
 
 #include "src/v8.h"
 #include "test/cctest/cctest.h"
 
 #include "src/base/platform/platform.h"
 #include "src/factory.h"
 #include "src/macro-assembler.h"
+#include "test/cctest/heap/heap-utils.h"
 
 using namespace v8::internal;
 
 #if __GNUC__
 #define STDCALL  __attribute__((stdcall))
 #else
 #define STDCALL  __stdcall
 #endif
 
 typedef int STDCALL F0Type();
+typedef intptr_t STDCALL F1Type();
 typedef F0Type* F0;
+typedef F1Type* F1;
 
 #define __ masm->
 
-
 TEST(LoadAndStoreWithRepresentation) {
   // Allocate an executable page of memory.
   size_t actual_size;
   byte* buffer = static_cast<byte*>(v8::base::OS::Allocate(
       Assembler::kMinimalBufferSize, &actual_size, true));
   CHECK(buffer);
   Isolate* isolate = CcTest::i_isolate();
   HandleScope handles(isolate);
   MacroAssembler assembler(isolate, buffer, static_cast<int>(actual_size),
                            v8::internal::CodeObjectRequired::kYes);
@@ skipping 90 matching lines @@
   __ pop(ebx);
   __ ret(0);
 
   CodeDesc desc;
   masm->GetCode(&desc);
   // Call the function from C++.
   int result = FUNCTION_CAST<F0>(buffer)();
   CHECK_EQ(0, result);
 }
 
+// Helper for the tests below.
+template <typename Fun>
+void AssembleFunction(Isolate* isolate, size_t actual_size, byte* buffer,
+                      Fun f) {
+  MacroAssembler assembler(isolate, buffer, static_cast<int>(actual_size),
+                           v8::internal::CodeObjectRequired::kYes);
+  MacroAssembler* masm = &assembler;
+  Label exit;
+  __ push(ebx);
+  __ push(edx);
+  __ sub(esp, Immediate(1 * kPointerSize));
+  f(masm);
+  __ add(esp, Immediate(1 * kPointerSize));
+  __ pop(edx);
+  __ pop(ebx);
+  __ ret(0);
+
+  CodeDesc desc;
+  masm->GetCode(&desc);
+}
+
+TEST(AllocateMacrosNoGCRequired) {
+  // Allocate an executable page of memory.
+  size_t actual_size;
+  byte* buffer = static_cast<byte*>(v8::base::OS::Allocate(
+      Assembler::kMinimalBufferSize, &actual_size, true));
+  CHECK(buffer);
+  Isolate* isolate = CcTest::i_isolate();
+  HandleScope handles(isolate);
+
+  AllocationFlags const kDoubleAligned =
+      static_cast<AllocationFlags>(DOUBLE_ALIGNMENT);
+  AllocationFlags const kNoAllocationFlags =
+      static_cast<AllocationFlags>(NO_ALLOCATION_FLAGS);
+
+#define CHECK_TAGGED(result) CHECK_EQ(result& kHeapObjectTag, 1);
+
+#define CHECK_DOUBLE_ALIGNED(result)                                   \
+  do {                                                                 \
+    CHECK_TAGGED((result));                                            \
+    CHECK_EQ((result)&kDoubleAlignmentMaskTagged, 0);                  \
+    /* Check that the filler was written in the correct place */       \
+    CHECK_EQ(*reinterpret_cast<v8::internal::Map***>(                  \
+                 (result) - (kHeapObjectTag + kPointerSize)),          \
+             isolate->factory()->one_pointer_filler_map().location()); \
+  } while (false)
+
+  heap::GcAndSweep(isolate->heap(), AllocationSpace::NEW_SPACE);
+  {
+    AssembleFunction(isolate, actual_size, buffer, [](MacroAssembler* masm) {
+      Label gc_required, success;
+      __ Allocate(kPointerSize, eax, ecx, edx, &gc_required,
+                  kNoAllocationFlags);
+      __ jmp(&success);
+      __ bind(&gc_required);
+      __ Abort(kNoReason);
+      __ bind(&success);
+    });
+    intptr_t test_result = FUNCTION_CAST<F1>(buffer)();
+    CHECK_TAGGED(test_result);
+  }
+
+  {
+    AssembleFunction(isolate, actual_size, buffer, [](MacroAssembler* masm) {
+      Label gc_required, success;
+      __ Allocate(kDoubleSize, eax, ecx, edx, &gc_required, kDoubleAligned);
+      __ jmp(&success);
+      __ bind(&gc_required);
+      __ Abort(kNoReason);
+      __ bind(&success);
+    });
+    heap::MakeSureNewSpaceTopIsNotDoubleAligned(isolate->heap());
+    intptr_t test_result = FUNCTION_CAST<F1>(buffer)();
+    CHECK_DOUBLE_ALIGNED(test_result);
+  }
+  {
+    AssembleFunction(isolate, actual_size, buffer, [](MacroAssembler* masm) {
+      Label gc_required, success;
+      __ mov(ebx, Immediate(kPointerSize));
+      __ Allocate(kPointerSize, eax, ecx, edx, &gc_required,
+                  kNoAllocationFlags);
+      __ jmp(&success);
+      __ bind(&gc_required);
+      __ Abort(kNoReason);
+      __ bind(&success);
+    });
+    intptr_t test_result = FUNCTION_CAST<F1>(buffer)();
+    CHECK_TAGGED(test_result);
+  }
+
+  {
+    AssembleFunction(isolate, actual_size, buffer, [](MacroAssembler* masm) {
+      Label gc_required, success;
+      __ mov(ebx, Immediate(kDoubleSize));
+      __ Allocate(ebx, eax, ecx, edx, &gc_required, kDoubleAligned);
+      __ jmp(&success);
+      __ bind(&gc_required);
+      __ Abort(kNoReason);
+      __ bind(&success);
+    });
+    heap::MakeSureNewSpaceTopIsNotDoubleAligned(isolate->heap());
+    intptr_t test_result = FUNCTION_CAST<F1>(buffer)();
+    CHECK_DOUBLE_ALIGNED(test_result);
+  }
+
+  {
+    AssembleFunction(isolate, actual_size, buffer, [](MacroAssembler* masm) {
+      Label gc_required, success;
+      __ mov(ebx, Immediate(2));
+      __ Allocate(0, times_4, ebx, REGISTER_VALUE_IS_SMI, eax, ecx, edx,
+                  &gc_required, kNoAllocationFlags);
+      __ jmp(&success);
+      __ bind(&gc_required);
+      __ Abort(kNoReason);
+      __ bind(&success);
+    });
+    intptr_t test_result = FUNCTION_CAST<F1>(buffer)();
+    CHECK_TAGGED(test_result);
+  }
+
+  {
+    AssembleFunction(isolate, actual_size, buffer, [](MacroAssembler* masm) {
+      Label gc_required, success;
+      __ mov(ebx, Immediate(kDoubleSize));
+      __ Allocate(FixedDoubleArray::kHeaderSize, times_8, ebx,
+                  REGISTER_VALUE_IS_SMI, eax, ecx, edx, &gc_required,
+                  kDoubleAligned);
+      __ jmp(&success);
+      __ bind(&gc_required);
+      __ Abort(kNoReason);
+      __ bind(&success);
+    });
+    heap::MakeSureNewSpaceTopIsNotDoubleAligned(isolate->heap());
+    intptr_t test_result = FUNCTION_CAST<F1>(buffer)();
+    CHECK_DOUBLE_ALIGNED(test_result);
+  }
+#undef CHECK_TAGGED
+#undef CHECK_DOUBLE_ALIGNED
+}
+
+TEST(AllocateMacrosGCRequired) {
+  // Allocate an executable page of memory.
+  size_t actual_size;
+  byte* buffer = static_cast<byte*>(v8::base::OS::Allocate(
+      Assembler::kMinimalBufferSize, &actual_size, true));
+  CHECK(buffer);
+  Isolate* isolate = CcTest::i_isolate();
+  HandleScope handles(isolate);
+
+  AllocationFlags const kDoubleAligned =
+      static_cast<AllocationFlags>(DOUBLE_ALIGNMENT);
+
+  // Test that the macro jumps to the gc_required label if there's not enough
+  // space to allocate with double alignment.
+  {
+    AssembleFunction(isolate, actual_size, buffer, [](MacroAssembler* masm) {
+      Label gc_required, end;
+      __ Allocate(kPointerSize, eax, ecx, edx, &gc_required, kDoubleAligned);
+      __ xor_(eax, eax);
+      __ jmp(&end);
+      __ bind(&gc_required);
+      __ mov(eax, Immediate(1));
+      __ bind(&end);
+    });
+    heap::AllocateAllButNBytes(isolate->heap()->new_space(), 4);
+    intptr_t test_result = FUNCTION_CAST<F1>(buffer)();
+    CHECK_EQ(test_result, 1);
+  }
+
+  {
+    AssembleFunction(isolate, actual_size, buffer, [](MacroAssembler* masm) {
+      Label gc_required, end;
+      __ mov(ebx, Immediate(kPointerSize));
+      __ Allocate(ebx, eax, ecx, edx, &gc_required, kDoubleAligned);
+      __ xor_(eax, eax);
+      __ jmp(&end);
+      __ bind(&gc_required);
+      __ mov(eax, Immediate(1));
+      __ bind(&end);
+    });
+    heap::AllocateAllButNBytes(isolate->heap()->new_space(), 4);
+    intptr_t test_result = FUNCTION_CAST<F1>(buffer)();
+    CHECK_EQ(test_result, 1);
+  }
+
+  {
+    AssembleFunction(isolate, actual_size, buffer, [](MacroAssembler* masm) {
+      Label gc_required, end;
+      __ mov(ebx, Immediate(kPointerSize));
+      __ Allocate(0, times_8, ebx, REGISTER_VALUE_IS_SMI, eax, ecx, edx,
+                  &gc_required, kDoubleAligned);
+      __ xor_(eax, eax);
+      __ jmp(&end);
+      __ bind(&gc_required);
+      __ mov(eax, Immediate(1));
+      __ bind(&end);
+    });
+    heap::AllocateAllButNBytes(isolate->heap()->new_space(), 4);
+    intptr_t test_result = FUNCTION_CAST<F1>(buffer)();
+    CHECK_EQ(test_result, 1);
+  }
+}
+
 #undef __