require "globals"

local Transform = require 'Transform'
local Drawable = require 'Drawable'
local Input = require 'Input'
local Camera = require 'Camera'
local Bolvis = require 'Bolvis'
--local stuff = require 'stuff'
local world = require 'world'

local level
local camera

function love.load()
	love.setDeprecationOutput(false)

	love.mouse.setRelativeMode(true)
	level = world()

	local bolvis = level:object(Transform {pos = {960, 540}}, Bolvis())
	camera = bolvis[Bolvis].i.camera[Camera]

	-- level:object(Transform {pos = {400, 540}}, stuff.Teapot())
	-- level:object(Transform {pos = {600, 540}}, stuff.Apioform())
	-- level:object(Transform {pos = {960, 300}}, stuff.TestPlatform())
	-- level:object(Transform {pos = {960, 700}}, stuff.TestPlatform())
	-- level:object(Transform {pos = {430, 700}}, stuff.TestPlatform())
	-- level:object(Transform {pos = {1490, 700}}, stuff.TestPlatform())
end

local function screen_transform()
	local ww, wh = love.graphics.getDimensions()
	local sw, sh = 1920, 1080
	local scalex, scaley = ww / sw, wh / sh
	local scale
	if scalex * sh < wh then
		scale = scalex
	else
		scale = scaley
	end
	local dimx, dimy = sw * scale, sh * scale
	local x, y = ww / 2 - dimx / 2, wh / 2 - dimy / 2
	return love.math.newTransform(x, y, 0, scale, scale)
end

local function call(ct, method, ...)
	for o in level:iterate(ct) do
		o:call(method, ...)
	end
end

function love.draw()
	love.graphics.applyTransform(screen_transform())
	camera:use()
	local to_draw = {}
	for o in level:iterate(Drawable) do
		table.insert(to_draw, o)
	end
	table.sort(to_draw, function(a, b)
		return a:get(Drawable).i.z < b:get(Drawable).i.z
	end)
	for _, o in ipairs(to_draw) do
		love.graphics.push()
		local cmps = {}
		for c in o:all_components() do
			table.insert(cmps, c)
		end
		table.sort(cmps, function(a, b)
			return (a.i.z or 0) < (b.i.z or 0)
		end)
		for _, c in ipairs(cmps) do
			if c.draw then c:draw() end
		end
		love.graphics.pop()
	end
end

function love.update(dt)
	-- physics.world:update(dt, 20, 20)
	call(nil, 'update', dt)
end

function love.mousemoved(...) 
	call(Input, 'mousemoved', ...)
end

function love.mousepressed(...)
	love.mouse.setRelativeMode(true)
	call(Input, 'mousepressed', ...)
end

function love.mousereleased(...)
	call(Input, 'mousereleased', ...)
end

function love.keypressed(key, ...)
	if key == 'tab' and
		(love.keyboard.isDown 'ralt' or love.keyboard.isDown 'lalt') then
		love.mouse.setRelativeMode(false)
	end
	call(Input, 'keypressed', key, ...)
end

function love.keyreleased(...)
	call(Input, 'keyreleased', ...)
end