forked from mtcontrib/connected_chests
		
	update big locked chest
This commit is contained in:
		@@ -1,4 +1,3 @@
 | 
			
		||||
TODO:
 | 
			
		||||
— finish adding a big locked chest
 | 
			
		||||
— maybe use [combine for front and lock
 | 
			
		||||
— get more stuff from the default chests
 | 
			
		||||
— get more stuff from the default chests (minetest.registered_nodes)
 | 
			
		||||
 
 | 
			
		||||
							
								
								
									
										191
									
								
								init.lua
									
									
									
									
									
								
							
							
						
						
									
										191
									
								
								init.lua
									
									
									
									
									
								
							@@ -1,6 +1,45 @@
 | 
			
		||||
local load_time_start = os.clock()
 | 
			
		||||
 | 
			
		||||
local function get_pointed_info(pointed_thing)
 | 
			
		||||
local creative_enabled = minetest.setting_getbool("creative_mode")
 | 
			
		||||
 | 
			
		||||
local chests = {
 | 
			
		||||
	["default:chest"] = function(pu, pa, par, stuff)
 | 
			
		||||
		minetest.add_node(pu, {name="connected_chests:chest_left", param2=par})
 | 
			
		||||
		minetest.add_node(pa, {name="connected_chests:chest_right", param2=par})
 | 
			
		||||
 | 
			
		||||
		local meta = minetest.get_meta(pu)
 | 
			
		||||
		meta:set_string("formspec",
 | 
			
		||||
			"size[13,9]"..
 | 
			
		||||
			"list[current_name;main;0,0;13,5;]"..
 | 
			
		||||
			"list[current_player;main;2.5,5.2;8,4;]"
 | 
			
		||||
		)
 | 
			
		||||
		meta:set_string("infotext", "Big Chest")
 | 
			
		||||
		local inv = meta:get_inventory()
 | 
			
		||||
		inv:set_size("main", 65)
 | 
			
		||||
		inv:set_list("main", stuff)
 | 
			
		||||
	end,
 | 
			
		||||
	["default:chest_locked"] = function(pu, pa, par, stuff, name, owner)
 | 
			
		||||
		local owner = owner or name
 | 
			
		||||
		minetest.add_node(pu, {name="connected_chests:chest_locked_left", param2=par})
 | 
			
		||||
		minetest.add_node(pa, {name="connected_chests:chest_locked_right", param2=par})
 | 
			
		||||
 | 
			
		||||
		local meta = minetest.get_meta(pu)
 | 
			
		||||
		meta:set_string("owner", owner)
 | 
			
		||||
		meta:set_string("formspec",
 | 
			
		||||
			"size[13,9]"..
 | 
			
		||||
			"list[current_name;main;0,0;13,5;]"..
 | 
			
		||||
			"list[current_player;main;2.5,5.2;8,4;]"
 | 
			
		||||
		)
 | 
			
		||||
		meta:set_string("infotext", "Big Locked Chest (owned by "..
 | 
			
		||||
				meta:get_string("owner")..")")
 | 
			
		||||
		local inv = meta:get_inventory()
 | 
			
		||||
		inv:set_size("main", 65)
 | 
			
		||||
		inv:set_list("main", stuff)
 | 
			
		||||
	end,
 | 
			
		||||
}
 | 
			
		||||
 | 
			
		||||
 | 
			
		||||
local function get_pointed_info(pointed_thing, name)
 | 
			
		||||
	if not pointed_thing then
 | 
			
		||||
		return
 | 
			
		||||
	end
 | 
			
		||||
@@ -13,17 +52,12 @@ local function get_pointed_info(pointed_thing)
 | 
			
		||||
		return
 | 
			
		||||
	end
 | 
			
		||||
	local nd_u = minetest.get_node(pu)
 | 
			
		||||
	if nd_u.name ~= "default:chest" then
 | 
			
		||||
	if nd_u.name ~= name then
 | 
			
		||||
		return
 | 
			
		||||
	end
 | 
			
		||||
	return pu, pa, nd_u.param2
 | 
			
		||||
end
 | 
			
		||||
 | 
			
		||||
local big_chest_formspec = 
 | 
			
		||||
	"size[13,9]"..
 | 
			
		||||
	"list[current_name;main;0,0;13,5;]"..
 | 
			
		||||
	"list[current_player;main;2.5,5.2;8,4;]"
 | 
			
		||||
 | 
			
		||||
local param_tab = {
 | 
			
		||||
	["-1 0"] = 0,
 | 
			
		||||
	 ["1 0"] = 2,
 | 
			
		||||
@@ -33,44 +67,44 @@ local param_tab = {
 | 
			
		||||
 | 
			
		||||
local pars = {[0]=2, 3, 0, 1}
 | 
			
		||||
 | 
			
		||||
local function connect_chests(pu, pa, old_param2)
 | 
			
		||||
	local stuff = minetest.get_meta(pu):get_inventory():get_list("main")
 | 
			
		||||
local function connect_chests(pu, pa, old_param2, name)
 | 
			
		||||
	local oldmeta = minetest.get_meta(pu)
 | 
			
		||||
	local stuff = oldmeta:get_inventory():get_list("main")
 | 
			
		||||
	local owner = oldmeta:get_string("owner")
 | 
			
		||||
 | 
			
		||||
	local par = param_tab[pu.x-pa.x.." "..pu.z-pa.z]
 | 
			
		||||
	if param_tab[pa.x-pu.x.." "..pa.z-pu.z] == old_param2 then
 | 
			
		||||
	local par_inverted = pars[par]
 | 
			
		||||
	if old_param2 == par_inverted then
 | 
			
		||||
		pu, pa = pa, pu
 | 
			
		||||
		par = pars[par]
 | 
			
		||||
		par = par_inverted
 | 
			
		||||
	end
 | 
			
		||||
	minetest.add_node(pu, {name="connected_chests:chest_left", param2=par})
 | 
			
		||||
	minetest.add_node(pa, {name="connected_chests:chest_right", param2=par})
 | 
			
		||||
 | 
			
		||||
	local meta = minetest.get_meta(pu)
 | 
			
		||||
	meta:set_string("formspec", big_chest_formspec)
 | 
			
		||||
	meta:set_string("infotext", "Big Chest")
 | 
			
		||||
	local inv = meta:get_inventory()
 | 
			
		||||
	inv:set_size("main", 65)
 | 
			
		||||
	inv:set_list("main", stuff)
 | 
			
		||||
	chests[name](pu, pa, par, stuff, name, owner)
 | 
			
		||||
end
 | 
			
		||||
 | 
			
		||||
local place_chest = minetest.registered_nodes["default:chest"].on_place
 | 
			
		||||
minetest.override_item("default:chest", {
 | 
			
		||||
	on_place = function(itemstack, placer, pointed_thing)
 | 
			
		||||
		if not placer then
 | 
			
		||||
			return
 | 
			
		||||
for name,_ in pairs(chests) do
 | 
			
		||||
	local place_chest = minetest.registered_nodes[name].on_place
 | 
			
		||||
	minetest.override_item(name, {
 | 
			
		||||
		on_place = function(itemstack, placer, pointed_thing)
 | 
			
		||||
			if not placer then
 | 
			
		||||
				return
 | 
			
		||||
			end
 | 
			
		||||
			local pu, pa, par2 = get_pointed_info(pointed_thing, name)
 | 
			
		||||
			if not (pu and placer:get_player_control().sneak) then
 | 
			
		||||
				return place_chest(itemstack, placer, pointed_thing)
 | 
			
		||||
			end
 | 
			
		||||
			local protected = minetest.is_protected(pa, placer:get_player_name())
 | 
			
		||||
			if protected then
 | 
			
		||||
				return
 | 
			
		||||
			end
 | 
			
		||||
			connect_chests(pu, pa, par2, name)
 | 
			
		||||
			if not creative_enabled then
 | 
			
		||||
				itemstack:take_item()
 | 
			
		||||
				return itemstack
 | 
			
		||||
			end
 | 
			
		||||
		end
 | 
			
		||||
		local pu, pa, nd_u = get_pointed_info(pointed_thing)
 | 
			
		||||
		if not pu then
 | 
			
		||||
			return place_chest(itemstack, placer, pointed_thing)
 | 
			
		||||
		end
 | 
			
		||||
		local protected = minetest.is_protected(pa, placer:get_player_name())
 | 
			
		||||
		if protected then
 | 
			
		||||
			return
 | 
			
		||||
		end
 | 
			
		||||
		connect_chests(pu, pa, nd_u)
 | 
			
		||||
		itemstack:take_item()
 | 
			
		||||
		return itemstack
 | 
			
		||||
	end
 | 
			
		||||
})
 | 
			
		||||
	})
 | 
			
		||||
end
 | 
			
		||||
 | 
			
		||||
local function remove_next(pos, oldnode)
 | 
			
		||||
	local p1 = oldnode.param2
 | 
			
		||||
@@ -86,6 +120,11 @@ local function remove_next(pos, oldnode)
 | 
			
		||||
	minetest.remove_node(pos)
 | 
			
		||||
end
 | 
			
		||||
 | 
			
		||||
local function log_access(pos, player, text)
 | 
			
		||||
	minetest.log("action", player:get_player_name()..
 | 
			
		||||
		" moves stuff "..text.." at "..minetest.pos_to_string(pos))
 | 
			
		||||
end
 | 
			
		||||
 | 
			
		||||
minetest.register_node("connected_chests:chest_left", {
 | 
			
		||||
	tiles = {"connected_chests_top.png", "connected_chests_top.png", "default_obsidian_glass.png",
 | 
			
		||||
		"default_chest_side.png", "connected_chests_side.png^[transformFX", "connected_chests_side.png^connected_chests_front.png"},
 | 
			
		||||
@@ -107,16 +146,13 @@ minetest.register_node("connected_chests:chest_left", {
 | 
			
		||||
	end,
 | 
			
		||||
	after_dig_node = remove_next,
 | 
			
		||||
	on_metadata_inventory_move = function(pos, _, _, _, _, _, player)
 | 
			
		||||
		minetest.log("action", player:get_player_name()..
 | 
			
		||||
				" moves stuff in big chest at "..minetest.pos_to_string(pos))
 | 
			
		||||
		log_access(pos, player, "in a big chest")
 | 
			
		||||
	end,
 | 
			
		||||
    on_metadata_inventory_put = function(pos, _, _, _, player)
 | 
			
		||||
		minetest.log("action", player:get_player_name()..
 | 
			
		||||
				" moves stuff to big chest at "..minetest.pos_to_string(pos))
 | 
			
		||||
		log_access(pos, player, "to a big chest")
 | 
			
		||||
	end,
 | 
			
		||||
    on_metadata_inventory_take = function(pos, _, _, _, player)
 | 
			
		||||
		minetest.log("action", player:get_player_name()..
 | 
			
		||||
				" takes stuff from big chest at "..minetest.pos_to_string(pos))
 | 
			
		||||
		log_access(pos, player, "from a big chest")
 | 
			
		||||
	end,
 | 
			
		||||
})
 | 
			
		||||
 | 
			
		||||
@@ -128,6 +164,18 @@ local function has_locked_chest_privilege(meta, player)
 | 
			
		||||
	return true
 | 
			
		||||
end
 | 
			
		||||
 | 
			
		||||
local function access_allowed(pos, player, count)
 | 
			
		||||
	local meta = minetest.get_meta(pos)
 | 
			
		||||
	if not has_locked_chest_privilege(meta, player) then
 | 
			
		||||
		minetest.log("action", player:get_player_name()..
 | 
			
		||||
				" tried to access a big locked chest belonging to "..
 | 
			
		||||
				meta:get_string("owner").." at "..
 | 
			
		||||
				minetest.pos_to_string(pos))
 | 
			
		||||
		return 0
 | 
			
		||||
	end
 | 
			
		||||
	return count
 | 
			
		||||
end
 | 
			
		||||
 | 
			
		||||
minetest.register_node("connected_chests:chest_locked_left", {
 | 
			
		||||
	tiles = {"connected_chests_top.png", "connected_chests_top.png", "default_obsidian_glass.png",
 | 
			
		||||
		"default_chest_side.png", "connected_chests_side.png^[transformFX", "connected_chests_side.png^connected_chests_lock.png"},
 | 
			
		||||
@@ -142,13 +190,13 @@ minetest.register_node("connected_chests:chest_locked_left", {
 | 
			
		||||
			{-0.5, -0.5, -0.5, 1.5, 0.5, 0.5},
 | 
			
		||||
		},
 | 
			
		||||
	},
 | 
			
		||||
	after_place_node = function(pos, placer)
 | 
			
		||||
	--[[after_place_node = function(pos, placer)
 | 
			
		||||
		local meta = minetest.get_meta(pos)
 | 
			
		||||
		meta:set_string("owner", placer:get_player_name() or "")
 | 
			
		||||
		meta:set_string("infotext", "Locked Chest (owned by "..
 | 
			
		||||
				meta:get_string("owner")..")")
 | 
			
		||||
	end,
 | 
			
		||||
	--[[on_construct = function(pos)
 | 
			
		||||
	on_construct = function(pos)
 | 
			
		||||
		local meta = minetest.get_meta(pos)
 | 
			
		||||
		meta:set_string("infotext", "Locked Chest")
 | 
			
		||||
		meta:set_string("owner", "")
 | 
			
		||||
@@ -161,58 +209,33 @@ minetest.register_node("connected_chests:chest_locked_left", {
 | 
			
		||||
		return inv:is_empty("main") and has_locked_chest_privilege(meta, player)
 | 
			
		||||
	end,
 | 
			
		||||
	after_dig_node = remove_next,
 | 
			
		||||
	allow_metadata_inventory_move = function(pos, from_list, from_index, to_list, to_index, count, player)
 | 
			
		||||
		local meta = minetest.get_meta(pos)
 | 
			
		||||
		if not has_locked_chest_privilege(meta, player) then
 | 
			
		||||
			minetest.log("action", player:get_player_name()..
 | 
			
		||||
					" tried to access a locked chest belonging to "..
 | 
			
		||||
					meta:get_string("owner").." at "..
 | 
			
		||||
					minetest.pos_to_string(pos))
 | 
			
		||||
			return 0
 | 
			
		||||
		end
 | 
			
		||||
		return count
 | 
			
		||||
	allow_metadata_inventory_move = function(pos, _, _, _, _, count, player)
 | 
			
		||||
		return access_allowed(pos, player, count)
 | 
			
		||||
	end,
 | 
			
		||||
    allow_metadata_inventory_put = function(pos, listname, index, stack, player)
 | 
			
		||||
		local meta = minetest.get_meta(pos)
 | 
			
		||||
		if not has_locked_chest_privilege(meta, player) then
 | 
			
		||||
			minetest.log("action", player:get_player_name()..
 | 
			
		||||
					" tried to access a locked chest belonging to "..
 | 
			
		||||
					meta:get_string("owner").." at "..
 | 
			
		||||
					minetest.pos_to_string(pos))
 | 
			
		||||
			return 0
 | 
			
		||||
		end
 | 
			
		||||
		return stack:get_count()
 | 
			
		||||
    allow_metadata_inventory_put = function(pos, _, _, stack, player)
 | 
			
		||||
		return access_allowed(pos, player, stack:get_count())
 | 
			
		||||
	end,
 | 
			
		||||
    allow_metadata_inventory_take = function(pos, listname, index, stack, player)
 | 
			
		||||
		local meta = minetest.get_meta(pos)
 | 
			
		||||
		if not has_locked_chest_privilege(meta, player) then
 | 
			
		||||
			minetest.log("action", player:get_player_name()..
 | 
			
		||||
					" tried to access a locked chest belonging to "..
 | 
			
		||||
					meta:get_string("owner").." at "..
 | 
			
		||||
					minetest.pos_to_string(pos))
 | 
			
		||||
			return 0
 | 
			
		||||
		end
 | 
			
		||||
		return stack:get_count()
 | 
			
		||||
    allow_metadata_inventory_take = function(pos, _, _, stack, player)
 | 
			
		||||
		return access_allowed(pos, player, stack:get_count())
 | 
			
		||||
	end,
 | 
			
		||||
	on_metadata_inventory_move = function(pos, _, _, _, _, _, player)
 | 
			
		||||
		minetest.log("action", player:get_player_name()..
 | 
			
		||||
				" moves stuff in big locked chest at "..minetest.pos_to_string(pos))
 | 
			
		||||
		log_access(pos, player, "in a big locked chest")
 | 
			
		||||
	end,
 | 
			
		||||
    on_metadata_inventory_put = function(pos, _, _, _, player)
 | 
			
		||||
		minetest.log("action", player:get_player_name()..
 | 
			
		||||
				" moves stuff to big locked chest at "..minetest.pos_to_string(pos))
 | 
			
		||||
		log_access(pos, player, "to a big locked chest")
 | 
			
		||||
	end,
 | 
			
		||||
    on_metadata_inventory_take = function(pos, _, _, _, player)
 | 
			
		||||
		minetest.log("action", player:get_player_name()..
 | 
			
		||||
				" takes stuff from big locked chest at "..minetest.pos_to_string(pos))
 | 
			
		||||
		log_access(pos, player, "from a big locked chest")
 | 
			
		||||
	end,
 | 
			
		||||
	on_rightclick = function(pos, node, clicker)
 | 
			
		||||
	on_rightclick = function(pos, _, clicker)
 | 
			
		||||
		local meta = minetest.get_meta(pos)
 | 
			
		||||
		if has_locked_chest_privilege(meta, clicker) then
 | 
			
		||||
			minetest.show_formspec(
 | 
			
		||||
				clicker:get_player_name(),
 | 
			
		||||
				"default:chest_locked",
 | 
			
		||||
				default.get_locked_chest_formspec(pos)
 | 
			
		||||
				"connected_chests:chest_locked_left",
 | 
			
		||||
				"size[13,9]"..
 | 
			
		||||
				"list[nodemeta:".. pos.x .. "," .. pos.y .. "," ..pos.z .. ";main;0,0;13,5;]"..
 | 
			
		||||
				"list[current_player;main;2.5,5.2;8,4;]"
 | 
			
		||||
			)
 | 
			
		||||
		end
 | 
			
		||||
	end,
 | 
			
		||||
 
 | 
			
		||||
		Reference in New Issue
	
	Block a user