function CommonURLUnitTest::testExternalUrls

Test external URL handling.

File

modules/simpletest/tests/common.test, line 351

Class

CommonURLUnitTest

Tests for URL generation functions.

Code

function testExternalUrls() {
    $test_url = 'http://drupal.org/';
    // Verify external URL can contain a fragment.
    $url = $test_url . '#drupal';
    $result = url($url);
    $this->assertEqual($url, $result, 'External URL with fragment works without a fragment in $options.');
    // Verify fragment can be overidden in an external URL.
    $url = $test_url . '#drupal';
    $fragment = $this->randomName(10);
    $result = url($url, array(
        'fragment' => $fragment,
    ));
    $this->assertEqual($test_url . '#' . $fragment, $result, 'External URL fragment is overidden with a custom fragment in $options.');
    // Verify external URL can contain a query string.
    $url = $test_url . '?drupal=awesome';
    $result = url($url);
    $this->assertEqual($url, $result, 'External URL with query string works without a query string in $options.');
    // Verify external URL can be extended with a query string.
    $url = $test_url;
    $query = array(
        $this->randomName(5) => $this->randomName(5),
    );
    $result = url($url, array(
        'query' => $query,
    ));
    $this->assertEqual($url . '?' . http_build_query($query, '', '&'), $result, 'External URL can be extended with a query string in $options.');
    // Verify query string can be extended in an external URL.
    $url = $test_url . '?drupal=awesome';
    $query = array(
        $this->randomName(5) => $this->randomName(5),
    );
    $result = url($url, array(
        'query' => $query,
    ));
    $this->assertEqual($url . '&' . http_build_query($query, '', '&'), $result, 'External URL query string can be extended with a custom query string in $options.');
    // Verify that an internal URL does not result in an external URL without
    // protocol part.
    $url = '/drupal.org';
    $result = url($url);
    $this->assertTrue(strpos($result, '//') === FALSE, 'Internal URL does not turn into an external URL.');
    // Verify that an external URL without protocol part is recognized as such.
    $url = '//drupal.org';
    $result = url($url);
    $this->assertEqual($url, $result, 'External URL without protocol is not altered.');
}