/* Fission - Portable Fusion (.NET) Implementation
 * Copyright (C) 2001-2002  Jay Freeman (saurik)
*/

/*
 *        Redistribution and use in source and binary
 * forms, with or without modification, are permitted
 * provided that the following conditions are met:
 * 
 * 1. Redistributions of source code must retain the
 *    above copyright notice, this list of conditions
 *    and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the
 *    above copyright notice, this list of conditions
 *    and the following disclaimer in the documentation
 *    and/or other materials provided with the
 *    distribution.
 * 3. The name of the author may not be used to endorse
 *    or promote products derived from this software
 *    without specific prior written permission.
 * 
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS''
 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING,
 * BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
 * MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE
 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
 * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
 * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR
 * TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN
 * ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
 * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
*/

#include "stdafx.h"

#include "menes-com/IRegistrar.h"
#include "menes-com/Factory.h"

#include "fission/fission.h"

BOOL APIENTRY DllMain(HANDLE hModule, DWORD ul_reason_for_call, LPVOID lpReserved) {
	switch (ul_reason_for_call) {
		case DLL_PROCESS_ATTACH:
		case DLL_THREAD_ATTACH:
		case DLL_THREAD_DETACH:
		case DLL_PROCESS_DETACH:
		break;
	} return TRUE;
}

namespace Fission {
	FISSION_API std::wstring Locate(wcstr_t name) {
		wchar_t dir[MAX_PATH+1];
		dir[MAX_PATH] = L'\0';
		::GetWindowsDirectory(dir, MAX_PATH);

		std::wstring path(dir);
		path += L"\\Microsoft.NET\\Framework\\";

		{
			HKEY inproc;
			DWORD length(0);

			::RegOpenKeyEx(HKEY_CLASSES_ROOT, L"CLSID\\{005023CA-72B1-11D3-9FC4-00C04F79A0A3}\\InprocServer32", NULL, KEY_READ, &inproc);
				::RegQueryValueEx(inproc, L"RuntimeVersion", NULL, NULL, NULL, &length);
				wstr_t version = new wchar_t[length];
				::RegQueryValueEx(inproc, L"RuntimeVersion", NULL, NULL, (PBYTE) version, &length);
			::RegCloseKey(inproc);

			path += version;
			delete [] version;
		}

		path += L"\\";
		path += name;
		path += L".dll";
		return path;
	}
}