builtin/mainmenu/tab_online.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         -- Update the cached supported proto info,
  21         -- it may have changed after a change by the settings menu.
  22         common_update_cached_supp_proto()
  23         local selected
  24         if menudata.search_result then
  25                 selected = menudata.search_result[tabdata.selected]
  26         else
  27                 selected = serverlistmgr.servers[tabdata.selected]
  28         end
  29
  30         if not tabdata.search_for then
  31                 tabdata.search_for = ""
  32         end
  33
  34         local retval =
  35                 -- Search
  36                 "field[0.15,0.075;5.91,1;te_search;;" .. core.formspec_escape(tabdata.search_for) .. "]" ..
  37                 "image_button[5.63,-.165;.83,.83;" .. core.formspec_escape(defaulttexturedir .. "search.png") .. ";btn_mp_search;]" ..
  38                 "image_button[6.3,-.165;.83,.83;" .. core.formspec_escape(defaulttexturedir .. "clear.png") .. ";btn_mp_clear;]" ..
  39                 "image_button[6.97,-.165;.83,.83;" .. core.formspec_escape(defaulttexturedir .. "refresh.png")
  40                         .. ";btn_mp_refresh;]" ..
  41
  42                 -- Address / Port
  43                 "label[7.75,-0.25;" .. fgettext("Address / Port") .. "]" ..
  44                 "field[8,0.65;3.25,0.5;te_address;;" ..
  45                         core.formspec_escape(core.settings:get("address")) .. "]" ..
  46                 "field[11.1,0.65;1.4,0.5;te_port;;" ..
  47                         core.formspec_escape(core.settings:get("remote_port")) .. "]" ..
  48
  49                 -- Name / Password
  50                 "label[7.75,0.95;" .. fgettext("Name / Password") .. "]" ..
  51                 "field[8,1.85;2.9,0.5;te_name;;" ..
  52                         core.formspec_escape(core.settings:get("name")) .. "]" ..
  53                 "pwdfield[10.73,1.85;1.77,0.5;te_pwd;]" ..
  54
  55                 -- Description Background
  56                 "box[7.73,2.25;4.25,2.6;#999999]"..
  57
  58                 -- Connect
  59                 "button[9.88,4.9;2.3,1;btn_mp_connect;" .. fgettext("Connect") .. "]"
  60
  61         if tabdata.selected and selected then
  62                 if gamedata.fav then
  63                         retval = retval .. "button[7.73,4.9;2.3,1;btn_delete_favorite;" ..
  64                                 fgettext("Del. Favorite") .. "]"
  65                 end
  66                 if selected.description then
  67                         retval = retval .. "textarea[8.1,2.3;4.23,2.9;;;" ..
  68                                 core.formspec_escape((gamedata.serverdescription or ""), true) .. "]"
  69                 end
  70         end
  71
  72         --favorites
  73         retval = retval .. "tablecolumns[" ..
  74                 image_column(fgettext("Favorite"), "favorite") .. ";" ..
  75                 image_column(fgettext("Ping")) .. ",padding=0.25;" ..
  76                 "color,span=3;" ..
  77                 "text,align=right;" ..                -- clients
  78                 "text,align=center,padding=0.25;" ..  -- "/"
  79                 "text,align=right,padding=0.25;" ..   -- clients_max
  80                 image_column(fgettext("Creative mode"), "creative") .. ",padding=1;" ..
  81                 image_column(fgettext("Damage enabled"), "damage") .. ",padding=0.25;" ..
  82                 --~ PvP = Player versus Player
  83                 image_column(fgettext("PvP enabled"), "pvp") .. ",padding=0.25;" ..
  84                 "color,span=1;" ..
  85                 "text,padding=1]" ..
  86                 "table[-0.15,0.6;7.75,5.15;favorites;"
  87
  88         if menudata.search_result then
  89                 local favs = serverlistmgr.get_favorites()
  90                 for i = 1, #menudata.search_result do
  91                         local server = menudata.search_result[i]
  92                         for fav_id = 1, #favs do
  93                                 if server.address == favs[fav_id].address and
  94                                                 server.port == favs[fav_id].port then
  95                                         server.is_favorite = true
  96                                 end
  97                         end
  98
  99                         if i ~= 1 then
 100                                 retval = retval .. ","
 101                         end
 102
 103                         retval = retval .. render_serverlist_row(server, server.is_favorite)
 104                 end
 105         elseif #serverlistmgr.servers > 0 then
 106                 local favs = serverlistmgr.get_favorites()
 107                 if #favs > 0 then
 108                         for i = 1, #favs do
 109                                 for j = 1, #serverlistmgr.servers do
 110                                         if serverlistmgr.servers[j].address == favs[i].address and
 111                                                         serverlistmgr.servers[j].port == favs[i].port then
 112                                                 table.insert(serverlistmgr.servers, i, table.remove(serverlistmgr.servers, j))
 113                                         end
 114                                 end
 115                                 if favs[i].address ~= serverlistmgr.servers[i].address then
 116                                         table.insert(serverlistmgr.servers, i, favs[i])
 117                                 end
 118                         end
 119                 end
 120
 121                 retval = retval .. render_serverlist_row(serverlistmgr.servers[1], (#favs > 0))
 122                 for i = 2, #serverlistmgr.servers do
 123                         retval = retval .. "," .. render_serverlist_row(serverlistmgr.servers[i], (i <= #favs))
 124                 end
 125         end
 126
 127         if tabdata.selected then
 128                 retval = retval .. ";" .. tabdata.selected .. "]"
 129         else
 130                 retval = retval .. ";0]"
 131         end
 132
 133         return retval
 134 end
 135
 136 --------------------------------------------------------------------------------
 137 local function main_button_handler(tabview, fields, name, tabdata)
 138         local serverlist = menudata.search_result or serverlistmgr.servers
 139
 140         if fields.te_name then
 141                 gamedata.playername = fields.te_name
 142                 core.settings:set("name", fields.te_name)
 143         end
 144
 145         if fields.favorites then
 146                 local event = core.explode_table_event(fields.favorites)
 147                 local fav = serverlist[event.row]
 148
 149                 if event.type == "DCL" then
 150                         if event.row <= #serverlist then
 151                                 if not is_server_protocol_compat_or_error(
 152                                                         fav.proto_min, fav.proto_max) then
 153                                         return true
 154                                 end
 155
 156                                 gamedata.address    = fav.address
 157                                 gamedata.port       = fav.port
 158                                 gamedata.playername = fields.te_name
 159                                 gamedata.selected_world = 0
 160
 161                                 if fields.te_pwd then
 162                                         gamedata.password = fields.te_pwd
 163                                 end
 164
 165                                 gamedata.servername        = fav.name
 166                                 gamedata.serverdescription = fav.description
 167
 168                                 if gamedata.address and gamedata.port then
 169                                         core.settings:set("address", gamedata.address)
 170                                         core.settings:set("remote_port", gamedata.port)
 171                                         core.start()
 172                                 end
 173                         end
 174                         return true
 175                 end
 176
 177                 if event.type == "CHG" then
 178                         if event.row <= #serverlist then
 179                                 gamedata.fav = false
 180                                 local favs = serverlistmgr.get_favorites()
 181                                 local address = fav.address
 182                                 local port    = fav.port
 183                                 gamedata.serverdescription = fav.description
 184
 185                                 for i = 1, #favs do
 186                                         if fav.address == favs[i].address and
 187                                                         fav.port == favs[i].port then
 188                                                 gamedata.fav = true
 189                                         end
 190                                 end
 191
 192                                 if address and port then
 193                                         core.settings:set("address", address)
 194                                         core.settings:set("remote_port", port)
 195                                 end
 196                                 tabdata.selected = event.row
 197                         end
 198                         return true
 199                 end
 200         end
 201
 202         if fields.key_up or fields.key_down then
 203                 local fav_idx = core.get_table_index("favorites")
 204                 local fav = serverlist[fav_idx]
 205
 206                 if fav_idx then
 207                         if fields.key_up and fav_idx > 1 then
 208                                 fav_idx = fav_idx - 1
 209                         elseif fields.key_down and fav_idx < #serverlistmgr.servers then
 210                                 fav_idx = fav_idx + 1
 211                         end
 212                 else
 213                         fav_idx = 1
 214                 end
 215
 216                 if not serverlistmgr.servers or not fav then
 217                         tabdata.selected = 0
 218                         return true
 219                 end
 220
 221                 local address = fav.address
 222                 local port    = fav.port
 223                 gamedata.serverdescription = fav.description
 224                 if address and port then
 225                         core.settings:set("address", address)
 226                         core.settings:set("remote_port", port)
 227                 end
 228
 229                 tabdata.selected = fav_idx
 230                 return true
 231         end
 232
 233         if fields.btn_delete_favorite then
 234                 local current_favorite = core.get_table_index("favorites")
 235                 if not current_favorite then return end
 236
 237                 serverlistmgr.delete_favorite(serverlistmgr.servers[current_favorite])
 238                 serverlistmgr.sync()
 239                 tabdata.selected = nil
 240
 241                 core.settings:set("address", "")
 242                 core.settings:set("remote_port", "30000")
 243                 return true
 244         end
 245
 246         if fields.btn_mp_clear then
 247                 tabdata.search_for = ""
 248                 menudata.search_result = nil
 249                 return true
 250         end
 251
 252         if fields.btn_mp_search or fields.key_enter_field == "te_search" then
 253                 tabdata.selected = 1
 254                 local input = fields.te_search:lower()
 255                 tabdata.search_for = fields.te_search
 256
 257                 if #serverlistmgr.servers < 2 then
 258                         return true
 259                 end
 260
 261                 menudata.search_result = {}
 262
 263                 -- setup the keyword list
 264                 local keywords = {}
 265                 for word in input:gmatch("%S+") do
 266                         word = word:gsub("(%W)", "%%%1")
 267                         table.insert(keywords, word)
 268                 end
 269
 270                 if #keywords == 0 then
 271                         menudata.search_result = nil
 272                         return true
 273                 end
 274
 275                 -- Search the serverlist
 276                 local search_result = {}
 277                 for i = 1, #serverlistmgr.servers do
 278                         local server = serverlistmgr.servers[i]
 279                         local found = 0
 280                         for k = 1, #keywords do
 281                                 local keyword = keywords[k]
 282                                 if server.name then
 283                                         local sername = server.name:lower()
 284                                         local _, count = sername:gsub(keyword, keyword)
 285                                         found = found + count * 4
 286                                 end
 287
 288                                 if server.description then
 289                                         local desc = server.description:lower()
 290                                         local _, count = desc:gsub(keyword, keyword)
 291                                         found = found + count * 2
 292                                 end
 293                         end
 294                         if found > 0 then
 295                                 local points = (#serverlistmgr.servers - i) / 5 + found
 296                                 server.points = points
 297                                 table.insert(search_result, server)
 298                         end
 299                 end
 300                 if #search_result > 0 then
 301                         table.sort(search_result, function(a, b)
 302                                 return a.points > b.points
 303                         end)
 304                         menudata.search_result = search_result
 305                         local first_server = search_result[1]
 306                         core.settings:set("address",     first_server.address)
 307                         core.settings:set("remote_port", first_server.port)
 308                         gamedata.serverdescription = first_server.description
 309                 end
 310                 return true
 311         end
 312
 313         if fields.btn_mp_refresh then
 314                 serverlistmgr.sync()
 315                 return true
 316         end
 317
 318         if (fields.btn_mp_connect or fields.key_enter)
 319                         and fields.te_address ~= "" and fields.te_port then
 320                 gamedata.playername = fields.te_name
 321                 gamedata.password   = fields.te_pwd
 322                 gamedata.address    = fields.te_address
 323                 gamedata.port       = tonumber(fields.te_port)
 324                 gamedata.selected_world = 0
 325                 local fav_idx = core.get_table_index("favorites")
 326                 local fav = serverlist[fav_idx]
 327
 328                 if fav_idx and fav_idx <= #serverlist and
 329                                 fav.address == gamedata.address and
 330                                 fav.port    == gamedata.port then
 331
 332                         serverlistmgr.add_favorite(fav)
 333
 334                         gamedata.servername        = fav.name
 335                         gamedata.serverdescription = fav.description
 336
 337                         if not is_server_protocol_compat_or_error(
 338                                                 fav.proto_min, fav.proto_max) then
 339                                 return true
 340                         end
 341                 else
 342                         gamedata.servername        = ""
 343                         gamedata.serverdescription = ""
 344
 345                         serverlistmgr.add_favorite({
 346                                 address = gamedata.address,
 347                                 port = gamedata.port,
 348                         })
 349                 end
 350
 351                 core.settings:set("address",     gamedata.address)
 352                 core.settings:set("remote_port", gamedata.port)
 353
 354                 core.start()
 355                 return true
 356         end
 357         return false
 358 end
 359
 360 local function on_change(type, old_tab, new_tab)
 361         if type == "LEAVE" then return end
 362         serverlistmgr.sync()
 363 end
 364
 365 --------------------------------------------------------------------------------
 366 return {
 367         name = "online",
 368         caption = fgettext("Join Game"),
 369         cbf_formspec = get_formspec,
 370         cbf_button_handler = main_button_handler,
 371         on_change = on_change
 372 }