pending.nvim/lua/pending/diff.lua

local config = require('pending.config')
local parse = require('pending.parse')
local store = require('pending.store')

---@class pending.ParsedEntry
---@field type 'task'|'header'|'blank'
---@field id? integer
---@field description? string
---@field priority? integer
---@field category? string
---@field due? string
---@field lnum integer

---@class pending.diff
local M = {}

---@return string
local function timestamp()
  return os.date('!%Y-%m-%dT%H:%M:%SZ') --[[@as string]]
end

---@param lines string[]
---@return pending.ParsedEntry[]
function M.parse_buffer(lines)
  local result = {}
  local current_category = nil

  for i, line in ipairs(lines) do
    local id, body = line:match('^/(%d+)/(  .+)$')
    if not id then
      body = line:match('^(  .+)$')
    end
    if line == '' then
      table.insert(result, { type = 'blank', lnum = i })
    elseif id or body then
      local stripped = body:match('^  (.+)$') or body
      local prio_str = stripped:match('^%[(%d+)%] ')
      local priority = 0
      if prio_str then
        priority = tonumber(prio_str) --[[@as integer]]
        stripped = stripped:sub(#prio_str + 4)
      end
      local description, metadata = parse.body(stripped)
      if description and description ~= '' then
        table.insert(result, {
          type = 'task',
          id = id and tonumber(id) or nil,
          description = description,
          priority = priority,
          category = metadata.cat or current_category or config.get().default_category,
          due = metadata.due,
          lnum = i,
        })
      end
    elseif line:match('^%S') then
      current_category = line
      table.insert(result, { type = 'header', category = line, lnum = i })
    end
  end

  return result
end

---@param lines string[]
function M.apply(lines)
  local parsed = M.parse_buffer(lines)
  local now = timestamp()
  local data = store.data()

  local old_by_id = {}
  for _, task in ipairs(data.tasks) do
    if task.status ~= 'deleted' then
      old_by_id[task.id] = task
    end
  end

  local seen_ids = {}
  local order_counter = 0

  for _, entry in ipairs(parsed) do
    if entry.type ~= 'task' then
      goto continue
    end

    order_counter = order_counter + 1

    if entry.id and old_by_id[entry.id] then
      if seen_ids[entry.id] then
        store.add({
          description = entry.description,
          category = entry.category,
          priority = entry.priority,
          due = entry.due,
          order = order_counter,
        })
      else
        seen_ids[entry.id] = true
        local task = old_by_id[entry.id]
        local changed = false
        if task.description ~= entry.description then
          task.description = entry.description
          changed = true
        end
        if task.category ~= entry.category then
          task.category = entry.category
          changed = true
        end
        if task.priority ~= entry.priority then
          task.priority = entry.priority
          changed = true
        end
        if task.due ~= entry.due then
          task.due = entry.due
          changed = true
        end
        if task.order ~= order_counter then
          task.order = order_counter
          changed = true
        end
        if changed then
          task.modified = now
        end
      end
    else
      store.add({
        description = entry.description,
        category = entry.category,
        priority = entry.priority,
        due = entry.due,
        order = order_counter,
      })
    end

    ::continue::
  end

  for id, task in pairs(old_by_id) do
    if not seen_ids[id] then
      task.status = 'deleted'
      task['end'] = now
      task.modified = now
    end
  end

  store.save()
end

return M