function DomainFilterTest::testDomainURLFilters in Domain Access 7.3
File
- tests/domain.test, line 906
- Simpletest for Domain Access.
Class
- DomainFilterTest
Code
function testDomainURLFilters() {
$domains = $this
->domainCreateDomains();
db_delete('domain_access')
->condition('realm', 'domain_site')
->execute();
$node_ids = array_keys(db_query("SELECT nid FROM {node}")
->FetchAllAssoc('nid'));
$nodes = node_load_multiple($node_ids);
foreach (domain_domains(TRUE) as $key => $domain) {
$node = $nodes[$key];
$path = "node/{$node->nid}";
$this
->assertTrue($path != "node/", t('Fetched a node path.'));
domain_set_domain($key);
$_domain = domain_get_domain();
$this
->domainSetBaseUrl($domain);
$text = $this
->randomString(255);
$filtertext = "---[canonical-url:{$path}]---";
$text .= $filtertext;
$text .= $this
->randomString(255);
$this
->assertTrue(substr_count($text, $filtertext) > 0, t('Sample text contains domain url: @url.', array(
'@url' => $filtertext,
)));
$newtext = domain_url_filter_process($text, NULL, NULL, NULL, NULL, NULL);
$this
->assertTrue(substr_count($newtext, $filtertext) == 0, t('Sample text does not contain domain url: @url.', array(
'@url' => $filtertext,
)));
$url = url($path);
$this
->assertTrue(substr_count($newtext, $url) > 0, t('Sample text contains proper url: @url.', array(
'@url' => $url,
)));
}
}