# coding: utf-8 require 'rdoc/test_case' class TestRDocText < RDoc::TestCase include RDoc::Text def setup super @options = RDoc::Options.new @top_level = @store.add_file 'file.rb' end def test_self_encode_fallback skip "Encoding not implemented" unless Object.const_defined? :Encoding assert_equal '…', RDoc::Text::encode_fallback('…', Encoding::UTF_8, '...') assert_equal '...', RDoc::Text::encode_fallback('…', Encoding::US_ASCII, '...') end def test_expand_tabs assert_equal("hello\n dave", expand_tabs("hello\n dave"), 'spaces') assert_equal("hello\n dave", expand_tabs("hello\n\tdave"), 'tab') assert_equal("hello\n dave", expand_tabs("hello\n \tdave"), '1 space tab') assert_equal("hello\n dave", expand_tabs("hello\n \tdave"), '2 space tab') assert_equal("hello\n dave", expand_tabs("hello\n \tdave"), '3 space tab') assert_equal("hello\n dave", expand_tabs("hello\n \tdave"), '4 space tab') assert_equal("hello\n dave", expand_tabs("hello\n \tdave"), '5 space tab') assert_equal("hello\n dave", expand_tabs("hello\n \tdave"), '6 space tab') assert_equal("hello\n dave", expand_tabs("hello\n \tdave"), '7 space tab') assert_equal("hello\n dave", expand_tabs("hello\n \tdave"), '8 space tab') assert_equal('. .', expand_tabs(".\t\t."), 'dot tab tab dot') assert_equal('a a', Timeout.timeout(1) {expand_tabs("\ra\ta")}, "carriage return") end def test_expand_tabs_encoding skip "Encoding not implemented" unless Object.const_defined? :Encoding inn = "hello\ns\tdave" inn.force_encoding Encoding::BINARY out = expand_tabs inn assert_equal "hello\ns dave", out assert_equal Encoding::BINARY, out.encoding end def test_flush_left text = <<-TEXT we don't worry too much. The comments associated with TEXT expected = <<-EXPECTED we don't worry too much. The comments associated with EXPECTED assert_equal expected, flush_left(text) end def test_flush_left_encoding skip "Encoding not implemented" unless Object.const_defined? :Encoding text = <<-TEXT we don't worry too much. The comments associated with TEXT text.force_encoding Encoding::US_ASCII expected = <<-EXPECTED we don't worry too much. The comments associated with EXPECTED result = flush_left text assert_equal expected, result assert_equal Encoding::US_ASCII, result.encoding end def test_markup_string out = markup('hi').gsub("\n", '') assert_equal '

hi

', out end def test_markup_comment out = markup(comment('hi')).gsub("\n", '') assert_equal '

hi

', out end def test_normalize_comment_hash text = <<-TEXT ## # we don't worry too much. # # The comments associated with TEXT expected = <<-EXPECTED.rstrip we don't worry too much. The comments associated with EXPECTED assert_equal expected, normalize_comment(text) end def test_normalize_comment_stars_single_space text = <<-TEXT /* * we don't worry too much. * * The comments associated with */ TEXT expected = <<-EXPECTED.rstrip we don't worry too much. The comments associated with EXPECTED assert_equal expected, normalize_comment(text) end def test_normalize_comment_stars_single_double_space text = <<-TEXT /* * we don't worry too much. * * The comments associated with */ TEXT expected = <<-EXPECTED.rstrip we don't worry too much. The comments associated with EXPECTED assert_equal expected, normalize_comment(text) end def test_parse assert_kind_of RDoc::Markup::Document, parse('hi') end def test_parse_comment expected = RDoc::Markup::Document.new expected.file = @top_level c = comment '' parsed = parse c assert_equal expected, parsed assert_same parsed, parse(c) end def test_parse_document assert_equal RDoc::Markup::Document.new, parse(RDoc::Markup::Document.new) end def test_parse_empty assert_equal RDoc::Markup::Document.new, parse('') end def test_parse_empty_newline assert_equal RDoc::Markup::Document.new, parse("#\n") end def test_parse_format_markdown expected = @RM::Document.new( @RM::Paragraph.new('it _works_')) parsed = parse 'it *works*', 'markdown' assert_equal expected, parsed end def test_parse_format_rd expected = @RM::Document.new( @RM::Paragraph.new('it works')) parsed = parse 'it ((*works*))', 'rd' assert_equal expected, parsed end def test_parse_format_tomdoc code = verb('1 + 1') code.format = :ruby expected = doc( para('It does a thing'), blank_line, head(3, 'Examples'), blank_line, code) text = <<-TOMDOC It does a thing Examples 1 + 1 TOMDOC parsed = parse text, 'tomdoc' assert_equal expected, parsed end def test_parse_newline assert_equal RDoc::Markup::Document.new, parse("\n") end def test_snippet text = <<-TEXT This is one-hundred characters or more of text in a single paragraph. This paragraph will be cut off some point after the one-hundredth character. TEXT expected = <<-EXPECTED

This is one-hundred characters or more of text in a single paragraph. This paragraph will be cut off … EXPECTED assert_equal expected, snippet(text) end def test_snippet_comment c = comment 'This is a comment' assert_equal "

This is a comment\n", snippet(c) end def test_snippet_short text = 'This is a comment' assert_equal "

#{text}\n", snippet(text) end def test_strip_hashes text = <<-TEXT ## # we don't worry too much. # # The comments associated with TEXT expected = <<-EXPECTED we don't worry too much. The comments associated with EXPECTED assert_equal expected, strip_hashes(text) end def test_strip_hashes_encoding skip "Encoding not implemented" unless Object.const_defined? :Encoding text = <<-TEXT ## # we don't worry too much. # # The comments associated with TEXT text.force_encoding Encoding::CP852 expected = <<-EXPECTED we don't worry too much. The comments associated with EXPECTED stripped = strip_hashes text assert_equal expected, stripped assert_equal Encoding::CP852, stripped.encoding end def test_strip_newlines assert_equal ' ', strip_newlines("\n \n") assert_equal 'hi', strip_newlines("\n\nhi") assert_equal 'hi', strip_newlines( "hi\n\n") assert_equal 'hi', strip_newlines("\n\nhi\n\n") end def test_strip_newlines_encoding skip "Encoding not implemented" unless Object.const_defined? :Encoding assert_equal Encoding::UTF_8, ''.encoding, 'Encoding sanity check' text = " \n" text.force_encoding Encoding::US_ASCII stripped = strip_newlines text assert_equal ' ', stripped assert_equal Encoding::US_ASCII, stripped.encoding end def test_strip_stars text = <<-TEXT /* * * we don't worry too much. * * The comments associated with */ TEXT expected = <<-EXPECTED * we don't worry too much. The comments associated with EXPECTED assert_equal expected, strip_stars(text) end def test_strip_stars_document_method text = <<-TEXT /* * Document-method: Zlib::GzipFile#mtime= * * A comment */ TEXT expected = <<-EXPECTED A comment EXPECTED assert_equal expected, strip_stars(text) end def test_strip_stars_encoding skip "Encoding not implemented" unless Object.const_defined? :Encoding text = <<-TEXT /* * * we don't worry too much. * * The comments associated with */ TEXT text.force_encoding Encoding::CP852 expected = <<-EXPECTED * we don't worry too much. The comments associated with EXPECTED result = strip_stars text assert_equal expected, result assert_equal Encoding::CP852, result.encoding end def test_strip_stars_encoding2 skip "Encoding not implemented" unless Object.const_defined? :Encoding text = <<-TEXT /* * * we don't worry too much. * * The comments associated with */ TEXT text.force_encoding Encoding::BINARY expected = <<-EXPECTED * we don't worry too much. The comments associated with EXPECTED result = strip_stars text assert_equal expected, result assert_equal Encoding::BINARY, result.encoding end def test_strip_stars_no_stars text = <<-TEXT * we don't worry too much. The comments associated with TEXT expected = <<-EXPECTED * we don't worry too much. The comments associated with EXPECTED assert_equal expected, strip_stars(text) end def test_to_html_apostrophe assert_equal '‘a', to_html("'a") assert_equal 'a’', to_html("a'") assert_equal '‘a’ ‘', to_html("'a' '") end def test_to_html_backslash assert_equal 'S', to_html('\\S') end def test_to_html_br assert_equal '
', to_html('
') end def test_to_html_copyright assert_equal '©', to_html('(c)') end def test_to_html_dash assert_equal '-', to_html('-') assert_equal '–', to_html('--') assert_equal '—', to_html('---') assert_equal '—-', to_html('----') end def test_to_html_double_backtick assert_equal '“a', to_html('``a') assert_equal '“a“', to_html('``a``') end def test_to_html_double_quote assert_equal '“a', to_html('"a') assert_equal '“a”', to_html('"a"') end def test_to_html_double_quote_quot assert_equal '“a', to_html('"a') assert_equal '“a”', to_html('"a"') end def test_to_html_double_tick assert_equal '”a', to_html("''a") assert_equal '”a”', to_html("''a''") end def test_to_html_ellipsis assert_equal '..', to_html('..') assert_equal '…', to_html('...') assert_equal '.…', to_html('....') end def test_to_html_encoding skip "Encoding not implemented" unless Object.const_defined? :Encoding s = '...(c)'.encode Encoding::Shift_JIS html = to_html s assert_equal Encoding::Shift_JIS, html.encoding expected = '…(c)'.encode Encoding::Shift_JIS assert_equal expected, html end def test_to_html_html_tag assert_equal 'hi’s', to_html('hi\'s') end def test_to_html_registered_trademark assert_equal '®', to_html('(r)') end def test_to_html_tt_tag assert_equal 'hi\'s', to_html('hi\'s') assert_equal 'hi\\\'s', to_html('hi\\\\\'s') end def test_to_html_tt_tag_mismatch _, err = verbose_capture_io do assert_equal 'hi', to_html('hi') end assert_equal "mismatched tag\n", err end def formatter RDoc::Markup::ToHtml.new @options end def options @options end end