class RDoc::Markup::ToMarkdown

# File lib/rdoc/markup/to_markdown.rb, line 12
def initialize
  super

  @headings[1] = ['# ',      '']
  @headings[2] = ['## ',     '']
  @headings[3] = ['### ',    '']
  @headings[4] = ['#### ',   '']
  @headings[5] = ['##### ',  '']
  @headings[6] = ['###### ', '']

  add_regexp_handling_RDOCLINK

  @hard_break = "  \n"
end

# File lib/rdoc/markup/to_markdown.rb, line 30
def accept_list_end(list)
  super
end

# File lib/rdoc/markup/to_markdown.rb, line 37
def accept_list_item_end(list_item)
  width = case @list_type.last
          when :BULLET then
            4
          when :NOTE, :LABEL then
            use_prefix

            @res << "\n"

            4
          else
            @list_index[-1] = @list_index.last.succ
            4
          end

  @indent -= width
end

# File lib/rdoc/markup/to_markdown.rb, line 58
def accept_list_item_start(list_item)
  type = @list_type.last

  case type
  when :NOTE, :LABEL then
    bullets = Array(list_item.label).map do |label|
      attributes(label).strip
    end.join "\n"

    bullets << "\n" unless bullets.empty?

    @prefix = ' ' * @indent
    @indent += 4
    @prefix << bullets << ":" << (' ' * (@indent - 1))
  else
    bullet = type == :BULLET ? '*' : @list_index.last.to_s + '.'
    @prefix = (' ' * @indent) + bullet.ljust(4)

    @indent += 4
  end
end

# File lib/rdoc/markup/to_markdown.rb, line 142
def accept_list_start(list)
  case list.type
  when :BULLET, :LABEL, :NOTE then
    @list_index << nil
  when :LALPHA, :NUMBER, :UALPHA then
    @list_index << 1
  else
    raise RDoc::Error, "invalid list type #{list.type}"
  end

  @list_width << 4
  @list_type << list.type
end

# File lib/rdoc/markup/to_markdown.rb, line 159
def accept_rule(rule)
  use_prefix or @res << ' ' * @indent
  @res << '-' * 3
  @res << "\n"
end

# File lib/rdoc/markup/to_markdown.rb, line 168
def accept_verbatim(verbatim)
  indent = ' ' * (@indent + 4)

  verbatim.parts.each do |part|
    @res << indent unless part == "\n"
    @res << part
  end

  @res << "\n"
end

# File lib/rdoc/markup/to_markdown.rb, line 80
def add_tag(tag, simple_tag, content)
  if content.match?(/\A[\w\s]+\z/)
    emit_inline("#{simple_tag}#{content}#{simple_tag}")
  else
    emit_inline("<#{tag}>#{content}</#{tag}>")
  end
end

# File lib/rdoc/markup/to_markdown.rb, line 182
def gen_url(url, text)
  scheme, url, = parse_url url

  "[#{text.sub(%r{^#{scheme}:/*}i, '')}](#{url})"
end

# File lib/rdoc/markup/to_markdown.rb, line 111
def handle_BOLD(nodes)
  handle_tag(nodes, '**', 'strong')
end

# File lib/rdoc/markup/to_markdown.rb, line 119
def handle_BOLD_WORD(word)
  add_tag('strong', '**', convert_string(word))
end

# File lib/rdoc/markup/to_markdown.rb, line 115
def handle_EM(nodes)
  handle_tag(nodes, '*', 'em')
end

# File lib/rdoc/markup/to_markdown.rb, line 123
def handle_EM_WORD(word)
  add_tag('em', '*', convert_string(word))
end

# File lib/rdoc/markup/to_markdown.rb, line 135
def handle_HARD_BREAK
  emit_inline("  \n")
end

# File lib/rdoc/markup/to_markdown.rb, line 131
def handle_STRIKE(nodes)
  handle_tag(nodes, '~~', 's')
end

# File lib/rdoc/markup/to_markdown.rb, line 101
def handle_TIDYLINK(label_part, url)
  if url =~ /^rdoc-label:foot/ then
    emit_inline(handle_rdoc_link(url))
  else
    emit_inline('[')
    traverse_inline_nodes(label_part)
    emit_inline("](#{url})")
  end
end

# File lib/rdoc/markup/to_markdown.rb, line 127
def handle_TT(text)
  add_tag('code', '`', convert_string(text))
end

# File lib/rdoc/markup/to_markdown.rb, line 191
def handle_rdoc_link(url)
  case url
  when /^rdoc-ref:/ then
    $'
  when /^rdoc-label:footmark-(\d+)/ then
    "[^#{$1}]:"
  when /^rdoc-label:foottext-(\d+)/ then
    "[^#{$1}]"
  when /^rdoc-label:label-/ then
    gen_url url, $'
  when /^rdoc-image:/ then
    "![](#{$'})"
  when /^rdoc-[a-z]+:/ then
    $'
  end
end

# File lib/rdoc/markup/to_markdown.rb, line 211
def handle_regexp_RDOCLINK(text)
  handle_rdoc_link text
end

# File lib/rdoc/markup/to_markdown.rb, line 88
def handle_tag(nodes, simple_tag, tag)
  if nodes.size == 1 && String === nodes[0]
    content = apply_regexp_handling(nodes[0]).map do |text, converted|
      converted ? text : convert_string(text)
    end.join
    add_tag(tag, simple_tag, content)
  else
    emit_inline("<#{tag}>")
    traverse_inline_nodes(nodes)
    emit_inline("</#{tag}>")
  end
end