maxjhandsome
/
llvm-project
forked from OSchip/llvm-project
1
0
Fork 0
Code Issues Pull Requests Packages Releases Wiki Activity

Rewrite head-of-file comment. 

In lookupFunction():
 Change to use "F" for Function argument instead of ancient "M".
 Remove commented-out code.
 Change to use GetAddressOfSymbol instead of dlsym.

llvm-svn: 9013
This commit is contained in:
Brian Gaeke 2003-10-10 17:03:10 +00:00
parent e8bbcfc298
commit 6cc20deac1
1 changed files with 16 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

30
llvm/lib/ExecutionEngine/Interpreter/ExternalFunctions.cpp
View File

@ -3,10 +3,12 @@
// This file contains both code to deal with invoking "external" functions, but
// also contains code that implements "exported" external functions.
//
// External functions in LLI are implemented by dlopen'ing the lli executable
// and using dlsym to look op the functions that we want to invoke. If a
// function is found, then the arguments are mangled and passed in to the
// function call.
// External functions in the interpreter are implemented by
// using the system's dynamic loader to look up the address of the function
// we want to invoke. If a function is found, then one of the
// many lle_* wrapper functions in this file will translate its arguments from
// GenericValues to the types the function is actually expecting, before the
// function is called.
//
//===----------------------------------------------------------------------===//
@ -21,6 +23,7 @@
#include "Config/link.h"
#include <cmath>
#include "Config/stdio.h"
#include "Support/DynamicLinker.h"
using std::vector;
typedef GenericValue (*ExFunc)(FunctionType *, const vector<GenericValue> &);
@ -52,25 +55,24 @@ static char getTypeID(const Type *Ty) {
}
}
static ExFunc lookupFunction(const Function *M) {
static ExFunc lookupFunction(const Function *F) {
// Function not found, look it up... start by figuring out what the
// composite function name should be.
std::string ExtName = "lle_";
const FunctionType *MT = M->getFunctionType();
for (unsigned i = 0, e = MT->getNumContainedTypes(); i != e; ++i)
ExtName += getTypeID(MT->getContainedType(i));
ExtName += "_" + M->getName();
const FunctionType *FT = F->getFunctionType();
for (unsigned i = 0, e = FT->getNumContainedTypes(); i != e; ++i)
ExtName += getTypeID(FT->getContainedType(i));
ExtName += "_" + F->getName();
//std::cout << "Tried: '" << ExtName << "'\n";
ExFunc FnPtr = FuncNames[ExtName];
if (FnPtr == 0)
FnPtr = (ExFunc)dlsym(RTLD_DEFAULT, ExtName.c_str());
FnPtr = (ExFunc)GetAddressOfSymbol(ExtName);
if (FnPtr == 0)
FnPtr = FuncNames["lle_X_"+M->getName()];
FnPtr = FuncNames["lle_X_"+F->getName()];
if (FnPtr == 0) // Try calling a generic function... if it exists...
FnPtr = (ExFunc)dlsym(RTLD_DEFAULT, ("lle_X_"+M->getName()).c_str());
FnPtr = (ExFunc)GetAddressOfSymbol(("lle_X_"+F->getName()).c_str());
if (FnPtr != 0)
Functions.insert(std::make_pair(M, FnPtr)); // Cache for later
Functions.insert(std::make_pair(F, FnPtr)); // Cache for later
return FnPtr;
}