2009-07-10 21:08:20 +00:00
|
|
|
//===-- 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 calls into OProfile to tell
|
|
|
|
// it about JITted functions. For now, we only record function names and sizes,
|
|
|
|
// but eventually we'll also record line number information.
|
|
|
|
//
|
|
|
|
// See http://oprofile.sourceforge.net/doc/devel/jit-interface.html for the
|
|
|
|
// definition of the interface we're using.
|
|
|
|
//
|
|
|
|
//===----------------------------------------------------------------------===//
|
|
|
|
|
|
|
|
#define DEBUG_TYPE "oprofile-jit-event-listener"
|
|
|
|
#include "llvm/Function.h"
|
2010-01-22 23:04:39 +00:00
|
|
|
#include "llvm/Metadata.h"
|
2010-04-05 21:09:12 +00:00
|
|
|
#include "llvm/ADT/DenseMap.h"
|
2009-07-16 21:07:26 +00:00
|
|
|
#include "llvm/Analysis/DebugInfo.h"
|
|
|
|
#include "llvm/CodeGen/MachineFunction.h"
|
2009-07-10 21:08:20 +00:00
|
|
|
#include "llvm/ExecutionEngine/JITEventListener.h"
|
|
|
|
#include "llvm/Support/Debug.h"
|
2010-01-22 23:04:39 +00:00
|
|
|
#include "llvm/Support/ValueHandle.h"
|
2009-08-02 20:51:44 +00:00
|
|
|
#include "llvm/Support/raw_ostream.h"
|
2009-07-10 21:08:20 +00:00
|
|
|
#include "llvm/System/Errno.h"
|
|
|
|
#include "llvm/Config/config.h"
|
|
|
|
#include <stddef.h>
|
|
|
|
using namespace llvm;
|
|
|
|
|
2009-07-10 22:13:21 +00:00
|
|
|
#if USE_OPROFILE
|
2009-07-10 21:08:20 +00:00
|
|
|
|
|
|
|
#include <opagent.h>
|
|
|
|
|
|
|
|
namespace {
|
|
|
|
|
|
|
|
class OProfileJITEventListener : public JITEventListener {
|
|
|
|
op_agent_t Agent;
|
|
|
|
public:
|
|
|
|
OProfileJITEventListener();
|
|
|
|
~OProfileJITEventListener();
|
|
|
|
|
|
|
|
virtual void NotifyFunctionEmitted(const Function &F,
|
|
|
|
void *FnStart, size_t FnSize,
|
|
|
|
const EmittedFunctionDetails &Details);
|
2009-10-27 01:06:51 +00:00
|
|
|
virtual void NotifyFreeingMachineCode(void *OldPtr);
|
2009-07-10 21:08:20 +00:00
|
|
|
};
|
|
|
|
|
|
|
|
OProfileJITEventListener::OProfileJITEventListener()
|
|
|
|
: Agent(op_open_agent()) {
|
|
|
|
if (Agent == NULL) {
|
|
|
|
const std::string err_str = sys::StrError();
|
2010-01-05 01:23:34 +00:00
|
|
|
DEBUG(dbgs() << "Failed to connect to OProfile agent: " << err_str << "\n");
|
2009-07-10 21:08:20 +00:00
|
|
|
} else {
|
2010-01-05 01:23:34 +00:00
|
|
|
DEBUG(dbgs() << "Connected to OProfile agent.\n");
|
2009-07-10 21:08:20 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
OProfileJITEventListener::~OProfileJITEventListener() {
|
|
|
|
if (Agent != NULL) {
|
|
|
|
if (op_close_agent(Agent) == -1) {
|
|
|
|
const std::string err_str = sys::StrError();
|
2010-01-05 01:23:34 +00:00
|
|
|
DEBUG(dbgs() << "Failed to disconnect from OProfile agent: "
|
2009-08-23 06:35:02 +00:00
|
|
|
<< err_str << "\n");
|
2009-07-10 21:08:20 +00:00
|
|
|
} else {
|
2010-01-05 01:23:34 +00:00
|
|
|
DEBUG(dbgs() << "Disconnected from OProfile agent.\n");
|
2009-07-10 21:08:20 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2009-07-16 21:07:26 +00:00
|
|
|
class FilenameCache {
|
2009-12-07 22:32:38 +00:00
|
|
|
// Holds the filename of each Scope, so that we can pass a null-terminated
|
2010-01-22 23:04:39 +00:00
|
|
|
// string into oprofile. Use an AssertingVH rather than a ValueMap because we
|
|
|
|
// shouldn't be modifying any MDNodes while this map is alive.
|
|
|
|
DenseMap<AssertingVH<MDNode>, std::string> Filenames;
|
2009-07-16 21:07:26 +00:00
|
|
|
|
|
|
|
public:
|
2010-04-05 21:09:12 +00:00
|
|
|
const char *getFilename(MDNode *Scope) {
|
|
|
|
std::string &Filename = Filenames[Scope];
|
2009-12-10 10:01:47 +00:00
|
|
|
if (Filename.empty()) {
|
2010-04-05 21:09:12 +00:00
|
|
|
Filename = DIScope(Scope).getFilename();
|
2009-07-16 21:07:26 +00:00
|
|
|
}
|
2009-12-07 22:32:38 +00:00
|
|
|
return Filename.c_str();
|
2009-07-16 21:07:26 +00:00
|
|
|
}
|
|
|
|
};
|
|
|
|
|
|
|
|
static debug_line_info LineStartToOProfileFormat(
|
|
|
|
const MachineFunction &MF, FilenameCache &Filenames,
|
|
|
|
uintptr_t Address, DebugLoc Loc) {
|
|
|
|
debug_line_info Result;
|
|
|
|
Result.vma = Address;
|
2010-04-05 21:09:12 +00:00
|
|
|
Result.lineno = Loc.getLine();
|
|
|
|
Result.filename = Filenames.getFilename(
|
|
|
|
Loc.getScope(MF.getFunction()->getContext()));
|
2010-01-05 01:23:34 +00:00
|
|
|
DEBUG(dbgs() << "Mapping " << reinterpret_cast<void*>(Result.vma) << " to "
|
2009-08-23 06:35:02 +00:00
|
|
|
<< Result.filename << ":" << Result.lineno << "\n");
|
2009-07-16 21:07:26 +00:00
|
|
|
return Result;
|
|
|
|
}
|
|
|
|
|
2009-07-10 21:08:20 +00:00
|
|
|
// Adds the just-emitted function to the symbol table.
|
|
|
|
void OProfileJITEventListener::NotifyFunctionEmitted(
|
|
|
|
const Function &F, void *FnStart, size_t FnSize,
|
2009-07-16 21:07:26 +00:00
|
|
|
const EmittedFunctionDetails &Details) {
|
2009-07-26 09:48:23 +00:00
|
|
|
assert(F.hasName() && FnStart != 0 && "Bad symbol to add");
|
|
|
|
if (op_write_native_code(Agent, F.getName().data(),
|
2009-07-10 21:08:20 +00:00
|
|
|
reinterpret_cast<uint64_t>(FnStart),
|
|
|
|
FnStart, FnSize) == -1) {
|
2010-01-05 01:23:34 +00:00
|
|
|
DEBUG(dbgs() << "Failed to tell OProfile about native function "
|
2009-08-02 20:51:44 +00:00
|
|
|
<< F.getName() << " at ["
|
2009-07-26 09:48:23 +00:00
|
|
|
<< FnStart << "-" << ((char*)FnStart + FnSize) << "]\n");
|
2009-07-16 21:07:26 +00:00
|
|
|
return;
|
|
|
|
}
|
|
|
|
|
|
|
|
// Now we convert the line number information from the address/DebugLoc format
|
|
|
|
// in Details to the address/filename/lineno format that OProfile expects.
|
|
|
|
// OProfile 0.9.4 (and maybe later versions) has a bug that causes it to
|
|
|
|
// ignore line numbers for addresses above 4G.
|
|
|
|
FilenameCache Filenames;
|
|
|
|
std::vector<debug_line_info> LineInfo;
|
|
|
|
LineInfo.reserve(1 + Details.LineStarts.size());
|
|
|
|
if (!Details.MF->getDefaultDebugLoc().isUnknown()) {
|
|
|
|
LineInfo.push_back(LineStartToOProfileFormat(
|
|
|
|
*Details.MF, Filenames,
|
|
|
|
reinterpret_cast<uintptr_t>(FnStart),
|
|
|
|
Details.MF->getDefaultDebugLoc()));
|
|
|
|
}
|
|
|
|
for (std::vector<EmittedFunctionDetails::LineStart>::const_iterator
|
|
|
|
I = Details.LineStarts.begin(), E = Details.LineStarts.end();
|
|
|
|
I != E; ++I) {
|
|
|
|
LineInfo.push_back(LineStartToOProfileFormat(
|
|
|
|
*Details.MF, Filenames, I->Address, I->Loc));
|
|
|
|
}
|
|
|
|
if (!LineInfo.empty()) {
|
|
|
|
if (op_write_debug_line_info(Agent, FnStart,
|
|
|
|
LineInfo.size(), &*LineInfo.begin()) == -1) {
|
2010-01-05 01:23:34 +00:00
|
|
|
DEBUG(dbgs()
|
2009-07-26 09:48:23 +00:00
|
|
|
<< "Failed to tell OProfile about line numbers for native function "
|
|
|
|
<< F.getName() << " at ["
|
|
|
|
<< FnStart << "-" << ((char*)FnStart + FnSize) << "]\n");
|
2009-07-16 21:07:26 +00:00
|
|
|
}
|
2009-07-10 21:08:20 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2009-10-27 00:03:05 +00:00
|
|
|
// Removes the being-deleted function from the symbol table.
|
|
|
|
void OProfileJITEventListener::NotifyFreeingMachineCode(void *FnStart) {
|
2009-07-10 21:08:20 +00:00
|
|
|
assert(FnStart && "Invalid function pointer");
|
|
|
|
if (op_unload_native_code(Agent, reinterpret_cast<uint64_t>(FnStart)) == -1) {
|
2010-01-05 01:23:34 +00:00
|
|
|
DEBUG(dbgs()
|
2009-10-27 00:03:05 +00:00
|
|
|
<< "Failed to tell OProfile about unload of native function at "
|
|
|
|
<< FnStart << "\n");
|
2009-07-10 21:08:20 +00:00
|
|
|
}
|
|
|
|
}
|
|
|
|
|
|
|
|
} // anonymous namespace.
|
|
|
|
|
|
|
|
namespace llvm {
|
|
|
|
JITEventListener *createOProfileJITEventListener() {
|
|
|
|
return new OProfileJITEventListener;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2009-07-10 22:13:21 +00:00
|
|
|
#else // USE_OPROFILE
|
2009-07-10 21:08:20 +00:00
|
|
|
|
|
|
|
namespace llvm {
|
|
|
|
// By defining this to return NULL, we can let clients call it unconditionally,
|
|
|
|
// even if they haven't configured with the OProfile libraries.
|
|
|
|
JITEventListener *createOProfileJITEventListener() {
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
} // namespace llvm
|
|
|
|
|
2009-07-10 22:13:21 +00:00
|
|
|
#endif // USE_OPROFILE
|