local S = minetest.get_translator("rp_supertools")

local GROWTH_TOOL_USES = 13
local CHILD_TOOL_USES = 13

local grow_tall = function(pos, y_dir, nodename)
	local newpos
	for i=1, 10 do
		newpos = vector.add(pos, vector.new(0,i*y_dir,0))
		local newnode = minetest.get_node(newpos)
		if newnode.name == "air" then
			minetest.set_node(newpos, {name=nodename})
			return true
		elseif newnode.name ~= nodename then
			return false
		end
	end
	return false
end

minetest.register_craftitem("rp_supertools:growth_tool", {
	description = S("Growth Tool"),
	_tt_help = S("Make plants and mobs grow instantly"),
	inventory_image = "rp_supertools_growth_tool.png",
	wield_image = "rp_supertools_growth_tool.png",
	groups = { supertool = 1, tool = 1 },
	stack_max = 1,
	on_secondary_use = function(itemstack, placer, pointed_thing)
		-- Handle growing child mobs into adults
		if pointed_thing.type == "object" then
			local obj = pointed_thing.ref
			local ent = obj:get_luaentity()
			if ent and ent._cmi_is_mob and ent._child then
				rp_mobs.turn_into_adult(ent)
				if not minetest.is_creative_enabled(placer:get_player_name()) then
					itemstack:add_wear_by_uses(GROWTH_TOOL_USES)
				end
				local pos = obj:get_pos()
				minetest.log("action", "[rp_supertools] " .. placer:get_player_name() .. " used groth tool on mob '"..ent.name.."' at "..minetest.pos_to_string(pos, 1))
			end
			return itemstack
		end
	end,
	on_place = function(itemstack, placer, pointed_thing)
		-- Handle pointed node handlers and protection
		local handled, handled_itemstack = util.on_place_pointed_node_handler(itemstack, placer, pointed_thing)
		if handled then
			return handled_itemstack
		end
		if util.handle_node_protection(placer, pointed_thing) then
			return itemstack
		end

		if pointed_thing.type ~= "node" then
			return itemstack
		end

		-- Handle growing nodes
		local apos = pointed_thing.above
		local upos = pointed_thing.under
		local unode = minetest.get_node(upos)
		local anode = minetest.get_node(apos)

		local diff = vector.subtract(apos, upos)
		local used = false
		if minetest.get_item_group(unode.name, "sapling") ~= 0 then
			used = default.grow_sapling(upos)
		elseif diff.y > 0 and unode.name == "rp_default:dirt" and anode.name == "air" then
			local biomedata = minetest.get_biome_data(upos)
			local biome = minetest.get_biome_name(biomedata.biome)
			if default.is_dry_biome(biome) then
				minetest.set_node(upos, {name="rp_default:dirt_with_dry_grass"})
			else
				minetest.set_node(upos, {name="rp_default:dirt_with_grass"})
			end
			used = true
		elseif diff.y > 0 and unode.name == "rp_default:swamp_dirt" and anode.name == "air" then
			minetest.set_node(upos, {name="rp_default:dirt_with_swamp_grass"})
			used = true
		elseif diff.y > 0 and unode.name == "rp_default:dirt_with_grass" and anode.name == "air" then
			minetest.set_node(apos, {name="rp_default:grass"})
			used = true
		elseif diff.y > 0 and unode.name == "rp_default:dirt_with_dry_grass" and anode.name == "air" then
			minetest.set_node(apos, {name="rp_default:dry_grass"})
			used = true
		elseif diff.y > 0 and unode.name == "rp_default:dirt_with_swamp_grass" and anode.name == "air" then
			minetest.set_node(apos, {name="rp_default:swamp_grass"})
			used = true
		elseif diff.y > 0 and unode.name == "rp_default:alga_block" and minetest.get_item_group(anode.name, "water") > 0 then
			minetest.set_node(upos, {name="rp_default:alga_on_alga_block", param2 = 16})
			used = true
		elseif minetest.get_item_group(unode.name, "alga") == 1 then
			local grown = default.grow_underwater_leveled_plant(upos, unode)
			used = grown == true
		elseif unode.name == "rp_default:grass" then
			minetest.set_node(upos, {name="rp_default:tall_grass"})
			used = true
		elseif unode.name == "rp_default:seagrass_on_dirt" then
			minetest.set_node(upos, {name="rp_default:tall_seagrass_on_dirt"})
			used = true
		elseif unode.name == "rp_default:seagrass_on_swamp_dirt" then
			minetest.set_node(upos, {name="rp_default:tall_seagrass_on_swamp_dirt"})
			used = true
		elseif unode.name == "rp_default:seagrass_on_sand" then
			minetest.set_node(upos, {name="rp_default:tall_seagrass_on_sand"})
			used = true
		elseif unode.name == "rp_default:seagrass_on_fertilized_dirt" then
			minetest.set_node(upos, {name="rp_default:tall_seagrass_on_fertilized_dirt"})
			used = true
		elseif unode.name == "rp_default:seagrass_on_fertilized_swamp_dirt" then
			minetest.set_node(upos, {name="rp_default:tall_seagrass_on_fertilized_swamp_dirt"})
			used = true
		elseif unode.name == "rp_default:seagrass_on_fertilized_sand" then
			minetest.set_node(upos, {name="rp_default:tall_seagrass_on_fertilized_sand"})
			used = true
		elseif minetest.get_item_group(unode.name, "farming_plant") == 1 then
			local udef = minetest.registered_nodes[unode.name]
			if udef then
				local plantname = udef._rp_farming_plant_name
				local has_grown = farming.next_stage(upos, plantname)
				if has_grown then
					used = true
				end
			end
		elseif (unode.name == "rp_default:papyrus" or unode.name == "rp_default:cactus" or unode.name == "rp_default:thistle") then
			local grown = grow_tall(upos, 1, unode.name)
			if grown then
				used = true
			end
		elseif (unode.name == "rp_default:vine") then
			local grown = grow_tall(upos, -1, unode.name)
			if grown then
				used = true
			end
		end
		if used then
			minetest.sound_play({name="rp_farming_place_nonseed", gain=0.75}, {pos=pointed_thing.under}, true)
			if not minetest.is_creative_enabled(placer:get_player_name()) then
				itemstack:add_wear_by_uses(GROWTH_TOOL_USES)
			end

			minetest.log("action", "[rp_supertools] " .. placer:get_player_name() .. " used growth tool on "..unode.name.." at "..minetest.pos_to_string(upos))
		end

		return itemstack
	end,
})

minetest.register_craftitem("rp_supertools:degrowth_tool", {
	description = S("Degrowth Tool"),
	_tt_help = S("Turn mobs into children"),
	inventory_image = "rp_supertools_degrowth_tool.png",
	wield_image = "rp_supertools_degrowth_tool.png",
	groups = { supertool = 1, tool = 1 },
	stack_max = 1,
	on_secondary_use = function(itemstack, placer, pointed_thing)
		if pointed_thing.type ~= "object" then
			return itemstack
		end
		local obj = pointed_thing.ref
		local ent = obj:get_luaentity()
		if ent and ent._cmi_is_mob and not ent._child and rp_mobs.mobdef_has_tag(ent.name, "child_exists") then
			local pos = obj:get_pos()
			rp_mobs.turn_into_child(obj)
			if not minetest.is_creative_enabled(placer:get_player_name()) then
				itemstack:add_wear_by_uses(CHILD_TOOL_USES)
			end
			minetest.log("action", "[rp_supertools] " .. placer:get_player_name() .. " used degrowth tool on '"..ent.name.."' at "..minetest.pos_to_string(pos, 1))
		end
		return itemstack
	end,
})