Integrate falling nodes damage

mods/ENTITIES/mcl_falling_nodes/init.lua

@@ -2,8 +2,6 @@ local S = minetest.get_translator("mcl_falling_nodes")
 local dmes = minetest.get_modpath("mcl_death_messages") ~= nil
 local has_mcl_armor = minetest.get_modpath("mcl_armor")
 
-local is_creative_enabled = minetest.is_creative_enabled
-
 local get_falling_depth = function(self)
 	if not self._startpos then
 		-- Fallback
@@ -23,80 +21,34 @@ local deal_falling_damage = function(self, dtime)
 		-- Fallback
 		self._startpos = pos
 	end
-	local objs = minetest.get_objects_inside_radius(pos, 1)
+	self._hit = self._hit or {}
-	for _,v in ipairs(objs) do
+	for _, obj in ipairs(minetest.get_objects_inside_radius(pos, 1)) do
-		if v:is_player() then
+		if mcl_util.get_hp(obj) > 0 and not self._hit[obj] then
-			local hp = v:get_hp()
+			self._hit[obj] = true
-			local name = v:get_player_name()
-			if hp ~= 0 then
-				if not self._hit_players then
-					self._hit_players = {}
-				end
-				local hit = false
-				for _,v in ipairs(self._hit_players) do
-					if name == v then
-						hit = true
-					end
-				end
-				if not hit then
-					table.insert(self._hit_players, name)
 			local way = self._startpos.y - pos.y
 			local damage = (way - 1) * 2
 			damage = math.min(40, math.max(0, damage))
 			if damage >= 1 then
-						hp = hp - damage
-						if hp < 0 then
-							hp = 0
-						end
 				-- Reduce damage if wearing a helmet
-						local inv = v:get_inventory()
+				local inv = mcl_util.get_inventory(obj)
+				if inv then
 					local helmet = inv:get_stack("armor", 2)
-						if has_mcl_armor and not helmet:is_empty() then
+					if minetest.get_item_group(helmet:get_name(), "combat_armor") > 0 then
-							hp = hp/4*3
+						damage = damage / 4 * 3
-							if not is_creative_enabled(name) then
+						mcl_util.use_item_durability(helmet, 1)
-								helmet:add_wear(65535/helmet:get_definition().groups.mcl_armor_uses) --TODO: be sure damage is exactly like mc (informations are missing in the mc wiki)
 						inv:set_stack("armor", 2, helmet)
 					end
 				end
-						local msg
+				local deathmsg, dmg_type
 				if minetest.get_item_group(self.node.name, "anvil") ~= 0 then
-							msg = S("@1 was smashed by a falling anvil.", v:get_player_name())
+					deathmsg, dmg_type = "@1 was smashed by a falling anvil.", "anvil"
 				else
-							msg = S("@1 was smashed by a falling block.", v:get_player_name())
+					deathmsg, dmg_type = "@1 was smashed by a falling block.", "falling_node"
-						end
-						if dmes then
-							mcl_death_messages.player_damage(v, msg)
-						end
-						v:set_hp(hp, { type = "punch", from = "mod" })
-					end
-				end
-			end
-		else
-			local hp = v:get_luaentity().health
-			if hp and hp ~= 0 then
-				if not self._hit_mobs then
-					self._hit_mobs = {}
-				end
-				local hit = false
-				for _,mob in ipairs(self._hit_mobs) do
-					if v == mob then
-						hit = true
-					end
-				end
-				--TODO: reduce damage for mobs then they will be able to wear armor
-				if not hit then
-					table.insert(self._hit_mobs, v)
-					local way = self._startpos.y - pos.y
-					local damage = (way - 1) * 2
-					damage = math.min(40, math.max(0, damage))
-					if damage >= 1 then
-						hp = hp - damage
-						if hp < 0 then
-							hp = 0
-						end
-						v:get_luaentity().health = hp
 				end
+				if obj:is_player() then
+					mcl_death_messages.player_damage(obj, S(deathmsg, obj:get_player_name()))
 				end
+				mcl_util.deal_damage(obj, damage, {type = dmg_type})
 			end
 		end
 	end