Class: RDoc::Markup::ToHtml

# File 'lib/rdoc/markup/to_html.rb', line 40

attr_accessor :from_path

# File 'lib/rdoc/markup/to_html.rb', line 28

attr_reader :in_list_entry # :nodoc:

# File 'lib/rdoc/markup/to_html.rb', line 262

def in_tidylink_label?
  @in_tidylink_label
end

# File 'lib/rdoc/markup/to_html.rb', line 29

attr_reader :list # :nodoc:

# File 'lib/rdoc/markup/to_html.rb', line 27

attr_reader :res # :nodoc:

# File 'lib/rdoc/markup/to_html.rb', line 403

def accept_block_quote(block_quote)
  @res << "\n<blockquote>"

  block_quote.parts.each do |part|
    part.accept self
  end

  @res << "</blockquote>\n"
end

# File 'lib/rdoc/markup/to_html.rb', line 517

def accept_heading(heading)
  level = [6, heading.level].min

  label = deduplicate_heading_id(heading.label(@code_object))
  legacy_label = deduplicate_heading_id(heading.legacy_label(@code_object))

  # 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 << if @output_decoration
            "\n<h#{level} id=\"#{label}\">"
          else
            "\n<h#{level}>"
          end

  if @pipe
    @res << to_html(heading.text)
  else
    @res << "<a href=\"##{label}\">#{to_html(heading.text)}</a>"
  end

  @res << "</h#{level}>\n"
end

# File 'lib/rdoc/markup/to_html.rb', line 480

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

# File 'lib/rdoc/markup/to_html.rb', line 502

def accept_list_item_end(list_item)
  @in_list_entry[-1] = list_end_for(@list.last)
end

# File 'lib/rdoc/markup/to_html.rb', line 491

def accept_list_item_start(list_item)
  if tag = @in_list_entry.last
    @res << tag
  end

  @res << list_item_start(list_item, @list.last)
end

# File 'lib/rdoc/markup/to_html.rb', line 471

def accept_list_start(list)
  @list << list.type
  @res << html_list_name(list.type, true)
  @in_list_entry.push false
end

# File 'lib/rdoc/markup/to_html.rb', line 416

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

# File 'lib/rdoc/markup/to_html.rb', line 547

def accept_raw(raw)
  @res << raw.parts.join("\n")
end

# File 'lib/rdoc/markup/to_html.rb', line 464

def accept_rule(rule)
  @res << "<hr>\n"
end

# File 'lib/rdoc/markup/to_html.rb', line 554

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

# File 'lib/rdoc/markup/to_html.rb', line 438

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

  if @pipe
    @res << "\n<pre><code>#{CGI.escapeHTML text}\n</code></pre>\n"
  else
    @res << "\n<pre#{klass}>#{content}</pre>\n"
  end
end

# File 'lib/rdoc/markup/to_html.rb', line 273

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/)

  # rdoc-image in label specially allows spaces in alt text.
  return handle_RDOCLINK(label) if label.start_with?('rdoc-image:')
end

# File 'lib/rdoc/markup/to_html.rb', line 593

def convert_string(text)
  CGI.escapeHTML text
end

# File 'lib/rdoc/markup/to_html.rb', line 580

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

# File 'lib/rdoc/markup/to_html.rb', line 256

def emit_inline(text)
  @inline_output << text
end

# File 'lib/rdoc/markup/to_html.rb', line 396

def end_accepting
  @res.join
end

# File 'lib/rdoc/markup/to_html.rb', line 606

def gen_url(url, text)
  scheme, url, id = parse_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

# File 'lib/rdoc/markup/to_html.rb', line 216

def handle_BOLD(nodes)
  emit_inline('<strong>')
  super
  emit_inline('</strong>')
end

# File 'lib/rdoc/markup/to_html.rb', line 228

def handle_BOLD_WORD(word)
  emit_inline('<strong>')
  super
  emit_inline('</strong>')
end

# File 'lib/rdoc/markup/to_html.rb', line 222

def handle_EM(nodes)
  emit_inline('<em>')
  super
  emit_inline('</em>')
end

# File 'lib/rdoc/markup/to_html.rb', line 234

def handle_EM_WORD(word)
  emit_inline('<em>')
  super
  emit_inline('</em>')
end

# File 'lib/rdoc/markup/to_html.rb', line 252

def handle_HARD_BREAK
  emit_inline('<br>')
end

# File 'lib/rdoc/markup/to_html.rb', line 317

def handle_inline(text) # :nodoc:
  @inline_output = +''
  @quote_converter = QuoteConverter.new
  super
  out = @inline_output
  @inline_output = nil
  @quote_converter = nil
  out
end

# File 'lib/rdoc/markup/to_html.rb', line 208

def handle_PLAIN_TEXT(text)
  emit_inline(convert_string(text))
end

# File 'lib/rdoc/markup/to_html.rb', line 177

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

# File 'lib/rdoc/markup/to_html.rb', line 212

def handle_REGEXP_HANDLING_TEXT(text)
  emit_inline(text)
end

# File 'lib/rdoc/markup/to_html.rb', line 328

def handle_regexp_HTML_CHARACTERS(text)
  name = HTML_CHARACTER_ALIASES[text]
  TO_HTML_CHARACTERS[text.encoding][name] if name
end

# File 'lib/rdoc/markup/to_html.rb', line 359

def handle_regexp_HYPERLINK(text)
  return convert_string(text) if in_tidylink_label?

  url = CGI.escapeHTML(text)
  gen_url url, url
end

# File 'lib/rdoc/markup/to_html.rb', line 337

def handle_regexp_QUOTE_AFTER_WORD(text)
  @quote_converter.convert(text, after_word: true) || convert_string(text)
end

# File 'lib/rdoc/markup/to_html.rb', line 333

def handle_regexp_QUOTE_NOT_AFTER_WORD(text)
  @quote_converter.convert(text, after_word: false) || convert_string(text)
end

# File 'lib/rdoc/markup/to_html.rb', line 375

def handle_regexp_RDOCLINK(text)
  handle_RDOCLINK text
end

# File 'lib/rdoc/markup/to_html.rb', line 343

def handle_regexp_SUPPRESSED_CROSSREF(text)
  convert_string(text.delete_prefix('\\'))
end

# File 'lib/rdoc/markup/to_html.rb', line 246

def handle_STRIKE(nodes)
  emit_inline('<del>')
  super
  emit_inline('</del>')
end

# File 'lib/rdoc/markup/to_html.rb', line 281

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

  if label_part.size == 1 && String === label_part[0]
    raw_label = label_part[0]

    @in_tidylink_label = true
    special = apply_tidylink_label_special_handling(raw_label, url)
    @in_tidylink_label = false

    if special
      tag = gen_url(CGI.escapeHTML(url), special)
      unless tag.empty?
        emit_inline(tag)
        return
      end
    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

# File 'lib/rdoc/markup/to_html.rb', line 240

def handle_TT(code)
  emit_inline('<code>')
  super
  emit_inline('</code>')
end

# File 'lib/rdoc/markup/to_html.rb', line 632

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

# File 'lib/rdoc/markup/to_html.rb', line 173

def init_link_notation_regexp_handlings
  add_regexp_handling_RDOCLINK
end

# File 'lib/rdoc/markup/to_html.rb', line 154

def init_regexp_handlings
  # external links
  @markup.add_regexp_handling(/(?:link:|https?:|mailto:|ftp:|irc:|www\.)#{URL_CHARACTERS_REGEXP_STR}+\w/,
                              :HYPERLINK)

  # suppress crossref: \#method \::method \ClassName \method_with_underscores
  @markup.add_regexp_handling(/\\(?:[#:A-Z]|[a-z]+_[a-z0-9])/, :SUPPRESSED_CROSSREF)

  @markup.add_regexp_handling(Regexp.union(HTML_CHARACTER_ALIASES.keys), :HTML_CHARACTERS)

  @markup.add_regexp_handling(/\b['"`]/, :QUOTE_AFTER_WORD)
  @markup.add_regexp_handling(/\B['"`]/, :QUOTE_NOT_AFTER_WORD)

  init_link_notation_regexp_handlings
end

# File 'lib/rdoc/markup/to_html.rb', line 658

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

# File 'lib/rdoc/markup/to_html.rb', line 642

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

# File 'lib/rdoc/markup/to_html.rb', line 428

def parsable_text_to_html(text)
  tokens = RDoc::Parser::RubyColorizer.colorize(text)
  result = RDoc::TokenStream.to_html tokens
  result = result + "\n" unless result.end_with?("\n")
  result
end

# File 'lib/rdoc/markup/to_html.rb', line 672

def parseable?(text)
  Prism.parse_success?(text)
end

# File 'lib/rdoc/markup/to_html.rb', line 386

def start_accepting
  @res = []
  @in_list_entry = []
  @list = []
  @heading_ids = {}
end

# File 'lib/rdoc/markup/to_html.rb', line 679

def to_html(item)
  handle_inline(item)
end