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