applications/luci-pbx/luasrc/model/cbi/pbx.lua

   1 --[[
   2     Copyright 2011 Iordan Iordanov <iiordanov (AT) gmail.com>
   3
   4     This file is part of luci-pbx.
   5
   6     luci-pbx is free software: you can redistribute it and/or modify
   7     it under the terms of the GNU General Public License as published by
   8     the Free Software Foundation, either version 3 of the License, or
   9     (at your option) any later version.
  10
  11     luci-pbx is distributed in the hope that it will be useful,
  12     but WITHOUT ANY WARRANTY; without even the implied warranty of
  13     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14     GNU General Public License for more details.
  15
  16     You should have received a copy of the GNU General Public License
  17     along with luci-pbx.  If not, see <http://www.gnu.org/licenses/>.
  18 ]]--
  19
  20 modulename = "pbx"
  21
  22 if     nixio.fs.access("/etc/init.d/asterisk")   then
  23    server = "asterisk"
  24 elseif nixio.fs.access("/etc/init.d/freeswitch") then
  25    server = "freeswitch"
  26 else
  27    server = ""
  28 end
  29
  30 -- My implementation of the function which splits a string into tokens
  31 -- at the specified separator and returns a table containing the tokens.
  32 function mysplit(inputstr, sep)
  33         if sep == nil then
  34                 sep = "%s"
  35         end
  36         t={} ; i=1
  37         for str in string.gmatch(inputstr, "([^"..sep.."]+)") do
  38                 t[i] = str
  39                 i = i + 1
  40         end
  41         return t
  42 end
  43
  44 -- Returns formatted output of string containing only the words at the indices
  45 -- specified in the table "indices".
  46 function format_indices(string, indices)
  47    if indices == nil then
  48       return "Error: No indices to format specified.\n"
  49    end
  50
  51    -- Split input into separate lines.
  52    lines = {}
  53    lines = mysplit(string, "\n")
  54
  55    -- Split lines into separate words.
  56    splitlines = {}
  57    for lpos,line in ipairs(lines) do
  58       splitlines[lpos] = mysplit(line)
  59    end
  60
  61    -- For each split line, if the word at all indices specified
  62    -- to be formatted are not null, add the formatted line to the
  63    -- gathered output.
  64    output = ""
  65    for lpos,splitline in ipairs(splitlines) do
  66       loutput = ""
  67       for ipos,index in ipairs(indices) do
  68          if splitline[index] ~= nil then
  69             loutput = loutput .. string.format("%-50s", splitline[index])
  70          else
  71             loutput = nil
  72             break
  73          end
  74       end
  75
  76       if loutput ~= nil then
  77          output = output .. loutput .. "\n"
  78       end
  79    end
  80    return output
  81 end
  82
  83
  84 m = Map (modulename, translate("PBX Main Page"),
  85  translate("This configuration page allows you to configure a phone system (PBX) service which\
  86       permits making phone calls through multiple Google and SIP (like Sipgate,\
  87       SipSorcery, and Betamax) accounts and sharing them among many SIP devices. \
  88       Note that Google accounts, SIP accounts, and local user accounts are configured in the \
  89       \"Google Accounts\", \"SIP Accounts\", and \"User Accounts\" sub-sections. \
  90       You must add at least one User Account to this PBX, and then configure a SIP device or \
  91       softphone to use the account, in order to make and receive calls with your Google/SIP \
  92       accounts. Configuring multiple users will allow you to make free calls between all users,\
  93       and share the configured Google and SIP accounts. If you have more than one Google and SIP \
  94       accounts set up, you should probably configure how calls to and from them are routed in \
  95       the \"Call Routing\" page. If you're interested in using your own PBX from anywhere in the\
  96       world, then visit the \"Remote Usage\" section in the \"Advanced Settings\" page."))
  97
  98 -----------------------------------------------------------------------------------------
  99 s = m:section(NamedSection, "connection_status", "main",
 100               translate("Service Control and Connection Status"))
 101 s.anonymous = true
 102
 103 s:option (DummyValue, "status", translate("Service Status"))
 104
 105 sts = s:option(DummyValue, "_sts")
 106 sts.template = "cbi/tvalue"
 107 sts.rows = 20
 108
 109 function sts.cfgvalue(self, section)
 110
 111    if server == "asterisk" then
 112       regs = luci.sys.exec("asterisk -rx 'sip show registry' | sed 's/peer-//'")
 113       jabs = luci.sys.exec("asterisk -rx 'jabber show connections' | grep onnected")
 114       usrs = luci.sys.exec("asterisk -rx 'sip show users'")
 115       chan = luci.sys.exec("asterisk -rx 'core show channels'")
 116
 117       return format_indices(regs, {1, 5}) ..
 118              format_indices(jabs, {2, 4}) .. "\n" ..
 119              format_indices(usrs, {1}   ) .. "\n" .. chan
 120
 121    elseif server == "freeswitch" then
 122       return "Freeswitch is not supported yet.\n"
 123    else
 124       return "Neither Asterisk nor FreeSwitch discovered, please install Asterisk, as Freeswitch is not supported yet.\n"
 125    end
 126 end
 127
 128 return m