1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
|
-- Gemeinschaft 5 module: routing table functions
-- (c) AMOOMA GmbH 2012
--
module(...,package.seeall)
function expand_variables(line, variables_list)
variables_list = variables_list or {};
return (line:gsub('{([%a%d_]+)}', function(captured)
return variables_list[captured] or '';
end))
end
function match_route(entry, search_str, variables_list)
if not entry or not search_str then
return { error = 'No input values' };
end
local result = nil;
local success = nil;
success, result = pcall(string.find, search_str, entry[1]);
if not success then
return { error = result, line = line }
elseif result then
local route = {
pattern = entry[1],
value = search_str:gsub(entry[1], expand_variables(entry[#entry], variables_list)),
}
for index = 2, #entry-1 do
local attribute = entry[index]:match('^(.-)%s*=');
if attribute then
route[attribute] = entry[index]:match('=%s*(.-)$');
end
end
return route;
end
return {};
end
function match_caller_id(entry, search_str, variables_list)
if not entry or not search_str then
return { error = 'No input values' };
end
local result = nil;
local success = nil;
success, result = pcall(string.find, search_str, entry[1]);
if not success then
return { error = result, line = line }
elseif result then
return {
value = search_str:gsub(entry[1], expand_variables(entry[4], variables_list)),
class = entry[2],
endpoint = entry[3],
pattern = entry[1],
}
end
return {};
end
|
