Mixed-mode assembly support in Mono

[Kornél Pál]

Hi,

I have recently committed required changes to Mono SVN repository as 
r102052.

Now Mono has mixed-mode assembly support on Windows. These is no full MSVCRT 
support because that heavily depends on the unmanaged API of .NET Framework 
but programs compiled using Microsoft Visual C++ and not using MSVCRT should 
be supported. Even exporting functions in managed DLLs is supported that is 
supported by ildasm.exe and ilasm.exe as well.

When the process is created using mono.exe there are some limitations for 
executable assemblies but with a custom mscoree.dll Mono has full support to 
create processes from managed executables.

The attached mscoree.c is the source code for a custom mscoree.dll that uses 
Mono for creating processes from executables. I think that you should 
incorporate this into your mscoree.dll. Also note that you should only 
provide not implemented stubs in your mscoree.dll and implement missing 
functionality in Mono's coree.c if required.

mscoree.c and 
http://anonsvn.mono-project.com/viewcvs/trunk/mono/mono/metadata/coree.c 
contains some comments about managed module support in ntdll.dll and 
msvcrt.dll of XP and later. If someone volunteers this could be implemented 
in Wine as well.

Kornél 
#define WINVER 0x0500
#define _WIN32_WINNT 0x0500
#define _WIN32_IE 0x0501
#define UNICODE
#define _UNICODE
#include <windows.h>

#define STATUS_SUCCESS 0x00000000L
#define STATUS_INVALID_IMAGE_FORMAT 0xC000007BL

typedef HRESULT (STDAPICALLTYPE *MONOFIXUPCOREE)(HMODULE);

static HMODULE g_hMono;

STDAPI _CorValidateImage(PVOID *ImageBase, LPCWSTR FileName);
STDAPI stub_CorValidateImage(PVOID *ImageBase, LPCWSTR FileName);
static PVOID g_CorValidateImage = stub_CorValidateImage;

BOOL APIENTRY DllMain(HMODULE hModule, DWORD dwReason, LPVOID lpReserved)
{
        MONOFIXUPCOREE MonoFixupCorEE;
        PVOID new_CorValidateImage;

        switch (dwReason)
        {
        case DLL_PROCESS_ATTACH:
                DisableThreadLibraryCalls(hModule);
                g_hMono = LoadLibrary(L"C:\\Program 
Files\\Mono\\bin\\mono.dll");
                if (g_hMono == NULL)
                        return FALSE;
                MonoFixupCorEE = (MONOFIXUPCOREE)GetProcAddress(g_hMono, 
"MonoFixupCorEE");
                if (MonoFixupCorEE == NULL || 
!SUCCEEDED(MonoFixupCorEE(hModule)))
                        return FALSE;
                /* GetProcAddress on _CorValidateImage is called by ntdll.dll 
before DllMain in processes created from managed executables. */
                new_CorValidateImage = GetProcAddress(hModule, 
"_CorValidateImage");
                if (new_CorValidateImage != &_CorValidateImage)
                        g_CorValidateImage = new_CorValidateImage;
                break;
        case DLL_PROCESS_DETACH:
                if (g_hMono != NULL)
                        FreeLibrary(g_hMono);
                break;
        }
        return TRUE;
}

BOOL STDMETHODCALLTYPE _CorDllMain(HINSTANCE hInst, DWORD dwReason, LPVOID 
lpReserved)
{
        switch (dwReason)
        {
        case DLL_PROCESS_ATTACH:
                DisableThreadLibraryCalls(hInst);
                break;
        }
        return TRUE;
}

__int32 STDMETHODCALLTYPE _CorExeMain()
{
        return 0;
}

STDAPI stub_CorValidateImage(PVOID *ImageBase, LPCWSTR FileName)
{
        return STATUS_SUCCESS;
}

__declspec(naked) STDAPI _CorValidateImage(PVOID *ImageBase, LPCWSTR FileName)
{
        __asm jmp g_CorValidateImage;
}

STDAPI_(VOID) _CorImageUnloading(PVOID ImageBase)
{
}

void STDMETHODCALLTYPE CorExitProcess(int exitCode)
{
        ExitProcess(exitCode);
}