require "registry"

local function is_dotnet_installed()
	return fs.exists(fs.get(fs.DIR_SYSTEM) / "MSCorEE.dll")
end

local function is_dotnet_version_20_installed()
	local reg = registry.open [[HKEY_LOCAL_MACHINE\Software\Microsoft\NET Framework Setup\NDP\v2.0.50727]]
	local value = reg["Install"]
	return value and (value ~= 0)
end

local function is_dotnet_version_35_installed()
	local reg = registry.open [[HKEY_LOCAL_MACHINE\Software\Microsoft\NET Framework Setup\NDP\v3.5]]
	local value = reg["Install"]
	return value and (value ~= 0)
end

dotnet = {}

function dotnet:load (path, entry)
    local suc, res = pcall(
		function()
			return clr.object(path, entry)
		end
	)
    if suc then
        return res
    else
        return nil, res
    end
end

function dotnet:call (obj, name)
	if not self.initialized then
		return nil
	end
	
    local suc, res = pcall(
		function()
			return obj:call(name)
		end
	)
    if suc then
        return res
    else
        return nil, res
    end
end

function dotnet:initialize ()	
	if not self.initialized then
		if not is_dotnet_installed() then
			log.error("Current platform does not support .net")
			return false
		end
		
		local success, err = pcall(require, "clr")
		if not success then
			log.error("Failed to load .net components")
			return false
		end
		log.debug(".net component loaded successfully.")
		self.initialized = true
	end
	return true
end

dotnet:initialize()