You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
lua-ngcp-kamailio/ngcp/ngcp.lua

179 lines
5.2 KiB

--
-- Copyright 2013-2023 SipWise Team <development@sipwise.com>
--
-- This program is free software: you can redistribute it and/or modify
-- it under the terms of the GNU General Public License as published by
-- the Free Software Foundation, either version 3 of the License, or
-- (at your option) any later version.
--
-- This package 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 General Public License for more details.
--
-- You should have received a copy of the GNU General Public License
-- along with this program. If not, see <http://www.gnu.org/licenses/>.
-- .
-- On Debian systems, the complete text of the GNU General
-- Public License version 3 can be found in "/usr/share/common-licenses/GPL-3".
--
local NGCPXAvp = require 'ngcp.xavp'
local NGCPResellerPrefs = require 'ngcp.rep'
local NGCPContractPrefs = require 'ngcp.cp'
local NGCPProfilePrefs = require 'ngcp.pprof'
local NGCPPeerPrefs = require 'ngcp.pp'
local NGCPDomainPrefs = require 'ngcp.dp'
local NGCPUserPrefs = require 'ngcp.up'
local NGCPRealPrefs = require 'ngcp.rp'
local NGCPFaxPrefs = require 'ngcp.fp'
local NGCPConfig = require 'ngcp.config'
local utils = require 'ngcp.utils'
local utable = utils.table
-- class NGCP
local NGCP = utils.inheritsFrom()
-- luacheck: globals KSR
function NGCP:__tostring()
local output = ''
for _,v in pairs(self.prefs) do
output = output .. tostring(v)
end
return output
end
function NGCP:new(config)
local instance = NGCP:create()
instance:init(config)
return instance
end
function NGCP:init(config)
self.config = NGCPConfig:new(config)
self.prefs = {
dom = NGCPDomainPrefs:new(self.config),
prof = NGCPProfilePrefs:new(self.config),
usr = NGCPUserPrefs:new(self.config),
peer = NGCPPeerPrefs:new(self.config),
real = NGCPRealPrefs:new(self.config),
contract = NGCPContractPrefs:new(self.config),
reseller = NGCPResellerPrefs:new(self.config),
fax = NGCPFaxPrefs:new(self.config),
}
end
function NGCP:caller_reseller_load(id)
return self.prefs.reseller:caller_load(id)
end
function NGCP:callee_reseller_load(id)
return self.prefs.reseller:callee_load(id)
end
function NGCP:caller_contract_load(contract, ip)
local keys = self.prefs.contract:caller_load(contract, ip)
self.prefs.real:caller_contract_load(keys)
return keys
end
function NGCP:callee_contract_load(contract, ip)
local keys = self.prefs.contract:callee_load(contract, ip)
self.prefs.real:callee_contract_load(keys)
return keys
end
function NGCP:caller_peer_load(peer)
local keys = self.prefs.peer:caller_load(peer)
self.prefs.real:caller_peer_load(keys)
return keys
end
function NGCP:callee_peer_load(peer)
local keys = self.prefs.peer:callee_load(peer)
self.prefs.real:callee_peer_load(keys)
return keys
end
function NGCP:caller_usr_load(uuid, domain)
local keys = {
domain = self.prefs.dom:caller_load(domain),
prof = self.prefs.prof:caller_load(uuid),
user = self.prefs.usr:caller_load(uuid),
fax = self.prefs.fax:caller_load(uuid)
}
local unique_keys = utable.deepcopy(keys.domain)
utable.merge(unique_keys, keys.prof)
utable.merge(unique_keys, keys.user)
self.prefs.real:caller_usr_load(unique_keys)
NGCPXAvp:new('caller', 'dom')
return unique_keys
end
function NGCP:callee_usr_load(uuid, domain)
local keys = {
domain = self.prefs.dom:callee_load(domain),
prof = self.prefs.prof:callee_load(uuid),
user = self.prefs.usr:callee_load(uuid),
fax = self.prefs.fax:callee_load(uuid)
}
local unique_keys = utable.deepcopy(keys.domain)
utable.merge(unique_keys, keys.prof)
utable.merge(unique_keys, keys.user)
self.prefs.real:callee_usr_load(unique_keys)
return unique_keys
end
function NGCP:log_pref(level, vtype)
local xavp,xavp_log
local msg = "%s:%s\n"
if not level then
level = "dbg"
end
if not vtype then
for _,pref in pairs(self.prefs) do
xavp = pref:xavp("caller")
xavp_log = tostring(xavp)
KSR.log(level, msg:format(xavp.name, xavp_log))
xavp = pref:xavp("callee")
xavp_log = tostring(xavp)
KSR.log(level, msg:format(xavp.name, xavp_log))
end
else
if self.prefs[vtype] then
xavp = self.prefs[vtype]:xavp("caller")
xavp_log = tostring(xavp)
KSR.log(level, msg:format(xavp.name, xavp_log))
xavp = self.prefs[vtype]:xavp("callee")
xavp_log = tostring(xavp)
KSR.log(level, msg:format(xavp.name, xavp_log))
else
error(string.format("there is no prefs for %s", vtype))
end
end
end
function NGCP:clean(vtype, group)
if not group then
for _,v in pairs(self.prefs) do
v:clean(vtype)
end
else
if self.prefs[group] then
self.prefs[group]:clean(vtype)
else
error(string.format("unknown group:%s", group))
end
end
end
-- class
return NGCP