mirror of
https://github.com/sys4-fr/server-nalc.git
synced 2024-12-26 10:40:37 +01:00
285 lines
10 KiB
Lua
Executable File
285 lines
10 KiB
Lua
Executable File
local S = unified_inventory.gettext
|
|
|
|
-- This pair of encoding functions is used where variable text must go in
|
|
-- button names, where the text might contain formspec metacharacters.
|
|
-- We can escape button names for the formspec, to avoid screwing up
|
|
-- form structure overall, but they then don't get de-escaped, and so
|
|
-- the input we get back from the button contains the formspec escaping.
|
|
-- This is a game engine bug, and in the anticipation that it might be
|
|
-- fixed some day we don't want to rely on it. So for safety we apply
|
|
-- an encoding that avoids all formspec metacharacters.
|
|
function unified_inventory.mangle_for_formspec(str)
|
|
return string.gsub(str, "([^A-Za-z0-9])", function (c) return string.format("_%d_", string.byte(c)) end)
|
|
end
|
|
function unified_inventory.demangle_for_formspec(str)
|
|
return string.gsub(str, "_([0-9]+)_", function (v) return string.char(v) end)
|
|
end
|
|
|
|
function unified_inventory.get_formspec(player, page)
|
|
if not player then
|
|
return ""
|
|
end
|
|
local player_name = player:get_player_name()
|
|
unified_inventory.current_page[player_name] = page
|
|
local pagedef = unified_inventory.pages[page]
|
|
|
|
local formspec = "size[14,10]"
|
|
-- Background
|
|
formspec = formspec .. "background[-0.19,-0.25;14.4,10.75;ui_form_bg.png]"
|
|
|
|
if unified_inventory.lite_mode then
|
|
formspec = "size[11,7.7]"
|
|
formspec = formspec .. "background[-0.19,-0.2;11.4,8.4;ui_form_bg.png]"
|
|
end
|
|
|
|
local fsdata = nil
|
|
|
|
-- Current page
|
|
if unified_inventory.pages[page] then
|
|
fsdata = pagedef.get_formspec(player)
|
|
formspec = formspec .. fsdata.formspec
|
|
else
|
|
return "" -- Invalid page name
|
|
end
|
|
|
|
local privs = minetest.get_player_privs(player_name) --Modif MFF (Crabman 30/06/2015) DEBUT,12 buttons max by row and not show if player has not privs requiered
|
|
local button_row = 0
|
|
local button_col = 0
|
|
local i = 1
|
|
|
|
-- Main buttons
|
|
for _, def in pairs(unified_inventory.buttons) do
|
|
if (def.show_with == nil or def.show_with == false) or (privs[def.show_with] and privs[def.show_with] == true) then
|
|
if unified_inventory.lite_mode and i > 4 then
|
|
button_row = 1
|
|
button_col = 1
|
|
elseif not unified_inventory.lite_mode and i > 12 then
|
|
button_row = 1
|
|
i = 1
|
|
end
|
|
|
|
local tooltip = def.tooltip or ""
|
|
if def.type == "image" then
|
|
formspec = formspec.."image_button["
|
|
..( unified_inventory.main_button_x + 0.65 * (i - 1) - button_col * 0.65 * 4)
|
|
..","..(unified_inventory.main_button_y + button_row * 0.7)..";0.8,0.8;"
|
|
..minetest.formspec_escape(def.image)..";"
|
|
..minetest.formspec_escape(def.name)..";]"
|
|
.."tooltip["..minetest.formspec_escape(def.name)
|
|
..";"..tooltip.."]"
|
|
end
|
|
i = i + 1
|
|
end
|
|
end --Modif MFF (Crabman 30/06/2015) FIN
|
|
|
|
if fsdata.draw_inventory ~= false then
|
|
-- Player inventory
|
|
formspec = formspec.."listcolors[#00000000;#00000000]"
|
|
formspec = formspec .. "list[current_player;main;0,"..(unified_inventory.formspec_y + 3.5)..";8,4;]"
|
|
end
|
|
|
|
if fsdata.draw_item_list == false then
|
|
return formspec
|
|
end
|
|
|
|
-- Controls to flip items pages
|
|
local start_x = 9.2
|
|
|
|
if not unified_inventory.lite_mode then
|
|
formspec = formspec
|
|
.. "image_button[" .. (start_x + 0.6 * 0)
|
|
.. ",9;.8,.8;ui_skip_backward_icon.png;start_list;]"
|
|
.. "tooltip[start_list;" .. minetest.formspec_escape(S("First page")) .. "]"
|
|
|
|
.. "image_button[" .. (start_x + 0.6 * 1)
|
|
.. ",9;.8,.8;ui_doubleleft_icon.png;rewind3;]"
|
|
.. "tooltip[rewind3;" .. minetest.formspec_escape(S("Back three pages")) .. "]"
|
|
.. "image_button[" .. (start_x + 0.6 * 2)
|
|
.. ",9;.8,.8;ui_left_icon.png;rewind1;]"
|
|
.. "tooltip[rewind1;" .. minetest.formspec_escape(S("Back one page")) .. "]"
|
|
|
|
.. "image_button[" .. (start_x + 0.6 * 3)
|
|
.. ",9;.8,.8;ui_right_icon.png;forward1;]"
|
|
.. "tooltip[forward1;" .. minetest.formspec_escape(S("Forward one page")) .. "]"
|
|
.. "image_button[" .. (start_x + 0.6 * 4)
|
|
.. ",9;.8,.8;ui_doubleright_icon.png;forward3;]"
|
|
.. "tooltip[forward3;" .. minetest.formspec_escape(S("Forward three pages")) .. "]"
|
|
|
|
.. "image_button[" .. (start_x + 0.6 * 5)
|
|
.. ",9;.8,.8;ui_skip_forward_icon.png;end_list;]"
|
|
.. "tooltip[end_list;" .. minetest.formspec_escape(S("Last page")) .. "]"
|
|
else
|
|
formspec = formspec
|
|
.. "image_button[" .. (8.2 + 0.65 * 0)
|
|
.. ",5.8;.8,.8;ui_skip_backward_icon.png;start_list;]"
|
|
.. "tooltip[start_list;" .. minetest.formspec_escape(S("First page")) .. "]"
|
|
.. "image_button[" .. (8.2 + 0.65 * 1)
|
|
.. ",5.8;.8,.8;ui_left_icon.png;rewind1;]"
|
|
.. "tooltip[rewind1;" .. minetest.formspec_escape(S("Back one page")) .. "]"
|
|
.. "image_button[" .. (8.2 + 0.65 * 2)
|
|
.. ",5.8;.8,.8;ui_right_icon.png;forward1;]"
|
|
.. "tooltip[forward1;" .. minetest.formspec_escape(S("Forward one page")) .. "]"
|
|
.. "image_button[" .. (8.2 + 0.65 * 3)
|
|
.. ",5.8;.8,.8;ui_skip_forward_icon.png;end_list;]"
|
|
.. "tooltip[end_list;" .. minetest.formspec_escape(S("Last page")) .. "]"
|
|
end
|
|
|
|
-- Search box
|
|
|
|
if not unified_inventory.lite_mode then
|
|
formspec = formspec .. "field[9.5,8.325;3,1;searchbox;;"
|
|
.. minetest.formspec_escape(unified_inventory.current_searchbox[player_name]) .. "]"
|
|
formspec = formspec .. "image_button[12.2,8.1;.8,.8;ui_search_icon.png;searchbutton;]"
|
|
.. "tooltip[searchbutton;" ..S("Search") .. "]"
|
|
else
|
|
formspec = formspec .. "field[8.5,5.225;2.2,1;searchbox;;"
|
|
.. minetest.formspec_escape(unified_inventory.current_searchbox[player_name]) .. "]"
|
|
formspec = formspec .. "image_button[10.3,5;.8,.8;ui_search_icon.png;searchbutton;]"
|
|
.. "tooltip[searchbutton;" ..S("Search") .. "]"
|
|
end
|
|
|
|
local no_matches = "No matching items"
|
|
if unified_inventory.lite_mode then
|
|
no_matches = "No matches."
|
|
end
|
|
|
|
-- Items list
|
|
if #unified_inventory.filtered_items_list[player_name] == 0 then
|
|
formspec = formspec.."label[8.2,"..unified_inventory.form_header_y..";" .. S(no_matches) .. "]"
|
|
else
|
|
local dir = unified_inventory.active_search_direction[player_name]
|
|
local list_index = unified_inventory.current_index[player_name]
|
|
local page = math.floor(list_index / (unified_inventory.items_per_page) + 1)
|
|
local pagemax = math.floor(
|
|
(#unified_inventory.filtered_items_list[player_name] - 1)
|
|
/ (unified_inventory.items_per_page) + 1)
|
|
local item = {}
|
|
for y = 0, unified_inventory.pagerows - 1 do
|
|
for x = 0, unified_inventory.pagecols - 1 do
|
|
local name = unified_inventory.filtered_items_list[player_name][list_index]
|
|
if minetest.registered_items[name] then
|
|
formspec = formspec.."item_image_button["
|
|
..(8.2 + x * 0.7)..","
|
|
..(unified_inventory.formspec_y + unified_inventory.page_y + y * 0.7)..";.81,.81;"
|
|
..name..";item_button_"..dir.."_"
|
|
..unified_inventory.mangle_for_formspec(name)..";]"
|
|
list_index = list_index + 1
|
|
end
|
|
end
|
|
end
|
|
formspec = formspec.."label[8.2,"..unified_inventory.form_header_y..";"..S("Page") .. ": "
|
|
.. S("%s of %s"):format(page,pagemax).."]"
|
|
end
|
|
if unified_inventory.activefilter[player_name] ~= "" then
|
|
formspec = formspec.."label[8.2,"..(unified_inventory.form_header_y + 0.4)..";" .. S("Filter") .. ":]"
|
|
formspec = formspec.."label[9.1,"..(unified_inventory.form_header_y + 0.4)..";"..minetest.formspec_escape(unified_inventory.activefilter[player_name]).."]"
|
|
end
|
|
return formspec
|
|
end
|
|
|
|
function unified_inventory.set_inventory_formspec(player, page)
|
|
if player then
|
|
local formspec = unified_inventory.get_formspec(player, page)
|
|
player:set_inventory_formspec(formspec)
|
|
end
|
|
end
|
|
|
|
--apply filter to the inventory list (create filtered copy of full one)
|
|
function unified_inventory.apply_filter(player, filter, search_dir)
|
|
if not player then return false end
|
|
local player_name = player:get_player_name()
|
|
local lfilter = string.lower(filter)
|
|
local ffilter
|
|
if lfilter:sub(1, 6) == "group:" then
|
|
local groups = lfilter:sub(7):split(",")
|
|
ffilter = function(name, def)
|
|
for _, group in ipairs(groups) do
|
|
if not ((def.groups[group] or 0) > 0) then
|
|
return false
|
|
end
|
|
end
|
|
return true
|
|
end
|
|
else
|
|
ffilter = function(name, def)
|
|
local lname = string.lower(name)
|
|
local ldesc = string.lower(def.description)
|
|
return string.find(lname, lfilter, 1, true) or string.find(ldesc, lfilter, 1, true)
|
|
end
|
|
end
|
|
unified_inventory.filtered_items_list[player_name]={}
|
|
for name, def in pairs(minetest.registered_items) do
|
|
if (def.groups.not_in_creative_inventory or 0) == 0
|
|
and (def.description or "") ~= ""
|
|
and ffilter(name, def)
|
|
and (unified_inventory.is_creative(player_name)
|
|
or unified_inventory.crafts_for.recipe[def.name]) then
|
|
table.insert(unified_inventory.filtered_items_list[player_name], name)
|
|
end
|
|
end
|
|
table.sort(unified_inventory.filtered_items_list[player_name])
|
|
unified_inventory.filtered_items_list_size[player_name] = #unified_inventory.filtered_items_list[player_name]
|
|
unified_inventory.current_index[player_name] = 1
|
|
unified_inventory.activefilter[player_name] = filter
|
|
unified_inventory.active_search_direction[player_name] = search_dir
|
|
unified_inventory.set_inventory_formspec(player,
|
|
unified_inventory.current_page[player_name])
|
|
end
|
|
|
|
function unified_inventory.items_in_group(groups)
|
|
local items = {}
|
|
for name, item in pairs(minetest.registered_items) do
|
|
for _, group in pairs(groups:split(',')) do
|
|
if item.groups[group] then
|
|
table.insert(items, name)
|
|
end
|
|
end
|
|
end
|
|
return items
|
|
end
|
|
|
|
function unified_inventory.sort_inventory(inv)
|
|
local inlist = inv:get_list("main")
|
|
local typecnt = {}
|
|
local typekeys = {}
|
|
for _, st in ipairs(inlist) do
|
|
if not st:is_empty() then
|
|
local n = st:get_name()
|
|
local w = st:get_wear()
|
|
local m = st:get_metadata()
|
|
local k = string.format("%s %05d %s", n, w, m)
|
|
if not typecnt[k] then
|
|
typecnt[k] = {
|
|
name = n,
|
|
wear = w,
|
|
metadata = m,
|
|
stack_max = st:get_stack_max(),
|
|
count = 0,
|
|
}
|
|
table.insert(typekeys, k)
|
|
end
|
|
typecnt[k].count = typecnt[k].count + st:get_count()
|
|
end
|
|
end
|
|
table.sort(typekeys)
|
|
local outlist = {}
|
|
for _, k in ipairs(typekeys) do
|
|
local tc = typecnt[k]
|
|
while tc.count > 0 do
|
|
local c = math.min(tc.count, tc.stack_max)
|
|
table.insert(outlist, ItemStack({
|
|
name = tc.name,
|
|
wear = tc.wear,
|
|
metadata = tc.metadata,
|
|
count = c,
|
|
}))
|
|
tc.count = tc.count - c
|
|
end
|
|
end
|
|
if #outlist > #inlist then return end
|
|
while #outlist < #inlist do
|
|
table.insert(outlist, ItemStack(nil))
|
|
end
|
|
inv:set_list("main", outlist)
|
|
end
|