# -*- encoding: UTF-8 -*-
require 'test_helper'
require 'minitest/autorun'

module Wovnrb
  class LangTest < WovnMiniTest

    def test_langs_exist
      refute_nil(Wovnrb::Lang::LANG)
    end

    def test_langs_length
      assert_equal(28, Wovnrb::Lang::LANG.length)
    end

    def test_keys_exist
      Wovnrb::Lang::LANG.each do |k, l|
        assert(l.has_key?(:name))
        assert(l.has_key?(:code))
        assert(l.has_key?(:en))
        assert_equal(k, l[:code])
      end
    end

    def test_iso_639_1_normalization
       assert_equal('ar',       Lang::iso_639_1_normalization('ar'));
       assert_equal('bg',       Lang::iso_639_1_normalization('bg'));
       assert_equal('zh-Hans',  Lang::iso_639_1_normalization('zh-CHS'));
       assert_equal('zh-Hant',  Lang::iso_639_1_normalization('zh-CHT'));
       assert_equal('da',       Lang::iso_639_1_normalization('da'));
       assert_equal('nl',       Lang::iso_639_1_normalization('nl'));
       assert_equal('en',       Lang::iso_639_1_normalization('en'));
       assert_equal('fi',       Lang::iso_639_1_normalization('fi'));
       assert_equal('fr',       Lang::iso_639_1_normalization('fr'));
       assert_equal('de',       Lang::iso_639_1_normalization('de'));
       assert_equal('el',       Lang::iso_639_1_normalization('el'));
       assert_equal('he',       Lang::iso_639_1_normalization('he'));
       assert_equal('id',       Lang::iso_639_1_normalization('id'));
       assert_equal('it',       Lang::iso_639_1_normalization('it'));
       assert_equal('ja',       Lang::iso_639_1_normalization('ja'));
       assert_equal('ko',       Lang::iso_639_1_normalization('ko'));
       assert_equal('ms',       Lang::iso_639_1_normalization('ms'));
       assert_equal('no',       Lang::iso_639_1_normalization('no'));
       assert_equal('pl',       Lang::iso_639_1_normalization('pl'));
       assert_equal('pt',       Lang::iso_639_1_normalization('pt'));
       assert_equal('ru',       Lang::iso_639_1_normalization('ru'));
       assert_equal('es',       Lang::iso_639_1_normalization('es'));
       assert_equal('sv',       Lang::iso_639_1_normalization('sv'));
       assert_equal('th',       Lang::iso_639_1_normalization('th'));
       assert_equal('hi',       Lang::iso_639_1_normalization('hi'));
       assert_equal('tr',       Lang::iso_639_1_normalization('tr'));
       assert_equal('uk',       Lang::iso_639_1_normalization('uk'));
       assert_equal('vi',       Lang::iso_639_1_normalization('vi'));
    end

    def test_get_code_with_valid_code
      assert_equal('ms', Wovnrb::Lang.get_code('ms'))
    end

    def test_get_code_with_capital_letters
      assert_equal('zh-CHT', Wovnrb::Lang.get_code('zh-cht'))
    end

    def test_get_code_with_valid_english_name
      assert_equal('pt', Wovnrb::Lang.get_code('Portuguese'))
    end

    def test_get_code_with_valid_native_name
      assert_equal('hi', Wovnrb::Lang.get_code('हिन्दी'))
    end

    def test_get_code_with_invalid_name
      assert_equal(nil, Wovnrb::Lang.get_code('WOVN4LYFE'))
    end

    def test_get_code_with_empty_string
      assert_equal(nil, Wovnrb::Lang.get_code(''))
    end

    def test_get_code_with_nil
      assert_equal(nil, Wovnrb::Lang.get_code(nil))
    end

    def test_add_lang_code
      lang = Lang.new('zh-cht')
      h = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://favy.tips'), Wovnrb.get_settings('url_pattern' => 'subdomain', 'url_pattern_reg' => '^(?<lang>[^.]+).'))
      assert_equal("http://www.facebook.com", lang.add_lang_code("http://www.facebook.com", 'subdomain', h))
    end

    def test_add_lang_code_relative_slash_href_url_with_path
      lang = Lang.new('fr')
      h = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://fr.favy.tips/topics/44'), Wovnrb.get_settings('url_pattern' => 'subdomain', 'url_pattern_reg' => '^(?<lang>[^.]+).'))
      assert_equal("http://fr.favy.tips/topics/50", lang.add_lang_code("/topics/50", 'subdomain', h))
    end

    def test_add_lang_code_relative_dot_href_url_with_path
      lang = Lang.new('fr')
      h = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://fr.favy.tips/topics/44'), Wovnrb.get_settings('url_pattern' => 'subdomain', 'url_pattern_reg' => '^(?<lang>[^.]+).'))
      assert_equal("http://fr.favy.tips/topics/44/topics/50", lang.add_lang_code("./topics/50", 'subdomain', h))
    end

    def test_add_lang_code_relative_two_dots_href_url_with_path
      lang = Lang.new('fr')
      h = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://fr.favy.tips/topics/44'), Wovnrb.get_settings('url_pattern' => 'subdomain', 'url_pattern_reg' => '^(?<lang>[^.]+).'))
      assert_equal("http://fr.favy.tips/topics/50", lang.add_lang_code("../topics/50", 'subdomain', h))
    end

    def test_add_lang_code_trad_chinese
      lang = Lang.new('zh-cht')
      h = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://favy.tips'), Wovnrb.get_settings('url_pattern' => 'subdomain', 'url_pattern_reg' => '^(?<lang>[^.]+).'))
      assert_equal("http://zh-cht.favy.tips/topics/31", lang.add_lang_code("http://favy.tips/topics/31", 'subdomain', h))
    end

    def test_add_lang_code_trad_chinese_2
      lang = Lang.new('zh-cht')
      h = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://zh-cht.favy.tips'), Wovnrb.get_settings('url_pattern' => 'subdomain', 'url_pattern_reg' => '^(?<lang>[^.]+).'))
      assert_equal("http://zh-cht.favy.tips/topics/31", lang.add_lang_code("/topics/31", 'subdomain', h))
    end

    def test_add_lang_code_trad_chinese_lang_in_link_already
      lang = Lang.new('zh-cht')
      h = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://zh-cht.favy.tips'), Wovnrb.get_settings('url_pattern' => 'subdomain', 'url_pattern_reg' => '^(?<lang>[^.]+).'))
      assert_equal("http://zh-cht.favy.tips/topics/31", lang.add_lang_code("http://zh-cht.favy.tips/topics/31", 'subdomain', h))
    end

    def test_add_lang_code_no_protocol
      lang = Lang.new('zh-cht')
      h = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'https://zh-cht.google.com'), Wovnrb.get_settings('url_pattern' => 'subdomain', 'url_pattern_reg' => '^(?<lang>[^.]+).'))
      assert_equal("//zh-cht.google.com", lang.add_lang_code("//google.com", 'subdomain', h))
    end

    def test_add_lang_code_no_protocol_2
      lang = Lang.new('zh-cht')
      h = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'https://zh-cht.favy.tips'), Wovnrb.get_settings('url_pattern' => 'subdomain', 'url_pattern_reg' => '^(?<lang>[^.]+).'))
      assert_equal("//google.com", lang.add_lang_code("//google.com", 'subdomain', h))
    end

    def test_add_lang_code_invalid_url
      lang = Lang.new('zh-cht')
      h = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://favy.tips'), Wovnrb.get_settings('url_pattern' => 'subdomain', 'url_pattern_reg' => '^(?<lang>[^.]+).'))
      assert_equal("http://www.facebook.com/sharer.php?u=http://favy.tips/topics/50&amp;amp;t=Gourmet Tofu World: Vegetarian-Friendly Japanese Food is Here!", lang.add_lang_code("http://www.facebook.com/sharer.php?u=http://favy.tips/topics/50&amp;amp;t=Gourmet Tofu World: Vegetarian-Friendly Japanese Food is Here!", 'subdomain', h))
    end

    def test_add_lang_code_path_only_with_slash
      lang = Lang.new('zh-cht')
      h = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://favy.tips'), Wovnrb.get_settings('url_pattern' => 'subdomain', 'url_pattern_reg' => '^(?<lang>[^.]+).'))
      assert_equal("http://zh-cht.favy.tips/topics/31", lang.add_lang_code("/topics/31", 'subdomain', h))
    end

    def test_add_lang_code_path_only_no_slash
      lang = Lang.new('zh-cht')
      h = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://favy.tips'), Wovnrb.get_settings('url_pattern' => 'subdomain', 'url_pattern_reg' => '^(?<lang>[^.]+).'))
      assert_equal("http://zh-cht.favy.tips/topics/31", lang.add_lang_code("topics/31", 'subdomain', h))
    end

    def test_add_lang_code_path_explicit_page_no_slash
      lang = Lang.new('zh-cht')
      h = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://favy.tips'), Wovnrb.get_settings('url_pattern' => 'subdomain', 'url_pattern_reg' => '^(?<lang>[^.]+).'))
      assert_equal("http://zh-cht.favy.tips/topics/31.html", lang.add_lang_code("topics/31.html", 'subdomain', h))
    end

    def test_add_lang_code_path_explicit_page_with_slash
      lang = Lang.new('zh-cht')
      h = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://favy.tips'), Wovnrb.get_settings('url_pattern' => 'subdomain', 'url_pattern_reg' => '^(?<lang>[^.]+).'))
      assert_equal("http://zh-cht.favy.tips/topics/31.html", lang.add_lang_code("/topics/31.html", 'subdomain', h))
    end

    def test_add_lang_code_no_protocol_with_path_explicit_page
      lang = Lang.new('zh-cht')
      h = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://favy.tips'), Wovnrb.get_settings('url_pattern' => 'subdomain', 'url_pattern_reg' => '^(?<lang>[^.]+).'))
      assert_equal("//www.google.com/topics/31.php", lang.add_lang_code("//www.google.com/topics/31.php", 'subdomain', h))
    end

    def test_add_lang_code_protocol_with_path_explicit_page
      lang = Lang.new('zh-cht')
      h = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://favy.tips'), Wovnrb.get_settings('url_pattern' => 'subdomain', 'url_pattern_reg' => '^(?<lang>[^.]+).'))
      assert_equal("http://www.google.com/topics/31.php", lang.add_lang_code("http://www.google.com/topics/31.php", 'subdomain', h))
    end

    def test_add_lang_code_relative_path_double_period
      lang = Lang.new('zh-cht')
      h = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://favy.tips'), Wovnrb.get_settings('url_pattern' => 'subdomain', 'url_pattern_reg' => '^(?<lang>[^.]+).'))
      assert_equal("http://zh-cht.favy.tips/topics/31", lang.add_lang_code("../topics/31", 'subdomain', h))
    end

    def test_add_lang_code_relative_path_single_period
      lang = Lang.new('zh-cht')
      h = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://favy.tips'), Wovnrb.get_settings('url_pattern' => 'subdomain', 'url_pattern_reg' => '^(?<lang>[^.]+).'))
      assert_equal("http://zh-cht.favy.tips/topics/31", lang.add_lang_code("./topics/31", 'subdomain', h))
    end

    def test_add_lang_code_empty_href
      lang = Lang.new('zh-cht')
      h = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://favy.tips'), Wovnrb.get_settings('url_pattern' => 'subdomain', 'url_pattern_reg' => '^(?<lang>[^.]+).'))
      assert_equal("", lang.add_lang_code("", 'subdomain', h))
    end

    def test_add_lang_code_hash_href
      lang = Lang.new('zh-cht')
      h = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://favy.tips'), Wovnrb.get_settings('url_pattern' => 'subdomain', 'url_pattern_reg' => '^(?<lang>[^.]+).'))
      assert_equal("#", lang.add_lang_code("#", 'subdomain', h))
    end

    def test_add_lang_code_nil_href
      lang = Lang.new('en')
      h = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://favy.tips'), Wovnrb.get_settings)
      assert_equal(nil, lang.add_lang_code(nil,'path', h))
    end
    def test_add_lang_code_absolute_different_host
      lang = Lang.new('fr')
      h = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://google.com'), Wovnrb.get_settings)
      assert_equal('http://yahoo.co.jp', lang.add_lang_code('http://yahoo.co.jp', 'path', h))
    end

    def test_add_lang_code_absolute_subdomain_no_subdomain
      lang = Lang.new('fr')
      h = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://google.com'), Wovnrb.get_settings)
      assert_equal('http://fr.google.com', lang.add_lang_code('http://google.com', 'subdomain', h))
    end

    def test_add_lang_code_absolute_subdomain_with_subdomain
      lang = Lang.new('fr')
      headers = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://home.google.com'), Wovnrb.get_settings)
      assert_equal('http://fr.home.google.com', lang.add_lang_code('http://home.google.com', 'subdomain', headers))
    end

    def test_add_lang_code_absolute_query_no_query
      lang = Lang.new('fr')
      headers = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://google.com'), Wovnrb.get_settings)
      assert_equal('http://google.com?wovn=fr', lang.add_lang_code('http://google.com', 'query', headers))
    end

    def test_add_lang_code_absolute_query_with_query
      lang = Lang.new('fr')
      headers = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://google.com'), Wovnrb.get_settings)
      assert_equal('http://google.com?hey=yo&wovn=fr', lang.add_lang_code('http://google.com?hey=yo', 'query', headers))
    end

    def test_add_lang_code_absolute_path_no_pathname
      lang = Lang.new('fr')
      headers = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://google.com'), Wovnrb.get_settings)
      assert_equal('http://google.com/fr/', lang.add_lang_code('http://google.com', 'path', headers))
    end

    def test_add_lang_code_absolute_path_with_pathname
      lang = Lang.new('fr')
      headers = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://google.com'), Wovnrb.get_settings)
      assert_equal('http://google.com/fr/index.html', lang.add_lang_code('http://google.com/index.html', 'path', headers))
    end

    def test_add_lang_code_absolute_path_with_long_pathname
      lang = Lang.new('fr')
      headers = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://google.com'), Wovnrb.get_settings)
      assert_equal('http://google.com/fr/hello/long/path/index.html', lang.add_lang_code('http://google.com/hello/long/path/index.html', 'path', headers))
    end

    def test_add_lang_code_relative_subdomain_leading_slash
      lang = Lang.new('fr')
      headers = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://google.com'), Wovnrb.get_settings)
      assert_equal('http://fr.google.com/', lang.add_lang_code('/', 'subdomain', headers))
    end

    def test_add_lang_code_relative_subdomain_leading_slash_filename
      lang = Lang.new('fr')
      headers = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://google.com'), Wovnrb.get_settings)
      assert_equal('http://fr.google.com/index.html', lang.add_lang_code('/index.html', 'subdomain', headers))
    end

    def test_add_lang_code_relative_subdomain_no_leading_slash_filename
      lang = Lang.new('fr')
      headers = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://google.com/'), Wovnrb.get_settings)
      assert_equal('http://fr.google.com/index.html', lang.add_lang_code('index.html', 'subdomain', headers))
    end

    def test_add_lang_code_relative_query_with_no_query
      lang = Lang.new('fr')
      headers = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://google.com/'), Wovnrb.get_settings)
      assert_equal('/index.html?wovn=fr', lang.add_lang_code('/index.html', 'query', headers))
    end

    def test_add_lang_code_relative_query_with_query
      lang = Lang.new('fr')
      headers = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://google.com/'), Wovnrb.get_settings)
      assert_equal('/index.html?hey=yo&wovn=fr', lang.add_lang_code('/index.html?hey=yo', 'query', headers))
    end

    def test_add_lang_code_relative_path_with_leading_slash
      lang = Lang.new('fr')
      headers = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://google.com/'), Wovnrb.get_settings)
      assert_equal('/fr/index.html', lang.add_lang_code('/index.html', 'path', headers))
    end

    def test_add_lang_code_relative_path_without_leading_slash_different_pathname
      lang = Lang.new('fr')
      headers = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://google.com/hello/tab.html'), Wovnrb.get_settings)
      assert_equal('/fr/hello/index.html', lang.add_lang_code('index.html', 'path', headers))
    end

    def test_add_lang_code_relative_path_without_leading_slash_different_pathname2
      lang = Lang.new('fr')
      headers = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://google.com/hello/tab.html'), Wovnrb.get_settings)
      assert_equal('/fr/hello/hey/index.html', lang.add_lang_code('hey/index.html', 'path', headers))
    end

    def test_add_lang_code_relative_path_at_root
      lang = Lang.new('fr')
      headers = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://google.com/'), Wovnrb.get_settings)
      assert_equal('/fr/index.html', lang.add_lang_code('index.html', 'path', headers))
    end

    def generate_body(param = "")
      case param
        when "ignore_parent"
          body = "<html><body><h1>Mr. Belvedere Fan Club</h1>
                <div wovn-ignore><p>Hello</p></div>
              </body></html>"
        when "ignore_everything"
          body = "<html><body wovn-ignore><h1>Mr. Belvedere Fan Club</h1>
                <div><p>Hello</p></div>
              </body></html>"
        when "ignore_parent_translated_in_japanese"
          body = "<html lang=\"ja\">
<head>
<meta http-equiv=\"Content-Type\" content=\"text/html; charset=UTF-8\">
<script src=\"//j.wovn.io/1\" async=\"true\" data-wovnio=\"key=&amp;backend=true&amp;currentLang=ja&amp;defaultLang=en&amp;urlPattern=path&amp;version=#{Wovnrb::VERSION}\"> </script><link rel=\"alternate\" hreflang=\"ja\" href=\"http://ja.ignore-page.com/\">
</head>
<body>
<h1>
<!--wovn-src:Mr. Belvedere Fan Club-->ベルベデアさんファンクラブ</h1>
                <div wovn-ignore=\"\"><p>Hello</p></div>
              </body>
</html>
"
        when "translated_in_japanese"
          body = "<html lang=\"ja\">
<head>
<meta http-equiv=\"Content-Type\" content=\"text/html; charset=UTF-8\">
<script src=\"//j.wovn.io/1\" async=\"true\" data-wovnio=\"key=&amp;backend=true&amp;currentLang=ja&amp;defaultLang=en&amp;urlPattern=path&amp;version=#{Wovnrb::VERSION}\"> </script><link rel=\"alternate\" hreflang=\"ja\" href=\"http://ja.page.com/\">
</head>
<body>
<h1>
<!--wovn-src:Mr. Belvedere Fan Club-->ベルベデアさんファンクラブ</h1>
                <div><p><!--wovn-src:Hello-->こんにちは</p></div>
              </body>
</html>
"
        when "ignore_everything_translated"
          body = "<html lang=\"ja\">
<head>
<meta http-equiv=\"Content-Type\" content=\"text/html; charset=UTF-8\">
<script src=\"//j.wovn.io/1\" async=\"true\" data-wovnio=\"key=&amp;backend=true&amp;currentLang=ja&amp;defaultLang=en&amp;urlPattern=path&amp;version=#{Wovnrb::VERSION}\"> </script><link rel=\"alternate\" hreflang=\"ja\" href=\"http://ja.ignore-page.com/\">
</head>
<body wovn-ignore=\"\">
<h1>Mr. Belvedere Fan Club</h1>
                <div><p>Hello</p></div>
              </body>
</html>
"
        when "empty"
          body = "<html><body><h1>Mr.BelvedereFanClub</h1><div wovn-ignore><p>Hello</p></div></body></html>"
        when "empty_single_quote"
          body = "<html><body><h1>Mr.BelvedereFanClub</h1><div wovn-ignore=''><p>Hello</p></div></body></html>"
        when "empty_double_quote"
          body = "<html><body><h1>Mr.BelvedereFanClub</h1><div wovn-ignore=""><p>Hello</p></div></body></html>"
        when "value_single_quote"
          body = "<html><body><h1>Mr.BelvedereFanClub</h1><div wovn-ignore='value'><p>Hello</p></div></body></html>"
        when "value_double_quote"
          body = "<html><body><h1>Mr.BelvedereFanClub</h1><div wovn-ignore=\"value\"><p>Hello</p></div></body></html>"
        when "empty_translated"
          body = "<html lang=\"ja\">\n<head>\n<meta http-equiv=\"Content-Type\" content=\"text/html; charset=UTF-8\">\n<script src=\"//j.wovn.io/1\" async=\"true\" data-wovnio=\"key=&amp;backend=true&amp;currentLang=ja&amp;defaultLang=en&amp;urlPattern=path&amp;version=#{Wovnrb::VERSION}\"> </script><link rel=\"alternate\" hreflang=\"ja\" href=\"http://ja.ignore-page.com/\">\n</head>\n<body>\n<h1>Mr.BelvedereFanClub</h1>\n<div wovn-ignore=\"\"><p>Hello</p></div>\n</body>\n</html>\n"
        when "empty_single_quote_translated"
          body = "<html lang=\"ja\">\n<head>\n<meta http-equiv=\"Content-Type\" content=\"text/html; charset=UTF-8\">\n<script src=\"//j.wovn.io/1\" async=\"true\" data-wovnio=\"key=&amp;backend=true&amp;currentLang=ja&amp;defaultLang=en&amp;urlPattern=path&amp;version=#{Wovnrb::VERSION}\"> </script><link rel=\"alternate\" hreflang=\"ja\" href=\"http://ja.ignore-page.com/\">\n</head>\n<body>\n<h1>Mr.BelvedereFanClub</h1>\n<div wovn-ignore=\"\"><p>Hello</p></div>\n</body>\n</html>\n"
        when "empty_double_quote_translated"
          body = "<html lang=\"ja\">\n<head>\n<meta http-equiv=\"Content-Type\" content=\"text/html; charset=UTF-8\">\n<script src=\"//j.wovn.io/1\" async=\"true\" data-wovnio=\"key=&amp;backend=true&amp;currentLang=ja&amp;defaultLang=en&amp;urlPattern=path&amp;version=#{Wovnrb::VERSION}\"> </script><link rel=\"alternate\" hreflang=\"ja\" href=\"http://ja.ignore-page.com/\">\n</head>\n<body>\n<h1>Mr.BelvedereFanClub</h1>\n<div wovn-ignore=\"\"><p>Hello</p></div>\n</body>\n</html>\n"
        when "value_single_quote_translated"
          body = "<html lang=\"ja\">\n<head>\n<meta http-equiv=\"Content-Type\" content=\"text/html; charset=UTF-8\">\n<script src=\"//j.wovn.io/1\" async=\"true\" data-wovnio=\"key=&amp;backend=true&amp;currentLang=ja&amp;defaultLang=en&amp;urlPattern=path&amp;version=#{Wovnrb::VERSION}\"> </script><link rel=\"alternate\" hreflang=\"ja\" href=\"http://ja.ignore-page.com/\">\n</head>\n<body>\n<h1>Mr.BelvedereFanClub</h1>\n<div wovn-ignore=\"value\"><p>Hello</p></div>\n</body>\n</html>\n"
        when "value_double_quote_translated"
          body = "<html lang=\"ja\">\n<head>\n<meta http-equiv=\"Content-Type\" content=\"text/html; charset=UTF-8\">\n<script src=\"//j.wovn.io/1\" async=\"true\" data-wovnio=\"key=&amp;backend=true&amp;currentLang=ja&amp;defaultLang=en&amp;urlPattern=path&amp;version=#{Wovnrb::VERSION}\"> </script><link rel=\"alternate\" hreflang=\"ja\" href=\"http://ja.ignore-page.com/\">\n</head>\n<body>\n<h1>Mr.BelvedereFanClub</h1>\n<div wovn-ignore=\"value\"><p>Hello</p></div>\n</body>\n</html>\n"
        when "meta_img_alt_tags_translated"
          body = "<html lang=\"ja\">\n<head>\n<script src=\"//j.wovn.io/1\" async=\"true\" data-wovnio=\"key=&amp;backend=true&amp;currentLang=ja&amp;defaultLang=en&amp;urlPattern=path&amp;version=#{Wovnrb::VERSION}\"> </script><meta http-equiv=\"Content-Type\" content=\"text/html; charset=UTF-8\">\n<meta name=\"description\" content=\"こんにちは\">\n<meta name=\"title\" content=\"こんにちは\">\n<meta property=\"og:title\" content=\"こんにちは\">\n<meta property=\"og:description\" content=\"こんにちは\">\n<meta property=\"twitter:title\" content=\"こんにちは\">\n<meta property=\"twitter:description\" content=\"こんにちは\">\n<link rel=\"alternate\" hreflang=\"ja\" href=\"http://ja.page.com/\">\n</head>\n<body>\n<h1>
<!--wovn-src:Mr. Belvedere Fan Club-->ベルベデアさんファンクラブ</h1>\n<div><p><!--wovn-src:Hello-->こんにちは</p></div>\n<!--wovn-src:Hello--><img src=\"http://example.com/photo.png\" alt=\"こんにちは\">\n</body>\n</html>\n"
        when  "meta_img_alt_tags"
          body = "<html><head><meta name =\"description\" content=\"Hello\">\n<meta name=\"title\" content=\"Hello\">\n<meta property=\"og:title\" content=\"Hello\">\n<meta property=\"og:description\" content=\"Hello\">\n<meta property=\"twitter:title\" content=\"Hello\">\n<meta property=\"twitter:description\" content=\"Hello\"></head>
<body><h1>Mr. Belvedere Fan Club</h1>
<div><p>Hello</p></div>
<img src=\"http://example.com/photo.png\" alt=\"Hello\">
</body></html>"
        else # "" case
          body = "<html><body><h1>Mr. Belvedere Fan Club</h1>
                <div><p>Hello</p></div>
              </body></html>"
      end
      return body
    end

    def generate_dom(param='')
      Wovnrb.to_dom(generate_body(param))
    end

    def generate_values
      values = {}
      values['text_vals'] = {
        'Hello' => {'ja' => [{'data' => 'こんにちは'}]},
        'Mr. Belvedere Fan Club' => {'ja' => [{'data' => 'ベルベデアさんファンクラブ'}]}
      }
      return values
    end

    def test_switch_dom_lang_for_simplified_chinese
      lang = Lang.new('ja')
      h = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://page.com'), Wovnrb.get_settings('url_pattern' => 'subdomain', 'url_pattern_reg' => '^(?<lang>[^.]+).'))
      dom = generate_dom
      values = generate_values
      values['text_vals']['Simplified Chinese'] = {'zh-CHS' => [{data: 'test'}]}
      url = h.url

      swapped_body = lang.switch_dom_lang(dom, Store.instance, values, url, h)
      assert(/hreflang="zh-Hans"/ =~ swapped_body)
      assert(!(/hreflang="zh-CHS"/ =~ swapped_body))
    end

    def test_switch_dom_lang_for_traditional_chinese
      lang = Lang.new('ja')
      h = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://page.com'), Wovnrb.get_settings('url_pattern' => 'subdomain', 'url_pattern_reg' => '^(?<lang>[^.]+).'))
      dom = generate_dom
      values = generate_values
      values['text_vals']['Traditional Chinese'] = {'zh-CHT' => [{data: 'test'}]}
      url = h.url

      swapped_body = lang.switch_dom_lang(dom, Store.instance, values, url, h)
      assert(/hreflang="zh-Hant"/ =~ swapped_body)
      assert(!(/hreflang="zh-CHT"/ =~ swapped_body))
    end

    def test_switch_lang
      lang = Lang.new('ja')
      h = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://page.com'), Wovnrb.get_settings('url_pattern' => 'subdomain', 'url_pattern_reg' => '^(?<lang>[^.]+).'))
      dom = generate_dom
      values = generate_values
      url = h.url
      swapped_body = lang.switch_dom_lang(dom, Store.instance, values, url, h)
      assert_equal(generate_body('translated_in_japanese'), swapped_body)
    end

    def test_switch_lang_meta_img_alt_tags
      lang = Lang.new('ja')
      h = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://page.com'), Wovnrb.get_settings('url_pattern' => 'subdomain', 'url_pattern_reg' => '^(?<lang>[^.]+).'))
      dom = generate_dom('meta_img_alt_tags')
      values = generate_values
      url = h.url
      swapped_body = lang.switch_dom_lang(dom, Store.instance, values, url, h)
      assert_equal(generate_body('meta_img_alt_tags_translated'), swapped_body)
    end

    def test_switch_lang_wovn_ignore
      lang = Lang.new('ja')
      h = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://ignore-page.com'), Wovnrb.get_settings('url_pattern' => 'subdomain', 'url_pattern_reg' => '^(?<lang>[^.]+).'))
      dom = generate_dom('ignore_parent')
      values = generate_values
      url = h.url
      swapped_body = lang.switch_dom_lang(dom, Store.instance, values, url, h)
      assert_equal(generate_body('ignore_parent_translated_in_japanese'), swapped_body)
    end

    def test_switch_lang_wovn_ignore_everything
      lang = Lang.new('ja')
      h = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://ignore-page.com'), Wovnrb.get_settings('url_pattern' => 'subdomain', 'url_pattern_reg' => '^(?<lang>[^.]+).'))
      dom = generate_dom('ignore_everything')
      values = generate_values
      url = h.url
      swapped_body = lang.switch_dom_lang(dom, Store.instance, values, url, h)
      assert_equal(generate_body('ignore_everything_translated'), swapped_body)
    end

    def test_switch_lang_wovn_ignore_empty
      lang = Lang.new('ja')
      h = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://ignore-page.com'), Wovnrb.get_settings('url_pattern' => 'subdomain', 'url_pattern_reg' => '^(?<lang>[^.]+).'))
      dom = generate_dom('empty')
      values = generate_values
      url = h.url
      swapped_body = lang.switch_dom_lang(dom, Store.instance, values, url, h)
      assert_equal(generate_body('empty_translated'), swapped_body)
    end

    def test_switch_lang_wovn_ignore_empty_single_quote
      lang = Lang.new('ja')
      h = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://ignore-page.com'), Wovnrb.get_settings('url_pattern' => 'subdomain', 'url_pattern_reg' => '^(?<lang>[^.]+).'))
      dom = generate_dom('empty_single_quote')
      values = generate_values
      url = h.url
      swapped_body = lang.switch_dom_lang(dom, Store.instance, values, url, h)
      assert_equal(generate_body('empty_single_quote_translated'), swapped_body)
    end

    def test_switch_lang_wovn_ignore_empty_double_quote
      lang = Lang.new('ja')
      h = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://ignore-page.com'), Wovnrb.get_settings('url_pattern' => 'subdomain', 'url_pattern_reg' => '^(?<lang>[^.]+).'))
      dom = generate_dom('empty_double_quote')
      values = generate_values
      url = h.url
      swapped_body = lang.switch_dom_lang(dom, Store.instance, values, url, h)
      assert_equal(generate_body('empty_double_quote_translated'), swapped_body)
    end

    def test_switch_lang_wovn_ignore_value_single_quote
      lang = Lang.new('ja')
      h = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://ignore-page.com'), Wovnrb.get_settings('url_pattern' => 'subdomain', 'url_pattern_reg' => '^(?<lang>[^.]+).'))
      dom = generate_dom('value_single_quote')
      values = generate_values
      url = h.url
      swapped_body = lang.switch_dom_lang(dom, Store.instance, values, url, h)
      assert_equal(generate_body('value_single_quote_translated'), swapped_body)
    end

    def test_switch_lang_wovn_ignore_value_double_quote
      lang = Lang.new('ja')
      h = Wovnrb::Headers.new(Wovnrb.get_env('url' => 'http://ignore-page.com'), Wovnrb.get_settings('url_pattern' => 'subdomain', 'url_pattern_reg' => '^(?<lang>[^.]+).'))
      dom = generate_dom('value_double_quote')
      values = generate_values
      url = h.url
      swapped_body = lang.switch_dom_lang(dom, Store.instance, values, url, h)
      assert_equal(generate_body('value_double_quote_translated'), swapped_body)
    end
  end
end