function RulesIntegrationTestCase::testDataIntegration

Test data integration.

File

d7-tests/rules_integration_test_case.test, line 50

Class

RulesIntegrationTestCase

Tests provided module integration.

Code

function testDataIntegration() {
    // Test data_create action.
    $action = rules_action('data_create', array(
        'type' => 'log_entry',
        'param_type' => 'rules_test',
        'param_message' => 'Rules test log message',
        'param_severity' => WATCHDOG_WARNING,
        'param_request_uri' => 'http://example.com',
        'param_link' => '',
    ));
    $action->access();
    $action->execute();
    $text = RulesLog::logger()->render();
    $pos = strpos($text, RulesTestCase::t('Added the provided variable %data_created of type %log_entry', array(
        'data_created',
        'log_entry',
    )));
    $this->assertTrue($pos !== FALSE, 'Data of type log entry has been created.');
    // Test variable_add action.
    $action = rules_action('variable_add', array(
        'type' => 'text_formatted',
        'value' => array(
            'value' => 'test text',
            'format' => 1,
        ),
    ));
    $action->access();
    $action->execute();
    $text = RulesLog::logger()->render();
    $pos = strpos($text, RulesTestCase::t('Added the provided variable %variable_added of type %text_formatted', array(
        'variable_added',
        'text_formatted',
    )));
    $this->assertTrue($pos !== FALSE, 'Data of type text formatted has been created.');
    // Test using the list actions.
    $rule = rule(array(
        'list' => array(
            'type' => 'list<text>',
            'label' => 'A list of text',
        ),
    ));
    $rule->action('list_add', array(
        'list:select' => 'list',
        'item' => 'bar2',
    ));
    $rule->action('list_add', array(
        'list:select' => 'list',
        'item' => 'bar',
        'pos' => 'start',
    ));
    $rule->action('list_add', array(
        'list:select' => 'list',
        'item' => 'bar',
        'unique' => TRUE,
    ));
    $rule->action('list_remove', array(
        'list:select' => 'list',
        'item' => 'bar2',
    ));
    $list = entity_metadata_wrapper('list', array(
        'foo',
        'foo2',
    ));
    $rule->execute($list);
    RulesLog::logger()->checkLog();
    $this->assertEqual($list->value(), array(
        'bar',
        'foo',
        'foo2',
    ), 'List items removed and added.');
    $this->assertFalse(rules_condition('list_contains')->execute($list, 'foo-bar'), 'Condition "List item contains" evaluates to FALSE');
    $this->assertTrue(rules_condition('list_contains')->execute($list, 'foo'), 'Condition "List item contains" evaluates to TRUE');
    
    //debug(RulesLog::logger()->render());
    // Test data_is condition with IN operation.
    $rule = rule(array(
        'node' => array(
            'type' => 'node',
        ),
    ));
    $rule->condition('data_is', array(
        'data:select' => 'node:title',
        'op' => 'IN',
        'value' => array(
            'foo',
            'bar',
        ),
    ));
    $rule->action('data_set', array(
        'data:select' => 'node:title',
        'value' => 'bar',
    ));
    $rule->integrityCheck();
    $node = $this->drupalCreateNode(array(
        'title' => 'foo',
    ));
    $rule->execute($node);
    $this->assertEqual($node->title, 'bar', "Data comparison using IN operation evaluates to TRUE.");
    // Test Condition: Data is empty.
    $rule = rule(array(
        'node' => array(
            'type' => 'node',
        ),
    ));
    $rule->condition('data_is_empty', array(
        'data:select' => 'node:title',
    ));
    $rule->action('data_set', array(
        'data:select' => 'node:title',
        'value' => 'bar',
    ));
    $rule->integrityCheck();
    // Data is empty condition evaluates to TRUE
    // for node with empty title, action sets title to 'bar'.
    $node = $this->drupalCreateNode(array(
        'title' => '',
        'type' => 'article',
    ));
    $rule->execute($node);
    $this->assertEqual($node->title, 'bar', "Data is empty condition evaluates to TRUE for node with empty title, action sets title to 'bar'.");
    // Data is empty condition evaluates to FALSE
    // for node with title 'foo', action is not executed.
    $node = $this->drupalCreateNode(array(
        'title' => 'foo',
        'type' => 'article',
    ));
    $rule->execute($node);
    $this->assertEqual($node->title, 'foo', "Data is empty condition evaluates to FALSE for node with title 'foo', action is not executed.");
    // Data is empty condition evaluates to TRUE for the parent of a
    // not existing term in the tags field of the node.
    $rule = rule(array(
        'node' => array(
            'type' => 'node',
        ),
    ));
    $rule->condition('node_is_of_type', array(
        'type' => array(
            'article',
        ),
    ));
    $rule->condition('data_is_empty', array(
        'data:select' => 'node:field-tags:0:parent',
    ));
    $rule->action('data_set', array(
        'data:select' => 'node:title',
        'value' => 'bar',
    ));
    $rule->integrityCheck();
    $node = $this->drupalCreateNode(array(
        'title' => 'foo',
        'type' => 'article',
    ));
    $rule->execute($node);
    $this->assertEqual($node->title, 'bar', "Data is empty condition evaluates to TRUE for not existing data structures");
    // Test Action: Calculate a value.
    $rule = rule(array(
        'node' => array(
            'type' => 'node',
        ),
    ));
    $rule->action('data_calc', array(
        'input_1:select' => 'node:nid',
        'op' => '*',
        'input_2' => 2,
    ));
    $rule->action('data_set', array(
        'data:select' => 'node:title',
        'value:select' => 'result',
    ));
    $rule->integrityCheck();
    $rule->execute($node);
    $this->assertEqual($node->title, $node->nid * 2, "Value has been calculated.");
    // Test moving a date.
    $action_set = rules_action_set(array(
        'date' => array(
            'type' => 'date',
        ),
    ), array(
        'date',
    ));
    $action_set->action('data_calc', array(
        'input_1:select' => 'date',
        'op' => '+',
        'input_2' => 3600,
    ))
        ->action('data_set', array(
        'data:select' => 'date',
        'value:select' => 'result',
    ));
    $action_set->integrityCheck();
    list($result) = $action_set->execute(REQUEST_TIME);
    $this->assertEqual($result, REQUEST_TIME + 3600, 'Used data calculation action to move a date by an hour.');
    // Test data type conversion action.
    $set = rules_action_set(array(
        'result' => array(
            'type' => 'text',
            'parameter' => FALSE,
        ),
    ), array(
        'result',
    ));
    $set->action('data_convert', array(
        'type' => 'text',
        'value:select' => 'site:login-url',
    ));
    $set->action('data_set', array(
        'data:select' => 'result',
        'value:select' => 'conversion_result',
    ));
    list($result) = $set->execute();
    $set->integrityCheck();
    $this->assertEqual($result, url('user', array(
        'absolute' => TRUE,
    )), 'Converted URI to text.');
    $set = rules_action_set(array(
        'result' => array(
            'type' => 'integer',
            'parameter' => FALSE,
        ),
        'source' => array(
            'type' => 'text',
        ),
    ), array(
        'result',
    ));
    $set->action('data_convert', array(
        'type' => 'integer',
        'value:select' => 'source',
    ));
    $set->action('data_set', array(
        'data:select' => 'result',
        'value:select' => 'conversion_result',
    ));
    list($result) = $set->execute('9.4');
    $this->assertEqual($result, 9, 'Converted decimal to integer using rounding.');
    $set = rules_action_set(array(
        'result' => array(
            'type' => 'integer',
            'parameter' => FALSE,
        ),
        'source' => array(
            'type' => 'text',
        ),
    ), array(
        'result',
    ));
    $set->action('data_convert', array(
        'type' => 'integer',
        'value:select' => 'source',
        'rounding_behavior' => 'down',
    ));
    $set->action('data_set', array(
        'data:select' => 'result',
        'value:select' => 'conversion_result',
    ));
    list($result) = $set->execute('9.6');
    $this->assertEqual($result, 9, 'Converted decimal to integer using roundin behavio down.');
    $set = rules_action_set(array(
        'result' => array(
            'type' => 'integer',
            'parameter' => FALSE,
        ),
        'source' => array(
            'type' => 'text',
        ),
    ), array(
        'result',
    ));
    $set->action('data_convert', array(
        'type' => 'integer',
        'value:select' => 'source',
        'rounding_behavior' => 'up',
    ));
    $set->action('data_set', array(
        'data:select' => 'result',
        'value:select' => 'conversion_result',
    ));
    list($result) = $set->execute('9.4');
    $this->assertEqual($result, 10, 'Converted decimal to integer using rounding behavior up.');
    // Test text matching condition.
    $result = rules_condition('text_matches')->execute('my-text', 'text', 'contains');
    $result2 = rules_condition('text_matches')->execute('my-text', 'tex2t', 'contains');
    $this->assertTrue($result && !$result2, 'Text matching condition using operation contain evaluated.');
    $result = rules_condition('text_matches')->execute('my-text', 'my', 'starts');
    $result2 = rules_condition('text_matches')->execute('my-text', 'text', 'starts');
    $this->assertTrue($result && !$result2, 'Text matching condition using operation starts evaluated.');
    $result = rules_condition('text_matches')->execute('my-text', 'text', 'ends');
    $result2 = rules_condition('text_matches')->execute('my-text', 'my', 'ends');
    $this->assertTrue($result && !$result2, 'Text matching condition using operation ends evaluated.');
    $result = rules_condition('text_matches')->execute('my-text', 'me?y-texx?t', 'regex');
    $result2 = rules_condition('text_matches')->execute('my-text', 'me+y-texx?t', 'regex');
    $this->assertTrue($result && !$result2, 'Text matching condition using operation regex evaluated.');
}