local tmp = {}
screwdriver = screwdriver or {}

minetest.register_entity("xdecor:f_item", {
	hp_max = 1,
	visual = "wielditem",
	visual_size = {x=.33,y=.33},
	collisionbox = {0, 0, 0, 0, 0, 0},
	physical = false,
	textures = {"air"},
	on_activate = function(self, staticdata)
		if tmp.nodename ~= nil and tmp.texture ~= nil then
			self.nodename = tmp.nodename
			tmp.nodename = nil
			self.texture = tmp.texture
			tmp.texture = nil
		else
			if staticdata ~= nil and staticdata ~= "" then
				local data = staticdata:split(';')
				if data and data[1] and data[2] then
					self.nodename = data[1]
					self.texture = data[2]
				end
			end
		end
		if self.texture ~= nil then
			self.object:set_properties({textures={self.texture}})
		end
	end,
	get_staticdata = function(self)
		if self.nodename ~= nil and self.texture ~= nil then
			return self.nodename .. ';' .. self.texture
		end
		return ""
	end
})

local remove_item = function(pos, node)
	local objs = nil
	objs = minetest.get_objects_inside_radius(pos, .5)

	if objs then
		for _, obj in ipairs(objs) do
			if obj and obj:get_luaentity() 
			 and obj:get_luaentity().name == "xdecor:f_item" then
				obj:remove()
			end
		end
	end
end

local facedir = {}
facedir[0] = {x=0, y=0, z=1}
facedir[1] = {x=1, y=0, z=0}
facedir[2] = {x=0, y=0, z=-1}
facedir[3] = {x=-1, y=0, z=0}

local update_item = function(pos, node)
	remove_item(pos, node)
	local meta = minetest.get_meta(pos)

	if meta:get_string("item") ~= "" then
		local posad = facedir[node.param2]

		if not posad then
			return
		end
		pos.x = pos.x + posad.x*6.5/16
		pos.y = pos.y + posad.y*6.5/16
		pos.z = pos.z + posad.z*6.5/16
		tmp.nodename = node.name
		tmp.texture = ItemStack(meta:get_string("item")):get_name()

		local e = minetest.add_entity(pos, "xdecor:f_item")
		local yaw = math.pi*2 - node.param2 * math.pi/2
		e:setyaw(yaw)
	end
end

local drop_item = function(pos, node)
	local meta = minetest.get_meta(pos)
	if meta:get_string("item") ~= "" then
		minetest.add_item(pos, meta:get_string("item"))
		meta:set_string("item", "")
	end
	remove_item(pos, node)
end

xdecor.register("frame", {
	description = "Item frame",
	groups = {snappy=3},
	on_rotate = screwdriver.disallow,
	node_box = {
		type = "fixed",
		fixed = {-0.5, -0.5, 7/16, 0.5, 0.5, 0.5}
	},
	tiles = {
		"xdecor_wood.png", "xdecor_wood.png", "xdecor_wood.png",
		"xdecor_wood.png", "xdecor_wood.png", "xdecor_frame.png"
	}, 
	inventory_image = "xdecor_frame.png",
	after_place_node = function(pos, placer, itemstack)
		local meta = minetest.get_meta(pos)
		meta:set_string("owner", placer:get_player_name())
		meta:set_string("infotext", "Item frame (owned by "..placer:get_player_name()..")")
	end,
	on_rightclick = function(pos, node, clicker, itemstack)
		if not itemstack then
			return
		end

		local meta = minetest.get_meta(pos)
		if clicker:get_player_name() == meta:get_string("owner") then
			drop_item(pos, node)
			local s = itemstack:take_item()
			meta:set_string("item", s:to_string())
			update_item(pos, node)
		end

		return itemstack
	end,
	on_punch = function(pos, node, puncher)
		local meta = minetest.get_meta(pos)
		if puncher:get_player_name() == meta:get_string("owner") then
			drop_item(pos, node)
		end
	end,
	can_dig = function(pos, player)
		local meta = minetest.get_meta(pos)
		return player:get_player_name() == meta:get_string("owner")
	end,
	after_destruct = remove_item
})

minetest.register_abm({
	nodenames = {"xdecor:frame"},
	interval = 15,
	chance = 1,
	action = function(pos, node, active_object_count, active_object_count_wider)
		if #minetest.get_objects_inside_radius(pos, 0.5) > 0 then
			return
		end
		update_item(pos, node)
	end
})