The Battle for Wesnoth  1.19.0-dev
lua_preferences.cpp
Go to the documentation of this file.
1 /*
2  Copyright (C) 2016 - 2024
3  by Jyrki Vesterinen <sandgtx@gmail.com>
4  Part of the Battle for Wesnoth Project https://www.wesnoth.org/
5 
6  This program is free software; you can redistribute it and/or modify
7  it under the terms of the GNU General Public License as published by
8  the Free Software Foundation; either version 2 of the License, or
9  (at your option) any later version.
10  This program is distributed in the hope that it will be useful,
11  but WITHOUT ANY WARRANTY.
12 
13  See the COPYING file for more details.
14 */
15 
17 
18 #include "config.hpp"
19 #include "preferences/advanced.hpp"
20 #include "preferences/general.hpp"
21 #include "scripting/lua_common.hpp"
22 #include "scripting/push_check.hpp"
23 
24 /**
25  * The __index metamethod.
26  * Parameter 1: the preference table.
27  * Parameter 2: preference name, must be a string.
28  * Returns: preference value. If there isn't such a preference, returns nil.
29  */
30 static int impl_preferences_get(lua_State* L)
31 {
32  std::string preference_name = luaL_checkstring(L, 2);
34  return 1;
35 }
36 
37 /**
38  * The __newindex metamethod.
39  * Parameter 1: the preference table.
40  * Parameter 2: preference name, must be a string.
41  * Parameter 3: preference value.
42  * Returns nothing.
43  */
44 static int impl_preferences_set(lua_State* L)
45 {
46  std::string preference_name = luaL_checkstring(L, 2);
48  luaW_toscalar(L, 3, value);
49  preferences::set(preference_name, value);
50  return 0;
51 }
52 
53 static int impl_preferences_dir(lua_State* L)
54 {
55  std::vector<std::string> all_prefs;
56  for(const auto& [key, value] : preferences::get_prefs()->attribute_range()) {
57  all_prefs.push_back(key);
58  }
59  // This will result in some duplicates, but dir() automatically strips those out so who cares,
60  for(const auto& pref : preferences::get_advanced_preferences()) {
61  all_prefs.push_back(pref.field);
62  }
63  lua_push(L, all_prefs);
64  return 1;
65 }
66 
67 namespace lua_preferences
68 {
69  std::string register_table(lua_State* L)
70  {
71  // Push the wesnoth table to the stack
72  lua_getglobal(L, "wesnoth");
73 
74  // Create the preferences table
75  lua_newtable(L);
76  lua_pushcfunction(L, impl_preferences_get);
77  lua_setfield(L, -2, "__index");
78  lua_pushcfunction(L, impl_preferences_set);
79  lua_setfield(L, -2, "__newindex");
80  lua_pushcfunction(L, impl_preferences_dir);
81  lua_setfield(L, -2, "__dir");
82  lua_pushstring(L, "src/scripting/lua_preferences.cpp");
83  lua_setfield(L, -2, "__metatable");
84 
85  // Set the table as its own metatable
86  lua_pushvalue(L, -1);
87  lua_setmetatable(L, -2);
88 
89  // Assign the table to wesnoth.preferences
90  lua_setfield(L, -2, "preferences");
91 
92  // Pop the wesnoth table from the stack
93  lua_pop(L, 1);
94 
95  return "Adding preferences table...\n";
96  }
97 }
Variant for storing WML attributes.
bool luaW_toscalar(lua_State *L, int index, config::attribute_value &v)
Converts the value at the top of the stack to an attribute value.
Definition: lua_common.cpp:583
void luaW_pushscalar(lua_State *L, const config::attribute_value &v)
Converts an attribute value into a Lua object pushed at the top of the stack.
Definition: lua_common.cpp:578
static int impl_preferences_set(lua_State *L)
The __newindex metamethod.
static int impl_preferences_get(lua_State *L)
The __index metamethod.
static int impl_preferences_dir(lua_State *L)
std::string register_table(lua_State *L)
void set(const std::string &key, bool value)
Definition: general.cpp:165
config::attribute_value get_as_attribute(const std::string &key)
Definition: general.cpp:226
config * get_prefs()
Definition: general.cpp:235
const advanced_pref_list & get_advanced_preferences()
Gets a list of the available advanced preferences.
Definition: advanced.cpp:87
void lua_push(lua_State *L, const T &val)
Definition: push_check.hpp:373