-- Forces an event (wrapper for modtools/force)
--[====[

force
=====
A simpler wrapper around the `modtools/force` script.

Usage:

- ``force event_type``
- ``force event_type civ_id`` - civ ID required for ``Diplomat`` and ``Caravan``
  events

See `modtools/force` for a complete list of event types.

]====]

local utils = require 'utils'
local args = {...}
if #args < 1 then qerror('missing event type') end
if args[1]:find('help') then
    return print(dfhack.script_help())
end
local eventType = nil
for _, type in ipairs(df.timed_event_type) do
    if type:lower() == args[1]:lower() then
        eventType = type
    end
end
if not eventType then
    qerror('unknown event type: ' .. args[1])
end

local newArgs = {'--eventType', eventType}
if eventType == 'Caravan' or eventType == 'Diplomat' then
    table.insert(newArgs, '--civ')
    if not args[2] then
        table.insert(newArgs, 'player')
    else
        table.insert(newArgs, args[2])
    end
end

dfhack.run_script('modtools/force', table.unpack(newArgs))