shortcut.lua

local Base = require('render-markdown.render.base')
local Converter = require('render-markdown.lib.converter')
local Str = require('render-markdown.lib.str')

---@class render.md.render.Shortcut: render.md.Renderer
---@field private link render.md.Link
local Render = setmetatable({}, Base)
Render.__index = Render

---@return boolean
function Render:setup()
    self.link = self.config.link
    return true
end

function Render:render()
    local callout = self.config:get_callout(self.node)
    if callout ~= nil then
        self:callout(callout)
        return
    end

    local checkbox = self.config:get_checkbox(self.node)
    if checkbox ~= nil then
        self:checkbox(checkbox)
        return
    end

    local line = self.node:line('first', 0)
    if line ~= nil and line:find('[' .. self.node.text .. ']', 1, true) ~= nil then
        self:wiki_link()
        return
    end

    local _, _, text = self.node.text:find('^%[%^(.+)%]$')
    if text ~= nil then
        self:footnote(text)
        return
    end
end

---@private
---@param callout render.md.CustomCallout
function Render:callout(callout)
    if self.context:skip(self.config.quote) then
        return
    end

    local text, conceal = self:callout_title(callout)
    self.marks:add_over('callout', self.node, {
        virt_text = { { text, callout.highlight } },
        virt_text_pos = 'overlay',
        conceal = conceal and '' or nil,
    })
    self.context:add_callout(self.node.start_row, callout)
end

---@private
---@param callout render.md.CustomCallout
---@return string, boolean
function Render:callout_title(callout)
    ---Support for overriding title: https://help.obsidian.md/Editing+and+formatting/Callouts#Change+the+title
    local content = self.node:parent('inline')
    if content ~= nil then
        local line = Str.split(content.text, '\n')[1]
        if #line > #callout.raw and vim.startswith(line:lower(), callout.raw:lower()) then
            local icon = Str.split(callout.rendered, ' ')[1]
            local title = vim.trim(line:sub(#callout.raw + 1))
            return icon .. ' ' .. title, true
        end
    end
    return callout.rendered, false
end

---@private
---@param checkbox render.md.CustomCheckbox
function Render:checkbox(checkbox)
    if self.context:skip(self.config.checkbox) then
        return
    end

    local inline = self.config.checkbox.position == 'inline'
    local icon, highlight = checkbox.rendered, checkbox.highlight
    local text = inline and icon or Str.pad_to(self.node.text, icon) .. icon
    local added = self.marks:add_over('check_icon', self.node, {
        virt_text = { { text, highlight } },
        virt_text_pos = 'inline',
        conceal = '',
    })

    if added then
        self.context:add_checkbox(self.node.start_row, checkbox)
    end
end

---@private
function Render:wiki_link()
    if self.context:skip(self.link) then
        return
    end

    local sections = Str.split(self.node.text:sub(2, -2), '|')
    ---@type render.md.LinkContext
    local ctx = {
        buf = self.context:get_buf(),
        row = self.node.start_row,
        start_col = self.node.start_col - 1,
        end_col = self.node.end_col + 1,
        destination = sections[1],
        alias = sections[2],
    }

    -- Hide opening & closing outer brackets
    self:hide(ctx.start_col, 1)
    self:hide(ctx.end_col - 1, 1)

    local wiki = self.link.wiki
    local icon, highlight = self:from_destination(wiki.icon, wiki.highlight, ctx.destination)
    local body = wiki.body(ctx)
    if body == nil then
        -- Add icon
        self.marks:add_over('link', self.node, {
            virt_text = { { icon, highlight } },
            virt_text_pos = 'inline',
        })
        -- Hide destination if there is an alias
        if #sections > 1 then
            self:hide(ctx.start_col + 2, #ctx.destination + 1)
        end
    else
        local line = {}
        if type(body) == 'string' then
            table.insert(line, { icon .. body, highlight })
        else
            table.insert(line, { icon .. body[1], body[2] })
        end
        -- Inline icon & body, hide original text
        self.marks:add_over('link', self.node, {
            virt_text = line,
            virt_text_pos = 'inline',
            conceal = '',
        }, { 0, 1, 0, -1 })
    end
end

---@private
---@param col integer
---@param length integer
function Render:hide(col, length)
    self.marks:add(true, self.node.start_row, col, {
        end_col = col + length,
        conceal = '',
    })
end

---@private
---@param text string
function Render:footnote(text)
    if self.context:skip(self.link) then
        return
    end

    local footnote = self.link.footnote

    local value = ''

    if footnote.superscript then
        local converted_value = Converter.to_superscript(footnote.prefix .. text .. footnote.suffix)
        if converted_value == nil then
            return nil
        end
        value = converted_value
    else
        value = footnote.prefix .. text .. footnote.suffix
    end

    self.marks:add_over('link', self.node, {
        virt_text = { { value, self.link.highlight } },
        virt_text_pos = 'inline',
        conceal = '',
    })
end

return Render