rdoc 7.2.0 → 8.1.0

data/lib/rdoc/markup/to_html.rb

@@ -1,604 +1,711 @@
 # frozen_string_literal: true
 require 'cgi/escape'
 require 'cgi/util' unless defined?(CGI::EscapeExt)
+require 'prism'
+
+module RDoc
+  class Markup
+    ##
+    # Outputs RDoc markup as HTML.
+
+    class ToHtml < Markup::Formatter
+
+      include Text
+
+      # :section: Utilities
+
+      ##
+      # Maps RDoc::Markup::Parser::LIST_TOKENS types to HTML tags
+
+      LIST_TYPE_TO_HTML = {
+        :BULLET => ['<ul>',                                      '</ul>'],
+        :LABEL  => ['<dl class="rdoc-list label-list">',         '</dl>'],
+        :LALPHA => ['<ol style="list-style-type: lower-alpha">', '</ol>'],
+        :NOTE   => ['<dl class="rdoc-list note-list">',          '</dl>'],
+        :NUMBER => ['<ol>',                                      '</ol>'],
+        :UALPHA => ['<ol style="list-style-type: upper-alpha">', '</ol>'],
+      }
+
+      attr_reader :res # :nodoc:
+      attr_reader :in_list_entry # :nodoc:
+      attr_reader :list # :nodoc:
+
+      ##
+      # The RDoc::CodeObject HTML is being generated for.  This is used to
+      # generate namespaced URI fragments
+
+      attr_accessor :code_object
+
+      ##
+      # Path to this document for relative links
+
+      attr_accessor :from_path
+
+      # :section:
+
+      # Maps an encoding to a Hash of characters properly transcoded for that
+      # encoding.
+      #
+      # See also encode_fallback.
+
+      TO_HTML_CHARACTERS = Hash.new do |h, encoding|
+        h[encoding] = {
+          close_dquote: encode_fallback('”', encoding, '"'),
+          close_squote: encode_fallback('’', encoding, '\''),
+          copyright:    encode_fallback('©', encoding, '(c)'),
+          ellipsis:     encode_fallback('…', encoding, '...'),
+          dot_ellipsis: encode_fallback('.…', encoding, '....'),
+          em_dash:      encode_fallback('—', encoding, '---'),
+          en_dash:      encode_fallback('–', encoding, '--'),
+          open_dquote:  encode_fallback('“', encoding, '"'),
+          open_squote:  encode_fallback('‘', encoding, '\''),
+          trademark:    encode_fallback('®', encoding, '(r)'),
+        }
+      end
 
-##
-# Outputs RDoc markup as HTML.
+      HTML_CHARACTER_ALIASES = {
+        '(c)' => :copyright,
+        '(C)' => :copyright,
+        '(r)' => :trademark,
+        '(R)' => :trademark,
+        '---' => :em_dash,
+        '--'  => :en_dash,
+        '....' => :dot_ellipsis,
+        '...' => :ellipsis,
+        '``' => :open_dquote,
+        "''" => :close_dquote,
+      }
+      HTML_CHARACTERS_REGEXP = Regexp.union(HTML_CHARACTER_ALIASES.keys)
+
+      # Transcodes +character+ to +encoding+ with a +fallback+ character.
+
+      def self.encode_fallback(character, encoding, fallback)
+        character.encode(
+          encoding,
+          fallback: { character => fallback },
+          undef: :replace,
+          replace: fallback
+        )
+      end
 
-class RDoc::Markup::ToHtml < RDoc::Markup::Formatter
+      # Converts ascii quote pairs to multibyte quote characters
+      class QuoteConverter
 
-  include RDoc::Text
+        def initialize
+          @in_dquote = false
+          @in_squote = false
+        end
 
-  # :section: Utilities
+        def convert(quote, after_word:)
+          case quote
+          when '"'
+            type = @in_dquote ? :close_dquote : :open_dquote
+            @in_dquote = !@in_dquote
+          when "'"
+            if @in_squote
+              type = :close_squote
+              @in_squote = false
+            elsif after_word
+              # Mary's dog, my parents' house: do not start paired quotes
+              type = :close_squote
+            else
+              type = :open_squote
+              @in_squote = true
+            end
+          when '`'
+            # Opening quote of <tt>`quoted sentence'</tt>.
+            # This will conflict with code blocks <tt>`puts('hello')`</tt> in the future.
+            if !@in_squote && !after_word
+              type = :open_squote
+              @in_squote = true
+            end
+          end
+          TO_HTML_CHARACTERS[quote.encoding][type] if type
+        end
+      end
 
-  ##
-  # Maps RDoc::Markup::Parser::LIST_TOKENS types to HTML tags
+      ##
+      # Creates a new formatter that will output HTML
 
-  LIST_TYPE_TO_HTML = {
-    :BULLET => ['<ul>',                                      '</ul>'],
-    :LABEL  => ['<dl class="rdoc-list label-list">',         '</dl>'],
-    :LALPHA => ['<ol style="list-style-type: lower-alpha">', '</ol>'],
-    :NOTE   => ['<dl class="rdoc-list note-list">',          '</dl>'],
-    :NUMBER => ['<ol>',                                      '</ol>'],
-    :UALPHA => ['<ol style="list-style-type: upper-alpha">', '</ol>'],
-  }
+      def initialize(pipe: false, output_decoration: true)
+        super()
 
-  attr_reader :res # :nodoc:
-  attr_reader :in_list_entry # :nodoc:
-  attr_reader :list # :nodoc:
+        @pipe = pipe
+        @output_decoration = output_decoration
+        @code_object = nil
+        @from_path = ''
+        @in_list_entry = nil
+        @list = nil
+        @th = nil
+        @quote_converter = nil
+        @in_tidylink_label = false
+        @hard_break = "<br>\n"
 
-  ##
-  # The RDoc::CodeObject HTML is being generated for.  This is used to
-  # generate namespaced URI fragments
+        init_regexp_handlings
+      end
 
-  attr_accessor :code_object
+      # :section: Regexp Handling
+      #
+      # These methods are used by regexp handling markup added by RDoc::Markup#add_regexp_handling.
 
-  ##
-  # Path to this document for relative links
+      ##
+      # URL schemes that are not linked because they can run scripts or open
+      # local files.  Links to them are rendered as their text only.
 
-  attr_accessor :from_path
+      UNSAFE_URL_SCHEME_REGEXP = /\A(?:javascript|vbscript|data|file):/i
 
-  # :section:
+      # :nodoc:
+      URL_CHARACTERS_REGEXP_STR = /[A-Za-z0-9\-._~:\/\?#\[\]@!$&'\(\)*+,;%=]/.source
 
-  ##
-  # Creates a new formatter that will output HTML
+      ##
+      # Adds regexp handlings.
 
-  def initialize(options, markup = nil)
-    super
+      def init_regexp_handlings
+        # external links
+        @markup.add_regexp_handling(/(?:link:|https?:|mailto:|ftp:|irc:|www\.)#{URL_CHARACTERS_REGEXP_STR}+\w/o,
+                                    :HYPERLINK)
 
-    @code_object = nil
-    @from_path = ''
-    @in_list_entry = nil
-    @list = nil
-    @th = nil
-    @in_tidylink_label = false
-    @hard_break = "<br>\n"
+        # suppress crossref: \#method \::method \ClassName \method_with_underscores
+        @markup.add_regexp_handling(/\\(?:[#:A-Z]|[a-z]+_[a-z0-9])/, :SUPPRESSED_CROSSREF)
 
-    init_regexp_handlings
-  end
+        @markup.add_regexp_handling(HTML_CHARACTERS_REGEXP, :HTML_CHARACTERS)
 
-  # :section: Regexp Handling
-  #
-  # These methods are used by regexp handling markup added by RDoc::Markup#add_regexp_handling.
+        @markup.add_regexp_handling(/\b['"`]/, :QUOTE_AFTER_WORD)
+        @markup.add_regexp_handling(/\B['"`]/, :QUOTE_NOT_AFTER_WORD)
 
-  # :nodoc:
-  URL_CHARACTERS_REGEXP_STR = /[A-Za-z0-9\-._~:\/\?#\[\]@!$&'\(\)*+,;%=]/.source
+        init_link_notation_regexp_handlings
+      end
 
-  ##
-  # Adds regexp handlings.
+      ##
+      # Adds regexp handlings about link notations.
 
-  def init_regexp_handlings
-    # external links
-    @markup.add_regexp_handling(/(?:link:|https?:|mailto:|ftp:|irc:|www\.)#{URL_CHARACTERS_REGEXP_STR}+\w/,
-                                :HYPERLINK)
+      def init_link_notation_regexp_handlings
+        add_regexp_handling_RDOCLINK
+      end
 
-    # suppress crossref: \#method \::method \ClassName \method_with_underscores
-    @markup.add_regexp_handling(/\\(?:[#:A-Z]|[a-z]+_[a-z0-9])/, :SUPPRESSED_CROSSREF)
+      def handle_RDOCLINK(url) # :nodoc:
+        case url
+        when /^rdoc-ref:/
+          CGI.escapeHTML($')
+        when /^rdoc-label:/
+          return CGI.escapeHTML(url) if in_tidylink_label?
+          text = $'
+
+          text = case text
+                 when /\Alabel-/    then $'
+                 when /\Afootmark-/ then $'
+                 when /\Afoottext-/ then $'
+                 else                    text
+                 end
+
+          gen_url CGI.escapeHTML(url), CGI.escapeHTML(text)
+        when /^rdoc-image:/
+          # Split the string after "rdoc-image:" into url and alt.
+          #   "path/to/image.jpg:alt text" => ["path/to/image.jpg", "alt text"]
+          #   "http://example.com/path/to/image.jpg:alt text" => ["http://example.com/path/to/image.jpg", "alt text"]
+          url, alt = $'.split(/:(?!\/)/, 2)
+          if alt && !alt.empty?
+            %[<img src="#{CGI.escapeHTML(url)}" alt="#{CGI.escapeHTML(alt)}">]
+          else
+            %[<img src="#{CGI.escapeHTML(url)}">]
+          end
+        when /\Ardoc-[a-z]+:/
+          CGI.escapeHTML($')
+        end
+      end
 
-    init_link_notation_regexp_handlings
-  end
+      def handle_PLAIN_TEXT(text)
+        emit_inline(convert_string(text))
+      end
 
-  ##
-  # Adds regexp handlings about link notations.
+      def handle_REGEXP_HANDLING_TEXT(text)
+        emit_inline(text)
+      end
 
-  def init_link_notation_regexp_handlings
-    add_regexp_handling_RDOCLINK
-  end
+      def handle_BOLD(nodes)
+        emit_inline('<strong>')
+        super
+        emit_inline('</strong>')
+      end
 
-  def handle_RDOCLINK(url) # :nodoc:
-    case url
-    when /^rdoc-ref:/
-      CGI.escapeHTML($')
-    when /^rdoc-label:/
-      return CGI.escapeHTML(url) if in_tidylink_label?
-      text = $'
-
-      text = case text
-             when /\Alabel-/    then $'
-             when /\Afootmark-/ then $'
-             when /\Afoottext-/ then $'
-             else                    text
-             end
-
-      gen_url CGI.escapeHTML(url), CGI.escapeHTML(text)
-    when /^rdoc-image:/
-      # Split the string after "rdoc-image:" into url and alt.
-      #   "path/to/image.jpg:alt text" => ["path/to/image.jpg", "alt text"]
-      #   "http://example.com/path/to/image.jpg:alt text" => ["http://example.com/path/to/image.jpg", "alt text"]
-      url, alt = $'.split(/:(?!\/)/, 2)
-      if alt && !alt.empty?
-        %[<img src="#{CGI.escapeHTML(url)}" alt="#{CGI.escapeHTML(alt)}">]
-      else
-        %[<img src="#{CGI.escapeHTML(url)}">]
-      end
-    when /\Ardoc-[a-z]+:/
-      CGI.escapeHTML($')
-    end
-  end
+      def handle_EM(nodes)
+        emit_inline('<em>')
+        super
+        emit_inline('</em>')
+      end
 
-  def handle_PLAIN_TEXT(text)
-    emit_inline(convert_string(text))
-  end
+      def handle_BOLD_WORD(word)
+        emit_inline('<strong>')
+        super
+        emit_inline('</strong>')
+      end
 
-  def handle_REGEXP_HANDLING_TEXT(text)
-    emit_inline(text)
-  end
+      def handle_EM_WORD(word)
+        emit_inline('<em>')
+        super
+        emit_inline('</em>')
+      end
 
-  def handle_BOLD(nodes)
-    emit_inline('<strong>')
-    super
-    emit_inline('</strong>')
-  end
+      def handle_TT(code)
+        emit_inline('<code>')
+        super
+        emit_inline('</code>')
+      end
 
-  def handle_EM(nodes)
-    emit_inline('<em>')
-    super
-    emit_inline('</em>')
-  end
+      def handle_STRIKE(nodes)
+        emit_inline('<del>')
+        super
+        emit_inline('</del>')
+      end
 
-  def handle_BOLD_WORD(word)
-    emit_inline('<strong>')
-    super
-    emit_inline('</strong>')
-  end
+      def handle_HARD_BREAK
+        emit_inline('<br>')
+      end
 
-  def handle_EM_WORD(word)
-    emit_inline('<em>')
-    super
-    emit_inline('</em>')
-  end
+      def emit_inline(text)
+        @inline_output << text
+      end
 
-  def handle_TT(code)
-    emit_inline('<code>')
-    super
-    emit_inline('</code>')
-  end
+      # Returns true if we are processing inside a tidy link label.
 
-  def handle_STRIKE(nodes)
-    emit_inline('<del>')
-    super
-    emit_inline('</del>')
-  end
+      def in_tidylink_label?
+        @in_tidylink_label
+      end
 
-  def handle_HARD_BREAK
-    emit_inline('<br>')
-  end
+      # Special handling for tidy link labels.
+      # When a tidy link is <tt>{rdoc-image:path/to/image.jpg:alt text}[http://example.com]</tt>,
+      # label part is normally considered RDOCLINK <tt>rdoc-image:path/to/image.jpg:alt</tt> and a text <tt>" text"</tt>
+      # but RDoc's test code expects the whole label part to be treated as RDOCLINK only in tidy link label.
+      # When a tidy link is <tt>{^1}[url]</tt> or <tt>{*1}[url]</tt>, the label part needs to drop leading * or ^.
+      # TODO: reconsider this workaround.
 
-  def emit_inline(text)
-    @inline_output << text
-  end
+      def apply_tidylink_label_special_handling(label, url)
+        # ^1 *1 will be converted to just 1 in tidy link label.
+        return label[1..] if label.match?(/\A[*^]\d+\z/)
 
-  # Returns true if we are processing inside a tidy link label.
+        # rdoc-image in label specially allows spaces in alt text.
+        return handle_RDOCLINK(label) if label.start_with?('rdoc-image:')
+      end
 
-  def in_tidylink_label?
-    @in_tidylink_label
-  end
+      def handle_TIDYLINK(label_part, url)
+        # When url is an image, ignore label part (maybe bug?) and just generate img tag.
+        if url.match?(/\Ahttps?:\/\/.+\.(png|gif|jpg|jpeg|bmp)\z/)
+          emit_inline("<img src=\"#{CGI.escapeHTML(url)}\" />")
+          return
+        elsif url.match?(/\Ardoc-image:/)
+          emit_inline(handle_RDOCLINK(url))
+          return
+        end
 
-  # Special handling for tidy link labels.
-  # When a tidy link is <tt>{rdoc-image:path/to/image.jpg:alt text}[http://example.com]</tt>,
-  # label part is normally considered RDOCLINK <tt>rdoc-image:path/to/image.jpg:alt</tt> and a text <tt>" text"</tt>
-  # but RDoc's test code expects the whole label part to be treated as RDOCLINK only in tidy link label.
-  # When a tidy link is <tt>{^1}[url]</tt> or <tt>{*1}[url]</tt>, the label part needs to drop leading * or ^.
-  # TODO: reconsider this workaround.
+        if label_part.size == 1 && String === label_part[0]
+          raw_label = label_part[0]
 
-  def apply_tidylink_label_special_handling(label, url)
-    # ^1 *1 will be converted to just 1 in tidy link label.
-    return label[1..] if label.match?(/\A[*^]\d+\z/)
+          @in_tidylink_label = true
+          special = apply_tidylink_label_special_handling(raw_label, url)
+          @in_tidylink_label = false
 
-    # rdoc-image in label specially allows spaces in alt text.
-    return handle_RDOCLINK(label) if label.start_with?('rdoc-image:')
-  end
+          if special
+            tag = gen_url(CGI.escapeHTML(url), special)
+            unless tag.empty?
+              emit_inline(tag)
+              return
+            end
+          end
+        end
 
-  def handle_TIDYLINK(label_part, url)
-    # When url is an image, ignore label part (maybe bug?) and just generate img tag.
-    if url.match?(/\Ahttps?:\/\/.+\.(png|gif|jpg|jpeg|bmp)\z/)
-      emit_inline("<img src=\"#{CGI.escapeHTML(url)}\" />")
-      return
-    elsif url.match?(/\Ardoc-image:/)
-      emit_inline(handle_RDOCLINK(url))
-      return
-    end
+        tag = gen_url(CGI.escapeHTML(url), '')
+        open_tag, close_tag = tag.split(/(?=<\/a>)/, 2)
+        valid_tag = open_tag && close_tag
+        emit_inline(open_tag) if valid_tag
+        @in_tidylink_label = true
+        traverse_inline_nodes(label_part)
+        @in_tidylink_label = false
+        emit_inline(close_tag) if valid_tag
+      end
 
-    if label_part.size == 1 && String === label_part[0]
-      raw_label = label_part[0]
+      def handle_inline(text) # :nodoc:
+        @inline_output = +''
+        @quote_converter = QuoteConverter.new
+        super
+        out = @inline_output
+        @inline_output = nil
+        @quote_converter = nil
+        out
+      end
 
-      @in_tidylink_label = true
-      special = apply_tidylink_label_special_handling(raw_label, url)
-      @in_tidylink_label = false
+      # Converts <tt>(c), (r), --, --- , ..., ...., ``, ''</tt> to HTML characters.
+      def handle_regexp_HTML_CHARACTERS(text)
+        name = HTML_CHARACTER_ALIASES[text]
+        TO_HTML_CHARACTERS[text.encoding][name] if name
+      end
 
-      if special
-        tag = gen_url(CGI.escapeHTML(url), special)
-        unless tag.empty?
-          emit_inline(tag)
-          return
-        end
+      def handle_regexp_QUOTE_NOT_AFTER_WORD(text)
+        @quote_converter.convert(text, after_word: false) || convert_string(text)
       end
-    end
 
-    tag = gen_url(CGI.escapeHTML(url), '')
-    open_tag, close_tag = tag.split(/(?=<\/a>)/, 2)
-    valid_tag = open_tag && close_tag
-    emit_inline(open_tag) if valid_tag
-    @in_tidylink_label = true
-    traverse_inline_nodes(label_part)
-    @in_tidylink_label = false
-    emit_inline(close_tag) if valid_tag
-  end
+      def handle_regexp_QUOTE_AFTER_WORD(text)
+        @quote_converter.convert(text, after_word: true) || convert_string(text)
+      end
 
-  def handle_inline(text) # :nodoc:
-    @inline_output = +''
-    super
-    out = @inline_output
-    @inline_output = nil
-    out
-  end
+      # Converts suppressed cross-reference +text+ to HTML by removing the leading backslash.
 
-  # Converts suppressed cross-reference +text+ to HTML by removing the leading backslash.
+      def handle_regexp_SUPPRESSED_CROSSREF(text)
+        convert_string(text.delete_prefix('\\'))
+      end
 
-  def handle_regexp_SUPPRESSED_CROSSREF(text)
-    convert_string(text.delete_prefix('\\'))
-  end
+      ##
+      # +target+ is a potential link.  The following schemes are handled:
+      #
+      # <tt>mailto:</tt>::
+      #   Inserted as-is.
+      # <tt>http:</tt>::
+      #   Links are checked to see if they reference an image. If so, that image
+      #   gets inserted using an <tt><img></tt> tag. Otherwise a conventional
+      #   <tt><a href></tt> is used.
+      # <tt>link:</tt>::
+      #   Reference to a local file relative to the output directory.
+
+      def handle_regexp_HYPERLINK(text)
+        return convert_string(text) if in_tidylink_label?
+
+        url = CGI.escapeHTML(text)
+        gen_url url, url
+      end
 
-  ##
-  # +target+ is a potential link.  The following schemes are handled:
-  #
-  # <tt>mailto:</tt>::
-  #   Inserted as-is.
-  # <tt>http:</tt>::
-  #   Links are checked to see if they reference an image. If so, that image
-  #   gets inserted using an <tt><img></tt> tag. Otherwise a conventional
-  #   <tt><a href></tt> is used.
-  # <tt>link:</tt>::
-  #   Reference to a local file relative to the output directory.
-
-  def handle_regexp_HYPERLINK(text)
-    return convert_string(text) if in_tidylink_label?
-
-    url = CGI.escapeHTML(text)
-    gen_url url, url
-  end
+      ##
+      # +target+ is an rdoc-schemed link that will be converted into a hyperlink.
+      #
+      # For the +rdoc-ref+ scheme the named reference will be returned without
+      # creating a link.
+      #
+      # For the +rdoc-label+ scheme the footnote and label prefixes are stripped
+      # when creating a link.  All other contents will be linked verbatim.
+
+      def handle_regexp_RDOCLINK(text)
+        handle_RDOCLINK text
+      end
 
-  ##
-  # +target+ is an rdoc-schemed link that will be converted into a hyperlink.
-  #
-  # For the +rdoc-ref+ scheme the named reference will be returned without
-  # creating a link.
-  #
-  # For the +rdoc-label+ scheme the footnote and label prefixes are stripped
-  # when creating a link.  All other contents will be linked verbatim.
-
-  def handle_regexp_RDOCLINK(text)
-    handle_RDOCLINK text
-  end
+      # :section: Visitor
+      #
+      # These methods implement the HTML visitor.
 
-  # :section: Visitor
-  #
-  # These methods implement the HTML visitor.
+      ##
+      # Prepares the visitor for HTML generation
 
-  ##
-  # Prepares the visitor for HTML generation
+      def start_accepting
+        @res = []
+        @in_list_entry = []
+        @list = []
+        @heading_ids = {}
+      end
 
-  def start_accepting
-    @res = []
-    @in_list_entry = []
-    @list = []
-    @heading_ids = {}
-  end
+      ##
+      # Returns the generated output
 
-  ##
-  # Returns the generated output
+      def end_accepting
+        @res.join
+      end
 
-  def end_accepting
-    @res.join
-  end
+      ##
+      # Adds +block_quote+ to the output
 
-  ##
-  # Adds +block_quote+ to the output
+      def accept_block_quote(block_quote)
+        @res << "\n<blockquote>"
 
-  def accept_block_quote(block_quote)
-    @res << "\n<blockquote>"
+        block_quote.parts.each do |part|
+          part.accept self
+        end
 
-    block_quote.parts.each do |part|
-      part.accept self
-    end
+        @res << "</blockquote>\n"
+      end
 
-    @res << "</blockquote>\n"
-  end
+      ##
+      # Adds +paragraph+ to the output
+
+      def accept_paragraph(paragraph)
+        @res << "\n<p>"
+        text = paragraph.text @hard_break
+        text = text.gsub(/(#{SPACE_SEPARATED_LETTER_CLASS})?\K(?:\r?\n)+(?=(?(1)(#{SPACE_SEPARATED_LETTER_CLASS})?))/o) {
+          defined?($2) && ' '
+        }
+        @res << to_html(text)
+        @res << "</p>\n"
+      end
 
-  ##
-  # Adds +paragraph+ to the output
-
-  def accept_paragraph(paragraph)
-    @res << "\n<p>"
-    text = paragraph.text @hard_break
-    text = text.gsub(/(#{SPACE_SEPARATED_LETTER_CLASS})?\K\r?\n(?=(?(1)(#{SPACE_SEPARATED_LETTER_CLASS})?))/o) {
-      defined?($2) && ' '
-    }
-    @res << to_html(text)
-    @res << "</p>\n"
-  end
+      # Generate syntax highlighted html for ruby-like text.
 
-  ##
-  # Adds +verbatim+ to the output
-
-  def accept_verbatim(verbatim)
-    text = verbatim.text.rstrip
-    format = verbatim.format
-
-    klass = nil
-
-    # Apply Ruby syntax highlighting if
-    # - explicitly marked as Ruby (via ruby? which accepts :ruby or :rb)
-    # - no format specified but the text is parseable as Ruby
-    # Otherwise, add language class when applicable and skip Ruby highlighting
-    content = if verbatim.ruby? || (format.nil? && parseable?(text))
-                begin
-                  tokens = RDoc::Parser::RipperStateLex.parse text
-                  klass  = ' class="ruby"'
-
-                  result = RDoc::TokenStream.to_html tokens
-                  result = result + "\n" unless "\n" == result[-1]
-                  result
-                rescue
-                  CGI.escapeHTML text
-                end
-              else
-                klass = " class=\"#{format}\"" if format
-                CGI.escapeHTML text
-              end
-
-    if @options.pipe then
-      @res << "\n<pre><code>#{CGI.escapeHTML text}\n</code></pre>\n"
-    else
-      @res << "\n<pre#{klass}>#{content}</pre>\n"
-    end
-  end
+      def parsable_text_to_html(text)
+        tokens = ::RDoc::Parser::RubyColorizer.colorize(text)
+        result = TokenStream.to_html tokens
+        result = result + "\n" unless result.end_with?("\n")
+        result
+      end
 
-  ##
-  # Adds +rule+ to the output
+      ##
+      # Adds +verbatim+ to the output
+
+      def accept_verbatim(verbatim)
+        text = verbatim.text.rstrip
+        format = verbatim.format
+
+        # Apply Ruby syntax highlighting if
+        # - explicitly marked as Ruby (via ruby? which accepts :ruby or :rb)
+        # - no format specified but the text is parseable as Ruby
+        # Otherwise, add language class when applicable and skip Ruby highlighting
+        if verbatim.ruby? || (format.nil? && parseable?(text))
+          content = parsable_text_to_html(text)
+          klass = ' class="ruby"'
+        else
+          content = CGI.escapeHTML text
+          klass = " class=\"#{format}\"" if format
+        end
 
-  def accept_rule(rule)
-    @res << "<hr>\n"
-  end
+        if @pipe
+          @res << "\n<pre><code>#{CGI.escapeHTML text}\n</code></pre>\n"
+        else
+          @res << "\n<pre#{klass}>#{content}</pre>\n"
+        end
+      end
 
-  ##
-  # Prepares the visitor for consuming +list+
+      ##
+      # Adds +rule+ to the output
 
-  def accept_list_start(list)
-    @list << list.type
-    @res << html_list_name(list.type, true)
-    @in_list_entry.push false
-  end
+      def accept_rule(rule)
+        @res << "<hr>\n"
+      end
 
-  ##
-  # Finishes consumption of +list+
+      ##
+      # Prepares the visitor for consuming +list+
 
-  def accept_list_end(list)
-    @list.pop
-    if tag = @in_list_entry.pop
-      @res << tag
-    end
-    @res << html_list_name(list.type, false) << "\n"
-  end
+      def accept_list_start(list)
+        @list << list.type
+        @res << html_list_name(list.type, true)
+        @in_list_entry.push false
+      end
 
-  ##
-  # Prepares the visitor for consuming +list_item+
+      ##
+      # Finishes consumption of +list+
 
-  def accept_list_item_start(list_item)
-    if tag = @in_list_entry.last
-      @res << tag
-    end
+      def accept_list_end(list)
+        @list.pop
+        if tag = @in_list_entry.pop
+          @res << tag
+        end
+        @res << html_list_name(list.type, false) << "\n"
+      end
 
-    @res << list_item_start(list_item, @list.last)
-  end
+      ##
+      # Prepares the visitor for consuming +list_item+
 
-  ##
-  # Finishes consumption of +list_item+
+      def accept_list_item_start(list_item)
+        if tag = @in_list_entry.last
+          @res << tag
+        end
 
-  def accept_list_item_end(list_item)
-    @in_list_entry[-1] = list_end_for(@list.last)
-  end
+        @res << list_item_start(list_item, @list.last)
+      end
 
-  ##
-  # Adds +blank_line+ to the output
+      ##
+      # Finishes consumption of +list_item+
 
-  def accept_blank_line(blank_line)
-    # @res << annotate("<p />") << "\n"
-  end
+      def accept_list_item_end(list_item)
+        @in_list_entry[-1] = list_end_for(@list.last)
+      end
 
-  ##
-  # Adds +heading+ to the output.  The headings greater than 6 are trimmed to
-  # level 6.
+      ##
+      # Adds +blank_line+ to the output
 
-  def accept_heading(heading)
-    level = [6, heading.level].min
+      def accept_blank_line(blank_line)
+        # @res << annotate("<p />") << "\n"
+      end
 
-    label = deduplicate_heading_id(heading.label(@code_object))
-    legacy_label = deduplicate_heading_id(heading.legacy_label(@code_object))
+      ##
+      # Adds +heading+ to the output.  The headings greater than 6 are trimmed to
+      # level 6.
 
-    # Add legacy anchor before the heading for backward compatibility.
-    # This allows old links with label- prefix to still work.
-    if @options.output_decoration && !@options.pipe
-      @res << "\n<span id=\"#{legacy_label}\" class=\"legacy-anchor\"></span>"
-    end
+      def accept_heading(heading)
+        level = [6, heading.level].min
 
-    @res << if @options.output_decoration
-              "\n<h#{level} id=\"#{label}\">"
-            else
-              "\n<h#{level}>"
-            end
+        label = deduplicate_heading_id(heading.label(@code_object))
+        legacy_label = deduplicate_heading_id(heading.legacy_label(@code_object))
 
-    if @options.pipe
-      @res << to_html(heading.text)
-    else
-      @res << "<a href=\"##{label}\">#{to_html(heading.text)}</a>"
-    end
+        # Add legacy anchor before the heading for backward compatibility.
+        # This allows old links with label- prefix to still work.
+        if @output_decoration && !@pipe
+          @res << "\n<span id=\"#{legacy_label}\" class=\"legacy-anchor\"></span>"
+        end
 
-    @res << "</h#{level}>\n"
-  end
+        @res << if @output_decoration
+                  "\n<h#{level} id=\"#{label}\">"
+                else
+                  "\n<h#{level}>"
+                end
 
-  ##
-  # Adds +raw+ to the output
+        if @pipe
+          @res << to_html(heading.text)
+        else
+          @res << "<a href=\"##{label}\">#{to_html(heading.text)}</a>"
+        end
 
-  def accept_raw(raw)
-    @res << raw.parts.join("\n")
-  end
+        @res << "</h#{level}>\n"
+      end
 
-  ##
-  # Adds +table+ to the output
+      ##
+      # Adds +raw+ to the output
 
-  def accept_table(header, body, aligns)
-    @res << "\n<table role=\"table\">\n<thead>\n<tr>\n"
-    header.zip(aligns) do |text, align|
-      @res << '<th'
-      @res << ' align="' << align << '"' if align
-      @res << '>' << to_html(text) << "</th>\n"
-    end
-    @res << "</tr>\n</thead>\n<tbody>\n"
-    body.each do |row|
-      @res << "<tr>\n"
-      row.zip(aligns) do |text, align|
-        @res << '<td'
-        @res << ' align="' << align << '"' if align
-        @res << '>' << to_html(text) << "</td>\n"
-      end
-      @res << "</tr>\n"
-    end
-    @res << "</tbody>\n</table>\n"
-  end
+      def accept_raw(raw)
+        @res << raw.parts.join("\n")
+      end
 
-  # :section: Utilities
+      ##
+      # Adds +table+ to the output
 
-  ##
-  # Returns a unique heading ID, appending -1, -2, etc. for duplicates.
-  # Matches GitHub's behavior for duplicate heading anchors.
+      def accept_table(header, body, aligns)
+        @res << "\n<table role=\"table\">\n<thead>\n<tr>\n"
+        header.zip(aligns) do |text, align|
+          @res << '<th'
+          @res << ' align="' << align << '"' if align
+          @res << '>' << to_html(text) << "</th>\n"
+        end
+        @res << "</tr>\n</thead>\n<tbody>\n"
+        body.each do |row|
+          @res << "<tr>\n"
+          row.zip(aligns) do |text, align|
+            @res << '<td'
+            @res << ' align="' << align << '"' if align
+            @res << '>' << to_html(text) << "</td>\n"
+          end
+          @res << "</tr>\n"
+        end
+        @res << "</tbody>\n</table>\n"
+      end
 
-  def deduplicate_heading_id(id)
-    if @heading_ids.key?(id)
-      @heading_ids[id] += 1
-      "#{id}-#{@heading_ids[id]}"
-    else
-      @heading_ids[id] = 0
-      id
-    end
-  end
+      # :section: Utilities
 
-  ##
-  # CGI-escapes +text+
+      ##
+      # Returns a unique heading ID, appending -1, -2, etc. for duplicates.
+      # Matches GitHub's behavior for duplicate heading anchors.
 
-  def convert_string(text)
-    CGI.escapeHTML text
-  end
+      def deduplicate_heading_id(id)
+        if @heading_ids.key?(id)
+          @heading_ids[id] += 1
+          "#{id}-#{@heading_ids[id]}"
+        else
+          @heading_ids[id] = 0
+          id
+        end
+      end
 
-  ##
-  # Generates an HTML link or image tag for the given +url+ and +text+.
-  #
-  # - Image URLs (http/https/link ending in .gif, .png, .jpg, .jpeg, .bmp)
-  #   become <img> tags
-  # - File references (.rb, .rdoc, .md) are converted to .html paths
-  # - Anchor URLs (#foo) pass through unchanged for GitHub-style header linking
-  # - Footnote links get wrapped in <sup> tags
+      ##
+      # CGI-escapes +text+
 
-  def gen_url(url, text)
-    scheme, url, id = parse_url url
+      def convert_string(text)
+        CGI.escapeHTML text
+      end
 
-    if %w[http https link].include?(scheme) && url =~ /\.(gif|png|jpg|jpeg|bmp)\z/
-      "<img src=\"#{url}\" />"
-    else
-      if scheme != 'link' and %r%\A((?!https?:)(?:[^/#]*/)*+)([^/#]+)\.(rb|rdoc|md)(?=\z|#)%i =~ url
-        url = "#$1#{$2.tr('.', '_')}_#$3.html#$'"
+      ##
+      # Generates an HTML link or image tag for the given +url+ and +text+.
+      #
+      # - Image URLs (http/https/link ending in .gif, .png, .jpg, .jpeg, .bmp)
+      #   become <img> tags
+      # - File references (.rb, .rdoc, .md) are converted to .html paths
+      # - Anchor URLs (#foo) pass through unchanged for GitHub-style header linking
+      # - Footnote links get wrapped in <sup> tags
+      # - URLs with an unsafe scheme (javascript:, vbscript:, data:, file:) are not
+      #   linked and only +text+ is returned
+
+      def gen_url(url, text)
+        scheme, url, id = parse_url url
+
+        # Check the parsed URL because link: URLs are used as href without it
+        return text if unsafe_url?(url)
+
+        if %w[http https link].include?(scheme) && url =~ /\.(gif|png|jpg|jpeg|bmp)\z/
+          "<img src=\"#{url}\" />"
+        else
+          if scheme != 'link' and %r%\A((?!https?:)(?:[^/#]*/)*+)([^/#]+)\.(rb|rdoc|md)(?=\z|#)%i =~ url
+            url = "#$1#{$2.tr('.', '_')}_#$3.html#$'"
+          end
+
+          text = text.sub %r%^#{scheme}:/*%i, ''
+          text = text.sub %r%^[*\^](\d+)$%,   '\1'
+
+          link = "<a#{id} href=\"#{url}\">#{text}</a>"
+
+          if /"foot/.match?(id)
+            "<sup>#{link}</sup>"
+          else
+            link
+          end
+        end
       end
 
-      text = text.sub %r%^#{scheme}:/*%i, ''
-      text = text.sub %r%^[*\^](\d+)$%,   '\1'
+      ##
+      # Does +url+ have a scheme in UNSAFE_URL_SCHEME_REGEXP?
+      #
+      # Browsers ignore leading C0 controls and spaces and all ASCII tabs and
+      # newlines in a URL, so they are removed before checking the scheme.
+      # See https://url.spec.whatwg.org/#concept-basic-url-parser
+      #
+      #: (String) -> bool
+      def unsafe_url?(url)
+        normalized = url.sub(/\A[\x00-\x20]+/, '').delete("\t\n\r")
+        UNSAFE_URL_SCHEME_REGEXP.match?(normalized)
+      end
 
-      link = "<a#{id} href=\"#{url}\">#{text}</a>"
+      ##
+      # Determines the HTML list element for +list_type+ and +open_tag+
 
-      if /"foot/.match?(id)
-        "<sup>#{link}</sup>"
-      else
-        link
+      def html_list_name(list_type, open_tag)
+        tags = LIST_TYPE_TO_HTML[list_type]
+        raise Error, "Invalid list type: #{list_type.inspect}" unless tags
+        tags[open_tag ? 0 : 1]
       end
-    end
-  end
 
-  ##
-  # Determines the HTML list element for +list_type+ and +open_tag+
+      ##
+      # Returns the HTML tag for +list_type+, possible using a label from
+      # +list_item+
+
+      def list_item_start(list_item, list_type)
+        case list_type
+        when :BULLET, :LALPHA, :NUMBER, :UALPHA
+          "<li>"
+        when :LABEL, :NOTE
+          Array(list_item.label).map do |label|
+            "<dt>#{to_html label}</dt>\n"
+          end.join << "<dd>"
+        else
+          raise Error, "Invalid list type: #{list_type.inspect}"
+        end
+      end
 
-  def html_list_name(list_type, open_tag)
-    tags = LIST_TYPE_TO_HTML[list_type]
-    raise RDoc::Error, "Invalid list type: #{list_type.inspect}" unless tags
-    tags[open_tag ? 0 : 1]
-  end
+      ##
+      # Returns the HTML end-tag for +list_type+
+
+      def list_end_for(list_type)
+        case list_type
+        when :BULLET, :LALPHA, :NUMBER, :UALPHA
+          "</li>"
+        when :LABEL, :NOTE
+          "</dd>"
+        else
+          raise Error, "Invalid list type: #{list_type.inspect}"
+        end
+      end
 
-  ##
-  # Returns the HTML tag for +list_type+, possible using a label from
-  # +list_item+
-
-  def list_item_start(list_item, list_type)
-    case list_type
-    when :BULLET, :LALPHA, :NUMBER, :UALPHA then
-      "<li>"
-    when :LABEL, :NOTE then
-      Array(list_item.label).map do |label|
-        "<dt>#{to_html label}</dt>\n"
-      end.join << "<dd>"
-    else
-      raise RDoc::Error, "Invalid list type: #{list_type.inspect}"
-    end
-  end
+      ##
+      # Returns true if text is valid ruby syntax
 
-  ##
-  # Returns the HTML end-tag for +list_type+
-
-  def list_end_for(list_type)
-    case list_type
-    when :BULLET, :LALPHA, :NUMBER, :UALPHA then
-      "</li>"
-    when :LABEL, :NOTE then
-      "</dd>"
-    else
-      raise RDoc::Error, "Invalid list type: #{list_type.inspect}"
-    end
-  end
+      def parseable?(text)
+        Prism.parse_success?(text)
+      end
 
-  ##
-  # Returns true if text is valid ruby syntax
+      ##
+      # Converts +item+ to HTML using RDoc::Text#to_html
 
-  def parseable?(text)
-    verbose, $VERBOSE = $VERBOSE, nil
-    catch(:valid) do
-      eval("BEGIN { throw :valid, true }\n#{text}")
+      def to_html(item)
+        handle_inline(item)
+      end
     end
-  rescue SyntaxError
-    false
-  ensure
-    $VERBOSE = verbose
-  end
-
-  ##
-  # Converts +item+ to HTML using RDoc::Text#to_html
-
-  def to_html(item)
-    # Ideally, we should convert html characters at handle_PLAIN_TEXT or somewhere else,
-    # but we need to convert it here for now because to_html_characters converts pair of backticks to ’‘ and pair of double backticks to ”“.
-    # Known bugs: `...` in `<code>def f(...); end</code>` and `(c) in `<a href="(c)">` will be wrongly converted.
-    to_html_characters(handle_inline(item))
-  end
-end
-
-##
-# Formatter dedicated to rendering tidy link labels without mutating the
-# calling formatter's state.
-
-class RDoc::Markup::LinkLabelToHtml < RDoc::Markup::ToHtml
-  def self.render(label, options, from_path)
-    new(options, from_path).to_html(label)
-  end
-
-  def initialize(options, from_path = nil)
-    super(options)
-
-    self.from_path = from_path if from_path
   end
 end