summaryrefslogtreecommitdiff
path: root/misc/freeswitch/scripts/dialplan/call_parking.lua
blob: cc2cf4bc1e324c562bdc73e47c9eab328e55ca40 (plain)
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
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
-- Gemeinschaft 5 module: call parking class
-- (c) AMOOMA GmbH 2013
-- 

module(...,package.seeall)

PARKING_STALL_FORMAT = '[0-9A-Z_%+%-]+';
UUID_FORMAT = '[0-9a-f%-]+';

CallParking = {}

-- create acd object
function CallParking.new(self, arg)
  arg = arg or {}
  object = arg.object or {}
  setmetatable(object, self);
  self.__index = self;
  self.class = 'parkingstall';
  self.log = arg.log;
  self.database = arg.database;
  self.lot = arg.lot or 'default';
  self.caller = arg.caller;
  return object;
end


function CallParking.find_by_name(self, name)
  local sql_query = 'SELECT * FROM `parking_stalls` WHERE `name`= '.. self.database:escape(name, '"') .. ' LIMIT 1';
  local parking_stall = nil;

  self.database:query(sql_query, function(entry)
    parking_stall = CallParking:new(self);
    parking_stall.record = entry;
    parking_stall.id = tonumber(entry.id);
    parking_stall.name = entry.name;
  end)

  return parking_stall;
end


function CallParking.list_occupied(self, lot)
  lot = lot or self.lot;

  require 'common.fapi'
  local valet_info = common.fapi.FApi:new{ log = self.log }:execute('valet_info', lot);

  local parking_stalls = {};
  tostring(valet_info):gsub('<extension uuid="(' .. UUID_FORMAT .. ')">(' .. PARKING_STALL_FORMAT .. ')</extension>', function(channel_uuid, parking_stall)
    parking_stalls[parking_stall] = channel_uuid;
  end);

  return parking_stalls;
end


function CallParking.occupied(self)
  local occupied_stalls = self:list_occupied();
  if occupied_stalls then
    return occupied_stalls[self.name];
  end
end


function CallParking.park_retrieve(self)
  self.caller:execute("valet_park",  self.lot .. ' ' .. self.name);
end


function CallParking.park(self)
  if self:occupied() then
    return false;
  end
  self.caller:execute("valet_park",  self.lot .. ' ' .. self.name);
end


function CallParking.retrieve(self)
  if not self:occupied() then
    return false;
  end
  self.caller:execute("valet_park",  self.lot .. ' ' .. self.name);
end