<?php

/**
 * @file
 * Test suite for UUID module.
 */

/**
 * Base class with some helper methods.
 */
class UUIDTestCase extends DrupalWebTestCase {

  /**
   * {@inheritdoc}
   */
  function setUp() {
    parent::setUp(func_get_args());
  }

  /**
   * Helper function that asserts a UUID.
   */
  function assertUUID($uuid, $message = NULL) {
    $this->assertTrue(uuid_is_valid($uuid), $message);
  }
}

/**
 * Tests the UUID API functions.
 */
class UUIDAPITestCase extends UUIDTestCase {

  /**
   * {@inheritdoc}
   */
  public static function getInfo() {
    return array(
      'name' => 'UUID API',
      'description' => 'Tests the UUID API functions.',
      'group' => 'UUID',
    );
  }

  /**
   * {@inheritdoc}
   */
  function setUp() {
    parent::setUp('uuid');
  }

  /**
   * Tests uuid function calls.
   */
  function testAPIFunctions() {
    // This is a valid UUID, we know that.
    $valid_uuid = '0ab26e6b-f074-4e44-9da6-1205fa0e9761';
    // Test the uuid_is_valid() function.
    $this->assertUUID($valid_uuid, 'UUID validation works.');

    // The default generator is 'php'.
    $uuid = uuid_generate();
    $this->assertUUID($uuid, 'PHP generator works.');

    // Test the 'mysql' generator.
    variable_set('uuid_generator', 'mysql');
    drupal_static_reset('uuid_generate');
    $uuid = uuid_generate();
    $this->assertUUID($uuid, 'MySQL generator works.');
  }
}

/**
 * Tests the Entity API functions.
 */
class UUIDEntityTestCase extends UUIDTestCase {

  /**
   * {@inheritdoc}
   */
  public static function getInfo() {
    return array(
      'name' => 'Entity API functions',
      'description' => 'Tests the Entity API functions.',
      'group' => 'UUID',
    );
  }

  /**
   * {@inheritdoc}
   */
  function setUp() {
    parent::setUp('uuid');
  }

  /**
   * Tests Entity API's UUID functions.
   */
  function testEntityAPIFunctions() {
    // Create some entities that we will work with.
    $user = $this->drupalCreateUser();
    $node = $this->drupalCreateNode(array('title' => 'original title', 'uid' => $user->uid));

    // Test entity_get_id_by_uuid().
    $nids = entity_get_id_by_uuid('node', array($node->uuid), FALSE);
    $this->assertTrue(in_array($node->nid, $nids), 'Lookup of entity ID works.');
    $vids = entity_get_id_by_uuid('node', array($node->vuuid), TRUE);
    $this->assertTrue(in_array($node->vid, $vids), 'Lookup of entity revision ID works.');

    // Test entity_get_uuid_by_id().
    $uuids = entity_get_uuid_by_id('node', array($node->nid), FALSE);
    $this->assertTrue(in_array($node->uuid, $uuids), 'Lookup of entity UUID works.');
    $vuuids = entity_get_uuid_by_id('node', array($node->vid), TRUE);
    $this->assertTrue(in_array($node->vuuid, $vuuids), 'Lookup of entity revision UUID works.');
  }
}

/**
 * Tests the User implementation.
 */
class UUIDUserTestCase extends UUIDTestCase {

  /**
   * {@inheritdoc}
   */
  public static function getInfo() {
    return array(
      'name' => 'User implementation',
      'description' => 'Tests the User implementation.',
      'group' => 'UUID',
    );
  }

  /**
   * {@inheritdoc}
   */
  function setUp() {
    // Some tests depends on the optional Entity API module.
    if (module_exists('entity')) {
      parent::setUp('uuid', 'entity');
    }
    else {
      parent::setUp('uuid');
    }
  }

  /**
   * Test CRUD on users with UUID functions.
   */
  function testUserCRUD() {
    $user = $this->drupalCreateUser();
    $this->assertUUID($user->uuid, 'User UUID was generated.');

    // Test updating user.
    $user_test = clone $user;
    user_save($user_test, array('name' => 'new name'));
    $user_test = user_load($user->uid, TRUE);
    $this->assertEqual($user_test->uuid, $user->uuid, 'User UUID was intact after update.');

    // Test entity_uuid_load().
    $users = entity_uuid_load('user', array($user->uuid), array(), TRUE);
    $user_test = reset($users);
    $this->assertEqual($user_test->uid, $user->uid, 'User was correctly loaded with UUID.');

    // The following tests depends on the optional Entity API module.
    if (module_exists('entity')) {
      // Test entity_uuid_save() for users.
      $user_test = clone $user;
      $user_test->uid = rand();
      $user_test->name = 'new name';
      entity_uuid_save('user', $user_test);
      $user_test = user_load($user->uid, TRUE);
      $this->assertEqual($user_test->name, 'new name', 'Saving user with UUID mapped to correct user.');
      $this->assertEqual($user_test->uuid, $user->uuid, 'User UUID was intact after saving with UUID.');

      // Test entity_uuid_delete() for users.
      entity_uuid_delete('user', $user->uuid);
      $user_test = user_load($user->uid);
      $this->assertFalse($user_test, 'Deleting user with UUID worked.');
    }
  }
}

/**
 * Tests the Node implementation.
 */
class UUIDNodeTestCase extends UUIDTestCase {

  /**
   * {@inheritdoc}
   */
  public static function getInfo() {
    return array(
      'name' => 'Node implementation',
      'description' => 'Tests the Node implementation.',
      'group' => 'UUID',
    );
  }

  /**
   * {@inheritdoc}
   */
  function setUp() {
    // Some tests depends on the optional Entity API module.
    if (module_exists('entity')) {
      parent::setUp('uuid', 'entity');
    }
    else {
      parent::setUp('uuid');
    }
  }

  /**
   * Tests CRUD on nodes with UUID functions.
   *
   * @todo
   *   Break out into multiple test methods to loosen coupling between tests.
   */
  function testNodeCRUD() {
    // Create some entities that we will work with.
    $user = $this->drupalCreateUser();
    $node = $this->drupalCreateNode(array('title' => 'original title', 'uid' => $user->uid));

    $this->assertUUID($node->uuid, 'Node UUID was generated.');
    $this->assertUUID($node->vuuid, 'Node revision UUID was generated.');

    // Test node update, without creating new revision.
    $node_test = clone $node;
    $node_test->title = 'original title';
    $node_test->revision = FALSE;
    node_save($node_test);
    $node_test = node_load($node->nid, FALSE, TRUE);
    $this->assertEqual($node_test->uuid, $node->uuid, 'Node UUID was intact after update, when not creating new revision.');
    $this->assertEqual($node_test->vuuid, $node->vuuid, 'Node revision UUID was intact after updating, when not creating new revision.');
    // Save the original revision IDs that we will test with later.
    $vid_old = $node_test->vid;
    $vuuid_old = $node_test->vuuid;
    $uuid_old = $node_test->uuid;

    // Test node update, with new revision.
    $node_test = clone $node;
    $node_test->title = 'newer title';
    $node_test->revision = TRUE;
    node_save($node_test);
    $node_test = node_load($node->nid, FALSE, TRUE);
    $this->assertEqual($node_test->uuid, $node->uuid, 'Node UUID was intact after updating, when creating new revision.');
    $this->assertNotEqual($node_test->vuuid, $node->vuuid, 'A new node revision UUID was generated, when creating new revision.');
    $this->assertUUID($node_test->vuuid, 'The new node revision UUID was valid.');

    // Test entity_uuid_load().
    // Save some variables that we will test against.
    $nid_test = $node_test->nid;
    $vid_test = $node_test->vid;
    $uid_test = $user->uuid;
    $uuid_test = $node_test->uuid;
    $vuuid_test = $node_test->vuuid;
    $nodes = entity_uuid_load('node', array($node->uuid), array(), TRUE);
    $node_test = reset($nodes);
    $this->assertEqual($node_test->nid, $nid_test, 'Node ID was correct when loading with UUID.');
    $this->assertEqual($node_test->vid, $vid_test, 'Node revision ID was correct when loading with UUID.');
    $this->assertEqual($node_test->uid, $uid_test, "Node author ID was transformed to UUID when loaded with UUID.");
    $this->assertEqual($node_test->uuid, $uuid_test, 'Node UUID was correct when loading with UUID.');
    $this->assertEqual($node_test->vuuid, $vuuid_test, 'Node revision UUID was correct when loading with UUID.');

    // Test entity_uuid_load() with conditions.
    // Load the previous revision UUID that we saved earlier.
    $nodes = entity_uuid_load('node', array($uuid_test), array('vuuid' => $vuuid_old));
    $node_test = reset($nodes);
    $this->assertTrue((($node_test->uuid == $uuid_test) && ($node_test->nid && $node->nid)), 'The correct entity was loaded when loading a universal entity with a revision UUID condition.');
    $this->assertEqual($node_test->vuuid, $vuuid_old, 'Correct revision UUID was loaded when loading a universal entity with a revision UUID condition.');
    $this->assertEqual($node_test->vid, $vid_old, 'Correct revision ID was loaded when loading a universal entity with a revision UUID condition.');
    $this->assertEqual($node_test->title, 'original title', 'Correct title was loaded when loading a universal entity with a revision UUID condition.');

    // The following tests depends on the optional Entity API module.
    if (module_exists('entity')) {
      // Reload the node again because we have created new revisions above.
      $node = node_load($node->nid, FALSE, TRUE);
      // Test entity_uuid_save() for nodes.
      $nodes = entity_uuid_load('node', array($node->uuid), array(), TRUE);
      $node_test = reset($nodes);
      $node_test->nid = rand();
      $node_test->vid = rand();
      $node_test->title = 'new title';
      $node_test->revision = FALSE;
      entity_uuid_save('node', $node_test);
      $node_test = node_load($node->nid, FALSE, TRUE);
      $this->assertEqual($node_test->title, 'new title', 'Saving node with UUID mapped to correct node, when not creating new revision.');
      $this->assertEqual($node_test->uuid, $node->uuid, 'Node UUID was intact after saving with UUID, when not creating new revision.');
      $this->assertEqual($node_test->vuuid, $node->vuuid, 'Node revison UUID was intact after saving with UUID, when not creating new revision.');
      $this->assertEqual($node_test->uid, $node->uid, "Node property 'uid' was intact after saving with UUID, when not creating new revision.");

      // Test the same thing again, but now triggering a new revision.
      $nodes = entity_uuid_load('node', array($node->uuid), array(), TRUE);
      $node_test = reset($nodes);
      $node_test->nid = rand();
      $node_test->vid = rand();
      $node_test->title = 'newer title';
      $node_test->revision = TRUE;
      entity_uuid_save('node', $node_test);
      $node_test = node_load($node->nid, FALSE, TRUE);
      $this->assertEqual($node_test->title, 'newer title', 'Saving node with UUID mapped to correct node, when creating new revision.');
      $this->assertEqual($node_test->uuid, $node->uuid, 'Node UUID was intact after saving with UUID, when creating new revision.');
      $this->assertNotEqual($node_test->vuuid, $node->vuuid, 'A new node revison UUID was generated after saving with UUID, when creating new revision.');
      $this->assertUUID($node_test->vuuid, 'New node revision UUID was valid.');
      $this->assertEqual($node_test->uid, $node->uid, "Node property 'uid' was intact after saving with UUID, when creating new revision.");

      // Test the same thing again, but now triggering a new revision from a
      // remote environment.
      // TODO: Move this test to the uuid_services module.
      $nodes = entity_uuid_load('node', array($node->uuid), array(), TRUE);
      $node_test = reset($nodes);
      // Store the current local revision ID to test with later.
      $vid_old1 = $node_test->vid;
      $vuuid_old1 = $node_test->vuuid;
      // Simulate this node coming from a remote environment by generating
      // IDs that won't match. Only the UUID match at this point.
      $node_test->uuid_services = TRUE;
      $nid_remote = rand();
      $vid_remote = rand();
      $vuuid_test = uuid_generate();
      $node_test->nid = $nid_test;
      $node_test->vid = $vid_test;
      $node_test->vuuid = $vuuid_test;
      $node_test->revision = TRUE;
      entity_uuid_save('node', $node_test);
      $node_test = node_load($node->nid, FALSE, TRUE);
      $this->assertNotEqual($node_test->vid, $vid_old1, 'A new revision was created, when trying to create new revision with new revision UUID from remote site');
      $this->assertEqual($node_test->vuuid, $vuuid_test, 'The revison UUID was preserved after saving with UUID, when trying to create new revision with new revision UUID from remote site.');

      // Test the same thing again from a remote environment, but now with the
      // same vuuid as once previosuly. This should not trigger a new revision.
      // This covers the case of "dupe deployments" where a client might push a
      // node several times.
      // TODO: Move this test to the uuid_services module.
      $nodes = entity_uuid_load('node', array($node->uuid), array(), TRUE);
      $node_test = reset($nodes);
      // Store the current local revision ID to test with later.
      $vid_old2 = $node_test->vid;
      // Simulate this node coming from a remote environment by generating
      // IDs that won't match.
      $node_test->uuid_services = TRUE;
      $node_test->nid = $nid_test;
      $node_test->vid = $vid_test;
      $node_test->vuuid = $vuuid_test;
      $node_test->revision = TRUE;
      entity_uuid_save('node', $node_test);
      $node_test = node_load($node->nid, FALSE, TRUE);
      $this->assertEqual($node_test->vid, $vid_old2, 'A new revision was not created, when trying to create new revision with existing revision UUID from remote site.');
      $this->assertEqual($node_test->vuuid, $vuuid_test, 'The revison UUID was preserved after saving with UUID, when trying to create new revision with existing revision UUID from remote site.');

      // Test the same this again, but now with an old revision.
      $nodes = entity_uuid_load('node', array($uuid_old), array('vuuid' => $vuuid_old), TRUE);
      $node_test = reset($nodes);
      // Simulate this node coming from a remote environment by generating
      // IDs that won't match.
      $node_test->uuid_services = TRUE;
      $node_test->nid = rand();
      $node_test->vid = rand();
      $node_test->revision = TRUE;
      $node_test->title = 'newest title';
      entity_uuid_save('node', $node_test);
      $node_test = node_load($node->nid, $vid_old, TRUE);
      $this->assertEqual($node_test->title, 'newest title', 'The revision was updated, when updating old revision with existing revision UUID from remote site.');
      $this->assertEqual($node_test->vuuid, $vuuid_old, 'The revison UUID was preserved after saving with UUID, when updating old revision with existing revision UUID from remote site.');

      // Setting the node options variable should also trigger a new revision.
      $nodes = entity_uuid_load('node', array($node->uuid), array(), TRUE);
      $node_test = reset($nodes);
      variable_set('node_options_' . $node_test->type, array('revision'));
      entity_uuid_save('node', $node_test);
      $this->assertNotEqual($node_test->vuuid, $node->vuuid, 'A new node revison ID was generated after saving with UUID, when relying on the node options variable.');

      // Test entity_uuid_delete() for nodes.
      entity_uuid_delete('node', $node->uuid);
      $node_test = node_load($node->nid);
      $this->assertFalse($node_test, 'Deleting node with UUID worked.');
    }
  }
}

/**
 * Tests the Comment implementation.
 *
 * @todo
 *   Contribute patch to CommentHelperCase::setUp() to make it extendable.
 */
class UUIDCommentTestCase extends CommentHelperCase {

  /**
   * {@inheritdoc}
   */
  public static function getInfo() {
    return array(
      'name' => 'Comment implementation',
      'description' => 'Tests the Comment implementation.',
      'group' => 'UUID',
    );
  }

  /**
   * Helper function that asserts a UUID.
   *
   * We have duplicated this function from UUIDTestCase since we have to extend
   * CommentHelperCase instead.
   */
  function assertUUID($uuid, $message = NULL) {
    $this->assertTrue(uuid_is_valid($uuid), $message);
  }

  /**
   * Test CRUD on comments with UUID functions.
   */
  function testCommentCRUD() {
    // This is sub optimal, but due to how CommentHelperCase::setUp() is
    // constructed we are enforced to do this. So unfortunately this test
    // depends on 'entity' module for now.
    module_enable(array('uuid', 'entity'), TRUE);
    $user = $this->drupalCreateUser();
    $this->drupalLogin($user);
    $node = $this->drupalCreateNode();
    $return = $this->postComment($node, 'Lorem ipsum');

    $comment = comment_load($return->id);
    $this->assertUUID($comment->uuid, 'Comment UUID was generated.');

    // Test updating comment.
    $comment_test = clone $comment;
    $comment_test->subject = 'new subject';
    comment_save($comment_test);
    $comment_test = comment_load($comment->cid);
    $this->assertEqual($comment_test->uuid, $comment->uuid, 'Comment UUID was intact after update.');

    // Test entity_uuid_load().
    $comments = entity_uuid_load('comment', array($comment->uuid), array(), TRUE);
    $comment_test = reset($comments);
    $this->assertEqual($comment_test->cid, $return->id, 'Comment was correctly loaded with UUID.');
    $this->assertEqual($comment_test->uid, $user->uuid, "Comment property 'uid' was transformed to UUID when loaded with UUID.");
    $this->assertEqual($comment_test->nid, $node->uuid, "Comment property 'nid' was transformed to UUID when loaded with UUID.");

    // The following tests depends on the optional Entity API module.
    if (module_exists('entity')) {
      // Test entity_uuid_save() for comments.
      $comments = entity_uuid_load('comment', array($comment->uuid), array(), TRUE);
      $comment_test = reset($comments);
      $comment_test->cid = rand();
      $comment_test->subject = 'newer subject';
      entity_uuid_save('comment', $comment_test);
      $comment_test = comment_load($comment->cid);
      $this->assertEqual($comment_test->subject, 'newer subject', 'Saving comment with UUID mapped to correct comment.');
      $this->assertEqual($comment_test->uuid, $comment->uuid, 'Comment UUID was intact after saving with UUID.');
      $this->assertEqual($comment_test->uid, $user->uid, "Comment property 'uid' was after saving with UUID.");
      $this->assertEqual($comment_test->nid, $node->nid, "Comment property 'nid' was after saving with UUID.");

      // Test entity_uuid_delete() for comments.
      entity_uuid_delete('comment', $comment->uuid);
      $comment_test = comment_load($comment->cid);
      $this->assertFalse($comment_test, 'Deleting comment with UUID worked.');
    }
  }
}

/**
 * Tests the Taxonomy implementation.
 */
class UUIDTaxonomyTestCase extends TaxonomyWebTestCase {

  /**
   * {@inheritdoc}
   */
  public static function getInfo() {
    return array(
      'name' => 'Taxonomy implementation',
      'description' => 'Tests the Taxonomy implementation.',
      'group' => 'UUID',
    );
  }

  /**
   * {@inheritdoc}
   *
   * A lot of code here is taken from TaxonomyTermTestCase::setUp().
   */
  function setUp() {
    // Some tests depends on the optional Entity API module.
    if (module_exists('entity')) {
      parent::setUp('taxonomy', 'uuid', 'entity');
    }
    else {
      parent::setUp('taxonomy', 'uuid');
    }
  }

  /**
   * Helper function that asserts a UUID.
   *
   * We have duplicated this function from UUIDTestCase since we have to extend
   * TaxonomyWebTestCase instead.
   */
  function assertUUID($uuid, $message = NULL) {
    $this->assertTrue(uuid_is_valid($uuid), $message);
  }

  /**
   * Test CRUD on comments with UUID functions.
   */
  function testTaxonomyCRUD() {
    $user = $this->drupalCreateUser(array('administer taxonomy', 'administer nodes', 'bypass node access'));
    $this->drupalLogin($user);

    // Create a term by tagging a node. We'll use this node later too.
    $vocabulary = new stdClass;
    $vocabulary->vid = 1;
    $term = $this->createTerm($vocabulary);
    $this->assertUUID($term->uuid, 'Term UUID was generated.');

    // Test updating term.
    $term_test = clone $term;
    $term_test->name = 'new name';
    taxonomy_term_save($term_test);
    $term_test = taxonomy_term_load($term->tid);
    $this->assertEqual($term_test->uuid, $term->uuid, 'Term UUID was intact after update.');

    // Test entity_uuid_load().
    $terms = entity_uuid_load('taxonomy_term', array($term->uuid), array(), TRUE);
    $term_test = reset($terms);
    $this->assertEqual($term_test->tid, $term->tid, 'Term was correctly loaded with UUID.');

    // The following tests depends on the Entity API module.
    if (module_exists('entity')) {
      // Test entity_uuid_save() for terms.
      $terms = entity_uuid_load('taxonomy_term', array($term->uuid), array(), TRUE);
      $term_test = reset($terms);
      $term_test->tid = rand();
      $term_test->name = 'newer name';
      entity_uuid_save('taxonomy_term', $term_test);
      $term_test = taxonomy_term_load($term->tid);
      $this->assertEqual($term_test->name, 'newer name', 'Saving term with UUID mapped to correct term.');
      $this->assertEqual($term_test->uuid, $term->uuid, 'Term UUID was intact after saving with UUID.');

      // Test entity_uuid_delete() for nodes.
      entity_uuid_delete('taxonomy_term', $term->uuid);
      $term_test = taxonomy_term_load($term->tid);
      $this->assertFalse($term_test, 'Deleting term with UUID worked.');
    }
  }
}

/**
 * Tests for the UUID synchronization.
 */
class UUIDSyncTestCase extends UUIDTestCase {

  /**
   * {@inheritdoc}
   */
  public static function getInfo() {
    return array(
      'name' => 'UUID sync',
      'description' => 'Tests the UUID synchronization.',
      'group' => 'UUID',
    );
  }

  /**
   * Helper function that asserts that a database table column exists.
   *
   * @todo
   *   There are something weird around this assertion.
   */
  function assertTableColumn($table, $column, $message) {
    $this->assertTrue(db_field_exists($table, $column), $message);
  }

  /**
   * Tests creating UUIDs for entities that don't have them.
   */
  function testSync() {
    // These entities will not have UUID from the start, since the UUID module
    // isn't installed yet.
    $user = $this->drupalCreateUser();
    $node = $this->drupalCreateNode();

    $this->assertTrue(!isset($node->uuid), "Node has no UUID before installation of UUID module.");
    $this->assertTrue(!isset($node->vuuid), "Node has no revision UUID before installation of UUID module.");
    $this->assertTrue(!isset($user->uuid), "User has no UUID before installation of UUID module.");

    // Now enable the UUID module.
    module_enable(array('uuid'), TRUE);
    drupal_flush_all_caches();
    drupal_static_reset();

    // Check that the UUID column was generated for {node}.
    $this->assertTableColumn('node', 'uuid', 'UUID column was generated for the node table.');
    $this->assertTableColumn('node_revision', 'vuuid', 'Revision UUID column was generated for the node_revision table.');
    $this->assertTableColumn('users', 'uuid', 'UUID column was generated for the user table.');

    // Login with a user and click the sync button.
    $web_user = $this->drupalCreateUser(array('administer uuid'));
    $this->drupalLogin($web_user);
    $this->drupalPost('admin/config/system/uuid', array(), t('Create missing UUIDs'));

    // Test if UUID was generated for nodes.
    $node_test = node_load($node->nid, FALSE, TRUE);
    $this->assertUUID($node_test->uuid, 'Node UUID was generated when clicking the sync button.');
    $this->assertUUID($node_test->vuuid, 'Node revision UUID was generated when clicking the sync button.');

    // Test if UUID was generated for users.
    $user_test = user_load($user->uid, TRUE);
    $this->assertUUID($user_test->uuid, 'User UUID was generated when clicking the sync button.');
  }
}