nat.test in Node Auto Term [NAT] 7.2
Same filename and directory in other branches
NAT module functionality tests.
File
tests/nat.testView source
<?php
/**
* @file
* NAT module functionality tests.
*/
/**
* Base class for all NAT webtest cases.
*/
class NatWebTestCase extends DrupalWebTestCase {
protected $nat_user;
protected $nat_admin_user;
protected $nat_type;
protected $nat_node_title;
protected $nat_node_body;
protected $nat_vocab1;
protected $nat_vocab1_name;
protected $nat_vocab2;
protected $nat_vocab2_name;
// Enable the NAT module.
public function setUp() {
parent::setUp('nat');
$this->nat_admin_user = $this
->drupalCreateUser(array(
'administer NAT configuration',
'administer taxonomy',
));
$this->nat_user = $this
->drupalCreateUser(array(
'create article content',
'edit own article content',
'delete own article content',
));
$this
->drupalLogin($this->nat_admin_user);
$this->nat_vocab1_name = $this
->randomName();
$this->nat_vocab2_name = $this
->randomName();
$this->nat_node_title = $this
->randomName();
$this->nat_node_body = $this
->randomName();
$this->nat_type = 'article';
$this
->_create_vocabs();
$this
->drupalLogout($this->nat_admin_user);
}
/**
* Create two vocabularies for testing.
*/
function _create_vocabs() {
// Create 2 vocabularies
$edit = array(
'name' => $this->nat_vocab1_name,
'machine_name' => strtolower($this->nat_vocab1_name),
);
$this
->drupalPost('admin/structure/taxonomy/add', $edit, t('Save'));
$edit = array(
'name' => $this->nat_vocab2_name,
'machine_name' => strtolower($this->nat_vocab2_name),
);
$this
->drupalPost('admin/structure/taxonomy/add', $edit, t('Save'));
$this->nat_vocab1 = taxonomy_vocabulary_machine_name_load($this->nat_vocab1_name);
$this->nat_vocab2 = taxonomy_vocabulary_machine_name_load($this->nat_vocab2_name);
}
function setDefaults() {
$config = _nat_variable_get();
$config['types'] = array(
'article' => array(
$this->nat_vocab1->vid => $this->nat_vocab1->vid,
$this->nat_vocab2->vid => $this->nat_vocab2->vid,
),
);
$config['delete'] = array(
'article' => TRUE,
);
$config['associations'] = array(
'article' => array(
$this->nat_vocab1->vid => array(
'name' => 'title',
),
$this->nat_vocab2->vid => array(
'name' => 'title',
),
),
);
variable_set('nat_config', $config);
}
}
/**
* NAT settings test.
*/
class NatSettingsTest extends NatWebTestCase {
// SimpleTest information data.
public static function getInfo() {
return array(
'name' => t('NAT Settings'),
'description' => t('Checks if all settings are usable.'),
'group' => 'NAT',
);
}
public function setUp() {
parent::setUp();
}
/**
* NAT settings test.
*/
public function testNatSettings() {
$this
->drupalLogin($this->nat_admin_user);
// Change NAT settings
$edit = array(
'types[' . $this->nat_type . '][]' => array(
$this->nat_vocab1->vid,
$this->nat_vocab2->vid,
),
'body[' . $this->nat_type . ']' => TRUE,
'delete[' . $this->nat_type . ']' => TRUE,
'related[' . $this->nat_type . ']' => TRUE,
'node_links[' . $this->nat_type . ']' => TRUE,
);
$this
->drupalPost('admin/structure/nat', $edit, t('Save configuration'));
// Verify settings.
$nat_config = _nat_variable_get();
$this
->assertTRUE($nat_config['types'][$this->nat_type][$this->nat_vocab1->vid], 'Vid1 found in configuration');
$this
->assertTRUE($nat_config['types'][$this->nat_type][$this->nat_vocab2->vid], 'Vid2 found in configuration');
// Multiple selectboxes currently can't be checked through an assertion.
// http://drupal.org/node/699132
// $this->assertFieldByName('types[story][]', $this->nat_vocab1->vid, 'Vid1 for story was set');
// $this->assertFieldByName('types[story][]', $this->nat_vocab2->vid, 'Vid2 for story was set');
$this
->assertFieldByName('body[' . $this->nat_type . ']', 1, 'Use Body as terms description was set');
$this
->assertFieldByName('delete[' . $this->nat_type . ']', 1, 'Delete associated terms was set');
$this
->assertFieldByName('related[' . $this->nat_type . ']', 1, 'Delete associated terms was set');
$this
->assertFieldByName('node_links[' . $this->nat_type . ']', 1, 'Delete associated terms was set');
// Change NAT settings
$edit = array(
'types[' . $this->nat_type . '][]' => $this->nat_vocab1->vid,
'body[' . $this->nat_type . ']' => FALSE,
'delete[' . $this->nat_type . ']' => FALSE,
'related[' . $this->nat_type . ']' => FALSE,
'node_links[' . $this->nat_type . ']' => FALSE,
);
$this
->drupalPost('admin/structure/nat', $edit, t('Save configuration'));
// Directly get nat_config because of static caching.
$nat_config = variable_get('nat_config', array());
$this
->assertTRUE(isset($nat_config['types'][$this->nat_type][$this->nat_vocab1->vid]), 'Vid1 found in configuration');
$this
->assertFALSE(isset($nat_config['types'][$this->nat_type][$this->nat_vocab2->vid]), 'Vid2 not found in configuration');
$this
->assertFieldByName('body[' . $this->nat_type . ']', FALSE, 'Use Body as terms description was not set');
$this
->assertFieldByName('delete[' . $this->nat_type . ']', FALSE, 'Delete associated terms was not set');
$this
->assertFieldByName('related[' . $this->nat_type . ']', FALSE, 'Delete associated terms was not set');
$this
->assertFieldByName('node_links[' . $this->nat_type . ']', FALSE, 'Delete associated terms was set');
$this
->drupalLogout($this->nat_admin_user);
}
}
/**
* NAT basic function test.
*/
class NatBasicTest extends NatWebTestCase {
// SimpleTest information data.
public static function getInfo() {
return array(
'name' => t('NAT Basic'),
'description' => t('Testing basic functions and settings.'),
'group' => 'NAT',
);
}
public function setUp() {
parent::setUp();
$this
->drupalLogin($this->nat_admin_user);
// Change NAT settings
$edit = array(
'types[' . $this->nat_type . '][]' => array(
$this->nat_vocab1->vid,
$this->nat_vocab2->vid,
),
'delete[' . $this->nat_type . ']' => TRUE,
);
$this
->drupalPost('admin/structure/nat', $edit, t('Save configuration'));
$this
->drupalLogout($this->nat_admin_user);
}
/**
* NAT basic function test.
*/
public function testNatBasic() {
$this
->drupalLogin($this->nat_user);
// Create NAT node
$settings = array(
'type' => $this->nat_type,
'title' => $this->nat_node_title,
'body' => $this->nat_node_body,
);
$node = $this
->drupalCreateNode($settings);
$terms = taxonomy_get_term_by_name($node->title);
$this
->assertTRUE(count($terms) === 2, 'Found 2 terms');
// Check if the terms are in one of the vocabularies.
$this
->assertTRUE($terms[0]->vid === $this->nat_vocab1->vid || $terms[0]->vid === $this->nat_vocab2->vid, 'Term 1 is in one of the desired vocabularies');
$this
->assertTRUE($terms[1]->vid === $this->nat_vocab1->vid || $terms[1]->vid === $this->nat_vocab2->vid, 'Term 2 is in one of the desired vocabularies');
// Check description.
$this
->assertTRUE($terms[0]->description === $this->nat_node_body, 'Term 1 description is correct');
$this
->assertTRUE($terms[1]->description === $this->nat_node_body, 'Term 2 description is correct');
// Delete node.
node_delete($node->nid);
// Check that terms are deleted.
$this
->assertFALSE(taxonomy_get_term_by_name($this->nat_node_title), 'No terms with node title found');
$this
->drupalLogout($this->nat_user);
}
}
/**
* Test different settings.
* Due to static settings caching we have to use a second test case for this.
*/
class NatSecondaryTest extends NatWebTestCase {
// SimpleTest information data.
public static function getInfo() {
return array(
'name' => t('NAT Secondary'),
'description' => t('Test alternative settings.'),
'group' => 'NAT',
);
}
public function setUp() {
parent::setUp();
$this
->drupalLogin($this->nat_admin_user);
// NAT settings
$edit = array(
'types[' . $this->nat_type . '][]' => array(
$this->nat_vocab1->vid,
$this->nat_vocab2->vid,
),
'body[' . $this->nat_type . ']' => FALSE,
'delete[' . $this->nat_type . ']' => FALSE,
'related[' . $this->nat_type . ']' => TRUE,
'node_links[' . $this->nat_type . ']' => TRUE,
);
$this
->drupalPost('admin/structure/nat', $edit, t('Save configuration'));
$this
->drupalLogout($this->nat_admin_user);
}
/**
* Test different settings.
*/
public function testNatAssociation() {
$this
->drupalLogin($this->nat_user);
// Create NAT node
$settings = array(
'type' => $this->nat_type,
'title' => $this->nat_node_title,
'body' => $this->nat_node_body,
);
$node = $this
->drupalCreateNode($settings);
$terms = taxonomy_get_term_by_name($node->title);
$this
->assertTRUE(count($terms) === 2, 'Found 2 terms');
// Check for empty description.
$this
->assertTRUE($terms[0]->description === '', 'Term 1 description is correct');
$this
->assertTRUE($terms[1]->description === '', 'Term 2 description is correct');
// Delete node.
node_delete($node->nid);
// Check that terms are not deleted.
$this
->assertTRUE(count(taxonomy_get_term_by_name($this->nat_node_title)) === 2, 'Found 2 terms');
// Get tid in regards of the vid.
$vocab1_tid = $terms[0]->vid === $this->nat_vocab1->vid ? $terms[0]->tid : $terms[1]->tid;
$vocab2_tid = $terms[0]->vid === $this->nat_vocab2->vid ? $terms[0]->tid : $terms[1]->tid;
// Create node with synonyms.
$title = $this
->randomName();
$edit = array(
'title' => $title,
);
$this
->drupalPost('node/add/' . $this->nat_type, $edit, t('Save'));
// Load the node and its edit page to check the data.
// $node = node_load(array('title' => $title));
// $this->drupalGet('node/' . $node->nid . '/edit');
// $this->assertFieldByName('nat[related][' . $this->nat_vocab1->vid . '][]', $vocab1_tid, 'Found relation for vocab1');
// $this->assertFieldByName('nat[related][' . $this->nat_vocab2->vid . '][]', $vocab2_tid, 'Found relation for vocab2');
// $this->assertFieldByName('nat[synonyms]', 'Foo', 'Found synonym');
$this
->drupalLogout($this->nat_user);
}
}
Classes
Name![]() |
Description |
---|---|
NatBasicTest | NAT basic function test. |
NatSecondaryTest | Test different settings. Due to static settings caching we have to use a second test case for this. |
NatSettingsTest | NAT settings test. |
NatWebTestCase | Base class for all NAT webtest cases. |