int ExecuteManagedAssembly(
const char* currentExeAbsolutePath,
const char* clrFilesAbsolutePath,
const char* managedAssemblyAbsolutePath,
int managedAssemblyArgc,
const char** managedAssemblyArgv)
{
// Indicates failure
int exitCode = -1;
std::string coreClrDllPath(clrFilesAbsolutePath);
coreClrDllPath.append("/");
coreClrDllPath.append(coreClrDll);
if (coreClrDllPath.length() >= PATH_MAX)
{
fprintf(stderr, "Absolute path to libcoreclr.so too long\n");
return -1;
}
// Get just the path component of the managed assembly path
std::string appPath;
GetDirectory(managedAssemblyAbsolutePath, appPath);
// Construct native search directory paths
std::string nativeDllSearchDirs(appPath);
char *coreLibraries = getenv("CORE_LIBRARIES");
if (coreLibraries)
{
nativeDllSearchDirs.append(":");
nativeDllSearchDirs.append(coreLibraries);
}
nativeDllSearchDirs.append(":");
nativeDllSearchDirs.append(clrFilesAbsolutePath);
std::string tpaList;
AddFilesFromDirectoryToTpaList(clrFilesAbsolutePath, tpaList);
void* coreclrLib = dlopen(coreClrDllPath.c_str(), RTLD_NOW | RTLD_LOCAL);
if (coreclrLib != nullptr)
{
coreclr_initialize_ptr initializeCoreCLR = (coreclr_initialize_ptr)dlsym(coreclrLib, "coreclr_initialize");
coreclr_execute_assembly_ptr executeAssembly = (coreclr_execute_assembly_ptr)dlsym(coreclrLib, "coreclr_execute_assembly");
coreclr_shutdown_ptr shutdownCoreCLR = (coreclr_shutdown_ptr)dlsym(coreclrLib, "coreclr_shutdown");
if (initializeCoreCLR == nullptr)
{
fprintf(stderr, "Function coreclr_initialize not found in the libcoreclr.so\n");
}
else if (executeAssembly == nullptr)
{
fprintf(stderr, "Function coreclr_execute_assembly not found in the libcoreclr.so\n");
}
else if (shutdownCoreCLR == nullptr)
{
fprintf(stderr, "Function coreclr_shutdown not found in the libcoreclr.so\n");
}
else
{
// Check whether we are enabling server GC (off by default)
const char* useServerGc = std::getenv(serverGcVar);
if (useServerGc == nullptr)
{
useServerGc = "0";
}
// CoreCLR expects strings "true" and "false" instead of "1" and "0".
useServerGc = std::strcmp(useServerGc, "1") == 0 ? "true" : "false";
// Allowed property names:
// APPBASE
// - The base path of the application from which the exe and other assemblies will be loaded
//
// TRUSTED_PLATFORM_ASSEMBLIES
// - The list of complete paths to each of the fully trusted assemblies
//
// APP_PATHS
// - The list of paths which will be probed by the assembly loader
//
// APP_NI_PATHS
// - The list of additional paths that the assembly loader will probe for ngen images
//
// NATIVE_DLL_SEARCH_DIRECTORIES
// - The list of paths that will be probed for native DLLs called by PInvoke
//
const char *propertyKeys[] = {
"TRUSTED_PLATFORM_ASSEMBLIES",
"APP_PATHS",
"APP_NI_PATHS",
"NATIVE_DLL_SEARCH_DIRECTORIES",
"AppDomainCompatSwitch",
"System.GC.Server",
};
const char *propertyValues[] = {
// TRUSTED_PLATFORM_ASSEMBLIES
tpaList.c_str(),
// APP_PATHS
appPath.c_str(),
// APP_NI_PATHS
appPath.c_str(),
// NATIVE_DLL_SEARCH_DIRECTORIES
nativeDllSearchDirs.c_str(),
// AppDomainCompatSwitch
"UseLatestBehaviorWhenTFMNotSpecified",
// System.GC.Server
useServerGc,
};
void* hostHandle;
unsigned int domainId;
int st = initializeCoreCLR(
currentExeAbsolutePath,
"unixcorerun",
sizeof(propertyKeys) / sizeof(propertyKeys[0]),
propertyKeys,
propertyValues,
&hostHandle,
&domainId);
if (!SUCCEEDED(st))
{
fprintf(stderr, "coreclr_initialize failed - status: 0x%08x\n", st);
exitCode = -1;
}
else
{
st = executeAssembly(
hostHandle,
domainId,
managedAssemblyArgc,
managedAssemblyArgv,
managedAssemblyAbsolutePath,
(unsigned int*)&exitCode);
if (!SUCCEEDED(st))
{
fprintf(stderr, "coreclr_execute_assembly failed - status: 0x%08x\n", st);
exitCode = -1;
}
st = shutdownCoreCLR(hostHandle, domainId);
if (!SUCCEEDED(st))
{
fprintf(stderr, "coreclr_shutdown failed - status: 0x%08x\n", st);
exitCode = -1;
}
}
}
if (dlclose(coreclrLib) != 0)
{
fprintf(stderr, "Warning - dlclose failed\n");
}
}
else
{
char* error = dlerror();
fprintf(stderr, "dlopen failed to open the libcoreclr.so with error %s\n", error);
}
return exitCode;
}
HRESULT CoreClrEmbedding::Initialize(BOOL debugMode)
{
// Much of the CoreCLR bootstrapping process is cribbed from
// https://github.com/aspnet/dnx/blob/dev/src/dnx.coreclr.unix/dnx.coreclr.cpp
DBG("CoreClrEmbedding::Initialize - Started")
HRESULT result = S_OK;
char currentDirectory[PATH_MAX];
#ifdef EDGE_PLATFORM_WINDOWS
if (!_getcwd(¤tDirectory[0], PATH_MAX))
#else
if (!getcwd(¤tDirectory[0], PATH_MAX))
#endif
{
throwV8Exception("Unable to get the current directory.");
return E_FAIL;
}
char edgeNodePath[PATH_MAX];
#ifdef EDGE_PLATFORM_WINDOWS
HMODULE moduleHandle = NULL;
GetModuleHandleEx(GET_MODULE_HANDLE_EX_FLAG_FROM_ADDRESS | GET_MODULE_HANDLE_EX_FLAG_UNCHANGED_REFCOUNT, (LPCSTR) &CoreClrEmbedding::Initialize, &moduleHandle);
GetModuleFileName(moduleHandle, edgeNodePath, PATH_MAX);
PathRemoveFileSpec(edgeNodePath);
#else
Dl_info dlInfo;
dladdr((void*)&CoreClrEmbedding::Initialize, &dlInfo);
strcpy(edgeNodePath, dlInfo.dli_fname);
strcpy(edgeNodePath, dirname(edgeNodePath));
#endif
DBG("CoreClrEmbedding::Initialize - edge.node path is %s", edgeNodePath);
void* libCoreClr = NULL;
char bootstrapper[PATH_MAX];
GetPathToBootstrapper(&bootstrapper[0], PATH_MAX);
DBG("CoreClrEmbedding::Initialize - Bootstrapper is %s", bootstrapper);
char coreClrDirectory[PATH_MAX];
char* coreClrEnvironmentVariable = getenv("CORECLR_DIR");
if (coreClrEnvironmentVariable)
{
if (coreClrEnvironmentVariable[0] == '"')
{
strncpy(&coreClrDirectory[0], &coreClrEnvironmentVariable[1], strlen(coreClrEnvironmentVariable) - 2);
coreClrDirectory[strlen(coreClrEnvironmentVariable) - 2] = '\0';
}
else
{
strncpy(&coreClrDirectory[0], coreClrEnvironmentVariable, strlen(coreClrEnvironmentVariable) + 1);
}
DBG("CoreClrEmbedding::Initialize - Trying to load %s from the path specified in the CORECLR_DIR environment variable: %s", LIBCORECLR_NAME, coreClrDirectory);
LoadCoreClrAtPath(coreClrDirectory, &libCoreClr);
}
if (!libCoreClr)
{
strncpy(&coreClrDirectory[0], currentDirectory, strlen(currentDirectory) + 1);
LoadCoreClrAtPath(coreClrDirectory, &libCoreClr);
}
if (!libCoreClr)
{
// Try to load CoreCLR from application path
#ifdef EDGE_PLATFORM_WINDOWS
char* lastSlash = strrchr(&bootstrapper[0], '\\');
#else
char* lastSlash = strrchr(&bootstrapper[0], '/');
#endif
assert(lastSlash);
strncpy(&coreClrDirectory[0], &bootstrapper[0], lastSlash - &bootstrapper[0]);
coreClrDirectory[lastSlash - &bootstrapper[0]] = '\0';
LoadCoreClrAtPath(coreClrDirectory, &libCoreClr);
}
if (!libCoreClr)
{
std::string pathEnvironmentVariable = getenv("PATH");
#if EDGE_PLATFORM_WINDOWS
char delimeter = ';';
#else
char delimeter = ':';
#endif
size_t previousIndex = 0;
size_t currentIndex = pathEnvironmentVariable.find(delimeter);
while (!libCoreClr && currentIndex != std::string::npos)
{
strncpy(&coreClrDirectory[0], pathEnvironmentVariable.substr(previousIndex, currentIndex - previousIndex).c_str(), currentIndex - previousIndex);
coreClrDirectory[currentIndex - previousIndex] = '\0';
LoadCoreClrAtPath(coreClrDirectory, &libCoreClr);
if (!libCoreClr)
{
previousIndex = currentIndex + 1;
currentIndex = pathEnvironmentVariable.find(delimeter, previousIndex);
}
}
}
if (!libCoreClr)
{
throwV8Exception("Failed to find CoreCLR. Make sure that you have either specified the CoreCLR directory in the CORECLR_DIR environment variable or it exists somewhere in your PATH environment variable, which you do via the \"dnvm install\" and \"dnvm use\" commands.");
return E_FAIL;
}
DBG("CoreClrEmbedding::Initialize - %s loaded successfully from %s", LIBCORECLR_NAME, &coreClrDirectory[0]);
std::string assemblySearchDirectories;
assemblySearchDirectories.append(¤tDirectory[0]);
assemblySearchDirectories.append(":");
assemblySearchDirectories.append(&coreClrDirectory[0]);
DBG("CoreClrEmbedding::Initialize - Assembly search path is %s", assemblySearchDirectories.c_str());
coreclr_initializeFunction initializeCoreCLR = (coreclr_initializeFunction) LoadSymbol(libCoreClr, "coreclr_initialize");
if (!initializeCoreCLR)
{
throwV8Exception("Error loading the coreclr_initialize function from %s: %s.", LIBCORECLR_NAME, GetLoadError());
return E_FAIL;
}
DBG("CoreClrEmbedding::Initialize - coreclr_initialize loaded successfully");
coreclr_create_delegateFunction createDelegate = (coreclr_create_delegateFunction) LoadSymbol(libCoreClr, "coreclr_create_delegate");
if (!createDelegate)
{
throwV8Exception("Error loading the coreclr_create_delegate function from %s: %s.", LIBCORECLR_NAME, GetLoadError());
return E_FAIL;
}
DBG("CoreClrEmbedding::Initialize - coreclr_create_delegate loaded successfully");
const char* propertyKeys[] = {
"TRUSTED_PLATFORM_ASSEMBLIES",
"APP_PATHS",
"APP_NI_PATHS",
"NATIVE_DLL_SEARCH_DIRECTORIES",
"AppDomainCompatSwitch"
};
std::string tpaList;
AddToTpaList(coreClrDirectory, &tpaList);
std::string appPaths(¤tDirectory[0]);
#if EDGE_PLATFORM_WINDOWS
appPaths.append(";");
#else
appPaths.append(":");
#endif
appPaths.append(edgeNodePath);
DBG("CoreClrEmbedding::Initialize - Using %s as the app path value", appPaths.c_str());
const char* propertyValues[] = {
tpaList.c_str(),
appPaths.c_str(),
appPaths.c_str(),
assemblySearchDirectories.c_str(),
"UseLatestBehaviorWhenTFMNotSpecified"
};
DBG("CoreClrEmbedding::Initialize - Calling coreclr_initialize()");
result = initializeCoreCLR(
bootstrapper,
"Edge",
sizeof(propertyKeys) / sizeof(propertyKeys[0]),
&propertyKeys[0],
&propertyValues[0],
&hostHandle,
&appDomainId);
if (FAILED(result))
{
throwV8Exception("Call to coreclr_initialize() failed with a return code of 0x%x.", result);
return result;
}
DBG("CoreClrEmbedding::Initialize - CoreCLR initialized successfully");
DBG("CoreClrEmbedding::Initialize - App domain created successfully (app domain ID: %d)", appDomainId);
SetCallV8FunctionDelegateFunction setCallV8Function;
CREATE_DELEGATE("GetFunc", &getFunc);
CREATE_DELEGATE("CallFunc", &callFunc);
CREATE_DELEGATE("ContinueTask", &continueTask);
CREATE_DELEGATE("FreeHandle", &freeHandle);
CREATE_DELEGATE("FreeMarshalData", &freeMarshalData);
CREATE_DELEGATE("SetCallV8FunctionDelegate", &setCallV8Function);
CREATE_DELEGATE("CompileFunc", &compileFunc);
CREATE_DELEGATE("Initialize", &initialize);
DBG("CoreClrEmbedding::Initialize - Getting runtime info");
CoreClrGcHandle exception = NULL;
BootstrapperContext context;
context.runtimeDirectory = &coreClrDirectory[0];
context.applicationDirectory = getenv("EDGE_APP_ROOT");
context.edgeNodePath = &edgeNodePath[0];
if (!context.applicationDirectory)
{
context.applicationDirectory = ¤tDirectory[0];
}
std::string operatingSystem = GetOSName();
std::string operatingSystemVersion = GetOSVersion();
context.architecture = GetOSArchitecture();
context.operatingSystem = operatingSystem.c_str();
context.operatingSystemVersion = operatingSystemVersion.c_str();
DBG("CoreClrEmbedding::Initialize - Operating system: %s", context.operatingSystem);
DBG("CoreClrEmbedding::Initialize - Operating system version: %s", context.operatingSystemVersion);
DBG("CoreClrEmbedding::Initialize - Architecture: %s", context.architecture);
DBG("CoreClrEmbedding::Initialize - Runtime directory: %s", context.runtimeDirectory);
DBG("CoreClrEmbedding::Initialize - Application directory: %s", context.applicationDirectory);
DBG("CoreClrEmbedding::Initialize - Calling CLR Initialize() function");
initialize(&context, &exception);
if (exception)
{
v8::Local<v8::Value> v8Exception = CoreClrFunc::MarshalCLRToV8(exception, V8TypeException);
FreeMarshalData(exception, V8TypeException);
throwV8Exception(v8Exception);
}
else
{
DBG("CoreClrEmbedding::Initialize - CLR Initialize() function called successfully")
}
exception = NULL;
setCallV8Function(CoreClrNodejsFunc::Call, &exception);
if (exception)
{
v8::Local<v8::Value> v8Exception = CoreClrFunc::MarshalCLRToV8(exception, V8TypeException);
FreeMarshalData(exception, V8TypeException);
throwV8Exception(v8Exception);
}
else
{
DBG("CoreClrEmbedding::Initialize - CallV8Function delegate set successfully");
}
DBG("CoreClrEmbedding::Initialize - Completed");
return S_OK;
}
