First Commit by TenPlus1
authortenplus1 <kinsellaja@yahoo.com>
Sun, 9 Nov 2014 19:43:01 +0000 (19:43 +0000)
committertenplus1 <kinsellaja@yahoo.com>
Sun, 9 Nov 2014 19:43:01 +0000 (19:43 +0000)
README.md [new file with mode: 0644]
depends.txt [new file with mode: 0644]
init.lua [new file with mode: 0644]
license.txt [new file with mode: 0644]
textures/protector_display.png [new file with mode: 0644]
textures/protector_logo.png [new file with mode: 0644]
textures/protector_side.png [new file with mode: 0644]
textures/protector_top.png [new file with mode: 0644]

diff --git a/README.md b/README.md
new file mode 100644 (file)
index 0000000..8548d8d
--- /dev/null
+++ b/README.md
@@ -0,0 +1,7 @@
+minetest-protect
+================
+
+Protector mod for minetest
+based on glomie's mod, remade by Zeg9 and reworked by TenPlus1 to support minetest 0.4.9
+
+Released under WTFPL
\ No newline at end of file
diff --git a/depends.txt b/depends.txt
new file mode 100644 (file)
index 0000000..4cfb8a9
--- /dev/null
@@ -0,0 +1,2 @@
+default
+doors
\ No newline at end of file
diff --git a/init.lua b/init.lua
new file mode 100644 (file)
index 0000000..b3b9cbc
--- /dev/null
+++ b/init.lua
@@ -0,0 +1,619 @@
+minetest.register_privilege("delprotect","Ignore other players protection")
+
+protector = {}
+protector.radius = 5
+
+protector.get_member_list = function(meta)
+       local s = meta:get_string("members")
+       local list = s:split(" ")
+       return list
+end
+
+protector.set_member_list = function(meta, list)
+       meta:set_string("members", table.concat(list, " "))
+end
+
+protector.is_member = function (meta, name)
+       local list = protector.get_member_list(meta)
+       for _, n in ipairs(list) do
+               if n == name then
+                       return true
+               end
+       end
+       return false
+end
+
+protector.add_member = function(meta, name)
+       if protector.is_member(meta, name) then return end
+       local list = protector.get_member_list(meta)
+       table.insert(list,name)
+       protector.set_member_list(meta,list)
+end
+
+protector.del_member = function(meta,name)
+       local list = protector.get_member_list(meta)
+       for i, n in ipairs(list) do
+               if n == name then
+                       table.remove(list, i)
+                       break
+               end
+       end
+       protector.set_member_list(meta,list)
+end
+
+-- Protector Interface
+
+protector.generate_formspec = function(meta)
+       if meta:get_int("page") == nil then meta:set_int("page",0) end
+       local formspec = "size[8,7]"
+               .."label[0,0;-- Protector interface --]"
+               .."label[0,1;Punch node to show protected area]"
+               .."label[0,2;Members: (type nick, press Enter to add)]"
+       members = protector.get_member_list(meta)
+       
+       local npp = 12 -- was 15, names per page
+       local s = 0
+       local i = 0
+       for _, member in ipairs(members) do
+               if s < meta:get_int("page")*15 then s = s +1 else
+                       if i < npp then
+                               formspec = formspec .. "button["..(i%4*2)..","
+                               ..math.floor(i/4+3)..";1.5,.5;protector_member;"..member.."]"
+                               formspec = formspec .. "button["..(i%4*2+1.25)..","
+                               ..math.floor(i/4+3)..";.75,.5;protector_del_member_"..member..";X]"
+                       end
+                       i = i +1
+               end
+       end
+       local add_i = i
+       if add_i < npp then
+               formspec = formspec
+               .."field["..(add_i%4*2+1/3)..","..(math.floor(add_i/4+3)+1/3)..";1.433,.5;protector_add_member;;]"
+       end
+                               formspec = formspec.."button_exit[1,6.2;2,0.5;close_me;<< Back]"
+       return formspec
+end
+
+-- ACTUAL PROTECTION SECTION
+
+-- Infolevel:
+-- 0 for no info
+-- 1 for "This area is owned by <owner> !" if you can't dig
+-- 2 for "This area is owned by <owner>.
+-- 3 for checking protector overlaps
+
+protector.can_dig = function(r,pos,digger,onlyowner,infolevel)
+
+       if not digger then
+               return false
+       end
+
+       local whois = digger
+
+       -- Delprotect privileged users can override protections
+
+       if minetest.check_player_privs(whois, {delprotect=true}) and infolevel == 1 then
+               return true
+       end
+
+       if infolevel == 3 then infolevel = 1 end
+
+       -- Find the protector nodes
+
+       local positions = minetest.find_nodes_in_area(
+               {x=pos.x-r, y=pos.y-r, z=pos.z-r},
+               {x=pos.x+r, y=pos.y+r, z=pos.z+r},
+               {"protector:protect", "protector:protect2"})
+
+       for _, pos in ipairs(positions) do
+               local meta = minetest.env:get_meta(pos)
+               local owner = meta:get_string("owner")
+
+               if owner ~= whois then 
+                       if onlyowner or not protector.is_member(meta, whois) then
+                               if infolevel == 1 then
+                                       minetest.chat_send_player(whois, "This area is owned by "..owner.." !")
+                               elseif infolevel == 2 then
+                                       minetest.chat_send_player(whois,"This area is owned by "..meta:get_string("owner")..".")
+                                       if meta:get_string("members") ~= "" then
+                                               minetest.chat_send_player(whois,"Members: "..meta:get_string("members")..".")
+                                       end
+                               end
+                               return false
+                       end
+               end
+       end
+
+       if infolevel == 2 then
+               if #positions < 1 then
+                       minetest.chat_send_player(whois,"This area is not protected.")
+               else
+                       local meta = minetest.env:get_meta(positions[1])
+                       minetest.chat_send_player(whois,"This area is owned by "..meta:get_string("owner")..".")
+                       if meta:get_string("members") ~= "" then
+                               minetest.chat_send_player(whois,"Members: "..meta:get_string("members")..".")
+                       end
+               end
+               minetest.chat_send_player(whois,"You can build here.")
+       end
+       return true
+end
+
+-- Can node be added or removed, if so return node else true (for protected)
+
+protector.old_is_protected = minetest.is_protected
+minetest.is_protected = function(pos, digger)
+
+       if protector.can_dig(protector.radius, pos, digger, false, 1) then
+               return protector.old_is_protected(pos, digger)
+       else
+               return true
+       end
+end
+
+-- Make sure protection block doesn't overlap another protector's area
+
+protector.old_node_place = minetest.item_place
+function minetest.item_place(itemstack, placer, pointed_thing)
+
+       if itemstack:get_name() == "protector:protect" or itemstack:get_name() == "protector:protect2" then
+               local pos = pointed_thing.above
+               local user = placer:get_player_name()
+               if not protector.can_dig(protector.radius * 2, pos, user, true, 3) then
+                       minetest.chat_send_player(placer:get_player_name(),"Overlaps into another protected area")
+                       return protector.old_node_place(itemstack, placer, pos)
+               end
+       end
+
+       return protector.old_node_place(itemstack, placer, pointed_thing)
+end
+
+-- END
+
+--= Protection Block
+
+minetest.register_node("protector:protect", {
+       description = "Protection Block",
+       tiles = {"protector_top.png","protector_top.png","protector_side.png"},
+       sounds = default.node_sound_stone_defaults(),
+       groups = {dig_immediate=2},
+       drawtype = "nodebox",
+       node_box = {
+               type="fixed",
+               fixed = { -0.5, -0.5, -0.5, 0.5, 0.5, 0.5 },
+       },
+       selection_box = { type="regular" },
+       paramtype = "light",
+
+       after_place_node = function(pos, placer)
+               local meta = minetest.env:get_meta(pos)
+               meta:set_string("owner", placer:get_player_name() or "")
+               meta:set_string("infotext", "Protection (owned by "..
+               meta:get_string("owner")..")")
+               meta:set_string("members", "")
+       end,
+
+       on_use = function(itemstack, user, pointed_thing)
+               if pointed_thing.type ~= "node" then
+                       return
+               end
+
+               protector.can_dig(5,pointed_thing.under,user:get_player_name(),false,2)
+       end,
+
+       on_rightclick = function(pos, node, clicker, itemstack)
+               local meta = minetest.env:get_meta(pos)
+               if protector.can_dig(1,pos,clicker:get_player_name(),true,1) then
+                       minetest.show_formspec(clicker:get_player_name(), 
+                       "protector_"..minetest.pos_to_string(pos), protector.generate_formspec(meta)
+                       )
+               end
+       end,
+
+       on_punch = function(pos, node, puncher)
+               if not protector.can_dig(1,pos,puncher:get_player_name(),true,1) then
+                       return
+               end
+
+               local objs = minetest.env:get_objects_inside_radius(pos,.5)
+               minetest.env:add_entity(pos, "protector:display")
+               minetest.env:get_node_timer(pos):start(10)
+       end,
+
+       on_timer = function(pos)
+               local objs = minetest.env:get_objects_inside_radius(pos,.5)
+               for _, o in pairs(objs) do
+                       if (not o:is_player()) and o:get_luaentity().name == "protector:display" then
+                               o:remove()
+                       end
+               end
+       end,
+})
+
+minetest.register_craft({
+       output = "protector:protect 4",
+       recipe = {
+               {"default:stone","default:stone","default:stone"},
+               {"default:stone","default:steel_ingot","default:stone"},
+               {"default:stone","default:stone","default:stone"},
+       }
+})
+
+--= Protection Logo
+
+minetest.register_node("protector:protect2", {
+       description = "Protection Logo",
+       tiles = {"protector_logo.png"},
+       wield_image = "protector_logo.png",
+       inventory_image = "protector_logo.png",
+       sounds = default.node_sound_stone_defaults(),
+       groups = {dig_immediate=2},
+       paramtype = 'light',
+       paramtype2 = "wallmounted",
+       drawtype = "nodebox",
+       sunlight_propagates = true,
+       walkable = true,
+       node_box = {
+               type = "wallmounted",
+               wall_top    = {-0.375, 0.4375, -0.5, 0.375, 0.5, 0.5},
+               wall_bottom = {-0.375, -0.5, -0.5, 0.375, -0.4375, 0.5},
+               wall_side   = {-0.5, -0.5, -0.375, -0.4375, 0.5, 0.375},
+       },
+       selection_box = {type = "wallmounted"},
+
+       after_place_node = function(pos, placer)
+               local meta = minetest.env:get_meta(pos)
+               meta:set_string("owner", placer:get_player_name() or "")
+               meta:set_string("infotext", "Protection (owned by "..
+               meta:get_string("owner")..")")
+               meta:set_string("members", "")
+       end,
+
+       on_use = function(itemstack, user, pointed_thing)
+               if pointed_thing.type ~= "node" then
+                       return
+               end
+
+               protector.can_dig(5,pointed_thing.under,user:get_player_name(),false,2)
+       end,
+
+       on_rightclick = function(pos, node, clicker, itemstack)
+               local meta = minetest.env:get_meta(pos)
+               if protector.can_dig(1,pos,clicker:get_player_name(),true,1) then
+                       minetest.show_formspec(clicker:get_player_name(), 
+                       "protector_"..minetest.pos_to_string(pos), protector.generate_formspec(meta)
+                       )
+               end
+       end,
+
+       on_punch = function(pos, node, puncher)
+               if not protector.can_dig(1,pos,puncher:get_player_name(),true,1) then
+                       return
+               end
+
+               local objs = minetest.env:get_objects_inside_radius(pos,.5)
+               minetest.env:add_entity(pos, "protector:display")
+               minetest.env:get_node_timer(pos):start(10)
+       end,
+
+       on_timer = function(pos)
+               local objs = minetest.env:get_objects_inside_radius(pos,.5)
+               for _, o in pairs(objs) do
+                       if (not o:is_player()) and o:get_luaentity().name == "protector:display" then
+                               o:remove()
+                       end
+               end
+       end,
+})
+
+minetest.register_craft({
+       output = "protector:protect2 4",
+       recipe = {
+               {"default:stone","default:stone","default:stone"},
+               {"default:stone","default:copper_ingot","default:stone"},
+               {"default:stone","default:stone","default:stone"},
+       }
+})
+
+-- If name entered into protector formspec
+
+minetest.register_on_player_receive_fields(function(player,formname,fields)
+       if string.sub(formname,0,string.len("protector_")) == "protector_" then
+               local pos_s = string.sub(formname,string.len("protector_")+1)
+               local pos = minetest.string_to_pos(pos_s)
+               local meta = minetest.env:get_meta(pos)
+
+               if meta:get_int("page") == nil then meta:set_int("page",0) end
+
+               if not protector.can_dig(1,pos,player:get_player_name(),true,1) then
+                       return
+               end
+
+               if fields.protector_add_member then
+                       for _, i in ipairs(fields.protector_add_member:split(" ")) do
+                               protector.add_member(meta,i)
+                       end
+               end
+
+               for field, value in pairs(fields) do
+                       if string.sub(field,0,string.len("protector_del_member_"))=="protector_del_member_" then
+                               protector.del_member(meta, string.sub(field,string.len("protector_del_member_")+1))
+                       end
+               end
+
+               if fields.protector_page_prev then
+                       meta:set_int("page",meta:get_int("page")-1)
+               end
+
+               if fields.protector_page_next then
+                       meta:set_int("page",meta:get_int("page")+1)
+               end
+
+               if fields.close_me then
+                       meta:set_int("page",meta:get_int("page"))
+                       else minetest.show_formspec(player:get_player_name(), formname, protector.generate_formspec(meta))
+               end
+       end
+end)
+
+minetest.register_entity("protector:display", {
+       physical = false,
+       collisionbox = {0,0,0,0,0,0},
+       visual = "wielditem",
+       visual_size = {x=1.0/1.5,y=1.0/1.5}, -- wielditem seems to be scaled to 1.5 times original node size
+       textures = {"protector:display_node"},
+       on_step = function(self, dtime)
+               nam = minetest.get_node(self.object:getpos()).name
+               if nam ~= "protector:protect" and nam ~= "protector:protect2" then
+                       self.object:remove()
+                       return
+               end
+       end,
+})
+
+-- Display-zone node, Do NOT place the display as a node, it is made to be used as an entity (see above)
+local x = protector.radius
+minetest.register_node("protector:display_node", {
+       tiles = {"protector_display.png"},
+       use_texture_alpha = true,
+       walkable = false,
+       drawtype = "nodebox",
+       node_box = {
+               type = "fixed",
+               fixed = {
+                       -- sides
+                       {-(x+.55), -(x+.55), -(x+.55), -(x+.45), (x+.55), (x+.55)},
+                       {-(x+.55), -(x+.55), (x+.45), (x+.55), (x+.55), (x+.55)},
+                       {(x+.45), -(x+.55), -(x+.55), (x+.55), (x+.55), (x+.55)},
+                       {-(x+.55), -(x+.55), -(x+.55), (x+.55), (x+.55), -(x+.45)},
+                       -- top
+                       {-(x+.55), (x+.45), -(x+.55), (x+.55), (x+.55), (x+.55)},
+                       -- bottom
+                       {-(x+.55), -(x+.55), -(x+.55), (x+.55), -(x+.45), (x+.55)},
+                       -- middle (surround protector)
+                       {-.55,-.55,-.55, .55,.55,.55},
+               },
+       },
+       selection_box = {
+               type = "regular",
+       },
+       paramtype = "light",
+       groups = {dig_immediate=3,not_in_creative_inventory=1},
+       drop = "",
+})
+
+-- Register Protected Doors
+
+local function on_rightclick(pos, dir, check_name, replace, replace_dir, params)
+       pos.y = pos.y+dir
+       if not minetest.get_node(pos).name == check_name then
+               return
+       end
+       local p2 = minetest.get_node(pos).param2
+       p2 = params[p2+1]
+               
+       minetest.swap_node(pos, {name=replace_dir, param2=p2})
+               
+       pos.y = pos.y-dir
+       minetest.swap_node(pos, {name=replace, param2=p2})
+
+       local snd_1 = "door_close"
+       local snd_2 = "door_open" 
+       if params[1] == 3 then
+               snd_1 = "door_open"
+               snd_2 = "door_close"
+       end
+
+       if minetest.get_meta(pos):get_int("right") ~= 0 then
+               minetest.sound_play(snd_1, {pos = pos, gain = 0.3, max_hear_distance = 10})
+       else
+               minetest.sound_play(snd_2, {pos = pos, gain = 0.3, max_hear_distance = 10})
+       end
+end
+
+-- Protected Wooden Door
+
+local name = "protector:door_wood"
+
+doors.register_door(name, {
+       description = "Protected Wooden Door",
+       inventory_image = "door_wood.png",
+       groups = {snappy=1,choppy=2,oddly_breakable_by_hand=2,flammable=2,door=1},
+       tiles_bottom = {"door_wood_b.png^protector_logo.png", "door_brown.png"},
+       tiles_top = {"door_wood_a.png", "door_brown.png"},
+       sounds = default.node_sound_wood_defaults(),
+       sunlight = false,
+})
+
+minetest.override_item(name.."_b_1", {
+       on_rightclick = function(pos, node, clicker)
+               if not minetest.is_protected(pos, clicker:get_player_name()) then
+                       on_rightclick(pos, 1, name.."_t_1", name.."_b_2", name.."_t_2", {1,2,3,0})
+               end
+       end,
+})
+
+minetest.override_item(name.."_t_1", {
+       on_rightclick = function(pos, node, clicker)
+               if not minetest.is_protected(pos, clicker:get_player_name()) then
+                       on_rightclick(pos, -1, name.."_b_1", name.."_t_2", name.."_b_2", {1,2,3,0})
+               end
+       end,
+})
+
+minetest.override_item(name.."_b_2", {
+       on_rightclick = function(pos, node, clicker)
+               if not minetest.is_protected(pos, clicker:get_player_name()) then
+                       on_rightclick(pos, 1, name.."_t_2", name.."_b_1", name.."_t_1", {3,0,1,2})
+               end
+       end,
+})
+
+minetest.override_item(name.."_t_2", {
+       on_rightclick = function(pos, node, clicker)
+               if not minetest.is_protected(pos, clicker:get_player_name()) then
+                       on_rightclick(pos, -1, name.."_b_2", name.."_t_1", name.."_b_1", {3,0,1,2})
+               end
+       end,
+})
+
+minetest.register_craft({
+       output = name,
+       recipe = {
+               {"group:wood", "group:wood"},
+               {"group:wood", "default:copper_ingot"},
+               {"group:wood", "group:wood"}
+       }
+})
+
+minetest.register_craft({
+       output = name,
+       recipe = {
+               {"doors:door_wood", "default:copper_ingot"}
+       }
+})
+
+-- Protected Steel Door
+
+local name = "protector:door_steel"
+
+doors.register_door(name, {
+       description = "Protected Steel Door",
+       inventory_image = "door_steel.png",
+       groups = {snappy=1,bendy=2,cracky=1,melty=2,level=2,door=1},
+       tiles_bottom = {"door_steel_b.png^protector_logo.png", "door_grey.png"},
+       tiles_top = {"door_steel_a.png", "door_grey.png"},
+       sounds = default.node_sound_wood_defaults(),
+       sunlight = false,
+})
+
+minetest.override_item(name.."_b_1", {
+       on_rightclick = function(pos, node, clicker)
+               if not minetest.is_protected(pos, clicker:get_player_name()) then
+                       on_rightclick(pos, 1, name.."_t_1", name.."_b_2", name.."_t_2", {1,2,3,0})
+               end
+       end,
+})
+
+minetest.override_item(name.."_t_1", {
+       on_rightclick = function(pos, node, clicker)
+               if not minetest.is_protected(pos, clicker:get_player_name()) then
+                       on_rightclick(pos, -1, name.."_b_1", name.."_t_2", name.."_b_2", {1,2,3,0})
+               end
+       end,
+})
+
+minetest.override_item(name.."_b_2", {
+       on_rightclick = function(pos, node, clicker)
+               if not minetest.is_protected(pos, clicker:get_player_name()) then
+                       on_rightclick(pos, 1, name.."_t_2", name.."_b_1", name.."_t_1", {3,0,1,2})
+               end
+       end,
+})
+
+minetest.override_item(name.."_t_2", {
+       on_rightclick = function(pos, node, clicker)
+               if not minetest.is_protected(pos, clicker:get_player_name()) then
+                       on_rightclick(pos, -1, name.."_b_2", name.."_t_1", name.."_b_1", {3,0,1,2})
+               end
+       end,
+})
+
+minetest.register_craft({
+       output = name,
+       recipe = {
+               {"default:steel_ingot", "default:steel_ingot"},
+               {"default:steel_ingot", "default:copper_ingot"},
+               {"default:steel_ingot", "default:steel_ingot"}
+       }
+})
+
+minetest.register_craft({
+       output = name,
+       recipe = {
+               {"doors:door_steel", "default:copper_ingot"}
+       }
+})
+
+-- Protected Chest
+minetest.register_node("protector:chest", {
+       description = "Protected Chest",
+       tiles = {"default_chest_top.png", "default_chest_top.png", "default_chest_side.png",
+               "default_chest_side.png", "default_chest_side.png", "default_chest_front.png^protector_logo.png"},
+       paramtype2 = "facedir",
+       groups = {choppy=2,oddly_breakable_by_hand=2},
+       legacy_facedir_simple = true,
+       is_ground_content = false,
+       sounds = default.node_sound_wood_defaults(),
+       on_construct = function(pos)
+               local meta = minetest.get_meta(pos)
+               meta:set_string("infotext", "Protected Chest")
+               local inv = meta:get_inventory()
+               inv:set_size("main", 8*4)
+       end,
+       can_dig = function(pos,player)
+               local meta = minetest.get_meta(pos)
+               local inv = meta:get_inventory()
+               if inv:is_empty("main") then
+                       if not minetest.is_protected(pos, player:get_player_name()) then
+                               return true
+                       end
+               end
+       end,
+       allow_metadata_inventory_move = function(pos, from_list, from_index, to_list, to_index, count, player)
+               return count
+       end,
+    allow_metadata_inventory_put = function(pos, listname, index, stack, player)
+               return stack:get_count()
+       end,
+    allow_metadata_inventory_take = function(pos, listname, index, stack, player)
+               return stack:get_count()
+       end,
+    on_metadata_inventory_put = function(pos, listname, index, stack, player)
+               minetest.log("action", player:get_player_name()..
+                               " moves stuff to protected chest at "..minetest.pos_to_string(pos))
+       end,
+    on_metadata_inventory_take = function(pos, listname, index, stack, player)
+               minetest.log("action", player:get_player_name()..
+                               " takes stuff from protected chest at "..minetest.pos_to_string(pos))
+       end,
+       on_rightclick = function(pos, node, clicker)
+               local meta = minetest.get_meta(pos)
+               if not minetest.is_protected(pos, clicker:get_player_name()) then
+                       minetest.show_formspec(
+                               clicker:get_player_name(),
+                               "default:chest_locked",
+                               default.get_locked_chest_formspec(pos)
+                       )
+               end
+       end,
+})
+
+minetest.register_craft({
+       output = 'protector:chest',
+       recipe = {
+               {'group:wood', 'group:wood', 'group:wood'},
+               {'group:wood', 'default:copper_ingot', 'group:wood'},
+               {'group:wood', 'group:wood', 'group:wood'},
+       }
+})
diff --git a/license.txt b/license.txt
new file mode 100644 (file)
index 0000000..5d30c14
--- /dev/null
@@ -0,0 +1,14 @@
+
+            DO WHAT THE FUCK YOU WANT TO PUBLIC LICENSE
+                    Version 2, December 2004
+
+ Copyright (C) 2004 Sam Hocevar <sam@hocevar.net>
+
+ Everyone is permitted to copy and distribute verbatim or modified
+ copies of this license document, and changing it is allowed as long
+ as the name is changed.
+
+            DO WHAT THE FUCK YOU WANT TO PUBLIC LICENSE
+   TERMS AND CONDITIONS FOR COPYING, DISTRIBUTION AND MODIFICATION
+
+  0. You just DO WHAT THE FUCK YOU WANT TO. 
\ No newline at end of file
diff --git a/textures/protector_display.png b/textures/protector_display.png
new file mode 100644 (file)
index 0000000..7a43ac0
Binary files /dev/null and b/textures/protector_display.png differ
diff --git a/textures/protector_logo.png b/textures/protector_logo.png
new file mode 100644 (file)
index 0000000..20c0b8e
Binary files /dev/null and b/textures/protector_logo.png differ
diff --git a/textures/protector_side.png b/textures/protector_side.png
new file mode 100644 (file)
index 0000000..73ec762
Binary files /dev/null and b/textures/protector_side.png differ
diff --git a/textures/protector_top.png b/textures/protector_top.png
new file mode 100644 (file)
index 0000000..a4bf3f8
Binary files /dev/null and b/textures/protector_top.png differ