CommentLanguageTest.php

<?php

/**
 * @file
 * Definition of Drupal\comment\Tests\CommentLanguageTest.
 */
namespace Drupal\comment\Tests;

use Drupal\simpletest\WebTestBase;

/**
 * Functional tests for comment language.
 */
class CommentLanguageTest extends WebTestBase {

  /**
   * Modules to enable.
   *
   * We also use the language_test module here to be able to turn on content
   * language negotiation. Drupal core does not provide a way in itself to do
   * that.
   *
   * @var array
   */
  public static $modules = array(
    'language',
    'language_test',
    'comment_test',
  );

  /**
   * Use the standard profile.
   *
   * @todo Remove this dependency if possible.
   */
  protected $profile = 'standard';
  public static function getInfo() {
    return array(
      'name' => 'Comment language',
      'description' => 'Tests for comment language.',
      'group' => 'Comment',
    );
  }
  function setUp() {
    parent::setUp();

    // Create and login user.
    $admin_user = $this
      ->drupalCreateUser(array(
      'administer site configuration',
      'administer languages',
      'access administration pages',
      'administer content types',
      'administer comments',
      'create article content',
    ));
    $this
      ->drupalLogin($admin_user);

    // Add language.
    $edit = array(
      'predefined_langcode' => 'fr',
    );
    $this
      ->drupalPost('admin/config/regional/language/add', $edit, t('Add language'));

    // Set "Article" content type to use multilingual support.
    $edit = array(
      'language_configuration[language_hidden]' => FALSE,
    );
    $this
      ->drupalPost('admin/structure/types/manage/article', $edit, t('Save content type'));

    // Enable content language negotiation UI.
    state()
      ->set('language_test.content_language_type', TRUE);

    // Set interface language detection to user and content language detection
    // to URL. Disable inheritance from interface language to ensure content
    // language will fall back to the default language if no URL language can be
    // detected.
    $edit = array(
      'language_interface[enabled][language-user]' => TRUE,
      'language_content[enabled][language-url]' => TRUE,
      'language_content[enabled][language-interface]' => FALSE,
    );
    $this
      ->drupalPost('admin/config/regional/language/detection', $edit, t('Save settings'));

    // Change user language preference, this way interface language is always
    // French no matter what path prefix the URLs have.
    $edit = array(
      'preferred_langcode' => 'fr',
    );
    $this
      ->drupalPost("user/{$admin_user->uid}/edit", $edit, t('Save'));

    // Make comment body translatable.
    $field = field_info_field('comment_body');
    $field['translatable'] = TRUE;
    field_update_field($field);
    $this
      ->assertTrue(field_is_translatable('comment', $field), 'Comment body is translatable.');
  }

  /**
   * Test that comment language is properly set.
   */
  function testCommentLanguage() {
    drupal_static_reset('language_list');

    // Create two nodes, one for english and one for french, and comment each
    // node using both english and french as content language by changing URL
    // language prefixes. Meanwhile interface language is always French, which
    // is the user language preference. This way we can ensure that node
    // language and interface language do not influence comment language, as
    // only content language has to.
    foreach (language_list() as $node_langcode => $node_language) {
      $langcode_not_specified = LANGUAGE_NOT_SPECIFIED;

      // Create "Article" content.
      $title = $this
        ->randomName();
      $edit = array(
        "title" => $title,
        "body[{$langcode_not_specified}][0][value]" => $this
          ->randomName(),
        "langcode" => $node_langcode,
      );
      $this
        ->drupalPost("node/add/article", $edit, t('Save'));
      $node = $this
        ->drupalGetNodeByTitle($title);
      $prefixes = language_negotiation_url_prefixes();
      foreach (language_list() as $langcode => $language) {

        // Post a comment with content language $langcode.
        $prefix = empty($prefixes[$langcode]) ? '' : $prefixes[$langcode] . '/';
        $comment_values[$node_langcode][$langcode] = $this
          ->randomName();
        $edit = array(
          'subject' => $this
            ->randomName(),
          "comment_body[{$langcode}][0][value]" => $comment_values[$node_langcode][$langcode],
        );
        $this
          ->drupalPost("{$prefix}node/{$node->nid}", $edit, t('Preview'));
        $this
          ->drupalPost(NULL, $edit, t('Save'));

        // Check that comment language matches the current content language.
        $cid = db_select('comment', 'c')
          ->fields('c', array(
          'cid',
        ))
          ->condition('nid', $node->nid)
          ->orderBy('cid', 'DESC')
          ->range(0, 1)
          ->execute()
          ->fetchField();
        $comment = comment_load($cid);
        $args = array(
          '%node_language' => $node_langcode,
          '%comment_language' => $comment->langcode,
          '%langcode' => $langcode,
        );
        $this
          ->assertEqual($comment->langcode, $langcode, format_string('The comment posted with content language %langcode and belonging to the node with language %node_language has language %comment_language', $args));
        $this
          ->assertEqual($comment->comment_body[$langcode][0]['value'], $comment_values[$node_langcode][$langcode], 'Comment body correctly stored.');
      }
    }

    // Check that comment bodies appear in the administration UI.
    $this
      ->drupalGet('admin/content/comment');
    foreach ($comment_values as $node_values) {
      foreach ($node_values as $value) {
        $this
          ->assertRaw($value);
      }
    }
  }

}