kramdown 0.14.2 → 2.3.0

data/lib/kramdown/converter/latex.rb

@@ -1,26 +1,14 @@
-# -*- coding: utf-8 -*-
+# -*- coding: utf-8; frozen_string_literal: true -*-
 #
 #--
-# Copyright (C) 2009-2012 Thomas Leitner <t_leitner@gmx.at>
+# Copyright (C) 2009-2019 Thomas Leitner <t_leitner@gmx.at>
 #
-# This file is part of kramdown.
-#
-# kramdown is free software: you can redistribute it and/or modify
-# it under the terms of the GNU General Public License as published by
-# the Free Software Foundation, either version 3 of the License, or
-# (at your option) any later version.
-#
-# This program is distributed in the hope that it will be useful,
-# but WITHOUT ANY WARRANTY; without even the implied warranty of
-# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-# GNU General Public License for more details.
-#
-# You should have received a copy of the GNU General Public License
-# along with this program.  If not, see <http://www.gnu.org/licenses/>.
+# This file is part of kramdown which is licensed under the MIT.
 #++
 #
 
 require 'set'
+require 'kramdown/converter'
 
 module Kramdown
 
@@ -45,8 +33,6 @@ module Kramdown
       # Initialize the LaTeX converter with the +root+ element and the conversion +options+.
       def initialize(root, options)
         super
-        #TODO: set the footnote counter at the beginning of the document
-        @options[:footnote_nr]
         @data[:packages] = Set.new
       end
 
@@ -58,8 +44,8 @@ module Kramdown
 
       # Return the converted content of the children of +el+ as a string.
       def inner(el, opts)
-        result = ''
-        options = opts.dup.merge(:parent => el)
+        result = +''
+        options = opts.dup.merge(parent: el)
         el.children.each_with_index do |inner_el, index|
           options[:index] = index
           options[:result] = result
@@ -72,16 +58,17 @@ module Kramdown
         inner(el, opts)
       end
 
-      def convert_blank(el, opts)
+      def convert_blank(_el, opts)
         opts[:result] =~ /\n\n\Z|\A\Z/ ? "" : "\n"
       end
 
-      def convert_text(el, opts)
+      def convert_text(el, _opts)
         escape(el.value)
       end
 
       def convert_p(el, opts)
-        if el.children.size == 1 && el.children.first.type == :img && !(img = convert_img(el.children.first, opts)).empty?
+        if el.children.size == 1 && el.children.first.type == :img &&
+            !(img = convert_img(el.children.first, opts)).empty?
           convert_standalone_image(el, opts, img)
         else
           "#{latex_link_target(el)}#{inner(el, opts)}\n\n"
@@ -90,23 +77,31 @@ module Kramdown
 
       # Helper method used by +convert_p+ to convert a paragraph that only contains a single :img
       # element.
-      def convert_standalone_image(el, opts, img)
+      def convert_standalone_image(el, _opts, img)
         attrs = attribute_list(el)
-        "\\begin{figure}#{attrs}\n\\begin{center}\n#{img}\n\\end{center}\n\\caption{#{escape(el.children.first.attr['alt'])}}\n#{latex_link_target(el, true)}\n\\end{figure}#{attrs}\n"
+        "\\begin{figure}#{attrs}\n\\begin{center}\n#{img}\n\\end{center}\n" \
+          "\\caption{#{escape(el.children.first.attr['alt'])}}\n" \
+          "#{latex_link_target(el, true)}\n\\end{figure}#{attrs}\n"
       end
 
-      def convert_codeblock(el, opts)
+      def convert_codeblock(el, _opts)
         show_whitespace = el.attr['class'].to_s =~ /\bshow-whitespaces\b/
         lang = extract_code_language(el.attr)
-        if show_whitespace || lang
+
+        if @options[:syntax_highlighter] == :minted &&
+            (highlighted_code = highlight_code(el.value, lang, :block))
+          @data[:packages] << 'minted'
+          "#{latex_link_target(el)}#{highlighted_code}\n"
+        elsif show_whitespace || lang
           options = []
-          options << "showspaces=%s,showtabs=%s" % (show_whitespace ? ['true', 'true'] : ['false', 'false'])
+          options << (show_whitespace ? "showspaces=true,showtabs=true" : "showspaces=false,showtabs=false")
           options << "language=#{lang}" if lang
           options << "basicstyle=\\ttfamily\\footnotesize,columns=fixed,frame=tlbr"
           id = el.attr['id']
           options << "label=#{id}" if id
           attrs = attribute_list(el)
-          "#{latex_link_target(el)}\\begin{lstlisting}[#{options.join(',')}]\n#{el.value}\n\\end{lstlisting}#{attrs}\n"
+          "#{latex_link_target(el)}\\begin{lstlisting}[#{options.join(',')}]\n" \
+            "#{el.value}\n\\end{lstlisting}#{attrs}\n"
         else
           "#{latex_link_target(el)}\\begin{verbatim}#{el.value}\\end{verbatim}\n"
         end
@@ -126,27 +121,27 @@ module Kramdown
         end
       end
 
-      def convert_hr(el, opts)
+      def convert_hr(el, _opts)
         attrs = attribute_list(el)
         "#{latex_link_target(el)}\\begin{center}#{attrs}\n\\rule{3in}{0.4pt}\n\\end{center}#{attrs}\n"
       end
 
       def convert_ul(el, opts)
-        if !@data[:has_toc] && (el.options[:ial][:refs].include?('toc') rescue nil)
+        if !@data[:has_toc] && el.options.dig(:ial, :refs)&.include?('toc')
           @data[:has_toc] = true
           '\tableofcontents'
         else
           latex_environment(el.type == :ul ? 'itemize' : 'enumerate', el, inner(el, opts))
         end
       end
-      alias :convert_ol :convert_ul
+      alias convert_ol convert_ul
 
       def convert_dl(el, opts)
         latex_environment('description', el, inner(el, opts))
       end
 
       def convert_li(el, opts)
-        "\\item #{latex_link_target(el, true)}#{inner(el, opts).sub(/\n+\Z/, '')}\n"
+        "\\item{} #{latex_link_target(el, true)}#{inner(el, opts).sub(/\n+\Z/, '')}\n"
       end
 
       def convert_dt(el, opts)
@@ -158,32 +153,33 @@ module Kramdown
       end
 
       def convert_html_element(el, opts)
-        if el.value == 'i'
-          "\\emph{#{inner(el, opts)}}"
-        elsif el.value == 'b'
+        if el.value == 'i' || el.value == 'em'
           "\\emph{#{inner(el, opts)}}"
+        elsif el.value == 'b' || el.value == 'strong'
+          "\\textbf{#{inner(el, opts)}}"
         else
           warning("Can't convert HTML element")
           ''
         end
       end
 
-      def convert_xml_comment(el, opts)
-        el.value.split(/\n/).map {|l| "% #{l}"}.join("\n") + "\n"
+      def convert_xml_comment(el, _opts)
+        el.value.split(/\n/).map {|l| "% #{l}" }.join("\n") + "\n"
       end
 
-      def convert_xml_pi(el, opts)
+      def convert_xml_pi(_el, _opts)
         warning("Can't convert XML PI")
         ''
       end
 
-      TABLE_ALIGNMENT_CHAR = {:default => 'l', :left => 'l', :center => 'c', :right => 'r'} # :nodoc:
+      TABLE_ALIGNMENT_CHAR = {default: 'l', left: 'l', center: 'c', right: 'r'} # :nodoc:
 
       def convert_table(el, opts)
         @data[:packages] << 'longtable'
-        align = el.options[:alignment].map {|a| TABLE_ALIGNMENT_CHAR[a]}.join('|')
+        align = el.options[:alignment].map {|a| TABLE_ALIGNMENT_CHAR[a] }.join('|')
         attrs = attribute_list(el)
-        "#{latex_link_target(el)}\\begin{longtable}{|#{align}|}#{attrs}\n\\hline\n#{inner(el, opts)}\\hline\n\\end{longtable}#{attrs}\n\n"
+        "#{latex_link_target(el)}\\begin{longtable}{|#{align}|}#{attrs}\n" \
+          "\\hline\n#{inner(el, opts)}\\hline\n\\end{longtable}#{attrs}\n\n"
       end
 
       def convert_thead(el, opts)
@@ -199,47 +195,56 @@ module Kramdown
       end
 
       def convert_tr(el, opts)
-        el.children.map {|c| send("convert_#{c.type}", c, opts)}.join(' & ') + "\\\\\n"
+        el.children.map {|c| send("convert_#{c.type}", c, opts) }.join(' & ') << "\\\\\n"
       end
 
       def convert_td(el, opts)
         inner(el, opts)
       end
 
-      def convert_comment(el, opts)
-        el.value.split(/\n/).map {|l| "% #{l}"}.join("\n") + "\n"
+      def convert_comment(el, _opts)
+        el.value.split(/\n/).map {|l| "% #{l}" }.join("\n") << "\n"
       end
 
-      def convert_br(el, opts)
-        res = "\\newline"
-        res << "\n" if (c = opts[:parent].children[opts[:index]+1]) && (c.type != :text || c.value !~ /^\s*\n/)
+      def convert_br(_el, opts)
+        res = +"\\newline"
+        res << "\n" if (c = opts[:parent].children[opts[:index] + 1]) &&
+          (c.type != :text || c.value !~ /^\s*\n/)
         res
       end
 
       def convert_a(el, opts)
         url = el.attr['href']
-        if url =~ /^#/
-          "\\hyperlink{#{url[1..-1]}}{#{inner(el, opts)}}"
+        if url.start_with?('#')
+          "\\hyperlink{#{url[1..-1].gsub('%', '\\%')}}{#{inner(el, opts)}}"
         else
-          "\\href{#{url}}{#{inner(el, opts)}}"
+          "\\href{#{url.gsub('%', '\\%')}}{#{inner(el, opts)}}"
         end
       end
 
-      def convert_img(el, opts)
+      def convert_img(el, _opts)
+        line = el.options[:location]
         if el.attr['src'] =~ /^(https?|ftps?):\/\//
-          warning("Cannot include non-local image")
+          warning("Cannot include non-local image#{line ? " (line #{line})" : ''}")
           ''
         elsif !el.attr['src'].empty?
           @data[:packages] << 'graphicx'
           "#{latex_link_target(el)}\\includegraphics{#{el.attr['src']}}"
         else
-          warning("Cannot include image with empty path")
+          warning("Cannot include image with empty path#{line ? " (line #{line})" : ''}")
           ''
         end
       end
 
-      def convert_codespan(el, opts)
-        "{\\tt #{latex_link_target(el)}#{escape(el.value)}}"
+      def convert_codespan(el, _opts)
+        lang = extract_code_language(el.attr)
+        if @options[:syntax_highlighter] == :minted &&
+            (highlighted_code = highlight_code(el.value, lang, :span))
+          @data[:packages] << 'minted'
+          "#{latex_link_target(el)}#{highlighted_code}"
+        else
+          "\\texttt{#{latex_link_target(el)}#{escape(el.value)}}"
+        end
       end
 
       def convert_footnote(el, opts)
@@ -247,7 +252,7 @@ module Kramdown
         "\\footnote{#{inner(el.value, opts).rstrip}}"
       end
 
-      def convert_raw(el, opts)
+      def convert_raw(el, _opts)
         if !el.options[:type] || el.options[:type].empty? || el.options[:type].include?('latex')
           el.value + (el.options[:category] == :block ? "\n" : '')
         else
@@ -356,8 +361,8 @@ module Kramdown
         8736 => ['$\angle$'],
         8743 => ['$\wedge$'],
         8744 => ['$\vee$'],
-        8745 => ['$\cup$'],
-        8746 => ['$\cap$'],
+        8745 => ['$\cap$'],
+        8746 => ['$\cup$'],
         8747 => ['$\int$'],
         8756 => ['$\therefore$', 'amssymb'],
         8764 => ['$\sim$'],
@@ -417,7 +422,7 @@ module Kramdown
         402 => ['\textflorin', 'mathcomp'],
         381 => ['\v{Z}'],
         382 => ['\v{z}'],
-        160 => ['\nolinebreak'],
+        160 => ['~'],
         161 => ['\textexclamdown'],
         163 => ['\pounds'],
         164 => ['\currency', 'wasysym'],
@@ -512,7 +517,7 @@ module Kramdown
         8194 => ['\hskip .5em\relax'],
         8195 => ['\quad'],
       } # :nodoc:
-      ENTITY_CONV_TABLE.each {|k,v| ENTITY_CONV_TABLE[k][0].insert(-1, '{}')}
+      ENTITY_CONV_TABLE.each_value {|v| v[0] = "{}#{v[0]}" }
 
       def entity_to_latex(entity)
         text, package = ENTITY_CONV_TABLE[entity.code_point]
@@ -525,26 +530,30 @@ module Kramdown
         end
       end
 
-      def convert_entity(el, opts)
+      def convert_entity(el, _opts)
         entity_to_latex(el.value)
       end
 
       TYPOGRAPHIC_SYMS = {
-        :mdash => '---', :ndash => '--', :hellip => '\ldots{}',
-        :laquo_space => '\guillemotleft{}~', :raquo_space => '~\guillemotright{}',
-        :laquo => '\guillemotleft{}', :raquo => '\guillemotright{}'
+        mdash: '---', ndash: '--', hellip: '\ldots{}',
+        laquo_space: '\guillemotleft{}~', raquo_space: '~\guillemotright{}',
+        laquo: '\guillemotleft{}', raquo: '\guillemotright{}'
       } # :nodoc:
-      def convert_typographic_sym(el, opts)
-        TYPOGRAPHIC_SYMS[el.value]
+      def convert_typographic_sym(el, _opts)
+        if (result = @options[:typographic_symbols][el.value])
+          escape(result)
+        else
+          TYPOGRAPHIC_SYMS[el.value]
+        end
       end
 
       def convert_smart_quote(el, opts)
         res = entity_to_latex(smart_quote_entity(el)).chomp('{}')
-        res << "{}" if ((nel = opts[:parent].children[opts[:index]+1]) && nel.type == :smart_quote) || res =~ /\w$/
+        res << "{}" if ((nel = opts[:parent].children[opts[:index] + 1]) && nel.type == :smart_quote) || res =~ /\w$/
         res
       end
 
-      def convert_math(el, opts)
+      def convert_math(el, _opts)
         @data[:packages] += %w[amssymb amsmath amsthm amsfonts]
         if el.options[:category] == :block
           if el.value =~ /\A\s*\\begin\{/
@@ -557,8 +566,14 @@ module Kramdown
         end
       end
 
-      def convert_abbreviation(el, opts)
-        el.value
+      def convert_abbreviation(el, _opts)
+        @data[:packages] += %w[acronym]
+        "\\ac{#{normalize_abbreviation_key(el.value)}}"
+      end
+
+      # Normalize the abbreviation key so that it only contains allowed ASCII character
+      def normalize_abbreviation_key(key)
+        key.gsub(/\W/) {|m| m.unpack('H*').first }
       end
 
       # Wrap the +text+ inside a LaTeX environment of type +type+. The element +el+ is passed on to
@@ -574,7 +589,7 @@ module Kramdown
       # additionally to the \hypertarget command.
       def latex_link_target(el, add_label = false)
         if (id = el.attr['id'])
-          "\\hypertarget{#{id}}{}" << (add_label ? "\\label{#{id}}" : '')
+          "\\hypertarget{#{id}}{}#{add_label ? "\\label{#{id}}" : ''}"
         else
           nil
         end
@@ -582,8 +597,8 @@ module Kramdown
 
       # Return a LaTeX comment containing all attributes as 'key="value"' pairs.
       def attribute_list(el)
-        attrs = el.attr.map {|k,v| v.nil? ? '' : " #{k}=\"#{v.to_s}\""}.compact.sort.join('')
-        attrs = "   % #{attrs}" if !attrs.empty?
+        attrs = el.attr.map {|k, v| v.nil? ? '' : " #{k}=\"#{v}\"" }.compact.sort.join('')
+        attrs = "   % #{attrs}" unless attrs.empty?
         attrs
       end
 
@@ -593,13 +608,15 @@ module Kramdown
         "~"  => "\\ensuremath{\\sim}",
         "|"  => "\\textbar{}",
         "<"  => "\\textless{}",
-        ">"  => "\\textgreater{}"
-      }.merge(Hash[*("{}$%&_#".scan(/./).map {|c| [c, "\\#{c}"]}.flatten)]) # :nodoc:
-      ESCAPE_RE = Regexp.union(*ESCAPE_MAP.collect {|k,v| k}) # :nodoc:
+        ">"  => "\\textgreater{}",
+        "["  => "{[}",
+        "]"  => "{]}",
+      }.merge(Hash[*("{}$%&_#".each_char.map {|c| [c, "\\#{c}"] }.flatten)]) # :nodoc:
+      ESCAPE_RE = Regexp.union(*ESCAPE_MAP.collect {|k, _v| k }) # :nodoc:
 
       # Escape the special LaTeX characters in the string +str+.
       def escape(str)
-        str.gsub(ESCAPE_RE) {|m| ESCAPE_MAP[m]}
+        str.gsub(ESCAPE_RE) {|m| ESCAPE_MAP[m] }
       end
 
     end

data/lib/kramdown/converter/man.rb

@@ -0,0 +1,300 @@
+# -*- coding: utf-8; frozen_string_literal: true -*-
+#
+#--
+# Copyright (C) 2009-2019 Thomas Leitner <t_leitner@gmx.at>
+#
+# This file is part of kramdown which is licensed under the MIT.
+#++
+#
+
+require 'kramdown/converter'
+
+module Kramdown
+
+  module Converter
+
+    # Converts a Kramdown::Document to a manpage in groff format. See man(7), groff_man(7) and
+    # man-pages(7) for information regarding the output.
+    class Man < Base
+
+      def convert(el, opts = {indent: 0, result: +''}) #:nodoc:
+        send("convert_#{el.type}", el, opts)
+      end
+
+      private
+
+      def inner(el, opts, use = :all)
+        arr = el.children.reject {|e| e.type == :blank }
+        arr.each_with_index do |inner_el, index|
+          next if use == :rest && index == 0
+          break if use == :first && index > 0
+          options = opts.dup
+          options[:parent] = el
+          options[:index] = index
+          options[:prev] = (index == 0 ? nil : arr[index - 1])
+          options[:next] = (index == arr.length - 1 ? nil : arr[index + 1])
+          convert(inner_el, options)
+        end
+      end
+
+      def convert_root(el, opts)
+        @title_done = false
+        opts[:result] = +".\\\" generated by kramdown\n"
+        inner(el, opts)
+        opts[:result]
+      end
+
+      def convert_blank(*)
+      end
+      alias convert_hr convert_blank
+      alias convert_xml_pi convert_blank
+
+      def convert_p(el, opts)
+        if (opts[:index] != 0 && opts[:prev].type != :header) ||
+            (opts[:parent].type == :blockquote && opts[:index] == 0)
+          opts[:result] << macro("P")
+        end
+        inner(el, opts)
+        newline(opts[:result])
+      end
+
+      def convert_header(el, opts)
+        return unless opts[:parent].type == :root
+        case el.options[:level]
+        when 1
+          unless @title_done
+            @title_done = true
+            data = el.options[:raw_text].scan(/([^(]+)\s*\((\d\w*)\)(?:\s*-+\s*(.*))?/).first ||
+              el.options[:raw_text].scan(/([^\s]+)\s*(?:-*\s+)?()(.*)/).first
+            return unless data && data[0]
+            name = data[0]
+            section = (data[1].to_s.empty? ? el.attr['data-section'] || '7' : data[1])
+            description = (data[2].to_s.empty? ? nil : " - #{data[2]}")
+            date = el.attr['data-date'] ? quote(el.attr['data-date']) : nil
+            extra = (el.attr['data-extra'] ? quote(escape(el.attr['data-extra'].to_s)) : nil)
+            opts[:result] << macro("TH", quote(escape(name.upcase)), quote(section), date, extra)
+            if description
+              opts[:result] << macro("SH", "NAME") << escape("#{name}#{description}") << "\n"
+            end
+          end
+        when 2
+          opts[:result] << macro("SH", quote(escape(el.options[:raw_text])))
+        when 3
+          opts[:result] << macro("SS", quote(escape(el.options[:raw_text])))
+        else
+          warning("Header levels greater than three are not supported")
+        end
+      end
+
+      def convert_codeblock(el, opts)
+        opts[:result] << macro("sp") << macro("RS", 4) << macro("EX")
+        opts[:result] << newline(escape(el.value, true))
+        opts[:result] << macro("EE") << macro("RE")
+      end
+
+      def convert_blockquote(el, opts)
+        opts[:result] << macro("RS")
+        inner(el, opts)
+        opts[:result] << macro("RE")
+      end
+
+      def convert_ul(el, opts)
+        compact = (el.attr['class'] =~ /\bcompact\b/)
+        opts[:result] << macro("sp") << macro("PD", 0) if compact
+        inner(el, opts)
+        opts[:result] << macro("PD") if compact
+      end
+      alias convert_dl convert_ul
+      alias convert_ol convert_ul
+
+      def convert_li(el, opts)
+        sym = (opts[:parent].type == :ul ? '\(bu' : "#{opts[:index] + 1}.")
+        opts[:result] << macro("IP", sym, 4)
+        inner(el, opts, :first)
+        if el.children.size > 1
+          opts[:result] << macro("RS")
+          inner(el, opts, :rest)
+          opts[:result] << macro("RE")
+        end
+      end
+
+      def convert_dt(el, opts)
+        opts[:result] << macro(opts[:prev] && opts[:prev].type == :dt ? "TQ" : "TP")
+        inner(el, opts)
+        opts[:result] << "\n"
+      end
+
+      def convert_dd(el, opts)
+        inner(el, opts, :first)
+        if el.children.size > 1
+          opts[:result] << macro("RS")
+          inner(el, opts, :rest)
+          opts[:result] << macro("RE")
+        end
+        opts[:result] << macro("sp") if opts[:next] && opts[:next].type == :dd
+      end
+
+      TABLE_CELL_ALIGNMENT = {left: 'l', center: 'c', right: 'r', default: 'l'}
+
+      def convert_table(el, opts)
+        opts[:alignment] = el.options[:alignment].map {|a| TABLE_CELL_ALIGNMENT[a] }
+        table_options = ["box"]
+        table_options << "center" if el.attr['class'] =~ /\bcenter\b/
+        opts[:result] << macro("TS") << "#{table_options.join(' ')} ;\n"
+        inner(el, opts)
+        opts[:result] << macro("TE") << macro("sp")
+      end
+
+      def convert_thead(el, opts)
+        opts[:result] << opts[:alignment].map {|a| "#{a}b" }.join(' ') << " .\n"
+        inner(el, opts)
+        opts[:result] << "=\n"
+      end
+
+      def convert_tbody(el, opts)
+        opts[:result] << ".T&\n" if opts[:index] != 0
+        opts[:result] << opts[:alignment].join(' ') << " .\n"
+        inner(el, opts)
+        opts[:result] << (opts[:next].type == :tfoot ? "=\n" : "_\n") if opts[:next]
+      end
+
+      def convert_tfoot(el, opts)
+        inner(el, opts)
+      end
+
+      def convert_tr(el, opts)
+        inner(el, opts)
+        opts[:result] << "\n"
+      end
+
+      def convert_td(el, opts)
+        result = opts[:result]
+        opts[:result] = +''
+        inner(el, opts)
+        if opts[:result] =~ /\n/
+          warning("Table cells using links are not supported")
+          result << "\t"
+        else
+          result << opts[:result] << "\t"
+        end
+      end
+
+      def convert_html_element(*)
+        warning("HTML elements are not supported")
+      end
+
+      def convert_xml_comment(el, opts)
+        newline(opts[:result]) << ".\"#{escape(el.value, true).rstrip.gsub(/\n/, "\n.\"")}\n"
+      end
+      alias convert_comment convert_xml_comment
+
+      def convert_a(el, opts)
+        if el.children.size == 1 && el.children[0].type == :text &&
+            el.attr['href'] == el.children[0].value
+          newline(opts[:result]) << macro("UR", escape(el.attr['href'])) << macro("UE")
+        elsif el.attr['href'].start_with?('mailto:')
+          newline(opts[:result]) << macro("MT", escape(el.attr['href'].sub(/^mailto:/, ''))) <<
+            macro("UE")
+        else
+          newline(opts[:result]) << macro("UR", escape(el.attr['href']))
+          inner(el, opts)
+          newline(opts[:result]) << macro("UE")
+        end
+      end
+
+      def convert_img(_el, _opts)
+        warning("Images are not supported")
+      end
+
+      def convert_em(el, opts)
+        opts[:result] << '\fI'
+        inner(el, opts)
+        opts[:result] << '\fP'
+      end
+
+      def convert_strong(el, opts)
+        opts[:result] << '\fB'
+        inner(el, opts)
+        opts[:result] << '\fP'
+      end
+
+      def convert_codespan(el, opts)
+        opts[:result] << "\\fB#{escape(el.value)}\\fP"
+      end
+
+      def convert_br(_el, opts)
+        newline(opts[:result]) << macro("br")
+      end
+
+      def convert_abbreviation(el, opts)
+        opts[:result] << escape(el.value)
+      end
+
+      def convert_math(el, opts)
+        if el.options[:category] == :block
+          convert_codeblock(el, opts)
+        else
+          convert_codespan(el, opts)
+        end
+      end
+
+      def convert_footnote(*)
+        warning("Footnotes are not supported")
+      end
+
+      def convert_raw(*)
+        warning("Raw content is not supported")
+      end
+
+      def convert_text(el, opts)
+        text = escape(el.value)
+        text.lstrip! if opts[:result][-1] == "\n"
+        opts[:result] << text
+      end
+
+      def convert_entity(el, opts)
+        opts[:result] << unicode_char(el.value.code_point)
+      end
+
+      def convert_smart_quote(el, opts)
+        opts[:result] << unicode_char(::Kramdown::Utils::Entities.entity(el.value.to_s).code_point)
+      end
+
+      TYPOGRAPHIC_SYMS_MAP = {
+        mdash: '\(em', ndash: '\(em', hellip: '\.\.\.',
+        laquo_space: '\[Fo]', raquo_space: '\[Fc]', laquo: '\[Fo]', raquo: '\[Fc]'
+      }
+
+      def convert_typographic_sym(el, opts)
+        opts[:result] << TYPOGRAPHIC_SYMS_MAP[el.value]
+      end
+
+      def macro(name, *args)
+        ".#{[name, *args].compact.join(' ')}\n"
+      end
+
+      def newline(text)
+        text << "\n" unless text[-1] == "\n"
+        text
+      end
+
+      def quote(text)
+        "\"#{text.gsub(/"/, '\\"')}\""
+      end
+
+      def escape(text, preserve_whitespace = false)
+        text = (preserve_whitespace ? text.dup : text.gsub(/\s+/, ' '))
+        text.gsub!('\\', "\\e")
+        text.gsub!(/^\./, '\\\\&.')
+        text.gsub!(/[.'-]/) {|m| "\\#{m}" }
+        text
+      end
+
+      def unicode_char(codepoint)
+        "\\[u#{codepoint.to_s(16).rjust(4, '0')}]"
+      end
+
+    end
+
+  end
+end