mesecons/mesecons_mvps/spec/node_spec.lua
2022-12-07 13:15:23 +01:00

298 lines
12 KiB
Lua

require("mineunit")
fixture("mesecons_mvps")
world.set_default_node("air")
describe("node movement", function()
after_each(function()
mesecon._test_reset()
world.clear()
end)
it("works with no moved nodes", function()
local pos = {x = 0, y = 0, z = 0}
local dir = {x = 1, y = 0, z = 0}
assert.same({true, {}, {}}, {mesecon.mvps_push(pos, dir, 1, "")})
assert.same({true, {}, {}}, {mesecon.mvps_pull_all(pos, dir, 1, "")})
assert.same({true, {}, {}}, {mesecon.mvps_pull_single(pos, dir, 1, "")})
end)
it("works with simple stack", function()
local pos = {x = 0, y = 0, z = 0}
local dir = {x = 1, y = 0, z = 0}
world.set_node(pos, "mesecons:test_conductor_off")
world.set_node(vector.add(pos, dir), "mesecons:test_conductor_off")
assert.is_true((mesecon.mvps_push(pos, dir, 2, "")))
assert.equal("air", world.get_node(pos).name)
assert.equal("mesecons:test_conductor_off", world.get_node(vector.add(pos, dir)).name)
assert.equal("mesecons:test_conductor_off", world.get_node(vector.add(pos, vector.multiply(dir, 2))).name)
assert.is_true((mesecon.mvps_pull_all(vector.add(pos, dir), vector.multiply(dir, -1), 2, "")))
assert.equal("mesecons:test_conductor_off", world.get_node(pos).name)
assert.equal("mesecons:test_conductor_off", world.get_node(vector.add(pos, dir)).name)
assert.equal("air", world.get_node(vector.add(pos, vector.multiply(dir, 2))).name)
assert.is_true((mesecon.mvps_pull_single(pos, vector.multiply(dir, -1), 1, "")))
assert.equal("mesecons:test_conductor_off", world.get_node(vector.subtract(pos, dir)).name)
assert.equal("air", world.get_node(pos).name)
assert.equal("mesecons:test_conductor_off", world.get_node(vector.add(pos, dir)).name)
end)
it("works with sticky nodes", function()
local pos = {x = 0, y = 0, z = 0}
local dir = {x = 0, y = 1, z = 0}
world.set_node(pos, "mesecons:test_conductor_off")
world.set_node(vector.offset(pos, 0, 1, 0), "mesecons_mvps:test_sticky")
world.set_node(vector.offset(pos, 1, 1, 0), "mesecons:test_conductor_off")
world.set_node(vector.offset(pos, 1, 2, 0), "mesecons:test_conductor_off")
assert.is_true((mesecon.mvps_push(pos, dir, 4, "")))
assert.equal("air", world.get_node(vector.offset(pos, 1, 1, 0)).name)
assert.equal("mesecons:test_conductor_off", world.get_node(vector.offset(pos, 1, 2, 0)).name)
assert.equal("mesecons:test_conductor_off", world.get_node(vector.offset(pos, 1, 3, 0)).name)
assert.is_true((mesecon.mvps_pull_all(vector.add(pos, dir), vector.multiply(dir, -1), 4, "")))
assert.equal("air", world.get_node(vector.offset(pos, 1, 0, 0)).name)
assert.equal("mesecons:test_conductor_off", world.get_node(vector.offset(pos, 1, 1, 0)).name)
assert.equal("mesecons:test_conductor_off", world.get_node(vector.offset(pos, 1, 2, 0)).name)
assert.is_true((mesecon.mvps_pull_single(pos, vector.multiply(dir, -1), 3, "")))
assert.equal("air", world.get_node(vector.offset(pos, 1, -1, 0)).name)
assert.equal("mesecons:test_conductor_off", world.get_node(vector.offset(pos, 1, 0, 0)).name)
assert.equal("air", world.get_node(vector.offset(pos, 1, 1, 0)).name)
end)
it("respects maximum", function()
local pos = {x = 0, y = 0, z = 0}
local dir = {x = 1, y = 0, z = 0}
world.set_node(pos, "mesecons:test_conductor_off")
world.set_node(vector.add(pos, dir), "mesecons:test_conductor_off")
assert.is_true(not mesecon.mvps_push(pos, dir, 1, ""))
end)
it("is blocked by basic stopper", function()
local pos = {x = 0, y = 0, z = 0}
local dir = {x = 1, y = 0, z = 0}
world.set_node(pos, "mesecons_mvps:test_stopper")
assert.is_true(not mesecon.mvps_push(pos, dir, 1, ""))
end)
it("is blocked by conditional stopper", function()
local pos = {x = 0, y = 0, z = 0}
local dir = {x = 1, y = 0, z = 0}
world.set_node(pos, {name = "mesecons_mvps:test_stopper_cond", param2 = 0})
assert.is_true(not mesecon.mvps_push(pos, dir, 1, ""))
world.set_node(pos, {name = "mesecons_mvps:test_stopper_cond", param2 = 1})
assert.is_true((mesecon.mvps_push(pos, dir, 1, "")))
end)
-- TODO: I think this is supposed to work?
pending("is blocked by ignore", function()
local pos = {x = 0, y = 0, z = 0}
local dir = {x = 1, y = 0, z = 0}
world.set_node(pos, "mesecons:test_conductor_off")
world.set_node(vector.add(pos, dir), "ignore")
assert.is_true(not mesecon.mvps_push(pos, dir, 1, ""))
end)
it("moves metadata", function()
local pos = {x = 0, y = 0, z = 0}
local dir = {x = 1, y = 0, z = 0}
world.set_node(pos, "mesecons:test_conductor_off")
minetest.get_meta(pos):set_string("foo", "bar")
minetest.get_node_timer(pos):set(12, 34)
mesecon.mvps_push(pos, dir, 1, "")
assert.equal("bar", minetest.get_meta(vector.add(pos, dir)):get("foo"))
local moved_timer = minetest.get_node_timer(vector.add(pos, dir))
assert.equal(12, moved_timer:get_timeout())
assert.equal(34, moved_timer:get_elapsed())
moved_timer:stop()
assert.same({}, minetest.get_meta(pos):to_table().fields)
assert.is_false(minetest.get_node_timer(pos):is_started())
end)
it("calls move callbacks", function()
local pos = {x = 0, y = 0, z = 0}
local dir = {x = 1, y = 0, z = 0}
world.set_node(pos, {name = "mesecons_mvps:test_on_move", param2 = 123})
minetest.get_meta(pos):set_string("foo", "bar")
local move_info = {vector.add(pos, dir), world.get_node(pos), pos, minetest.get_meta(pos):to_table()}
mesecon.mvps_push(pos, dir, 1, "")
assert.equal(1, #mesecon._test_moves)
assert.same(move_info, mesecon._test_moves[1])
end)
it("executes autoconnect hooks", function()
local pos = {x = 0, y = 0, z = 0}
local dir = {x = 1, y = 0, z = 0}
world.set_node(pos, "mesecons:test_conductor_off")
mesecon.mvps_push(pos, dir, 1, "")
mineunit:execute_globalstep() -- Execute delayed autoconnect hook
assert.equal(2, #mesecon._test_autoconnects)
end)
it("updates moved receptors", function()
local pos1 = {x = 0, y = 0, z = 0}
local pos2 = vector.offset(pos1, 0, 1, 0)
local pos3 = vector.offset(pos1, 2, 0, 0)
local pos4 = vector.offset(pos1, 0, 0, 1)
local dir = {x = 1, y = 0, z = 0}
mesecon._test_place(pos1, "mesecons:test_receptor_on")
mesecon._test_place(pos2, "mesecons:test_conductor_off")
mesecon._test_place(pos3, "mesecons:test_conductor_off")
mesecon._test_place(pos4, "mesecons:test_conductor_off")
mesecon._test_place(vector.add(pos4, dir), "mesecons:test_conductor_off")
mineunit:execute_globalstep() -- Execute receptor_on action
mesecon.mvps_push(pos1, dir, 1, "")
mineunit:execute_globalstep() -- Execute receptor_on/receptor_off actions
assert.equal("mesecons:test_conductor_off", world.get_node(pos2).name)
assert.equal("mesecons:test_conductor_on", world.get_node(pos3).name)
assert.equal("mesecons:test_conductor_on", world.get_node(pos4).name)
end)
it("updates moved conductors", function()
local pos1 = {x = 0, y = 0, z = 0}
local pos2 = vector.offset(pos1, 0, 1, 0)
local pos3 = vector.offset(pos1, 0, -1, 0)
local dir = {x = 1, y = 0, z = 0}
mesecon._test_place(pos1, "mesecons:test_conductor_off")
mesecon._test_place(pos2, "mesecons:test_receptor_on")
mesecon._test_place(pos3, "mesecons:test_conductor_off")
mineunit:execute_globalstep() -- Execute receptor_on action
mesecon.mvps_push(pos1, dir, 1, "")
mineunit:execute_globalstep() -- Execute receptor_off action
assert.equal("mesecons:test_conductor_off", world.get_node(vector.add(pos1, dir)).name)
assert.equal("mesecons:test_conductor_off", world.get_node(pos3).name)
mesecon.mvps_pull_all(vector.add(pos1, dir), vector.multiply(dir, -1), 1, "")
mineunit:execute_globalstep() -- Execute receptor_on action
assert.equal("mesecons:test_conductor_on", world.get_node(pos1).name)
assert.equal("mesecons:test_conductor_on", world.get_node(pos3).name)
end)
it("updates moved effectors", function()
local pos = {x = 0, y = 0, z = 0}
local dir = {x = 1, y = 0, z = 0}
mesecon._test_place(pos, "mesecons:test_effector")
mesecon._test_place(vector.offset(pos, 0, 1, 0), "mesecons:test_receptor_on")
mesecon._test_place(vector.add(pos, dir), "mesecons:test_receptor_on")
mineunit:execute_globalstep() -- Execute receptor_on action
mineunit:execute_globalstep() -- Execute activate/change actions
mesecon.mvps_push(pos, dir, 2, "")
mineunit:execute_globalstep() -- Execute receptor_on/receptor_off actions
mineunit:execute_globalstep() -- Execute activate/deactivate/change actions
assert.equal(tonumber("10000001", 2), world.get_node(vector.add(pos, dir)).param2)
mineunit:execute_globalstep() -- Let the component cool down
mesecon.mvps_pull_single(vector.add(pos, dir), vector.multiply(dir, -1), 1, "")
mineunit:execute_globalstep() -- Execute receptor_on/receptor_off actions
mineunit:execute_globalstep() -- Execute activate/deactivate/change actions
assert.equal(tonumber("10000100", 2), world.get_node(pos).param2)
end)
-- Since turnon is called before turnoff when pushing, effectors may be incorrectly turned off.
it("does not overwrite turnon with receptor_off", function()
local pos = {x = 0, y = 0, z = 0}
local dir = {x = 1, y = 0, z = 0}
mesecon._test_place(pos, "mesecons:test_effector")
mesecon._test_place(vector.add(pos, dir), "mesecons:test_conductor_off")
mesecon._test_place(vector.add(pos, vector.multiply(dir, 2)), "mesecons:test_receptor_on")
mineunit:execute_globalstep() -- Execute receptor_on action
mineunit:execute_globalstep() -- Execute activate/change actions
mesecon.mvps_push(pos, dir, 3, "")
mineunit:execute_globalstep() -- Execute receptor_on/receptor_off actions
mineunit:execute_globalstep() -- Execute activate/deactivate/change actions
assert.equal(tonumber("10000001", 2), world.get_node(vector.add(pos, dir)).param2)
end)
-- mineunit doesn't yet implement minetest.check_for_falling.
pending("causes nodes to fall", function()
end)
end)
describe("protection", function()
teardown(function()
minetest.settings:remove("mesecon.mvps_protection_mode")
end)
after_each(function()
mesecon._test_reset()
world.clear()
end)
local protected_pos = {x = 1, y = 0, z = 0}
mineunit:protect(protected_pos, "Joe")
it("blocks movement", function()
minetest.settings:set("mesecon.mvps_protection_mode", "restrict")
local pos = {x = 0, y = 0, z = 0}
world.set_node(pos, "mesecons:test_conductor_off")
assert.same({false, "protected"}, {mesecon.mvps_push(pos, {x = 1, y = 0, z = 0}, 1, "Bob")})
end)
it("allows owner's movement", function()
minetest.settings:set("mesecon.mvps_protection_mode", "restrict")
local pos = {x = 0, y = 0, z = 0}
world.set_node(pos, "mesecons:test_conductor_off")
assert.is_true((mesecon.mvps_push(pos, {x = 1, y = 0, z = 0}, 1, "Joe")))
end)
it("'ignore'", function()
minetest.settings:set("mesecon.mvps_protection_mode", "ignore")
local pos = {x = 0, y = 0, z = 0}
world.set_node(pos, "mesecons:test_conductor_off")
assert.is_true((mesecon.mvps_push(pos, {x = 1, y = 0, z = 0}, 1, "Bob")))
end)
it("'normal'", function()
minetest.settings:set("mesecon.mvps_protection_mode", "normal")
local pos = {x = 0, y = 0, z = 0}
world.set_node(pos, "mesecons:test_conductor_off")
assert.same({false, "protected"}, {mesecon.mvps_push(pos, {x = 1, y = 0, z = 0}, 1, "")})
assert.is_true((mesecon.mvps_push(pos, {x = 0, y = 1, z = 0}, 1, "")))
end)
it("'compat'", function()
minetest.settings:set("mesecon.mvps_protection_mode", "compat")
local pos = {x = 0, y = 0, z = 0}
world.set_node(pos, "mesecons:test_conductor_off")
assert.is_true((mesecon.mvps_push(pos, {x = 1, y = 0, z = 0}, 1, "")))
end)
it("'restrict'", function()
minetest.settings:set("mesecon.mvps_protection_mode", "restrict")
local pos = {x = 0, y = 0, z = 0}
world.set_node(pos, "mesecons:test_conductor_off")
assert.same({false, "protected"}, {mesecon.mvps_push(pos, {x = 0, y = 1, z = 0}, 1, "")})
end)
end)