d38c3fb4cc
The previous approach to loading config files was to ask WP for the directory and then search those for the config files. This patch changes the approach - a caller now asks WP to search for a specific config file or iterate over a config file directory. This allows us to implement a directory lookup order, i.e. "wireplumber.conf" may be in XDG_CONFIG_DIR, /etc/, /usr/share and the first one found is used. For configuration directories, the new method iterates over all matching entries (files + directories) and invokes a callback for each entry. This enables distributions to ship default files in /usr/share/wireplumber but have admins and users override them on a local basis. For lua scripts in particular, overriding a distribution-provided file with an empty file effectively disables it, adding a file adds it in the right sort order.
129 lines
3.4 KiB
C
129 lines
3.4 KiB
C
/* WirePlumber
|
|
*
|
|
* Copyright © 2020 Collabora Ltd.
|
|
* @author George Kiagiadakis <george.kiagiadakis@collabora.com>
|
|
*
|
|
* SPDX-License-Identifier: MIT
|
|
*/
|
|
|
|
#include <wp/wp.h>
|
|
#include <wplua/wplua.h>
|
|
#include <errno.h>
|
|
|
|
static gboolean
|
|
load_components (lua_State *L, WpCore * core, GError ** error)
|
|
{
|
|
lua_getglobal (L, "SANDBOX_COMMON_ENV");
|
|
|
|
switch (lua_getfield (L, -1, "components")) {
|
|
case LUA_TTABLE:
|
|
break;
|
|
case LUA_TNIL:
|
|
wp_debug ("no components specified");
|
|
goto done;
|
|
default:
|
|
g_set_error (error, WP_DOMAIN_LIBRARY, WP_LIBRARY_ERROR_INVALID_ARGUMENT,
|
|
"Expected 'components' to be a table");
|
|
return FALSE;
|
|
}
|
|
|
|
lua_pushnil (L);
|
|
while (lua_next (L, -2)) {
|
|
/* value must be a table */
|
|
if (lua_type (L, -1) != LUA_TTABLE) {
|
|
g_set_error (error, WP_DOMAIN_LIBRARY, WP_LIBRARY_ERROR_INVALID_ARGUMENT,
|
|
"'components' must be a table with tables as values");
|
|
return FALSE;
|
|
}
|
|
|
|
/* record indexes to the current key and value of the components table */
|
|
int key = lua_absindex (L, -2);
|
|
int table = lua_absindex (L, -1);
|
|
|
|
/* get component */
|
|
if (lua_geti (L, table, 1) != LUA_TSTRING) {
|
|
g_set_error (error, WP_DOMAIN_LIBRARY, WP_LIBRARY_ERROR_INVALID_ARGUMENT,
|
|
"components['%s'] has a non-string or unspecified component name",
|
|
lua_tostring (L, key));
|
|
return FALSE;
|
|
}
|
|
const char * component = lua_tostring (L, -1);
|
|
|
|
/* get component type */
|
|
if (lua_getfield (L, table, "type") != LUA_TSTRING) {
|
|
g_set_error (error, WP_DOMAIN_LIBRARY, WP_LIBRARY_ERROR_INVALID_ARGUMENT,
|
|
"components['%s'] has a non-string or unspecified component type",
|
|
lua_tostring (L, key));
|
|
return FALSE;
|
|
}
|
|
const char * type = lua_tostring (L, -1);
|
|
|
|
/* optional component arguments */
|
|
GVariant *args = NULL;
|
|
if (lua_getfield (L, table, "args") == LUA_TTABLE) {
|
|
args = wplua_lua_to_gvariant (L, -1);
|
|
}
|
|
|
|
wp_debug ("load component: %s (%s)", component, type);
|
|
|
|
if (!wp_core_load_component (core, component, type, args, error))
|
|
return FALSE;
|
|
|
|
/* clear the stack up to the key */
|
|
lua_settop (L, key);
|
|
}
|
|
|
|
done:
|
|
lua_pop (L, 2); /* pop components & SANDBOX_COMMON_ENV */
|
|
return TRUE;
|
|
}
|
|
|
|
static gint
|
|
load_file (const gchar *path, gpointer data, GError **error)
|
|
{
|
|
lua_State *L = data;
|
|
|
|
if (g_file_test (path, G_FILE_TEST_IS_DIR))
|
|
return 0;
|
|
|
|
wp_info ("loading config file: %s", path);
|
|
if (!wplua_load_path (L, path, 0, 0, error))
|
|
return -EINVAL;
|
|
return 0;
|
|
}
|
|
|
|
gboolean
|
|
wp_lua_scripting_load_configuration (const gchar * conf_file,
|
|
WpCore * core, GError ** error)
|
|
{
|
|
g_autofree gchar * path = NULL;
|
|
g_autoptr (lua_State) L = wplua_new ();
|
|
gint nfiles = 0;
|
|
|
|
wplua_enable_sandbox (L, WP_LUA_SANDBOX_MINIMAL_STD);
|
|
|
|
/* load conf_file itself */
|
|
path = wp_find_config_file (conf_file, NULL);
|
|
if (path) {
|
|
wp_info ("loading config file: %s", path);
|
|
if (!wplua_load_path (L, path, 0, 0, error))
|
|
return FALSE;
|
|
nfiles = 1;
|
|
}
|
|
g_clear_pointer (&path, g_free);
|
|
|
|
path = g_strdup_printf ("%s.d", conf_file);
|
|
nfiles += wp_iter_config_files (path, ".lua", load_file, L, error);
|
|
|
|
if (nfiles == 0) {
|
|
g_set_error (error, G_IO_ERROR, G_IO_ERROR_NOT_FOUND,
|
|
"Could not locate configuration file '%s'", conf_file);
|
|
return FALSE;
|
|
}
|
|
|
|
if (!load_components (L, core, error))
|
|
return FALSE;
|
|
|
|
return TRUE;
|
|
}
|