feat(attach): add attachment events

These are implemented in Emacs as the hooks
`org-attach-after-change-hook` and `org-attach-open-hook`.

Author: broken-pen

lua/orgmode/attach/core.lua

@@ -1,4 +1,5 @@
 local AttachNode = require('orgmode.attach.node')
+local EventManager = require('orgmode.events')
 local Promise = require('orgmode.utils.promise')
 local config = require('orgmode.config')
 local fileops = require('orgmode.attach.fileops')
@@ -289,6 +290,7 @@ function AttachCore:attach(node, file, opts)
       if not success then
         return nil
       end
+      EventManager.dispatch(EventManager.event.AttachChanged:new(node, attach_dir))
       node:add_auto_tag()
       local link = self.links:store_link_to_attachment({ attach_dir = attach_dir, original = file })
       vim.fn.setreg(vim.v.register, link)
@@ -317,6 +319,7 @@ function AttachCore:attach_buffer(node, bufnr, opts)
     local attach_file = vim.fs.joinpath(attach_dir, basename)
     local data = table.concat(vim.api.nvim_buf_get_lines(bufnr, 0, -1, false), '\n')
     return utils.writefile(attach_file, data, { excl = true }):next(function()
+      EventManager.dispatch(EventManager.event.AttachChanged:new(node, attach_dir))
       node:add_auto_tag()
       -- Ignore all errors here, this is just to determine whether we can store
       -- a link to `bufname`.
@@ -360,6 +363,7 @@ function AttachCore:attach_many(node, files, opts)
       end, files)
       ---@param successes boolean[]
       :next(function(successes)
+        EventManager.dispatch(EventManager.event.AttachChanged:new(node, attach_dir))
         node:add_auto_tag()
         ---@param tally orgmode.attach.core.attach_many.result
         ---@param success boolean
@@ -400,6 +404,7 @@ function AttachCore:attach_new(node, name, opts)
   return self:get_dir_or_create(node, opts.set_dir_method, opts.new_dir):next(function(attach_dir)
     local path = vim.fs.joinpath(attach_dir, name)
     --TODO: the emacs version doesn't run the hook here. Is this correct?
+    EventManager.dispatch(EventManager.event.AttachChanged:new(node, attach_dir))
     node:add_auto_tag()
     ---@type vim.api.keyset.cmd
     return Promise.new(function(resolve, reject)
@@ -445,6 +450,7 @@ end
 function AttachCore:open(name, node)
   local attach_dir = self:get_dir(node)
   local path = vim.fs.joinpath(attach_dir, name)
+  EventManager.dispatch(EventManager.event.AttachOpened:new(node, path))
   return assert(vim.ui.open(path))
 end
 
@@ -456,6 +462,7 @@ end
 function AttachCore:open_in_vim(name, node)
   local attach_dir = self:get_dir(node)
   local path = vim.fs.joinpath(attach_dir, name)
+  EventManager.dispatch(EventManager.event.AttachOpened:new(node, path))
   vim.cmd.edit(path)
 end
 
@@ -472,6 +479,7 @@ function AttachCore:delete_one(node, name)
   local attach_dir = self:get_dir(node)
   local path = vim.fs.joinpath(attach_dir, name)
   return fileops.unlink(path):next(function()
+    EventManager.dispatch(EventManager.event.AttachChanged:new(node, attach_dir))
     return nil
   end)
 end
@@ -506,6 +514,7 @@ function AttachCore:delete_all(node, recursive)
       return Promise.reject(errmsg)
     end
     return fileops.remove_directory(attach_dir, { recursive = true }):next(function()
+      EventManager.dispatch(EventManager.event.AttachChanged:new(node, attach_dir))
       node:remove_auto_tag()
       return attach_dir
     end)
@@ -540,6 +549,7 @@ function AttachCore:sync(node, delete_empty_dir)
     self:untag(node)
     return Promise.resolve()
   end
+  EventManager.dispatch(EventManager.event.AttachChanged:new(node, attach_dir))
   local non_empty = has_any_non_litter_files(attach_dir)
   if non_empty then
     node:add_auto_tag()

lua/orgmode/events/types/attach_changed_event.lua

@@ -0,0 +1,20 @@
+---@class OrgAttachChangedEvent: OrgEvent
+---@field type string
+---@field node OrgAttachNode
+---@field attach_dir string
+local AttachChangedEvent = {
+  type = 'orgmode.attach_changed',
+}
+
+---@param node OrgAttachNode
+---@param attach_dir string
+---@return OrgAttachChangedEvent
+function AttachChangedEvent:new(node, attach_dir)
+  local obj = setmetatable({}, self)
+  self.__index = self
+  obj.node = node
+  obj.attach_dir = attach_dir
+  return obj
+end
+
+return AttachChangedEvent

lua/orgmode/events/types/attach_opened_event.lua

@@ -0,0 +1,20 @@
+---@class OrgAttachOpenedEvent: OrgEvent
+---@field type string
+---@field node OrgAttachNode
+---@field path string
+local AttachOpenedEvent = {
+  type = 'orgmode.attach_opened',
+}
+
+---@param node OrgAttachNode
+---@param path string
+---@return OrgAttachOpenedEvent
+function AttachOpenedEvent:new(node, path)
+  local obj = setmetatable({}, self)
+  self.__index = self
+  obj.node = node
+  obj.path = path
+  return obj
+end
+
+return AttachOpenedEvent

lua/orgmode/events/types/init.lua

@@ -6,4 +6,6 @@ return {
   HeadlinePromoted = require('orgmode.events.types.headline_promoted_event'),
   HeadlineDemoted = require('orgmode.events.types.headline_demoted_event'),
   HeadingToggled = require('orgmode.events.types.heading_toggled'),
+  AttachChanged = require('orgmode.events.types.attach_changed_event'),
+  AttachOpened = require('orgmode.events.types.attach_opened_event'),
 }