This is the initial release of luci-pbx as submitted to the mailing list.

[project/luci.git] / applications / luci-pbx / luasrc / model / cbi / pbx.lua

diff --git a/applications/luci-pbx/luasrc/model/cbi/pbx.lua b/applications/luci-pbx/luasrc/model/cbi/pbx.lua
new file mode 100644 (file)
index 0000000..f73930e
--- /dev/null
+++ b/applications/luci-pbx/luasrc/model/cbi/pbx.lua
@@ -0,0 +1,116 @@
+--[[
+    Copyright 2011 Iordan Iordanov <iiordanov (AT) gmail.com>
+
+    This file is part of luci-pbx.
+
+    luci-pbx is free software: you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation, either version 3 of the License, or
+    (at your option) any later version.
+
+    luci-pbx is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with luci-pbx.  If not, see <http://www.gnu.org/licenses/>.
+]]--
+
+if     nixio.fs.access("/etc/init.d/asterisk")   then
+   server = "asterisk"
+elseif nixio.fs.access("/etc/init.d/freeswitch") then
+   server = "freeswitch"
+else
+   server = ""
+end
+
+modulename = "pbx"
+
+function mysplit(inputstr, sep)
+        if sep == nil then
+                sep = "%s"
+        end
+        t={} ; i=1
+        for str in string.gmatch(inputstr, "([^"..sep.."]+)") do
+                t[i] = str
+                i = i + 1
+        end
+        return t
+end
+
+function format_two_indices(string, ind1, ind2)
+       lines=mysplit(string, "\n")
+
+       words={}
+       for index,value in ipairs(lines) do
+               words[index]=mysplit(value)
+       end
+
+       output = ""
+       for index,value in ipairs(words) do
+               if value[ind1] ~= nil and value[ind2] ~= nil then
+                       output = output .. string.format("%-40s \t %-20s\n", value[ind1], value[ind2])
+               end
+       end
+       return output
+end
+
+function format_one_index(string, ind1)
+       lines=mysplit(string, "\n")
+
+       words={}
+       for index,value in ipairs(lines) do
+               words[index]=mysplit(value)
+       end
+
+       output = ""
+       for index,value in ipairs(words) do
+               if value[ind1] ~= nil then
+                       output = output .. string.format("%-40s\n", value[ind1])
+               end
+       end
+       return output
+end
+
+m = Map (modulename, translate("PBX Main Page"),
+        translate("This configuration page allows you to configure a phone system (PBX) service which\
+                  permits making phone calls with, and sharing multiple Google and SIP (like Sipgate,\
+                   SipSorcery, and Betamax) accounts among many SIP devices. Note that Google\
+                  accounts, SIP accounts, and local user accounts are configured in the\
+                  \"Google Accounts\", \"SIP Accounts\", and \"User Accounts\" sub-sections.\
+      You must configure at least one local SIP account\
+      on this PBX, to make and receive calls with your Google/SIP accounts.\
+      Configuring multiple users will allow you to make free calls between users, and share the configured\
+      Google and SIP accounts. If you have more than one Google and SIP accounts set up,\
+      you should probably configure how calls to and from them are routed in the \"Call Routing\" page.\
+      If you're interested in using your own PBX from anywhere in the world,\
+      then visit the \"Remote Usage\" section in the \"Advanced Settings\" page."))
+
+----------------------------------------------------------------------------------------------------
+s = m:section(NamedSection, "connection_status", "main", translate("Service Control and Connection Status"))
+s.anonymous = true
+
+s:option (DummyValue, "status", translate("Service Status"))
+
+sts = s:option(DummyValue, "_sts") 
+sts.template = "cbi/tvalue"
+sts.rows = 20
+
+function sts.cfgvalue(self, section)
+
+   if server == "asterisk" then
+      reg  = luci.sys.exec("asterisk -rx 'sip show registry' | sed 's/peer-//'")
+      jab  = luci.sys.exec("asterisk -rx 'jabber show connections' | grep onnected")
+      usrs = luci.sys.exec("asterisk -rx 'sip show users'")
+      chan = luci.sys.exec("asterisk -rx 'core show channels'")
+      return format_two_indices(reg, 1, 5) .. format_two_indices(jab, 2, 4) .. "\n" 
+             .. format_one_index(usrs,1) .. "\n" .. chan
+   elseif server == "freeswitch" then
+      return "Freeswitch is not supported yet.\n"
+   else
+      return "Neither Asterisk nor FreeSwitch discovered, please install Asterisk, as Freeswitch is not supported yet.\n"
+   end
+end
+
+return m