moteus

%module freeswitch

%{
#include "freeswitch_lua.h"
%}

%typemap(in, checkfn = "lua_isfunction") SWIGLUA_FN {
  $1.L = L;
  $1.idx = $input;
}

moteus

-- Radio Station listening for Freeswitch

-- File containing stations. Modify location as needed
--
-- file format like
-- # Radiostation name
-- <ID>=<url>
--
STATIONS_FILE = [[c:\FreeSWITCH\scripts\radiostations.txt]]

moteus

local Database = require "resources.functions.database"
local log = require "resources.functions.log".call_block
require "resources.functions.split"

local api = freeswitch.API()

if not session:ready() then return end

local domain_name      = session:getVariable("domain_name")

moteus

<?xml version="1.0"?>
<document type="freeswitch/xml">

  <X-PRE-PROCESS cmd="set" data="local_address=192.168.123.58"/>
  <X-PRE-PROCESS cmd="set" data="local_port=5064"/>
  <X-PRE-PROCESS cmd="set" data="domain_name=$${local_address}"/>
  <X-PRE-PROCESS cmd="set" data="external_address=$${local_address}"/>
  <X-PRE-PROCESS cmd="set" data="external_port=5088"/>

  <section name="configuration">

moteus

local Database        = require "resources.functions.database"
local route_to_bridge = require "resources.functions.route_to_bridge"
local json            = require "resources.functions.lunajson"

local function decode_value(v)
	return (string.gsub(v, [[\u00(%x%x)]], {
		['22'] = '"';
		['27'] = "'";
		['26'] = "&";
		['3C'] = "<"; ['3c'] = "<";

moteus

--! @usage
-- forward incoming message to some extension
-- <action application="lua" data="sms_forward.lua '${from}' '100@my.domain.com'" />

local function escape(s)
  s = string.gsub(s, '\\', '\\\\')
  s = string.gsub(s, '|', '\\|')
  return s
end

moteus

-- API command to fix ALPHANUMERIC source numbers received from mod_gsmopen
-- Usage: <action application="set" data="from=${lua(sms_bcd2gsm.lua ${from})}" />
-- !! Do not forget that for resending uses not `from` header but `from_full`.
--
-- https://github.com/moteus/lua-tpdu
--

assert(stream, 'this is API command')

local tut      = require "tpdu.utils"

moteus

local uv = require "lluv"
uv.rs232 = require "lluv.rs232"

local sockets = {}

local port = uv.rs232('COM4',{
  baud         = '_9600';
  data_bits    = '_8';
  parity       = 'NONE';
  stop_bits    = '_1';

moteus

local curl = require "cURL"
local lom  = require "lxp.lom"

local GISMETEO_CODES = {
  ['7495'] = '27612_1';
  ['7496'] = '27612_1';
  ['7499'] = '27612_1';
}

local gismeteo_base_url = "http://informer.gismeteo.ru/xml/"

moteus

-- socket = require "pgmoon.lluv".Socket.new()

local ut      = require "lluv.utils"
local socket  = require "lluv.luasocket"
local flatten = require("pgmoon.util").flatten

local function Super(class)
  return function(self, m, ...)
    if class.__base and class.__base[m] then
      return class.__base[m](self, ...)