You've already forked linux-packaging-mono
Imported Upstream version 5.18.0.207
Former-commit-id: 3b152f462918d427ce18620a2cbe4f8b79650449
This commit is contained in:
Xamarin Public Jenkins (auto-signing)
parent
8e12397d70
commit
eb85e2fc17
@ -1,7 +0,0 @@
|
||||
|
||||
include_directories( ${LLVM_OPROFILE_DIR} ${CMAKE_CURRENT_SOURCE_DIR}/.. )
|
||||
|
||||
add_llvm_library(LLVMOProfileJIT
|
||||
OProfileJITEventListener.cpp
|
||||
OProfileWrapper.cpp
|
||||
)
|
||||
@ -1,24 +0,0 @@
|
||||
;===- ./lib/ExecutionEngine/OProfileJIT/LLVMBuild.txt ----------*- Conf -*--===;
|
||||
;
|
||||
; The LLVM Compiler Infrastructure
|
||||
;
|
||||
; This file is distributed under the University of Illinois Open Source
|
||||
; License. See LICENSE.TXT for details.
|
||||
;
|
||||
;===------------------------------------------------------------------------===;
|
||||
;
|
||||
; This is an LLVMBuild description file for the components in this subdirectory.
|
||||
;
|
||||
; For more information on the LLVMBuild system, please see:
|
||||
;
|
||||
; http://llvm.org/docs/LLVMBuild.html
|
||||
;
|
||||
;===------------------------------------------------------------------------===;
|
||||
|
||||
[common]
|
||||
|
||||
[component_0]
|
||||
type = OptionalLibrary
|
||||
name = OProfileJIT
|
||||
parent = ExecutionEngine
|
||||
required_libraries = Support Object ExecutionEngine
|
||||
@ -1,158 +0,0 @@
|
||||
//===-- OProfileJITEventListener.cpp - Tell OProfile about JITted code ----===//
|
||||
//
|
||||
// The LLVM Compiler Infrastructure
|
||||
//
|
||||
// This file is distributed under the University of Illinois Open Source
|
||||
// License. See LICENSE.TXT for details.
|
||||
//
|
||||
//===----------------------------------------------------------------------===//
|
||||
//
|
||||
// This file defines a JITEventListener object that uses OProfileWrapper to tell
|
||||
// oprofile about JITted functions, including source line information.
|
||||
//
|
||||
//===----------------------------------------------------------------------===//
|
||||
|
||||
#include "llvm/CodeGen/MachineFunction.h"
|
||||
#include "llvm/Config/config.h"
|
||||
#include "llvm/ExecutionEngine/JITEventListener.h"
|
||||
#include "llvm/ExecutionEngine/OProfileWrapper.h"
|
||||
#include "llvm/ExecutionEngine/RuntimeDyld.h"
|
||||
#include "llvm/IR/DebugInfo.h"
|
||||
#include "llvm/IR/Function.h"
|
||||
#include "llvm/Object/ObjectFile.h"
|
||||
#include "llvm/Object/SymbolSize.h"
|
||||
#include "llvm/Support/Debug.h"
|
||||
#include "llvm/Support/Errno.h"
|
||||
#include "llvm/Support/raw_ostream.h"
|
||||
#include <dirent.h>
|
||||
#include <fcntl.h>
|
||||
|
||||
using namespace llvm;
|
||||
using namespace llvm::object;
|
||||
|
||||
#define DEBUG_TYPE "oprofile-jit-event-listener"
|
||||
|
||||
namespace {
|
||||
|
||||
class OProfileJITEventListener : public JITEventListener {
|
||||
std::unique_ptr<OProfileWrapper> Wrapper;
|
||||
|
||||
void initialize();
|
||||
std::map<const char*, OwningBinary<ObjectFile>> DebugObjects;
|
||||
|
||||
public:
|
||||
OProfileJITEventListener(std::unique_ptr<OProfileWrapper> LibraryWrapper)
|
||||
: Wrapper(std::move(LibraryWrapper)) {
|
||||
initialize();
|
||||
}
|
||||
|
||||
~OProfileJITEventListener();
|
||||
|
||||
void NotifyObjectEmitted(const ObjectFile &Obj,
|
||||
const RuntimeDyld::LoadedObjectInfo &L) override;
|
||||
|
||||
void NotifyFreeingObject(const ObjectFile &Obj) override;
|
||||
};
|
||||
|
||||
void OProfileJITEventListener::initialize() {
|
||||
if (!Wrapper->op_open_agent()) {
|
||||
const std::string err_str = sys::StrError();
|
||||
DEBUG(dbgs() << "Failed to connect to OProfile agent: " << err_str << "\n");
|
||||
} else {
|
||||
DEBUG(dbgs() << "Connected to OProfile agent.\n");
|
||||
}
|
||||
}
|
||||
|
||||
OProfileJITEventListener::~OProfileJITEventListener() {
|
||||
if (Wrapper->isAgentAvailable()) {
|
||||
if (Wrapper->op_close_agent() == -1) {
|
||||
const std::string err_str = sys::StrError();
|
||||
DEBUG(dbgs() << "Failed to disconnect from OProfile agent: "
|
||||
<< err_str << "\n");
|
||||
} else {
|
||||
DEBUG(dbgs() << "Disconnected from OProfile agent.\n");
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
void OProfileJITEventListener::NotifyObjectEmitted(
|
||||
const ObjectFile &Obj,
|
||||
const RuntimeDyld::LoadedObjectInfo &L) {
|
||||
if (!Wrapper->isAgentAvailable()) {
|
||||
return;
|
||||
}
|
||||
|
||||
OwningBinary<ObjectFile> DebugObjOwner = L.getObjectForDebug(Obj);
|
||||
const ObjectFile &DebugObj = *DebugObjOwner.getBinary();
|
||||
|
||||
// Use symbol info to iterate functions in the object.
|
||||
for (const std::pair<SymbolRef, uint64_t> &P : computeSymbolSizes(DebugObj)) {
|
||||
SymbolRef Sym = P.first;
|
||||
if (!Sym.getType() || *Sym.getType() != SymbolRef::ST_Function)
|
||||
continue;
|
||||
|
||||
Expected<StringRef> NameOrErr = Sym.getName();
|
||||
if (!NameOrErr)
|
||||
continue;
|
||||
StringRef Name = *NameOrErr;
|
||||
Expected<uint64_t> AddrOrErr = Sym.getAddress();
|
||||
if (!AddrOrErr)
|
||||
continue;
|
||||
uint64_t Addr = *AddrOrErr;
|
||||
uint64_t Size = P.second;
|
||||
|
||||
if (Wrapper->op_write_native_code(Name.data(), Addr, (void *)Addr, Size) ==
|
||||
-1) {
|
||||
DEBUG(dbgs() << "Failed to tell OProfile about native function " << Name
|
||||
<< " at [" << (void *)Addr << "-" << ((char *)Addr + Size)
|
||||
<< "]\n");
|
||||
continue;
|
||||
}
|
||||
// TODO: support line number info (similar to IntelJITEventListener.cpp)
|
||||
}
|
||||
|
||||
DebugObjects[Obj.getData().data()] = std::move(DebugObjOwner);
|
||||
}
|
||||
|
||||
void OProfileJITEventListener::NotifyFreeingObject(const ObjectFile &Obj) {
|
||||
if (Wrapper->isAgentAvailable()) {
|
||||
|
||||
// If there was no agent registered when the original object was loaded then
|
||||
// we won't have created a debug object for it, so bail out.
|
||||
if (DebugObjects.find(Obj.getData().data()) == DebugObjects.end())
|
||||
return;
|
||||
|
||||
const ObjectFile &DebugObj = *DebugObjects[Obj.getData().data()].getBinary();
|
||||
|
||||
// Use symbol info to iterate functions in the object.
|
||||
for (symbol_iterator I = DebugObj.symbol_begin(),
|
||||
E = DebugObj.symbol_end();
|
||||
I != E; ++I) {
|
||||
if (I->getType() && *I->getType() == SymbolRef::ST_Function) {
|
||||
Expected<uint64_t> AddrOrErr = I->getAddress();
|
||||
if (!AddrOrErr)
|
||||
continue;
|
||||
uint64_t Addr = *AddrOrErr;
|
||||
|
||||
if (Wrapper->op_unload_native_code(Addr) == -1) {
|
||||
DEBUG(dbgs()
|
||||
<< "Failed to tell OProfile about unload of native function at "
|
||||
<< (void*)Addr << "\n");
|
||||
continue;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
DebugObjects.erase(Obj.getData().data());
|
||||
}
|
||||
|
||||
} // anonymous namespace.
|
||||
|
||||
namespace llvm {
|
||||
JITEventListener *JITEventListener::createOProfileJITEventListener() {
|
||||
return new OProfileJITEventListener(llvm::make_unique<OProfileWrapper>());
|
||||
}
|
||||
|
||||
} // namespace llvm
|
||||
|
||||
@ -1,267 +0,0 @@
|
||||
//===-- OProfileWrapper.cpp - OProfile JIT API Wrapper implementation -----===//
|
||||
//
|
||||
// The LLVM Compiler Infrastructure
|
||||
//
|
||||
// This file is distributed under the University of Illinois Open Source
|
||||
// License. See LICENSE.TXT for details.
|
||||
//
|
||||
//===----------------------------------------------------------------------===//
|
||||
//
|
||||
// This file implements the interface in OProfileWrapper.h. It is responsible
|
||||
// for loading the opagent dynamic library when the first call to an op_
|
||||
// function occurs.
|
||||
//
|
||||
//===----------------------------------------------------------------------===//
|
||||
|
||||
#include "llvm/ExecutionEngine/OProfileWrapper.h"
|
||||
#include "llvm/ADT/SmallString.h"
|
||||
#include "llvm/Support/Debug.h"
|
||||
#include "llvm/Support/DynamicLibrary.h"
|
||||
#include "llvm/Support/Mutex.h"
|
||||
#include "llvm/Support/MutexGuard.h"
|
||||
#include "llvm/Support/raw_ostream.h"
|
||||
#include <cstring>
|
||||
#include <dirent.h>
|
||||
#include <fcntl.h>
|
||||
#include <stddef.h>
|
||||
#include <sys/stat.h>
|
||||
#include <unistd.h>
|
||||
|
||||
#define DEBUG_TYPE "oprofile-wrapper"
|
||||
|
||||
namespace {
|
||||
|
||||
// Global mutex to ensure a single thread initializes oprofile agent.
|
||||
llvm::sys::Mutex OProfileInitializationMutex;
|
||||
|
||||
} // anonymous namespace
|
||||
|
||||
namespace llvm {
|
||||
|
||||
OProfileWrapper::OProfileWrapper()
|
||||
: Agent(0),
|
||||
OpenAgentFunc(0),
|
||||
CloseAgentFunc(0),
|
||||
WriteNativeCodeFunc(0),
|
||||
WriteDebugLineInfoFunc(0),
|
||||
UnloadNativeCodeFunc(0),
|
||||
MajorVersionFunc(0),
|
||||
MinorVersionFunc(0),
|
||||
IsOProfileRunningFunc(0),
|
||||
Initialized(false) {
|
||||
}
|
||||
|
||||
bool OProfileWrapper::initialize() {
|
||||
using namespace llvm;
|
||||
using namespace llvm::sys;
|
||||
|
||||
MutexGuard Guard(OProfileInitializationMutex);
|
||||
|
||||
if (Initialized)
|
||||
return OpenAgentFunc != 0;
|
||||
|
||||
Initialized = true;
|
||||
|
||||
// If the oprofile daemon is not running, don't load the opagent library
|
||||
if (!isOProfileRunning()) {
|
||||
DEBUG(dbgs() << "OProfile daemon is not detected.\n");
|
||||
return false;
|
||||
}
|
||||
|
||||
std::string error;
|
||||
if(!DynamicLibrary::LoadLibraryPermanently("libopagent.so", &error)) {
|
||||
DEBUG(dbgs()
|
||||
<< "OProfile connector library libopagent.so could not be loaded: "
|
||||
<< error << "\n");
|
||||
}
|
||||
|
||||
// Get the addresses of the opagent functions
|
||||
OpenAgentFunc = (op_open_agent_ptr_t)(intptr_t)
|
||||
DynamicLibrary::SearchForAddressOfSymbol("op_open_agent");
|
||||
CloseAgentFunc = (op_close_agent_ptr_t)(intptr_t)
|
||||
DynamicLibrary::SearchForAddressOfSymbol("op_close_agent");
|
||||
WriteNativeCodeFunc = (op_write_native_code_ptr_t)(intptr_t)
|
||||
DynamicLibrary::SearchForAddressOfSymbol("op_write_native_code");
|
||||
WriteDebugLineInfoFunc = (op_write_debug_line_info_ptr_t)(intptr_t)
|
||||
DynamicLibrary::SearchForAddressOfSymbol("op_write_debug_line_info");
|
||||
UnloadNativeCodeFunc = (op_unload_native_code_ptr_t)(intptr_t)
|
||||
DynamicLibrary::SearchForAddressOfSymbol("op_unload_native_code");
|
||||
MajorVersionFunc = (op_major_version_ptr_t)(intptr_t)
|
||||
DynamicLibrary::SearchForAddressOfSymbol("op_major_version");
|
||||
MinorVersionFunc = (op_major_version_ptr_t)(intptr_t)
|
||||
DynamicLibrary::SearchForAddressOfSymbol("op_minor_version");
|
||||
|
||||
// With missing functions, we can do nothing
|
||||
if (!OpenAgentFunc
|
||||
|| !CloseAgentFunc
|
||||
|| !WriteNativeCodeFunc
|
||||
|| !WriteDebugLineInfoFunc
|
||||
|| !UnloadNativeCodeFunc) {
|
||||
OpenAgentFunc = 0;
|
||||
CloseAgentFunc = 0;
|
||||
WriteNativeCodeFunc = 0;
|
||||
WriteDebugLineInfoFunc = 0;
|
||||
UnloadNativeCodeFunc = 0;
|
||||
return false;
|
||||
}
|
||||
|
||||
return true;
|
||||
}
|
||||
|
||||
bool OProfileWrapper::isOProfileRunning() {
|
||||
if (IsOProfileRunningFunc != 0)
|
||||
return IsOProfileRunningFunc();
|
||||
return checkForOProfileProcEntry();
|
||||
}
|
||||
|
||||
bool OProfileWrapper::checkForOProfileProcEntry() {
|
||||
DIR* ProcDir;
|
||||
|
||||
ProcDir = opendir("/proc");
|
||||
if (!ProcDir)
|
||||
return false;
|
||||
|
||||
// Walk the /proc tree looking for the oprofile daemon
|
||||
struct dirent* Entry;
|
||||
while (0 != (Entry = readdir(ProcDir))) {
|
||||
if (Entry->d_type == DT_DIR) {
|
||||
// Build a path from the current entry name
|
||||
SmallString<256> CmdLineFName;
|
||||
raw_svector_ostream(CmdLineFName) << "/proc/" << Entry->d_name
|
||||
<< "/cmdline";
|
||||
|
||||
// Open the cmdline file
|
||||
int CmdLineFD = open(CmdLineFName.c_str(), S_IRUSR);
|
||||
if (CmdLineFD != -1) {
|
||||
char ExeName[PATH_MAX+1];
|
||||
char* BaseName = 0;
|
||||
|
||||
// Read the cmdline file
|
||||
ssize_t NumRead = read(CmdLineFD, ExeName, PATH_MAX+1);
|
||||
close(CmdLineFD);
|
||||
ssize_t Idx = 0;
|
||||
|
||||
if (ExeName[0] != '/') {
|
||||
BaseName = ExeName;
|
||||
}
|
||||
|
||||
// Find the terminator for the first string
|
||||
while (Idx < NumRead-1 && ExeName[Idx] != 0) {
|
||||
Idx++;
|
||||
}
|
||||
|
||||
// Go back to the last non-null character
|
||||
Idx--;
|
||||
|
||||
// Find the last path separator in the first string
|
||||
while (Idx > 0) {
|
||||
if (ExeName[Idx] == '/') {
|
||||
BaseName = ExeName + Idx + 1;
|
||||
break;
|
||||
}
|
||||
Idx--;
|
||||
}
|
||||
|
||||
// Test this to see if it is the oprofile daemon
|
||||
if (BaseName != 0 && (!strcmp("oprofiled", BaseName) ||
|
||||
!strcmp("operf", BaseName))) {
|
||||
// If it is, we're done
|
||||
closedir(ProcDir);
|
||||
return true;
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
// We've looked through all the files and didn't find the daemon
|
||||
closedir(ProcDir);
|
||||
return false;
|
||||
}
|
||||
|
||||
bool OProfileWrapper::op_open_agent() {
|
||||
if (!Initialized)
|
||||
initialize();
|
||||
|
||||
if (OpenAgentFunc != 0) {
|
||||
Agent = OpenAgentFunc();
|
||||
return Agent != 0;
|
||||
}
|
||||
|
||||
return false;
|
||||
}
|
||||
|
||||
int OProfileWrapper::op_close_agent() {
|
||||
if (!Initialized)
|
||||
initialize();
|
||||
|
||||
int ret = -1;
|
||||
if (Agent && CloseAgentFunc) {
|
||||
ret = CloseAgentFunc(Agent);
|
||||
if (ret == 0) {
|
||||
Agent = 0;
|
||||
}
|
||||
}
|
||||
return ret;
|
||||
}
|
||||
|
||||
bool OProfileWrapper::isAgentAvailable() {
|
||||
return Agent != 0;
|
||||
}
|
||||
|
||||
int OProfileWrapper::op_write_native_code(const char* Name,
|
||||
uint64_t Addr,
|
||||
void const* Code,
|
||||
const unsigned int Size) {
|
||||
if (!Initialized)
|
||||
initialize();
|
||||
|
||||
if (Agent && WriteNativeCodeFunc)
|
||||
return WriteNativeCodeFunc(Agent, Name, Addr, Code, Size);
|
||||
|
||||
return -1;
|
||||
}
|
||||
|
||||
int OProfileWrapper::op_write_debug_line_info(
|
||||
void const* Code,
|
||||
size_t NumEntries,
|
||||
struct debug_line_info const* Info) {
|
||||
if (!Initialized)
|
||||
initialize();
|
||||
|
||||
if (Agent && WriteDebugLineInfoFunc)
|
||||
return WriteDebugLineInfoFunc(Agent, Code, NumEntries, Info);
|
||||
|
||||
return -1;
|
||||
}
|
||||
|
||||
int OProfileWrapper::op_major_version() {
|
||||
if (!Initialized)
|
||||
initialize();
|
||||
|
||||
if (Agent && MajorVersionFunc)
|
||||
return MajorVersionFunc();
|
||||
|
||||
return -1;
|
||||
}
|
||||
|
||||
int OProfileWrapper::op_minor_version() {
|
||||
if (!Initialized)
|
||||
initialize();
|
||||
|
||||
if (Agent && MinorVersionFunc)
|
||||
return MinorVersionFunc();
|
||||
|
||||
return -1;
|
||||
}
|
||||
|
||||
int OProfileWrapper::op_unload_native_code(uint64_t Addr) {
|
||||
if (!Initialized)
|
||||
initialize();
|
||||
|
||||
if (Agent && UnloadNativeCodeFunc)
|
||||
return UnloadNativeCodeFunc(Agent, Addr);
|
||||
|
||||
return -1;
|
||||
}
|
||||
|
||||
} // namespace llvm
|
||||
Reference in New Issue
Block a user