Remove hard dependency on default

LICENSE.txt

@@ -828,6 +828,14 @@ GNU Lesser General Public License v2.1 or later (see included LICENSE file)
 - everness_glass.png
 - everness_glass_detail.png
 - everness_tinted_glass_detail.png
+- everness_chest_front.png
+- everness_chest_inside.png
+- everness_chest_side.png
+- everness_chest_top.png
+- everness_chest_ui_bg.png -- Derived from texture by XSSheep (CC BY 4.0)
+- everness_chest_ui_bg_hb_slot.png -- Derived from texture by XSSheep (CC BY 4.0)
+- everness_chest_ui_bg_slot.png -- Derived from texture by XSSheep (CC BY 4.0)
+- everness_gui_hb_bg.png
 
 **CC-BY-SA-4.0, Pixel Perfection by XSSheep**, https://minecraft.curseforge.com/projects/pixel-perfection-freshly-updated
 
@@ -1072,6 +1080,11 @@ GNU Lesser General Public License v2.1 or later (see included LICENSE file)
 - everness_door_glass_close.ogg
 - everness_door_glass_open.ogg
 
+**CC-BY-4.0, by SFXAFRIK**, https://freesound.org/people/SFXAFRIK/sounds/584850/
+
+- everness_chest_open.ogg
+- everness_chest_close.ogg
+
 **CC0-1.0, by Nox_Sound**, https://freesound.org
 
 - everness_stone_dug.1.ogg

api.lua

@@ -1182,6 +1182,18 @@ function Everness.log_player_action(player, ...)
     minetest.log('action', msg)
 end
 
+function Everness.set_inventory_action_loggers(def, name)
+    def.on_metadata_inventory_move = function(pos, from_list, from_index, to_list, to_index, count, player)
+        Everness.log_player_action(player, 'moves stuff in', name, 'at', pos)
+    end
+    def.on_metadata_inventory_put = function(pos, listname, index, stack, player)
+        Everness.log_player_action(player, 'moves', stack:get_name(), 'to', name, 'at', pos)
+    end
+    def.on_metadata_inventory_take = function(pos, listname, index, stack, player)
+        Everness.log_player_action(player, 'takes', stack:get_name(), 'from', name, 'at', pos)
+    end
+end
+
 -- 'can grow' function - copy from MTG
 
 function Everness.can_grow(pos)
@@ -1203,3 +1215,64 @@ function Everness.can_grow(pos)
 
     return true
 end
+
+--
+-- This method may change in future.
+-- Copy from MTG
+--
+
+function Everness.can_interact_with_node(player, pos)
+    if player and player:is_player() then
+        if minetest.check_player_privs(player, 'protection_bypass') then
+            return true
+        end
+    else
+        return false
+    end
+
+    local meta = minetest.get_meta(pos)
+    local owner = meta:get_string('owner')
+
+    if not owner or owner == '' or owner == player:get_player_name() then
+        return true
+    end
+
+    -- Is player wielding the right key?
+    local item = player:get_wielded_item()
+
+    if minetest.get_item_group(item:get_name(), 'key') == 1 then
+        local key_meta = item:get_meta()
+
+        if key_meta:get_string('secret') == '' then
+            local key_oldmeta = item:get_metadata()
+
+            if key_oldmeta == '' or not minetest.parse_json(key_oldmeta) then
+                return false
+            end
+
+            key_meta:set_string('secret', minetest.parse_json(key_oldmeta).secret)
+            item:set_metadata('')
+        end
+
+        return meta:get_string('key_lock_secret') == key_meta:get_string('secret')
+    end
+
+    return false
+end
+
+--
+-- Optimized helper to put all items in an inventory into a drops list
+-- copy from MTG
+--
+
+function Everness.get_inventory_drops(pos, inventory, drops)
+    local inv = minetest.get_meta(pos):get_inventory()
+    local n = #drops
+    for i = 1, inv:get_size(inventory) do
+        local stack = inv:get_stack(inventory, i)
+        if stack:get_count() > 0 then
+            drops[n + 1] = stack:to_table()
+            n = n + 1
+        end
+    end
+end

chests.lua

@@ -0,0 +1,345 @@
+--[[
+    Everness. Never ending discovery in Everness mapgen.
+    GNU Lesser General Public License, version 2.1
+    Copyright (C) 2011-2018 celeron55, Perttu Ahola <celeron55@gmail.com>
+    Copyright (C) 2011-2018 Various Minetest developers and contributors
+    Copyright (C) 2022 SaKeL <juraj.vajda@gmail.com>
+
+    This program is free software; you can redistribute it and/or modify it under the terms
+    of the GNU Lesser General Public License as published by the Free Software Foundation;
+    either version 2.1 of the License, or (at your option) any later version.
+
+    This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY;
+    without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
+    See the GNU Lesser General Public License for more details:
+    https://www.gnu.org/licenses/old-licenses/lgpl-2.1.html
+--]]
+
+Everness.chest = {}
+
+-- support for MT game translation.
+local S = minetest.get_translator(minetest.get_current_modname())
+
+function Everness.chest.get_chest_formspec(pos)
+    local spos = pos.x .. ',' .. pos.y .. ',' .. pos.z
+    local hotbar_bg = ''
+    local list_bg = ''
+    local chest_bg = ''
+
+    for i = 0, 7, 1 do
+        hotbar_bg = hotbar_bg .. 'image[' .. 0 + i .. ', ' .. 4.85 .. ';1,1;everness_chest_ui_bg_hb_slot.png]'
+    end
+
+    for row = 0, 2, 1 do
+        for i = 0, 7, 1 do
+            list_bg = list_bg .. 'image[' .. 0 + i .. ',' .. 6.08 + row .. ';1,1;everness_chest_ui_bg_slot.png]'
+        end
+    end
+
+    for row = 0, 3, 1 do
+        for i = 0, 7, 1 do
+            chest_bg = chest_bg .. 'image[' .. 0 + i .. ',' .. 0.3 + row .. ';1,1;everness_chest_ui_bg_slot.png]'
+        end
+    end
+
+    local formspec =
+        'size[8,9]' ..
+        'listcolors[#FFFFFF00;#FFFFFF1A;#5E5957]' ..
+        'background[5,5;1,1;everness_chest_ui_bg.png;true]' ..
+        'list[nodemeta:' .. spos .. ';main;0,0.3;8,4;]' ..
+        'list[current_player;main;0,4.85;8,1;]' ..
+        'list[current_player;main;0,6.08;8,3;8]' ..
+        'listring[nodemeta:' .. spos .. ';main]' ..
+        'listring[current_player;main]' ..
+        list_bg ..
+        hotbar_bg ..
+        chest_bg
+    return formspec
+end
+
+function Everness.chest.chest_lid_obstructed(pos)
+    local above = { x = pos.x, y = pos.y + 1, z = pos.z }
+    local def = minetest.registered_nodes[minetest.get_node(above).name]
+
+    -- allow ladders, signs, wallmounted things and torches to not obstruct
+    if def and
+        (def.drawtype == 'airlike' or
+        def.drawtype == 'signlike' or
+        def.drawtype == 'torchlike' or
+        (def.drawtype == 'nodebox' and def.paramtype2 == 'wallmounted'))
+    then
+        return false
+    end
+
+    return true
+end
+
+function Everness.chest.chest_lid_close(pn)
+    local chest_open_info = Everness.chest.open_chests[pn]
+    local pos = chest_open_info.pos
+    local sound = chest_open_info.sound
+    local swap = chest_open_info.swap
+
+    Everness.chest.open_chests[pn] = nil
+
+    for _, v in pairs(Everness.chest.open_chests) do
+        if v.pos.x == pos.x and v.pos.y == pos.y and v.pos.z == pos.z then
+            return true
+        end
+    end
+
+    local node = minetest.get_node(pos)
+
+    minetest.after(0.2, minetest.swap_node, pos, { name = swap, param2 = node.param2 })
+    minetest.sound_play(sound, { gain = 0.3, pos = pos, max_hear_distance = 10 }, true)
+end
+
+Everness.chest.open_chests = {}
+
+minetest.register_on_player_receive_fields(function(player, formname, fields)
+    if formname ~= 'everness:chest' then
+        return
+    end
+
+    if not player or not fields.quit then
+        return
+    end
+
+    local pn = player:get_player_name()
+
+    if not Everness.chest.open_chests[pn] then
+        return
+    end
+
+    Everness.chest.chest_lid_close(pn)
+
+    return true
+end)
+
+minetest.register_on_leaveplayer(function(player)
+    local pn = player:get_player_name()
+
+    if Everness.chest.open_chests[pn] then
+        Everness.chest.chest_lid_close(pn)
+    end
+end)
+
+function Everness.chest.register_chest(prefixed_name, d)
+    local name = prefixed_name:sub(1, 1) == ':' and prefixed_name:sub(2, -1) or prefixed_name
+    local def = table.copy(d)
+    def.drawtype = 'mesh'
+    def.visual = 'mesh'
+    def.paramtype = 'light'
+    def.paramtype2 = 'facedir'
+    def.legacy_facedir_simple = true
+    def.is_ground_content = false
+
+    if def.protected then
+        -- Locked chest
+        def.on_construct = function(pos)
+            local meta = minetest.get_meta(pos)
+            meta:set_string('infotext', S('Locked Chest'))
+            meta:set_string('owner', '')
+            local inv = meta:get_inventory()
+            inv:set_size('main', 8 * 4)
+        end
+
+        def.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', S('Locked Chest (owned by @1)', meta:get_string('owner')))
+        end
+
+        def.can_dig = function(pos,player)
+            local meta = minetest.get_meta(pos);
+            local inv = meta:get_inventory()
+            return inv:is_empty('main') and Everness.can_interact_with_node(player, pos)
+        end
+
+        def.allow_metadata_inventory_move = function(pos, from_list, from_index, to_list, to_index, count, player)
+            if not Everness.can_interact_with_node(player, pos) then
+                return 0
+            end
+
+            return count
+        end
+
+        def.allow_metadata_inventory_put = function(pos, listname, index, stack, player)
+            if not Everness.can_interact_with_node(player, pos) then
+                return 0
+            end
+
+            return stack:get_count()
+        end
+
+        def.allow_metadata_inventory_take = function(pos, listname, index, stack, player)
+            if not Everness.can_interact_with_node(player, pos) then
+                return 0
+            end
+
+            return stack:get_count()
+        end
+
+        def.on_rightclick = function(pos, node, clicker, itemstack, pointed_thing)
+            if not Everness.can_interact_with_node(clicker, pos) then
+                return itemstack
+            end
+
+            minetest.sound_play(def.sound_open, { gain = 0.3, pos = pos, max_hear_distance = 10 }, true)
+
+            if not Everness.chest.chest_lid_obstructed(pos) then
+                minetest.swap_node(pos, { name = name .. '_open', param2 = node.param2 })
+            end
+
+            minetest.after(0.2, minetest.show_formspec, clicker:get_player_name(), 'everness:chest', Everness.chest.get_chest_formspec(pos))
+            Everness.chest.open_chests[clicker:get_player_name()] = { pos = pos, sound = def.sound_close, swap = name }
+        end
+
+        def.on_blast = function() end
+
+        def.on_key_use = function(pos, player)
+            local secret = minetest.get_meta(pos):get_string('key_lock_secret')
+            local itemstack = player:get_wielded_item()
+            local key_meta = itemstack:get_meta()
+
+            if itemstack:get_metadata() == '' then
+                return
+            end
+
+            if key_meta:get_string('secret') == '' then
+                key_meta:set_string('secret', minetest.parse_json(itemstack:get_metadata()).secret)
+                itemstack:set_metadata('')
+            end
+
+            if secret ~= key_meta:get_string('secret') then
+                return
+            end
+
+            minetest.show_formspec(
+                player:get_player_name(),
+                'everness:chest_locked',
+                Everness.chest.get_chest_formspec(pos)
+            )
+        end
+
+        def.on_skeleton_key_use = function(pos, player, newsecret)
+            local meta = minetest.get_meta(pos)
+            local owner = meta:get_string('owner')
+            local pn = player:get_player_name()
+
+            -- verify placer is owner of lockable chest
+            if owner ~= pn then
+                minetest.record_protection_violation(pos, pn)
+                minetest.chat_send_player(pn, S('You do not own this chest.'))
+                return nil
+            end
+
+            local secret = meta:get_string('key_lock_secret')
+            if secret == '' then
+                secret = newsecret
+                meta:set_string('key_lock_secret', secret)
+            end
+
+            return secret, S('a locked chest'), owner
+        end
+    else
+        -- Public (unlocked) chest
+        def.on_construct = function(pos)
+            local meta = minetest.get_meta(pos)
+            meta:set_string('infotext', S('Chest'))
+            local inv = meta:get_inventory()
+            inv:set_size('main', 8 * 4)
+        end
+
+        def.can_dig = function(pos,player)
+            local meta = minetest.get_meta(pos);
+            local inv = meta:get_inventory()
+            return inv:is_empty('main')
+        end
+
+        def.on_rightclick = function(pos, node, clicker)
+            minetest.sound_play(def.sound_open, { gain = 0.3, pos = pos, max_hear_distance = 10 }, true)
+
+            if not Everness.chest.chest_lid_obstructed(pos) then
+                minetest.swap_node(pos, { name = name .. '_open', param2 = node.param2 })
+            end
+
+            minetest.after(0.2, minetest.show_formspec, clicker:get_player_name(), 'everness:chest', Everness.chest.get_chest_formspec(pos))
+            Everness.chest.open_chests[clicker:get_player_name()] = { pos = pos, sound = def.sound_close, swap = name }
+        end
+
+        def.on_blast = function(pos)
+            local drops = {}
+            Everness.get_inventory_drops(pos, 'main', drops)
+            drops[#drops + 1] = name
+            minetest.remove_node(pos)
+            return drops
+        end
+    end
+
+    Everness.set_inventory_action_loggers(def, 'chest')
+
+    local def_opened = table.copy(def)
+    local def_closed = table.copy(def)
+
+    def_opened.mesh = 'chest_open.obj'
+
+    for i = 1, #def_opened.tiles do
+        if type(def_opened.tiles[i]) == 'string' then
+            def_opened.tiles[i] = { name = def_opened.tiles[i], backface_culling = true }
+        elseif def_opened.tiles[i].backface_culling == nil then
+            def_opened.tiles[i].backface_culling = true
+        end
+    end
+
+    def_opened.drop = name
+    def_opened.groups.not_in_creative_inventory = 1
+    def_opened.selection_box = {
+        type = 'fixed',
+        fixed = { -1 / 2, -1 / 2, -1 / 2, 1 / 2, 3 / 16, 1 / 2 },
+    }
+    def_opened.can_dig = function()
+        return false
+    end
+    def_opened.on_blast = function() end
+
+    def_closed.mesh = nil
+    def_closed.drawtype = nil
+    def_closed.tiles[6] = def.tiles[5] -- swap textures around for 'normal'
+    def_closed.tiles[5] = def.tiles[3] -- drawtype to make them match the mesh
+    def_closed.tiles[3] = def.tiles[3] .. '^[transformFX'
+
+    minetest.register_node(prefixed_name, def_closed)
+    minetest.register_node(prefixed_name .. '_open', def_opened)
+end
+
+Everness.chest.register_chest('everness:chest', {
+    description = S('Chest'),
+    tiles = {
+        'everness_chest_top.png',
+        'everness_chest_top.png',
+        'everness_chest_side.png',
+        'everness_chest_side.png',
+        'everness_chest_front.png',
+        'everness_chest_inside.png'
+    },
+    sounds = Everness.node_sound_wood_defaults(),
+    sound_open = 'everness_chest_open',
+    sound_close = 'everness_chest_close',
+    groups = { choppy = 2, oddly_breakable_by_hand = 2 },
+})
+
+minetest.register_craft({
+    output = 'everness:chest',
+    recipe = {
+        { 'group:everness_wood', 'group:everness_wood', 'group:everness_wood' },
+        { 'group:everness_wood', '', 'group:everness_wood' },
+        { 'group:everness_wood', 'group:everness_wood', 'group:everness_wood' },
+    }
+})
+
+minetest.register_craft({
+    type = 'fuel',
+    recipe = 'everness:chest',
+    burntime = 30,
+})

crafting.lua

@@ -20,23 +20,25 @@
 -- Blocks
 --
 
-minetest.register_craft({
+if minetest.get_modpath('default') then
+    minetest.register_craft({
         output = 'everness:snowcobble 9',
         recipe = {
             { 'default:snowblock', 'default:snowblock', 'default:snowblock' },
             { 'default:snowblock', 'default:snowblock', 'default:snowblock' },
             { 'default:snowblock', 'default:snowblock', 'default:snowblock' },
         }
-})
+    })
 
-minetest.register_craft({
+    minetest.register_craft({
         output = 'everness:icecobble 9',
         recipe = {
             { 'default:ice', 'default:ice', 'default:ice' },
             { 'default:ice', 'default:ice', 'default:ice' },
             { 'default:ice', 'default:ice', 'default:ice' },
         }
-})
+    })
+end
 
 minetest.register_craft({
     output = 'everness:snowcobble 9',

init.lua

@@ -28,6 +28,7 @@ dofile(path .. '/bamboo.lua')
 dofile(path .. '/functions.lua')
 dofile(path .. '/trees.lua')
 dofile(path .. '/vines.lua')
+dofile(path .. '/chests.lua')
 
 dofile(path .. '/mapgen.lua')
 

loot_chests.lua

@@ -33,7 +33,7 @@ minetest.register_lbm({
     },
     run_at_every_load = true,
     action = function(pos, node)
-        minetest.set_node(pos, { name = 'default:chest', param2 = minetest.get_node(pos).param2 })
+        minetest.set_node(pos, { name = 'everness:chest', param2 = minetest.get_node(pos).param2 })
 
         local rand = PcgRandom(pos.x * pos.y * pos.z)
         local inv = minetest.get_inventory({ type = 'node', pos = pos })

nodes.lua

@@ -1527,7 +1527,7 @@ Everness:register_node('everness:willow_wood', {
     place_param2 = 0,
     tiles = { 'everness_willow_wood.png' },
     is_ground_content = false,
-    groups = { choppy = 3, oddly_breakable_by_hand = 2, flammable = 3, wood = 1 },
+    groups = { choppy = 3, oddly_breakable_by_hand = 2, flammable = 3, wood = 1, everness_wood = 1 },
     sounds = Everness.node_sound_wood_defaults(),
 })
 
@@ -1537,7 +1537,7 @@ Everness:register_node('everness:dry_wood', {
     place_param2 = 0,
     tiles = { 'everness_dry_wood.png' },
     is_ground_content = false,
-    groups = { choppy = 2, oddly_breakable_by_hand = 2, flammable = 2, wood = 1 },
+    groups = { choppy = 2, oddly_breakable_by_hand = 2, flammable = 2, wood = 1, everness_wood = 1 },
     sounds = Everness.node_sound_wood_defaults(),
 })
 
@@ -1597,7 +1597,7 @@ minetest.register_node('everness:crystal_wood', {
     place_param2 = 0,
     tiles = { 'everness_crystal_wood.png' },
     is_ground_content = false,
-    groups = { choppy = 2, oddly_breakable_by_hand = 2, flammable = 2, wood = 1 },
+    groups = { choppy = 2, oddly_breakable_by_hand = 2, flammable = 2, wood = 1, everness_wood = 1 },
     sounds = Everness.node_sound_wood_defaults(),
 })
 
@@ -3795,7 +3795,7 @@ Everness:register_node('everness:bamboo_wood', {
     place_param2 = 0,
     tiles = { 'everness_dry_bamboo_block_side.png' },
     is_ground_content = false,
-    groups = { choppy = 2, oddly_breakable_by_hand = 2, flammable = 2, wood = 1 },
+    groups = { choppy = 2, oddly_breakable_by_hand = 2, flammable = 2, wood = 1, everness_wood = 1 },
     sounds = Everness.node_sound_wood_defaults(),
 })
 
@@ -3805,7 +3805,7 @@ Everness:register_node('everness:bamboo_mosaic_wood', {
     place_param2 = 0,
     tiles = { 'everness_bamboo_mosaic.png' },
     is_ground_content = false,
-    groups = { choppy = 2, oddly_breakable_by_hand = 2, flammable = 2, wood = 1 },
+    groups = { choppy = 2, oddly_breakable_by_hand = 2, flammable = 2, wood = 1, everness_wood = 1 },
     sounds = Everness.node_sound_wood_defaults(),
 })
 
@@ -3815,7 +3815,7 @@ Everness:register_node('everness:baobab_wood', {
     place_param2 = 0,
     tiles = { 'everness_baobab_wood.png' },
     is_ground_content = false,
-    groups = { choppy = 3, oddly_breakable_by_hand = 2, flammable = 3, wood = 1 },
+    groups = { choppy = 3, oddly_breakable_by_hand = 2, flammable = 3, wood = 1, everness_wood = 1 },
     sounds = Everness.node_sound_wood_defaults(),
 })
 
@@ -3825,7 +3825,7 @@ Everness:register_node('everness:sequoia_wood', {
     place_param2 = 0,
     tiles = { 'everness_sequoia_wood.png' },
     is_ground_content = false,
-    groups = { choppy = 3, oddly_breakable_by_hand = 2, flammable = 3, wood = 1 },
+    groups = { choppy = 3, oddly_breakable_by_hand = 2, flammable = 3, wood = 1, everness_wood = 1 },
     sounds = Everness.node_sound_wood_defaults(),
 })