# frozen_string_literal: true

require "test_helper"
require "minitest/benchmark" if ENV["BENCH"]

def markdown(str)
  CommonMarker.render_doc(str).to_html
end

# list of pairs consisting of input and a regex that must match the output.
pathological = {
  "nested strong emph" =>
              ["#{"*a **a " * 65_000}b#{" a** a*" * 65_000}",
               Regexp.compile("(<em>a <strong>a ){65_000}b( a</strong> a</em>){65_000}"),],
  "many emph closers with no openers" =>
               [("a_ " * 65_000),
                Regexp.compile("(a[_] ){64999}a_"),],
  "many emph openers with no closers" =>
               [("_a " * 65_000),
                Regexp.compile("(_a ){64999}_a"),],
  "many link closers with no openers" =>
               [("a]" * 65_000),
                Regexp.compile('(a\]){65_000}'),],
  "many link openers with no closers" =>
               [("[a" * 65_000),
                Regexp.compile('(\[a){65_000}'),],
  "mismatched openers and closers" =>
               [("*a_ " * 50_000),
                Regexp.compile("([*]a[_] ){49999}[*]a_"),],
  "link openers and emph closers" =>
               [("[ a_" * 50_000),
                Regexp.compile('(\[ a_){50000}'),],
  "hard link/emph case" =>
               ["**x [a*b**c*](d)",
                Regexp.compile('\\*\\*x <a href=\'d\'>a<em>b</em><em>c</em></a>'),],
  "nested brackets" =>
               ["#{"[" * 50_000}a#{"]" * 50_000}",
                Regexp.compile('\[{50000}a\]{50000}'),],
  "nested block quotes" =>
               ["#{"> " * 50_000}a",
                Regexp.compile('(<blockquote>\n){50000}'),],
  "U+0000 in input" =>
               ['abc\u0000de\u0000',
                Regexp.compile('abc\ufffd?de\ufffd?'),],
}

pathological.each_pair do |name, description|
  define_method("test_#{name}") do
    input, = description

    assert markdown(input)
  end
end

if ENV["BENCH"]
  class PathologicalInputsPerformanceTest < Minitest::Benchmark
    def test_bench_pathological_one
      assert_performance_linear(0.99) do |n|
        star = "*" * (n * 10)
        markdown("#{star}#{star}hi#{star}#{star}")
      end
    end

    def test_bench_pathological_two
      assert_performance_linear(0.99) do |n|
        c = "`t`t`t`t`t`t" * (n * 10)
        markdown(c)
      end
    end

    def test_bench_pathological_three
      assert_performance_linear(0.99) do |n|
        markdown(" [a]: #{"A" * n}\n\n#{"[a][]" * n}\n")
      end
    end

    def test_bench_pathological_four
      assert_performance_linear(0.5) do |n|
        markdown("#{"[" * n}a#{"]" * n}")
      end
    end

    def test_bench_pathological_five
      assert_performance_linear(0.99) do |n|
        markdown("#{"**a *a " * n}#{"a* a**" * n}")
      end
    end

    def test_bench_unbound_recursion
      assert_performance_linear(0.99) do |n|
        markdown("#{"[" * n}foo#{"](bar)" * n}")
      end
    end
  end
end