builtin/mainmenu/tab_server.lua

   1 --Minetest
   2 --Copyright (C) 2014 sapier
   3 --
   4 --This program is free software; you can redistribute it and/or modify
   5 --it under the terms of the GNU Lesser General Public License as published by
   6 --the Free Software Foundation; either version 2.1 of the License, or
   7 --(at your option) any later version.
   8 --
   9 --This program is distributed in the hope that it will be useful,
  10 --but WITHOUT ANY WARRANTY; without even the implied warranty of
  11 --MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12 --GNU Lesser General Public License for more details.
  13 --
  14 --You should have received a copy of the GNU Lesser General Public License along
  15 --with this program; if not, write to the Free Software Foundation, Inc.,
  16 --51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  17
  18 --------------------------------------------------------------------------------
  19 local function get_formspec(tabview, name, tabdata)
  20
  21         local index = menudata.worldlist:get_current_index(
  22                                 tonumber(core.setting_get("mainmenu_last_selected_world"))
  23                                 )
  24
  25         local retval =
  26                 "button[4,4.15;2.6,0.5;world_delete;" .. fgettext("Delete") .. "]" ..
  27                 "button[6.5,4.15;2.8,0.5;world_create;" .. fgettext("New") .. "]" ..
  28                 "button[9.2,4.15;2.55,0.5;world_configure;" .. fgettext("Configure") .. "]" ..
  29                 "button[8.5,4.95;3.25,0.5;start_server;" .. fgettext("Start Game") .. "]" ..
  30                 "label[4,-0.25;" .. fgettext("Select World:") .. "]" ..
  31                 "checkbox[0.25,0.25;cb_creative_mode;" .. fgettext("Creative Mode") .. ";" ..
  32                 dump(core.setting_getbool("creative_mode")) .. "]" ..
  33                 "checkbox[0.25,0.7;cb_enable_damage;" .. fgettext("Enable Damage") .. ";" ..
  34                 dump(core.setting_getbool("enable_damage")) .. "]" ..
  35                 "checkbox[0.25,1.15;cb_server_announce;" .. fgettext("Public") .. ";" ..
  36                 dump(core.setting_getbool("server_announce")) .. "]" ..
  37                 "label[0.25,2.2;" .. fgettext("Name/Password") .. "]" ..
  38                 "field[0.55,3.2;3.5,0.5;te_playername;;" ..
  39                 core.formspec_escape(core.setting_get("name")) .. "]" ..
  40                 "pwdfield[0.55,4;3.5,0.5;te_passwd;]"
  41
  42         local bind_addr = core.setting_get("bind_address")
  43         if bind_addr ~= nil and bind_addr ~= "" then
  44                 retval = retval ..
  45                         "field[0.55,5.2;2.25,0.5;te_serveraddr;" .. fgettext("Bind Address") .. ";" ..
  46                         core.formspec_escape(core.setting_get("bind_address")) .. "]" ..
  47                         "field[2.8,5.2;1.25,0.5;te_serverport;" .. fgettext("Port") .. ";" ..
  48                         core.formspec_escape(core.setting_get("port")) .. "]"
  49         else
  50                 retval = retval ..
  51                         "field[0.55,5.2;3.5,0.5;te_serverport;" .. fgettext("Server Port") .. ";" ..
  52                         core.formspec_escape(core.setting_get("port")) .. "]"
  53         end
  54
  55         retval = retval ..
  56                 "textlist[4,0.25;7.5,3.7;srv_worlds;" ..
  57                 menu_render_worldlist() ..
  58                 ";" .. index .. "]"
  59
  60         return retval
  61 end
  62
  63 --------------------------------------------------------------------------------
  64 local function main_button_handler(this, fields, name, tabdata)
  65
  66         local world_doubleclick = false
  67
  68         if fields["srv_worlds"] ~= nil then
  69                 local event = core.explode_textlist_event(fields["srv_worlds"])
  70                 local selected = core.get_textlist_index("srv_worlds")
  71
  72                 menu_worldmt_legacy(selected)
  73
  74                 if event.type == "DCL" then
  75                         world_doubleclick = true
  76                 end
  77                 if event.type == "CHG" then
  78                         core.setting_set("mainmenu_last_selected_world",
  79                                 menudata.worldlist:get_raw_index(core.get_textlist_index("srv_worlds")))
  80                         return true
  81                 end
  82         end
  83
  84         if menu_handle_key_up_down(fields,"srv_worlds","mainmenu_last_selected_world") then
  85                 return true
  86         end
  87
  88         if fields["cb_creative_mode"] then
  89                 core.setting_set("creative_mode", fields["cb_creative_mode"])
  90                 local selected = core.get_textlist_index("srv_worlds")
  91                 menu_worldmt(selected, "creative_mode", fields["cb_creative_mode"])
  92
  93                 return true
  94         end
  95
  96         if fields["cb_enable_damage"] then
  97                 core.setting_set("enable_damage", fields["cb_enable_damage"])
  98                 local selected = core.get_textlist_index("srv_worlds")
  99                 menu_worldmt(selected, "enable_damage", fields["cb_enable_damage"])
 100
 101                 return true
 102         end
 103
 104         if fields["cb_server_announce"] then
 105                 core.setting_set("server_announce", fields["cb_server_announce"])
 106                 local selected = core.get_textlist_index("srv_worlds")
 107                 menu_worldmt(selected, "server_announce", fields["cb_server_announce"])
 108
 109                 return true
 110         end
 111
 112         if fields["start_server"] ~= nil or
 113                 world_doubleclick or
 114                 fields["key_enter"] then
 115                 local selected = core.get_textlist_index("srv_worlds")
 116                 gamedata.selected_world = menudata.worldlist:get_raw_index(selected)
 117                 if selected ~= nil and gamedata.selected_world ~= 0 then
 118                         gamedata.playername     = fields["te_playername"]
 119                         gamedata.password       = fields["te_passwd"]
 120                         gamedata.port           = fields["te_serverport"]
 121                         gamedata.address        = ""
 122
 123                         core.setting_set("port",gamedata.port)
 124                         if fields["te_serveraddr"] ~= nil then
 125                                 core.setting_set("bind_address",fields["te_serveraddr"])
 126                         end
 127
 128                         --update last game
 129                         local world = menudata.worldlist:get_raw_element(gamedata.selected_world)
 130                         if world then
 131                                 local game, index = gamemgr.find_by_gameid(world.gameid)
 132                                 core.setting_set("menu_last_game", game.id)
 133                         end
 134
 135                         core.start()
 136                 else
 137                         gamedata.errormessage =
 138                                 fgettext("No world created or selected!")
 139                 end
 140                 return true
 141         end
 142
 143         if fields["world_create"] ~= nil then
 144                 local create_world_dlg = create_create_world_dlg(true)
 145                 create_world_dlg:set_parent(this)
 146                 create_world_dlg:show()
 147                 this:hide()
 148                 return true
 149         end
 150
 151         if fields["world_delete"] ~= nil then
 152                 local selected = core.get_textlist_index("srv_worlds")
 153                 if selected ~= nil and
 154                         selected <= menudata.worldlist:size() then
 155                         local world = menudata.worldlist:get_list()[selected]
 156                         if world ~= nil and
 157                                 world.name ~= nil and
 158                                 world.name ~= "" then
 159                                 local index = menudata.worldlist:get_raw_index(selected)
 160                                 local delete_world_dlg = create_delete_world_dlg(world.name,index)
 161                                 delete_world_dlg:set_parent(this)
 162                                 delete_world_dlg:show()
 163                                 this:hide()
 164                         end
 165                 end
 166
 167                 return true
 168         end
 169
 170         if fields["world_configure"] ~= nil then
 171                 local selected = core.get_textlist_index("srv_worlds")
 172                 if selected ~= nil then
 173                         local configdialog =
 174                                 create_configure_world_dlg(
 175                                                 menudata.worldlist:get_raw_index(selected))
 176
 177                         if (configdialog ~= nil) then
 178                                 configdialog:set_parent(this)
 179                                 configdialog:show()
 180                                 this:hide()
 181                         end
 182                 end
 183                 return true
 184         end
 185         return false
 186 end
 187
 188 --------------------------------------------------------------------------------
 189 return {
 190         name = "server",
 191         caption = fgettext("Server"),
 192         cbf_formspec = get_formspec,
 193         cbf_button_handler = main_button_handler,
 194         on_change = nil
 195 }