function LanguageBrowserDetectionUnitTest::testLanguageFromBrowser

Unit tests for the language_from_browser() function.

See also

language_from_browser().

File

drupal/core/modules/language/lib/Drupal/language/Tests/LanguageBrowserDetectionUnitTest.php, line 33

Definition of Drupal\language\Tests\LanguageBrowserDetectionUnitTest.

Class

LanguageBrowserDetectionUnitTest

Test browser language detection.

Namespace

Code

function testLanguageFromBrowser() {

  // The order of the languages is only important if the browser language
  // codes are having the same qvalue, otherwise the one with the highest
  // qvalue is prefered. The automatically generated generic tags are always
  // having a lower qvalue.
  $languages = array(
    // In our test case, 'en' has priority over 'en-US'.
    'en' => new Language(array(
      'langcode' => 'en',
    )),
    'en-US' => new Language(array(
      'langcode' => 'en-US',
    )),
    // But 'fr-CA' has priority over 'fr'.
    'fr-CA' => new Language(array(
      'langcode' => 'fr-CA',
    )),
    'fr' => new Language(array(
      'langcode' => 'fr',
    )),
    // 'es-MX' is alone.
    'es-MX' => new Language(array(
      'langcode' => 'es-MX',
    )),
    // 'pt' is alone.
    'pt' => new Language(array(
      'langcode' => 'pt',
    )),
    // Language codes with more then one dash are actually valid.
    // eh-oh-laa-laa is the official language code of the Teletubbies.
    'eh-oh-laa-laa' => new Language(array(
      'langcode' => 'eh-oh-laa-laa',
    )),
    // Chinese languages.
    'zh-hans' => new Language(array(
      'langcode' => 'zh-hans',
    )),
    'zh-hant' => new Language(array(
      'langcode' => 'zh-hant',
    )),
    'zh-hant-tw' => new Language(array(
      'langcode' => 'zh-hant',
    )),
  );
  $test_cases = array(
    // Equal qvalue for each language, choose the site prefered one.
    'en,en-US,fr-CA,fr,es-MX' => 'en',
    'en-US,en,fr-CA,fr,es-MX' => 'en',
    'fr,en' => 'en',
    'en,fr' => 'en',
    'en-US,fr' => 'en-US',
    'fr,en-US' => 'en-US',
    'fr,fr-CA' => 'fr-CA',
    'fr-CA,fr' => 'fr-CA',
    'fr' => 'fr-CA',
    'fr;q=1' => 'fr-CA',
    'fr,es-MX' => 'fr-CA',
    'fr,es' => 'fr-CA',
    'es,fr' => 'fr-CA',
    'es-MX,de' => 'es-MX',
    'de,es-MX' => 'es-MX',
    // Different cases and whitespace.
    'en' => 'en',
    'En' => 'en',
    'EN' => 'en',
    ' en' => 'en',
    'en ' => 'en',
    'en, fr' => 'en',
    // A less specific language from the browser matches a more specific one
    // from the website, and the other way around for compatibility with
    // some versions of Internet Explorer.
    'es' => 'es-MX',
    'es-MX' => 'es-MX',
    'pt' => 'pt',
    'pt-PT' => 'pt',
    'pt-PT;q=0.5,pt-BR;q=1,en;q=0.7' => 'en',
    'pt-PT;q=1,pt-BR;q=0.5,en;q=0.7' => 'en',
    'pt-PT;q=0.4,pt-BR;q=0.1,en;q=0.7' => 'en',
    'pt-PT;q=0.1,pt-BR;q=0.4,en;q=0.7' => 'en',
    // Language code with several dashes are valid. The less specific language
    // from the browser matches the more specific one from the website.
    'eh-oh-laa-laa' => 'eh-oh-laa-laa',
    'eh-oh-laa' => 'eh-oh-laa-laa',
    'eh-oh' => 'eh-oh-laa-laa',
    'eh' => 'eh-oh-laa-laa',
    // Different qvalues.
    'fr,en;q=0.5' => 'fr-CA',
    'fr,en;q=0.5,fr-CA;q=0.25' => 'fr',
    // Silly wildcards are also valid.
    '*,fr-CA;q=0.5' => 'en',
    '*,en;q=0.25' => 'fr-CA',
    'en,en-US;q=0.5,fr;q=0.25' => 'en',
    'en-US,en;q=0.5,fr;q=0.25' => 'en-US',
    // Unresolvable cases.
    '' => FALSE,
    'de,pl' => FALSE,
    'iecRswK4eh' => FALSE,
    $this
      ->randomName(10) => FALSE,
    // Chinese langcodes.
    'zh-cn, en-us;q=0.90, en;q=0.80, zh;q=0.70' => 'zh-hans',
    'zh-tw, en-us;q=0.90, en;q=0.80, zh;q=0.70' => 'zh-hant',
    'zh-hant, en-us;q=0.90, en;q=0.80, zh;q=0.70' => 'zh-hant',
    'zh-hans, en-us;q=0.90, en;q=0.80, zh;q=0.70' => 'zh-hans',
    'zh-cn' => 'zh-hans',
    'zh-sg' => 'zh-hans',
    'zh-tw' => 'zh-hant',
    'zh-hk' => 'zh-hant',
    'zh-mo' => 'zh-hant',
    'zh-hans' => 'zh-hans',
    'zh-hant' => 'zh-hant',
    'zh-chs' => 'zh-hans',
    'zh-cht' => 'zh-hant',
  );
  foreach ($test_cases as $accept_language => $expected_result) {
    $_SERVER['HTTP_ACCEPT_LANGUAGE'] = $accept_language;
    $result = language_from_browser($languages);
    $this
      ->assertIdentical($result, $expected_result, format_string("Language selection '@accept-language' selects '@result', result = '@actual'", array(
      '@accept-language' => $accept_language,
      '@result' => $expected_result,
      '@actual' => isset($result) ? $result : 'none',
    )));
  }
}