mirror of
				https://github.com/c64scene-ar/llvm-6502.git
				synced 2025-11-04 05:17:07 +00:00 
			
		
		
		
	- Reid, please check, I'm not sure if this is what was intended. git-svn-id: https://llvm.org/svn/llvm-project/llvm/trunk@76286 91177308-0d34-0410-b5e6-96231b3b80d8
		
			
				
	
	
		
			133 lines
		
	
	
		
			4.4 KiB
		
	
	
	
		
			C++
		
	
	
	
	
	
			
		
		
	
	
			133 lines
		
	
	
		
			4.4 KiB
		
	
	
	
		
			C++
		
	
	
	
	
	
//===- JITTest.cpp - Unit tests for the JIT -------------------------------===//
 | 
						|
//
 | 
						|
//                     The LLVM Compiler Infrastructure
 | 
						|
//
 | 
						|
// This file is distributed under the University of Illinois Open Source
 | 
						|
// License. See LICENSE.TXT for details.
 | 
						|
//
 | 
						|
//===----------------------------------------------------------------------===//
 | 
						|
 | 
						|
#include "gtest/gtest.h"
 | 
						|
#include "llvm/ADT/OwningPtr.h"
 | 
						|
#include "llvm/BasicBlock.h"
 | 
						|
#include "llvm/Constant.h"
 | 
						|
#include "llvm/Constants.h"
 | 
						|
#include "llvm/DerivedTypes.h"
 | 
						|
#include "llvm/ExecutionEngine/JIT.h"
 | 
						|
#include "llvm/ExecutionEngine/JITMemoryManager.h"
 | 
						|
#include "llvm/Function.h"
 | 
						|
#include "llvm/GlobalValue.h"
 | 
						|
#include "llvm/GlobalVariable.h"
 | 
						|
#include "llvm/LLVMContext.h"
 | 
						|
#include "llvm/Module.h"
 | 
						|
#include "llvm/ModuleProvider.h"
 | 
						|
#include "llvm/Support/IRBuilder.h"
 | 
						|
#include "llvm/Target/TargetSelect.h"
 | 
						|
#include "llvm/Type.h"
 | 
						|
 | 
						|
using namespace llvm;
 | 
						|
 | 
						|
namespace {
 | 
						|
 | 
						|
Function *makeReturnGlobal(std::string Name, GlobalVariable *G, Module *M) {
 | 
						|
  std::vector<const Type*> params;
 | 
						|
  const FunctionType *FTy =
 | 
						|
    getGlobalContext().getFunctionType(G->getType()->getElementType(),
 | 
						|
                                              params, false);
 | 
						|
  Function *F = Function::Create(FTy, GlobalValue::ExternalLinkage, Name, M);
 | 
						|
  BasicBlock *Entry = BasicBlock::Create("entry", F);
 | 
						|
  IRBuilder<> builder(Entry);
 | 
						|
  Value *Load = builder.CreateLoad(G);
 | 
						|
  const Type *GTy = G->getType()->getElementType();
 | 
						|
  Value *Add = builder.CreateAdd(Load,
 | 
						|
    getGlobalContext().getConstantInt(GTy, 1LL));
 | 
						|
  builder.CreateStore(Add, G);
 | 
						|
  builder.CreateRet(Add);
 | 
						|
  return F;
 | 
						|
}
 | 
						|
 | 
						|
// Regression test for a bug.  The JIT used to allocate globals inside the same
 | 
						|
// memory block used for the function, and when the function code was freed,
 | 
						|
// the global was left in the same place.  This test allocates a function
 | 
						|
// that uses and global, deallocates it, and then makes sure that the global
 | 
						|
// stays alive after that.
 | 
						|
TEST(JIT, GlobalInFunction) {
 | 
						|
  LLVMContext context;
 | 
						|
  Module *M = new Module("<main>", context);
 | 
						|
  ExistingModuleProvider *MP = new ExistingModuleProvider(M);
 | 
						|
 | 
						|
  JITMemoryManager *MemMgr = JITMemoryManager::CreateDefaultMemManager();
 | 
						|
  // Tell the memory manager to poison freed memory so that accessing freed
 | 
						|
  // memory is more easily tested.
 | 
						|
  MemMgr->setPoisonMemory(true);
 | 
						|
  std::string Error;
 | 
						|
  OwningPtr<ExecutionEngine> JIT(EngineBuilder(MP)
 | 
						|
                                 .setEngineKind(EngineKind::JIT)
 | 
						|
                                 .setErrorStr(&Error)
 | 
						|
                                 .setJITMemoryManager(MemMgr)
 | 
						|
                                 // The next line enables the fix:
 | 
						|
                                 .setAllocateGVsWithCode(false)
 | 
						|
                                 .create());
 | 
						|
  ASSERT_EQ(Error, "");
 | 
						|
 | 
						|
  // Create a global variable.
 | 
						|
  const Type *GTy = Type::Int32Ty;
 | 
						|
  GlobalVariable *G = new GlobalVariable(
 | 
						|
      *M,
 | 
						|
      GTy,
 | 
						|
      false,  // Not constant.
 | 
						|
      GlobalValue::InternalLinkage,
 | 
						|
      context.getNullValue(GTy),
 | 
						|
      "myglobal");
 | 
						|
 | 
						|
  // Make a function that points to a global.
 | 
						|
  Function *F1 = makeReturnGlobal("F1", G, M);
 | 
						|
 | 
						|
  // Get the pointer to the native code to force it to JIT the function and
 | 
						|
  // allocate space for the global.
 | 
						|
  void (*F1Ptr)();
 | 
						|
  // Hack to avoid ISO C++ warning about casting function pointers.
 | 
						|
  *(void**)(void*)&F1Ptr = JIT->getPointerToFunction(F1);
 | 
						|
 | 
						|
  // Since F1 was codegen'd, a pointer to G should be available.
 | 
						|
  int32_t *GPtr = (int32_t*)JIT->getPointerToGlobalIfAvailable(G);
 | 
						|
  ASSERT_NE((int32_t*)NULL, GPtr);
 | 
						|
  EXPECT_EQ(0, *GPtr);
 | 
						|
 | 
						|
  // F1() should increment G.
 | 
						|
  F1Ptr();
 | 
						|
  EXPECT_EQ(1, *GPtr);
 | 
						|
 | 
						|
  // Make a second function identical to the first, referring to the same
 | 
						|
  // global.
 | 
						|
  Function *F2 = makeReturnGlobal("F2", G, M);
 | 
						|
  // Hack to avoid ISO C++ warning about casting function pointers.
 | 
						|
  void (*F2Ptr)();
 | 
						|
  *(void**)(void*)&F2Ptr = JIT->getPointerToFunction(F2);
 | 
						|
 | 
						|
  // F2() should increment G.
 | 
						|
  F2Ptr();
 | 
						|
  EXPECT_EQ(2, *GPtr);
 | 
						|
 | 
						|
  // Deallocate F1.
 | 
						|
  JIT->freeMachineCodeForFunction(F1);
 | 
						|
 | 
						|
  // F2() should *still* increment G.
 | 
						|
  F2Ptr();
 | 
						|
  EXPECT_EQ(3, *GPtr);
 | 
						|
}
 | 
						|
 | 
						|
// This code is copied from JITEventListenerTest, but it only runs once for all
 | 
						|
// the tests in this directory.  Everything seems fine, but that's strange
 | 
						|
// behavior.
 | 
						|
class JITEnvironment : public testing::Environment {
 | 
						|
  virtual void SetUp() {
 | 
						|
    // Required to create a JIT.
 | 
						|
    InitializeNativeTarget();
 | 
						|
  }
 | 
						|
};
 | 
						|
testing::Environment* const jit_env =
 | 
						|
  testing::AddGlobalTestEnvironment(new JITEnvironment);
 | 
						|
 | 
						|
}
 |