Add Lua interface to HTTPFetchRequest
[oweals/minetest.git] / builtin / mainmenu / tab_settings.lua
1 --Minetest
2 --Copyright (C) 2013 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
20 local leaves_style_labels = {
21         fgettext("Opaque Leaves"),
22         fgettext("Simple Leaves"),
23         fgettext("Fancy Leaves")
24 }
25
26 local leaves_style = {
27         {leaves_style_labels[1] .. "," .. leaves_style_labels[2] .. "," .. leaves_style_labels[3]},
28         {"opaque", "simple", "fancy"},
29 }
30
31 local dd_filter_labels = {
32         fgettext("No Filter"),
33         fgettext("Bilinear Filter"),
34         fgettext("Trilinear Filter")
35 }
36
37 local filters = {
38         {dd_filter_labels[1] .. "," .. dd_filter_labels[2] .. "," .. dd_filter_labels[3]},
39         {"", "bilinear_filter", "trilinear_filter"},
40 }
41
42 local dd_mipmap_labels = {
43         fgettext("No Mipmap"),
44         fgettext("Mipmap"),
45         fgettext("Mipmap + Aniso. Filter")
46 }
47
48 local mipmap = {
49         {dd_mipmap_labels[1] .. "," .. dd_mipmap_labels[2] .. "," .. dd_mipmap_labels[3]},
50         {"", "mip_map", "anisotropic_filter"},
51 }
52
53 local function getLeavesStyleSettingIndex()
54         local style = core.setting_get("leaves_style")
55         if (style == leaves_style[2][3]) then
56                 return 3
57         elseif (style == leaves_style[2][2]) then
58                 return 2
59         end
60         return 1
61 end
62
63 local dd_antialiasing_labels = {
64         fgettext("None"),
65         fgettext("2x"),
66         fgettext("4x"),
67         fgettext("8x"),
68 }
69
70 local antialiasing = {
71         {dd_antialiasing_labels[1] .. "," .. dd_antialiasing_labels[2] .. "," ..
72                 dd_antialiasing_labels[3] .. "," .. dd_antialiasing_labels[4]},
73         {"0", "2", "4", "8"}
74 }
75
76 local function getFilterSettingIndex()
77         if (core.setting_get(filters[2][3]) == "true") then
78                 return 3
79         end
80         if (core.setting_get(filters[2][3]) == "false" and core.setting_get(filters[2][2]) == "true") then
81                 return 2
82         end
83         return 1
84 end
85
86 local function getMipmapSettingIndex()
87         if (core.setting_get(mipmap[2][3]) == "true") then
88                 return 3
89         end
90         if (core.setting_get(mipmap[2][3]) == "false" and core.setting_get(mipmap[2][2]) == "true") then
91                 return 2
92         end
93         return 1
94 end
95
96 local function getAntialiasingSettingIndex()
97         local antialiasing_setting = core.setting_get("fsaa")
98         for i = 1, #(antialiasing[2]) do
99                 if antialiasing_setting == antialiasing[2][i] then
100                         return i
101                 end
102         end
103         return 1
104 end
105
106 local function antialiasing_fname_to_name(fname)
107         for i = 1, #(dd_antialiasing_labels) do
108                 if fname == dd_antialiasing_labels[i] then
109                         return antialiasing[2][i]
110                 end
111         end
112         return 0
113 end
114
115 local function dlg_confirm_reset_formspec(data)
116         local retval =
117                 "size[8,3]" ..
118                 "label[1,1;" .. fgettext("Are you sure to reset your singleplayer world?") .. "]" ..
119                 "button[1,2;2.6,0.5;dlg_reset_singleplayer_confirm;" ..
120                                 fgettext("Yes") .. "]" ..
121                 "button[4,2;2.8,0.5;dlg_reset_singleplayer_cancel;" ..
122                                 fgettext("No!!!") .. "]"
123         return retval
124 end
125
126 local function dlg_confirm_reset_btnhandler(this, fields, dialogdata)
127
128         if fields["dlg_reset_singleplayer_confirm"] ~= nil then
129                 local worldlist = core.get_worlds()
130                 local found_singleplayerworld = false
131
132                 for i = 1, #worldlist, 1 do
133                         if worldlist[i].name == "singleplayerworld" then
134                                 found_singleplayerworld = true
135                                 gamedata.worldindex = i
136                         end
137                 end
138
139                 if found_singleplayerworld then
140                         core.delete_world(gamedata.worldindex)
141                 end
142
143                 core.create_world("singleplayerworld", 1)
144
145                 worldlist = core.get_worlds()
146
147                 found_singleplayerworld = false
148
149                 for i = 1, #worldlist, 1 do
150                         if worldlist[i].name == "singleplayerworld" then
151                                 found_singleplayerworld = true
152                                 gamedata.worldindex = i
153                         end
154                 end
155         end
156
157         this.parent:show()
158         this:hide()
159         this:delete()
160         return true
161 end
162
163 local function showconfirm_reset(tabview)
164         local new_dlg = dialog_create("reset_spworld",
165                 dlg_confirm_reset_formspec,
166                 dlg_confirm_reset_btnhandler,
167                 nil)
168         new_dlg:set_parent(tabview)
169         tabview:hide()
170         new_dlg:show()
171 end
172
173 local function gui_scale_to_scrollbar()
174         local current_value = tonumber(core.setting_get("gui_scaling"))
175
176         if (current_value == nil) or current_value < 0.25 then
177                 return 0
178         end
179         if current_value <= 1.25 then
180                 return ((current_value - 0.25)/ 1.0) * 700
181         end
182         if current_value <= 6 then
183                 return ((current_value -1.25) * 100) + 700
184         end
185
186         return 1000
187 end
188
189 local function scrollbar_to_gui_scale(value)
190         value = tonumber(value)
191
192         if (value <= 700) then
193                 return ((value / 700) * 1.0) + 0.25
194         end
195         if (value <= 1000) then
196                 return ((value - 700) / 100) + 1.25
197         end
198
199         return 1
200 end
201
202 local function formspec(tabview, name, tabdata)
203         local tab_string =
204                 "box[0,0;3.5,4.3;#999999]" ..
205                 "checkbox[0.25,0;cb_smooth_lighting;" .. fgettext("Smooth Lighting")
206                                 .. ";" .. dump(core.setting_getbool("smooth_lighting")) .. "]" ..
207                 "checkbox[0.25,0.5;cb_particles;" .. fgettext("Enable Particles") .. ";"
208                                 .. dump(core.setting_getbool("enable_particles")) .. "]" ..
209                 "checkbox[0.25,1;cb_3d_clouds;" .. fgettext("3D Clouds") .. ";"
210                                 .. dump(core.setting_getbool("enable_3d_clouds")) .. "]" ..
211                 "checkbox[0.25,1.5;cb_opaque_water;" .. fgettext("Opaque Water") .. ";"
212                                 .. dump(core.setting_getbool("opaque_water")) .. "]" ..
213                 "checkbox[0.25,2.0;cb_connected_glass;" .. fgettext("Connected Glass") .. ";"
214                                 .. dump(core.setting_getbool("connected_glass")) .. "]" ..
215                 "checkbox[0.25,2.5;cb_node_highlighting;" .. fgettext("Node Highlighting") .. ";"
216                                 .. dump(core.setting_getbool("enable_node_highlighting")) .. "]" ..
217                 "dropdown[0.25,3.4;3.3;dd_leaves_style;" .. leaves_style[1][1] .. ";"
218                                 .. getLeavesStyleSettingIndex() .. "]" ..
219                 "box[3.75,0;3.75,3.45;#999999]" ..
220                 "label[3.85,0.1;" .. fgettext("Texturing:") .. "]" ..
221                 "dropdown[3.85,0.55;3.85;dd_filters;" .. filters[1][1] .. ";"
222                                 .. getFilterSettingIndex() .. "]" ..
223                 "dropdown[3.85,1.35;3.85;dd_mipmap;" .. mipmap[1][1] .. ";"
224                                 .. getMipmapSettingIndex() .. "]" ..
225                 "label[3.85,2.15;" .. fgettext("Antialiasing:") .. "]" ..
226                 "dropdown[3.85,2.6;3.85;dd_antialiasing;" .. antialiasing[1][1] .. ";"
227                                 .. getAntialiasingSettingIndex() .. "]" ..
228                 "box[7.75,0;4,4;#999999]" ..
229                 "checkbox[8,0;cb_shaders;" .. fgettext("Shaders") .. ";"
230                                 .. dump(core.setting_getbool("enable_shaders")) .. "]"
231
232         tab_string = tab_string ..
233                 "button[8,4.75;3.75,0.5;btn_change_keys;" .. fgettext("Change keys") .. "]" ..
234                 "button[0,4.75;3.75,0.5;btn_advanced_settings;" .. fgettext("Advanced Settings") .. "]"
235
236
237         if core.setting_get("touchscreen_threshold") ~= nil then
238                 tab_string = tab_string ..
239                                 "label[4.3,4.1;" .. fgettext("Touchthreshold (px)") .. "]" ..
240                                 "dropdown[3.85,4.55;3.85;dd_touchthreshold;0,10,20,30,40,50;" ..
241                                 ((tonumber(core.setting_get("touchscreen_threshold"))/10)+1) .. "]"
242         end
243
244         if core.setting_getbool("enable_shaders") then
245                 tab_string = tab_string ..
246                                 "checkbox[8,0.5;cb_bumpmapping;" .. fgettext("Bumpmapping") .. ";"
247                                                 .. dump(core.setting_getbool("enable_bumpmapping")) .. "]" ..
248                                 "checkbox[8,1.0;cb_generate_normalmaps;" .. fgettext("Generate Normalmaps") .. ";"
249                                                 .. dump(core.setting_getbool("generate_normalmaps")) .. "]" ..
250                                 "checkbox[8,1.5;cb_parallax;" .. fgettext("Parallax Occlusion") .. ";"
251                                                 .. dump(core.setting_getbool("enable_parallax_occlusion")) .. "]" ..
252                                 "checkbox[8,2.0;cb_waving_water;" .. fgettext("Waving Water") .. ";"
253                                                 .. dump(core.setting_getbool("enable_waving_water")) .. "]" ..
254                                 "checkbox[8,2.5;cb_waving_leaves;" .. fgettext("Waving Leaves") .. ";"
255                                                 .. dump(core.setting_getbool("enable_waving_leaves")) .. "]" ..
256                                 "checkbox[8,3.0;cb_waving_plants;" .. fgettext("Waving Plants") .. ";"
257                                                 .. dump(core.setting_getbool("enable_waving_plants")) .. "]"
258         else
259                 tab_string = tab_string ..
260                                 "tablecolumns[color;text]" ..
261                                 "tableoptions[background=#00000000;highlight=#00000000;border=false]" ..
262                                 "table[8.33,0.7;3.5,4;shaders;" ..
263                                         "#888888," .. fgettext("Bumpmapping") .. "," ..
264                                         "#888888," .. fgettext("Generate Normalmaps") .. "," ..
265                                         "#888888," .. fgettext("Parallax Occlusion") .. "," ..
266                                         "#888888," .. fgettext("Waving Water") .. "," ..
267                                         "#888888," .. fgettext("Waving Leaves") .. "," ..
268                                         "#888888," .. fgettext("Waving Plants") .. "," ..
269                                         ";1]"
270         end
271
272         return tab_string
273 end
274
275 --------------------------------------------------------------------------------
276 local function handle_settings_buttons(this, fields, tabname, tabdata)
277
278         if fields["btn_advanced_settings"] ~= nil then
279                 local adv_settings_dlg = create_adv_settings_dlg()
280                 adv_settings_dlg:set_parent(this)
281                 this:hide()
282                 adv_settings_dlg:show()
283                 --mm_texture.update("singleplayer", current_game())
284                 return true
285         end
286
287         if fields["cb_smooth_lighting"] then
288                 core.setting_set("smooth_lighting", fields["cb_smooth_lighting"])
289                 return true
290         end
291         if fields["cb_particles"] then
292                 core.setting_set("enable_particles", fields["cb_particles"])
293                 return true
294         end
295         if fields["cb_3d_clouds"] then
296                 core.setting_set("enable_3d_clouds", fields["cb_3d_clouds"])
297                 return true
298         end
299         if fields["cb_opaque_water"] then
300                 core.setting_set("opaque_water", fields["cb_opaque_water"])
301                 return true
302         end
303         if fields["cb_connected_glass"] then
304                 core.setting_set("connected_glass", fields["cb_connected_glass"])
305                 return true
306         end
307         if fields["cb_node_highlighting"] then
308                 core.setting_set("enable_node_highlighting", fields["cb_node_highlighting"])
309                 return true
310         end
311         if fields["cb_shaders"] then
312                 if (core.setting_get("video_driver") == "direct3d8"
313                                 or core.setting_get("video_driver") == "direct3d9") then
314                         core.setting_set("enable_shaders", "false")
315                         gamedata.errormessage = fgettext("To enable shaders the OpenGL driver needs to be used.")
316                 else
317                         core.setting_set("enable_shaders", fields["cb_shaders"])
318                 end
319                 return true
320         end
321         if fields["cb_bumpmapping"] then
322                 core.setting_set("enable_bumpmapping", fields["cb_bumpmapping"])
323         end
324         if fields["cb_generate_normalmaps"] then
325                 core.setting_set("generate_normalmaps", fields["cb_generate_normalmaps"])
326         end
327         if fields["cb_parallax"] then
328                 core.setting_set("enable_parallax_occlusion", fields["cb_parallax"])
329                 return true
330         end
331         if fields["cb_waving_water"] then
332                 core.setting_set("enable_waving_water", fields["cb_waving_water"])
333                 return true
334         end
335         if fields["cb_waving_leaves"] then
336                 core.setting_set("enable_waving_leaves", fields["cb_waving_leaves"])
337         end
338         if fields["cb_waving_plants"] then
339                 core.setting_set("enable_waving_plants", fields["cb_waving_plants"])
340                 return true
341         end
342
343         if fields["sb_gui_scaling"] then
344                 local event = core.explode_scrollbar_event(fields["sb_gui_scaling"])
345
346                 if event.type == "CHG" then
347                         local tosave = string.format("%.2f",scrollbar_to_gui_scale(event.value))
348                         core.setting_set("gui_scaling", tosave)
349                         return true
350                 end
351         end
352
353         if fields["btn_change_keys"] then
354                 core.show_keys_menu()
355                 return true
356         end
357         if fields["cb_touchscreen_target"] then
358                 core.setting_set("touchtarget", fields["cb_touchscreen_target"])
359                 return true
360         end
361         if fields["btn_reset_singleplayer"] then
362                 showconfirm_reset(this)
363                 return true
364         end
365
366         --Note dropdowns have to be handled LAST!
367         local ddhandled = false
368
369         if fields["dd_leaves_style"] == leaves_style_labels[1] then
370                 core.setting_set("leaves_style", leaves_style[2][1])
371                 ddhandled = true
372         elseif fields["dd_leaves_style"] == leaves_style_labels[2] then
373                 core.setting_set("leaves_style", leaves_style[2][2])
374                 ddhandled = true
375         elseif fields["dd_leaves_style"] == leaves_style_labels[3] then
376                 core.setting_set("leaves_style", leaves_style[2][3])
377                 ddhandled = true
378         end
379         if fields["dd_filters"] == dd_filter_labels[1] then
380                 core.setting_set("bilinear_filter", "false")
381                 core.setting_set("trilinear_filter", "false")
382                 ddhandled = true
383         elseif fields["dd_filters"] == dd_filter_labels[2] then
384                 core.setting_set("bilinear_filter", "true")
385                 core.setting_set("trilinear_filter", "false")
386                 ddhandled = true
387         elseif fields["dd_filters"] == dd_filter_labels[3] then
388                 core.setting_set("bilinear_filter", "false")
389                 core.setting_set("trilinear_filter", "true")
390                 ddhandled = true
391         end
392         if fields["dd_mipmap"] == dd_mipmap_labels[1] then
393                 core.setting_set("mip_map", "false")
394                 core.setting_set("anisotropic_filter", "false")
395                 ddhandled = true
396         elseif fields["dd_mipmap"] == dd_mipmap_labels[2] then
397                 core.setting_set("mip_map", "true")
398                 core.setting_set("anisotropic_filter", "false")
399                 ddhandled = true
400         elseif fields["dd_mipmap"] == dd_mipmap_labels[3] then
401                 core.setting_set("mip_map", "true")
402                 core.setting_set("anisotropic_filter", "true")
403                 ddhandled = true
404         end
405         if fields["dd_antialiasing"] then
406                 core.setting_set("fsaa",
407                         antialiasing_fname_to_name(fields["dd_antialiasing"]))
408                 ddhandled = true
409         end
410         if fields["dd_touchthreshold"] then
411                 core.setting_set("touchscreen_threshold",fields["dd_touchthreshold"])
412                 ddhandled = true
413         end
414
415         return ddhandled
416 end
417
418 tab_settings = {
419         name = "settings",
420         caption = fgettext("Settings"),
421         cbf_formspec = formspec,
422         cbf_button_handler = handle_settings_buttons
423 }