# encoding: utf-8
require File.expand_path(File.join(File.dirname(__FILE__),'test_helper'))

class WikiParser < WikiCloth::Parser
  url_for do |page|
    page
  end

  image_url_for do |url|
    File.join("/images/", url)
  end

  template do |template|
    case template
    when "noinclude"
      "<noinclude>hello world</noinclude><includeonly>testing</includeonly>"
    when "test"
      "busted"
    when "nowiki"
      "hello world"
    when "testparams"
      "{{{def|hello world}}} {{{1}}} {{{test}}} {{{nested|{{{2}}}}}}"
    when "moreparamtest"
      "{{{{{test|bla}}|wtf}}}"
    when "loop"
      "{{loop}}"
    when "tablebegin"
      "<table>"
    when "tablemid"
      "<tr><td>test</td></tr>"
    when "tableend"
      "</table>"
    end
  end
  external_link do |url,text|
    "<a href=\"#{url}\" target=\"_blank\" class=\"exlink\">#{text.blank? ? url : text}</a>"
  end
end

class WikiClothTest < ActiveSupport::TestCase

  test "a url should be automaticly linked" do
    wiki = WikiCloth::Parser.new(:data => "\n\n\nhttp://www.google.com/")
    data = wiki.to_html
    assert data.include?('<a href="http://www.google.com/">')
    wiki = WikiCloth::Parser.new(:data => "hello http://www.google.com/ world")
    data = wiki.to_html
    assert data.include?('<a href="http://www.google.com/">')
    wiki = WikiCloth::Parser.new(:data => "http://www.google.com/")
    data = wiki.to_html
    assert data.include?('<a href="http://www.google.com/">')
    wiki = WikiCloth::Parser.new(:data => "[https://github.com/repo/README.md README]")
    data = wiki.to_html
    assert data.include?('https://github.com/repo/README.md')
    assert data =~ /\>\s*README\s*\</
  end

  test "image url override" do
    wiki = WikiCloth::Parser.new(:data => "[[Image:test.jpg]]")
    data = wiki.to_html
    assert !data.include?("/images/test.jpg")
    assert data.include?("\"test.jpg\"")

    wiki = WikiParser.new(:data => "[[Image:test.jpg]]")
    data = wiki.to_html
    assert data.include?("/images/test.jpg")
  end

  test "wiki table attributes without quotes" do
    wiki = WikiParser.new(:data => "{| width=\"95%\"
!colspan=2 style=\"background-color:#ffebac;\"|Heading
|-
|hello||world
|}")
    data = wiki.to_html
    assert data.include?("<table width=\"95%\">")
    assert data.include?("colspan=\"2\"")
    assert data.include?("hello")
    assert data.include?("world")
  end

  test "nested bold/italic markup" do
    wiki = WikiParser.new(:data => "''Mars goes around the Sun once in a Martian '''year''', or 1.88 Earth '''years'''.''")
    data = wiki.to_html
    assert data.include?("<i>Mars goes around the Sun once in a Martian <b>year</b>, or 1.88 Earth <b>years</b>.</i>")
  end

  test "google charts math tag" do
    wiki = WikiParser.new(:data => "<math>1+1=2</math>", :math_formatter => :google)
    data = wiki.to_html
    assert data.include?("https://chart.googleapis.com/chart")
  end

  test "uc lc ucfirst lcfirst" do
    wiki = WikiParser.new(:data => "{{uc:hello}} -- {{lc:BOO}} -- {{ucfirst:john}} -- {{lcfirst:TEST}}")
    data = wiki.to_html
    assert data =~ /HELLO/
    assert data !~ /hello/
    assert data =~ /boo/
    assert data !~ /BOO/
    assert data =~ /John/
    assert data !~ /john/
    assert data =~ /tEST/
    assert data !~ /TEST/
  end

  test "plural parser function" do
    wiki = WikiParser.new(:data => "{{plural:1|is|are}}")
    data = wiki.to_html
    assert data =~ /is/

    wiki = WikiParser.new(:data => "{{plural:2|is|are}}")
    data = wiki.to_html
    assert data =~ /are/

    wiki = WikiParser.new(:data => "{{plural:14/2|is|are}}")
    data = wiki.to_html
    assert data =~ /are/

    wiki = WikiParser.new(:data => "{{plural:14/2-6|is|are}}")
    data = wiki.to_html
    assert data =~ /is/
  end

  test "parser functions on multiple lines" do
    wiki = WikiParser.new(:data => "{{
    #if:
    |hello world
    |{{
      #if:test
      |boo
      |
      }}
    }}")
    data = wiki.to_html
    assert data =~ /boo/
  end

  test "wiki variables" do
    wiki = WikiParser.new(:data => "{{PAGENAME}}", :params => { "PAGENAME" => "Main_Page" })
    data = wiki.to_html
    assert data =~ /Main_Page/
  end

  test "references" do
    wiki = WikiParser.new(:data => "hello <ref name=\"test\">This is a reference</ref> world <ref name=\"test\"/>")
    data = wiki.to_html
    assert data !~ /This is a reference/
    assert data =~ /sup/
    assert data =~ /cite_ref-test_1-0/
    assert data =~ /cite_ref-test_1-1/

    wiki = WikiParser.new(:data => "hello <ref name=\"test\">This is a reference</ref> world <ref name=\"test\"/>\n==References==\n<references/>")
    data = wiki.to_html
    assert data =~ /This is a reference/

    # reference groups
    wiki = WikiParser.new(:data => "hello <ref>one</ref><ref>two</ref><ref group=\"other\">three</ref><ref>four</ref>\n==References==\n<references/>")
    data = wiki.to_html
    assert data =~ /one/
    assert data =~ /two/
    assert data !~ /three/
    assert data =~ /four/

    wiki = WikiParser.new(:data => "hello <ref>one</ref><ref>two</ref><ref group=\"other\">three</ref><ref>four</ref>\n==References==\n<references group=\"other\"/>")
    data = wiki.to_html
    assert data !~ /one/
    assert data !~ /two/
    assert data =~ /three/
    assert data !~ /four/
  end

  test "localised language names" do
    wiki = WikiParser.new(:data => "{{#language:de}}", :locale => :de)
    assert wiki.to_html =~ /Deutsch/

    wiki = WikiParser.new(:data => "{{#language:de}}", :locale => :en)
    assert wiki.to_html =~ /German/
  end

  test "localised behavior switches" do
    wiki = WikiParser.new(:data => "==test==", :locale => :de)
    assert wiki.to_html =~ /Bearbeiten/
    wiki = WikiParser.new(:data => "__ABSCHNITTE_NICHT_BEARBEITEN__\n==test==")
    data = wiki.to_html
    assert data =~ /edit/
    wiki = WikiParser.new(:data => "__ABSCHNITTE_NICHT_BEARBEITEN__\n==test==", :locale => :de)
    data = wiki.to_html
    assert data !~ /ABSCHNITTE_NICHT_BEARBEITEN/
    assert data !~ /Bearbeiten/
  end

  test "namespace localisation" do
    assert WikiCloth::Parser.localise_ns("File") == "File"
    assert WikiCloth::Parser.localise_ns("Image") == "File"
    assert WikiCloth::Parser.localise_ns("Datei") == "File"
    assert WikiCloth::Parser.localise_ns("File",:de) == "Datei"
    wiki = WikiParser.new(:data => "{{ns:File}}", :locale => :de)
    assert wiki.to_html =~ /Datei/

    wiki = WikiParser.new(:data => "{{ns:Image}}", :locale => :de)
    assert wiki.to_html =~ /Datei/
  end

  test "headings inside of pre tags" do
    wiki = WikiParser.new(:data => "<pre>\n\n== heading ==\n\n</pre>")
    data = wiki.to_html
    assert data !~ /h2/
  end

  test "math tag" do
    wiki = WikiParser.new(:data => "<math>1-\frac{k}{|E(G_j)|}</math>")
    begin
      data = wiki.to_html
      assert true
    rescue
      assert false
    end
  end

  test "links and references" do
    wiki = WikiCloth::Parser.new(:data => File.open(File.join(File.dirname(__FILE__), '../sample_documents/george_washington.wiki'), READ_MODE) { |f| f.read })
    data = wiki.to_html
    assert wiki.external_links.size == 38
    assert wiki.references.size == 76
    assert wiki.internal_links.size == 432 #322
    assert wiki.categories.size == 27
    assert wiki.languages.size == 101
  end
 
  test "links with imbedded links" do
    wiki = WikiParser.new(:data => "[[Datei:Schulze and Gerard 01.jpg|miniatur|Klaus Schulze während eines Konzerts mit [[Lisa Gerrard]]]] hello world")
    data = wiki.to_html
    assert data =~ /Lisa Gerrard/
  end
 
  test "links with trailing letters" do
    wiki = WikiParser.new(:data => "[[test]]s [[rawr]]alot [[some]]thi.ng [[a]] space")
    data = wiki.to_html
    assert data =~ /tests/
    assert data =~ /href="test"/
    assert data =~ /rawralot/
    assert data !~ /something/
    assert data !~ /aspace/
  end

  test "piped links with trailing letters" do
    wiki = WikiParser.new(:data => "[[a|b]]c [[b|c]]d<nowiki>e</nowiki>")
    data = wiki.to_html
    assert data =~ /bc/
    assert data =~ /href="a"/
    assert data =~ /cd/
    assert data !~ /cde/
  end

  test "Embedded images with no explicit title" do
    wiki = WikiParser.new(:data => "[[Image:Rectangular coordinates.svg|left|thumb|250px]]")
    test = true
    begin
      data = wiki.to_html
    rescue
      test = false 
    end
    assert test == true
  end

  test "First item in list not created when list is preceded by a heading" do
    wiki = WikiParser.new(:data => "=Heading=\n* One\n* Two\n* Three")
    data = wiki.to_html
    assert data !~ /\*/
  end

  test "behavior switch should not show up in the html output" do
    wiki = WikiParser.new(:data => "__NOTOC__hello world")
    data = wiki.to_html
    assert data !~ /TOC/
  end

  test "template vars should not be parsed inside a pre tag" do
    wiki = WikiCloth::Parser.new(:data => "<pre>{{{1}}}</pre>")
    data = wiki.to_html
    assert data =~ /&#123;&#123;&#123;1&#125;&#125;&#125;/
  end

  test "[[ links ]] should not work inside pre tags" do
    data = <<EOS 
Now instead of calling WikiCloth::Parser directly call your new class.

<pre>  @wiki = WikiParser.new({
    :params => { "PAGENAME" => "Testing123" },
    :data => "[[test]] {{hello|world}} From {{ PAGENAME }} -- [www.google.com]"
  })

  @wiki.to_html</pre>
EOS
    wiki = WikiCloth::Parser.new(:data => data)
    data = wiki.to_html
    assert data !~ /href/
    assert data !~ /\{/
    assert data !~ /\]/
  end

  test "auto pre at end of document" do
    wiki = WikiParser.new(:data => "test\n\n hello\n world\nend")
    data = wiki.to_html
    assert data =~ /hello/
    assert data =~ /world/

    wiki = WikiParser.new(:data => "test\n\n hello\n world")
    data = wiki.to_html
    assert data =~ /hello/
    assert data =~ /world/
  end

  test "template params" do
    wiki = WikiParser.new(:data => "{{testparams|test|test=bla|it worked|bla=whoo}}\n")
    data = wiki.to_html
    assert data =~ /hello world/
    assert data =~ /test/
    assert data =~ /bla/
    assert data =~ /it worked/ # nested default param

    wiki = WikiParser.new(:data => "{{moreparamtest|p=othervar}}")
    data = wiki.to_html
    assert data =~ /wtf/

    wiki = WikiParser.new(:data => "{{moreparamtest|p=othervar|busted=whoo}}")
    data = wiki.to_html
    assert data =~ /whoo/
  end
  
  test "table spanning template" do
    wiki = WikiParser.new(:data => "{{tablebegin}}{{tablemid}}{{tableend}}")
    data = wiki.to_html
    
    assert data =~ /test/
  end

  test "horizontal rule" do
    wiki = WikiParser.new(:data => "----\n")
    data = wiki.to_html
    assert data =~ /hr/
  end

  test "template loops" do
    wiki = WikiParser.new(:data => "{{#iferror:{{loop}}|loop detected|wtf}}")
    data = wiki.to_html
    assert data =~ /loop detected/
  end

  test "input with no newline" do
    wiki = WikiParser.new(:data => "{{test}}")
    data = wiki.to_html
    assert data =~ /busted/
  end

  test "nested lists" do
    wiki = WikiParser.new(:data => "# one\n#* eee\n#* eee\n# two\n# three")
    data = wiki.to_html
    assert data.include?("<ol><li>one<ul><li>eee</li><li>eee</li></ul></li><li>two</li><li>three</li></ol>")
  end

  test "lists" do
    wiki = WikiParser.new(:data => "* item 1\n* item 2\n* item 3\n")
    data = wiki.to_html
    assert data =~ /ul/
    count = 0
    # should == 6.. 3 <li>'s and 3 </li>'s
    data.gsub(/li/) { |ret|
      count += 1
      ret
    }
    assert_equal count.to_s, "6"
  end

  test "noinclude and includeonly tags" do
    wiki = WikiParser.new(:data => "<noinclude>main page</noinclude><includeonly>never seen</includeonly>{{noinclude}}\n")
    data = wiki.to_html
    assert data =~ /testing/
    assert data =~ /main page/
    assert !(data =~ /never seen/)
    assert !(data =~ /hello world/)
  end

  test "bold/italics" do
    wiki = WikiParser.new(:data => "test ''testing'' '''123''' '''''echo'''''\n")
    data = wiki.to_html
    assert data =~ /<i>testing<\/i>/
    assert data =~ /<b>123<\/b>/
    assert data =~ /<i><b>echo<\/b><\/i>/
  end

  test "sanitize html" do
    wiki = WikiParser.new(:data => "<script type=\"text/javascript\" src=\"bla.js\"></script>\n<a href=\"test.html\" onmouseover=\"alert('hello world');\">test</a>\n")
    data = wiki.to_html
    assert !(data =~ /<script/)
    assert !(data =~ /onmouseover/)
  end

  test "nowiki and code tags" do
    wiki = WikiParser.new(:data => "<nowiki>{{test}}</nowiki><code>{{test}}</code>{{nowiki}}\n")
    data = wiki.to_html
    assert !(data =~ /busted/)
    assert data =~ /hello world/
  end

  test "disable edit stuff" do
    wiki = WikiParser.new(:data => "= Hallo =")
    data = wiki.to_html
    assert data =~ /editsection/

    data = wiki.to_html(:noedit => true)
    assert data !~ /editsection/
  end

  test "render toc" do
    wiki = WikiCloth::WikiCloth.new({:data => "=A=\n=B=\n=C=\n=D="})
    data = wiki.render
    assert data =~ /A/
  end

  test "table after paragraph" do
    wiki = WikiCloth::WikiCloth.new({:data => "A\n{|style=""\n|\n|}"})
    data = wiki.render
    assert data =~ /table/
  end

  test "pre trailing newlines" do
    wiki = WikiCloth::WikiCloth.new({:data => "A\n B\n\n\n\nC"})
    data = wiki.render
    assert_equal data, "\n<p>A\n</p>\n<p><pre> B\n</pre>\n</p>\n\n\n\n<p>C</p>"
  end

  test "pre at eof" do
    wiki = WikiCloth::WikiCloth.new({:data => "A\n B\n"})
    data = wiki.render
    assert_equal data, "\n<p>A\n</p>\n<p><pre> B\n</pre>\n</p>"
  end

  test "empty item in toc" do
    wiki = WikiCloth::WikiCloth.new({:data => "__TOC__\n=A="})
    data = wiki.render
    assert data.include?("<table id=\"toc\" class=\"toc\" summary=\"Contents\"><tr><td><div id=\"toctitle\"><h2>Table of Contents</h2></div><ul></li><li><a href=\"#A\">A</a></li></ul></td></tr></table>")
  end

  test "pre at beginning" do
    wiki = WikiCloth::WikiCloth.new({:data => " A"})
    data = wiki.render
    assert_equal data, "\n\n<p><pre> A\n</pre>\n</p>"
  end

  test "toc declared as list" do
    wiki = WikiCloth::WikiCloth.new({:data => "__TOC__\n=A=\n==B==\n===C==="})
    data = wiki.render
    assert data.include?("<table id=\"toc\" class=\"toc\" summary=\"Contents\"><tr><td><div id=\"toctitle\"><h2>Table of Contents</h2></div><ul></li><li><a href=\"#A\">A</a><ul><li><a href=\"#B\">B</a><ul><li><a href=\"#C\">C</a></li></ul></ul></ul></td></tr></table>")
  end

  test "toc numbered" do
    wiki = WikiCloth::WikiCloth.new({:data => "=A=\n=B=\n==C==\n==D==\n===E===\n===F===\n====G====\n====H====\n==I==\n=J=\n=K=\n===L===\n===M===\n====N====\n====O===="})
    data = wiki.render(:noedit => true, :toc_numbered => true)
    assert data.include?("<table id=\"toc\" class=\"toc\" summary=\"Contents\"><tr><td><div id=\"toctitle\"><h2>Table of Contents</h2></div><ul></li><li><a href=\"#A\">1 A</a></li><li><a href=\"#B\">2 B</a><ul><li><a href=\"#C\">2.1 C</a></li><li><a href=\"#D\">2.2 D</a><ul><li><a href=\"#E\">2.2.1 E</a></li><li><a href=\"#F\">2.2.2 F</a><ul><li><a href=\"#G\">2.2.2.1 G</a></li><li><a href=\"#H\">2.2.2.2 H</a></li></ul></ul><li><a href=\"#I\">2.3 I</a></li></ul><li><a href=\"#J\">3 J</a></li><li><a href=\"#K\">4 K</a><ul><ul><li><a href=\"#L\">4.1 L</a></li><li><a href=\"#M\">4.2 M</a><ul><li><a href=\"#N\">4.2.1 N</a></li><li><a href=\"#O\">4.2.2 O</a></li></ul></ul></ul></ul></td></tr></table>")
  end
end