Matches one pattern per plugin only. do_lex msg as param.

bot/bot.lua

@@ -2,22 +2,20 @@ require("./bot/utils")
 
 VERSION = '0.9.5'
 
+-- This function is called when tg receive a msg
 function on_msg_receive (msg)
-  vardump(msg)
+  -- vardump(msg)
-
+  if msg_valid(msg) then
-  if msg_valid(msg) == false then
+    msg = pre_process_msg(msg)
-    return
+    match_plugins(msg)
   end
-
-  do_action(msg)
 end
 
 function ok_cb(extra, success, result)
 end
 
-function on_binlog_replay_end ()
+function on_binlog_replay_end()
   started = 1
-  -- Uncomment the line to enable cron plugins.
   postpone (cron_plugins, false, 60*5.0)
   -- See plugins/ping.lua as an example for cron
 
@@ -42,67 +40,82 @@ function msg_valid(msg)
     print("Not valid, readed")
     return false
   end
+  return true
 end
 
-function do_lex(msg, text)
+
+function do_lex(msg)
   -- Plugins which implements lex.
-  for name, desc in pairs(plugins) do
+  for name, plugin in pairs(plugins) do
-    if (desc.lex ~= nil) then
+    if plugin.lex ~= nil then
-      result = desc.lex(msg, text)
+      msg = plugin.lex(msg)
-      if (result ~= nil) then
-        print ("Mutating to " .. result)
-        text = result
-      end
     end
   end
-  return text
+
+  return msg
 end
 
--- Where magic happens
+-- Go over enabled plugins patterns.
-function do_action(msg)
+function match_plugins(msg)
-  local receiver = get_receiver(msg)
+  for name, plugin in pairs(plugins) do
-  local text = msg.text
+    match_plugin(plugin, msg)
-
-  if text == nil then
-    -- Not a text message, make text the same as what tg shows so
-    -- we can match on it. Maybe a plugin activated my media type.
-    if msg.media ~= nil then
-      text = '['..msg.media.type..']'
-    end
   end
+end
 
-  -- We can't do anything
+function match_plugin(plugin, msg)
-  if msg.text == nil then return false end
+  local receiver = get_receiver(msg)
 
-  msg.text = do_lex(msg, text)
+  -- Go over patterns. If one matches is enought.
-
+  for k, pattern in pairs(plugin.patterns) do
-  for name, desc in pairs(plugins) do
+    -- print(msg.text, pattern)
-    -- print("Trying module", name)
+    matches = { string.match(msg.text, pattern) }
-    for k, pattern in pairs(desc.patterns) do
+    if matches[1] then
-      -- print("Trying", text, "against", pattern)
+      mark_read(receiver, ok_cb, false)
-      matches = { string.match(text, pattern) }
+      print("  matches", pattern)
-      if matches[1] then
+      -- Function exists
-        mark_read(receiver, ok_cb, false)
+      if plugin.run ~= nil then
-        print("  matches", pattern)
+        -- If plugin is for privileged users only
-        if desc.run ~= nil then
+        if not user_allowed(plugin, msg) then
-          -- If plugin is for privileged user
+          local text = 'This plugin requires privileged user'
-          if desc.privileged and not is_sudo(msg) then
+          send_msg(receiver, text, ok_cb, false)
-            local text = 'This plugin requires privileged user'
+        else
-            send_msg(receiver, text, ok_cb, false)
+          -- Send the returned text by run function.
-          else 
+          result = plugin.run(msg, matches)
-            result = desc.run(msg, matches)
+          if result ~= nil then
-            -- print("  sending", result)
+            _send_msg(receiver, result)
-            if (result) then
-              result = do_lex(msg, result)
-              _send_msg(receiver, result)
-            end
           end
         end
       end
+      -- One matches
+      return
     end
   end
 end
 
+-- Check if user can use the plugin
+function user_allowed(plugin, msg)
+  if plugin.privileged and not is_sudo(msg) then
+    return false
+  end
+  return true
+end
+
+--Apply lex and other text.
+function pre_process_msg(msg)
+
+  if msg.text == nil then
+    -- Not a text message, make text the same as what tg shows so
+    -- we can match on it. Maybe a plugin activated my media type.
+    if msg.media ~= nil then
+      msg.text = '['..msg.media.type..']'
+    end
+  end
+
+  msg = do_lex(msg)
+
+  return msg
+end
+
 -- If text is longer than 4096 chars, send multiple msg.
 -- https://core.telegram.org/method/messages.sendMessage
 function _send_msg( destination, text)
@@ -125,7 +138,8 @@ function save_config( )
   print ('saved config into ./data/config.lua')
 end
 
-
+-- Returns the config from config.lua file.
+-- If file doesnt exists, create it.
 function load_config( )
   local f = io.open('./data/config.lua', "r")
   -- If config.lua doesnt exists
@@ -197,18 +211,18 @@ end
 function load_plugins()
   for k, v in pairs(_config.enabled_plugins) do
     print("Loading plugin", v)
-    t = loadfile("plugins/"..v..'.lua')()
+    local t = loadfile("plugins/"..v..'.lua')()
     table.insert(plugins, t)
   end
 end
 
--- Cron all the enabled plugins
+-- Call and postpone execution for cron plugins
 function cron_plugins()
 
-  for name, desc in pairs(plugins) do
+  for name, plugin in pairs(plugins) do
-    if desc.cron ~= nil then
+    -- Only plugins with cron function
-      print(desc.description)
+    if plugin.cron ~= nil then
-      desc.cron()
+      plugin.cron()
     end
   end