z_mirror/TaskList

git clone https://git.raiguard.me/z_mirror/TaskList

raiguardMostly hook up task details GUI (#7)fa77a7d2021-12-15

local table = require("__flib__.table")

local util = require("scripts.util")

--- @class Task
local Task = {}

--- Update the task info and refresh all GUIs
--- @param title string
--- @param description string
--- @param assignee LuaPlayer|nil
--- @param status string
function Task:update(title, description, assignee, status)
  self.title = title
  self.description = description
  self.assignee = assignee
  self.status = status

  self:update_guis(function(Gui)
    Gui:update_task(self)
  end)
end

--- Delete the task and remove it from all GUIs.
function Task:delete()
  for _, subtasks in pairs({ self.completed_tasks, self.tasks }) do
    for _, task_id in pairs(subtasks) do
      local subtask = global.tasks[task_id]
      if subtask then
        subtask:delete()
      end
    end
  end

  global.tasks[self.id] = nil

  local owner_table = self.owner_table
  local tasks_table = owner_table[self.completed and "completed_tasks" or "tasks"]
  table.remove(tasks_table, table.find(tasks_table, self.id))

  self:update_guis(function(Gui)
    Gui:delete_task(self)
  end)
end

function Task:toggle_completed()
  local owner_table = self.owner_table

  self.completed = not self.completed

  if self.completed then
    util.remove_task(owner_table.tasks, self.id)
    table.insert(owner_table.completed_tasks, 1, self.id)
  else
    util.remove_task(owner_table.completed_tasks, self.id)
    table.insert(owner_table.tasks, self.id)
  end

  self:update_guis(function(Gui)
    Gui:delete_task(self, not self.completed)
    Gui:add_task(self, self.completed and 1 or nil)
  end)
end

--- @param delta number
function Task:move(delta)
  local tasks_table = self.owner_table[self.completed and "completed_tasks" or "tasks"]
  local index = table.find(tasks_table, self.id)
  if index then
    if index + delta > 0 and index + delta <= #tasks_table then
      tasks_table[index] = tasks_table[index + delta]
      tasks_table[index + delta] = self.id

      self:update_guis(function(Gui)
        Gui:move_task(self, delta)
      end)
    end
  end
end

--- @param callback fun(Gui: TasksGui)
function Task:update_guis(callback)
  local players = {}

  -- Get ultimate owner
  local path = {}
  local owner = self.owner
  while owner.object_name == "Task" do
    table.insert(path, 1, owner.id)
    owner = owner.owner
  end

  if owner.object_name == "LuaForce" then
    for player_index, player in pairs(game.players) do
      if player.force.index == owner.index then
        table.insert(players, player_index)
      end
    end
  else
    players = { owner.index }
  end

  for _, player_index in pairs(players) do
    local Gui = util.get_gui(player_index, "tasks")
    if Gui then
      callback(Gui)
    end

    -- Call on all task detail GUIs
    for _, task_id in pairs(path) do
      local Gui = util.get_gui(player_index, { name = "task", id = task_id })
      if Gui then
        callback(Gui)
      end
    end
  end
end

local task = {}

--- @param title string
--- @param description string
--- @param owner LuaForce|LuaPlayer|Task
--- @param assignee LuaPlayer|nil
--- @param status string
--- @param add_to_top boolean
function task.new(title, description, owner, assignee, status, add_to_top)
  local id = global.next_task_id
  global.next_task_id = id + 1

  local owner_table

  if owner.object_name == "Task" then
    owner_table = owner
  elseif owner.object_name == "LuaForce" then
    owner_table = global.forces[owner.index]
  else
    owner_table = global.players[owner.index]
  end

  --- If `owner` is a `LuaPlayer`, then `assignee` will always be the same `LuaPlayer`.
  --- @type Task
  local self = {
    assignee = assignee,
    completed = false,
    completed_tasks = {},
    description = description,
    id = id,
    object_name = "Task",
    owner = owner,
    owner_table = owner_table,
    status = status,
    tasks = {}, --- @type number[]
    title = title,
  }

  if add_to_top then
    table.insert(owner_table.tasks, 1, self.id)
  else
    table.insert(owner_table.tasks, self.id)
  end

  task.load(self)

  global.tasks[id] = self

  self:update_guis(function(Gui)
    Gui:add_task(self, add_to_top and 1 or nil)
  end)

  return self
end

--- @param self Task
function task.load(self)
  setmetatable(self, { __index = Task })
end

return task