<commit_before>--[[
LuCI - UCI mpdel

Description:
Generalized UCI model

FileId:
$Id$

License:
Copyright 2008 <NAME> <<EMAIL>>

Licensed under the Apache License, Version 2.0 (the "License");
you may not use this file except in compliance with the License.
You may obtain a copy of the License at 

	http://www.apache.org/licenses/LICENSE-2.0 

Unless required by applicable law or agreed to in writing, software
distributed under the License is distributed on an "AS IS" BASIS,
WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
See the License for the specific language governing permissions and
limitations under the License.

]]--
local uci  = require("uci")
local util = require("luci.util")
local setmetatable, rawget, rawset = setmetatable, rawget, rawset
local error, pairs, ipairs, tostring = error, pairs, ipairs, tostring
local table = table

--- LuCI UCI model library.
module("luci.model.uci", function(m) setmetatable(m, {__index = uci}) end)

savedir_default = "/tmp/.uci"
confdir_default = "/etc/config"

savedir_state = "/var/state"

--- Delete all sections of a given type that match certain criteria.
-- @param config		UCI config
-- @param type			UCI section type
-- @param comparator	Function that will be called for each section and
-- returns a boolean whether to delete the current section (optional)
function delete_all(config, type, comparator)
	local del = {}
	local function helper (section)
			if not comparator or comparator(section) then
				table.insert(del, section[".name"])
			end
	end
	
	foreach(config, type, helper)
	
	for i, j in ipairs(del) do
		delete(config, j)
	end
end

--- Create a new section and initialize it with data.
-- @param config	UCI config
-- @param type		UCI section type
-- @param name		UCI section name (optional)
-- @param values	Table of key - value pairs to initialize the section with
-- @return			Name of created section
function section(config, type, name, values)
	local stat = true
	if name then
		stat = set(config, name, type)
	else
		name = add(config, type)
		stat = name and true
	end
	
	if stat and values then
		stat = tset(config, name, values)
	end
	
	return stat and name
end

--- Savely load the configuration.
-- @param config	Configuration to load
-- @return			Sucess status
-- @see				load_state
-- @see				load
function load_config(...)
	set_confdir(confdir_default)
	set_savedir(savedir_default)
	return load(...)
end

--- Savely load state values.
-- @param config	Configuration to load
-- @return			Sucess status
-- @see				load_config
-- @see				load
function load_state(config)
	set_confdir(confdir_default)
	set_savedir(savedir_state)
	return load(config)
end

--- Save changes to config values.
-- @param config	Configuration to save
-- @return			Sucess status
-- @see				save_state
-- @see				save
function save_config(config)
	set_savedir(savedir_default)
	return save(config)
end

--- Save changes to state values.
-- @param config	Configuration to save
-- @return			Sucess status
-- @see				save_config
-- @see				save
function save_state(config)
	set_savedir(savedir_state)
	return save(config)
end

--- Updated the data of a section using data from a table.
-- @param config	UCI config
-- @param section	UCI section name (optional)
-- @param values	Table of key - value pairs to update the section with
function tset(config, section, values)
	local stat = true
	for k, v in pairs(values) do
		if k:sub(1, 1) ~= "." then
			stat = stat and set(config, section, k, v)
		end
	end
	return stat
end


--- Add an anonymous section.
-- @class function
-- @name add
-- @param config	UCI config
-- @param type		UCI section type
-- @return			Name of created section

--- Get a table of unsaved changes.
-- @class function
-- @name changes
-- @param config	UCI config
-- @return			Table of changes

--- Commit unsaved changes.
-- @class function<commit_msg>* libs/luci:	implement get_list() and set_list() wrappers in luci.model.uci<commit_after>--[[
LuCI - UCI mpdel

Description:
Generalized UCI model

FileId:
$Id$

License:
Copyright 2008 <NAME> <<EMAIL>>

Licensed under the Apache License, Version 2.0 (the "License");
you may not use this file except in compliance with the License.
You may obtain a copy of the License at

	http://www.apache.org/licenses/LICENSE-2.0

Unless required by applicable law or agreed to in writing, software
distributed under the License is distributed on an "AS IS" BASIS,
WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
See the License for the specific language governing permissions and
limitations under the License.

]]--
local uci  = require("uci")
local util = require("luci.util")
local setmetatable, rawget, rawset = setmetatable, rawget, rawset
local error, pairs, ipairs, tostring = error, pairs, ipairs, tostring
local table = table

--- LuCI UCI model library.
module("luci.model.uci", function(m) setmetatable(m, {__index = uci}) end)

savedir_default = "/tmp/.uci"
confdir_default = "/etc/config"

savedir_state = "/var/state"

--- Delete all sections of a given type that match certain criteria.
-- @param config		UCI config
-- @param type			UCI section type
-- @param comparator	Function that will be called for each section and
-- returns a boolean whether to delete the current section (optional)
function delete_all(config, type, comparator)
	local del = {}
	local function helper (section)
			if not comparator or comparator(section) then
				table.insert(del, section[".name"])
			end
	end

	foreach(config, type, helper)

	for i, j in ipairs(del) do
		delete(config, j)
	end
end

--- Create a new section and initialize it with data.
-- @param config	UCI config
-- @param type		UCI section type
-- @param name		UCI section name (optional)
-- @param values	Table of key - value pairs to initialize the section with
-- @return			Name of created section
function section(config, type, name, values)
	local stat = true
	if name then
		stat = set(config, name, type)
	else
		name = add(config, type)
		stat = name and true
	end

	if stat and values then
		stat = tset(config, name, values)
	end

	return stat and name
end

--- Savely load the configuration.
-- @param config	Configuration to load
-- @return			Sucess status
-- @see				load_state
-- @see				load
function load_config(...)
	set_confdir(confdir_default)
	set_savedir(savedir_default)
	return load(...)
end

--- Savely load state values.
-- @param config	Configuration to load
-- @return			Sucess status
-- @see				load_config
-- @see				load
function load_state(config)
	set_confdir(confdir_default)
	set_savedir(savedir_state)
	return load(config)
end

--- Save changes to config values.
-- @param config	Configuration to save
-- @return			Sucess status
-- @see				save_state
-- @see				save
function save_config(config)
	set_savedir(savedir_default)
	return save(config)
end

--- Save changes to state values.
-- @param config	Configuration to save
-- @return			Sucess status
-- @see				save_config
-- @see				save
function save_state(config)
	set_savedir(savedir_state)
	return save(config)
end

--- Updated the data of a section using data from a table.
-- @param config	UCI config
-- @param section	UCI section name (optional)
-- @param values	Table of key - value pairs to update the section with
function tset(config, section, values)
	local stat = true
	for k, v in pairs(values) do
		if k:sub(1, 1) ~= "." then
			stat = stat and set(config, section, k, v)
		end
	end
	return stat
end

--- Get an option or list and return values as table.
-- @param config	UCI config
-- @param section	UCI section name
-- @param option	UCI option
-- @return			UCI value
function get_list(config, section, option)
	if config and section and option then
		local val = get(config, section, option)
		return ( type(val) == "table" and val or { val } )
	end
	return nil
end

--- Set given values as list.
-- Warning: This function is unsave! You should use save_config or save_state if possible.
-- @param config	UCI config
-- @param section	UCI section name
-- @param option	UCI option
-- @param value		UCI value
-- @return			Boolean whether operation succeeded
function set_list(config, section, option, value)
	if config and section and option then
		return set(
			config, section, option,
			( type(value) == "table" and value or { value } )
		)
	end
	return false
end


--- Add an anonymous section.
-- @class function
-- @name add
-- @param config	UCI config
-- @param type		UCI section type
-- @return			Name of created section

--- Get a table of unsaved changes.
-- @class function
-- @name changes
-- @param config	UCI config
-- @return			Table of changes

--- Commit unsaved changes.
-- @class function
{'fraction_non_alphanumeric': 0.09685621821544152, 'fraction_numerical': 0.002311604253351826, 'mean_word_length': 3.5494216614090432, 'pattern_counts': {'":': 0, '<': 9, '<?xml version=': 0, '>': 9, 'https://': 0, 'lorem ipsum': 0, 'www.': 2, 'xml': 0}, 'pii_count': 0, 'substrings_counts': 0, 'word_list_counts': {'cursed_substrings.json': 0, 'profanity_word_list.json': 0, 'sexual_word_list.json': 0, 'zh_pornsignals.json': 0}}
{'dir': 'git-commits-cleaned', 'id': '1658484', 'n_tokens_mistral': 2778, 'n_tokens_neox': 2641, 'n_words': 1101}