path: root/lua/muwiki/links.lua

local config = require('muwiki.config')
local paths = require('muwiki.paths')
local utils = require('muwiki.utils')
local external = require('muwiki.external')

local M = {}

local function get_link_type(target)
  if target:match('^https?://') then
    return 'web'
  end
  if target:match('^file://') then
    return 'file'
  end
  return 'wiki'
end

function M.get_link()
  local cursor = vim.api.nvim_win_get_cursor(0)

  local ok, node = pcall(vim.treesitter.get_node, {
    bufnr = 0,
    pos = { cursor[1] - 1, cursor[2] },
    lang = 'markdown',
    ignore_injections = false,
  })

  if not ok or not node then
    return nil
  end

  local link_node = node ---@type TSNode|nil
  while link_node and link_node:type() ~= 'inline_link' do
    link_node = link_node:parent()
  end

  if not link_node then
    return nil
  end

  local text_node, dest_node
  for child in link_node:iter_children() do
    local t = child:type()
    if t == 'link_text' then
      text_node = child
    elseif t == 'link_destination' then
      dest_node = child
    end
  end

  if not text_node or not dest_node then
    return nil
  end

  local destination = vim.treesitter.get_node_text(dest_node, 0)
  return {
    text = vim.treesitter.get_node_text(text_node, 0),
    target = destination,
    type = get_link_type(destination),
  }
end

local function resolve_file_url(url)
  local path = paths.strip_file_protocol(url)
  local path_type = paths.get_path_type(path)

  if path_type == 'relative' then
    local current_dir = vim.fs.dirname(vim.api.nvim_buf_get_name(0))
    path = vim.fs.joinpath(current_dir, path)
  end

  return 'file://' .. vim.fs.normalize(path)
end

local function get_wiki_root_or_notify()
  local wiki_root = config.wiki_root(0)
  if not wiki_root then
    vim.notify('Not in a wiki buffer', vim.log.levels.ERROR)
    return nil
  end
  return wiki_root
end

function M.open_link()
  local link = M.get_link()
  if not link then
    vim.notify('No link found under cursor', vim.log.levels.WARN)
    return
  end

  if link.type == 'web' then
    if config.options.use_external_handlers then
      external.open(link.target)
    end
    return
  end

  local wiki_root = get_wiki_root_or_notify()
  if not wiki_root then
    return
  end

  if link.type == 'file' then
    if vim.startswith(link.target, 'file://') then
      if config.options.use_external_handlers then
        local absolute_url = resolve_file_url(link.target)
        external.open(absolute_url)
      end
    else
      local ok, file_path = pcall(utils.resolve, link.target, wiki_root)
      if not ok then
        vim.notify(string.format('Cannot resolve path: %s', link.target), vim.log.levels.ERROR)
        return
      end

      if not utils.file_exists(file_path) then
        vim.notify(string.format('File not found: %s', file_path), vim.log.levels.ERROR)
        return
      end

      local ext = file_path:match('%.([^%.]+)$') or ''
      if not utils.is_text_file(ext) then
        if config.options.use_external_handlers then
          external.open(file_path)
        end
        return
      end

      utils.open_in_buffer(file_path)
    end
    return
  end

  -- wiki link
  local file_path = utils.resolve(link.target, wiki_root)
  utils.open_wiki_file(file_path)
end

function M.open_link_with()
  local link = M.get_link()
  if not link then
    vim.notify('No link found under cursor', vim.log.levels.WARN)
    return
  end

  if link.type == 'wiki' then
    vim.notify('Menu not available for wiki links', vim.log.levels.WARN)
    return
  end

  local url = link.target
  if link.type == 'file' then
    local wiki_root = get_wiki_root_or_notify()
    if not wiki_root then
      return
    end
    url = utils.resolve(url, wiki_root)
  end

  -- Find matching handlers for URL
  local function handler_matches(handler, url)
    local pattern = handler.pattern
    if pattern == nil then
      return true
    end
    if type(pattern) == 'string' then
      return url:match(pattern) ~= nil
    end
    for _, p in ipairs(pattern) do
      if url:match(p) then
        return true
      end
    end
    return false
  end

  local matching_handlers = {}
  for _, handler in ipairs(config.options.external_handlers) do
    if handler_matches(handler, url) then
      table.insert(matching_handlers, handler)
    end
  end

  if #matching_handlers == 0 then
    vim.notify('No handlers available for this URL', vim.log.levels.WARN)
    return
  end

  if #matching_handlers == 1 then
    external.execute(matching_handlers[1], url)
    return
  end

  local handler_names = {}
  for _, handler in ipairs(matching_handlers) do
    table.insert(handler_names, handler.name)
  end

  vim.ui.select(handler_names, {
    prompt = 'Open with:',
  }, function(choice, idx)
    if choice and idx then
      external.execute(matching_handlers[idx], url)
    end
  end)
end

function M.create_link()
  local mode = vim.fn.mode()
  if mode ~= 'v' and mode ~= 'V' then
    vim.notify('Must be in visual mode to create a link', vim.log.levels.WARN)
    return
  end

  local start_pos = vim.fn.getpos('v')
  local end_pos = vim.fn.getpos('.')
  local region = vim.fn.getregion(start_pos, end_pos, { type = mode })

  if not region or #region == 0 then
    vim.notify('No text selected', vim.log.levels.WARN)
    return
  end

  if #region > 1 then
    vim.notify('Multi-line selection not supported', vim.log.levels.WARN)
    return
  end

  local selected_text = region[1]
  local normalized = utils.normalize_filename(selected_text)
  local link_target = normalized .. '.md'
  local link_text = string.format('[%s](%s)', selected_text, link_target)

  local start_row = start_pos[2]
  local start_col = start_pos[3]
  local end_row = end_pos[2]
  local end_col = end_pos[3]

  if start_row > end_row or (start_row == end_row and start_col > end_col) then
    start_row, end_row = end_row, start_row
    start_col, end_col = end_col, start_col
  end

  start_row = start_row - 1
  start_col = start_col - 1
  end_row = end_row - 1

  if mode == 'V' then
    start_col = 0
    local line = vim.api.nvim_buf_get_lines(0, end_row, end_row + 1, false)[1]
    end_col = #line
  end

  vim.api.nvim_buf_set_text(0, start_row, start_col, end_row, end_col, { link_text })
  vim.api.nvim_feedkeys(vim.api.nvim_replace_termcodes('<Esc>', true, false, true), 'n', false)

  local wiki_root = config.wiki_root(0)
  if not wiki_root then
    vim.notify('Not in a wiki buffer', vim.log.levels.ERROR)
    return
  end

  local target_path = utils.resolve(link_target, wiki_root)
  utils.open_wiki_file(target_path)
end

local function jump_link(direction)
  local flags = direction == 'next' and 'w' or 'bw'
  local msg = direction == 'next' and 'No more links' or 'No previous links'

  if vim.fn.search('\\[.\\{-}\\]', flags) == 0 then
    vim.notify(msg, vim.log.levels.INFO)
  end
end

function M.next_link()
  jump_link('next')
end

function M.prev_link()
  jump_link('prev')
end

return M