moteus

-- This service can be run as standalone application
-- or from FreeSWITCH using `luarun att_xfer_mon.lua`
--------------------------------------------------------

local EventService  = require "uv_event_service"
local Memcached     = require "lluv.memcached"

local service_name = 'att_xfer'

local service = EventService.new(service_name, { '127.0.0.1', '8021', 'ClueCon',

moteus

local Registry = {} do
Registry.__index = Registry

function Registry:new()
  return setmetatable({_r = {0}}, {__index = self})
end

function Registry:ref(value)
  local registry = self._r

moteus

local FS_DIR     = 'c:/FreeSWITCH'
local FUSION_DIR = 'c:/wamp/www/fusionpbx'
local NGINX_DIR  = 'c:/nginxwin'
local PHP_DIR    = NGINX_DIR .. '/php_5.4'
-- local PASSWORD   = '' -- password to pgsql (optional)
-- local BACKUP_DIR = '' -- target directory (default cwd)
-----------------------------------------------------------

local path            = require "path"
local date            = require "date"

moteus

-- to run test
-- * copy file to ${script_dir}\cache_perf.lua
-- * in some domain create varialble
--    category: test
--    subcategory: test
--    type: bool
--    value: false
-- * copy domain uuid to `domain_uuid` variable
-- * from fs_cli run `lua cache_perf.lua 1000`
--   (1000 is number of iteration)

moteus

local cURL = require  "cURL.safe"
local json = require  "cjson.safe"

-------------------------------------------------------------------
local MultiRequests = {} do
MultiRequests.__index = MultiRequests

function MultiRequests.new(...)
  local self = setmetatable({}, MultiRequests)
  return self:__init(...)

moteus

local printf = function(...) return print(string.format(...)) end

local function prequire(...)
  local ok, mod = pcall(require, ...)
  if ok then return mod end
  return nil, mod
end

local function iif(cond, val1, val2)
  if cond then return val1 end return val2 

moteus

local reallib
local fakelib
local machine
local extrasymbols = {}

local args = {...}
local errmsg
if args[1] then reallib = args[1] end
if args[2] then fakelib = args[2] end
if args[3] then machine = args[3] end

moteus

------------------------------------------------
-- Общие функции для работы с деревом         --
------------------------------------------------

local default_compare = function(lhs, rhs) return lhs == rhs end;
local default_char_set = {'0','1','2','3','4','5','6','7','8','9'};
local INVALID_VALUE_ALWAYS_NIL = {}

--Удаляет все пустые ветви в дереве
local pack_empty 

moteus

ELF

ELF Header

The first portion of any ELF file is the ELF header. This generally provides offsets to other headers (program headers and section headers) within an ELF.

typedef struct {
  unsigned char e_ident[EI_NIDENT];
 uint16_t e_type;

moteus

--- Service for FusionPBX to monitor on gateway status
-- and send email notification when gateway change its status.
--
-- Require FusionPBX 4.3 or higher
--
-- start: `fs_cli -x 'luarun gw_monitor.lua'`
-- stop: `fs_cli -x 'lua service gw_monitor stop'`
-- pid file: `${script_dir}/run/gw_monitor.pid`

local email        = 'mail@address'