C#-like 的 DLL 封装

一个类似 C# 的 DllImport 实现，用于“半”动态加载 DLL。用起来比我以前写的 DLLWrapper 要麻烦一些，但是 DLLWrapper 由于使用一个 Tuple 来存储函数声明，会造成超长的标识符导致编译错误，这个 DllImport 避免了这个问题。

这个实现有一个缺陷是每次调用API函数的时候都会执行一次 GetProcAddress，效率比较低.... 谁能告诉我怎么避免该死的 CTFE？

代码

// DllImport - A C#-like DLL Wrapper
// written by oldrev (wstring#gmail.com)
// License: BSD

import std.stdio;
import std.typetuple;
import std.utf;
import std.c.windows.windows;
import std.traits;
import std.string;

import singleton;

extern(Windows)
{
 HMODULE LoadLibraryW(LPCWSTR libPath);
}


private static class ModuleManager
{
 private static HMODULE [char[]] m_modules;

 private this()
 {
 }

 static public ~this()
 {
 foreach(h; m_modules)
 {
 FreeLibrary(h);
 }
 }

 private static HMODULE registerModule(char[] name)
 {
 char[] lname = tolower(name);
 HMODULE h = LoadLibraryW(toUTF16z(lname));
 if(h is null)
 throw new Exception("Failed to load DLL: " ~ name);
 m_modules[lname] = h;
 return h;
 }

 public static HMODULE getHandle(char[] name)
 {
 return m_modules[name];
 }

 public static ProcType getSymbol(ProcType)(char[] moduleName, char[] procName)
 {
 HMODULE handle = null;
 if(moduleName in m_modules)
 handle = m_modules[moduleName];
 else
 handle = registerModule(moduleName);

 assert(handle !is null);
 return cast(ProcType)GetProcAddress(handle, toStringz(procName));
 }
}

struct DllImport(char[] ModuleName, char[] ProcName, FT)
{
 extern(Windows) alias ReturnType!(FT)
 function(ParameterTypeTuple!(FT)) FunctionType;
 // 非要这样重新绑定 extern(Windows),是不是编译器的 bug?
 // extern(Windows) alias FT FunctionType; // 这样就不行

 //怎么避免 CTFE？
 //FIXME:
 //FunctionType m_funcPtr = ModuleManager.getSymbol!(FunctionType)(ModuleName, ProcName);

 public ReturnType!(FunctionType) opCall(ParameterTypeTuple!(FunctionType) args)
 {
 FunctionType m_funcPtr = ModuleManager.getSymbol!(FunctionType)(ModuleName, ProcName);
 return m_funcPtr(args);
 }
}



void main()
{
 DllImport!("user32.dll", "MessageBoxA",
 int function(HWND hWnd, LPCSTR lpText, LPCSTR lpCaption, UINT uType)) MessageBox;
 MessageBox(null, "Text", "Title", MB_OK);
}