LanguageListTest.php

<?php

/**
 * @file
 * Definition of Drupal\language\Tests\LanguageListTest.
 */
namespace Drupal\language\Tests;

use Drupal\simpletest\WebTestBase;
use Drupal\Core\Language\Language;

/**
 * Functional tests for the language list configuration forms.
 */
class LanguageListTest extends WebTestBase {

  /**
   * Modules to enable.
   *
   * @var array
   */
  public static $modules = array(
    'language',
  );
  public static function getInfo() {
    return array(
      'name' => 'Language list configuration',
      'description' => 'Adds a new language and tests changing its status and the default language.',
      'group' => 'Language',
    );
  }

  /**
   * Functional tests for adding, editing and deleting languages.
   */
  function testLanguageList() {
    global $base_url;

    // User to add and remove language.
    $admin_user = $this
      ->drupalCreateUser(array(
      'administer languages',
      'access administration pages',
    ));
    $this
      ->drupalLogin($admin_user);

    // Add predefined language.
    $edit = array(
      'predefined_langcode' => 'fr',
    );
    $this
      ->drupalPost('admin/config/regional/language/add', $edit, t('Add language'));
    $this
      ->assertText('French', 'Language added successfully.');
    $this
      ->assertEqual($this
      ->getUrl(), url('admin/config/regional/language', array(
      'absolute' => TRUE,
    )), 'Correct page redirection.');

    // Add custom language.
    $langcode = 'xx';
    $name = $this
      ->randomName(16);
    $edit = array(
      'predefined_langcode' => 'custom',
      'langcode' => $langcode,
      'name' => $name,
      'direction' => '0',
    );
    $this
      ->drupalPost('admin/config/regional/language/add', $edit, t('Add custom language'));
    $this
      ->assertEqual($this
      ->getUrl(), url('admin/config/regional/language', array(
      'absolute' => TRUE,
    )), 'Correct page redirection.');
    $this
      ->assertRaw('"edit-site-default-' . $langcode . '"', 'Language code found.');
    $this
      ->assertText(t($name), 'Test language added.');

    // Check if we can change the default language.
    $path = 'admin/config/regional/language';
    $this
      ->drupalGet($path);
    $this
      ->assertFieldChecked('edit-site-default-en', 'English is the default language.');

    // Change the default language.
    $edit = array(
      'site_default' => $langcode,
    );
    $this
      ->drupalPost(NULL, $edit, t('Save configuration'));
    $this
      ->assertNoFieldChecked('edit-site-default-en', 'Default language updated.');
    $this
      ->assertEqual($this
      ->getUrl(), url('admin/config/regional/language', array(
      'absolute' => TRUE,
    )), 'Correct page redirection.');

    // Ensure we can't delete the default language.
    $this
      ->drupalGet('admin/config/regional/language/delete/' . $langcode);
    $this
      ->assertEqual($this
      ->getUrl(), url('admin/config/regional/language', array(
      'absolute' => TRUE,
    )), 'Correct page redirection.');
    $this
      ->assertText(t('The default language cannot be deleted.'), 'Failed to delete the default language.');

    // Ensure 'edit' link works.
    $this
      ->clickLink(t('edit'));
    $this
      ->assertTitle(t('Edit language | Drupal'), 'Page title is "Edit language".');

    // Edit a language.
    $name = $this
      ->randomName(16);
    $edit = array(
      'name' => $name,
    );
    $this
      ->drupalPost('admin/config/regional/language/edit/' . $langcode, $edit, t('Save language'));
    $this
      ->assertRaw($name, 'The language has been updated.');
    $this
      ->assertEqual($this
      ->getUrl(), url('admin/config/regional/language', array(
      'absolute' => TRUE,
    )), 'Correct page redirection.');

    // Change back the default language.
    $edit = array(
      'site_default' => 'en',
    );
    $this
      ->drupalPost(NULL, $edit, t('Save configuration'));

    // Ensure 'delete' link works.
    $this
      ->drupalGet('admin/config/regional/language');
    $this
      ->clickLink(t('delete'));
    $this
      ->assertText(t('Are you sure you want to delete the language'), '"delete" link is correct.');

    // Delete a language.
    $this
      ->drupalGet('admin/config/regional/language/delete/' . $langcode);

    // First test the 'cancel' link.
    $this
      ->clickLink(t('Cancel'));
    $this
      ->assertEqual($this
      ->getUrl(), url('admin/config/regional/language', array(
      'absolute' => TRUE,
    )), 'Correct page redirection.');
    $this
      ->assertRaw($name, 'The language was not deleted.');

    // Delete the language for real. This a confirm form, we do not need any
    // fields changed.
    $this
      ->drupalPost('admin/config/regional/language/delete/' . $langcode, array(), t('Delete'));

    // We need raw here because %language and %langcode will add HTML.
    $t_args = array(
      '%language' => $name,
      '%langcode' => $langcode,
    );
    $this
      ->assertRaw(t('The %language (%langcode) language has been removed.', $t_args), 'The test language has been removed.');
    $this
      ->assertEqual($this
      ->getUrl(), url('admin/config/regional/language', array(
      'absolute' => TRUE,
    )), 'Correct page redirection.');

    // Verify that language is no longer found.
    $this
      ->drupalGet('admin/config/regional/language/delete/' . $langcode);
    $this
      ->assertResponse(404, 'Language no longer found.');

    // Make sure the "language_count" variable has been updated correctly.
    drupal_static_reset('language_list');
    $languages = language_list();
    $this
      ->assertEqual(variable_get('language_count', 1), count($languages), 'Language count is correct.');

    // Delete French.
    $this
      ->drupalPost('admin/config/regional/language/delete/fr', array(), t('Delete'));

    // Get the count of languages.
    drupal_static_reset('language_list');
    $languages = language_list();

    // We need raw here because %language and %langcode will add HTML.
    $t_args = array(
      '%language' => 'French',
      '%langcode' => 'fr',
    );
    $this
      ->assertRaw(t('The %language (%langcode) language has been removed.', $t_args), 'Disabled language has been removed.');
    $this
      ->assertEqual($this
      ->getUrl(), url('admin/config/regional/language', array(
      'absolute' => TRUE,
    )), 'Correct page redirection.');

    // Verify that language is no longer found.
    $this
      ->drupalGet('admin/config/regional/language/delete/fr');
    $this
      ->assertResponse(404, 'Language no longer found.');

    // Make sure the "language_count" variable has not changed.
    $this
      ->assertEqual(variable_get('language_count', 1), count($languages), 'Language count is correct.');

    // Ensure we can delete the English language. Right now English is the only
    // language so we must add a new language and make it the default before
    // deleting English.
    $langcode = 'xx';
    $name = $this
      ->randomName(16);
    $edit = array(
      'predefined_langcode' => 'custom',
      'langcode' => $langcode,
      'name' => $name,
      'direction' => '0',
    );
    $this
      ->drupalPost('admin/config/regional/language/add', $edit, t('Add custom language'));
    $this
      ->assertEqual($this
      ->getUrl(), url('admin/config/regional/language', array(
      'absolute' => TRUE,
    )), 'Correct page redirection.');
    $this
      ->assertText($name, 'Name found.');

    // Check if we can change the default language.
    $path = 'admin/config/regional/language';
    $this
      ->drupalGet($path);
    $this
      ->assertFieldChecked('edit-site-default-en', 'English is the default language.');

    // Change the default language.
    $edit = array(
      'site_default' => $langcode,
    );
    $this
      ->drupalPost(NULL, $edit, t('Save configuration'));
    $this
      ->assertNoFieldChecked('edit-site-default-en', 'Default language updated.');
    $this
      ->assertEqual($this
      ->getUrl(), url('admin/config/regional/language', array(
      'absolute' => TRUE,
    )), 'Correct page redirection.');
    $this
      ->drupalPost('admin/config/regional/language/delete/en', array(), t('Delete'));

    // We need raw here because %language and %langcode will add HTML.
    $t_args = array(
      '%language' => 'English',
      '%langcode' => 'en',
    );
    $this
      ->assertRaw(t('The %language (%langcode) language has been removed.', $t_args), 'The English language has been removed.');
  }

  /**
   * Functional tests for the language states (locked or configurable).
   */
  function testLanguageStates() {

    // Add some languages, and also lock some of them.
    language_save(new Language(array(
      'name' => $this
        ->randomName(),
      'langcode' => 'l1',
    )));
    language_save(new Language(array(
      'name' => $this
        ->randomName(),
      'langcode' => 'l2',
      'locked' => TRUE,
    )));
    language_save(new Language(array(
      'name' => $this
        ->randomName(),
      'langcode' => 'l3',
    )));
    language_save(new Language(array(
      'name' => $this
        ->randomName(),
      'langcode' => 'l4',
      'locked' => TRUE,
    )));
    $expected_locked_languages = array(
      'l4' => 'l4',
      'l2' => 'l2',
      'und' => 'und',
      'zxx' => 'zxx',
      'mul' => 'mul',
    );
    $expected_all_languages = array(
      'l4' => 'l4',
      'l3' => 'l3',
      'l2' => 'l2',
      'l1' => 'l1',
      'en' => 'en',
      'und' => 'und',
      'zxx' => 'zxx',
      'mul' => 'mul',
    );
    $expected_conf_languages = array(
      'l3' => 'l3',
      'l1' => 'l1',
      'en' => 'en',
    );
    $locked_languages = language_list(LANGUAGE_LOCKED);
    $this
      ->assertEqual(array_diff_key($expected_locked_languages, $locked_languages), array(), 'Locked languages loaded correctly.');
    $all_languages = language_list(LANGUAGE_ALL);
    $this
      ->assertEqual(array_diff_key($expected_all_languages, $all_languages), array(), 'All languages loaded correctly.');
    $conf_languages = language_list();
    $this
      ->assertEqual(array_diff_key($expected_conf_languages, $conf_languages), array(), 'Configurable languages loaded correctly.');
  }

}