/*
* Copyright (C) 2020-2021 Jo-Philipp Wich <jo@mein.io>
*
* Permission to use, copy, modify, and/or distribute this software for any
* purpose with or without fee is hereby granted, provided that the above
* copyright notice and this permission notice appear in all copies.
*
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
*/
/**
* # OpenWrt UCI configuration
*
* The `uci` module provides access to the native OpenWrt
* {@link https://github.com/openwrt/uci libuci} API for reading and
* manipulating UCI configuration files.
*
* Functions can be individually imported and directly accessed using the
* {@link https://developer.mozilla.org/en-US/docs/Web/JavaScript/Reference/Statements/import#named_import named import}
* syntax:
*
* ```
* import { cursor } from 'uci';
*
* let ctx = cursor();
* let hostname = ctx.get_first('system', 'system', 'hostname');
* ```
*
* Alternatively, the module namespace can be imported
* using a wildcard import statement:
*
* ```
* import * as uci from 'uci';
*
* let ctx = uci.cursor();
* let hostname = ctx.get_first('system', 'system', 'hostname');
* ```
*
* Additionally, the uci module namespace may also be imported by invoking
* the `ucode` interpreter with the `-luci` switch.
*
* @module uci
*/
#include <string.h>
#include <uci.h>
#include "ucode/module.h"
#define ok_return(expr) do { \
uc_vm_registry_delete(vm, "uci.error"); \
return (expr); \
} while(0)
#define err_return(err) do { \
uc_vm_registry_set(vm, "uci.error", ucv_int64_new(err)); \
return NULL; \
} while(0)
enum pkg_cmd {
CMD_SAVE,
CMD_COMMIT,
CMD_REVERT
};
/**
* Query error information.
*
* Returns a string containing a description of the last occurred error or
* `null` if there is no error information.
*
* @function module:uci#error
*
* @returns {?string}
*
* @example
* // Trigger error
* const ctx = cursor();
* ctx.set("not_existing_config", "test", "1");
*
* // Print error (should yield "Entry not found")
* print(ctx.error(), "\n");
*/
static uc_value_t *
uc_uci_error(uc_vm_t *vm, size_t nargs)
{
int last_error = ucv_int64_get(uc_vm_registry_get(vm, "uci.error"));
char buf[sizeof("Unknown error: -9223372036854775808")];
uc_value_t *errmsg;
const char *errstr[] = {
[UCI_ERR_MEM] = "Out of memory",
[UCI_ERR_INVAL] = "Invalid argument",
[UCI_ERR_NOTFOUND] = "Entry not found",
[UCI_ERR_IO] = "I/O error",
[UCI_ERR_PARSE] = "Parse error",
[UCI_ERR_DUPLICATE] = "Duplicate entry",
[UCI_ERR_UNKNOWN] = "Unknown error",
};
if (last_error == 0)
return NULL;
if (last_error >= 0 && (unsigned)last_error < ARRAY_SIZE(errstr)) {
errmsg = ucv_string_new(errstr[last_error]);
}
else {
snprintf(buf, sizeof(buf), "Unknown error: %d", last_error);
errmsg = ucv_string_new(buf);
}
uc_vm_registry_delete(vm, "uci.error");
return errmsg;
}
/**
* Instantiate uci cursor.
*
* A uci cursor is a context for interacting with uci configuration files. It's
* purpose is to cache and hold changes made to loaded configuration states
* until those changes are written out to disk or discared.
*
* Unsaved and uncommitted changes in a cursor instance are private and not
* visible to other cursor instances instantiated by the same program or other
* processes on the system.
*
* Returns the instantiated cursor on success.
*
* Returns `null` on error, e.g. if an invalid path argument was provided.
*
* @function module:uci#cursor
*
* @param {string} [config_dir=/etc/config]
* The directory to search for configuration files. It defaults to the well
* known uci configuration directory `/etc/config` but may be set to a different
* path for special purpose applications.
*
* @param {string} [delta_dir=/tmp/.uci]
* The directory to save delta records in. It defaults to the well known
* `/tmp/.uci` path which is used as default by the uci command line tool.
*
* By changing this path to a different location, it is possible to isolate
* uncommitted application changes from the uci cli or other processes on the
* system.
*
* @returns {?module:uci.cursor}
*/
static uc_value_t *
uc_uci_cursor(uc_vm_t *vm, size_t nargs)
{
uc_value_t *cdir = uc_fn_arg(0);
uc_value_t *sdir = uc_fn_arg(1);
struct uci_context *c;
int rv;
if ((cdir && ucv_type(cdir) != UC_STRING) ||
(sdir && ucv_type(sdir) != UC_STRING))
err_return(UCI_ERR_INVAL);
c = uci_alloc_context();
if (!c)
err_return(UCI_ERR_MEM);
if (cdir) {
rv = uci_set_confdir(c, ucv_string_get(cdir));
if (rv)
err_return(rv);
}
if (sdir) {
rv = uci_set_savedir(c, ucv_string_get(sdir));
if (rv)
err_return(rv);
}
ok_return(ucv_resource_create(vm, "uci.cursor", c));
}
/**
* Represents a context for interacting with uci configuration files.
*
* Operations on uci configurations are performed through a uci cursor object
* which operates on in-memory representations of loaded configuration files.
*
* Any changes made to configuration values are local to the cursor object and
* held in memory only until they're written out to the filesystem using the
* `save()` and `commit()` methods.
*
* Changes performed in one cursor instance are not reflected in another, unless
* the first instance writes those changes to the filesystem and the other
* instance explicitly (re)loads the affected configuration files.
*
* @class module:uci.cursor
* @hideconstructor
*
* @borrows module:uci#error as module.uci.cursor#error
*
* @see {@link module:uci#cursor|cursor()}
*
* @example
*
* const ctx = cursor(…);
*
* // Enumerate configuration files
* ctx.configs();
*
* // Load configuration files
* ctx.load(…);
* ctx.unload(…);
*
* // Query values
* ctx.get(…);
* ctx.get_all(…);
* ctx.get_first(…);
* ctx.foreach(…);
*
* // Modify values
* ctx.add(…);
* ctx.set(…);
* ctx.rename(…);
* ctx.reorder(…);
* ctx.delete(…);
*
* // Stage, revert, save changes
* ctx.changes(…);
* ctx.save(…);
* ctx.revert(…);
* ctx.commit(…);
*/
/**
* A uci change record is a plain array containing the change operation name as
* first element, the affected section ID as second argument and an optional
* third and fourth argument whose meanings depend on the operation.
*
* @typedef {string[]} ChangeRecord
* @memberof module:uci.cursor
*
* @property {string} 0
* The operation name - may be one of `add`, `set`, `remove`, `order`,
* `list-add`, `list-del` or `rename`.
*
* @property {string} 1
* The section ID targeted by the operation.
*
* @property {string} 2
* The meaning of the third element depends on the operation.
* - For `add` it is type of the section that has been added
* - For `set` it either is the option name if a fourth element exists, or the
* type of a named section which has been added when the change entry only
* contains three elements.
* - For `remove` it contains the name of the option that has been removed.
* - For `order` it specifies the new sort index of the section.
* - For `list-add` it contains the name of the list option a new value has been
* added to.
* - For `list-del` it contains the name of the list option a value has been
* removed from.
* - For `rename` it contains the name of the option that has been renamed if a
* fourth element exists, else it contains the new name a section has been
* renamed to if the change entry only contains three elements.
*
* @property {string} 4
* The meaning of the fourth element depends on the operation.
* - For `set` it is the value an option has been set to.
* - For `list-add` it is the new value that has been added to a list option.
* - For `rename` it is the new name of an option that has been renamed.
*/
/**
* A section object represents the options and their corresponding values
* enclosed within a configuration section, as well as some additional meta data
* such as sort indexes and internal ID.
*
* Any internal metadata fields are prefixed with a dot which isn't an allowed
* character for normal option names.
*
* @typedef {Object<string, boolean|number|string|string[]>} SectionObject
* @memberof module:uci.cursor
*
* @property {boolean} .anonymous
* The `.anonymous` property specifies whether the configuration is
* anonymous (`true`) or named (`false`).
*
* @property {number} .index
* The `.index` property specifies the sort order of the section.
*
* @property {string} .name
* The `.name` property holds the name of the section object. It may be either
* an anonymous ID in the form `cfgXXXXXX` with `X` being a hexadecimal digit or
* a string holding the name of the section.
*
* @property {string} .type
* The `.type` property contains the type of the corresponding uci
* section.
*
* @property {string|string[]} *
* A section object may contain an arbitrary number of further properties
* representing the uci option enclosed in the section.
*
* All option property names will be in the form `[A-Za-z0-9_]+` and either
* contain a string value or an array of strings, in case the underlying option
* is an UCI list.
*/
/**
* The sections callback is invoked for each section found within the given
* configuration and receives the section object and its associated name as
* arguments.
*
* @callback module:uci.cursor.SectionCallback
*
* @param {module:uci.cursor.SectionObject} section
* The section object.
*/
/**
* Explicitly reload configuration file.
*
* Usually, any attempt to query or modify a value within a given configuration
* will implicitly load the underlying file into memory. By invoking `load()`
* explicitly, a potentially loaded stale configuration is discarded and
* reloaded from the file system, ensuring that the latest state is reflected in
* the cursor.
*
* Returns `true` if the configuration was successfully loaded.
*
* Returns `null` on error, e.g. if the requested configuration does not exist.
*
* @function module:uci.cursor#load
*
* @param {string} config
* The name of the configuration file to load, e.g. `"system"` to load
* `/etc/config/system` into the cursor.
*
* @returns {?boolean}
*/
static uc_value_t *
uc_uci_load(uc_vm_t *vm, size_t nargs)
{
struct uci_context **c = uc_fn_this("uci.cursor");
uc_value_t *conf = uc_fn_arg(0);
struct uci_element *e;
char *s;
if (!c || !*c)
err_return(UCI_ERR_INVAL);
if (ucv_type(conf) != UC_STRING)
err_return(UCI_ERR_INVAL);
s = ucv_string_get(conf);
uci_foreach_element(&(*c)->root, e) {
if (!strcmp(e->name, s)) {
uci_unload(*c, uci_to_package(e));
break;
}
}
if (uci_load(*c, s, NULL))
err_return((*c)->err);
ok_return(ucv_boolean_new(true));
}
/**
* Explicitly unload configuration file.
*
* The `unload()` function forcibly discards a loaded configuration state from
* the cursor so that the next attempt to read or modify that configuration
* will load it anew from the file system.
*
* Returns `true` if the configuration was successfully unloaded.
*
* Returns `false` if the configuration was not loaded to begin with.
*
* Returns `null` on error, e.g. if the requested configuration does not exist.
*
* @function module:uci.cursor#unload
*
* @param {string} config
* The name of the configuration file to unload.
*
* @returns {?boolean}
*/
static uc_value_t *
uc_uci_unload(uc_vm_t *vm, size_t nargs)
{
struct uci_context **c = uc_fn_this("uci.cursor");
uc_value_t *conf = uc_fn_arg(0);
struct uci_element *e;
if (!c || !*c)
err_return(UCI_ERR_INVAL);
if (ucv_type(conf) != UC_STRING)
err_return(UCI_ERR_INVAL);
uci_foreach_element(&(*c)->root, e) {
if (!strcmp(e->name, ucv_string_get(conf))) {
uci_unload(*c, uci_to_package(e));
ok_return(ucv_boolean_new(true));
}
}
ok_return(ucv_boolean_new(false));
}
static int
lookup_extended(struct uci_context *ctx, struct uci_ptr *ptr, bool extended)
{
int rv;
struct uci_ptr lookup;
/* use a copy of the passed ptr since failing lookups will
* clobber the state */
lookup = *ptr;
lookup.flags |= UCI_LOOKUP_EXTENDED;
rv = uci_lookup_ptr(ctx, &lookup, NULL, extended);
/* copy to passed ptr on success */
if (!rv)
*ptr = lookup;
return rv;
}
static int
lookup_ptr(struct uci_context *ctx, struct uci_ptr *ptr, bool extended)
{
if (ptr && !ptr->s && ptr->section && *ptr->section == '@')
return lookup_extended(ctx, ptr, extended);
return uci_lookup_ptr(ctx, ptr, NULL, extended);
}
static uc_value_t *
option_to_uval(uc_vm_t *vm, struct uci_option *o)
{
struct uci_element *e;
uc_value_t *arr;
switch (o->type) {
case UCI_TYPE_STRING:
return ucv_string_new(o->v.string);
case UCI_TYPE_LIST:
arr = ucv_array_new(vm);
if (arr)
uci_foreach_element(&o->v.list, e)
ucv_array_push(arr, ucv_string_new(e->name));
return arr;
default:
return NULL;
}
}
static uc_value_t *
section_to_uval(uc_vm_t *vm, struct uci_section *s, int index)
{
uc_value_t *so = ucv_object_new(vm);
struct uci_element *e;
struct uci_option *o;
if (!so)
return NULL;
ucv_object_add(so, ".anonymous", ucv_boolean_new(s->anonymous));
ucv_object_add(so, ".type", ucv_string_new(s->type));
ucv_object_add(so, ".name", ucv_string_new(s->e.name));
if (index >= 0)
ucv_object_add(so, ".index", ucv_int64_new(index));
uci_foreach_element(&s->options, e) {
o = uci_to_option(e);
ucv_object_add(so, o->e.name, option_to_uval(vm, o));
}
return so;
}
static uc_value_t *
package_to_uval(uc_vm_t *vm, struct uci_package *p)
{
uc_value_t *po = ucv_object_new(vm);
uc_value_t *so;
struct uci_element *e;
int i = 0;
if (!po)
return NULL;
uci_foreach_element(&p->sections, e) {
so = section_to_uval(vm, uci_to_section(e), i++);
ucv_object_add(po, e->name, so);
}
return po;
}
static uc_value_t *
uc_uci_get_any(uc_vm_t *vm, size_t nargs, bool all)
{
struct uci_context **c = uc_fn_this("uci.cursor");
uc_value_t *conf = uc_fn_arg(0);
uc_value_t *sect = uc_fn_arg(1);
uc_value_t *opt = uc_fn_arg(2);
struct uci_ptr ptr = { 0 };
int rv;
if (!c || !*c)
err_return(UCI_ERR_INVAL);
if ((ucv_type(conf) != UC_STRING) ||
(sect && ucv_type(sect) != UC_STRING) ||
(opt && ucv_type(opt) != UC_STRING))
err_return(UCI_ERR_INVAL);
if ((!sect && !all) || (opt && all))
err_return(UCI_ERR_INVAL);
ptr.package = ucv_string_get(conf);
ptr.section = sect ? ucv_string_get(sect) : NULL;
ptr.option = opt ? ucv_string_get(opt) : NULL;
rv = lookup_ptr(*c, &ptr, true);
if (rv != UCI_OK)
err_return(rv);
if (!(ptr.flags & UCI_LOOKUP_COMPLETE))
err_return(UCI_ERR_NOTFOUND);
if (all) {
if (ptr.section) {
if (!ptr.s)
err_return(UCI_ERR_NOTFOUND);
ok_return(section_to_uval(vm, ptr.s, -1));
}
if (!ptr.p)
err_return(UCI_ERR_NOTFOUND);
ok_return(package_to_uval(vm, ptr.p));
}
if (ptr.option) {
if (!ptr.o)
err_return(UCI_ERR_NOTFOUND);
ok_return(option_to_uval(vm, ptr.o));
}
if (!ptr.s)
err_return(UCI_ERR_NOTFOUND);
ok_return(ucv_string_new(ptr.s->type));
}
/**
* Query a single option value or section type.
*
* When invoked with three arguments, the function returns the value of the
* given option, within the specified section of the given configuration.
*
* When invoked with just a config and section argument, the function returns
* the type of the specified section.
*
* In either case, the given configuration is implicitly loaded into the cursor
* if not already present.
*
* Returns the configuration value or section type on success.
*
* Returns `null` on error, e.g. if the requested configuration does not exist
* or if an invalid argument was passed.
*
* @function module:uci.cursor#get
*
* @param {string} config
* The name of the configuration file to query, e.g. `"system"` to query values
* in `/etc/config/system`.
*
* @param {string} section
* The name of the section to query within the configuration.
*
* @param {string} [option]
* The name of the option to query within the section. If omitted, the type of
* the section is returned instead.
*
* @returns {?(string|string[])}
*
* @example
* const ctx = cursor(…);
*
* // Query an option, extended section notation is supported
* ctx.get('system', '@system[0]', 'hostname');
*
* // Query a section type (should yield 'interface')
* ctx.get('network', 'lan');
*/
static uc_value_t *
uc_uci_get(uc_vm_t *vm, size_t nargs)
{
return uc_uci_get_any(vm, nargs, false);
}
/**
* Query a complete section or configuration.
*
* When invoked with two arguments, the function returns all values of the
* specified section within the given configuration as dictionary.
*
* When invoked with just a config argument, the function returns a nested
* dictionary of all sections present within the given configuration.
*
* In either case, the given configuration is implicitly loaded into the cursor
* if not already present.
*
* Returns the section or configuration dictionary on success.
*
* Returns `null` on error, e.g. if the requested configuration does not exist
* or if an invalid argument was passed.
*
* @function module:uci.cursor#get_all
*
* @param {string} config
* The name of the configuration file to query, e.g. `"system"` to query values
* in `/etc/config/system`.
*
* @param {string} [section]
* The name of the section to query within the configuration. If omitted a
* nested dictionary containing all section values is returned.
*
* @returns {?(Object<string, module:uci.cursor.SectionObject>|module:uci.cursor.SectionObject)}
*
* @example
* const ctx = cursor(…);
*
* // Query all lan interface details
* ctx.get_all('network', 'lan');
*
* // Dump the entire dhcp configuration
* ctx.get_all('dhcp');
*/
static uc_value_t *
uc_uci_get_all(uc_vm_t *vm, size_t nargs)
{
return uc_uci_get_any(vm, nargs, true);
}
/**
* Query option value or name of first section of given type.
*
* When invoked with three arguments, the function returns the value of the
* given option within the first found section of the specified type in the
* given configuration.
*
* When invoked with just a config and section type argument, the function
* returns the name of the first found section of the given type.
*
* In either case, the given configuration is implicitly loaded into the cursor
* if not already present.
*
* Returns the configuration value or section name on success.
*
* Returns `null` on error, e.g. if the requested configuration does not exist
* or if an invalid argument was passed.
*
* @function module:uci.cursor#get_first
*
* @param {string} config
* The name of the configuration file to query, e.g. `"system"` to query values
* in `/etc/config/system`.
*
* @param {string} type
* The section type to find the first section for within the configuration.
*
* @param {string} [option]
* The name of the option to query within the section. If omitted, the name of
* the section is returned instead.
*
* @returns {?(string|string[])}
*
* @example
* const ctx = cursor(…);
*
* // Query hostname in first anonymous "system" section of /etc/config/system
* ctx.get_first('system', 'system', 'hostname');
*
* // Figure out name of first network interface section (usually "loopback")
* ctx.get_first('network', 'interface');
*/
static uc_value_t *
uc_uci_get_first(uc_vm_t *vm, size_t nargs)
{
struct uci_context **c = uc_fn_this("uci.cursor");
uc_value_t *conf = uc_fn_arg(0);
uc_value_t *type = uc_fn_arg(1);
uc_value_t *opt = uc_fn_arg(2);
struct uci_package *p = NULL;
struct uci_section *sc;
struct uci_element *e;
struct uci_ptr ptr = { 0 };
int rv;
if (ucv_type(conf) != UC_STRING ||
ucv_type(type) != UC_STRING ||
(opt && ucv_type(opt) != UC_STRING))
err_return(UCI_ERR_INVAL);
uci_foreach_element(&(*c)->root, e) {
if (strcmp(e->name, ucv_string_get(conf)))
continue;
p = uci_to_package(e);
break;
}
if (!p && uci_load(*c, ucv_string_get(conf), &p))
err_return((*c)->err);
uci_foreach_element(&p->sections, e) {
sc = uci_to_section(e);
if (strcmp(sc->type, ucv_string_get(type)))
continue;
if (!opt)
ok_return(ucv_string_new(sc->e.name));
ptr.package = ucv_string_get(conf);
ptr.section = sc->e.name;
ptr.option = ucv_string_get(opt);
ptr.p = p;
ptr.s = sc;
rv = lookup_ptr(*c, &ptr, false);
if (rv != UCI_OK)
err_return(rv);
if (!(ptr.flags & UCI_LOOKUP_COMPLETE))
err_return(UCI_ERR_NOTFOUND);
ok_return(option_to_uval(vm, ptr.o));
}
err_return(UCI_ERR_NOTFOUND);
}
/**
* Add anonymous section to given configuration.
*
* Adds a new anonymous (unnamed) section of the specified type to the given
* configuration. In order to add a named section, the three argument form of
* `set()` should be used instead.
*
* In contrast to other query functions, `add()` will not implicitly load the
* configuration into the cursor. The configuration either needs to be loaded
* explicitly through `load()` beforehand, or implicitly by querying it through
* one of the `get()`, `get_all()`, `get_first()` or `foreach()` functions.
*
* Returns the autogenerated, ephemeral name of the added unnamed section
* on success.
*
* Returns `null` on error, e.g. if the targeted configuration was not loaded or
* if an invalid section type value was passed.
*
* @function module:uci.cursor#add
*
* @param {string} config
* The name of the configuration file to add the section to, e.g. `"system"` to
* modify `/etc/config/system`.
*
* @param {string} type
* The type value to use for the added section.
*
* @returns {?string}
*
* @example
* const ctx = cursor(…);
*
* // Load firewall configuration
* ctx.load('firewall');
*
* // Add unnamed `config rule` section
* const sid = ctx.add('firewall', 'rule');
*
* // Set values on the newly added section
* ctx.set('firewall', sid, 'name', 'A test');
* ctx.set('firewall', sid, 'target', 'ACCEPT');
* …
*/
static uc_value_t *
uc_uci_add(uc_vm_t *vm, size_t nargs)
{
struct uci_context **c = uc_fn_this("uci.cursor");
uc_value_t *conf = uc_fn_arg(0);
uc_value_t *type = uc_fn_arg(1);
struct uci_element *e = NULL;
struct uci_package *p = NULL;
struct uci_section *sc = NULL;
int rv;
if (ucv_type(conf) != UC_STRING ||
ucv_type(type) != UC_STRING)
err_return(UCI_ERR_INVAL);
uci_foreach_element(&(*c)->root, e) {
if (!strcmp(e->name, ucv_string_get(conf))) {
p = uci_to_package(e);
break;
}
}
if (!p)
err_return(UCI_ERR_NOTFOUND);
rv = uci_add_section(*c, p, ucv_string_get(type), &sc);
if (rv != UCI_OK)
err_return(rv);
else if (!sc)
err_return(UCI_ERR_NOTFOUND);
return ucv_string_new(sc->e.name);
}
static bool
uval_to_uci(uc_vm_t *vm, uc_value_t *val, const char **p, bool *is_list)
{
uc_value_t *item;
*p = NULL;
if (is_list)
*is_list = false;
switch (ucv_type(val)) {
case UC_ARRAY:
if (ucv_array_length(val) == 0)
return false;
item = ucv_array_get(val, 0);
/* don't recurse */
if (ucv_type(item) == UC_ARRAY)
return false;
if (is_list)
*is_list = true;
return uval_to_uci(vm, item, p, NULL);
case UC_BOOLEAN:
*p = xstrdup(ucv_boolean_get(val) ? "1" : "0");
return true;
case UC_DOUBLE:
case UC_INTEGER:
case UC_STRING:
*p = ucv_to_string(vm, val);
/* fall through */
case UC_NULL:
return true;
default:
return false;
}
}
/**
* Set option value or add named section in given configuration.
*
* When invoked with four arguments, the function sets the value of the given
* option within the specified section of the given configuration to the
* provided value. A value of `""` (empty string) can be used to delete an
* existing option.
*
* When invoked with three arguments, the function adds a new named section to
* the given configuration, using the specified type.
*
* In either case, the given configuration is implicitly loaded into the cursor
* if not already present.
*
* Returns the `true` if the named section was added or the specified option was
* set.
*
* Returns `null` on error, e.g. if the targeted configuration was not found or
* if an invalid value was passed.
*
* @function module:uci.cursor#set
*
* @param {string} config
* The name of the configuration file to set values in, e.g. `"system"` to
* modify `/etc/config/system`.
*
* @param {string} section
* The section name to create or set a value in.
*
* @param {string} option_or_type
* The option name to set within the section or, when the subsequent value
* argument is omitted, the type of the section to create within the
* configuration.
*
* @param {(Array<string|boolean|number>|string|boolean|number)} [value]
* The option value to set.
*
* @returns {?boolean}
*
* @example
* const ctx = cursor(…);
*
* // Add named `config interface guest` section
* ctx.set('network', 'guest', 'interface');
*
* // Set values on the newly added section
* ctx.set('network', 'guest', 'proto', 'static');
* ctx.set('network', 'guest', 'ipaddr', '10.0.0.1/24');
* ctx.set('network', 'guest', 'dns', ['8.8.4.4', '8.8.8.8']);
* …
*
* // Delete 'disabled' option in first wifi-iface section
* ctx.set('wireless', '@wifi-iface[0]', 'disabled', '');
*/
static uc_value_t *
uc_uci_set(uc_vm_t *vm, size_t nargs)
{
struct uci_context **c = uc_fn_this("uci.cursor");
uc_value_t *conf = uc_fn_arg(0);
uc_value_t *sect = uc_fn_arg(1);
uc_value_t *opt = NULL, *val = NULL;
struct uci_ptr ptr = { 0 };
bool is_list = false;
size_t i;
int rv;
if (ucv_type(conf) != UC_STRING ||
ucv_type(sect) != UC_STRING)
err_return(UCI_ERR_INVAL);
switch (nargs) {
/* conf, sect, opt, val */
case 4:
opt = uc_fn_arg(2);
val = uc_fn_arg(3);
if (ucv_type(opt) != UC_STRING)
err_return(UCI_ERR_INVAL);
break;
/* conf, sect, type */
case 3:
val = uc_fn_arg(2);
if (ucv_type(val) != UC_STRING)
err_return(UCI_ERR_INVAL);
break;
default:
err_return(UCI_ERR_INVAL);
}
ptr.package = ucv_string_get(conf);
ptr.section = ucv_string_get(sect);
ptr.option = opt ? ucv_string_get(opt) : NULL;
rv = lookup_ptr(*c, &ptr, true);
if (rv != UCI_OK)
err_return(rv);
if (!ptr.s && ptr.option)
err_return(UCI_ERR_NOTFOUND);
if (!uval_to_uci(vm, val, &ptr.value, &is_list))
err_return(UCI_ERR_INVAL);
if (is_list) {
/* if we got a one-element array, delete existing option (if any)
* and iterate array at offset 0 */
if (ucv_array_length(val) == 1) {
i = 0;
free((char *)ptr.value);
ptr.value = NULL;
if (ptr.o) {
rv = uci_delete(*c, &ptr);
if (rv != UCI_OK)
err_return(rv);
}
}
/* if we get a multi element array, overwrite existing option (if any)
* with first value and iterate remaining array at offset 1 */
else {
i = 1;
rv = uci_set(*c, &ptr);
free((char *)ptr.value);
if (rv != UCI_OK)
err_return(rv);
}
for (; i < ucv_array_length(val); i++) {
if (!uval_to_uci(vm, ucv_array_get(val, i), &ptr.value, NULL))
continue;
rv = uci_add_list(*c, &ptr);
free((char *)ptr.value);
if (rv != UCI_OK)
err_return(rv);
}
}
else {
rv = uci_set(*c, &ptr);
free((char *)ptr.value);
if (rv != UCI_OK)
err_return(rv);
}
ok_return(ucv_boolean_new(true));
}
/**
* Delete an option or section from given configuration.
*
* When invoked with three arguments, the function deletes the given option
* within the specified section of the given configuration.
*
* When invoked with two arguments, the function deletes the entire specified
* section within the given configuration.
*
* In either case, the given configuration is implicitly loaded into the cursor
* if not already present.
*
* Returns the `true` if specified option or section has been deleted.
*
* Returns `null` on error, e.g. if the targeted configuration was not found or
* if an invalid value was passed.
*
* @function module:uci.cursor#delete
*
* @param {string} config
* The name of the configuration file to delete values in, e.g. `"system"` to
* modify `/etc/config/system`.
*
* @param {string} section
* The section name to remove the specified option in or, when the subsequent
* argument is omitted, the section to remove entirely.
*
* @param {string} [option]
* The option name to remove within the section.
*
* @returns {?boolean}
*
* @example
* const ctx = cursor(…);
*
* // Delete 'disabled' option in first wifi-iface section
* ctx.delete('wireless', '@wifi-iface[0]', 'disabled');
*
* // Delete 'wan' interface
* ctx.delete('network', 'lan');
*
* // Delete last firewall rule
* ctx.delete('firewall', '@rule[-1]');
*/
static uc_value_t *
uc_uci_delete(uc_vm_t *vm, size_t nargs)
{
struct uci_context **c = uc_fn_this("uci.cursor");
uc_value_t *conf = uc_fn_arg(0);
uc_value_t *sect = uc_fn_arg(1);
uc_value_t *opt = uc_fn_arg(2);
struct uci_ptr ptr = { 0 };
int rv;
if (ucv_type(conf) != UC_STRING ||
ucv_type(sect) != UC_STRING ||
(opt && ucv_type(opt) != UC_STRING))
err_return(UCI_ERR_INVAL);
ptr.package = ucv_string_get(conf);
ptr.section = ucv_string_get(sect);
ptr.option = opt ? ucv_string_get(opt) : NULL;
rv = lookup_ptr(*c, &ptr, true);
if (rv != UCI_OK)
err_return(rv);
if (opt ? !ptr.o : !ptr.s)
err_return(UCI_ERR_NOTFOUND);
rv = uci_delete(*c, &ptr);
if (rv != UCI_OK)
err_return(rv);
ok_return(ucv_boolean_new(true));
}
/**
* Rename an option or section in given configuration.
*
* When invoked with four arguments, the function renames the given option
* within the specified section of the given configuration to the provided
* value.
*
* When invoked with three arguments, the function renames the entire specified
* section to the provided value.
*
* In either case, the given configuration is implicitly loaded into the cursor
* if not already present.
*
* Returns the `true` if specified option or section has been renamed.
*
* Returns `null` on error, e.g. if the targeted configuration was not found or
* if an invalid value was passed.
*
* @function module:uci.cursor#rename
*
* @param {string} config
* The name of the configuration file to rename values in, e.g. `"system"` to
* modify `/etc/config/system`.
*
* @param {string} section
* The section name to rename or to rename an option in.
*
* @param {string} option_or_name
* The option name to rename within the section or, when the subsequent name
* argument is omitted, the new name of the renamed section within the
* configuration.
*
* @param {string} [name]
* The new name of the option to rename.
*
* @returns {?boolean}
*
* @example
* const ctx = cursor(…);
*
* // Assign explicit name to last anonymous firewall rule section
* ctx.rename('firewall', '@rule[-1]', 'my_block_rule');
*
* // Rename 'server' to 'orig_server_list' in ntp section of system config
* ctx.rename('system', 'ntp', 'server', 'orig_server_list');
*
* // Rename 'wan' interface to 'external'
* ctx.rename('network', 'wan', 'external');
*/
static uc_value_t *
uc_uci_rename(uc_vm_t *vm, size_t nargs)
{
struct uci_context **c = uc_fn_this("uci.cursor");
uc_value_t *conf = uc_fn_arg(0);
uc_value_t *sect = uc_fn_arg(1);
uc_value_t *opt = NULL, *val = NULL;
struct uci_ptr ptr = { 0 };
int rv;
if (ucv_type(conf) != UC_STRING ||
ucv_type(sect) != UC_STRING)
err_return(UCI_ERR_INVAL);
switch (nargs) {
/* conf, sect, opt, val */
case 4:
opt = uc_fn_arg(2);
val = uc_fn_arg(3);
if (ucv_type(opt) != UC_STRING ||
ucv_type(val) != UC_STRING)
err_return(UCI_ERR_INVAL);
break;
/* conf, sect, type */
case 3:
val = uc_fn_arg(2);
if (ucv_type(val) != UC_STRING)
err_return(UCI_ERR_INVAL);
break;
default:
err_return(UCI_ERR_INVAL);
}
ptr.package = ucv_string_get(conf);
ptr.section = ucv_string_get(sect);
ptr.option = opt ? ucv_string_get(opt) : NULL;
ptr.value = ucv_string_get(val);
rv = lookup_ptr(*c, &ptr, true);
if (rv != UCI_OK)
err_return(rv);
if (!ptr.s && ptr.option)
err_return(UCI_ERR_NOTFOUND);
rv = uci_rename(*c, &ptr);
if (rv != UCI_OK)
err_return(rv);
ok_return(ucv_boolean_new(true));
}
/**
* Reorder sections in given configuration.
*
* The `reorder()` function moves a single section by repositioning it to the
* given index within the configurations section list.
*
* The given configuration is implicitly loaded into the cursor if not already
* present.
*
* Returns the `true` if specified section has been moved.
*
* Returns `null` on error, e.g. if the targeted configuration was not found or
* if an invalid value was passed.
*
* @function module:uci.cursor#reorder
*
* @param {string} config
* The name of the configuration file to move the section in, e.g. `"system"` to
* modify `/etc/config/system`.
*
* @param {string} section
* The section name to move.
*
* @param {number} index
* The target index to move the section to, starting from `0`.
*
* @returns {?boolean}
*
* @example
* const ctx = cursor(…);
*
* // Query whole firewall config and reorder resulting dict by type and name
* const type_order = ['defaults', 'zone', 'forwarding', 'redirect', 'rule'];
* const values = ctx.get_all('firewall');
*
* sort(values, (k1, k2, s1, s2) => {
* // Get weight from type_order array
* let w1 = index(type_order, s1['.type']);
* let w2 = index(type_order, s2['.type']);
*
* // For unknown type orders, use type value itself as weight
* if (w1 == -1) w1 = s1['.type'];
* if (w2 == -1) w2 = s2['.type'];
*
* // Get name from name option, fallback to section name
* let n1 = s1.name ?? k1;
* let n2 = s2.name ?? k2;
*
* // Order by weight
* if (w1 < w2) return -1;
* if (w1 > w2) return 1;
*
* // For same weight order by name
* if (n1 < n2) return -1;
* if (n1 > n2) return 1;
*
* return 0;
* });
*
* // Sequentially reorder sorted sections in firewall configuration
* let position = 0;
*
* for (let sid in values)
* ctx.reorder('firewall', sid, position++);
*/
static uc_value_t *
uc_uci_reorder(uc_vm_t *vm, size_t nargs)
{
struct uci_context **c = uc_fn_this("uci.cursor");
uc_value_t *conf = uc_fn_arg(0);
uc_value_t *sect = uc_fn_arg(1);
uc_value_t *val = uc_fn_arg(2);
struct uci_ptr ptr = { 0 };
int64_t n;
int rv;
if (ucv_type(conf) != UC_STRING ||
ucv_type(sect) != UC_STRING ||
ucv_type(val) != UC_INTEGER)
err_return(UCI_ERR_INVAL);
n = ucv_int64_get(val);
if (n < 0)
err_return(UCI_ERR_INVAL);
ptr.package = ucv_string_get(conf);
ptr.section = ucv_string_get(sect);
rv = lookup_ptr(*c, &ptr, true);
if (rv != UCI_OK)
err_return(rv);
if (!ptr.s)
err_return(UCI_ERR_NOTFOUND);
rv = uci_reorder_section(*c, ptr.s, n);
if (rv != UCI_OK)
err_return(rv);
ok_return(ucv_boolean_new(true));
}
static int
uc_uci_pkg_command_single(struct uci_context *ctx, enum pkg_cmd cmd,
struct uci_package *pkg)
{
struct uci_ptr ptr = { 0 };
switch (cmd) {
case CMD_COMMIT:
return uci_commit(ctx, &pkg, false);
case CMD_SAVE:
return uci_save(ctx, pkg);
case CMD_REVERT:
ptr.p = pkg;
return uci_revert(ctx, &ptr);
default:
return UCI_ERR_INVAL;
}
}
static uc_value_t *
uc_uci_pkg_command(uc_vm_t *vm, size_t nargs, enum pkg_cmd cmd)
{
struct uci_context **c = uc_fn_this("uci.cursor");
uc_value_t *conf = uc_fn_arg(0);
struct uci_package *p;
char **configs = NULL;
int rv, res = UCI_OK;
size_t i;
if (conf) {
if (ucv_type(conf) != UC_STRING)
err_return(UCI_ERR_INVAL);
if (!(p = uci_lookup_package(*c, ucv_string_get(conf))))
err_return(UCI_ERR_NOTFOUND);
res = uc_uci_pkg_command_single(*c, cmd, p);
}
else {
if (uci_list_configs(*c, &configs))
err_return((*c)->err);
if (!configs || !configs[0]) {
free(configs);
err_return(UCI_ERR_NOTFOUND);
}
for (i = 0; configs[i]; i++) {
if (!(p = uci_lookup_package(*c, configs[i])))
continue;
rv = uc_uci_pkg_command_single(*c, cmd, p);
if (rv != UCI_OK)
res = rv;
}
free(configs);
}
if (res != UCI_OK)
err_return(res);
ok_return(ucv_boolean_new(true));
}
/**
* Save accumulated cursor changes to delta directory.
*
* The `save()` function writes consolidated changes made to in-memory copies of
* loaded configuration files to the uci delta directory which effectively makes
* them available to other processes using the same delta directory path as well
* as the `uci changes` cli command when using the default delta directory.
*
* Note that uci deltas are overlayed over the actual configuration file values
* so they're reflected by `get()`, `foreach()` etc. even if the underlying
* configuration files are not actually changed (yet). The delta records may be
* either permanently merged into the configuration by invoking `commit()` or
* reverted through `revert()` in order to restore the current state of the
* underlying configuration file.
*
* When the optional "config" parameter is omitted, delta records for all
* currently loaded configuration files are written.
*
* In case that neither sharing changes with other processes nor any revert
* functionality is required, changes may be committed directly using `commit()`
* instead, bypassing any delta record creation.
*
* Returns the `true` if operation completed successfully.
*
* Returns `null` on error, e.g. if the requested configuration was not loaded
* or when a file system error occurred.
*
* @function module:uci.cursor#save
*
* @param {string} [config]
* The name of the configuration file to save delta records for, e.g. `"system"`
* to store changes for `/etc/config/system`.
*
* @returns {?boolean}
*
* @example
* const ctx = cursor(…);
*
* ctx.set('wireless', '@wifi-iface[0]', 'disabled', '1');
* ctx.save('wireless');
*
* @see {@link module:uci.cursor#commit|commit()}
* @see {@link module:uci.cursor#revert|revert()}
*/
static uc_value_t *
uc_uci_save(uc_vm_t *vm, size_t nargs)
{
return uc_uci_pkg_command(vm, nargs, CMD_SAVE);
}
/**
* Update configuration files with accumulated cursor changes.
*
* The `commit()` function merges changes made to in-memory copies of loaded
* configuration files as well as existing delta records in the cursors
* configured delta directory and writes them back into the underlying
* configuration files, persistently committing changes to the file system.
*
* When the optional "config" parameter is omitted, all currently loaded
* configuration files with either present delta records or yet unsaved
* cursor changes are updated.
*
* Returns the `true` if operation completed successfully.
*
* Returns `null` on error, e.g. if the requested configuration was not loaded
* or when a file system error occurred.
*
* @function module:uci.cursor#commit
*
* @param {string} [config]
* The name of the configuration file to commit, e.g. `"system"` to update the
* `/etc/config/system` file.
*
* @returns {?boolean}
*
* @example
* const ctx = cursor(…);
*
* ctx.set('system', '@system[0]', 'hostname', 'example.org');
* ctx.commit('system');
*/
static uc_value_t *
uc_uci_commit(uc_vm_t *vm, size_t nargs)
{
return uc_uci_pkg_command(vm, nargs, CMD_COMMIT);
}
/**
* Revert accumulated cursor changes and associated delta records.
*
* The `revert()` function discards any changes made to in-memory copies of
* loaded configuration files and discards any related existing delta records in
* the cursors configured delta directory.
*
* When the optional "config" parameter is omitted, all currently loaded
* configuration files with either present delta records or yet unsaved
* cursor changes are reverted.
*
* Returns the `true` if operation completed successfully.
*
* Returns `null` on error, e.g. if the requested configuration was not loaded
* or when a file system error occurred.
*
* @function module:uci.cursor#revert
*
* @param {string} [config]
* The name of the configuration file to revert, e.g. `"system"` to discard any
* changes for the `/etc/config/system` file.
*
* @returns {?boolean}
*
* @example
* const ctx = cursor(…);
*
* ctx.set('system', '@system[0]', 'hostname', 'example.org');
* ctx.revert('system');
*
* @see {@link module:uci.cursor#save|save()}
*/
static uc_value_t *
uc_uci_revert(uc_vm_t *vm, size_t nargs)
{
return uc_uci_pkg_command(vm, nargs, CMD_REVERT);
}
static uc_value_t *
change_to_uval(uc_vm_t *vm, struct uci_delta *d)
{
const char *types[] = {
[UCI_CMD_REORDER] = "order",
[UCI_CMD_REMOVE] = "remove",
[UCI_CMD_RENAME] = "rename",
[UCI_CMD_ADD] = "add",
[UCI_CMD_LIST_ADD] = "list-add",
[UCI_CMD_LIST_DEL] = "list-del",
[UCI_CMD_CHANGE] = "set",
};
uc_value_t *a;
if (!d->section)
return NULL;
a = ucv_array_new(vm);
if (!a)
return NULL;
ucv_array_push(a, ucv_string_new(types[d->cmd]));
ucv_array_push(a, ucv_string_new(d->section));
if (d->e.name)
ucv_array_push(a, ucv_string_new(d->e.name));
if (d->value) {
if (d->cmd == UCI_CMD_REORDER)
ucv_array_push(a, ucv_int64_new(strtoul(d->value, NULL, 10)));
else
ucv_array_push(a, ucv_string_new(d->value));
}
return a;
}
static uc_value_t *
changes_to_uval(uc_vm_t *vm, struct uci_context *ctx, const char *package,
bool unload)
{
uc_value_t *a = NULL, *c;
struct uci_package *p = NULL;
struct uci_element *e;
uci_foreach_element(&ctx->root, e) {
if (strcmp(e->name, package))
continue;
p = uci_to_package(e);
}
if (!p)
uci_load(ctx, package, &p);
else
unload = false;
if (!p)
return NULL;
if (!uci_list_empty(&p->delta) || !uci_list_empty(&p->saved_delta)) {
a = ucv_array_new(vm);
if (!a)
err_return(UCI_ERR_MEM);
uci_foreach_element(&p->saved_delta, e) {
c = change_to_uval(vm, uci_to_delta(e));
if (c)
ucv_array_push(a, c);
}
uci_foreach_element(&p->delta, e) {
c = change_to_uval(vm, uci_to_delta(e));
if (c)
ucv_array_push(a, c);
}
}
if (unload)
uci_unload(ctx, p);
return a;
}
/**
* Enumerate pending changes.
*
* The `changes()` function returns a list of change records for currently
* loaded configuration files, originating both from the cursors associated
* delta directory and yet unsaved cursor changes.
*
* When the optional "config" parameter is specified, the requested
* configuration is implicitly loaded if it is not already loaded into the
* cursor.
*
* Returns a dictionary of change record arrays, keyed by configuration name.
*
* Returns `null` on error, e.g. if the requested configuration could not be
* loaded.
*
* @function module:uci.cursor#changes
*
* @param {string} [config]
* The name of the configuration file to enumerate changes for, e.g. `"system"`
* to query pending changes for the `/etc/config/system` file.
*
* @returns {?Object<string, module:uci.cursor.ChangeRecord[]>}
*
* @example
* const ctx = cursor(…);
*
* // Enumerate changes for all currently loaded configurations
* const deltas = ctx.changes();
*
* // Explicitly load and enumerate changes for the "system" configuration
* const deltas = ctx.changes('system');
*/
static uc_value_t *
uc_uci_changes(uc_vm_t *vm, size_t nargs)
{
struct uci_context **c = uc_fn_this("uci.cursor");
uc_value_t *conf = uc_fn_arg(0);
uc_value_t *res, *chg;
char **configs;
int rv, i;
if (conf && ucv_type(conf) != UC_STRING)
err_return(UCI_ERR_INVAL);
rv = uci_list_configs(*c, &configs);
if (rv != UCI_OK)
err_return(rv);
res = ucv_object_new(vm);
for (i = 0; configs[i]; i++) {
if (conf && strcmp(configs[i], ucv_string_get(conf)))
continue;
chg = changes_to_uval(vm, *c, configs[i], !conf);
if (chg)
ucv_object_add(res, configs[i], chg);
}
free(configs);
ok_return(res);
}
/**
* Iterate configuration sections.
*
* The `foreach()` function iterates all sections of the given configuration,
* optionally filtered by type, and invokes the given callback function for
* each encountered section.
*
* When the optional "type" parameter is specified, the callback is only invoked
* for sections of the given type, otherwise it is invoked for all sections.
*
* The requested configuration is implicitly loaded into the cursor.
*
* Returns `true` if the callback was executed successfully at least once.
*
* Returns `false` if the callback was never invoked, e.g. when the
* configuration is empty or contains no sections of the given type.
*
* Returns `null` on error, e.g. when an invalid callback was passed or the
* requested configuration not found.
*
* @function module:uci.cursor#foreach
*
* @param {string} config
* The configuration to iterate sections for, e.g. `"system"` to read the
* `/etc/config/system` file.
*
* @param {?string} type
* Invoke the callback only for sections of the specified type.
*
* @param {module:uci.cursor.SectionCallback} callback
* The callback to invoke for each section, will receive a section dictionary
* as sole argument.
*
* @returns {?boolean}
*
* @example
* const ctx = cursor(…);
*
* // Iterate all network interfaces
* ctx.foreach('network', 'interface',
* section => print(`Have interface ${section[".name"]}\n`));
*/
static uc_value_t *
uc_uci_foreach(uc_vm_t *vm, size_t nargs)
{
struct uci_context **c = uc_fn_this("uci.cursor");
uc_value_t *conf = uc_fn_arg(0);
uc_value_t *type = uc_fn_arg(1);
uc_value_t *func = uc_fn_arg(2);
uc_value_t *rv = NULL;
struct uci_package *p = NULL;
struct uci_element *e, *tmp;
struct uci_section *sc;
uc_exception_type_t ex;
bool stop = false;
bool ret = false;
int i = 0;
if (ucv_type(conf) != UC_STRING ||
(type && ucv_type(type) != UC_STRING))
err_return(UCI_ERR_INVAL);
uci_foreach_element(&(*c)->root, e) {
if (strcmp(e->name, ucv_string_get(conf)))
continue;
p = uci_to_package(e);
break;
}
if (!p && uci_load(*c, ucv_string_get(conf), &p))
err_return((*c)->err);
uci_foreach_element_safe(&p->sections, tmp, e) {
sc = uci_to_section(e);
i++;
if (type && strcmp(sc->type, ucv_string_get(type)))
continue;
uc_value_push(ucv_get(func));
uc_value_push(section_to_uval(vm, sc, i - 1));
ex = uc_call(1);
/* stop on exception in callback */
if (ex)
break;
ret = true;
rv = uc_value_pop();
stop = (ucv_type(rv) == UC_BOOLEAN && !ucv_boolean_get(rv));
ucv_put(rv);
if (stop)
break;
}
ok_return(ucv_boolean_new(ret));
}
/**
* Enumerate existing configurations.
*
* The `configs()` function yields an array of configuration files present in
* the cursors associated configuration directory, `/etc/config/` by default.
*
* Returns an array of configuration names on success.
*
* Returns `null` on error, e.g. due to filesystem errors.
*
* @function module:uci.cursor#configs
*
* @returns {?string[]}
*
* @example
* const ctx = cursor(…);
*
* // Enumerate all present configuration file names
* const configurations = ctx.configs();
*/
static uc_value_t *
uc_uci_configs(uc_vm_t *vm, size_t nargs)
{
struct uci_context **c = uc_fn_this("uci.cursor");
uc_value_t *a;
char **configs;
int i, rv;
rv = uci_list_configs(*c, &configs);
if (rv != UCI_OK)
err_return(rv);
a = ucv_array_new(vm);
for (i = 0; configs[i]; i++)
ucv_array_push(a, ucv_string_new(configs[i]));
free(configs);
ok_return(a);
}
static const uc_function_list_t cursor_fns[] = {
{ "load", uc_uci_load },
{ "unload", uc_uci_unload },
{ "get", uc_uci_get },
{ "get_all", uc_uci_get_all },
{ "get_first", uc_uci_get_first },
{ "add", uc_uci_add },
{ "set", uc_uci_set },
{ "rename", uc_uci_rename },
{ "save", uc_uci_save },
{ "delete", uc_uci_delete },
{ "commit", uc_uci_commit },
{ "revert", uc_uci_revert },
{ "reorder", uc_uci_reorder },
{ "changes", uc_uci_changes },
{ "foreach", uc_uci_foreach },
{ "configs", uc_uci_configs },
{ "error", uc_uci_error },
};
static const uc_function_list_t global_fns[] = {
{ "error", uc_uci_error },
{ "cursor", uc_uci_cursor },
};
static void close_uci(void *ud) {
uci_free_context((struct uci_context *)ud);
}
void uc_module_init(uc_vm_t *vm, uc_value_t *scope)
{
uc_function_list_register(scope, global_fns);
uc_type_declare(vm, "uci.cursor", cursor_fns, close_uci);
}