Planning out debugManager

integration/debugManager/init.lua

@@ -3,17 +3,55 @@ local multi, thread = require("multi"):init()
 multi.defaultSettings.debugging = true
 
 local dbg = {}
+dbg.__index = dbg
+dbg.processors = {}
 
-local creation_hook
+-- Hooks to all on object created events!
+local c_cache = {}
+local d_cache = {}
+
+local proc = multi:newProcessor("Debug_Processor").Start()
+
+dbg.OnObjectCreated = function(obj, process)
+    if c_cache[obj] then
+        return false
+    else
+        c_cache[obj] = true
+        proc:newTask(function()
+            c_cache[obj] = false
+        end)
+        return true
+    end
+end .. multi:newConnection()
+
+dbg.OnObjectDestroyed = function(obj, process)
+    if d_cache[obj] then
+        return false
+    else
+        d_cache[obj] = true
+        proc:newTask(function()
+            d_cache[obj] = false
+        end)
+        return true
+    end
+end .. multi:newConnection()
+
+local creation_hook, destruction_hook
 local types
+local processes = {}
 
 creation_hook = function(obj, process)
-    local types = multi:getTypes()
-    print("Created: ",obj.Type, "in", process.Type, process:getFullName())
-    if obj.Type == multi.PROCESS then
+    types = multi:getTypes()
+    if obj.Type == multi.PROCESS and not dbg.processors[obj] then
         obj.OnObjectCreated(creation_hook)
+        obj.OnObjectDestroyed(destruction_hook)
+        dbg.processors[obj] = {}
     end
-    
+    dbg.OnObjectCreated:Fire(obj, process)
+end
+
+destruction_hook = function(obj, process)
+    dbg.OnObjectDestroyed:Fire(obj, process)
 end
 
 local debug_stats = {}
@@ -21,24 +59,8 @@ local debug_stats = {}
 local tmulti = multi:getThreadManagerProcess()
 multi.OnObjectCreated(creation_hook)
 tmulti.OnObjectCreated(creation_hook)
+multi.OnObjectDestroyed(destroction_hook)
+tmulti.OnObjectDestroyed(destroction_hook)
 
-multi
-
---[[
-    multi.ROOTPROCESS		= "rootprocess"
-    multi.CONNECTOR			= "connector"
-    multi.TIMEMASTER		= "timemaster"
-    multi.PROCESS			= "process"
-    multi.TIMER				= "timer"
-    multi.EVENT				= "event"
-    multi.UPDATER			= "updater"
-    multi.ALARM				= "alarm"
-    multi.LOOP				= "loop"
-    multi.TLOOP				= "tloop"
-    multi.STEP				= "step"
-    multi.TSTEP				= "tstep"
-    multi.THREAD			= "thread"
-    multi.SERVICE			= "service"
-    multi.PROXY 			= "proxy"
-    multi.THREADEDFUNCTION	= "threaded_function"
-]]
+-- We write to a debug interface in the multi namespace
+multi.debugging = dbg