75 lines
1.8 KiB
Lua
75 lines
1.8 KiB
Lua
--onReport.lua
|
|
--author expwnent
|
|
--contains the "ON_REPORT" event: triggered when there is a new report in df.global.world.status.reports
|
|
|
|
--example
|
|
--local onReport = require 'onReport'
|
|
--onReport.triggers.someName = function (reportId)
|
|
-- --do stuff with that id
|
|
--end
|
|
|
|
local _ENV = mkmodule('onReport')
|
|
local utils = require 'utils'
|
|
local repeatUtil = require 'repeatUtil'
|
|
|
|
lastReport = lastReport or -1
|
|
triggers = triggers or {}
|
|
|
|
monitorFrequency = monitorFrequency or nil
|
|
eventToDwarf = eventToDwarf or {}
|
|
|
|
function updateEventToDwarf(reportId)
|
|
if not eventToDwarf[reportId] then
|
|
eventToDwarf[reportId] = {}
|
|
end
|
|
for _,unit in ipairs(df.global.world.units.all) do
|
|
for _,reportType in ipairs(unit.reports.log) do
|
|
for _,report in ipairs(reportType) do
|
|
if report == reportId then
|
|
eventToDwarf[reportId][unit.id] = true
|
|
end
|
|
end
|
|
end
|
|
end
|
|
end
|
|
|
|
function monitor()
|
|
local reports = df.global.world.status.reports
|
|
if df.global.world.status.next_report_id-1 <= lastReport then
|
|
return
|
|
end
|
|
-- if #reports == 0 or reports[#reports-1].id <= lastReport then
|
|
-- return
|
|
-- end
|
|
_,_,start = utils.binsearch(reports,lastReport,"id")
|
|
while start < #reports and reports[start].id <= lastReport do
|
|
start = start+1
|
|
end
|
|
for i=start,#reports-1,1 do
|
|
updateEventToDwarf(reports[i].id)
|
|
for _,callBack in pairs(triggers) do
|
|
callBack(reports[i].id)
|
|
end
|
|
lastReport = reports[i].id
|
|
end
|
|
end
|
|
|
|
monitorEvery = function(n)
|
|
if n <= 0 then
|
|
print('cannot monitor onReport every '..n..' ticks.')
|
|
return
|
|
end
|
|
if monitorFrequency and monitorFrequency < n then
|
|
print('NOT decreasing frequency of onReport monitoring from every '..monitorFrequency..' ticks to every '..n..' ticks')
|
|
return
|
|
end
|
|
print('monitor onReport every '..n..' ticks')
|
|
monitorFrequency = n
|
|
repeatUtil.scheduleEvery('onReportMonitoring', n, 'ticks', monitor)
|
|
end
|
|
|
|
monitorEvery(1)
|
|
|
|
return _ENV
|
|
|