--
-- Locks mod
-- By Kaadmy, for Pixture
--

locks = {}

locks.picked_time = tonumber(minetest.setting_getbool("locks_picked_time")) or 15 -- unlocked for 15 seconds

local all_unlocked = minetest.setting_getbool("locks_all_unlocked")

function locks.is_locked(meta, player)
   local t = minetest.get_gametime()
   local lp = meta:get_float("last_lock_pick") or t + 1

   if all_unlocked then
      return false
   end

   if (lp < t) then
      return false
   else
      meta:set_float("last_lock_pick", 0)
   end

   return true
end

function locks.is_owner(meta, player)
   local name = player:get_player_name()
   local owner = meta:get_string("lock_owner")

   return (all_unlocked or (name == owner))
end

minetest.register_tool(
   "locks:pick",
   {
      description = "Lock Pick",
      
      inventory_image = "locks_pick.png",
      wield_image = "locks_pick.png",

      stack_max = 1,

      on_use = function(itemstack, player, pointed_thing)
		  if math.random(1, 5) <= 1 then
		     local pos = pointed_thing.under	

		     local meta = minetest.get_meta(pos)
		     meta:set_float("last_lock_pick", minetest.get_gametime() + locks.picked_time)

		     local own = meta:get_string("lock_owner")
		     if own then
			minetest.chat_send_player(
			   own,
			   player:get_player_name() .. " has broken into your locked chest!"
			)
		     end

		  end

		  itemstack:add_wear(8200) -- about 8 uses
		  return itemstack
	       end,
   })

minetest.register_craftitem(
   "locks:lock",
   {
      description = "Lock",

      inventory_image = "locks_lock.png",
      wield_image = "locks_lock.png",
   })

minetest.register_craft(
   {
      output = "locks:pick",
      recipe = {
	 {"", "", "default:ingot_steel"},
	 {"", "default:stick", ""},
	 {"default:stick", "", ""},
      },
   })

minetest.register_craft(
   {
      output = "locks:lock",
      recipe = {
	 {"", "default:ingot_steel", ""},
	 {"default:ingot_steel", "", "default:ingot_steel"},
	 {"group:planks", "group:planks", "group:planks"},
      },
   })

minetest.register_node(
   "locks:chest",
   {
      description = "Locked Chest",
      tiles ={"default_chest_top.png", "default_chest_top.png", "default_chest_sides.png",
	      "default_chest_sides.png", "default_chest_sides.png", "locks_chest_front.png"},
      paramtype2 = "facedir",
      groups = {snappy = 2, choppy = 2, oddly_breakable_by_hand = 2},
      is_ground_content = false,
      sounds = default.node_sound_wood_defaults(),
      on_construct = function(pos)
			    local form = default.ui.get_page("default_chest")
			    
			    local meta = minetest.get_meta(pos)
			    meta:set_string("formspec", form)
			    meta:set_float("last_lock_pick", 0)
			    
			    local inv = meta:get_inventory()
			    inv:set_size("main", 8 * 4)
		     end,
      after_place_node = function(pos, player)
			    local name = player:get_player_name()

			    local meta = minetest.get_meta(pos)
			    meta:set_string("infotext", "Locked Chest (Owned by " .. name .. ")")
			    meta:set_string("lock_owner", name)
			 end,
     on_rightclick = function(pos, node, player)
			 local meta = minetest.get_meta(pos)
			 if not locks.is_locked(meta, player) then
			    minetest.show_formspec(
			       player:get_player_name(),
			       "default_chest",
			       default.ui.get_page("default_chest")
			    )
			 end
		      end,
      allow_metadata_inventory_move = function(pos, from_l, from_i, to_l, to_i, cnt, player)
					 local meta = minetest.get_meta(pos)
					 if locks.is_locked(meta, player) then
					    return 0
					 end
					 return stack:get_count()
				      end,
      allow_metadata_inventory_put = function(pos, listname, index, itemstack, player)
					local meta = minetest.get_meta(pos)
					if locks.is_locked(meta, player) then
					   return 0
					end
					 return stack:get_count()
				     end,
      allow_metadata_inventory_take = function(pos, listname, index, itemstack, player)
					 local meta = minetest.get_meta(pos)
					 if locks.is_locked(meta, player) then
					    return 0
					 end
					 return stack:get_count()
				      end,
      can_dig = function(pos, player)
		   local meta = minetest.get_meta(pos)
		   local inv = meta:get_inventory()
		   return inv:is_empty("main") and locks.is_owner(meta, player)
		end,
      on_blast = function() end,
   })

minetest.register_craft(
   {
      output = "locks:chest",
      type = "shapeless",
      recipe = {"default:chest", "locks:lock"},
   })