1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889909192939495969798991001011021031041051061071081091101111121131141151161171181191201211221231241251261271281291301311321331341351361371381391401411421431441451461471481491501511521531541551561571581591601611621631641651661671681691701711721731741751761771781791801811821831841851861871881891901911921931941951961971981992002012022032042052062072082092102112122132142152162172182192202212222232242252262272282292302312322332342352362372382392402412422432442452462472482492502512522532542552562572582592602612622632642652662672682692702712722732742752762772782792802812822832842852862872882892902912922932942952962972982993003013023033043053063073083093103113123133143153163173183193203213223233243253263273283293303313323333343353363373383393403413423433443453463473483493503513523533543553563573583593603613623633643653663673683693703713723733743753763773783793803813823833843853863873883893903913923933943953963973983994004014024034044054064074084094104114124134144154164174184194204214224234244254264274284294304314324334344354364374384394404414424434444454464474484494504514524534544554564574584594604614624634644654664674684694704714724734744754764774784794804814824834844854864874884894904914924934944954964974984995005015025035045055065075085095105115125135145155165175185195205215225235245255265275285295305315325335345355365375385395405415425435445455465475485495505515525535545555565575585595605615625635645655665675685695705715725735745755765775785795805815825835845855865875885895905915925935945955965975985996006016026036046056066076086096106116126136146156166176186196206216226236246256266276286296306316326336346356366376386396406416426436446456466476486496506516526536546556566576586596606616626636646656666676686696706716726736746756766776786796806816826836846856866876886896906916926936946956966976986997007017027037047057067077087097107117127137147157167177187197207217227237247257267277287297307317327337347357367377387397407417427437447457467477487497507517527537547557567577587597607617627637647657667677687697707717727737747757767777787797807817827837847857867877887897907917927937947957967977987998008018028038048058068078088098108118128138148158168178188198208218228238248258268278288298308318328338348358368378388398408418428438448458468478488498508518528538548558568578588598608618628638648658668678688698708718728738748758768778788798808818828838848858868878888898908918928938948958968978988999009019029039049059069079089099109119129139149159169179189199209219229239249259269279289299309319329339349359369379389399409419429439449459469479489499509519529539549559569579589599609619629639649659669679689699709719729739749759769779789799809819829839849859869879889899909919929939949959969979989991000100110021003100410051006100710081009101010111012101310141015101610171018101910201021102210231024102510261027102810291030103110321033103410351036103710381039104010411042104310441045104610471048104910501051105210531054105510561057105810591060106110621063106410651066106710681069107010711072107310741075107610771078107910801081108210831084108510861087108810891090109110921093109410951096109710981099110011011102110311041105110611071108110911101111111211131114111511161117111811191120112111221123112411251126112711281129113011311132 |
- --Minetest
- --Copyright (C) 2015 PilzAdam
- --
- --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 FILENAME = "settingtypes.txt"
- local CHAR_CLASSES = {
- SPACE = "[%s]",
- VARIABLE = "[%w_%-%.]",
- INTEGER = "[+-]?[%d]",
- FLOAT = "[+-]?[%d%.]",
- FLAGS = "[%w_%-%.,]",
- }
- local function flags_to_table(flags)
- return flags:gsub("%s+", ""):split(",", true) -- Remove all spaces and split
- end
- -- returns error message, or nil
- local function parse_setting_line(settings, line, read_all, base_level, allow_secure)
- -- strip carriage returns (CR, /r)
- line = line:gsub("\r", "")
- -- comment
- local comment = line:match("^#" .. CHAR_CLASSES.SPACE .. "*(.*)$")
- if comment then
- if settings.current_comment == "" then
- settings.current_comment = comment
- else
- settings.current_comment = settings.current_comment .. "\n" .. comment
- end
- return
- end
- -- clear current_comment so only comments directly above a setting are bound to it
- -- but keep a local reference to it for variables in the current line
- local current_comment = settings.current_comment
- settings.current_comment = ""
- -- empty lines
- if line:match("^" .. CHAR_CLASSES.SPACE .. "*$") then
- return
- end
- -- category
- local stars, category = line:match("^%[([%*]*)([^%]]+)%]$")
- if category then
- table.insert(settings, {
- name = category,
- level = stars:len() + base_level,
- type = "category",
- })
- return
- end
- -- settings
- local first_part, name, readable_name, setting_type = line:match("^"
- -- this first capture group matches the whole first part,
- -- so we can later strip it from the rest of the line
- .. "("
- .. "([" .. CHAR_CLASSES.VARIABLE .. "+)" -- variable name
- .. CHAR_CLASSES.SPACE .. "*"
- .. "%(([^%)]*)%)" -- readable name
- .. CHAR_CLASSES.SPACE .. "*"
- .. "(" .. CHAR_CLASSES.VARIABLE .. "+)" -- type
- .. CHAR_CLASSES.SPACE .. "*"
- .. ")")
- if not first_part then
- return "Invalid line"
- end
- if name:match("secure%.[.]*") and not allow_secure then
- return "Tried to add \"secure.\" setting"
- end
- if readable_name == "" then
- readable_name = nil
- end
- local remaining_line = line:sub(first_part:len() + 1)
- if setting_type == "int" then
- local default, min, max = remaining_line:match("^"
- -- first int is required, the last 2 are optional
- .. "(" .. CHAR_CLASSES.INTEGER .. "+)" .. CHAR_CLASSES.SPACE .. "*"
- .. "(" .. CHAR_CLASSES.INTEGER .. "*)" .. CHAR_CLASSES.SPACE .. "*"
- .. "(" .. CHAR_CLASSES.INTEGER .. "*)"
- .. "$")
- if not default or not tonumber(default) then
- return "Invalid integer setting"
- end
- min = tonumber(min)
- max = tonumber(max)
- table.insert(settings, {
- name = name,
- readable_name = readable_name,
- type = "int",
- default = default,
- min = min,
- max = max,
- comment = current_comment,
- })
- return
- end
- if setting_type == "string"
- or setting_type == "key" or setting_type == "v3f" then
- local default = remaining_line:match("^(.*)$")
- if not default then
- return "Invalid string setting"
- end
- if setting_type == "key" and not read_all then
- -- ignore key type if read_all is false
- return
- end
- table.insert(settings, {
- name = name,
- readable_name = readable_name,
- type = setting_type,
- default = default,
- comment = current_comment,
- })
- return
- end
- if setting_type == "noise_params_2d"
- or setting_type == "noise_params_3d" then
- local default = remaining_line:match("^(.*)$")
- if not default then
- return "Invalid string setting"
- end
- local values = {}
- local ti = 1
- local index = 1
- for match in default:gmatch("[+-]?[%d.-e]+") do -- All numeric characters
- index = default:find("[+-]?[%d.-e]+", index) + match:len()
- table.insert(values, match)
- ti = ti + 1
- if ti > 9 then
- break
- end
- end
- index = default:find("[^, ]", index)
- local flags = ""
- if index then
- flags = default:sub(index)
- default = default:sub(1, index - 3) -- Make sure no flags in single-line format
- end
- table.insert(values, flags)
- table.insert(settings, {
- name = name,
- readable_name = readable_name,
- type = setting_type,
- default = default,
- default_table = {
- offset = values[1],
- scale = values[2],
- spread = {
- x = values[3],
- y = values[4],
- z = values[5]
- },
- seed = values[6],
- octaves = values[7],
- persistence = values[8],
- lacunarity = values[9],
- flags = values[10]
- },
- values = values,
- comment = current_comment,
- noise_params = true,
- flags = flags_to_table("defaults,eased,absvalue")
- })
- return
- end
- if setting_type == "bool" then
- if remaining_line ~= "false" and remaining_line ~= "true" then
- return "Invalid boolean setting"
- end
- table.insert(settings, {
- name = name,
- readable_name = readable_name,
- type = "bool",
- default = remaining_line,
- comment = current_comment,
- })
- return
- end
- if setting_type == "float" then
- local default, min, max = remaining_line:match("^"
- -- first float is required, the last 2 are optional
- .. "(" .. CHAR_CLASSES.FLOAT .. "+)" .. CHAR_CLASSES.SPACE .. "*"
- .. "(" .. CHAR_CLASSES.FLOAT .. "*)" .. CHAR_CLASSES.SPACE .. "*"
- .. "(" .. CHAR_CLASSES.FLOAT .. "*)"
- .."$")
- if not default or not tonumber(default) then
- return "Invalid float setting"
- end
- min = tonumber(min)
- max = tonumber(max)
- table.insert(settings, {
- name = name,
- readable_name = readable_name,
- type = "float",
- default = default,
- min = min,
- max = max,
- comment = current_comment,
- })
- return
- end
- if setting_type == "enum" then
- local default, values = remaining_line:match("^"
- -- first value (default) may be empty (i.e. is optional)
- .. "(" .. CHAR_CLASSES.VARIABLE .. "*)" .. CHAR_CLASSES.SPACE .. "*"
- .. "(" .. CHAR_CLASSES.FLAGS .. "+)"
- .. "$")
- if not default or values == "" then
- return "Invalid enum setting"
- end
- table.insert(settings, {
- name = name,
- readable_name = readable_name,
- type = "enum",
- default = default,
- values = values:split(",", true),
- comment = current_comment,
- })
- return
- end
- if setting_type == "path" or setting_type == "filepath" then
- local default = remaining_line:match("^(.*)$")
- if not default then
- return "Invalid path setting"
- end
- table.insert(settings, {
- name = name,
- readable_name = readable_name,
- type = setting_type,
- default = default,
- comment = current_comment,
- })
- return
- end
- if setting_type == "flags" then
- local default, possible = remaining_line:match("^"
- -- first value (default) may be empty (i.e. is optional)
- -- this is implemented by making the last value optional, and
- -- swapping them around if it turns out empty.
- .. "(" .. CHAR_CLASSES.FLAGS .. "+)" .. CHAR_CLASSES.SPACE .. "*"
- .. "(" .. CHAR_CLASSES.FLAGS .. "*)"
- .. "$")
- if not default or not possible then
- return "Invalid flags setting"
- end
- if possible == "" then
- possible = default
- default = ""
- end
- table.insert(settings, {
- name = name,
- readable_name = readable_name,
- type = "flags",
- default = default,
- possible = flags_to_table(possible),
- comment = current_comment,
- })
- return
- end
- return "Invalid setting type \"" .. setting_type .. "\""
- end
- local function parse_single_file(file, filepath, read_all, result, base_level, allow_secure)
- -- store this helper variable in the table so it's easier to pass to parse_setting_line()
- result.current_comment = ""
- local line = file:read("*line")
- while line do
- local error_msg = parse_setting_line(result, line, read_all, base_level, allow_secure)
- if error_msg then
- core.log("error", error_msg .. " in " .. filepath .. " \"" .. line .. "\"")
- end
- line = file:read("*line")
- end
- result.current_comment = nil
- end
- -- read_all: whether to ignore certain setting types for GUI or not
- -- parse_mods: whether to parse settingtypes.txt in mods and games
- local function parse_config_file(read_all, parse_mods)
- local settings = {}
- do
- local builtin_path = core.get_builtin_path() .. FILENAME
- local file = io.open(builtin_path, "r")
- if not file then
- core.log("error", "Can't load " .. FILENAME)
- return settings
- end
- parse_single_file(file, builtin_path, read_all, settings, 0, true)
- file:close()
- end
- if parse_mods then
- -- Parse games
- local games_category_initialized = false
- for _, game in ipairs(pkgmgr.games) do
- local path = game.path .. DIR_DELIM .. FILENAME
- local file = io.open(path, "r")
- if file then
- if not games_category_initialized then
- fgettext_ne("Content: Games") -- not used, but needed for xgettext
- table.insert(settings, {
- name = "Content: Games",
- level = 0,
- type = "category",
- })
- games_category_initialized = true
- end
- table.insert(settings, {
- name = game.name,
- level = 1,
- type = "category",
- })
- parse_single_file(file, path, read_all, settings, 2, false)
- file:close()
- end
- end
- -- Parse mods
- local mods_category_initialized = false
- local mods = {}
- pkgmgr.get_mods(core.get_modpath(), "mods", mods)
- for _, mod in ipairs(mods) do
- local path = mod.path .. DIR_DELIM .. FILENAME
- local file = io.open(path, "r")
- if file then
- if not mods_category_initialized then
- fgettext_ne("Content: Mods") -- not used, but needed for xgettext
- table.insert(settings, {
- name = "Content: Mods",
- level = 0,
- type = "category",
- })
- mods_category_initialized = true
- end
- table.insert(settings, {
- name = mod.name,
- readable_name = mod.title,
- level = 1,
- type = "category",
- })
- parse_single_file(file, path, read_all, settings, 2, false)
- file:close()
- end
- end
- -- Parse client mods
- local clientmods_category_initialized = false
- local clientmods = {}
- pkgmgr.get_mods(core.get_clientmodpath(), "clientmods", clientmods)
- for _, mod in ipairs(clientmods) do
- local path = mod.path .. DIR_DELIM .. FILENAME
- local file = io.open(path, "r")
- if file then
- if not clientmods_category_initialized then
- fgettext_ne("Client Mods") -- not used, but needed for xgettext
- table.insert(settings, {
- name = "Client Mods",
- level = 0,
- type = "category",
- })
- clientmods_category_initialized = true
- end
- table.insert(settings, {
- name = mod.name,
- level = 1,
- type = "category",
- })
- parse_single_file(file, path, read_all, settings, 2, false)
- file:close()
- end
- end
- end
- return settings
- end
- local function filter_settings(settings, searchstring)
- if not searchstring or searchstring == "" then
- return settings, -1
- end
- -- Setup the keyword list
- local keywords = {}
- for word in searchstring:lower():gmatch("%S+") do
- table.insert(keywords, word)
- end
- local result = {}
- local category_stack = {}
- local current_level = 0
- local best_setting = nil
- for _, entry in pairs(settings) do
- if entry.type == "category" then
- -- Remove all settingless categories
- while #category_stack > 0 and entry.level <= current_level do
- table.remove(category_stack, #category_stack)
- if #category_stack > 0 then
- current_level = category_stack[#category_stack].level
- else
- current_level = 0
- end
- end
- -- Push category onto stack
- category_stack[#category_stack + 1] = entry
- current_level = entry.level
- else
- -- See if setting matches keywords
- local setting_score = 0
- for k = 1, #keywords do
- local keyword = keywords[k]
- if string.find(entry.name:lower(), keyword, 1, true) then
- setting_score = setting_score + 1
- end
- if entry.readable_name and
- string.find(fgettext(entry.readable_name):lower(), keyword, 1, true) then
- setting_score = setting_score + 1
- end
- if entry.comment and
- string.find(fgettext_ne(entry.comment):lower(), keyword, 1, true) then
- setting_score = setting_score + 1
- end
- end
- -- Add setting to results if match
- if setting_score > 0 then
- -- Add parent categories
- for _, category in pairs(category_stack) do
- result[#result + 1] = category
- end
- category_stack = {}
- -- Add setting
- result[#result + 1] = entry
- entry.score = setting_score
- if not best_setting or
- setting_score > result[best_setting].score then
- best_setting = #result
- end
- end
- end
- end
- return result, best_setting or -1
- end
- local full_settings = parse_config_file(false, true)
- local search_string = ""
- local settings = full_settings
- local selected_setting = 1
- local function get_current_value(setting)
- local value = core.settings:get(setting.name)
- if value == nil then
- value = setting.default
- end
- return value
- end
- local function get_current_np_group(setting)
- local value = core.settings:get_np_group(setting.name)
- if value == nil then
- return setting.values
- end
- local p = "%g"
- return {
- p:format(value.offset),
- p:format(value.scale),
- p:format(value.spread.x),
- p:format(value.spread.y),
- p:format(value.spread.z),
- p:format(value.seed),
- p:format(value.octaves),
- p:format(value.persistence),
- p:format(value.lacunarity),
- value.flags
- }
- end
- local function get_current_np_group_as_string(setting)
- local value = core.settings:get_np_group(setting.name)
- if value == nil then
- return setting.default
- end
- return ("%g, %g, (%g, %g, %g), %g, %g, %g, %g"):format(
- value.offset,
- value.scale,
- value.spread.x,
- value.spread.y,
- value.spread.z,
- value.seed,
- value.octaves,
- value.persistence,
- value.lacunarity
- ) .. (value.flags ~= "" and (", " .. value.flags) or "")
- end
- local checkboxes = {} -- handle checkboxes events
- local function create_change_setting_formspec(dialogdata)
- local setting = settings[selected_setting]
- -- Final formspec will be created at the end of this function
- -- Default values below, may be changed depending on setting type
- local width = 10
- local height = 3.5
- local description_height = 3
- local formspec = ""
- -- Setting-specific formspec elements
- if setting.type == "bool" then
- local selected_index = 1
- if core.is_yes(get_current_value(setting)) then
- selected_index = 2
- end
- formspec = "dropdown[3," .. height .. ";4,1;dd_setting_value;"
- .. fgettext("Disabled") .. "," .. fgettext("Enabled") .. ";"
- .. selected_index .. "]"
- height = height + 1.25
- elseif setting.type == "enum" then
- local selected_index = 0
- formspec = "dropdown[3," .. height .. ";4,1;dd_setting_value;"
- for index, value in ipairs(setting.values) do
- -- translating value is not possible, since it's the value
- -- that we set the setting to
- formspec = formspec .. core.formspec_escape(value) .. ","
- if get_current_value(setting) == value then
- selected_index = index
- end
- end
- if #setting.values > 0 then
- formspec = formspec:sub(1, -2) -- remove trailing comma
- end
- formspec = formspec .. ";" .. selected_index .. "]"
- height = height + 1.25
- elseif setting.type == "path" or setting.type == "filepath" then
- local current_value = dialogdata.selected_path
- if not current_value then
- current_value = get_current_value(setting)
- end
- formspec = "field[0.28," .. height + 0.15 .. ";8,1;te_setting_value;;"
- .. core.formspec_escape(current_value) .. "]"
- .. "button[8," .. height - 0.15 .. ";2,1;btn_browser_"
- .. setting.type .. ";" .. fgettext("Browse") .. "]"
- height = height + 1.15
- elseif setting.type == "noise_params_2d" or setting.type == "noise_params_3d" then
- local t = get_current_np_group(setting)
- local dimension = 3
- if setting.type == "noise_params_2d" then
- dimension = 2
- end
- -- More space for 3x3 fields
- description_height = description_height - 1.5
- height = height - 1.5
- local fields = {}
- local function add_field(x, name, label, value)
- fields[#fields + 1] = ("field[%f,%f;3.3,1;%s;%s;%s]"):format(
- x, height, name, label, core.formspec_escape(value or "")
- )
- end
- -- First row
- height = height + 0.3
- add_field(0.3, "te_offset", fgettext("Offset"), t[1])
- add_field(3.6, "te_scale", fgettext("Scale"), t[2])
- add_field(6.9, "te_seed", fgettext("Seed"), t[6])
- height = height + 1.1
- -- Second row
- add_field(0.3, "te_spreadx", fgettext("X spread"), t[3])
- if dimension == 3 then
- add_field(3.6, "te_spready", fgettext("Y spread"), t[4])
- else
- fields[#fields + 1] = "label[4," .. height - 0.2 .. ";" ..
- fgettext("2D Noise") .. "]"
- end
- add_field(6.9, "te_spreadz", fgettext("Z spread"), t[5])
- height = height + 1.1
- -- Third row
- add_field(0.3, "te_octaves", fgettext("Octaves"), t[7])
- add_field(3.6, "te_persist", fgettext("Persistence"), t[8])
- add_field(6.9, "te_lacun", fgettext("Lacunarity"), t[9])
- height = height + 1.1
- local enabled_flags = flags_to_table(t[10])
- local flags = {}
- for _, name in ipairs(enabled_flags) do
- -- Index by name, to avoid iterating over all enabled_flags for every possible flag.
- flags[name] = true
- end
- for _, name in ipairs(setting.flags) do
- local checkbox_name = "cb_" .. name
- local is_enabled = flags[name] == true -- to get false if nil
- checkboxes[checkbox_name] = is_enabled
- end
- -- Flags
- formspec = table.concat(fields)
- .. "checkbox[0.5," .. height - 0.6 .. ";cb_defaults;"
- --[[~ "defaults" is a noise parameter flag.
- It describes the default processing options
- for noise settings in main menu -> "All Settings". ]]
- .. fgettext("defaults") .. ";" -- defaults
- .. tostring(flags["defaults"] == true) .. "]" -- to get false if nil
- .. "checkbox[5," .. height - 0.6 .. ";cb_eased;"
- --[[~ "eased" is a noise parameter flag.
- It is used to make the map smoother and
- can be enabled in noise settings in
- main menu -> "All Settings". ]]
- .. fgettext("eased") .. ";" -- eased
- .. tostring(flags["eased"] == true) .. "]"
- .. "checkbox[5," .. height - 0.15 .. ";cb_absvalue;"
- --[[~ "absvalue" is a noise parameter flag.
- It is short for "absolute value".
- It can be enabled in noise settings in
- main menu -> "All Settings". ]]
- .. fgettext("absvalue") .. ";" -- absvalue
- .. tostring(flags["absvalue"] == true) .. "]"
- height = height + 1
- elseif setting.type == "v3f" then
- local val = get_current_value(setting)
- local v3f = {}
- for line in val:gmatch("[+-]?[%d.+-eE]+") do -- All numeric characters
- table.insert(v3f, line)
- end
- height = height + 0.3
- formspec = formspec
- .. "field[0.3," .. height .. ";3.3,1;te_x;"
- .. fgettext("X") .. ";" -- X
- .. core.formspec_escape(v3f[1] or "") .. "]"
- .. "field[3.6," .. height .. ";3.3,1;te_y;"
- .. fgettext("Y") .. ";" -- Y
- .. core.formspec_escape(v3f[2] or "") .. "]"
- .. "field[6.9," .. height .. ";3.3,1;te_z;"
- .. fgettext("Z") .. ";" -- Z
- .. core.formspec_escape(v3f[3] or "") .. "]"
- height = height + 1.1
- elseif setting.type == "flags" then
- local current_flags = flags_to_table(get_current_value(setting))
- local flags = {}
- for _, name in ipairs(current_flags) do
- -- Index by name, to avoid iterating over all enabled_flags for every possible flag.
- if name:sub(1, 2) == "no" then
- flags[name:sub(3)] = false
- else
- flags[name] = true
- end
- end
- local flags_count = #setting.possible / 2
- local max_height = math.ceil(flags_count / 2) / 2
- -- More space for flags
- description_height = description_height - 1
- height = height - 1
- local fields = {} -- To build formspec
- local j = 1
- for _, name in ipairs(setting.possible) do
- if name:sub(1, 2) ~= "no" then
- local x = 0.5
- local y = height + j / 2 - 0.75
- if j - 1 >= flags_count / 2 then -- 2nd column
- x = 5
- y = y - max_height
- end
- j = j + 1;
- local checkbox_name = "cb_" .. name
- local is_enabled = flags[name] == true -- to get false if nil
- checkboxes[checkbox_name] = is_enabled
- fields[#fields + 1] = ("checkbox[%f,%f;%s;%s;%s]"):format(
- x, y, checkbox_name, name, tostring(is_enabled)
- )
- end
- end
- formspec = table.concat(fields)
- height = height + max_height + 0.25
- else
- -- TODO: fancy input for float, int
- local text = get_current_value(setting)
- if dialogdata.error_message and dialogdata.entered_text then
- text = dialogdata.entered_text
- end
- formspec = "field[0.28," .. height + 0.15 .. ";" .. width .. ",1;te_setting_value;;"
- .. core.formspec_escape(text) .. "]"
- height = height + 1.15
- end
- -- Box good, textarea bad. Calculate textarea size from box.
- local function create_textfield(size, label, text, bg_color)
- local textarea = {
- x = size.x + 0.3,
- y = size.y,
- w = size.w + 0.25,
- h = size.h * 1.16 + 0.12
- }
- return ("box[%f,%f;%f,%f;%s]textarea[%f,%f;%f,%f;;%s;%s]"):format(
- size.x, size.y, size.w, size.h, bg_color or "#000",
- textarea.x, textarea.y, textarea.w, textarea.h,
- core.formspec_escape(label), core.formspec_escape(text)
- )
- end
- -- When there's an error: Shrink description textarea and add error below
- if dialogdata.error_message then
- local error_box = {
- x = 0,
- y = description_height - 0.4,
- w = width - 0.25,
- h = 0.5
- }
- formspec = formspec ..
- create_textfield(error_box, "", dialogdata.error_message, "#600")
- description_height = description_height - 0.75
- end
- -- Get description field
- local description_box = {
- x = 0,
- y = 0.2,
- w = width - 0.25,
- h = description_height
- }
- local setting_name = setting.name
- if setting.readable_name then
- setting_name = fgettext_ne(setting.readable_name) ..
- " (" .. setting.name .. ")"
- end
- local comment_text
- if setting.comment == "" then
- comment_text = fgettext_ne("(No description of setting given)")
- else
- comment_text = fgettext_ne(setting.comment)
- end
- return (
- "size[" .. width .. "," .. height + 0.25 .. ",true]" ..
- create_textfield(description_box, setting_name, comment_text) ..
- formspec ..
- "button[" .. width / 2 - 2.5 .. "," .. height - 0.4 .. ";2.5,1;btn_done;" ..
- fgettext("Save") .. "]" ..
- "button[" .. width / 2 .. "," .. height - 0.4 .. ";2.5,1;btn_cancel;" ..
- fgettext("Cancel") .. "]"
- )
- end
- local function handle_change_setting_buttons(this, fields)
- local setting = settings[selected_setting]
- if fields["btn_done"] or fields["key_enter"] then
- if setting.type == "bool" then
- local new_value = fields["dd_setting_value"]
- -- Note: new_value is the actual (translated) value shown in the dropdown
- core.settings:set_bool(setting.name, new_value == fgettext("Enabled"))
- elseif setting.type == "enum" then
- local new_value = fields["dd_setting_value"]
- core.settings:set(setting.name, new_value)
- elseif setting.type == "int" then
- local new_value = tonumber(fields["te_setting_value"])
- if not new_value or math.floor(new_value) ~= new_value then
- this.data.error_message = fgettext_ne("Please enter a valid integer.")
- this.data.entered_text = fields["te_setting_value"]
- core.update_formspec(this:get_formspec())
- return true
- end
- if setting.min and new_value < setting.min then
- this.data.error_message = fgettext_ne("The value must be at least $1.", setting.min)
- this.data.entered_text = fields["te_setting_value"]
- core.update_formspec(this:get_formspec())
- return true
- end
- if setting.max and new_value > setting.max then
- this.data.error_message = fgettext_ne("The value must not be larger than $1.", setting.max)
- this.data.entered_text = fields["te_setting_value"]
- core.update_formspec(this:get_formspec())
- return true
- end
- core.settings:set(setting.name, new_value)
- elseif setting.type == "float" then
- local new_value = tonumber(fields["te_setting_value"])
- if not new_value then
- this.data.error_message = fgettext_ne("Please enter a valid number.")
- this.data.entered_text = fields["te_setting_value"]
- core.update_formspec(this:get_formspec())
- return true
- end
- if setting.min and new_value < setting.min then
- this.data.error_message = fgettext_ne("The value must be at least $1.", setting.min)
- this.data.entered_text = fields["te_setting_value"]
- core.update_formspec(this:get_formspec())
- return true
- end
- if setting.max and new_value > setting.max then
- this.data.error_message = fgettext_ne("The value must not be larger than $1.", setting.max)
- this.data.entered_text = fields["te_setting_value"]
- core.update_formspec(this:get_formspec())
- return true
- end
- core.settings:set(setting.name, new_value)
- elseif setting.type == "flags" then
- local values = {}
- for _, name in ipairs(setting.possible) do
- if name:sub(1, 2) ~= "no" then
- if checkboxes["cb_" .. name] then
- table.insert(values, name)
- else
- table.insert(values, "no" .. name)
- end
- end
- end
- checkboxes = {}
- local new_value = table.concat(values, ", ")
- core.settings:set(setting.name, new_value)
- elseif setting.type == "noise_params_2d" or setting.type == "noise_params_3d" then
- local np_flags = {}
- for _, name in ipairs(setting.flags) do
- if checkboxes["cb_" .. name] then
- table.insert(np_flags, name)
- end
- end
- checkboxes = {}
- if setting.type == "noise_params_2d" then
- fields["te_spready"] = fields["te_spreadz"]
- end
- local new_value = {
- offset = fields["te_offset"],
- scale = fields["te_scale"],
- spread = {
- x = fields["te_spreadx"],
- y = fields["te_spready"],
- z = fields["te_spreadz"]
- },
- seed = fields["te_seed"],
- octaves = fields["te_octaves"],
- persistence = fields["te_persist"],
- lacunarity = fields["te_lacun"],
- flags = table.concat(np_flags, ", ")
- }
- core.settings:set_np_group(setting.name, new_value)
- elseif setting.type == "v3f" then
- local new_value = "("
- .. fields["te_x"] .. ", "
- .. fields["te_y"] .. ", "
- .. fields["te_z"] .. ")"
- core.settings:set(setting.name, new_value)
- else
- local new_value = fields["te_setting_value"]
- core.settings:set(setting.name, new_value)
- end
- core.settings:write()
- this:delete()
- return true
- end
- if fields["btn_cancel"] then
- this:delete()
- return true
- end
- if fields["btn_browser_path"] then
- core.show_path_select_dialog("dlg_browse_path",
- fgettext_ne("Select directory"), false)
- end
- if fields["btn_browser_filepath"] then
- core.show_path_select_dialog("dlg_browse_path",
- fgettext_ne("Select file"), true)
- end
- if fields["dlg_browse_path_accepted"] then
- this.data.selected_path = fields["dlg_browse_path_accepted"]
- core.update_formspec(this:get_formspec())
- end
- if setting.type == "flags"
- or setting.type == "noise_params_2d"
- or setting.type == "noise_params_3d" then
- for name, value in pairs(fields) do
- if name:sub(1, 3) == "cb_" then
- checkboxes[name] = value == "true"
- end
- end
- end
- return false
- end
- local function create_settings_formspec(tabview, _, tabdata)
- local formspec = "size[12,5.4;true]" ..
- "tablecolumns[color;tree;text,width=28;text]" ..
- "tableoptions[background=#00000000;border=false]" ..
- "field[0.3,0.1;10.2,1;search_string;;" .. core.formspec_escape(search_string) .. "]" ..
- "field_close_on_enter[search_string;false]" ..
- "button[10.2,-0.2;2,1;search;" .. fgettext("Search") .. "]" ..
- "table[0,0.8;12,3.5;list_settings;"
- local current_level = 0
- for _, entry in ipairs(settings) do
- local name
- if not core.settings:get_bool("show_technical_names") and entry.readable_name then
- name = fgettext_ne(entry.readable_name)
- else
- name = entry.name
- end
- if entry.type == "category" then
- current_level = entry.level
- formspec = formspec .. "#FFFF00," .. current_level .. "," .. fgettext(name) .. ",,"
- elseif entry.type == "bool" then
- local value = get_current_value(entry)
- if core.is_yes(value) then
- value = fgettext("Enabled")
- else
- value = fgettext("Disabled")
- end
- formspec = formspec .. "," .. (current_level + 1) .. "," .. core.formspec_escape(name) .. ","
- .. value .. ","
- elseif entry.type == "key" then --luacheck: ignore
- -- ignore key settings, since we have a special dialog for them
- elseif entry.type == "noise_params_2d" or entry.type == "noise_params_3d" then
- formspec = formspec .. "," .. (current_level + 1) .. "," .. core.formspec_escape(name) .. ","
- .. core.formspec_escape(get_current_np_group_as_string(entry)) .. ","
- else
- formspec = formspec .. "," .. (current_level + 1) .. "," .. core.formspec_escape(name) .. ","
- .. core.formspec_escape(get_current_value(entry)) .. ","
- end
- end
- if #settings > 0 then
- formspec = formspec:sub(1, -2) -- remove trailing comma
- end
- formspec = formspec .. ";" .. selected_setting .. "]" ..
- "button[0,4.9;4,1;btn_back;".. fgettext("< Back to Settings page") .. "]" ..
- "button[10,4.9;2,1;btn_edit;" .. fgettext("Edit") .. "]" ..
- "button[7,4.9;3,1;btn_restore;" .. fgettext("Restore Default") .. "]" ..
- "checkbox[0,4.3;cb_tech_settings;" .. fgettext("Show technical names") .. ";"
- .. dump(core.settings:get_bool("show_technical_names")) .. "]"
- return formspec
- end
- local function handle_settings_buttons(this, fields, tabname, tabdata)
- local list_enter = false
- if fields["list_settings"] then
- selected_setting = core.get_table_index("list_settings")
- if core.explode_table_event(fields["list_settings"]).type == "DCL" then
- -- Directly toggle booleans
- local setting = settings[selected_setting]
- if setting and setting.type == "bool" then
- local current_value = get_current_value(setting)
- core.settings:set_bool(setting.name, not core.is_yes(current_value))
- core.settings:write()
- return true
- else
- list_enter = true
- end
- else
- return true
- end
- end
- if fields.search or fields.key_enter_field == "search_string" then
- if search_string == fields.search_string then
- if selected_setting > 0 then
- -- Go to next result on enter press
- local i = selected_setting + 1
- local looped = false
- while i > #settings or settings[i].type == "category" do
- i = i + 1
- if i > #settings then
- -- Stop infinte looping
- if looped then
- return false
- end
- i = 1
- looped = true
- end
- end
- selected_setting = i
- core.update_formspec(this:get_formspec())
- return true
- end
- else
- -- Search for setting
- search_string = fields.search_string
- settings, selected_setting = filter_settings(full_settings, search_string)
- core.update_formspec(this:get_formspec())
- end
- return true
- end
- if fields["btn_edit"] or list_enter then
- local setting = settings[selected_setting]
- if setting and setting.type ~= "category" then
- local edit_dialog = dialog_create("change_setting",
- create_change_setting_formspec, handle_change_setting_buttons)
- edit_dialog:set_parent(this)
- this:hide()
- edit_dialog:show()
- end
- return true
- end
- if fields["btn_restore"] then
- local setting = settings[selected_setting]
- if setting and setting.type ~= "category" then
- core.settings:remove(setting.name)
- core.settings:write()
- core.update_formspec(this:get_formspec())
- end
- return true
- end
- if fields["btn_back"] then
- this:delete()
- return true
- end
- if fields["cb_tech_settings"] then
- core.settings:set("show_technical_names", fields["cb_tech_settings"])
- core.settings:write()
- core.update_formspec(this:get_formspec())
- return true
- end
- return false
- end
- function create_adv_settings_dlg()
- local dlg = dialog_create("settings_advanced",
- create_settings_formspec,
- handle_settings_buttons,
- nil)
- return dlg
- end
- -- Uncomment to generate 'minetest.conf.example' and 'settings_translation_file.cpp'.
- -- For RUN_IN_PLACE the generated files may appear in the 'bin' folder.
- -- See comment and alternative line at the end of 'generate_from_settingtypes.lua'.
- --assert(loadfile(core.get_builtin_path().."mainmenu"..DIR_DELIM..
- -- "generate_from_settingtypes.lua"))(parse_config_file(true, false))
|