From e3a0458c3f3e64ff94e69ed80cc423843cd3c195 Mon Sep 17 00:00:00 2001
From: cron <example@example.local>
Date: Mon, 12 Oct 2020 02:27:38 +0000
Subject: [PATCH] peek: add shulker box peek command

---
 clientmods/mods.conf     |  1 +
 clientmods/peek/init.lua | 79 ++++++++++++++++++++++++++++++++++++++++
 2 files changed, 80 insertions(+)
 create mode 100644 clientmods/peek/init.lua

diff --git a/clientmods/mods.conf b/clientmods/mods.conf
index 130b6b21b..2134509a1 100644
--- a/clientmods/mods.conf
+++ b/clientmods/mods.conf
@@ -29,3 +29,4 @@ load_mod_autosneak = true
 load_mod_list = true
 load_mod_supernotes = true
 load_mod_autoaim = true
+load_mod_peek = true
diff --git a/clientmods/peek/init.lua b/clientmods/peek/init.lua
new file mode 100644
index 000000000..d5b7dd68d
--- /dev/null
+++ b/clientmods/peek/init.lua
@@ -0,0 +1,79 @@
+-- CC0/Unlicense system32 2020
+
+local formspec_base = "size[9,3]"
+
+local formspec_base_label = "size[9,3.5]"
+
+local formspec_item = "\nitem_image_button[X,Y;1,1;N;N;]"
+
+local formspec_item_label = formspec_item .. "\nlabel[X,Z;T]"
+
+local function map(f, t)
+    local out = {}
+    for i, v in ipairs(t) do
+        out[i] = f(v)
+    end
+    return out
+end
+
+-- include_label because i implemented the label then realized item buttons did it themselves
+local function make_formspec(items, include_label)
+    if items == nil then
+        return nil
+    end
+
+    local form = formspec_base
+    if include_label then
+        form = formspec_base_label
+    end
+
+    for i, v in ipairs(items) do
+        local x = (i - 1) % 9
+        local y = math.floor((i - 1) / 9)
+
+        if include_label then
+            y = y + (y * 0.2) -- shifts each layer down a bit
+        end
+
+        local it = formspec_item
+        if include_label then
+            it = formspec_item_label
+        end
+
+        it = it:gsub("X", x)
+        it = it:gsub("Y", y)
+        if include_label then
+            it = it:gsub("N", v:get_name())
+            it = it:gsub("Z", y + 0.8)
+            it = it:gsub("T", v:get_count())
+        else
+            it = it:gsub("N", v:get_name() .. " " .. tostring(v:get_count()))
+        end
+
+        form = form .. it
+    end
+    return form
+end
+
+local function get_items()
+    local meta = minetest.localplayer:get_wielded_item():get_metadata()
+    local list = minetest.deserialize(meta)
+
+    if list == nil then
+        return
+    end
+
+    local items = map(ItemStack, list)
+    return items
+end
+
+minetest.register_chatcommand("peek", {
+    description = "Peek inside a Mineclone Shulker box.",
+    func = function()
+        local fs = make_formspec(get_items())
+        if fs ~= nil then
+            minetest.show_formspec("PeekInventory", fs)
+        end
+    end
+})
+