123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407 |
- --Minetest
- --Copyright (C) 2014 sapier
- --
- --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.
- --
- --You should have received a copy of the GNU Lesser General Public License along
- --with this program; if not, write to the Free Software Foundation, Inc.,
- --51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
- local current_game, singleplayer_refresh_gamebar
- local valid_disabled_settings = {
- ["enable_damage"]=true,
- ["creative_mode"]=true,
- ["enable_server"]=true,
- }
- -- Currently chosen game in gamebar for theming and filtering
- function current_game()
- local last_game_id = core.settings:get("menu_last_game")
- local game = pkgmgr.find_by_gameid(last_game_id)
- return game
- end
- -- Apply menu changes from given game
- function apply_game(game)
- core.set_topleft_text(game.name)
- core.settings:set("menu_last_game", game.id)
- menudata.worldlist:set_filtercriteria(game.id)
- mm_game_theme.update("singleplayer", game) -- this refreshes the formspec
- local index = filterlist.get_current_index(menudata.worldlist,
- tonumber(core.settings:get("mainmenu_last_selected_world")))
- if not index or index < 1 then
- local selected = core.get_textlist_index("sp_worlds")
- if selected ~= nil and selected < #menudata.worldlist:get_list() then
- index = selected
- else
- index = #menudata.worldlist:get_list()
- end
- end
- menu_worldmt_legacy(index)
- end
- function singleplayer_refresh_gamebar()
- local old_bar = ui.find_by_name("game_button_bar")
- if old_bar ~= nil then
- old_bar:delete()
- end
- local function game_buttonbar_button_handler(fields)
- if fields.game_open_cdb then
- local maintab = ui.find_by_name("maintab")
- local dlg = create_store_dlg("game")
- dlg:set_parent(maintab)
- maintab:hide()
- dlg:show()
- return true
- end
- for _, game in ipairs(pkgmgr.games) do
- if fields["game_btnbar_" .. game.id] then
- apply_game(game)
- return true
- end
- end
- end
- local btnbar = buttonbar_create("game_button_bar",
- game_buttonbar_button_handler,
- {x=-0.3,y=5.9}, "horizontal", {x=12.4,y=1.15})
- for _, game in ipairs(pkgmgr.games) do
- local btn_name = "game_btnbar_" .. game.id
- local image = nil
- local text = nil
- local tooltip = core.formspec_escape(game.title)
- if (game.menuicon_path or "") ~= "" then
- image = core.formspec_escape(game.menuicon_path)
- else
- local part1 = game.id:sub(1,5)
- local part2 = game.id:sub(6,10)
- local part3 = game.id:sub(11)
- text = part1 .. "\n" .. part2
- if part3 ~= "" then
- text = text .. "\n" .. part3
- end
- end
- btnbar:add_button(btn_name, text, image, tooltip)
- end
- local plus_image = core.formspec_escape(defaulttexturedir .. "plus.png")
- btnbar:add_button("game_open_cdb", "", plus_image, fgettext("Install games from ContentDB"))
- end
- local function get_disabled_settings(game)
- if not game then
- return {}
- end
- local gameconfig = Settings(game.path .. "/game.conf")
- local disabled_settings = {}
- if gameconfig then
- local disabled_settings_str = (gameconfig:get("disabled_settings") or ""):split()
- for _, value in pairs(disabled_settings_str) do
- local state = false
- value = value:trim()
- if string.sub(value, 1, 1) == "!" then
- state = true
- value = string.sub(value, 2)
- end
- if valid_disabled_settings[value] then
- disabled_settings[value] = state
- else
- core.log("error", "Invalid disabled setting in game.conf: "..tostring(value))
- end
- end
- end
- return disabled_settings
- end
- local function get_formspec(tabview, name, tabdata)
- local retval = ""
- local index = filterlist.get_current_index(menudata.worldlist,
- tonumber(core.settings:get("mainmenu_last_selected_world")))
- local list = menudata.worldlist:get_list()
- local world = list and index and list[index]
- local game
- if world then
- game = pkgmgr.find_by_gameid(world.gameid)
- else
- game = current_game()
- end
- local disabled_settings = get_disabled_settings(game)
- local creative, damage, host = "", "", ""
- -- Y offsets for game settings checkboxes
- local y = -0.2
- local yo = 0.45
- if disabled_settings["creative_mode"] == nil then
- creative = "checkbox[0,"..y..";cb_creative_mode;".. fgettext("Creative Mode") .. ";" ..
- dump(core.settings:get_bool("creative_mode")) .. "]"
- y = y + yo
- end
- if disabled_settings["enable_damage"] == nil then
- damage = "checkbox[0,"..y..";cb_enable_damage;".. fgettext("Enable Damage") .. ";" ..
- dump(core.settings:get_bool("enable_damage")) .. "]"
- y = y + yo
- end
- if disabled_settings["enable_server"] == nil then
- host = "checkbox[0,"..y..";cb_server;".. fgettext("Host Server") ..";" ..
- dump(core.settings:get_bool("enable_server")) .. "]"
- y = y + yo
- end
- retval = retval ..
- "button[3.9,3.8;2.8,1;world_delete;".. fgettext("Delete") .. "]" ..
- "button[6.55,3.8;2.8,1;world_configure;".. fgettext("Select Mods") .. "]" ..
- "button[9.2,3.8;2.8,1;world_create;".. fgettext("New") .. "]" ..
- "label[3.9,-0.05;".. fgettext("Select World:") .. "]"..
- creative ..
- damage ..
- host ..
- "textlist[3.9,0.4;7.9,3.45;sp_worlds;" ..
- menu_render_worldlist() ..
- ";" .. index .. "]"
- if core.settings:get_bool("enable_server") and disabled_settings["enable_server"] == nil then
- retval = retval ..
- "button[7.9,4.75;4.1,1;play;".. fgettext("Host Game") .. "]" ..
- "checkbox[0,"..y..";cb_server_announce;" .. fgettext("Announce Server") .. ";" ..
- dump(core.settings:get_bool("server_announce")) .. "]" ..
- "field[0.3,2.85;3.8,0.5;te_playername;" .. fgettext("Name") .. ";" ..
- core.formspec_escape(core.settings:get("name")) .. "]" ..
- "pwdfield[0.3,4.05;3.8,0.5;te_passwd;" .. fgettext("Password") .. "]"
- local bind_addr = core.settings:get("bind_address")
- if bind_addr ~= nil and bind_addr ~= "" then
- retval = retval ..
- "field[0.3,5.25;2.5,0.5;te_serveraddr;" .. fgettext("Bind Address") .. ";" ..
- core.formspec_escape(core.settings:get("bind_address")) .. "]" ..
- "field[2.85,5.25;1.25,0.5;te_serverport;" .. fgettext("Port") .. ";" ..
- core.formspec_escape(core.settings:get("port")) .. "]"
- else
- retval = retval ..
- "field[0.3,5.25;3.8,0.5;te_serverport;" .. fgettext("Server Port") .. ";" ..
- core.formspec_escape(core.settings:get("port")) .. "]"
- end
- else
- retval = retval ..
- "button[7.9,4.75;4.1,1;play;" .. fgettext("Play Game") .. "]"
- end
- return retval
- end
- local function main_button_handler(this, fields, name, tabdata)
- assert(name == "local")
- if this.dlg_create_world_closed_at == nil then
- this.dlg_create_world_closed_at = 0
- end
- local world_doubleclick = false
- if fields["sp_worlds"] ~= nil then
- local event = core.explode_textlist_event(fields["sp_worlds"])
- local selected = core.get_textlist_index("sp_worlds")
- menu_worldmt_legacy(selected)
- if event.type == "DCL" then
- world_doubleclick = true
- end
- if event.type == "CHG" and selected ~= nil then
- core.settings:set("mainmenu_last_selected_world",
- menudata.worldlist:get_raw_index(selected))
- return true
- end
- end
- if menu_handle_key_up_down(fields,"sp_worlds","mainmenu_last_selected_world") then
- return true
- end
- if fields["cb_creative_mode"] then
- core.settings:set("creative_mode", fields["cb_creative_mode"])
- local selected = core.get_textlist_index("sp_worlds")
- menu_worldmt(selected, "creative_mode", fields["cb_creative_mode"])
- return true
- end
- if fields["cb_enable_damage"] then
- core.settings:set("enable_damage", fields["cb_enable_damage"])
- local selected = core.get_textlist_index("sp_worlds")
- menu_worldmt(selected, "enable_damage", fields["cb_enable_damage"])
- return true
- end
- if fields["cb_server"] then
- core.settings:set("enable_server", fields["cb_server"])
- return true
- end
- if fields["cb_server_announce"] then
- core.settings:set("server_announce", fields["cb_server_announce"])
- local selected = core.get_textlist_index("srv_worlds")
- menu_worldmt(selected, "server_announce", fields["cb_server_announce"])
- return true
- end
- if fields["play"] ~= nil or world_doubleclick or fields["key_enter"] then
- local enter_key_duration = core.get_us_time() - this.dlg_create_world_closed_at
- if world_doubleclick and enter_key_duration <= 200000 then -- 200 ms
- this.dlg_create_world_closed_at = 0
- return true
- end
- local selected = core.get_textlist_index("sp_worlds")
- gamedata.selected_world = menudata.worldlist:get_raw_index(selected)
- if selected == nil or gamedata.selected_world == 0 then
- gamedata.errormessage =
- fgettext("No world created or selected!")
- return true
- end
- -- Update last game
- local world = menudata.worldlist:get_raw_element(gamedata.selected_world)
- local game_obj
- if world then
- game_obj = pkgmgr.find_by_gameid(world.gameid)
- core.settings:set("menu_last_game", game_obj.id)
- end
- local disabled_settings = get_disabled_settings(game_obj)
- for k, _ in pairs(valid_disabled_settings) do
- local v = disabled_settings[k]
- if v ~= nil then
- if k == "enable_server" and v == true then
- error("Setting 'enable_server' cannot be force-enabled! The game.conf needs to be fixed.")
- end
- core.settings:set_bool(k, disabled_settings[k])
- end
- end
- if core.settings:get_bool("enable_server") then
- gamedata.playername = fields["te_playername"]
- gamedata.password = fields["te_passwd"]
- gamedata.port = fields["te_serverport"]
- gamedata.address = ""
- core.settings:set("port",gamedata.port)
- if fields["te_serveraddr"] ~= nil then
- core.settings:set("bind_address",fields["te_serveraddr"])
- end
- else
- gamedata.singleplayer = true
- end
- core.start()
- return true
- end
- if fields["world_create"] ~= nil then
- this.dlg_create_world_closed_at = 0
- local create_world_dlg = create_create_world_dlg()
- create_world_dlg:set_parent(this)
- this:hide()
- create_world_dlg:show()
- mm_game_theme.update("singleplayer", current_game())
- return true
- end
- if fields["world_delete"] ~= nil then
- local selected = core.get_textlist_index("sp_worlds")
- if selected ~= nil and
- selected <= menudata.worldlist:size() then
- local world = menudata.worldlist:get_list()[selected]
- if world ~= nil and
- world.name ~= nil and
- world.name ~= "" then
- local index = menudata.worldlist:get_raw_index(selected)
- local delete_world_dlg = create_delete_world_dlg(world.name,index)
- delete_world_dlg:set_parent(this)
- this:hide()
- delete_world_dlg:show()
- mm_game_theme.update("singleplayer",current_game())
- end
- end
- return true
- end
- if fields["world_configure"] ~= nil then
- local selected = core.get_textlist_index("sp_worlds")
- if selected ~= nil then
- local configdialog =
- create_configure_world_dlg(
- menudata.worldlist:get_raw_index(selected))
- if (configdialog ~= nil) then
- configdialog:set_parent(this)
- this:hide()
- configdialog:show()
- mm_game_theme.update("singleplayer",current_game())
- end
- end
- return true
- end
- end
- local function on_change(type, old_tab, new_tab)
- if (type == "ENTER") then
- local game = current_game()
- if game then
- apply_game(game)
- end
- singleplayer_refresh_gamebar()
- ui.find_by_name("game_button_bar"):show()
- else
- menudata.worldlist:set_filtercriteria(nil)
- local gamebar = ui.find_by_name("game_button_bar")
- if gamebar then
- gamebar:hide()
- end
- core.set_topleft_text("")
- -- If new_tab is nil, a dialog is being shown; avoid resetting the theme
- if new_tab then
- mm_game_theme.update(new_tab,nil)
- end
- end
- end
- --------------------------------------------------------------------------------
- return {
- name = "local",
- caption = fgettext("Start Game"),
- cbf_formspec = get_formspec,
- cbf_button_handler = main_button_handler,
- on_change = on_change
- }
|