local S if rawget(_G, "intllib") then S = intllib.Getter() else S = function(s) return s end end -- 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]" local fsdata = nil -- Background formspec = formspec .. "background[-0.19,-0.25;14.4,10.75;ui_form_bg.png]" -- Current page if unified_inventory.pages[page] then fsdata = pagedef.get_formspec(player) formspec = formspec .. fsdata.formspec else return "" -- Invalid page name end -- Main buttons for i, def in pairs(unified_inventory.buttons) do local tooltip = def.tooltip or "" if def.type == "image" then formspec = formspec.."image_button[" ..(0.65 * (i - 1))..",9;0.8,0.8;" ..minetest.formspec_escape(def.image)..";" ..minetest.formspec_escape(def.name)..";]" .."tooltip["..minetest.formspec_escape(def.name) ..";"..tooltip.."]" end end if fsdata.draw_inventory ~= false then -- Player inventory formspec = formspec.."listcolors[#00000000;#00000000]" formspec = formspec .. "list[current_player;main;0,4.5;8,4;]" end if fsdata.draw_item_list == false then return formspec end -- Controls to flip items pages local start_x = 9.2 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")) .. "]" -- Search box 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") .. "]" -- Items list if #unified_inventory.filtered_items_list[player_name] == 0 then formspec = formspec.."label[8.2,0;" .. S("No matching items") .. "]" 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 / (80) + 1) local pagemax = math.floor( (#unified_inventory.filtered_items_list[player_name] - 1) / (80) + 1) local item = {} for y = 0, 9 do for x = 0, 7 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).."," ..(1 + 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,0;"..S("Page") .. ": " .. S("%s of %s"):format(page,pagemax).."]" end if unified_inventory.activefilter[player_name] ~= "" then formspec = formspec.."label[8.2,0.4;" .. S("Filter") .. ":]" formspec = formspec.."label[9,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) 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) 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