local screen = require("Screen")
local filesystem = require("Filesystem")
local image = require("Image")
local color = require("Color")
local keyboard = require("Keyboard")
local event = require("Event")
local GUI = require("GUI")
local paths = require("Paths")
local text = require("Text")

--------------------------------------------------------------------------------

local system = {}

local iconImageWidth = 8
local iconImageHeight = 4
local iconCache = {}

local bootUptime = computer.uptime()
local dateUptime = bootUptime
local screensaverUptime = bootUptime

local user
local iconHalfWidth
local iconTextHeight
local iconImageHorizontalOffset
local bootRealTime

local workspace
local windowsContainer
local dockContainer
local desktopMenu
local desktopMenuLayout
local desktopIconField
local desktopBackground
local desktopBackgroundColor = 0x1E1E1E
local desktopBackgroundWallpaper
local desktopBackgroundWallpaperX
local desktopBackgroundWallpaperY

--------------------------------------------------------------------------------

-- Returns real timestamp in seconds
function system.getTime()
	return bootRealTime + computer.uptime() + system.properties.timeTimezone
end

-- Returns currently logged in user
function system.getUser()
	return user
end

--------------------------------------------------------------------------------

function system.saveProperties()
	filesystem.writeTable(paths.user.properties, system.properties, true)
end

function system.getCurrentScript()
	local info
	for runLevel = 0, math.huge do
		info = debug.getinfo(runLevel)
		if info then
			if info.what == "main" then
				return info.source:sub(2, -1)
			end
		else
			error("Failed to get debug info for runlevel " .. runLevel)
		end
	end
end

function system.getLocalization(pathToLocalizationFolder)
	local required, english = pathToLocalizationFolder .. system.properties.localizationLanguage .. ".lang", pathToLocalizationFolder .. "English.lang"
	
	-- First trying to return required localization
	if filesystem.exists(required) then
		return filesystem.readTable(required)
	-- Otherwise maybe english localization exists?
	elseif filesystem.exists(english) then
		return filesystem.readTable(english)
	-- Otherwise returning first available localization
	else
		local list = filesystem.list(pathToLocalizationFolder)
		if #list > 0 then
			return filesystem.readTable(pathToLocalizationFolder .. list[1])
		else
			error("Failed to get localization: directory is empty")
		end
	end
end

function system.getCurrentScriptLocalization()
	return system.getLocalization(filesystem.path(system.getCurrentScript()) .. "Localizations/")
end

function system.getTemporaryPath()
	local temporaryPath
	repeat
		temporaryPath = paths.system.temporary .. string.format("%08X", math.random(0xFFFFFFFF))
	until not filesystem.exists(temporaryPath)

	return temporaryPath
end

function system.createShortcut(where, forWhat)
	filesystem.makeDirectory(filesystem.path(where))
	filesystem.write(where, forWhat)
end

function system.parseArguments(...)
	local arguments, options = {...}, {}
	local i = 1
	while i <= #arguments do
		local option = arguments[i]:match("^%-+(.+)")
		if option then
			options[option] = true
			table.remove(arguments, i)
		end

		i = i + 1
	end

	return arguments, options
end

function system.readShortcut(path)
	local data, reason = filesystem.read(path)
	if data then
		return data
	else
		error("Failed to read shortcut \"" .. tostring(path) .. "\": " .. tostring(reason))
	end
end

function system.call(method, ...)
	local args = {...}
	local function launchMethod()
		method(table.unpack(args))
	end

	local function tracebackMethod(xpcallTraceback)
		local traceback, info, firstMatch = tostring(xpcallTraceback) .. "\n" .. debug.traceback()
		for runLevel = 0, math.huge do
			info = debug.getinfo(runLevel)
			if info then
				if (info.what == "main" or info.what == "Lua") and info.source ~= "=machine" then
					if firstMatch then
						return {
							path = info.source:sub(2, -1),
							line = info.currentline,
							traceback = traceback
						}
					else
						firstMatch = true
					end
				end
			else
				error("Failed to get debug info for runlevel " .. runLevel)
			end
		end
	end
	
	local xpcallSuccess, xpcallReason = xpcall(launchMethod, tracebackMethod)
	if type(xpcallReason) == "string" or type(xpcallReason) == "nil" then
		xpcallReason = {
			path = paths.system.libraries .. "System.lua",
			line = 1,
			traceback = "system fatal error: " .. tostring(xpcallReason)
		}
	end

	if not xpcallSuccess and not xpcallReason.traceback:match("^table") and not xpcallReason.traceback:match("interrupted") then
		return false, xpcallReason.path, xpcallReason.line, xpcallReason.traceback
	end

	return true
end

function system.setPackageUnloading(value)
	local metatable = getmetatable(package.loaded)

	if value then
		if metatable then
			metatable.__mode = "v"
		else
			setmetatable(package.loaded, {__mode = "v"})
		end
	else
		if metatable then
			metatable.__mode = nil

			for key in pairs(metatable) do
				return
			end
			
			setmetatable(package.loaded, nil)
		end
	end
end

--------------------------------------------------------------------------------

local iconLaunchers = {
	application = function(icon)
		system.execute(icon.path .. "Main.lua")
	end,

	directory = function(icon)
		icon.parent.parent:setWorkpath(icon.path)
	end,

	shortcut = function(icon)
		local oldPath = icon.path
		icon.path = icon.shortcutPath
		icon:shortcutLaunch()
		icon.path = oldPath
	end,

	corrupted = function(icon)
		GUI.alert("Application is corrupted")
	end,

	extension = function(icon)
		if icon.isShortcut then
			system.execute(system.properties.extensions[icon.shortcutExtension].launcher, icon.shortcutPath, "-o")
		else
			system.execute(system.properties.extensions[icon.extension].launcher, icon.path, "-o")
		end
	end,

	script = function(icon)
		system.execute(icon.path)
	end,

	showPackageContent = function(icon)
		icon.parent.parent:setWorkpath(icon.path)
		icon.parent.parent:updateFileList()
		
		workspace:draw()
	end,

	showContainingFolder = function(icon)
		icon.parent.parent:setWorkpath(filesystem.path(icon.shortcutPath))
		icon.parent.parent:updateFileList()
		
		workspace:draw()
	end,
}

function system.calculateIconProperties()
	iconHalfWidth = math.floor(system.properties.iconWidth / 2)
	iconTextHeight = system.properties.iconHeight - iconImageHeight - 1
	iconImageHorizontalOffset = math.floor(iconHalfWidth - iconImageWidth / 2)
end

function system.updateIconProperties()
	desktopIconField:deleteIconConfig()
	dockContainer.sort()

	computer.pushSignal("system", "updateFileList")
end

function system.cacheIcon(name, path)
	if not iconCache[name] then
		iconCache[name] = image.load(path)
	end
	
	return iconCache[name]
end

local function drawSelection(x, y, width, height, color, transparency)
	screen.drawText(x, y, color, string.rep("▄", width), transparency)
	screen.drawText(x, y + height - 1, color, string.rep("▀", width), transparency)
	screen.drawRectangle(x, y + 1, width, height - 2, color, 0x0, " ", transparency)
end

local function iconDraw(icon)
	local selectionTransparency = system.properties.interfaceTransparencyEnabled and 0.5
	local name = system.properties.filesShowExtension and icon.name or icon.nameWithoutExtension
	local xCenter, yText = icon.x + iconHalfWidth, icon.y + iconImageHeight + 1

	local function iconDrawNameLine(y, line)
		local lineLength = unicode.len(line)
		local x = math.floor(xCenter - lineLength / 2)
		
		if icon.selected then
			screen.drawRectangle(x, y, lineLength, 1, icon.colors.selection, 0x0, " ", selectionTransparency)
		end
		screen.drawText(x, y, icon.colors.text, line)
	end

	local charIndex = 1
	for lineIndex = 1, iconTextHeight do
		if lineIndex < iconTextHeight then
			iconDrawNameLine(yText, unicode.sub(name, charIndex, charIndex + icon.width - 1))
			charIndex, yText = charIndex + icon.width, yText + 1
		else
			iconDrawNameLine(yText, text.limit(unicode.sub(name, charIndex, -1), icon.width, "center"))
		end
	end

	local xImage = icon.x + iconImageHorizontalOffset
	if icon.selected then
		drawSelection(xImage - 1, icon.y - 1, iconImageWidth + 2, iconImageHeight + 2, icon.colors.selection, selectionTransparency)
	end

	if icon.image then
		if icon.cut then
			if not icon.semiTransparentImage then
				icon.semiTransparentImage = image.copy(icon.image)
				for i = 1, #icon.semiTransparentImage[3] do
					icon.semiTransparentImage[5][i] = icon.semiTransparentImage[5][i] + 0.6
					if icon.semiTransparentImage[5][i] > 1 then
						icon.semiTransparentImage[5][i] = 1
					end
				end
			end
			
			screen.drawImage(xImage, icon.y, icon.semiTransparentImage, true)
		else
			screen.drawImage(xImage, icon.y, icon.image)
		end
	elseif icon.liveImage then
		icon.liveImage(xImage, icon.y)
	end

	local xShortcut = xImage + iconImageWidth
	if icon.isShortcut then
		screen.set(xShortcut - 1, icon.y + iconImageHeight - 1, 0xFFFFFF, 0x0, "<")
	end

	if icon.windows then
		screen.drawText(xCenter - 1, icon.y + iconImageHeight, 0x66DBFF, "╺╸")
		
		if icon.windowCount > 1 then
			local windowCount = tostring(icon.windowCount)
			local windowCountLength = #windowCount
			local xTip, yTip = xShortcut - windowCountLength, icon.y

			screen.drawRectangle(xTip, yTip, windowCountLength, 1, 0xFF4940, 0xFFFFFF, " ")
			screen.drawText(xTip, yTip, 0xFFFFFF, windowCount)
			screen.drawText(xTip - 1, yTip, 0xFF4940, "⢸")
			screen.drawText(xTip + windowCountLength, yTip, 0xFF4940, "⡇")
			screen.drawText(xTip, yTip - 1, 0xFF4940, string.rep("⣀", windowCountLength))
			screen.drawText(xTip, yTip + 1, 0xFF4940, string.rep("⠉", windowCountLength))
		end
	end
end

local function iconFieldSaveIconPosition(iconField, filename, x, y)
	if iconField.iconConfigEnabled then
		iconField.iconConfig[filename] = { x = x, y = y }
		iconField:saveIconConfig()
	end
end

local function iconFieldIconEventHandler(workspace, object, e1, e2, e3, e4, e5, ...)
	if e1 == "touch" and object:isPointInside(e3, e4) then
		object.lastTouchPosition = object.lastTouchPosition or {}
		object.lastTouchPosition.x, object.lastTouchPosition.y = e3, e4
		object:moveToFront()

		if e5 == 0 then
			object.parent.parent.onLeftClick(object, e1, e2, e3, e4, e5, ...)
		else
			object.parent.parent.onRightClick(object, e1, e2, e3, e4, e5, ...)
		end
	elseif e1 == "double_touch" and object:isPointInside(e3, e4) and e5 == 0 then
		object.parent.parent.onDoubleClick(object, e1, e2, e3, e4, e5, ...)
	elseif e1 == "drag" and object.parent.parent.iconConfigEnabled and object.lastTouchPosition then
		-- Ебучие авторы мода, ну на кой хуй было делать drop-ивент без наличия drag? ПИДОРЫ
		object.dragStarted = true
		object.localX = object.localX + e3 - object.lastTouchPosition.x
		object.localY = object.localY + e4 - object.lastTouchPosition.y
		object.lastTouchPosition.x, object.lastTouchPosition.y = e3, e4

		workspace:draw()
	elseif e1 == "drop" and object.dragStarted then
		object.dragStarted = nil
		object.lastTouchPosition = nil

		iconFieldSaveIconPosition(
			object.parent.parent,
			object.name .. (object.isDirectory and "/" or ""),
			object.localX,
			object.localY
		)
	end
end

local function iconAnalyseExtension(icon, launchers)
	if icon.isDirectory then
		if icon.extension == ".app" then
			if system.properties.filesShowApplicationIcon then
				if filesystem.exists(icon.path .. "Icon.pic") then
					icon.image = image.load(icon.path .. "Icon.pic")
				elseif filesystem.exists(icon.path .. "Icon.lua") then
					local result, reason = loadfile(icon.path .. "Icon.lua")
					if result then
						result, reason = pcall(result)
						if result then
							icon.liveImage = reason
						else
							error("Failed to load live icon image: " .. tostring(reason))
						end
					else
						error("Failed to load live icon image: " .. tostring(reason))
					end
				else
					icon.image = iconCache.fileNotExists
				end
			else
				icon.image = iconCache.application
			end

			icon.launch = launchers.application
		else
			icon.image = iconCache.directory
			icon.launch = launchers.directory
		end
	else
		if icon.extension == ".lnk" then
			icon.shortcutPath = system.readShortcut(icon.path)
			icon.shortcutExtension = filesystem.extension(icon.shortcutPath)
			icon.shortcutIsDirectory = filesystem.isDirectory(icon.shortcutPath)
			icon.isShortcut = true

			local shortcutIcon = iconAnalyseExtension(
				{
					path = icon.shortcutPath,
					extension = icon.shortcutExtension,
					name = icon.name,
					nameWithoutExtension = icon.nameWithoutExtension,
					isDirectory = icon.shortcutIsDirectory,
					iconImage = icon.iconImage,
				},
				launchers
			)

			icon.image = shortcutIcon.image
			icon.shortcutLaunch = shortcutIcon.launch
			icon.launch = launchers.shortcut
		elseif not filesystem.exists(icon.path) then
			icon.image = iconCache.fileNotExists
			icon.launch = launchers.corrupted
		else
			if system.properties.extensions[icon.extension] then
				icon.launch = launchers.extension
				icon.image = system.cacheIcon(icon.extension, system.properties.extensions[icon.extension].icon)
			else
				icon.launch = launchers.script
				icon.image = iconCache.script
			end
		end
	end

	return icon
end

local function iconIsPointInside(icon, x, y)
	return
		x >= icon.x + iconImageHorizontalOffset and
		y >= icon.y and
		x <= icon.x + iconImageHorizontalOffset + iconImageWidth - 1 and
		y <= icon.y + iconImageHeight - 1
		or
		x >= icon.x and 
		y >= icon.y + iconImageHeight + 1 and
		x <= icon.x + system.properties.iconWidth - 1 and
		y <= icon.y + system.properties.iconHeight - 1
end

function system.icon(x, y, path, textColor, selectionColor)
	local icon = GUI.object(x, y, system.properties.iconWidth, system.properties.iconHeight)
	
	icon.colors = {
		text = textColor,
		selection = selectionColor
	}

	icon.path = path
	icon.extension = filesystem.extension(icon.path)
	icon.name = filesystem.name(path)
	icon.nameWithoutExtension = filesystem.hideExtension(icon.name)
	icon.isDirectory = filesystem.isDirectory(icon.path)
	icon.isShortcut = false
	icon.selected = false

	icon.isPointInside = iconIsPointInside
	icon.draw = iconDraw
	icon.analyseExtension = iconAnalyseExtension

	return icon
end

local function iconFieldUpdate(iconField)
	iconField.backgroundObject.width, iconField.backgroundObject.height = iconField.width, iconField.height
	iconField.iconsContainer.width, iconField.iconsContainer.height = iconField.width, iconField.height

	iconField.iconCount.horizontal = math.floor((iconField.width - iconField.xOffset) / (system.properties.iconWidth + system.properties.iconHorizontalSpace))
	iconField.iconCount.vertical = math.floor((iconField.height - iconField.yOffset) / (system.properties.iconHeight + system.properties.iconVerticalSpace))
	iconField.iconCount.total = iconField.iconCount.horizontal * iconField.iconCount.vertical

	return iconField
end

local function iconFieldLoadIconConfig(iconField)
	local configPath = iconField.workpath .. ".icons"
	if filesystem.exists(configPath) then
		iconField.iconConfig = filesystem.readTable(configPath)
	else
		iconField.iconConfig = {}
	end
end

local function iconFieldSaveIconConfig(iconField)
	filesystem.writeTable(iconField.workpath .. ".icons", iconField.iconConfig)
end

local function iconFieldDeleteIconConfig(iconField)
	iconField.iconConfig = {}
	filesystem.remove(iconField.workpath .. ".icons", iconField.iconConfig)
end

--------------------------------------------------------------------------------

local function addBackgroundContainerInput(parent, ...)
	return parent:addChild(GUI.input(1, 1, 36, 3, 0xE1E1E1, 0x696969, 0x969696, 0xE1E1E1, 0x2D2D2D, ...))
end

local function addBackgroundContainerWithInput(inputText, title, placeholder)
	local container = GUI.addBackgroundContainer(workspace, true, true, title)
	
	container.input = addBackgroundContainerInput(container.layout, inputText, placeholder, false)
	container.label = container.layout:addChild(GUI.label(1, 1, 36, 1, 0xFF4940, system.localization.file .. " " .. system.localization.alreadyExists)):setAlignment(GUI.ALIGNMENT_HORIZONTAL_CENTER, GUI.ALIGNMENT_VERTICAL_TOP)
	container.label.hidden = true

	return container
end

local function checkFileToExists(container, path)
	if filesystem.exists(path) then
		container.label.hidden = false
		container.parent:draw()
	else
		container:remove()
		return true
	end
end

local function getCykaIconPosition(iconField)
	local y = iconField.yOffset
	for i = 1, #iconField.iconsContainer.children do
		y = math.max(y, iconField.iconsContainer.children[i].localY)
	end

	local x = iconField.xOffset
	for i = 1, #iconField.iconsContainer.children do
		if iconField.iconsContainer.children[i].localY == y then
			x = math.max(x, iconField.iconsContainer.children[i].localX)
		end
	end

	x = x + system.properties.iconWidth + system.properties.iconHorizontalSpace
	if x + system.properties.iconWidth + system.properties.iconHorizontalSpace > iconField.iconsContainer.width then
		x, y = iconField.xOffset, y + system.properties.iconHeight + system.properties.iconVerticalSpace
	end

	return x, y
end

local function iconOnLeftClick(icon)
	if not keyboard.isKeyDown(29) and not keyboard.isKeyDown(219) then
		icon.parent.parent:deselectAll()
	end
	icon.selected = true

	workspace:draw()
end

local function iconOnDoubleClick(icon)
	icon:launch()
	icon.selected = false

	workspace:draw()
end

local function iconOnRightClick(icon, e1, e2, e3, e4)
	icon.selected = true
	workspace:draw()

	local selectedIcons = icon.parent.parent:getSelectedIcons()

	local contextMenu = GUI.addContextMenu(workspace, e3, e4)
	
	contextMenu.onMenuClosed = function()
		icon.parent.parent:deselectAll()
		workspace:draw()
	end

	if #selectedIcons == 1 then
		if icon.isDirectory then
			if icon.extension == ".app" then
				contextMenu:addItem(system.localization.showPackageContent).onTouch = function()
					icon.parent.parent.launchers.showPackageContent(icon)
				end		

				contextMenu:addItem(system.localization.launchWithArguments).onTouch = function()
					local container = addBackgroundContainerWithInput("", system.localization.launchWithArguments)

					container.panel.eventHandler = function(workspace, object, e1)
						if e1 == "touch" then
							local args = {}
							if container.input.text then
								for arg in container.input.text:gmatch("[^%s]+") do
									table.insert(args, arg)
								end
							end

							container:remove()
							system.execute(icon.path .. "Main.lua", table.unpack(args))
							workspace:draw()
						end
					end

					workspace:draw()
				end

				contextMenu:addItem(system.localization.edit .. " Main.lua").onTouch = function()
					system.execute(paths.system.applicationMineCodeIDE, icon.path .. "Main.lua")
				end

				contextMenu:addSeparator()
			end

			if icon.extension ~= ".app" then
				contextMenu:addItem(system.localization.addToFavourites).onTouch = function()
					local container = GUI.addBackgroundContainer(workspace, true, true, system.localization.addToFavourites)

					local input = addBackgroundContainerInput(container.layout, icon.name, system.localization.name)
					container.panel.eventHandler = function(workspace, object, e1)
						if e1 == "touch" then
							container:remove()

							if e1 == "touch" and #input.text > 0 then
								computer.pushSignal("Finder", "updateFavourites", {name = input.text, path = icon.path})
							else
								workspace:draw()
							end
						end
					end					
			 	end
			end
		else
			if icon.isShortcut then
				contextMenu:addItem(system.localization.editShortcut).onTouch = function()
					local text = system.readShortcut(icon.path)
					local container = addBackgroundContainerWithInput(text, system.localization.editShortcut, system.localization.rename)

					container.input.onInputFinished = function()
						if filesystem.exists(container.input.text) then
							system.createShortcut(icon.path, container.input.text)
							container:remove()
							computer.pushSignal("system", "updateFileList")
						else
							container.label.text = system.localization.shortcutIsCorrupted
							container.label.hidden = false

							workspace:draw()
						end
					end

					workspace:draw()
				end

				contextMenu:addItem(system.localization.showContainingFolder).onTouch = function()
					icon.parent.parent.launchers.showContainingFolder(icon)
				end

				contextMenu:addSeparator()
			else				
				if system.properties.extensions[icon.extension] and system.properties.extensions[icon.extension].contextMenu then
					local success, reason = pcall(loadfile(system.properties.extensions[icon.extension].contextMenu), workspace, icon, contextMenu)
					if success then
						contextMenu:addSeparator()
					else
						GUI.alert("Failed to load extension association: " .. tostring(reason))
					end
				else
					contextMenu:addItem(system.localization.edit).onTouch = function()
						system.execute(paths.system.applicationMineCodeIDE, icon.path)
					end

					contextMenu:addSeparator()
				end

				-- local subMenu = contextMenu:addSubMenu(system.localization.openWith)
				-- local fileList = filesystem.sortedList(paths.system.applications, "name")
				-- subMenu:addItem(system.localization.select)
				-- subMenu:addSeparator()
				-- for i = 1, #fileList do
				-- 	subMenu:addItem(fileList[i].nameWithoutExtension)
				-- end
			end
		end
	end

	if #selectedIcons > 1 then
		contextMenu:addItem(system.localization.newFolderFromChosen .. " (" .. #selectedIcons .. ")").onTouch = function()
			local container = addBackgroundContainerWithInput("", system.localization.newFolderFromChosen .. " (" .. #selectedIcons .. ")", system.localization.folderName)

			container.input.onInputFinished = function()
				local path = filesystem.path(selectedIcons[1].path) .. container.input.text
				if checkFileToExists(container, path) then
					filesystem.makeDirectory(path)
					
					for i = 1, #selectedIcons do
						filesystem.rename(selectedIcons[i].path, path .. "/" .. selectedIcons[i].name)
					end

					iconFieldSaveIconPosition(icon.parent.parent, container.input.text, e3, e4)
					computer.pushSignal("system", "updateFileList")
				end
			end

			workspace:draw()
		end

		contextMenu:addSeparator()
	end

	contextMenu:addItem(system.localization.archive .. (#selectedIcons > 1 and " (" .. #selectedIcons .. ")" or "")).onTouch = function()
		local itemsToArchive = {}
		for i = 1, #selectedIcons do
			table.insert(itemsToArchive, selectedIcons[i].path)
		end

		local success, reason = require("Archive").pack(filesystem.path(icon.path) .. "/Archive.arc", itemsToArchive)
		if not success then
			GUI.alert(reason)
		end

		computer.pushSignal("system", "updateFileList")
	end

	local function cutOrCopy(cut)
		for i = 1, #icon.parent.children do
			icon.parent.children[i].cut = nil
		end

		system.clipboard = {cut = cut}
		for i = 1, #selectedIcons do
			selectedIcons[i].cut = cut
			table.insert(system.clipboard, selectedIcons[i].path)
		end
	end

	contextMenu:addItem(system.localization.cut).onTouch = function()
		cutOrCopy(true)
	end

	contextMenu:addItem(system.localization.copy).onTouch = function()
		cutOrCopy()
	end

	if not icon.isShortcut or #selectedIcons > 1 then
		local subMenu = contextMenu:addSubMenu(system.localization.createShortcut)
		
		subMenu:addItem(system.localization.inCurrentDirectory).onTouch = function()
			for i = 1, #selectedIcons do
				if not selectedIcons[i].isShortcut then
					system.createShortcut(
						filesystem.path(selectedIcons[i].path) .. "/" .. selectedIcons[i].nameWithoutExtension .. ".lnk",
						selectedIcons[i].path
					)
				end
			end
			
			computer.pushSignal("system", "updateFileList")
		end

		subMenu:addItem(system.localization.onDesktop).onTouch = function()
			for i = 1, #selectedIcons do
				if not selectedIcons[i].isShortcut then
					system.createShortcut(
						paths.user.desktop .. "/" .. selectedIcons[i].nameWithoutExtension .. ".lnk",
						selectedIcons[i].path
					)
				end
			end
			
			computer.pushSignal("system", "updateFileList")
		end
	end

	if #selectedIcons == 1 then
		contextMenu:addItem(system.localization.rename).onTouch = function()
			local container = addBackgroundContainerWithInput(filesystem.name(icon.path), system.localization.rename, system.localization.newName)

			container.input.onInputFinished = function()
				if checkFileToExists(container, filesystem.path(icon.path) .. container.input.text) then
					filesystem.rename(icon.path, filesystem.path(icon.path) .. container.input.text)
					computer.pushSignal("system", "updateFileList")
				end
			end

			workspace:draw()
		end
	end

	contextMenu:addItem(system.localization.delete).onTouch = function()
		for i = 1, #selectedIcons do
			if filesystem.path(selectedIcons[i].path) == paths.user.trash then
				filesystem.remove(selectedIcons[i].path)
			else
				local newName = paths.user.trash .. selectedIcons[i].name
				local clearName = selectedIcons[i].nameWithoutExtension
				local repeats = 1
				while filesystem.exists(newName) do
					newName, repeats = paths.user.trash .. clearName .. string.rep("-copy", repeats) .. selectedIcons[i].extension, repeats + 1
				end
				filesystem.rename(selectedIcons[i].path, newName)
			end
		end

		computer.pushSignal("system", "updateFileList")
	end

	contextMenu:addSeparator()

	if #selectedIcons == 1 then
		contextMenu:addItem(system.localization.addToDock).onTouch = function()
			dockContainer.addIcon(icon.path).keepInDock = true
			dockContainer.saveProperties()
		end
	end

	contextMenu:addItem(system.localization.properties).onTouch = function()
		for i = 1, #selectedIcons do
			system.addPropertiesWindow(e3, e4, 46, selectedIcons[i])
		end
	end

	workspace:draw()
end

local function iconFieldUpdateFileList(iconField)
	local list, reason = filesystem.list(iconField.workpath, system.properties.filesSortingMethod)
	if list then
		iconField.fileList = list

		local i = 1
		while i <= #iconField.fileList do
			if
				(
					not system.properties.filesShowHidden and
					filesystem.isHidden(iconField.fileList[i])
				)
				or
				(
					iconField.filenameMatcher and
					not unicode.lower(iconField.fileList[i]):match(iconField.filenameMatcher)
				)
			then
				table.remove(iconField.fileList, i)
			else
				i = i + 1
			end
		end

		iconField:update()

		if iconField.iconConfigEnabled then
			iconField:loadIconConfig()
		end
		
		local configList, notConfigList = {}, {}
		for i = iconField.fromFile, iconField.fromFile + iconField.iconCount.total - 1 do
			if iconField.fileList[i] then
				if iconField.iconConfigEnabled and iconField.iconConfig[iconField.fileList[i]] then
					table.insert(configList, iconField.fileList[i])
				else
					table.insert(notConfigList, iconField.fileList[i])
				end
			else
				break
			end
		end

		local function checkClipboard(icon)
			if system.clipboard and system.clipboard.cut then
				for i = 1, #system.clipboard do
					if system.clipboard[i] == icon.path then
						icon.cut = true
					end
				end
			end
		end

		-- Заполнение дочернего контейнера
		iconField.iconsContainer:removeChildren()
		for i = 1, #configList do
			local icon = iconField.iconsContainer:addChild(system.icon(
				iconField.iconConfig[configList[i]].x,
				iconField.iconConfig[configList[i]].y,
				iconField.workpath .. configList[i],
				iconField.colors.text,
				iconField.colors.selection
			))

			checkClipboard(icon)
			icon.eventHandler = iconFieldIconEventHandler
			icon:analyseExtension(iconField.launchers)
		end

		local x, y
		if #configList > 0 then
			x, y = getCykaIconPosition(iconField, configList)
		else
			x, y = iconField.xOffset, iconField.yOffset
		end

		for i = 1, #notConfigList do
			local icon = iconField.iconsContainer:addChild(system.icon(x, y, iconField.workpath .. notConfigList[i], iconField.colors.text, iconField.colors.selection))
			iconField.iconConfig[notConfigList[i]] = {x = x, y = y}

			checkClipboard(icon)
			icon.eventHandler = iconFieldIconEventHandler
			icon:analyseExtension(iconField.launchers)

			x = x + system.properties.iconWidth + system.properties.iconHorizontalSpace
			if x + system.properties.iconWidth + system.properties.iconHorizontalSpace - 1 > iconField.iconsContainer.width then
				x, y = iconField.xOffset, y + system.properties.iconHeight + system.properties.iconVerticalSpace
			end
		end

		if iconField.iconConfigEnabled then
			iconField:saveIconConfig()
		end
	else
		GUI.alert("Failed to update file list: " .. tostring(reason))
	end

	return iconField
end

local function iconFieldBackgroundObjectEventHandler(workspace, object, e1, e2, e3, e4, e5, ...)
	if e1 == "touch" then
		if e5 == 0 then
			object.parent:deselectAll()
			object.parent.selection = {
				x1 = e3,
				y1 = e4
			}

			workspace:draw()
		else
			local contextMenu = GUI.addContextMenu(workspace, e3, e4)

			local subMenu = contextMenu:addSubMenu(system.localization.create)

			subMenu:addItem(system.localization.newFile).onTouch = function()
				local container = addBackgroundContainerWithInput("", system.localization.newFile, system.localization.fileName)

				container.input.onInputFinished = function()
					local path = object.parent.workpath .. container.input.text
					if checkFileToExists(container, path) then
						filesystem.write(path, "")

						iconFieldSaveIconPosition(object.parent, container.input.text, e3, e4)
						system.execute(paths.system.applicationMineCodeIDE, path)
						computer.pushSignal("system", "updateFileList")
					end
				end

				workspace:draw()
			end
			
			subMenu:addItem(system.localization.newFolder).onTouch = function()
				local container = addBackgroundContainerWithInput("", system.localization.newFolder, system.localization.folderName)

				container.input.onInputFinished = function()
					local path = object.parent.workpath .. container.input.text
					if checkFileToExists(container, path) then
						filesystem.makeDirectory(path)
						iconFieldSaveIconPosition(object.parent, container.input.text .. "/", e4, e4)
						computer.pushSignal("system", "updateFileList")
					end
				end

				workspace:draw()
			end

			subMenu:addItem(system.localization.newImage).onTouch = function()
				local container = addBackgroundContainerWithInput("", system.localization.newImage, system.localization.fileName)

				local layout = container.layout:addChild(GUI.layout(1, 1, 36, 3, 1, 1))
				layout:setDirection(1, 1, GUI.DIRECTION_HORIZONTAL)
				layout:setSpacing(1, 1, 0)

				local widthInput = addBackgroundContainerInput(layout, "", "width")
				layout:addChild(GUI.text(1, 1, 0x696969, " x "))
				local heightInput = addBackgroundContainerInput(layout, "", "height")
				widthInput.width, heightInput.width = 16, 17

				container.panel.eventHandler = function(workspace, panel, e1)
					if e1 == "touch" then
						if
							#container.input.text > 0 and
							widthInput.text:match("%d+") and
							heightInput.text:match("%d+")
						then
							local imageName = filesystem.hideExtension(container.input.text) .. ".pic"
							local path = object.parent.workpath .. imageName

							if checkFileToExists(container, path) then
								image.save(path, image.create(
									tonumber(widthInput.text),
									tonumber(heightInput.text),
									0x0,
									0xFFFFFF,
									1,
									" "
								))

								iconFieldSaveIconPosition(object.parent, imageName, e3, e4)
								computer.pushSignal("system", "updateFileList")
							end
						end

						container:remove()
						workspace:draw()
					end
				end

				workspace:draw()
			end

			subMenu:addItem(system.localization.newFileFromURL, not component.isAvailable("internet")).onTouch = function()
				local container = addBackgroundContainerWithInput("", system.localization.newFileFromURL, system.localization.fileName)

				local inputURL = addBackgroundContainerInput(container.layout, "", "URL", false)
				
				container.panel.eventHandler = function(workspace, panel, e1)
					if e1 == "touch" then
						if #container.input.text > 0 and #inputURL.text > 0 then
							local path = object.parent.workpath .. container.input.text
							
							if filesystem.exists(path) then
								container.label.hidden = false
								workspace:draw()
							else
								container.layout:removeChildren(2)
								container.layout:addChild(GUI.label(1, 1, container.width, 1, 0x787878, system.localization.downloading .. "...")):setAlignment(GUI.ALIGNMENT_HORIZONTAL_CENTER, GUI.ALIGNMENT_VERTICAL_TOP)
								workspace:draw()

								local success, reason = require("Internet").download(inputURL.text, path)
								
								container:remove()

								if success then
									iconFieldSaveIconPosition(object.parent, container.input.text, e3, e4)
									computer.pushSignal("system", "updateFileList")
								else
									GUI.alert(reason)
									workspace:draw()
								end
							end
						else
							container:remove()
							workspace:draw()
						end
					end
				end

				workspace:draw()
			end

			subMenu:addSeparator()

			subMenu:addItem(system.localization.newApplication).onTouch = function()
				local container = addBackgroundContainerWithInput("", system.localization.newApplication, system.localization.applicationName)

				local filesystemChooser = container.layout:addChild(GUI.filesystemChooser(1, 1, 36, 3, 0xE1E1E1, 0x696969, 0x444444, 0x969696, nil, system.localization.open, system.localization.cancel, system.localization.iconPath, "/"))
				filesystemChooser:addExtensionFilter(".pic")
				filesystemChooser:moveBackward()
				
				container.panel.eventHandler = function(workspace, panel, e1)
					if e1 == "touch" then	
						if #container.input.text > 0 then
							local path = object.parent.workpath .. container.input.text .. ".app/"
							if checkFileToExists(container, path) then
								system.copy({ paths.system.applicationSample }, object.parent.workpath)
								filesystem.rename(object.parent.workpath .. filesystem.name(paths.system.applicationSample), path)

								container:remove()
								iconFieldSaveIconPosition(object.parent, container.input.text .. ".app/", e3, e4)
								computer.pushSignal("system", "updateFileList")
							end
						else
							container:remove()
							workspace:draw()
						end
					end
				end

				workspace:draw()
			end

			contextMenu:addSeparator()
						
			local subMenu = contextMenu:addSubMenu(system.localization.sortBy)
			
			local function setSortingMethod(sm)
				object.parent:deleteIconConfig()
				system.properties.filesSortingMethod = sm
				system.saveProperties()

				computer.pushSignal("system", "updateFileList")
			end

			subMenu:addItem(system.localization.sortByName).onTouch = function()
				setSortingMethod(filesystem.SORTING_NAME)
			end

			subMenu:addItem(system.localization.sortByDate).onTouch = function()
				setSortingMethod(filesystem.SORTING_DATE)
			end

			subMenu:addItem(system.localization.sortByType).onTouch = function()
				setSortingMethod(filesystem.SORTING_TYPE)
			end

			contextMenu:addItem(system.localization.sortAutomatically).onTouch = function()
				object.parent:deleteIconConfig()
				computer.pushSignal("system", "updateFileList")
			end

			contextMenu:addItem(system.localization.update).onTouch = function()
				computer.pushSignal("system", "updateFileList")
			end

			contextMenu:addSeparator()

			contextMenu:addItem(system.localization.paste, not system.clipboard).onTouch = function()
				local i = 1
				while i <= #system.clipboard do
					if filesystem.exists(system.clipboard[i]) then
						i = i + 1
					else
						table.remove(system.clipboard, i)
					end
				end

				system.copy(system.clipboard, object.parent.workpath)

				if system.clipboard.cut then
					for i = 1, #system.clipboard do
						filesystem.remove(system.clipboard[i])
					end

					system.clipboard = nil
				end

				computer.pushSignal("system", "updateFileList")
			end

			workspace:draw()
		end
	elseif e1 == "drag" then
		if object.parent.selection then
			object.parent.selection.x2, object.parent.selection.y2 = e3, e4
			object:moveToFront()

			workspace:draw()
		end
	elseif e1 == "drop" then
		object.parent.selection = nil
		object:moveToBack()

		workspace:draw()
	end
end

local function iconFieldBackgroundObjectDraw(object)
	if object.parent.selection and object.parent.selection.x2 then
		local x1, y1, x2, y2 = object.parent.selection.x1, object.parent.selection.y1, object.parent.selection.x2, object.parent.selection.y2

		if x2 < x1 then
			x1, x2 = x2, x1
		end

		if y2 < y1 then
			y1, y2 = y2, y1
		end
		
		if system.properties.interfaceTransparencyEnabled then	
			screen.drawRectangle(x1, y1, x2 - x1 + 1, y2 - y1 + 1, object.parent.colors.selection, 0x0, " ", 0.5)
		else
			screen.drawFrame(x1, y1, x2 - x1 + 1, y2 - y1 + 1, object.parent.colors.selection)
		end

		for i = 1, #object.parent.iconsContainer.children do
			local xCenter, yCenter = object.parent.iconsContainer.children[i].x + system.properties.iconWidth / 2, object.parent.iconsContainer.children[i].y + system.properties.iconHeight / 2
			object.parent.iconsContainer.children[i].selected = 
				xCenter >= x1 and
				xCenter <= x2 and
				yCenter >= y1 and
				yCenter <= y2
		end
	end
end

local function iconFieldDeselectAll(iconField)
	for i = 1, #iconField.iconsContainer.children do
		iconField.iconsContainer.children[i].selected = false
	end
end

local function iconFieldGetSelectedIcons(iconField)
	local selectedIcons = {}
	
	for i = 1, #iconField.iconsContainer.children do
		if iconField.iconsContainer.children[i].selected then
			table.insert(selectedIcons, iconField.iconsContainer.children[i])
		end
	end

	return selectedIcons
end

local function iconFieldSetWorkpath(iconField, path)
	iconField.workpath = path
	iconField.filenameMatcher = nil
	iconField.fromFile = 1

	return iconField
end

function system.iconField(x, y, width, height, xOffset, yOffset, textColor, selectionColor, workpath)
	local iconField = GUI.container(x, y, width, height)

	iconField.colors = {
		text = textColor,
		selection = selectionColor
	}

	iconField.iconConfig = {}
	iconField.iconCount = {}
	iconField.fileList = {}
	iconField.fromFile = 1
	iconField.iconConfigEnabled = false
	iconField.xOffset = xOffset
	iconField.yOffset = yOffset
	iconField.workpath = workpath
	iconField.filenameMatcher = nil

	iconField.backgroundObject = iconField:addChild(GUI.object(1, 1, width, height))
	iconField.backgroundObject.eventHandler = iconFieldBackgroundObjectEventHandler
	iconField.backgroundObject.draw = iconFieldBackgroundObjectDraw

	iconField.iconsContainer = iconField:addChild(GUI.container(1, 1, width, height))	

	iconField.updateFileList = iconFieldUpdateFileList
	iconField.update = iconFieldUpdate
	iconField.deselectAll = iconFieldDeselectAll
	iconField.loadIconConfig = iconFieldLoadIconConfig
	iconField.saveIconConfig = iconFieldSaveIconConfig
	iconField.deleteIconConfig = iconFieldDeleteIconConfig
	iconField.getSelectedIcons = iconFieldGetSelectedIcons
	iconField.setWorkpath = iconFieldSetWorkpath

	iconField.onLeftClick = iconOnLeftClick
	iconField.onRightClick = iconOnRightClick
	iconField.onDoubleClick = iconOnDoubleClick

	-- Duplicate icon launchers for overriding possibility
	iconField.launchers = {}
	for key, value in pairs(iconLaunchers) do
		iconField.launchers[key] = value
	end

	return iconField
end

--------------------------------------------------------------------------------

local function updateMenu()
	local focusedWindow = windowsContainer.children[#windowsContainer.children]
	desktopMenu.children = focusedWindow and focusedWindow.menu.children or system.menuInitialChildren
end

local function windowRemove(window)
	if window.dockIcon then
		-- Удаляем ссылку на окно из докиконки
		window.dockIcon.windows[window] = nil
		window.dockIcon.windowCount = window.dockIcon.windowCount - 1

		-- Если в докиконке еще остались окна
		if not next(window.dockIcon.windows) then
			window.dockIcon.windows = nil
			window.dockIcon.windowCount = nil

			if not window.dockIcon.keepInDock then
				window.dockIcon:remove()
				dockContainer.sort()
			end
		end
	end

	-- Удаляем само окошко
	table.remove(window.parent.children, window:indexOf())
	updateMenu()
end

function system.addWindow(window, dontAddToDock, preserveCoordinates)
	-- Чекаем коорды
	if not preserveCoordinates then
		window.x, window.y = math.floor(windowsContainer.width / 2 - window.width / 2), math.floor(windowsContainer.height / 2 - window.height / 2)
	end
	
	-- Ебурим окно к окнам
	windowsContainer:addChild(window)
	
	if not dontAddToDock then
		-- Получаем путь залупы
		local info
		for i = 0, math.huge do
			info = debug.getinfo(i)
			if info then
				if info.source and info.what == "main" and info.source:sub(-13, -1) == ".app/Main.lua" then
					local dockPath = filesystem.removeSlashes(info.source:sub(2, -9))

					-- Чекаем наличие иконки в доке с таким же путем, и еси ее нет, то хуячим новую
					for i = 1, #dockContainer.children do
						if dockContainer.children[i].path == dockPath then
							window.dockIcon = dockContainer.children[i]
							break
						end
					end

					if not window.dockIcon then
						window.dockIcon = dockContainer.addIcon(dockPath)
					end
					
					-- Ебурим ссылку на окна в иконку
					window.dockIcon.windows = window.dockIcon.windows or {}
					window.dockIcon.windows[window] = true
					window.dockIcon.windowCount = (window.dockIcon.windowCount or 0) + 1

					-- Взалупливаем иконке индивидуальную менюху. По дефолту тут всякая хуйня и прочее
					window.menu = GUI.menu(1, 1, 1)
					window.menu.colors = desktopMenu.colors
					local name = filesystem.hideExtension(filesystem.name(dockPath))
					local contextMenu = window.menu:addContextMenu(name, 0x0)

					contextMenu:addItem(system.localization.closeWindow .. " " .. name, false, "^W").onTouch = function()
						window:remove()
					end

					-- Смещаем окно правее и ниже, если уже есть открытые окна этой софтины
					local lastIndex
					for i = #windowsContainer.children, 1, -1 do
						if windowsContainer.children[i] ~= window and window.dockIcon.windows[windowsContainer.children[i]] then
							lastIndex = i
							break
						end
					end

					if lastIndex then
						window.localX, window.localY = windowsContainer.children[lastIndex].localX + 4, windowsContainer.children[lastIndex].localY + 2
					end

					-- Когда окно фокусицца, то главная ОСевая менюха заполницца ДЕТИШЕЧКАМИ оконной менюхи
					window.onFocus = updateMenu

					-- Заполняем главную менюху текущим окном
					updateMenu()

					break
				end
			else
				break
			end
		end
	end

	-- "Закрытие" акошычка
	window.remove = windowRemove

	-- Кнопочкам тоже эту хуйню пихаем
	if window.actionButtons then
		window.actionButtons.close.onTouch = function()
			window:remove()
		end
		
		window.actionButtons.maximize.onTouch = function()
			window:maximize()
		end
		
		window.actionButtons.minimize.onTouch = function()
			window:minimize()
		end
	end

	return workspace, window, window.menu
end

--------------------------------------------------------------------------------

function system.addPropertiesWindow(x, y, width, icon)
	local workspace, window = system.addWindow(GUI.titledWindow(x, y, width, 1, system.localization.properties), true, true)

	window.backgroundPanel.colors.transparency = 0.2
	window:addChild(GUI.image(2, 3, icon.image))

	local x, y = 11, 3

	local function addKeyAndValue(key, value)
		local object = window:addChild(GUI.keyAndValue(x, y, 0x3C3C3C, 0x5A5A5A, key, ": " .. value))
		y = y + 1

		return object
	end

	addKeyAndValue(system.localization.type, icon.extension or (icon.isDirectory and system.localization.folder or system.localization.unknown))
	local sizeKeyAndValue = addKeyAndValue(system.localization.size, icon.isDirectory and "-" or string.format("%.2f", filesystem.size(icon.path) / 1024) .. " KB")
	addKeyAndValue(system.localization.date, os.date("%d.%m.%y, %H:%M", math.floor(filesystem.lastModified(icon.path) / 1000)))
	addKeyAndValue(system.localization.path, " ")

	local textBox = window:addChild(GUI.textBox(17, y - 1, window.width - 18, 1, nil, 0x555555, {icon.path}, 1, 0, 0, true, true))
	textBox.eventHandler = nil

	window.actionButtons.minimize:remove()
	window.actionButtons.maximize:remove()

	window.height = textBox.y + textBox.height
	window.backgroundPanel.width = window.width
	window.backgroundPanel.height = textBox.y + textBox.height

	workspace:draw()
end

-----------------------------------------------------------------------------------------------------------------------------------

function system.copy(fileList, toPath)
	local applyYes, breakRecursion

	local container = GUI.addBackgroundContainer(workspace, true, true, system.localization.copying)
	local textBox = container.layout:addChild(GUI.textBox(1, 1, container.width, 1, nil, 0x787878, {}, 1, 0, 0, true, true):setAlignment(GUI.ALIGNMENT_HORIZONTAL_CENTER, GUI.ALIGNMENT_VERTICAL_TOP))
	local switchAndLabel = container.layout:addChild(GUI.switchAndLabel(1, 1, 37, 8, 0x66DB80, 0x1E1E1E, 0xE1E1E1, 0x787878, system.localization.applyToAll .. ":", false))
	container.panel.eventHandler = nil

	local buttonsLayout = container.layout:addChild(GUI.layout(1, 1, 1, 1, 1, 1))
	buttonsLayout:setDirection(1, 1, GUI.DIRECTION_HORIZONTAL)
	buttonsLayout:setSpacing(1, 1, 2)

	buttonsLayout:addChild(GUI.button(1, 1, 11, 1, 0xE1E1E1, 0x2D2D2D, 0xA5A5A5, 0x2D2D2D, system.localization.yes)).onTouch = function()
		applyYes = true
		workspace:stop()
	end
	buttonsLayout:addChild(GUI.button(1, 1, 11, 1, 0xE1E1E1, 0x2D2D2D, 0xA5A5A5, 0x2D2D2D, system.localization.no)).onTouch = function()
		workspace:stop()
	end
	buttonsLayout:addChild(GUI.button(1, 1, 11, 1, 0xE1E1E1, 0x2D2D2D, 0xA5A5A5, 0x2D2D2D, system.localization.cancel)).onTouch = function()
		breakRecursion = true
		workspace:stop()
	end

	buttonsLayout:fitToChildrenSize(1, 1)

	local function copyOrMove(path, finalPath)
		switchAndLabel.hidden = true
		buttonsLayout.hidden = true

		textBox.lines = {
			system.localization.copying .. " " .. system.localization.faylaBlyad .. " " .. filesystem.name(path) .. " " .. system.localization.toDirectory .. " " .. filesystem.removeSlashes(toPath),
		}
		textBox:update()

		workspace:draw()

		filesystem.remove(finalPath)

		filesystem.copy(path, finalPath)
	end

	local function recursiveCopy(path, toPath)
		local finalPath = toPath .. "/" .. filesystem.name(path)

		if filesystem.isDirectory(path) then
			filesystem.makeDirectory(finalPath)

			local list = filesystem.list(path)
			for i = 1, #list do
				if breakRecursion then
					return
				end
				recursiveCopy(path .. "/" .. list[i], finalPath)
			end
		else
			if filesystem.exists(finalPath) then
				if not switchAndLabel.switch.state then
					switchAndLabel.hidden = false
					buttonsLayout.hidden = false
					applyYes = false

					textBox.lines = {
						system.localization.file .. " " .. filesystem.name(path) .. " " .. system.localization.alreadyExists .. " " ..  system.localization.inDirectory .. " " .. filesystem.removeSlashes(toPath),
						system.localization.needReplace,
					}
					textBox:update()

					workspace:draw()
					workspace:start()
					workspace:draw()
				end

				if applyYes then
					copyOrMove(path, finalPath)
				end
			else
				copyOrMove(path, finalPath)
			end
		end
	end

	for i = 1, #fileList do
		recursiveCopy(fileList[i], toPath)
	end

	container:remove()
	workspace:draw()
end

local function menuWidgetEventHandler(workspace, object, e1, ...)
	if e1 == "touch" and object.onTouch then
		object.selected = true
		workspace:draw()

		object.onTouch(workspace, object, e1, ...)

		object.selected = false
		workspace:draw()
	end
end

local function menuWidgetDraw(object)
	if object.selected then
		object.textColor = 0xFFFFFF
		screen.drawRectangle(object.x - 1, object.y, object.width + 2, 1, 0x3366CC, object.textColor, " ")
	else
		object.textColor = 0x0
	end

	object.drawContent(object)
end

function system.menuWidget(width)
	local object = GUI.object(1, 1, width, 1)
	
	object.selected = false
	object.eventHandler = menuWidgetEventHandler
	object.draw = menuWidgetDraw

	return object
end

function system.addMenuWidget(object)
	desktopMenuLayout:addChild(object)
	object:moveToBack()

	return object
end

--------------------------------------------------------------------------------

function system.error(path, line, traceback)
	local container = GUI.addBackgroundContainer(workspace, true, false, false)

	local window = container:addChild(GUI.container(1, 1, screen.getWidth(), math.floor(container.height * 0.5)))
	window.localY = math.floor(container.height / 2 - window.height / 2)

	window:addChild(GUI.panel(1, 1, window.width, 3, 0x3C3C3C))
	window:addChild(GUI.label(1, 2, window.width, 1, 0xE1E1E1, system.localization.errorWhileRunningProgram .. "\"" .. filesystem.name(path) .. "\"")):setAlignment(GUI.ALIGNMENT_HORIZONTAL_CENTER, GUI.ALIGNMENT_VERTICAL_TOP)
	local actionButtons = window:addChild(GUI.actionButtons(2, 2, true))
	local sendToDeveloperButton = window:addChild(GUI.adaptiveButton(9, 1, 2, 1, 0x4B4B4B, 0xD2D2D2, 0x2D2D2D, 0xFFFFFF, system.localization.sendFeedback))
	
	local codeView = window:addChild(GUI.codeView(1, 4, math.floor(window.width * 0.62), window.height - 3, 1, 1, 100, {}, {[line] = 0xFF4444}, GUI.LUA_SYNTAX_PATTERNS, GUI.LUA_SYNTAX_COLOR_SCHEME, true, {}))
	
	-- Obtain from- and to- lines that need to be shown
	codeView.fromLine = line - math.floor((window.height - 3) / 2) + 1
	if codeView.fromLine <= 0 then
		codeView.fromLine = 1
	end
	local toLine, lineCounter = codeView.fromLine + codeView.height - 1, 1

	-- Read part of file to display error line
	for line in filesystem.lines(path) do
		if lineCounter >= codeView.fromLine and lineCounter <= toLine then
			codeView.lines[lineCounter] = line:gsub("\t", "  ")
		elseif lineCounter < codeView.fromLine then
			codeView.lines[lineCounter] = " "
		elseif lineCounter > toLine then
			break
		end
		
		lineCounter = lineCounter + 1
		
		if lineCounter % 200 == 0 then
			computer.pullSignal(0)
		end
	end

	-- Stacktrace parsing
	local lines = text.wrap(traceback:gsub("\r\n", "\n"):gsub("\t", "  "), window.width - codeView.width - 2)
	window:addChild(GUI.textBox(codeView.width + 1, 4, window.width - codeView.width, codeView.height, 0xFFFFFF, 0x0, lines, 1, 1, 0))
	
	actionButtons.close.onTouch = function()
		container:remove()
		workspace:draw()
	end

	window.eventHandler = function(workspace, object, e1, e2, e3, e4)
		if e1 == "key_down" and e4 == 28 then
			actionButtons.close.onTouch()
		end
	end

	sendToDeveloperButton.onTouch = function()
		if component.isAvailable("internet") then
			local internet = require("Internet")
			internet.request("https://api.mcmodder.ru/ECS/report.php?path=" .. internet.encode(path) .. "&errorMessage=" .. internet.encode(traceback))

			sendToDeveloperButton.text = system.localization.sendedFeedback
			workspace:draw()
			event.sleep(1)
		end

		actionButtons.close.onTouch()
	end

	workspace:draw()

	for i = 1, 3 do
		component.get("computer").beep(1500, 0.08)
	end
end

function system.execute(path, ...)
	path = filesystem.removeSlashes(path)

	local oldScreenWidth, oldScreenHeight, success, errorPath, line, traceback = screen.getResolution()
	
	if filesystem.exists(path) then
		success, reason = loadfile(path)

		if success then
			success, errorPath, line, traceback = system.call(success, ...)
		else
			success, errorPath, line, traceback = false, path, tonumber(reason:match(":(%d+)%:")) or 1, reason
		end
	else
		GUI.alert("File \"" .. tostring(path) .. "\" doesn't exists")
	end

	component.proxy(screen.getGPUProxy().getScreen()).setPrecise(false)
	screen.setResolution(oldScreenWidth, oldScreenHeight)

	if not success then
		system.error(errorPath, line, traceback)
	end

	return success, errorPath, line, traceback
end

---- Хуй
local function updateWallpaper(path, mode, brightness)
	local result, reason = image.load(path)
	if result then
		desktopBackgroundWallpaper = result

		-- Fit to screen size mode
		if mode == 1 then
			desktopBackgroundWallpaper = image.transform(desktopBackgroundWallpaper, workspace.width, workspace.height)
			desktopBackgroundWallpaperX, desktopBackgroundWallpaperY = 1, 1
		-- Centerized mode
		else
			desktopBackgroundWallpaperX = math.floor(1 + workspace.width / 2 - image.getWidth(desktopBackgroundWallpaper) / 2)
			desktopBackgroundWallpaperY = math.floor(1 + workspace.height / 2 - image.getHeight(desktopBackgroundWallpaper) / 2)
		end

		-- Brightness adjustment
		local background, foreground, alpha, symbol, r, g, b
		for y = 1, image.getHeight(desktopBackgroundWallpaper) do
			for x = 1, image.getWidth(desktopBackgroundWallpaper) do
				background, foreground, alpha, symbol = image.get(desktopBackgroundWallpaper, x, y)
				
				r, g, b = color.integerToRGB(background)
				background = color.RGBToInteger(
					math.floor(r * brightness),
					math.floor(g * brightness),
					math.floor(b * brightness)
				)

				r, g, b = color.integerToRGB(foreground)
				foreground = color.RGBToInteger(
					math.floor(r * brightness),
					math.floor(g * brightness),
					math.floor(b * brightness)
				)

				image.set(desktopBackgroundWallpaper, x, y, background, foreground, alpha, symbol)
			end
		end
	else
		GUI.alert("Failed to load wallpaper: " .. (reason or "image file is corrupted"))
	end
end

function system.updateWallpaper()
	desktopBackgroundWallpaper = nil

	if system.properties.interfaceWallpaperEnabled and system.properties.interfaceWallpaperPath then
		updateWallpaper(
			system.properties.interfaceWallpaperPath,
			system.properties.interfaceWallpaperMode,
			system.properties.interfaceWallpaperBrightness
		)
	end
end

function system.updateResolution()
	if system.properties.interfaceScreenWidth then
		screen.setResolution(system.properties.interfaceScreenWidth, system.properties.interfaceScreenHeight)
	else
		screen.setResolution(screen.getGPUProxy().maxResolution())
	end

	workspace.width, workspace.height = screen.getResolution()

	desktopIconField.width = workspace.width
	desktopIconField.height = workspace.height
	desktopIconField:updateFileList()

	dockContainer.sort()
	dockContainer.localY = workspace.height - dockContainer.height + 1

	desktopMenu.width = workspace.width
	desktopMenuLayout.width = workspace.width
	desktopBackground.width, desktopBackground.height = workspace.width, workspace.height

	windowsContainer.width, windowsContainer.height = workspace.width, workspace.height - 1
end

local function moveDockIcon(index, direction)
	dockContainer.children[index], dockContainer.children[index + direction] = dockContainer.children[index + direction], dockContainer.children[index]
	dockContainer.sort()
	dockContainer.saveProperties()
	workspace:draw()
end

local function getPercentageColor(pecent)
	if pecent >= 0.75 then
		return 0x00B640
	elseif pecent >= 0.6 then
		return 0x99DB40
	elseif pecent >= 0.3 then
		return 0xFFB640
	elseif pecent >= 0.2 then
		return 0xFF9240
	else
		return 0xFF4940
	end
end

local function dockIconEventHandler(workspace, icon, e1, e2, e3, e4, e5, e6, ...)
	if e1 == "touch" then
		icon.selected = true
		workspace:draw()

		if e5 == 1 then
			icon.onRightClick(icon, e1, e2, e3, e4, e5, e6, ...)
		else
			icon.onLeftClick(icon, e1, e2, e3, e4, e5, e6, ...)
		end
	end
end

function system.updateDesktop()
	desktopIconField = workspace:addChild(
		system.iconField(
			1, 2, 1, 1, 3, 2,
			0xFFFFFF,
			0xD2D2D2,
			paths.user.desktop
		)
	)
	
	desktopIconField.iconConfigEnabled = true
	
	desktopIconField.launchers.directory = function(icon)
		system.execute(paths.system.applicationFinder, "-o", icon.path)
	end
	
	desktopIconField.launchers.showContainingFolder = function(icon)
		system.execute(paths.system.applicationFinder, "-o", filesystem.path(icon.shortcutPath or icon.path))
	end
	
	desktopIconField.launchers.showPackageContent = function(icon)
		system.execute(paths.system.applicationFinder, "-o", icon.path)
	end

	dockContainer = workspace:addChild(GUI.container(1, 1, workspace.width, 7))

	dockContainer.saveProperties = function()
		system.properties.dockShortcuts = {}
		for i = 1, #dockContainer.children do
			if dockContainer.children[i].keepInDock then
				table.insert(system.properties.dockShortcuts, dockContainer.children[i].path)
			end
		end

		system.saveProperties()
	end

	dockContainer.sort = function()
		local x = 4
		for i = 1, #dockContainer.children do
			dockContainer.children[i].localX = x
			x = x + system.properties.iconWidth + system.properties.iconHorizontalSpace
		end

		dockContainer.width = #dockContainer.children * (system.properties.iconWidth + system.properties.iconHorizontalSpace) - system.properties.iconHorizontalSpace + 6
		dockContainer.localX = math.floor(workspace.width / 2 - dockContainer.width / 2)
	end

	dockContainer.addIcon = function(path)
		local icon = dockContainer:addChild(system.icon(1, 2, path, 0x2D2D2D, 0xFFFFFF))
		icon:analyseExtension(iconLaunchers)
		icon:moveBackward()

		icon.eventHandler = dockIconEventHandler

		icon.onLeftClick = function(icon, ...)
			if icon.windows then
				for window in pairs(icon.windows) do
					window.hidden = false
					window:moveToFront()
				end

				event.sleep(0.2)

				icon.selected = false
				updateMenu()
				workspace:draw()
			else
				iconOnDoubleClick(icon, ...)
			end
		end

		icon.onRightClick = function(icon, e1, e2, e3, e4, ...)
			local indexOf = icon:indexOf()
			local contextMenu = GUI.addContextMenu(workspace, e3, e4)
			
			contextMenu.onMenuClosed = function()
				icon.selected = false
				workspace:draw()
			end

			if icon.windows then
				local eventData = {...}
				
				contextMenu:addItem(system.localization.newWindow).onTouch = function()
					iconOnDoubleClick(icon, e1, e2, e3, e4, table.unpack(eventData))
				end
				
				contextMenu:addItem(system.localization.closeAllWindows).onTouch = function()
					for window in pairs(icon.windows) do
						window:remove()
					end

					workspace:draw()
				end
			end
			
			contextMenu:addItem(system.localization.showContainingFolder).onTouch = function()
				system.execute(paths.system.applicationFinder, "-o", filesystem.path(icon.shortcutPath or icon.path))
			end
			
			contextMenu:addSeparator()
			
			contextMenu:addItem(system.localization.moveRight, indexOf >= #dockContainer.children - 1).onTouch = function()
				moveDockIcon(indexOf, 1)
			end
			
			contextMenu:addItem(system.localization.moveLeft, indexOf <= 1).onTouch = function()
				moveDockIcon(indexOf, -1)
			end
			
			contextMenu:addSeparator()
			
			if icon.keepInDock then
				if #dockContainer.children > 1 then
					contextMenu:addItem(system.localization.removeFromDock).onTouch = function()
						if icon.windows then
							icon.keepInDock = nil
						else
							icon:remove()
							dockContainer.sort()
						end
						
						workspace:draw()
						dockContainer.saveProperties()
					end
				end
			else
				if icon.windows then
					contextMenu:addItem(system.localization.keepInDock).onTouch = function()
						icon.keepInDock = true
						dockContainer.saveProperties()
					end
				end
			end

			workspace:draw()
		end

		dockContainer.sort()

		return icon
	end

	-- Trash
	local icon = dockContainer.addIcon(paths.user.trash)
	icon.image = image.load(paths.system.icons .. "Trash.pic")
	icon.launch = function()
		system.execute(paths.system.applicationFinder, "-o", icon.path)
	end

	icon.eventHandler = dockIconEventHandler

	icon.onLeftClick = iconOnDoubleClick

	icon.onRightClick = function(icon, e1, e2, e3, e4)
		local contextMenu = GUI.addContextMenu(workspace, e3, e4)
		
		contextMenu.onMenuClosed = function()
			icon.selected = false
			workspace:draw()
		end
		
		contextMenu:addItem(system.localization.emptyTrash).onTouch = function()
			local container = GUI.addBackgroundContainer(workspace, true, true, system.localization.areYouSure)

			container.layout:addChild(GUI.button(1, 1, 30, 1, 0xE1E1E1, 0x2D2D2D, 0xA5A5A5, 0x2D2D2D, "OK")).onTouch = function()
				local list = filesystem.list(paths.user.trash)
				for i = 1, #list do
					filesystem.remove(paths.user.trash .. list[i])
				end
				container:remove()
				computer.pushSignal("system", "updateFileList")
			end

			container.panel.onTouch = function()
				container:remove()
				workspace:draw()
			end

			workspace:draw()
		end

		workspace:draw()
	end

	for i = 1, #system.properties.dockShortcuts do
		dockContainer.addIcon(system.properties.dockShortcuts[i]).keepInDock = true
	end

	-- Draw dock drawDock dockDraw cyka заебался искать, блядь
	local overrideDockContainerDraw = dockContainer.draw
	dockContainer.draw = function(dockContainer)
		local color, currentDockTransparency, currentDockWidth, xPos = system.properties.interfaceColorDock, system.properties.interfaceTransparencyDock, dockContainer.width - 2, dockContainer.x

		for y = dockContainer.y + dockContainer.height - 1, dockContainer.y + dockContainer.height - 4, -1 do
			screen.drawText(xPos, y, color, "◢", system.properties.interfaceTransparencyEnabled and currentDockTransparency)
			screen.drawRectangle(xPos + 1, y, currentDockWidth, 1, color, 0xFFFFFF, " ", system.properties.interfaceTransparencyEnabled and currentDockTransparency)
			screen.drawText(xPos + currentDockWidth + 1, y, color, "◣", system.properties.interfaceTransparencyEnabled and currentDockTransparency)

			currentDockTransparency, currentDockWidth, xPos = currentDockTransparency + 0.08, currentDockWidth - 2, xPos + 1
			if currentDockTransparency > 1 then
				currentDockTransparency = 1
			end
		end

		overrideDockContainerDraw(dockContainer)
	end

	windowsContainer = workspace:addChild(GUI.container(1, 2, 1, 1))

	desktopMenu = workspace:addChild(GUI.menu(1, 1, workspace.width, 0x0, 0x696969, 0x3366CC, 0xFFFFFF))
	
	local MineOSContextMenu = desktopMenu:addContextMenu("MineOS", 0x000000)
	MineOSContextMenu:addItem(system.localization.aboutSystem).onTouch = function()
		local container = GUI.addBackgroundContainer(workspace, true, true, system.localization.aboutSystem)
		container.layout:removeChildren()
		
		local lines = {
			"MineOS",
			"Copyright © 2014-" .. os.date("%Y", system.getTime()),
			" ",
			"Developers:",
			" ",
			"Igor Timofeev, vk.com/id7799889",
			"Gleb Trifonov, vk.com/id88323331",
			"Yakov Verevkin, vk.com/id60991376",
			"Alexey Smirnov, vk.com/id23897419",
			"Timofey Shestakov, vk.com/id113499693",
			" ",
			"UX-advisers:",
			" ",
			"Nikita Yarichev, vk.com/id65873873",
			"Vyacheslav Sazonov, vk.com/id21321257",
			"Michail Prosin, vk.com/id75667079",
			"Dmitrii Tiunov, vk.com/id151541414",
			"Egor Paliev, vk.com/id83795932",
			"Maxim Pakin, vk.com/id100687922",
			"Andrey Kakoito, vk.com/id201043162",
			"Maxim Omelaenko, vk.com/id54662296",
			"Konstantin Mayakovskiy, vk.com/id10069748",
			"Ruslan Isaev, vk.com/id181265169",
			"Eugene8388608, vk.com/id287247631",
			" ",
			"Translators:",
			" ",
			"06Games, github.com/06Games",
			"Xenia Mazneva, vk.com/id5564402",
			"Yana Dmitrieva, vk.com/id155326634",
		}

		local textBox = container.layout:addChild(GUI.textBox(1, 1, container.layout.width, #lines, nil, 0xB4B4B4, lines, 1, 0, 0))
		textBox:setAlignment(GUI.ALIGNMENT_HORIZONTAL_CENTER, GUI.ALIGNMENT_VERTICAL_TOP)
		textBox.eventHandler = container.panel.eventHandler

		workspace:draw()
	end

	MineOSContextMenu:addItem(system.localization.updates).onTouch = function()
		system.execute(paths.system.applicationAppMarket, "updates")
	end

	MineOSContextMenu:addSeparator()

	MineOSContextMenu:addItem(system.localization.logout).onTouch = function()
		system.authorize()
	end

	MineOSContextMenu:addItem(system.localization.reboot).onTouch = function()
		require("Network").broadcastComputerState(false)
		computer.shutdown(true)
	end

	MineOSContextMenu:addItem(system.localization.shutdown).onTouch = function()
		require("Network").broadcastComputerState(false)
		computer.shutdown()
	end
		
	desktopMenuLayout = workspace:addChild(GUI.layout(1, 1, 1, 1, 1, 1))
	desktopMenuLayout:setDirection(1, 1, GUI.DIRECTION_HORIZONTAL)
	desktopMenuLayout:setAlignment(1, 1, GUI.ALIGNMENT_HORIZONTAL_RIGHT, GUI.ALIGNMENT_VERTICAL_TOP)
	desktopMenuLayout:setMargin(1, 1, 1, 0)
	desktopMenuLayout:setSpacing(1, 1, 2)

	local dateWidget, dateWidgetText = system.addMenuWidget(system.menuWidget(1))
	dateWidget.drawContent = function()
		screen.drawText(dateWidget.x, 1, dateWidget.textColor, dateWidgetText)
	end

	local batteryWidget, batteryWidgetPercent, batteryWidgetText = system.addMenuWidget(system.menuWidget(1))
	batteryWidget.drawContent = function()
		screen.drawText(batteryWidget.x, 1, batteryWidget.textColor, batteryWidgetText)

		local pixelPercent = math.floor(batteryWidgetPercent * 4 + 0.5)
		if pixelPercent == 0 then
			pixelPercent = 1
		end
		
		local index = screen.getIndex(batteryWidget.x + #batteryWidgetText, 1)
		for i = 1, 4 do
			screen.rawSet(index, screen.rawGet(index), i <= pixelPercent and getPercentageColor(batteryWidgetPercent) or 0xD2D2D2, i < 4 and "⠶" or "╸")
			index = index + 1
		end
	end

	local RAMWidget, RAMPercent = system.addMenuWidget(system.menuWidget(16))
	RAMWidget.drawContent = function()
		local text = "RAM: " .. math.ceil(RAMPercent * 100) .. "% "
		local barWidth = RAMWidget.width - #text
		local activeWidth = math.ceil(RAMPercent * barWidth)

		screen.drawText(RAMWidget.x, 1, RAMWidget.textColor, text)
		
		local index = screen.getIndex(RAMWidget.x + #text, 1)
		for i = 1, barWidth do
			screen.rawSet(index, screen.rawGet(index), i <= activeWidth and getPercentageColor(1 - RAMPercent) or 0xD2D2D2, "━")
			index = index + 1
		end
	end

	function system.updateMenuWidgets()
		dateWidgetText = os.date(system.properties.timeFormat, system.properties.timeRealTimestamp and system.getTime() or nil)
		dateWidget.width = unicode.len(dateWidgetText)

		batteryWidgetPercent = computer.energy() / computer.maxEnergy()
		if batteryWidgetPercent == math.huge then
			batteryWidgetPercent = 1
		end
		batteryWidgetText = math.ceil(batteryWidgetPercent * 100) .. "% "
		batteryWidget.width = #batteryWidgetText + 4

		local totalMemory = computer.totalMemory()
		RAMPercent = (totalMemory - computer.freeMemory()) / totalMemory
	end

	local lastWindowHandled
	workspace.eventHandler = function(workspace, object, e1, e2, e3, e4)
		if e1 == "key_down" then
			local windowCount = #windowsContainer.children
			-- Ctrl or CMD
			if windowCount > 0 and not lastWindowHandled and (keyboard.isKeyDown(29) or keyboard.isKeyDown(219)) then
				-- W
				if e4 == 17 then
					windowsContainer.children[windowCount]:remove()
					lastWindowHandled = true

					workspace:draw()
				end
			end
		elseif lastWindowHandled and e1 == "key_up" and (e4 == 17 or e4 == 35) then
			lastWindowHandled = false
		elseif e1 == "system" then
			if e2 == "updateFileList" then
				desktopIconField:updateFileList()
				workspace:draw()
			end
		elseif e1 == "network" then
			if e2 == "accessDenied" then
				GUI.alert(system.localization.networkAccessDenied)
			elseif e2 == "timeout" then
				GUI.alert(system.localization.networkTimeout)
			end
		end

		if computer.uptime() - dateUptime >= 1 then
			system.updateMenuWidgets()
			workspace:draw()

			dateUptime = computer.uptime()
		end

		if system.properties.interfaceScreensaverEnabled then
			if e1 then
				screensaverUptime = computer.uptime()
			end

			if dateUptime - screensaverUptime >= system.properties.interfaceScreensaverDelay then
				if filesystem.exists(system.properties.interfaceScreensaverPath) then
					system.execute(system.properties.interfaceScreensaverPath)
					workspace:draw(true)
				end

				screensaverUptime = computer.uptime()
			end
		end
	end

	system.menuInitialChildren = desktopMenu.children

	system.updateColorScheme()
	system.updateResolution()
	system.updateWallpaper()
	system.updateMenuWidgets()
end

function system.updateColorScheme()
	-- Drop down menus
	GUI.CONTEXT_MENU_BACKGROUND_TRANSPARENCY = system.properties.interfaceTransparencyEnabled and 0.18
	GUI.CONTEXT_MENU_SHADOW_TRANSPARENCY = system.properties.interfaceTransparencyEnabled and 0.4
	-- Windows
	GUI.WINDOW_SHADOW_TRANSPARENCY = system.properties.interfaceTransparencyEnabled and 0.6
	-- Background containers
	GUI.BACKGROUND_CONTAINER_PANEL_COLOR = system.properties.interfaceTransparencyEnabled and 0x0 or system.properties.interfaceColorDesktopBackground
	GUI.BACKGROUND_CONTAINER_PANEL_TRANSPARENCY = system.properties.interfaceTransparencyEnabled and 0.3
	-- Top menu
	desktopMenu.colors.default.background = system.properties.interfaceColorMenu
	-- Desktop background
	desktopBackgroundColor = system.properties.interfaceColorDesktopBackground
end

--------------------------------------------------------------------------------

-- Runs tasks before/after OS UI initialization
local function runTasks(mode)
	for i = 1, #system.properties.tasks do
		local task = system.properties.tasks[i]
		if task.mode == mode and task.enabled then
			system.execute(task.path)
		end
	end
end

function system.setUser(u)
	user = u

	-- Updating paths
	paths.updateUser(u)

	-- Updating current desktop iconField path to new one
	if desktopIconField then
		desktopIconField.workpath = paths.user.desktop
	end
end

local function updateUser(u)
	system.setUser(u)
	-- Loading localization
	system.localization = system.getLocalization(paths.system.localizations)
	-- Tasks before UI initialization
	runTasks(2)
	-- Recalculating icon internal sizes based on user properties
	system.calculateIconProperties()
	-- Creating desktop widgets
	system.updateDesktop()
	-- Meowing
	workspace:draw()
	require("Network").update()
	
	-- Tasks after UI initialization
	runTasks(1)
end

local function userObjectDraw(userObject)
	local center = userObject.x + userObject.width / 2
	local imageWidth = image.getWidth(userObject.icon)
	local imageX = math.floor(center - imageWidth / 2)
	
	if userObject.selected then
		drawSelection(imageX - 1, userObject.y - 1, imageWidth + 2, image.getHeight(userObject.icon) + 2, 0xFFFFFF, 0.5)
	end

	screen.drawImage(imageX, userObject.y, userObject.icon)
	screen.drawText(math.floor(center - unicode.len(userObject.name) / 2), userObject.y + image.getHeight(userObject.icon) + 1, 0xE1E1E1, userObject.name)
end

local function userObjectEventHandler(workspace, userObject, e1)
	if e1 == "touch" then
		userObject.selected = true
		workspace:draw()
		
		event.sleep(0.2)

		userObject.selected = false
		userObject.onTouch()
	end
end

local function newUserObject(name, addEventHandler)
	local userObject = GUI.object(1, 1, math.max(8, unicode.len(name)), 6)

	userObject.name = name

	local iconPath = paths.system.users .. name .. "/Icon.pic"
	userObject.icon = image.load(filesystem.exists(iconPath) and iconPath or paths.system.icons .. "User.pic")

	userObject.draw = userObjectDraw
	userObject.eventHandler = addEventHandler and userObjectEventHandler

	return userObject
end

function system.updateWorkspace()
	-- Clearing workspace
	workspace:removeChildren()

	-- Creating background object
	desktopBackgroundWallpaperX, desktopBackgroundWallpaperY = 1, 1
	desktopBackground = workspace:addChild(GUI.object(1, 1, workspace.width, workspace.height))
	desktopBackground.draw = function()
		screen.drawRectangle(1, 1, desktopBackground.width, desktopBackground.height, desktopBackgroundColor, 0, " ")
		
		if desktopBackgroundWallpaper then
			screen.drawImage(desktopBackgroundWallpaperX, desktopBackgroundWallpaperY, desktopBackgroundWallpaper)
		end
	end
end

function system.getDefaultProperties()
	return {
		localizationLanguage = "English",

		timeFormat = "%d %b %Y %H:%M:%S",
		timeRealTimestamp = true,
		timeTimezone = 0,

		networkUsers = {},
		networkName = "Computer #" .. string.format("%06X", math.random(0x0, 0xFFFFFF)),
		networkEnabled = true,
		networkSignalStrength = 512,
		networkFTPConnections = {},
		
		interfaceWallpaperEnabled = false,
		interfaceWallpaperPath = paths.system.pictures .. "Space.pic",
		interfaceWallpaperMode = 2,
		interfaceWallpaperBrightness = 0.9,

		interfaceScreensaverEnabled = false,
		interfaceScreensaverPath = paths.system.screensavers .. "Matrix.lua",
		interfaceScreensaverDelay = 20,
		
		interfaceTransparencyEnabled = true,
		interfaceTransparencyDock = 0.4,
		interfaceTransparencyMenu = 0.2,
		interfaceTransparencyContextMenu = 0.2,

		interfaceColorDesktopBackground = 0x1E1E1E,
		interfaceColorDock = 0xE1E1E1,
		interfaceColorMenu = 0xF0F0F0,

		filesShowExtension = false,
		filesShowHidden = false,
		filesShowApplicationIcon = true,

		iconWidth = 12,
		iconHeight = 6,
		iconHorizontalSpace = 1,
		iconVerticalSpace = 1,
		
		tasks = {},
		dockShortcuts = {
			filesystem.path(paths.system.applicationAppMarket),
			filesystem.path(paths.system.applicationMineCodeIDE),
			filesystem.path(paths.system.applicationFinder),
			filesystem.path(paths.system.applicationPictureEdit),
			filesystem.path(paths.system.applicationSettings),
		},
		extensions = {
			[".3dm"] = {
				icon = paths.system.icons .. "3DModel.pic",
				launcher = paths.system.applications .. "3D Print.app/Main.lua",
				contextMenu = paths.system.extensions .. "3dm/ContextMenu.lua"
			},
			[".pic"] = {
				icon = paths.system.icons .. "Image.pic",
				launcher = paths.system.applicationPictureEdit,
				contextMenu = paths.system.extensions .. "Pic/ContextMenu.lua"
			},
			[".cfg"] = {
				icon = paths.system.icons .. "Config.pic"
			},
			[".txt"] = {
				icon = paths.system.icons .. "Text.pic"
			},
			[".arc"] = {
				icon = paths.system.icons .. "Archive.pic",
				launcher = paths.system.extensions .. "Arc/Launcher.lua"
			},
			[".lua"] = {
				icon = paths.system.icons .. "Lua.pic",
				launcher = paths.system.extensions .. "Lua/Launcher.lua",
				contextMenu = paths.system.extensions .. "Lua/ContextMenu.lua"
			},
			["script"] = {
				icon = paths.system.icons .. "Script.pic",
				launcher = paths.system.extensions .. "Lua/Launcher.lua",
				contextMenu = paths.system.extensions .. "Lua/ContextMenu.lua"
			},
		},
	}
end

function system.createUser(name, language, password, wallpaper, screensaver)
	-- Generating default user properties
	local properties = system.getDefaultProperties()	
	
	-- Injecting preferred properties
	properties.localizationLanguage = language
	properties.securityPassword = password and require("SHA-256").hash(password)
	properties.interfaceWallpaperEnabled = wallpaper
	properties.interfaceScreensaverEnabled = screensaver

	-- Generating user home directory tree
	local userPaths = paths.getUser(name)
	paths.create(userPaths)

	-- Creating basic user icon
	filesystem.copy(paths.system.icons .. "User.pic", userPaths.home .. "Icon.pic")
	
	-- Saving user properties
	filesystem.writeTable(userPaths.properties, properties, true)

	return properties, userPaths
end

function system.setWorkspace(w)
	workspace = w
end

function system.getWorkspace()
	return workspace
end

function system.authorize()
	system.updateWorkspace()

	-- Obtaining user list and removing non-directory files from it
	local userList = filesystem.list(paths.system.users)
	local i = 1
	while i <= #userList do
		if filesystem.isDirectory(paths.system.users .. userList[i]) then
			i = i + 1
		else
			table.remove(userList, i)
		end
	end

	local function loadPropertiesAndCheckProtection(userName)
		paths.updateUser(userName)

		if filesystem.exists(paths.user.properties) then
			system.properties = filesystem.readTable(paths.user.properties)

			for key, value in pairs(system.getDefaultProperties()) do
				if system.properties[key] == nil then
					system.properties[key] = value
				end
			end
		else
			system.properties = system.getDefaultProperties()
		end

		return system.properties.securityPassword
	end

	-- Creating login UI only if there's more than one user with protection
	if #userList > 1 or loadPropertiesAndCheckProtection(userList[1]) then
		local container = workspace:addChild(GUI.container(1, 1, workspace.width, workspace.height))

		-- Trying to load first wallpaper from system pictures directory
		-- if not desktopBackgroundWallpaper then
		-- 	local pictureList = filesystem.list(paths.system.pictures)
		-- 	if pictureList then
		-- 		for i = 1, #pictureList do
		-- 			if filesystem.extension(pictureList[i]) == ".pic" then
		-- 				updateWallpaper(paths.system.pictures .. pictureList[i], 1, 1)
		-- 				break
		-- 			end
		-- 		end
		-- 	end
		-- end

		-- If we've loaded wallpaper (from user logout or above) then add a panel to make it darker
		if desktopBackgroundWallpaper then
			container:addChild(GUI.panel(1, 1, container.width, container.height, 0x0, 0.5))
		end

		local function addLayout(y, height, spacing)
			local layout = container:addChild(GUI.layout(1, y, container.width, height, 1, 1))
			
			layout:setDirection(1, 1, GUI.DIRECTION_HORIZONTAL)
			layout:setSpacing(1, 1, spacing)

			return layout
		end

		local buttonsLayout = addLayout(container.height - 2, 1, 4)

		local function addButton(text, onTouch)
			buttonsLayout:addChild(GUI.adaptiveRoundedButton(1, 1, 1, 0, 0x4B4B4B, 0xE1E1E1, 0x787878, 0xE1E1E1, text)).onTouch = onTouch
		end

		addButton("Reboot", function()
			computer.shutdown(true)
		end)

		addButton("Shutdown", function()
			computer.shutdown()
		end)

		local function selectUser()
			local function securityCheck(userName)
				local passwordLayout = container:addChild(GUI.layout(1, 1, container.width, container.height, 1, 1))
				
				passwordLayout:addChild(newUserObject(userName))
				
				local passwordContainer = passwordLayout:addChild(GUI.container(1, 1, 36, 3))
				local input = addBackgroundContainerInput(passwordContainer, "", "Password", false, "•")

				-- Adding "select user again" button only if there's more than 1 user
				if #userList > 1 then
					local backButton = passwordContainer:addChild(GUI.button(1, 1, 5, 3, 0x2D2D2D, 0xE1E1E1, 0x4B4B4B, 0xE1E1E1, "<"))
					input.localX = backButton.width + 1
					input.width = input.width - backButton.width

					backButton.onTouch = function()
						passwordLayout:remove()
						selectUser()
					end
				end

				input.onInputFinished = function()
					if #input.text > 0 then
						local hash = require("SHA-256").hash(input.text)
						
						package.loaded["SHA-256"] = nil
						input.text = ""

						if hash == system.properties.securityPassword then
							container:remove()
							updateUser(userName)
						else
							GUI.alert("Incorrect password")
						end
					end
				end

				workspace:draw()
			end

			if #userList > 1 then
				local usersLayout = addLayout(1, container.height, 4)
				
				for i = 1, #userList do
					local userObject = usersLayout:addChild(newUserObject(userList[i]:sub(1, -2), true))
					userObject.onTouch = function()
						usersLayout:remove()

						-- Again, if there's some protection
						if loadPropertiesAndCheckProtection(userObject.name) then
							securityCheck(userObject.name)
						else
							container:remove()
							updateUser(userObject.name)
						end
					end
				end
			else
				securityCheck(userList[1]:sub(1, -2))
			end
		end

		selectUser()
	else
		updateUser(userList[1])
	end

	workspace:draw()
end

--------------------------------------------------------------------------------

-- Optaining temporary file's last modified UNIX timestamp as boot timestamp
local temporaryPath = system.getTemporaryPath()
filesystem.write(temporaryPath, "")
bootRealTime = math.floor(filesystem.lastModified(temporaryPath) / 1000)
filesystem.remove(temporaryPath)

-- Caching commonly used icons
system.cacheIcon("directory", paths.system.icons .. "Folder.pic")
system.cacheIcon("fileNotExists", paths.system.icons .. "FileNotExists.pic")
system.cacheIcon("application", paths.system.icons .. "Application.pic")
system.cacheIcon("script", paths.system.icons .. "Script.pic")

--------------------------------------------------------------------------------

return system