diff options
-rw-r--r-- | builtin/mainmenu.lua | 297 | ||||
-rw-r--r-- | builtin/mainmenu_worldlist.lua | 211 |
2 files changed, 309 insertions, 199 deletions
diff --git a/builtin/mainmenu.lua b/builtin/mainmenu.lua index 61d87a25d..b752add6e 100644 --- a/builtin/mainmenu.lua +++ b/builtin/mainmenu.lua @@ -2,6 +2,7 @@ os.setlocale("C", "numeric") local scriptpath = engine.get_scriptdir() +dofile(scriptpath .. DIR_DELIM .. "mainmenu_worldlist.lua") dofile(scriptpath .. DIR_DELIM .. "modmgr.lua") dofile(scriptpath .. DIR_DELIM .. "modstore.lua") dofile(scriptpath .. DIR_DELIM .. "gamemgr.lua") @@ -151,12 +152,16 @@ end -------------------------------------------------------------------------------- function menu.update_gametype() + + + if (menu.game_last_check == nil or menu.game_last_check ~= menu.last_game) and tabbuilder.current_tab == "singleplayer" then local gamedetails = menu.lastgame() engine.set_topleft_text(gamedetails.name) + worldlist.set_gamefilter(gamedetails.id) --background local background_set = false @@ -198,6 +203,7 @@ end -------------------------------------------------------------------------------- function menu.reset_gametype() + worldlist.set_gamefilter(nil) menu.game_last_check = nil local path_background_texture = menu.basetexturedir .. "menu_background.png" @@ -295,77 +301,30 @@ function update_menu() end -------------------------------------------------------------------------------- -function menu.filtered_game_list() +function menu.render_world_list() local retval = "" - - local current_game = menu.lastgame() - for i=1,#menu.worldlist,1 do - if menu.worldlist[i].gameid == current_game.id then - if retval ~= "" then - retval = retval .."," - end - - retval = retval .. menu.worldlist[i].name .. - " \\[" .. menu.worldlist[i].gameid .. "\\]" - end - end + local current_worldlist = worldlist.get_list() - return retval -end - --------------------------------------------------------------------------------- -function menu.filtered_game_list_raw() - local retval = {} - - local current_game = menu.lastgame() - - for i=1,#menu.worldlist,1 do - if menu.worldlist[i].gameid == current_game.id then - table.insert(retval,menu.worldlist[i]) - end - end - - return retval -end - --------------------------------------------------------------------------------- -function menu.filtered_index_to_plain(filtered_index) - - local current_game = menu.lastgame() - - local temp_idx = 0 - - if menu.worldlist == nil then - return -1 - end - - for i=1,#menu.worldlist,1 do - if menu.worldlist[i].gameid == current_game.id then - temp_idx = temp_idx +1 + for i,v in ipairs(current_worldlist) do + if retval ~= "" then + retval = retval .."," end - if temp_idx == filtered_index then - return i - end + retval = retval .. v.name .. + " \\[" .. v.gameid .. "\\]" end - return -1 + + return retval end -------------------------------------------------------------------------------- function menu.init() --init menu data gamemgr.update_gamelist() - - menu.worldlist = engine.get_worlds() - menu.last_world = tonumber(engine.setting_get("main_menu_last_world_idx")) menu.last_game = tonumber(engine.setting_get("main_menu_last_game_idx")) - if type(menu.last_world) ~= "number" then - menu.last_world = 1 - end - if type(menu.last_game) ~= "number" then menu.last_game = 1 end @@ -405,41 +364,50 @@ function menu.lastgame() end -------------------------------------------------------------------------------- -function menu.lastworld() - if menu.last_world ~= nil and - menu.last_world > 0 and - menu.last_world <= #menu.worldlist then - return menu.worldlist[menu.last_world] +function menu.update_last_game() + + local current_world = worldlist.get_raw_world( + engine.setting_get("mainmenu_last_selected_world") + ) + + if current_world == nil then + return end - - if #menu.worldlist >= 1 then - menu.last_world = 1 - return menu.worldlist[menu.last_world] + + for i=1,#gamemgr.games,1 do + if gamemgr.games[i].id == current_world.gameid then + menu.last_game = i + engine.setting_set("main_menu_last_game_idx",menu.last_game) + break + end end - - --error case!! - return nil end -------------------------------------------------------------------------------- -function menu.update_last_game(world_idx) - if gamedata.selected_world <= #menu.worldlist then - local world = menu.worldlist[gamedata.selected_world] +function menu.handle_key_up_down(fields,textlist,settingname) + + if fields["key_up"] then + local oldidx = engine.get_textlist_index(textlist) - if world == nil then - return + if oldidx > 1 then + local newidx = oldidx -1 + engine.setting_set(settingname, + worldlist.get_engine_index(newidx)) end + end + + if fields["key_down"] then + local oldidx = engine.get_textlist_index(textlist) - for i=1,#gamemgr.games,1 do - if gamemgr.games[i].id == world.gameid then - menu.last_game = i - engine.setting_set("main_menu_last_game_idx",menu.last_game) - break - end + if oldidx < worldlist.size() then + local newidx = oldidx + 1 + engine.setting_set(settingname, + worldlist.get_engine_index(newidx)) end end end + -------------------------------------------------------------------------------- function menubar.handle_buttons(fields) for i=1,#menubar.buttons,1 do @@ -535,7 +503,7 @@ end -------------------------------------------------------------------------------- function tabbuilder.dialog_delete_world() - return "label[2,2;Delete World \"" .. menu.lastworld().name .. "\"?]".. + return "label[2,2;Delete World \"" .. worldlist.get_raw_list()[menu.world_to_del].name .. "\"?]".. "button[3.5,4.2;2.6,0.5;world_delete_confirm;Yes]" .. "button[6,4.2;2.8,0.5;world_delete_cancel;No]" end @@ -594,19 +562,10 @@ function tabbuilder.handle_create_world_buttons(fields) if gameindex > 0 and worldname ~= "" then - menu.worldlist = engine.get_worlds() - - local found = false - for i=1,#menu.worldlist,1 do - if menu.worldlist[i].name == worldname then - found = true - break - end - end local message = nil - if not found then + if not worldlist.exists(worldname) then engine.setting_set("mg_name",fields["dd_mapgen"]) message = engine.create_world(worldname,gameindex) else @@ -618,25 +577,10 @@ function tabbuilder.handle_create_world_buttons(fields) else menu.last_game = gameindex engine.setting_set("main_menu_last_game_idx",gameindex) - menu.worldlist = engine.get_worlds() - - local worldlist = menu.worldlist - - if tabbuilder.current_tab == "singleplayer" then - worldlist = menu.filtered_game_list_raw() - end - - local index = 0 - for i=1,#worldlist,1 do - if worldlist[i].name == worldname then - index = i - break - end - end - - engine.setting_set("main_menu_singleplayer_world_idx", index) - menu.last_world = index + worldlist.refresh() + engine.setting_set("mainmenu_last_selected_world", + worldlist.engine_index_by_name(worldname)) end else gamedata.errormessage = "No worldname given or no game selected" @@ -648,6 +592,7 @@ function tabbuilder.handle_create_world_buttons(fields) return end + --close dialog tabbuilder.is_dialog = false tabbuilder.show_buttons = true tabbuilder.current_tab = engine.setting_get("main_menu_tab") @@ -657,11 +602,11 @@ end function tabbuilder.handle_delete_world_buttons(fields) if fields["world_delete_confirm"] then - if menu.last_world > 0 and - menu.last_world <= #menu.worldlist then - engine.delete_world(menu.last_world) - menu.worldlist = engine.get_worlds() - menu.last_world = 1 + if menu.world_to_del > 0 and + menu.world_to_del <= #worldlist.get_raw_list() then + engine.delete_world(menu.world_to_del) + menu.world_to_del = 0 + worldlist.refresh() end end @@ -811,27 +756,12 @@ function tabbuilder.handle_server_buttons(fields) world_doubleclick = true end if event.typ == "CHG" then - engine.setting_set("main_menu_last_world_idx",engine.get_textlist_index("srv_worlds")) + engine.setting_set("mainmenu_last_selected_world", + worldlist.get_engine_index(engine.get_textlist_index("srv_worlds"))) end end - if fields["key_up"] then - local oldidx = engine.get_textlist_index("srv_worlds") - - if oldidx > 1 then - local newidx = oldidx -1 - engine.setting_set("main_menu_last_world_idx",newidx) - end - end - - if fields["key_down"] then - local oldidx = engine.get_textlist_index("srv_worlds") - - if oldidx < #menu.worldlist then - local newidx = oldidx + 1 - engine.setting_set("main_menu_last_world_idx",newidx) - end - end + menu.handle_key_up_down(fields,"srv_worlds","mainmenu_last_selected_world") if fields["cb_creative_mode"] then engine.setting_setbool("creative_mode",tabbuilder.tobool(fields["cb_creative_mode"])) @@ -845,21 +775,16 @@ function tabbuilder.handle_server_buttons(fields) engine.setting_setbool("server_announce",tabbuilder.tobool(fields["cb_server_announce"])) end - if fields["start_server"] ~= nil or world_doubleclick or fields["key_enter"] then local selected = engine.get_textlist_index("srv_worlds") if selected > 0 then - gamedata.playername = fields["te_playername"] gamedata.password = fields["te_passwd"] gamedata.port = fields["te_serverport"] gamedata.address = "" - gamedata.selected_world = selected - - engine.setting_set("main_menu_tab",tabbuilder.current_tab) - engine.setting_set("main_menu_last_world_idx",gamedata.selected_world) + gamedata.selected_world = worldlist.get_engine_index(selected) menu.update_last_game(gamedata.selected_world) engine.start() @@ -874,16 +799,18 @@ function tabbuilder.handle_server_buttons(fields) if fields["world_delete"] ~= nil then local selected = engine.get_textlist_index("srv_worlds") - if selected > 0 then - menu.last_world = engine.get_textlist_index("srv_worlds") - if menu.lastworld() ~= nil and - menu.lastworld().name ~= nil and - menu.lastworld().name ~= "" then + if selected > 0 and + selected <= worldlist.size() then + local world = worldlist.get_list()[selected] + if world ~= nil and + world.name ~= nil and + world.name ~= "" then + menu.world_to_del = worldlist.get_engine_index(selected) tabbuilder.current_tab = "dialog_delete_world" tabbuilder.is_dialog = true tabbuilder.show_buttons = false else - menu.last_world = 0 + menu.world_to_del = 0 end end end @@ -891,7 +818,7 @@ function tabbuilder.handle_server_buttons(fields) if fields["world_configure"] ~= nil then selected = engine.get_textlist_index("srv_worlds") if selected > 0 then - modmgr.world_config_selected_world = selected + modmgr.world_config_selected_world = worldlist.get_engine_index(selected) if modmgr.init_worldconfig() then tabbuilder.current_tab = "dialog_configure_world" tabbuilder.is_dialog = true @@ -970,27 +897,12 @@ function tabbuilder.handle_singleplayer_buttons(fields) end if event.typ == "CHG" then - engine.setting_set("main_menu_singleplayer_world_idx",engine.get_textlist_index("sp_worlds")) + engine.setting_set("mainmenu_last_selected_world", + worldlist.get_engine_index(engine.get_textlist_index("sp_worlds"))) end end - if fields["key_up"] then - local oldidx = engine.get_textlist_index("sp_worlds") - - if oldidx > 1 then - local newidx = oldidx -1 - engine.setting_set("main_menu_singleplayer_world_idx",newidx) - end - end - - if fields["key_down"] then - local oldidx = engine.get_textlist_index("sp_worlds") - - if oldidx < #menu.filtered_game_list_raw() then - local newidx = oldidx + 1 - engine.setting_set("main_menu_singleplayer_world_idx",newidx) - end - end + menu.handle_key_up_down(fields,"sp_worlds","mainmenu_last_selected_world") if fields["cb_creative_mode"] then engine.setting_setbool("creative_mode",tabbuilder.tobool(fields["cb_creative_mode"])) @@ -1005,11 +917,8 @@ function tabbuilder.handle_singleplayer_buttons(fields) fields["key_enter"] then local selected = engine.get_textlist_index("sp_worlds") if selected > 0 then - gamedata.selected_world = menu.filtered_index_to_plain(selected) + gamedata.selected_world = worldlist.get_engine_index(selected) gamedata.singleplayer = true - - engine.setting_set("main_menu_tab",tabbuilder.current_tab) - engine.setting_set("main_menu_singleplayer_world_idx",selected) menu.update_last_game(gamedata.selected_world) @@ -1025,16 +934,18 @@ function tabbuilder.handle_singleplayer_buttons(fields) if fields["world_delete"] ~= nil then local selected = engine.get_textlist_index("sp_worlds") - if selected > 0 then - menu.last_world = menu.filtered_index_to_plain(selected) - if menu.lastworld() ~= nil and - menu.lastworld().name ~= nil and - menu.lastworld().name ~= "" then + if selected > 0 and + selected <= worldlist.size() then + local world = worldlist.get_list()[selected] + if world ~= nil and + world.name ~= nil and + world.name ~= "" then + menu.world_to_del = worldlist.get_engine_index(selected) tabbuilder.current_tab = "dialog_delete_world" tabbuilder.is_dialog = true tabbuilder.show_buttons = false else - menu.last_world = 0 + menu.world_to_del = 0 end end end @@ -1042,7 +953,7 @@ function tabbuilder.handle_singleplayer_buttons(fields) if fields["world_configure"] ~= nil then selected = engine.get_textlist_index("sp_worlds") if selected > 0 then - modmgr.world_config_selected_world = menu.filtered_index_to_plain(selected) + modmgr.world_config_selected_world = worldlist.get_engine_index(selected) if modmgr.init_worldconfig() then tabbuilder.current_tab = "dialog_configure_world" tabbuilder.is_dialog = true @@ -1180,11 +1091,10 @@ end -------------------------------------------------------------------------------- function tabbuilder.tab_server() - local index = engine.setting_get("main_menu_last_world_idx") - - if index == nil then - index = 0 - end + + local index = worldlist.get_current_index( + tonumber(engine.setting_get("mainmenu_last_selected_world")) + ) local retval = "button[4,4.15;2.6,0.5;world_delete;Delete]" .. @@ -1203,20 +1113,9 @@ function tabbuilder.tab_server() engine.setting_get("name") .. "]" .. "pwdfield[0.8,4.2;3,0.5;te_passwd;Password]" .. "field[0.8,5.2;3,0.5;te_serverport;Server Port;30000]" .. - "textlist[4,0.25;7.5,3.7;srv_worlds;" - - if #menu.worldlist > 0 then - retval = retval .. menu.worldlist[1].name .. - " \\[" .. menu.worldlist[1].gameid .. "\\]" - - for i=2,#menu.worldlist,1 do - retval = retval .. "," .. menu.worldlist[i].name .. - " \\[" .. menu.worldlist[i].gameid .. "\\]" - end - retval = retval .. ";" .. index .. "]" - else - retval = retval .. ";0]" - end + "textlist[4,0.25;7.5,3.7;srv_worlds;" .. + menu.render_world_list() .. + ";" .. index .. "]" return retval end @@ -1244,12 +1143,10 @@ end -------------------------------------------------------------------------------- function tabbuilder.tab_singleplayer() - local index = engine.setting_get("main_menu_singleplayer_world_idx") - - if index == nil or - #menu.filtered_game_list_raw() == 0 then - index = 0 - end + + local index = worldlist.get_current_index( + tonumber(engine.setting_get("mainmenu_last_selected_world")) + ) return "button[4,4.15;2.6,0.5;world_delete;Delete]" .. "button[6.5,4.15;2.8,0.5;world_create;New]" .. @@ -1262,7 +1159,7 @@ function tabbuilder.tab_singleplayer() "checkbox[0.5,0.7;cb_enable_damage;Enable Damage;" .. dump(engine.setting_getbool("enable_damage")) .. "]".. "textlist[4,0.25;7.5,3.7;sp_worlds;" .. - menu.filtered_game_list() .. + menu.render_world_list() .. ";" .. index .. "]" .. menubar.formspec end @@ -1406,8 +1303,10 @@ end -------------------------------------------------------------------------------- -------------------------------------------------------------------------------- init_globals() +worldlist.init() menu.init() tabbuilder.init() menubar.refresh() modstore.init() + update_menu() diff --git a/builtin/mainmenu_worldlist.lua b/builtin/mainmenu_worldlist.lua new file mode 100644 index 000000000..4f7ba097c --- /dev/null +++ b/builtin/mainmenu_worldlist.lua @@ -0,0 +1,211 @@ +worldlist = {} + +-------------------------------------------------------------------------------- +function worldlist.refresh() + worldlist.m_raw_worldlist = engine.get_worlds() + worldlist.process() +end + +-------------------------------------------------------------------------------- +function worldlist.init() + worldlist.m_gamefilter = nil + worldlist.m_sortmode = "alphabetic" + + worldlist.m_processed_worldlist = nil + worldlist.m_raw_worldlist = engine.get_worlds() + + worldlist.process() +end + +-------------------------------------------------------------------------------- +function worldlist.set_gamefilter(gameid) + if gameid == worldlist.m_gamefilter then + return + end + worldlist.m_gamefilter = gameid + worldlist.process() +end + +-------------------------------------------------------------------------------- +function worldlist.get_gamefilter() + return worldlist.m_gamefilter +end + +-------------------------------------------------------------------------------- +--supported sort mode "alphabetic|none" +function worldlist.set_sortmode(mode) + if (mode == worldlist.m_sortmode) then + return + end + worldlist.m_sortmode = mode + worldlist.process() +end + +-------------------------------------------------------------------------------- +function worldlist.get_list() + return worldlist.m_processed_worldlist +end + +-------------------------------------------------------------------------------- +function worldlist.get_raw_list() + return worldlist.m_raw_worldlist +end + +-------------------------------------------------------------------------------- +function worldlist.get_raw_world(idx) + if type(idx) ~= "number" then + idx = tonumber(idx) + end + + if idx ~= nil and idx > 0 and idx < #worldlist.m_raw_worldlist then + return worldlist.m_raw_worldlist[idx] + end + + return nil +end + +-------------------------------------------------------------------------------- +function worldlist.get_engine_index(worldlistindex) + assert(worldlist.m_processed_worldlist ~= nil) + + if worldlistindex ~= nil and worldlistindex > 0 and + worldlistindex <= #worldlist.m_processed_worldlist then + local entry = worldlist.m_processed_worldlist[worldlistindex] + + for i,v in ipairs(worldlist.m_raw_worldlist) do + + if worldlist.compare(v,entry) then + return i + end + end + end + + return 0 +end + +-------------------------------------------------------------------------------- +function worldlist.get_current_index(worldlistindex) + assert(worldlist.m_processed_worldlist ~= nil) + + if worldlistindex ~= nil and worldlistindex > 0 and + worldlistindex <= #worldlist.m_raw_worldlist then + local entry = worldlist.m_raw_worldlist[worldlistindex] + + for i,v in ipairs(worldlist.m_processed_worldlist) do + + if worldlist.compare(v,entry) then + return i + end + end + end + + return 0 +end + +-------------------------------------------------------------------------------- +function worldlist.process() + assert(worldlist.m_raw_worldlist ~= nil) + + if worldlist.m_sortmode == "none" and + worldlist.m_gamefilter == nil then + worldlist.m_processed_worldlist = worldlist.m_raw_worldlist + return + end + + worldlist.m_processed_worldlist = {} + + for i,v in ipairs(worldlist.m_raw_worldlist) do + + if worldlist.m_gamefilter == nil or + v.gameid == worldlist.m_gamefilter then + table.insert(worldlist.m_processed_worldlist,v) + end + end + + if worldlist.m_sortmode == "none" then + return + end + + if worldlist.m_sortmode == "alphabetic" then + worldlist.sort_alphabetic() + end + +end + +-------------------------------------------------------------------------------- +function worldlist.compare(world1,world2) + + if world1.path ~= world2.path then + return false + end + + if world1.name ~= world2.name then + return false + end + + if world1.gameid ~= world2.gameid then + return false + end + + return true +end + +-------------------------------------------------------------------------------- +function worldlist.size() + if worldlist.m_processed_worldlist == nil then + return 0 + end + + return #worldlist.m_processed_worldlist +end + +-------------------------------------------------------------------------------- +function worldlist.exists(worldname) + for i,v in ipairs(worldlist.m_raw_worldlist) do + if v.name == worldname then + return true + end + end + return false +end + + +-------------------------------------------------------------------------------- +function worldlist.engine_index_by_name(worldname) + local worldcount = 0 + local worldidx = 0 + for i,v in ipairs(worldlist.m_raw_worldlist) do + if v.name == worldname then + worldcount = worldcount +1 + worldidx = i + end + end + + + -- If there are more worlds than one with same name we can't decide which + -- one is meant. This shouldn't be possible but just for sure. + if worldcount > 1 then + worldidx=0 + end + + return worldidx +end + +-------------------------------------------------------------------------------- +function worldlist.sort_alphabetic() + + table.sort(worldlist.m_processed_worldlist, function(a, b) + local n1 = a.name + local n2 = b.name + local count = math.min(#n1, #n2) + + for i=1,count do + if n1:sub(i, i):lower() < n2:sub(i, i):lower() then + return true + elseif n1:sub(i, i):lower() > n2:sub(i, i):lower() then + return false + end + end + return (#n1 <= #n2) + end) +end |