2703 lines
		
	
	
		
			89 KiB
		
	
	
	
		
			PHP
		
	
	
			
		
		
	
	
			2703 lines
		
	
	
		
			89 KiB
		
	
	
	
		
			PHP
		
	
	
<?php
 | 
						|
// $Id$
 | 
						|
 | 
						|
/**
 | 
						|
 * Base class for Drupal tests.
 | 
						|
 *
 | 
						|
 * Do not extend this class, use one of the subclasses in this file.
 | 
						|
 */
 | 
						|
abstract class DrupalTestCase {
 | 
						|
  /**
 | 
						|
   * The test run ID.
 | 
						|
   *
 | 
						|
   * @var string
 | 
						|
   */
 | 
						|
  protected $testId;
 | 
						|
 | 
						|
  /**
 | 
						|
   * The original database prefix, before it was changed for testing purposes.
 | 
						|
   *
 | 
						|
   * @var string
 | 
						|
   */
 | 
						|
  protected $originalPrefix = NULL;
 | 
						|
 | 
						|
  /**
 | 
						|
   * The original file directory, before it was changed for testing purposes.
 | 
						|
   *
 | 
						|
   * @var string
 | 
						|
   */
 | 
						|
  protected $originalFileDirectory = NULL;
 | 
						|
 | 
						|
  /**
 | 
						|
   * Time limit for the test.
 | 
						|
   */
 | 
						|
  protected $timeLimit = 500;
 | 
						|
 | 
						|
  /**
 | 
						|
   * Current results of this test case.
 | 
						|
   *
 | 
						|
   * @var Array
 | 
						|
   */
 | 
						|
  public $results = array(
 | 
						|
    '#pass' => 0,
 | 
						|
    '#fail' => 0,
 | 
						|
    '#exception' => 0,
 | 
						|
    '#debug' => 0,
 | 
						|
  );
 | 
						|
 | 
						|
  /**
 | 
						|
   * Assertions thrown in that test case.
 | 
						|
   *
 | 
						|
   * @var Array
 | 
						|
   */
 | 
						|
  protected $assertions = array();
 | 
						|
 | 
						|
  /**
 | 
						|
   * This class is skipped when looking for the source of an assertion.
 | 
						|
   *
 | 
						|
   * When displaying which function an assert comes from, it's not too useful
 | 
						|
   * to see "drupalWebTestCase->drupalLogin()', we would like to see the test
 | 
						|
   * that called it. So we need to skip the classes defining these helper
 | 
						|
   * methods.
 | 
						|
   */
 | 
						|
  protected $skipClasses = array(__CLASS__ => TRUE);
 | 
						|
 | 
						|
  /**
 | 
						|
   * Constructor for DrupalWebTestCase.
 | 
						|
   *
 | 
						|
   * @param $test_id
 | 
						|
   *   Tests with the same id are reported together.
 | 
						|
   */
 | 
						|
  public function __construct($test_id = NULL) {
 | 
						|
    $this->testId = $test_id;
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Internal helper: stores the assert.
 | 
						|
   *
 | 
						|
   * @param $status
 | 
						|
   *   Can be 'pass', 'fail', 'exception'.
 | 
						|
   *   TRUE is a synonym for 'pass', FALSE for 'fail'.
 | 
						|
   * @param $message
 | 
						|
   *   The message string.
 | 
						|
   * @param $group
 | 
						|
   *   Which group this assert belongs to.
 | 
						|
   * @param $caller
 | 
						|
   *   By default, the assert comes from a function whose name starts with
 | 
						|
   *   'test'. Instead, you can specify where this assert originates from
 | 
						|
   *   by passing in an associative array as $caller. Key 'file' is
 | 
						|
   *   the name of the source file, 'line' is the line number and 'function'
 | 
						|
   *   is the caller function itself.
 | 
						|
   */
 | 
						|
  protected function assert($status, $message = '', $group = 'Other', array $caller = NULL) {
 | 
						|
    global $db_prefix;
 | 
						|
 | 
						|
    // Convert boolean status to string status.
 | 
						|
    if (is_bool($status)) {
 | 
						|
      $status = $status ? 'pass' : 'fail';
 | 
						|
    }
 | 
						|
 | 
						|
    // Increment summary result counter.
 | 
						|
    $this->results['#' . $status]++;
 | 
						|
 | 
						|
    // Get the function information about the call to the assertion method.
 | 
						|
    if (!$caller) {
 | 
						|
      $caller = $this->getAssertionCall();
 | 
						|
    }
 | 
						|
 | 
						|
    // Switch to non-testing database to store results in.
 | 
						|
    $current_db_prefix = $db_prefix;
 | 
						|
    $db_prefix = $this->originalPrefix;
 | 
						|
 | 
						|
    // Creation assertion array that can be displayed while tests are running.
 | 
						|
    $this->assertions[] = $assertion = array(
 | 
						|
      'test_id' => $this->testId,
 | 
						|
      'test_class' => get_class($this),
 | 
						|
      'status' => $status,
 | 
						|
      'message' => $message,
 | 
						|
      'message_group' => $group,
 | 
						|
      'function' => $caller['function'],
 | 
						|
      'line' => $caller['line'],
 | 
						|
      'file' => $caller['file'],
 | 
						|
    );
 | 
						|
 | 
						|
    // Store assertion for display after the test has completed.
 | 
						|
    db_insert('simpletest')
 | 
						|
      ->fields($assertion)
 | 
						|
      ->execute();
 | 
						|
 | 
						|
    // Return to testing prefix.
 | 
						|
    $db_prefix = $current_db_prefix;
 | 
						|
    // We do not use a ternary operator here to allow a breakpoint on
 | 
						|
    // test failure.
 | 
						|
    if ($status == 'pass') {
 | 
						|
      return TRUE;
 | 
						|
    }
 | 
						|
    else {
 | 
						|
      return FALSE;
 | 
						|
    }
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Store an assertion from outside the testing context.
 | 
						|
   *
 | 
						|
   * This is useful for inserting assertions that can only be recorded after
 | 
						|
   * the test case has been destroyed, such as PHP fatal errors. The caller
 | 
						|
   * information is not automatically gathered since the caller is most likely
 | 
						|
   * inserting the assertion on behalf of other code. In all other respects
 | 
						|
   * the method behaves just like DrupalTestCase::assert() in terms of storing
 | 
						|
   * the assertion.
 | 
						|
   *
 | 
						|
   * @see DrupalTestCase::assert()
 | 
						|
   */
 | 
						|
  public static function insertAssert($test_id, $test_class, $status, $message = '', $group = 'Other', array $caller = array()) {
 | 
						|
    // Convert boolean status to string status.
 | 
						|
    if (is_bool($status)) {
 | 
						|
      $status = $status ? 'pass' : 'fail';
 | 
						|
    }
 | 
						|
 | 
						|
    $caller += array(
 | 
						|
      'function' => t('Unknown'),
 | 
						|
      'line' => 0,
 | 
						|
      'file' => t('Unknown'),
 | 
						|
    );
 | 
						|
 | 
						|
    $assertion = array(
 | 
						|
      'test_id' => $test_id,
 | 
						|
      'test_class' => $test_class,
 | 
						|
      'status' => $status,
 | 
						|
      'message' => $message,
 | 
						|
      'message_group' => $group,
 | 
						|
      'function' => $caller['function'],
 | 
						|
      'line' => $caller['line'],
 | 
						|
      'file' => $caller['file'],
 | 
						|
    );
 | 
						|
 | 
						|
    db_insert('simpletest')
 | 
						|
      ->fields($assertion)
 | 
						|
      ->execute();
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Cycles through backtrace until the first non-assertion method is found.
 | 
						|
   *
 | 
						|
   * @return
 | 
						|
   *   Array representing the true caller.
 | 
						|
   */
 | 
						|
  protected function getAssertionCall() {
 | 
						|
    $backtrace = debug_backtrace();
 | 
						|
 | 
						|
    // The first element is the call. The second element is the caller.
 | 
						|
    // We skip calls that occurred in one of the methods of our base classes
 | 
						|
    // or in an assertion function.
 | 
						|
   while (($caller = $backtrace[1]) &&
 | 
						|
         ((isset($caller['class']) && isset($this->skipClasses[$caller['class']])) ||
 | 
						|
           substr($caller['function'], 0, 6) == 'assert')) {
 | 
						|
      // We remove that call.
 | 
						|
      array_shift($backtrace);
 | 
						|
    }
 | 
						|
 | 
						|
    return _drupal_get_last_caller($backtrace);
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Check to see if a value is not false (not an empty string, 0, NULL, or FALSE).
 | 
						|
   *
 | 
						|
   * @param $value
 | 
						|
   *   The value on which the assertion is to be done.
 | 
						|
   * @param $message
 | 
						|
   *   The message to display along with the assertion.
 | 
						|
   * @param $group
 | 
						|
   *   The type of assertion - examples are "Browser", "PHP".
 | 
						|
   * @return
 | 
						|
   *   TRUE if the assertion succeeded, FALSE otherwise.
 | 
						|
   */
 | 
						|
  protected function assertTrue($value, $message = '', $group = 'Other') {
 | 
						|
    return $this->assert((bool) $value, $message ? $message : t('Value @value is TRUE.', array('@value' => var_export($value, TRUE))), $group);
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Check to see if a value is false (an empty string, 0, NULL, or FALSE).
 | 
						|
   *
 | 
						|
   * @param $value
 | 
						|
   *   The value on which the assertion is to be done.
 | 
						|
   * @param $message
 | 
						|
   *   The message to display along with the assertion.
 | 
						|
   * @param $group
 | 
						|
   *   The type of assertion - examples are "Browser", "PHP".
 | 
						|
   * @return
 | 
						|
   *   TRUE if the assertion succeeded, FALSE otherwise.
 | 
						|
   */
 | 
						|
  protected function assertFalse($value, $message = '', $group = 'Other') {
 | 
						|
    return $this->assert(!$value, $message ? $message : t('Value @value is FALSE.', array('@value' => var_export($value, TRUE))), $group);
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Check to see if a value is NULL.
 | 
						|
   *
 | 
						|
   * @param $value
 | 
						|
   *   The value on which the assertion is to be done.
 | 
						|
   * @param $message
 | 
						|
   *   The message to display along with the assertion.
 | 
						|
   * @param $group
 | 
						|
   *   The type of assertion - examples are "Browser", "PHP".
 | 
						|
   * @return
 | 
						|
   *   TRUE if the assertion succeeded, FALSE otherwise.
 | 
						|
   */
 | 
						|
  protected function assertNull($value, $message = '', $group = 'Other') {
 | 
						|
    return $this->assert(!isset($value), $message ? $message : t('Value @value is NULL.', array('@value' => var_export($value, TRUE))), $group);
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Check to see if a value is not NULL.
 | 
						|
   *
 | 
						|
   * @param $value
 | 
						|
   *   The value on which the assertion is to be done.
 | 
						|
   * @param $message
 | 
						|
   *   The message to display along with the assertion.
 | 
						|
   * @param $group
 | 
						|
   *   The type of assertion - examples are "Browser", "PHP".
 | 
						|
   * @return
 | 
						|
   *   TRUE if the assertion succeeded, FALSE otherwise.
 | 
						|
   */
 | 
						|
  protected function assertNotNull($value, $message = '', $group = 'Other') {
 | 
						|
    return $this->assert(isset($value), $message ? $message : t('Value @value is not NULL.', array('@value' => var_export($value, TRUE))), $group);
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Check to see if two values are equal.
 | 
						|
   *
 | 
						|
   * @param $first
 | 
						|
   *   The first value to check.
 | 
						|
   * @param $second
 | 
						|
   *   The second value to check.
 | 
						|
   * @param $message
 | 
						|
   *   The message to display along with the assertion.
 | 
						|
   * @param $group
 | 
						|
   *   The type of assertion - examples are "Browser", "PHP".
 | 
						|
   * @return
 | 
						|
   *   TRUE if the assertion succeeded, FALSE otherwise.
 | 
						|
   */
 | 
						|
  protected function assertEqual($first, $second, $message = '', $group = 'Other') {
 | 
						|
    return $this->assert($first == $second, $message ? $message : t('Value @first is equal to value @second.', array('@first' => var_export($first, TRUE), '@second' => var_export($second, TRUE))), $group);
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Check to see if two values are not equal.
 | 
						|
   *
 | 
						|
   * @param $first
 | 
						|
   *   The first value to check.
 | 
						|
   * @param $second
 | 
						|
   *   The second value to check.
 | 
						|
   * @param $message
 | 
						|
   *   The message to display along with the assertion.
 | 
						|
   * @param $group
 | 
						|
   *   The type of assertion - examples are "Browser", "PHP".
 | 
						|
   * @return
 | 
						|
   *   TRUE if the assertion succeeded, FALSE otherwise.
 | 
						|
   */
 | 
						|
  protected function assertNotEqual($first, $second, $message = '', $group = 'Other') {
 | 
						|
    return $this->assert($first != $second, $message ? $message : t('Value @first is not equal to value @second.', array('@first' => var_export($first, TRUE), '@second' => var_export($second, TRUE))), $group);
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Check to see if two values are identical.
 | 
						|
   *
 | 
						|
   * @param $first
 | 
						|
   *   The first value to check.
 | 
						|
   * @param $second
 | 
						|
   *   The second value to check.
 | 
						|
   * @param $message
 | 
						|
   *   The message to display along with the assertion.
 | 
						|
   * @param $group
 | 
						|
   *   The type of assertion - examples are "Browser", "PHP".
 | 
						|
   * @return
 | 
						|
   *   TRUE if the assertion succeeded, FALSE otherwise.
 | 
						|
   */
 | 
						|
  protected function assertIdentical($first, $second, $message = '', $group = 'Other') {
 | 
						|
    return $this->assert($first === $second, $message ? $message : t('Value @first is identical to value @second.', array('@first' => var_export($first, TRUE), '@second' => var_export($second, TRUE))), $group);
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Check to see if two values are not identical.
 | 
						|
   *
 | 
						|
   * @param $first
 | 
						|
   *   The first value to check.
 | 
						|
   * @param $second
 | 
						|
   *   The second value to check.
 | 
						|
   * @param $message
 | 
						|
   *   The message to display along with the assertion.
 | 
						|
   * @param $group
 | 
						|
   *   The type of assertion - examples are "Browser", "PHP".
 | 
						|
   * @return
 | 
						|
   *   TRUE if the assertion succeeded, FALSE otherwise.
 | 
						|
   */
 | 
						|
  protected function assertNotIdentical($first, $second, $message = '', $group = 'Other') {
 | 
						|
    return $this->assert($first !== $second, $message ? $message : t('Value @first is not identical to value @second.', array('@first' => var_export($first, TRUE), '@second' => var_export($second, TRUE))), $group);
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Fire an assertion that is always positive.
 | 
						|
   *
 | 
						|
   * @param $message
 | 
						|
   *   The message to display along with the assertion.
 | 
						|
   * @param $group
 | 
						|
   *   The type of assertion - examples are "Browser", "PHP".
 | 
						|
   * @return
 | 
						|
   *   TRUE.
 | 
						|
   */
 | 
						|
  protected function pass($message = NULL, $group = 'Other') {
 | 
						|
    return $this->assert(TRUE, $message, $group);
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Fire an assertion that is always negative.
 | 
						|
   *
 | 
						|
   * @param $message
 | 
						|
   *   The message to display along with the assertion.
 | 
						|
   * @param $group
 | 
						|
   *   The type of assertion - examples are "Browser", "PHP".
 | 
						|
   * @return
 | 
						|
   *   FALSE.
 | 
						|
   */
 | 
						|
  protected function fail($message = NULL, $group = 'Other') {
 | 
						|
    return $this->assert(FALSE, $message, $group);
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Fire an error assertion.
 | 
						|
   *
 | 
						|
   * @param $message
 | 
						|
   *   The message to display along with the assertion.
 | 
						|
   * @param $group
 | 
						|
   *   The type of assertion - examples are "Browser", "PHP".
 | 
						|
   * @param $caller
 | 
						|
   *   The caller of the error.
 | 
						|
   * @return
 | 
						|
   *   FALSE.
 | 
						|
   */
 | 
						|
  protected function error($message = '', $group = 'Other', array $caller = NULL) {
 | 
						|
    if ($group == 'User notice') {
 | 
						|
      // Since 'User notice' is set by trigger_error() which is used for debug
 | 
						|
      // set the message to a status of 'debug'.
 | 
						|
      return $this->assert('debug', $message, 'Debug', $caller);
 | 
						|
    }
 | 
						|
 | 
						|
    return $this->assert('exception', $message, $group, $caller);
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Run all tests in this class.
 | 
						|
   */
 | 
						|
  public function run() {
 | 
						|
    // Initialize verbose debugging.
 | 
						|
    simpletest_verbose(NULL, file_directory_path(), get_class($this));
 | 
						|
 | 
						|
    // HTTP auth settings (<username>:<password>) for the simpletest browser
 | 
						|
    // when sending requests to the test site.
 | 
						|
    $username = variable_get('simpletest_username', NULL);
 | 
						|
    $password = variable_get('simpletest_password', NULL);
 | 
						|
    if ($username && $password) {
 | 
						|
      $this->httpauth_credentials = $username . ':' . $password;
 | 
						|
    }
 | 
						|
 | 
						|
    set_error_handler(array($this, 'errorHandler'));
 | 
						|
    $methods = array();
 | 
						|
    // Iterate through all the methods in this class.
 | 
						|
    foreach (get_class_methods(get_class($this)) as $method) {
 | 
						|
      // If the current method starts with "test", run it - it's a test.
 | 
						|
      if (strtolower(substr($method, 0, 4)) == 'test') {
 | 
						|
        $this->setUp();
 | 
						|
        try {
 | 
						|
          $this->$method();
 | 
						|
          // Finish up.
 | 
						|
        }
 | 
						|
        catch (Exception $e) {
 | 
						|
          $this->exceptionHandler($e);
 | 
						|
        }
 | 
						|
        $this->tearDown();
 | 
						|
      }
 | 
						|
    }
 | 
						|
    // Clear out the error messages and restore error handler.
 | 
						|
    drupal_get_messages();
 | 
						|
    restore_error_handler();
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Handle errors.
 | 
						|
   *
 | 
						|
   * Because this is registered in set_error_handler(), it has to be public.
 | 
						|
   * @see set_error_handler
 | 
						|
   *
 | 
						|
   */
 | 
						|
  public function errorHandler($severity, $message, $file = NULL, $line = NULL) {
 | 
						|
    if ($severity & error_reporting()) {
 | 
						|
      $error_map = array(
 | 
						|
        E_STRICT => 'Run-time notice',
 | 
						|
        E_WARNING => 'Warning',
 | 
						|
        E_NOTICE => 'Notice',
 | 
						|
        E_CORE_ERROR => 'Core error',
 | 
						|
        E_CORE_WARNING => 'Core warning',
 | 
						|
        E_USER_ERROR => 'User error',
 | 
						|
        E_USER_WARNING => 'User warning',
 | 
						|
        E_USER_NOTICE => 'User notice',
 | 
						|
        E_RECOVERABLE_ERROR => 'Recoverable error',
 | 
						|
      );
 | 
						|
 | 
						|
      $backtrace = debug_backtrace();
 | 
						|
      $this->error($message, $error_map[$severity], _drupal_get_last_caller($backtrace));
 | 
						|
    }
 | 
						|
    return TRUE;
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Handle exceptions.
 | 
						|
   *
 | 
						|
   * @see set_exception_handler
 | 
						|
   */
 | 
						|
  protected function exceptionHandler($exception) {
 | 
						|
    $backtrace = $exception->getTrace();
 | 
						|
    // Push on top of the backtrace the call that generated the exception.
 | 
						|
    array_unshift($backtrace, array(
 | 
						|
      'line' => $exception->getLine(),
 | 
						|
      'file' => $exception->getFile(),
 | 
						|
    ));
 | 
						|
    $this->error($exception->getMessage(), 'Uncaught exception', _drupal_get_last_caller($backtrace));
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Generates a random string of ASCII characters of codes 32 to 126.
 | 
						|
   *
 | 
						|
   * The generated string includes alpha-numeric characters and common misc
 | 
						|
   * characters. Use this method when testing general input where the content
 | 
						|
   * is not restricted.
 | 
						|
   *
 | 
						|
   * @param $length
 | 
						|
   *   Length of random string to generate which will be appended to $db_prefix.
 | 
						|
   * @return
 | 
						|
   *   Randomly generated string.
 | 
						|
   */
 | 
						|
  public static function randomString($length = 8) {
 | 
						|
    global $db_prefix;
 | 
						|
 | 
						|
    $str = '';
 | 
						|
    for ($i = 0; $i < $length; $i++) {
 | 
						|
      $str .= chr(mt_rand(32, 126));
 | 
						|
    }
 | 
						|
    return str_replace('simpletest', 's', $db_prefix) . $str;
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Generates a random string containing letters and numbers.
 | 
						|
   *
 | 
						|
   * The letters may be upper or lower case. This method is better for
 | 
						|
   * restricted inputs that do not accept certain characters. For example,
 | 
						|
   * when testing input fields that require machine readable values (ie without
 | 
						|
   * spaces and non-standard characters) this method is best.
 | 
						|
   *
 | 
						|
   * @param $length
 | 
						|
   *   Length of random string to generate which will be appended to $db_prefix.
 | 
						|
   * @return
 | 
						|
   *   Randomly generated string.
 | 
						|
   */
 | 
						|
  public static function randomName($length = 8) {
 | 
						|
    global $db_prefix;
 | 
						|
 | 
						|
    $values = array_merge(range(65, 90), range(97, 122), range(48, 57));
 | 
						|
    $max = count($values) - 1;
 | 
						|
    $str = '';
 | 
						|
    for ($i = 0; $i < $length; $i++) {
 | 
						|
      $str .= chr($values[mt_rand(0, $max)]);
 | 
						|
    }
 | 
						|
    return str_replace('simpletest', 's', $db_prefix) . $str;
 | 
						|
  }
 | 
						|
 | 
						|
}
 | 
						|
 | 
						|
/**
 | 
						|
 * Test case for Drupal unit tests.
 | 
						|
 *
 | 
						|
 * These tests can not access the database nor files. Calling any Drupal
 | 
						|
 * function that needs the database will throw exceptions. These include
 | 
						|
 * watchdog(), function_exists(), module_implements(),
 | 
						|
 * module_invoke_all() etc.
 | 
						|
 */
 | 
						|
class DrupalUnitTestCase extends DrupalTestCase {
 | 
						|
 | 
						|
  /**
 | 
						|
   * Constructor for DrupalUnitTestCase.
 | 
						|
   */
 | 
						|
  function __construct($test_id = NULL) {
 | 
						|
    parent::__construct($test_id);
 | 
						|
    $this->skipClasses[__CLASS__] = TRUE;
 | 
						|
  }
 | 
						|
 | 
						|
  function setUp() {
 | 
						|
    global $db_prefix, $conf;
 | 
						|
 | 
						|
    // Store necessary current values before switching to prefixed database.
 | 
						|
    $this->originalPrefix = $db_prefix;
 | 
						|
    $this->originalFileDirectory = file_directory_path();
 | 
						|
 | 
						|
    // Reset all statics so that test is performed with a clean environment.
 | 
						|
    drupal_static_reset();
 | 
						|
 | 
						|
    // Generate temporary prefixed database to ensure that tests have a clean starting point.
 | 
						|
    $db_prefix = Database::getConnection()->prefixTables('{simpletest' . mt_rand(1000, 1000000) . '}');
 | 
						|
    $conf['file_public_path'] = $this->originalFileDirectory . '/' . $db_prefix;
 | 
						|
 | 
						|
    // If locale is enabled then t() will try to access the database and
 | 
						|
    // subsequently will fail as the database is not accessible.
 | 
						|
    $module_list = module_list();
 | 
						|
    if (isset($module_list['locale'])) {
 | 
						|
      $this->originalModuleList = $module_list;
 | 
						|
      unset($module_list['locale']);
 | 
						|
      module_list(TRUE, FALSE, FALSE, $module_list);
 | 
						|
    }
 | 
						|
  }
 | 
						|
 | 
						|
  function tearDown() {
 | 
						|
    global $db_prefix, $conf;
 | 
						|
    if (preg_match('/simpletest\d+/', $db_prefix)) {
 | 
						|
      $conf['file_public_path'] = $this->originalFileDirectory;
 | 
						|
      // Return the database prefix to the original.
 | 
						|
      $db_prefix = $this->originalPrefix;
 | 
						|
      // Restore modules if necessary.
 | 
						|
      if (isset($this->originalModuleList)) {
 | 
						|
        module_list(TRUE, FALSE, FALSE, $this->originalModuleList);
 | 
						|
      }
 | 
						|
    }
 | 
						|
  }
 | 
						|
}
 | 
						|
 | 
						|
/**
 | 
						|
 * Test case for typical Drupal tests.
 | 
						|
 */
 | 
						|
class DrupalWebTestCase extends DrupalTestCase {
 | 
						|
  /**
 | 
						|
   * The URL currently loaded in the internal browser.
 | 
						|
   *
 | 
						|
   * @var string
 | 
						|
   */
 | 
						|
  protected $url;
 | 
						|
 | 
						|
  /**
 | 
						|
   * The handle of the current cURL connection.
 | 
						|
   *
 | 
						|
   * @var resource
 | 
						|
   */
 | 
						|
  protected $curlHandle;
 | 
						|
 | 
						|
  /**
 | 
						|
   * The headers of the page currently loaded in the internal browser.
 | 
						|
   *
 | 
						|
   * @var Array
 | 
						|
   */
 | 
						|
  protected $headers;
 | 
						|
 | 
						|
  /**
 | 
						|
   * The content of the page currently loaded in the internal browser.
 | 
						|
   *
 | 
						|
   * @var string
 | 
						|
   */
 | 
						|
  protected $content;
 | 
						|
 | 
						|
  /**
 | 
						|
   * The content of the page currently loaded in the internal browser (plain text version).
 | 
						|
   *
 | 
						|
   * @var string
 | 
						|
   */
 | 
						|
  protected $plainTextContent;
 | 
						|
 | 
						|
  /**
 | 
						|
   * The parsed version of the page.
 | 
						|
   *
 | 
						|
   * @var SimpleXMLElement
 | 
						|
   */
 | 
						|
  protected $elements = NULL;
 | 
						|
 | 
						|
  /**
 | 
						|
   * The current user logged in using the internal browser.
 | 
						|
   *
 | 
						|
   * @var bool
 | 
						|
   */
 | 
						|
  protected $loggedInUser = FALSE;
 | 
						|
 | 
						|
  /**
 | 
						|
   * The current cookie file used by cURL.
 | 
						|
   *
 | 
						|
   * We do not reuse the cookies in further runs, so we do not need a file
 | 
						|
   * but we still need cookie handling, so we set the jar to NULL.
 | 
						|
   */
 | 
						|
  protected $cookieFile = NULL;
 | 
						|
 | 
						|
  /**
 | 
						|
   * Additional cURL options.
 | 
						|
   *
 | 
						|
   * DrupalWebTestCase itself never sets this but always obeys what is set.
 | 
						|
   */
 | 
						|
  protected $additionalCurlOptions = array();
 | 
						|
 | 
						|
  /**
 | 
						|
   * The original user, before it was changed to a clean uid = 1 for testing purposes.
 | 
						|
   *
 | 
						|
   * @var object
 | 
						|
   */
 | 
						|
  protected $originalUser = NULL;
 | 
						|
 | 
						|
  /**
 | 
						|
   * HTTP authentication credentials (<username>:<password>).
 | 
						|
   */
 | 
						|
  protected $httpauth_credentials = NULL;
 | 
						|
 | 
						|
  /**
 | 
						|
   * The current session name, if available.
 | 
						|
   */
 | 
						|
  protected $session_name = NULL;
 | 
						|
 | 
						|
  /**
 | 
						|
   * The current session ID, if available.
 | 
						|
   */
 | 
						|
  protected $session_id = NULL;
 | 
						|
 | 
						|
  /**
 | 
						|
   * Constructor for DrupalWebTestCase.
 | 
						|
   */
 | 
						|
  function __construct($test_id = NULL) {
 | 
						|
    parent::__construct($test_id);
 | 
						|
    $this->skipClasses[__CLASS__] = TRUE;
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Get a node from the database based on its title.
 | 
						|
   *
 | 
						|
   * @param title
 | 
						|
   *   A node title, usually generated by $this->randomName().
 | 
						|
   *
 | 
						|
   * @return
 | 
						|
   *   A node object matching $title.
 | 
						|
   */
 | 
						|
  function drupalGetNodeByTitle($title) {
 | 
						|
    $nodes = node_load_multiple(array(), array('title' => $title));
 | 
						|
    // Load the first node returned from the database.
 | 
						|
    $returned_node = reset($nodes);
 | 
						|
    return $returned_node;
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Creates a node based on default settings.
 | 
						|
   *
 | 
						|
   * @param $settings
 | 
						|
   *   An associative array of settings to change from the defaults, keys are
 | 
						|
   *   node properties, for example 'title' => 'Hello, world!'.
 | 
						|
   * @return
 | 
						|
   *   Created node object.
 | 
						|
   */
 | 
						|
  protected function drupalCreateNode($settings = array()) {
 | 
						|
    // Populate defaults array.
 | 
						|
    $settings += array(
 | 
						|
      'body'      => array(LANGUAGE_NONE => array(array())),
 | 
						|
      'title'     => array(LANGUAGE_NONE => array(array('value' => $this->randomName(8)))),
 | 
						|
      'comment'   => 2,
 | 
						|
      'changed'   => REQUEST_TIME,
 | 
						|
      'moderate'  => 0,
 | 
						|
      'promote'   => 0,
 | 
						|
      'revision'  => 1,
 | 
						|
      'log'       => '',
 | 
						|
      'status'    => 1,
 | 
						|
      'sticky'    => 0,
 | 
						|
      'type'      => 'page',
 | 
						|
      'revisions' => NULL,
 | 
						|
      'taxonomy'  => NULL,
 | 
						|
      'language'  => LANGUAGE_NONE,
 | 
						|
    );
 | 
						|
 | 
						|
    // Use the original node's created time for existing nodes.
 | 
						|
    if (isset($settings['created']) && !isset($settings['date'])) {
 | 
						|
      $settings['date'] = format_date($settings['created'], 'custom', 'Y-m-d H:i:s O');
 | 
						|
    }
 | 
						|
 | 
						|
    // If the node's user uid is not specified manually, use the currently
 | 
						|
    // logged in user if available, or else the user running the test.
 | 
						|
    if (!isset($settings['uid'])) {
 | 
						|
      if ($this->loggedInUser) {
 | 
						|
        $settings['uid'] = $this->loggedInUser->uid;
 | 
						|
      }
 | 
						|
      else {
 | 
						|
        global $user;
 | 
						|
        $settings['uid'] = $user->uid;
 | 
						|
      }
 | 
						|
    }
 | 
						|
 | 
						|
    // Merge body field value and format separately.
 | 
						|
    $body = array(
 | 
						|
      'value' => $this->randomName(32),
 | 
						|
      'format' => filter_default_format(),
 | 
						|
    );
 | 
						|
    $settings['body'][$settings['language']][0] += $body;
 | 
						|
 | 
						|
    $node = (object) $settings;
 | 
						|
    node_save($node);
 | 
						|
 | 
						|
    // Small hack to link revisions to our test user.
 | 
						|
    db_update('node_revision')
 | 
						|
      ->fields(array('uid' => $node->uid))
 | 
						|
      ->condition('vid', $node->vid)
 | 
						|
      ->execute();
 | 
						|
    return $node;
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Creates a custom content type based on default settings.
 | 
						|
   *
 | 
						|
   * @param $settings
 | 
						|
   *   An array of settings to change from the defaults.
 | 
						|
   *   Example: 'type' => 'foo'.
 | 
						|
   * @return
 | 
						|
   *   Created content type.
 | 
						|
   */
 | 
						|
  protected function drupalCreateContentType($settings = array()) {
 | 
						|
    // Find a non-existent random type name.
 | 
						|
    do {
 | 
						|
      $name = strtolower($this->randomName(8));
 | 
						|
    } while (node_type_get_type($name));
 | 
						|
 | 
						|
    // Populate defaults array.
 | 
						|
    $defaults = array(
 | 
						|
      'type' => $name,
 | 
						|
      'name' => $name,
 | 
						|
      'base' => 'node_content',
 | 
						|
      'description' => '',
 | 
						|
      'help' => '',
 | 
						|
      'title_label' => 'Title',
 | 
						|
      'body_label' => 'Body',
 | 
						|
      'has_title' => 1,
 | 
						|
      'has_body' => 1,
 | 
						|
    );
 | 
						|
    // Imposed values for a custom type.
 | 
						|
    $forced = array(
 | 
						|
      'orig_type' => '',
 | 
						|
      'old_type' => '',
 | 
						|
      'module' => 'node',
 | 
						|
      'custom' => 1,
 | 
						|
      'modified' => 1,
 | 
						|
      'locked' => 0,
 | 
						|
    );
 | 
						|
    $type = $forced + $settings + $defaults;
 | 
						|
    $type = (object)$type;
 | 
						|
 | 
						|
    $saved_type = node_type_save($type);
 | 
						|
    node_types_rebuild();
 | 
						|
    menu_rebuild();
 | 
						|
 | 
						|
    $this->assertEqual($saved_type, SAVED_NEW, t('Created content type %type.', array('%type' => $type->type)));
 | 
						|
 | 
						|
    // Reset permissions so that permissions for this content type are available.
 | 
						|
    $this->checkPermissions(array(), TRUE);
 | 
						|
 | 
						|
    return $type;
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Get a list files that can be used in tests.
 | 
						|
   *
 | 
						|
   * @param $type
 | 
						|
   *   File type, possible values: 'binary', 'html', 'image', 'javascript', 'php', 'sql', 'text'.
 | 
						|
   * @param $size
 | 
						|
   *   File size in bytes to match. Please check the tests/files folder.
 | 
						|
   * @return
 | 
						|
   *   List of files that match filter.
 | 
						|
   */
 | 
						|
  protected function drupalGetTestFiles($type, $size = NULL) {
 | 
						|
    $files = array();
 | 
						|
 | 
						|
    // Make sure type is valid.
 | 
						|
    if (in_array($type, array('binary', 'html', 'image', 'javascript', 'php', 'sql', 'text'))) {
 | 
						|
      // Use original file directory instead of one created during setUp().
 | 
						|
      $path = $this->originalFileDirectory . '/simpletest';
 | 
						|
      $files = file_scan_directory($path, '/' . $type . '\-.*/');
 | 
						|
 | 
						|
      // If size is set then remove any files that are not of that size.
 | 
						|
      if ($size !== NULL) {
 | 
						|
        foreach ($files as $file) {
 | 
						|
          $stats = stat($file->uri);
 | 
						|
          if ($stats['size'] != $size) {
 | 
						|
            unset($files[$file->uri]);
 | 
						|
          }
 | 
						|
        }
 | 
						|
      }
 | 
						|
    }
 | 
						|
    usort($files, array($this, 'drupalCompareFiles'));
 | 
						|
    return $files;
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Compare two files based on size and file name.
 | 
						|
   */
 | 
						|
  protected function drupalCompareFiles($file1, $file2) {
 | 
						|
    $compare_size = filesize($file1->uri) - filesize($file2->uri);
 | 
						|
    if ($compare_size) {
 | 
						|
      // Sort by file size.
 | 
						|
      return $compare_size;
 | 
						|
    }
 | 
						|
    else {
 | 
						|
      // The files were the same size, so sort alphabetically.
 | 
						|
      return strnatcmp($file1->name, $file2->name);
 | 
						|
    }
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Create a user with a given set of permissions. The permissions correspond to the
 | 
						|
   * names given on the privileges page.
 | 
						|
   *
 | 
						|
   * @param $permissions
 | 
						|
   *   Array of permission names to assign to user.
 | 
						|
   * @return
 | 
						|
   *   A fully loaded user object with pass_raw property, or FALSE if account
 | 
						|
   *   creation fails.
 | 
						|
   */
 | 
						|
  protected function drupalCreateUser($permissions = array('access comments', 'access content', 'post comments', 'post comments without approval')) {
 | 
						|
    // Create a role with the given permission set.
 | 
						|
    if (!($rid = $this->drupalCreateRole($permissions))) {
 | 
						|
      return FALSE;
 | 
						|
    }
 | 
						|
 | 
						|
    // Create a user assigned to that role.
 | 
						|
    $edit = array();
 | 
						|
    $edit['name']   = $this->randomName();
 | 
						|
    $edit['mail']   = $edit['name'] . '@example.com';
 | 
						|
    $edit['roles']  = array($rid => $rid);
 | 
						|
    $edit['pass']   = user_password();
 | 
						|
    $edit['status'] = 1;
 | 
						|
 | 
						|
    $account = user_save(drupal_anonymous_user(), $edit);
 | 
						|
 | 
						|
    $this->assertTrue(!empty($account->uid), t('User created with name %name and pass %pass', array('%name' => $edit['name'], '%pass' => $edit['pass'])), t('User login'));
 | 
						|
    if (empty($account->uid)) {
 | 
						|
      return FALSE;
 | 
						|
    }
 | 
						|
 | 
						|
    // Add the raw password so that we can log in as this user.
 | 
						|
    $account->pass_raw = $edit['pass'];
 | 
						|
    return $account;
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Internal helper function; Create a role with specified permissions.
 | 
						|
   *
 | 
						|
   * @param $permissions
 | 
						|
   *   Array of permission names to assign to role.
 | 
						|
   * @param $name
 | 
						|
   *   (optional) String for the name of the role.  Defaults to a random string.
 | 
						|
   * @return
 | 
						|
   *   Role ID of newly created role, or FALSE if role creation failed.
 | 
						|
   */
 | 
						|
  protected function drupalCreateRole(array $permissions, $name = NULL) {
 | 
						|
    // Generate random name if it was not passed.
 | 
						|
    if (!$name) {
 | 
						|
      $name = $this->randomName();
 | 
						|
    }
 | 
						|
 | 
						|
    // Check the all the permissions strings are valid.
 | 
						|
    if (!$this->checkPermissions($permissions)) {
 | 
						|
      return FALSE;
 | 
						|
    }
 | 
						|
 | 
						|
    // Create new role.
 | 
						|
    $role = new stdClass();
 | 
						|
    $role->name = $name;
 | 
						|
    user_role_save($role);
 | 
						|
    user_role_grant_permissions($role->rid, $permissions);
 | 
						|
 | 
						|
    $this->assertTrue(isset($role->rid), t('Created role of name: @name, id: @rid', array('@name' => $name, '@rid' => (isset($role->rid) ? $role->rid : t('-n/a-')))), t('Role'));
 | 
						|
    if ($role && !empty($role->rid)) {
 | 
						|
      $count = db_query('SELECT COUNT(*) FROM {role_permission} WHERE rid = :rid', array(':rid' => $role->rid))->fetchField();
 | 
						|
      $this->assertTrue($count == count($permissions), t('Created permissions: @perms', array('@perms' => implode(', ', $permissions))), t('Role'));
 | 
						|
      return $role->rid;
 | 
						|
    }
 | 
						|
    else {
 | 
						|
      return FALSE;
 | 
						|
    }
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Check to make sure that the array of permissions are valid.
 | 
						|
   *
 | 
						|
   * @param $permissions
 | 
						|
   *   Permissions to check.
 | 
						|
   * @param $reset
 | 
						|
   *   Reset cached available permissions.
 | 
						|
   * @return
 | 
						|
   *   TRUE or FALSE depending on whether the permissions are valid.
 | 
						|
   */
 | 
						|
  protected function checkPermissions(array $permissions, $reset = FALSE) {
 | 
						|
    $available = &drupal_static(__FUNCTION__);
 | 
						|
 | 
						|
    if (!isset($available) || $reset) {
 | 
						|
      $available = array_keys(module_invoke_all('permission'));
 | 
						|
    }
 | 
						|
 | 
						|
    $valid = TRUE;
 | 
						|
    foreach ($permissions as $permission) {
 | 
						|
      if (!in_array($permission, $available)) {
 | 
						|
        $this->fail(t('Invalid permission %permission.', array('%permission' => $permission)), t('Role'));
 | 
						|
        $valid = FALSE;
 | 
						|
      }
 | 
						|
    }
 | 
						|
    return $valid;
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Log in a user with the internal browser.
 | 
						|
   *
 | 
						|
   * If a user is already logged in, then the current user is logged out before
 | 
						|
   * logging in the specified user.
 | 
						|
   *
 | 
						|
   * Please note that neither the global $user nor the passed in user object is
 | 
						|
   * populated with data of the logged in user. If you need full access to the
 | 
						|
   * user object after logging in, it must be updated manually. If you also need
 | 
						|
   * access to the plain-text password of the user (set by drupalCreateUser()),
 | 
						|
   * e.g. to login the same user again, then it must be re-assigned manually.
 | 
						|
   * For example:
 | 
						|
   * @code
 | 
						|
   *   // Create a user.
 | 
						|
   *   $account = $this->drupalCreateUser(array());
 | 
						|
   *   $this->drupalLogin($account);
 | 
						|
   *   // Load real user object.
 | 
						|
   *   $pass_raw = $account->pass_raw;
 | 
						|
   *   $account = user_load($account->uid);
 | 
						|
   *   $account->pass_raw = $pass_raw;
 | 
						|
   * @endcode
 | 
						|
   *
 | 
						|
   * @param $user
 | 
						|
   *   User object representing the user to login.
 | 
						|
   *
 | 
						|
   * @see drupalCreateUser()
 | 
						|
   */
 | 
						|
  protected function drupalLogin(stdClass $user) {
 | 
						|
    if ($this->loggedInUser) {
 | 
						|
      $this->drupalLogout();
 | 
						|
    }
 | 
						|
 | 
						|
    $edit = array(
 | 
						|
      'name' => $user->name,
 | 
						|
      'pass' => $user->pass_raw
 | 
						|
    );
 | 
						|
    $this->drupalPost('user', $edit, t('Log in'));
 | 
						|
 | 
						|
    // If a "log out" link appears on the page, it is almost certainly because
 | 
						|
    // the login was successful.
 | 
						|
    $pass = $this->assertLink(t('Log out'), 0, t('User %name successfully logged in.', array('%name' => $user->name)), t('User login'));
 | 
						|
 | 
						|
    if ($pass) {
 | 
						|
      $this->loggedInUser = $user;
 | 
						|
    }
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Generate a token for the currently logged in user.
 | 
						|
   */
 | 
						|
  protected function drupalGetToken($value = '') {
 | 
						|
    $private_key = drupal_get_private_key();
 | 
						|
    return md5($this->session_id . $value . $private_key);
 | 
						|
  }
 | 
						|
 | 
						|
  /*
 | 
						|
   * Logs a user out of the internal browser, then check the login page to confirm logout.
 | 
						|
   */
 | 
						|
  protected function drupalLogout() {
 | 
						|
    // Make a request to the logout page, and redirect to the user page, the
 | 
						|
    // idea being if you were properly logged out you should be seeing a login
 | 
						|
    // screen.
 | 
						|
    $this->drupalGet('user/logout', array('query' => array('destination' => 'user')));
 | 
						|
    $pass = $this->assertField('name', t('Username field found.'), t('Logout'));
 | 
						|
    $pass = $pass && $this->assertField('pass', t('Password field found.'), t('Logout'));
 | 
						|
 | 
						|
    if ($pass) {
 | 
						|
      $this->loggedInUser = FALSE;
 | 
						|
    }
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Generates a random database prefix, runs the install scripts on the
 | 
						|
   * prefixed database and enable the specified modules. After installation
 | 
						|
   * many caches are flushed and the internal browser is setup so that the
 | 
						|
   * page requests will run on the new prefix. A temporary files directory
 | 
						|
   * is created with the same name as the database prefix.
 | 
						|
   *
 | 
						|
   * @param ...
 | 
						|
   *   List of modules to enable for the duration of the test.
 | 
						|
   */
 | 
						|
  protected function setUp() {
 | 
						|
    global $db_prefix, $user, $language;
 | 
						|
 | 
						|
    // Store necessary current values before switching to prefixed database.
 | 
						|
    $this->originalLanguage = $language;
 | 
						|
    $this->originalLanguageDefault = variable_get('language_default');
 | 
						|
    $this->originalPrefix = $db_prefix;
 | 
						|
    $this->originalFileDirectory = file_directory_path();
 | 
						|
    $this->originalProfile = drupal_get_profile();
 | 
						|
    $clean_url_original = variable_get('clean_url', 0);
 | 
						|
 | 
						|
    // Generate temporary prefixed database to ensure that tests have a clean starting point.
 | 
						|
    $db_prefix_new = Database::getConnection()->prefixTables('{simpletest' . mt_rand(1000, 1000000) . '}');
 | 
						|
    db_update('simpletest_test_id')
 | 
						|
      ->fields(array('last_prefix' => $db_prefix_new))
 | 
						|
      ->condition('test_id', $this->testId)
 | 
						|
      ->execute();
 | 
						|
    $db_prefix = $db_prefix_new;
 | 
						|
 | 
						|
    // Create test directory ahead of installation so fatal errors and debug
 | 
						|
    // information can be logged during installation process.
 | 
						|
    $directory = $this->originalFileDirectory . '/simpletest/' . substr($db_prefix, 10);
 | 
						|
    file_prepare_directory($directory, FILE_CREATE_DIRECTORY | FILE_MODIFY_PERMISSIONS);
 | 
						|
 | 
						|
    // Log fatal errors.
 | 
						|
    ini_set('log_errors', 1);
 | 
						|
    ini_set('error_log', $directory . '/error.log');
 | 
						|
 | 
						|
    // Reset all statics so that test is performed with a clean environment.
 | 
						|
    drupal_static_reset();
 | 
						|
 | 
						|
    include_once DRUPAL_ROOT . '/includes/install.inc';
 | 
						|
    drupal_install_system();
 | 
						|
 | 
						|
    $this->preloadRegistry();
 | 
						|
 | 
						|
    // Include the default profile
 | 
						|
    variable_set('install_profile', 'default');
 | 
						|
    $profile_details = install_profile_info('default', 'en');
 | 
						|
 | 
						|
    // Add the specified modules to the list of modules in the default profile.
 | 
						|
    // Install the modules specified by the default profile.
 | 
						|
    drupal_install_modules($profile_details['dependencies'], TRUE);
 | 
						|
 | 
						|
    drupal_static_reset('_node_types_build');
 | 
						|
 | 
						|
    // Install additional modules one at a time in order to make sure that the
 | 
						|
    // list of modules is updated between each module's installation.
 | 
						|
    $modules = func_get_args();
 | 
						|
    foreach ($modules as $module) {
 | 
						|
      drupal_install_modules(array($module), TRUE);
 | 
						|
    }
 | 
						|
 | 
						|
    // Because the schema is static cached, we need to flush
 | 
						|
    // it between each run. If we don't, then it will contain
 | 
						|
    // stale data for the previous run's database prefix and all
 | 
						|
    // calls to it will fail.
 | 
						|
    drupal_get_schema(NULL, TRUE);
 | 
						|
 | 
						|
    // Run default profile tasks.
 | 
						|
    $install_state = array();
 | 
						|
    drupal_install_modules(array('default'), TRUE);
 | 
						|
 | 
						|
    // Rebuild caches.
 | 
						|
    node_types_rebuild();
 | 
						|
    actions_synchronize();
 | 
						|
    _drupal_flush_css_js();
 | 
						|
    $this->refreshVariables();
 | 
						|
    $this->checkPermissions(array(), TRUE);
 | 
						|
 | 
						|
    // Log in with a clean $user.
 | 
						|
    $this->originalUser = $user;
 | 
						|
    drupal_save_session(FALSE);
 | 
						|
    $user = user_load(1);
 | 
						|
 | 
						|
    // Restore necessary variables.
 | 
						|
    variable_set('install_profile', 'default');
 | 
						|
    variable_set('install_task', 'done');
 | 
						|
    variable_set('clean_url', $clean_url_original);
 | 
						|
    variable_set('site_mail', 'simpletest@example.com');
 | 
						|
    // Set up English language.
 | 
						|
    unset($GLOBALS['conf']['language_default']);
 | 
						|
    $language = language_default();
 | 
						|
 | 
						|
    // Use the test mail class instead of the default mail handler class.
 | 
						|
    variable_set('mail_system', array('default-system' => 'TestingMailSystem'));
 | 
						|
 | 
						|
    // Use temporary files directory with the same prefix as the database.
 | 
						|
    $public_files_directory  = $this->originalFileDirectory . '/' . $db_prefix;
 | 
						|
    $private_files_directory = $public_files_directory . '/private';
 | 
						|
 | 
						|
    // Set path variables
 | 
						|
    variable_set('file_public_path', $public_files_directory);
 | 
						|
    variable_set('file_private_path', $private_files_directory);
 | 
						|
 | 
						|
    // Create the directories
 | 
						|
    $directory = file_directory_path('public');
 | 
						|
    file_prepare_directory($directory, FILE_CREATE_DIRECTORY | FILE_MODIFY_PERMISSIONS);
 | 
						|
    file_prepare_directory($private_files_directory, FILE_CREATE_DIRECTORY);
 | 
						|
 | 
						|
    drupal_set_time_limit($this->timeLimit);
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * This method is called by DrupalWebTestCase::setUp, and preloads the
 | 
						|
   * registry from the testing site to cut down on the time it takes to
 | 
						|
   * setup a clean environment for the current test run.
 | 
						|
   */
 | 
						|
  protected function preloadRegistry() {
 | 
						|
    db_query('INSERT INTO {registry} SELECT * FROM ' . $this->originalPrefix . 'registry');
 | 
						|
    db_query('INSERT INTO {registry_file} SELECT * FROM ' . $this->originalPrefix . 'registry_file');
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Refresh the in-memory set of variables. Useful after a page request is made
 | 
						|
   * that changes a variable in a different thread.
 | 
						|
   *
 | 
						|
   * In other words calling a settings page with $this->drupalPost() with a changed
 | 
						|
   * value would update a variable to reflect that change, but in the thread that
 | 
						|
   * made the call (thread running the test) the changed variable would not be
 | 
						|
   * picked up.
 | 
						|
   *
 | 
						|
   * This method clears the variables cache and loads a fresh copy from the database
 | 
						|
   * to ensure that the most up-to-date set of variables is loaded.
 | 
						|
   */
 | 
						|
  protected function refreshVariables() {
 | 
						|
    global $conf;
 | 
						|
    cache_clear_all('variables', 'cache_bootstrap');
 | 
						|
    $conf = variable_initialize();
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Delete created files and temporary files directory, delete the tables created by setUp(),
 | 
						|
   * and reset the database prefix.
 | 
						|
   */
 | 
						|
  protected function tearDown() {
 | 
						|
    global $db_prefix, $user, $language;
 | 
						|
 | 
						|
    // In case a fatal error occured that was not in the test process read the
 | 
						|
    // log to pick up any fatal errors.
 | 
						|
    $db_prefix_temp = $db_prefix;
 | 
						|
    $db_prefix = $this->originalPrefix;
 | 
						|
    simpletest_log_read($this->testId, $db_prefix, get_class($this), TRUE);
 | 
						|
    $db_prefix = $db_prefix_temp;
 | 
						|
 | 
						|
    $emailCount = count(variable_get('drupal_test_email_collector', array()));
 | 
						|
    if ($emailCount) {
 | 
						|
      $message = format_plural($emailCount, t('!count e-mail was sent during this test.'), t('!count e-mails were sent during this test.'), array('!count' => $emailCount));
 | 
						|
      $this->pass($message, t('E-mail'));
 | 
						|
    }
 | 
						|
 | 
						|
    if (preg_match('/simpletest\d+/', $db_prefix)) {
 | 
						|
      // Delete temporary files directory.
 | 
						|
      file_unmanaged_delete_recursive($this->originalFileDirectory . '/' . $db_prefix);
 | 
						|
 | 
						|
      // Remove all prefixed tables (all the tables in the schema).
 | 
						|
      $schema = drupal_get_schema(NULL, TRUE);
 | 
						|
      $ret = array();
 | 
						|
      foreach ($schema as $name => $table) {
 | 
						|
        db_drop_table($name);
 | 
						|
      }
 | 
						|
 | 
						|
      // Return the database prefix to the original.
 | 
						|
      $db_prefix = $this->originalPrefix;
 | 
						|
 | 
						|
      // Return the user to the original one.
 | 
						|
      $user = $this->originalUser;
 | 
						|
      drupal_save_session(TRUE);
 | 
						|
 | 
						|
      // Ensure that internal logged in variable and cURL options are reset.
 | 
						|
      $this->loggedInUser = FALSE;
 | 
						|
      $this->additionalCurlOptions = array();
 | 
						|
 | 
						|
      // Reload module list and implementations to ensure that test module hooks
 | 
						|
      // aren't called after tests.
 | 
						|
      module_list(TRUE);
 | 
						|
      module_implements('', FALSE, TRUE);
 | 
						|
 | 
						|
      // Reset the Field API.
 | 
						|
      field_cache_clear();
 | 
						|
 | 
						|
      // Rebuild caches.
 | 
						|
      $this->refreshVariables();
 | 
						|
 | 
						|
      // Reset language.
 | 
						|
      $language = $this->originalLanguage;
 | 
						|
      if ($this->originalLanguageDefault) {
 | 
						|
        $GLOBALS['conf']['language_default'] = $this->originalLanguageDefault;
 | 
						|
      }
 | 
						|
 | 
						|
      // Close the CURL handler.
 | 
						|
      $this->curlClose();
 | 
						|
    }
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Initializes the cURL connection.
 | 
						|
   *
 | 
						|
   * If the simpletest_httpauth_credentials variable is set, this function will
 | 
						|
   * add HTTP authentication headers. This is necessary for testing sites that
 | 
						|
   * are protected by login credentials from public access.
 | 
						|
   * See the description of $curl_options for other options.
 | 
						|
   */
 | 
						|
  protected function curlInitialize() {
 | 
						|
    global $base_url, $db_prefix;
 | 
						|
 | 
						|
    if (!isset($this->curlHandle)) {
 | 
						|
      $this->curlHandle = curl_init();
 | 
						|
      $curl_options = $this->additionalCurlOptions + array(
 | 
						|
        CURLOPT_COOKIEJAR => $this->cookieFile,
 | 
						|
        CURLOPT_URL => $base_url,
 | 
						|
        CURLOPT_FOLLOWLOCATION => TRUE,
 | 
						|
        CURLOPT_MAXREDIRS => 5,
 | 
						|
        CURLOPT_RETURNTRANSFER => TRUE,
 | 
						|
        CURLOPT_SSL_VERIFYPEER => FALSE, // Required to make the tests run on https.
 | 
						|
        CURLOPT_SSL_VERIFYHOST => FALSE, // Required to make the tests run on https.
 | 
						|
        CURLOPT_HEADERFUNCTION => array(&$this, 'curlHeaderCallback'),
 | 
						|
      );
 | 
						|
      if (isset($this->httpauth_credentials)) {
 | 
						|
        $curl_options[CURLOPT_USERPWD] = $this->httpauth_credentials;
 | 
						|
      }
 | 
						|
      curl_setopt_array($this->curlHandle, $this->additionalCurlOptions + $curl_options);
 | 
						|
 | 
						|
      // By default, the child session name should be the same as the parent.
 | 
						|
      $this->session_name = session_name();
 | 
						|
    }
 | 
						|
    // We set the user agent header on each request so as to use the current
 | 
						|
    // time and a new uniqid.
 | 
						|
    if (preg_match('/simpletest\d+/', $db_prefix, $matches)) {
 | 
						|
      curl_setopt($this->curlHandle, CURLOPT_USERAGENT, drupal_generate_test_ua($matches[0]));
 | 
						|
    }
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Performs a cURL exec with the specified options after calling curlConnect().
 | 
						|
   *
 | 
						|
   * @param $curl_options
 | 
						|
   *   Custom cURL options.
 | 
						|
   * @return
 | 
						|
   *   Content returned from the exec.
 | 
						|
   */
 | 
						|
  protected function curlExec($curl_options) {
 | 
						|
    $this->curlInitialize();
 | 
						|
    $url = empty($curl_options[CURLOPT_URL]) ? curl_getinfo($this->curlHandle, CURLINFO_EFFECTIVE_URL) : $curl_options[CURLOPT_URL];
 | 
						|
    if (!empty($curl_options[CURLOPT_POST])) {
 | 
						|
      // This is a fix for the Curl library to prevent Expect: 100-continue
 | 
						|
      // headers in POST requests, that may cause unexpected HTTP response
 | 
						|
      // codes from some webservers (like lighttpd that returns a 417 error
 | 
						|
      // code). It is done by setting an empty "Expect" header field that is
 | 
						|
      // not overwritten by Curl.
 | 
						|
      $curl_options[CURLOPT_HTTPHEADER][] = 'Expect:';
 | 
						|
    }
 | 
						|
    curl_setopt_array($this->curlHandle, $this->additionalCurlOptions + $curl_options);
 | 
						|
 | 
						|
    // Reset headers and the session ID.
 | 
						|
    $this->session_id = NULL;
 | 
						|
    $this->headers = array();
 | 
						|
 | 
						|
    $this->drupalSetContent(curl_exec($this->curlHandle), curl_getinfo($this->curlHandle, CURLINFO_EFFECTIVE_URL));
 | 
						|
    $message_vars = array(
 | 
						|
      '!method' => !empty($curl_options[CURLOPT_NOBODY]) ? 'HEAD' : (empty($curl_options[CURLOPT_POSTFIELDS]) ? 'GET' : 'POST'),
 | 
						|
      '@url' => $url,
 | 
						|
      '@status' => curl_getinfo($this->curlHandle, CURLINFO_HTTP_CODE),
 | 
						|
      '!length' => format_size(strlen($this->content))
 | 
						|
    );
 | 
						|
    $message = t('!method @url returned @status (!length).', $message_vars);
 | 
						|
    $this->assertTrue($this->content !== FALSE, $message, t('Browser'));
 | 
						|
    return $this->drupalGetContent();
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Reads headers and registers errors received from the tested site.
 | 
						|
   *
 | 
						|
   * @see _drupal_log_error().
 | 
						|
   *
 | 
						|
   * @param $curlHandler
 | 
						|
   *   The cURL handler.
 | 
						|
   * @param $header
 | 
						|
   *   An header.
 | 
						|
   */
 | 
						|
  protected function curlHeaderCallback($curlHandler, $header) {
 | 
						|
    $this->headers[] = $header;
 | 
						|
 | 
						|
    // Errors are being sent via X-Drupal-Assertion-* headers,
 | 
						|
    // generated by _drupal_log_error() in the exact form required
 | 
						|
    // by DrupalWebTestCase::error().
 | 
						|
    if (preg_match('/^X-Drupal-Assertion-[0-9]+: (.*)$/', $header, $matches)) {
 | 
						|
      // Call DrupalWebTestCase::error() with the parameters from the header.
 | 
						|
      call_user_func_array(array(&$this, 'error'), unserialize(urldecode($matches[1])));
 | 
						|
    }
 | 
						|
 | 
						|
    // Save cookies.
 | 
						|
    if (preg_match('/^Set-Cookie: ([^=]+)=(.+)/', $header, $matches)) {
 | 
						|
      $name = $matches[1];
 | 
						|
      $parts = array_map('trim', explode(';', $matches[2]));
 | 
						|
      $value = array_shift($parts);
 | 
						|
      $this->cookies[$name] = array('value' => $value, 'secure' => in_array('secure', $parts));
 | 
						|
      if ($name == $this->session_name) {
 | 
						|
        if ($value != 'deleted') {
 | 
						|
          $this->session_id = $value;
 | 
						|
        }
 | 
						|
        else {
 | 
						|
          $this->session_id = NULL;
 | 
						|
        }
 | 
						|
      }
 | 
						|
    }
 | 
						|
 | 
						|
    // This is required by cURL.
 | 
						|
    return strlen($header);
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Close the cURL handler and unset the handler.
 | 
						|
   */
 | 
						|
  protected function curlClose() {
 | 
						|
    if (isset($this->curlHandle)) {
 | 
						|
      curl_close($this->curlHandle);
 | 
						|
      unset($this->curlHandle);
 | 
						|
    }
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Parse content returned from curlExec using DOM and SimpleXML.
 | 
						|
   *
 | 
						|
   * @return
 | 
						|
   *   A SimpleXMLElement or FALSE on failure.
 | 
						|
   */
 | 
						|
  protected function parse() {
 | 
						|
    if (!$this->elements) {
 | 
						|
      // DOM can load HTML soup. But, HTML soup can throw warnings, suppress
 | 
						|
      // them.
 | 
						|
      @$htmlDom = DOMDocument::loadHTML($this->content);
 | 
						|
      if ($htmlDom) {
 | 
						|
        $this->pass(t('Valid HTML found on "@path"', array('@path' => $this->getUrl())), t('Browser'));
 | 
						|
        // It's much easier to work with simplexml than DOM, luckily enough
 | 
						|
        // we can just simply import our DOM tree.
 | 
						|
        $this->elements = simplexml_import_dom($htmlDom);
 | 
						|
      }
 | 
						|
    }
 | 
						|
    if (!$this->elements) {
 | 
						|
      $this->fail(t('Parsed page successfully.'), t('Browser'));
 | 
						|
    }
 | 
						|
 | 
						|
    return $this->elements;
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Retrieves a Drupal path or an absolute path.
 | 
						|
   *
 | 
						|
   * @param $path
 | 
						|
   *   Drupal path or URL to load into internal browser
 | 
						|
   * @param $options
 | 
						|
   *   Options to be forwarded to url().
 | 
						|
   * @param $headers
 | 
						|
   *   An array containing additional HTTP request headers, each formatted as
 | 
						|
   *   "name: value".
 | 
						|
   * @return
 | 
						|
   *   The retrieved HTML string, also available as $this->drupalGetContent()
 | 
						|
   */
 | 
						|
  protected function drupalGet($path, array $options = array(), array $headers = array()) {
 | 
						|
    $options['absolute'] = TRUE;
 | 
						|
 | 
						|
    // We re-using a CURL connection here. If that connection still has certain
 | 
						|
    // options set, it might change the GET into a POST. Make sure we clear out
 | 
						|
    // previous options.
 | 
						|
    $out = $this->curlExec(array(CURLOPT_HTTPGET => TRUE, CURLOPT_URL => url($path, $options), CURLOPT_NOBODY => FALSE, CURLOPT_HTTPHEADER => $headers));
 | 
						|
    $this->refreshVariables(); // Ensure that any changes to variables in the other thread are picked up.
 | 
						|
 | 
						|
    // Replace original page output with new output from redirected page(s).
 | 
						|
    if (($new = $this->checkForMetaRefresh())) {
 | 
						|
      $out = $new;
 | 
						|
    }
 | 
						|
    $this->verbose('GET request to: ' . $path .
 | 
						|
                   '<hr />Ending URL: ' . $this->getUrl() .
 | 
						|
                   '<hr />' . $out);
 | 
						|
    return $out;
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Retrieve a Drupal path or an absolute path and JSON decode the result.
 | 
						|
   */
 | 
						|
  function drupalGetAJAX($path, array $options = array(), array $headers = array()) {
 | 
						|
    return drupal_json_decode($this->drupalGet($path, $options, $headers));
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Execute a POST request on a Drupal page.
 | 
						|
   * It will be done as usual POST request with SimpleBrowser.
 | 
						|
   *
 | 
						|
   * @param $path
 | 
						|
   *   Location of the post form. Either a Drupal path or an absolute path or
 | 
						|
   *   NULL to post to the current page. For multi-stage forms you can set the
 | 
						|
   *   path to NULL and have it post to the last received page. Example:
 | 
						|
   *
 | 
						|
   *   @code
 | 
						|
   *   // First step in form.
 | 
						|
   *   $edit = array(...);
 | 
						|
   *   $this->drupalPost('some_url', $edit, t('Save'));
 | 
						|
   *
 | 
						|
   *   // Second step in form.
 | 
						|
   *   $edit = array(...);
 | 
						|
   *   $this->drupalPost(NULL, $edit, t('Save'));
 | 
						|
   *   @endcode
 | 
						|
   * @param  $edit
 | 
						|
   *   Field data in an associative array. Changes the current input fields
 | 
						|
   *   (where possible) to the values indicated. A checkbox can be set to
 | 
						|
   *   TRUE to be checked and FALSE to be unchecked. Note that when a form
 | 
						|
   *   contains file upload fields, other fields cannot start with the '@'
 | 
						|
   *   character.
 | 
						|
   *
 | 
						|
   *   Multiple select fields can be set using name[] and setting each of the
 | 
						|
   *   possible values. Example:
 | 
						|
   *   @code
 | 
						|
   *   $edit = array();
 | 
						|
   *   $edit['name[]'] = array('value1', 'value2');
 | 
						|
   *   @endcode
 | 
						|
   * @param $submit
 | 
						|
   *   Value of the submit button whose click is to be emulated. For example,
 | 
						|
   *   t('Save'). The processing of the request depends on this value. For
 | 
						|
   *   example, a form may have one button with the value t('Save') and another
 | 
						|
   *   button with the value t('Delete'), and execute different code depending
 | 
						|
   *   on which one is clicked.
 | 
						|
   *
 | 
						|
   *   This function can also be called to emulate an AJAX submission. In this
 | 
						|
   *   case, this value needs to be an array with the following keys:
 | 
						|
   *   - path: A path to submit the form values to for AJAX-specific processing,
 | 
						|
   *     which is likely different than the $path parameter used for retrieving
 | 
						|
   *     the initial form. Defaults to 'system/ajax'.
 | 
						|
   *   - triggering_element: If the value for the 'path' key is 'system/ajax' or
 | 
						|
   *     another generic AJAX processing path, this needs to be set to the '/'
 | 
						|
   *     separated path to the element within the server's cached $form array.
 | 
						|
   *     The callback for the generic AJAX processing path uses this to find
 | 
						|
   *     the #ajax information for the element, including which specific
 | 
						|
   *     callback to use for processing the request.
 | 
						|
   * @param $options
 | 
						|
   *   Options to be forwarded to url().
 | 
						|
   * @param $headers
 | 
						|
   *   An array containing additional HTTP request headers, each formatted as
 | 
						|
   *   "name: value".
 | 
						|
   */
 | 
						|
  protected function drupalPost($path, $edit, $submit, array $options = array(), array $headers = array()) {
 | 
						|
    $submit_matches = FALSE;
 | 
						|
    $ajax = is_array($submit);
 | 
						|
    if (isset($path)) {
 | 
						|
      $html = $this->drupalGet($path, $options);
 | 
						|
    }
 | 
						|
    if ($this->parse()) {
 | 
						|
      $edit_save = $edit;
 | 
						|
      // Let's iterate over all the forms.
 | 
						|
      $forms = $this->xpath('//form');
 | 
						|
      foreach ($forms as $form) {
 | 
						|
        // We try to set the fields of this form as specified in $edit.
 | 
						|
        $edit = $edit_save;
 | 
						|
        $post = array();
 | 
						|
        $upload = array();
 | 
						|
        $submit_matches = $this->handleForm($post, $edit, $upload, $ajax ? NULL : $submit, $form);
 | 
						|
        $action = isset($form['action']) ? $this->getAbsoluteUrl($form['action']) : $this->getUrl();
 | 
						|
        if ($ajax) {
 | 
						|
          $action = $this->getAbsoluteUrl(!empty($submit['path']) ? $submit['path'] : 'system/ajax');
 | 
						|
          // AJAX callbacks verify the triggering element if necessary, so while
 | 
						|
          // we may eventually want extra code that verifies it in the
 | 
						|
          // handleForm() function, it's not currently a requirement.
 | 
						|
          $submit_matches = TRUE;
 | 
						|
        }
 | 
						|
 | 
						|
        // We post only if we managed to handle every field in edit and the
 | 
						|
        // submit button matches.
 | 
						|
        if (!$edit && $submit_matches) {
 | 
						|
          $post_array = $post;
 | 
						|
          if ($upload) {
 | 
						|
            // TODO: cURL handles file uploads for us, but the implementation
 | 
						|
            // is broken. This is a less than elegant workaround. Alternatives
 | 
						|
            // are being explored at #253506.
 | 
						|
            foreach ($upload as $key => $file) {
 | 
						|
              $file = drupal_realpath($file);
 | 
						|
              if ($file && is_file($file)) {
 | 
						|
                $post[$key] = '@' . $file;
 | 
						|
              }
 | 
						|
            }
 | 
						|
          }
 | 
						|
          else {
 | 
						|
            foreach ($post as $key => $value) {
 | 
						|
              // Encode according to application/x-www-form-urlencoded
 | 
						|
              // Both names and values needs to be urlencoded, according to
 | 
						|
              // http://www.w3.org/TR/html4/interact/forms.html#h-17.13.4.1
 | 
						|
              $post[$key] = urlencode($key) . '=' . urlencode($value);
 | 
						|
            }
 | 
						|
            if ($ajax && isset($submit['triggering_element'])) {
 | 
						|
              $post['ajax_triggering_element'] = 'ajax_triggering_element=' . urlencode($submit['triggering_element']);
 | 
						|
            }
 | 
						|
            $post = implode('&', $post);
 | 
						|
          }
 | 
						|
          $out = $this->curlExec(array(CURLOPT_URL => $action, CURLOPT_POST => TRUE, CURLOPT_POSTFIELDS => $post, CURLOPT_HTTPHEADER => $headers));
 | 
						|
          // Ensure that any changes to variables in the other thread are picked up.
 | 
						|
          $this->refreshVariables();
 | 
						|
 | 
						|
          // Replace original page output with new output from redirected page(s).
 | 
						|
          if (($new = $this->checkForMetaRefresh())) {
 | 
						|
            $out = $new;
 | 
						|
          }
 | 
						|
          $this->verbose('POST request to: ' . $path .
 | 
						|
                         '<hr />Ending URL: ' . $this->getUrl() .
 | 
						|
                         '<hr />Fields: ' . highlight_string('<?php ' . var_export($post_array, TRUE), TRUE) .
 | 
						|
                         '<hr />' . $out);
 | 
						|
          return $out;
 | 
						|
        }
 | 
						|
      }
 | 
						|
      // We have not found a form which contained all fields of $edit.
 | 
						|
      foreach ($edit as $name => $value) {
 | 
						|
        $this->fail(t('Failed to set field @name to @value', array('@name' => $name, '@value' => $value)));
 | 
						|
      }
 | 
						|
      if (!$ajax) {
 | 
						|
        $this->assertTrue($submit_matches, t('Found the @submit button', array('@submit' => $submit)));
 | 
						|
      }
 | 
						|
      $this->fail(t('Found the requested form fields at @path', array('@path' => $path)));
 | 
						|
    }
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Execute a POST request on an AJAX path and JSON decode the result.
 | 
						|
   */
 | 
						|
  protected function drupalPostAJAX($path, $edit, $triggering_element, $ajax_path = 'system/ajax', array $options = array(), array $headers = array()) {
 | 
						|
    return drupal_json_decode($this->drupalPost($path, $edit, array('path' => $ajax_path, 'triggering_element' => $triggering_element), $options, $headers));
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Runs cron in the Drupal installed by Simpletest.
 | 
						|
   */
 | 
						|
  protected function cronRun() {
 | 
						|
    $this->drupalGet($GLOBALS['base_url'] . '/cron.php', array('external' => TRUE, 'query' => array('cron_key' => variable_get('cron_key', 'drupal'))));
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Check for meta refresh tag and if found call drupalGet() recursively. This
 | 
						|
   * function looks for the http-equiv attribute to be set to "Refresh"
 | 
						|
   * and is case-sensitive.
 | 
						|
   *
 | 
						|
   * @return
 | 
						|
   *   Either the new page content or FALSE.
 | 
						|
   */
 | 
						|
  protected function checkForMetaRefresh() {
 | 
						|
    if (strpos($this->drupalGetContent(), '<meta ') && $this->parse()) {
 | 
						|
      $refresh = $this->xpath('//meta[@http-equiv="Refresh"]');
 | 
						|
      if (!empty($refresh)) {
 | 
						|
        // Parse the content attribute of the meta tag for the format:
 | 
						|
        // "[delay]: URL=[page_to_redirect_to]".
 | 
						|
        if (preg_match('/\d+;\s*URL=(?P<url>.*)/i', $refresh[0]['content'], $match)) {
 | 
						|
          return $this->drupalGet($this->getAbsoluteUrl(decode_entities($match['url'])));
 | 
						|
        }
 | 
						|
      }
 | 
						|
    }
 | 
						|
    return FALSE;
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Retrieves only the headers for a Drupal path or an absolute path.
 | 
						|
   *
 | 
						|
   * @param $path
 | 
						|
   *   Drupal path or URL to load into internal browser
 | 
						|
   * @param $options
 | 
						|
   *   Options to be forwarded to url().
 | 
						|
   * @param $headers
 | 
						|
   *   An array containing additional HTTP request headers, each formatted as
 | 
						|
   *   "name: value".
 | 
						|
   * @return
 | 
						|
   *   The retrieved headers, also available as $this->drupalGetContent()
 | 
						|
   */
 | 
						|
  protected function drupalHead($path, array $options = array(), array $headers = array()) {
 | 
						|
    $options['absolute'] = TRUE;
 | 
						|
    $out = $this->curlExec(array(CURLOPT_NOBODY => TRUE, CURLOPT_URL => url($path, $options), CURLOPT_HTTPHEADER => $headers));
 | 
						|
    $this->refreshVariables(); // Ensure that any changes to variables in the other thread are picked up.
 | 
						|
    return $out;
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Handle form input related to drupalPost(). Ensure that the specified fields
 | 
						|
   * exist and attempt to create POST data in the correct manner for the particular
 | 
						|
   * field type.
 | 
						|
   *
 | 
						|
   * @param $post
 | 
						|
   *   Reference to array of post values.
 | 
						|
   * @param $edit
 | 
						|
   *   Reference to array of edit values to be checked against the form.
 | 
						|
   * @param $submit
 | 
						|
   *   Form submit button value.
 | 
						|
   * @param $form
 | 
						|
   *   Array of form elements.
 | 
						|
   * @return
 | 
						|
   *   Submit value matches a valid submit input in the form.
 | 
						|
   */
 | 
						|
  protected function handleForm(&$post, &$edit, &$upload, $submit, $form) {
 | 
						|
    // Retrieve the form elements.
 | 
						|
    $elements = $form->xpath('.//input|.//textarea|.//select');
 | 
						|
    $submit_matches = FALSE;
 | 
						|
    foreach ($elements as $element) {
 | 
						|
      // SimpleXML objects need string casting all the time.
 | 
						|
      $name = (string) $element['name'];
 | 
						|
      // This can either be the type of <input> or the name of the tag itself
 | 
						|
      // for <select> or <textarea>.
 | 
						|
      $type = isset($element['type']) ? (string)$element['type'] : $element->getName();
 | 
						|
      $value = isset($element['value']) ? (string)$element['value'] : '';
 | 
						|
      $done = FALSE;
 | 
						|
      if (isset($edit[$name])) {
 | 
						|
        switch ($type) {
 | 
						|
          case 'text':
 | 
						|
          case 'textarea':
 | 
						|
          case 'hidden':
 | 
						|
          case 'password':
 | 
						|
            $post[$name] = $edit[$name];
 | 
						|
            unset($edit[$name]);
 | 
						|
            break;
 | 
						|
          case 'radio':
 | 
						|
            if ($edit[$name] == $value) {
 | 
						|
              $post[$name] = $edit[$name];
 | 
						|
              unset($edit[$name]);
 | 
						|
            }
 | 
						|
            break;
 | 
						|
          case 'checkbox':
 | 
						|
            // To prevent checkbox from being checked.pass in a FALSE,
 | 
						|
            // otherwise the checkbox will be set to its value regardless
 | 
						|
            // of $edit.
 | 
						|
            if ($edit[$name] === FALSE) {
 | 
						|
              unset($edit[$name]);
 | 
						|
              continue 2;
 | 
						|
            }
 | 
						|
            else {
 | 
						|
              unset($edit[$name]);
 | 
						|
              $post[$name] = $value;
 | 
						|
            }
 | 
						|
            break;
 | 
						|
          case 'select':
 | 
						|
            $new_value = $edit[$name];
 | 
						|
            $options = $this->getAllOptions($element);
 | 
						|
            if (is_array($new_value)) {
 | 
						|
              // Multiple select box.
 | 
						|
              if (!empty($new_value)) {
 | 
						|
                $index = 0;
 | 
						|
                $key = preg_replace('/\[\]$/', '', $name);
 | 
						|
                foreach ($options as $option) {
 | 
						|
                  $option_value = (string)$option['value'];
 | 
						|
                  if (in_array($option_value, $new_value)) {
 | 
						|
                    $post[$key . '[' . $index++ . ']'] = $option_value;
 | 
						|
                    $done = TRUE;
 | 
						|
                    unset($edit[$name]);
 | 
						|
                  }
 | 
						|
                }
 | 
						|
              }
 | 
						|
              else {
 | 
						|
                // No options selected: do not include any POST data for the
 | 
						|
                // element.
 | 
						|
                $done = TRUE;
 | 
						|
                unset($edit[$name]);
 | 
						|
              }
 | 
						|
            }
 | 
						|
            else {
 | 
						|
              // Single select box.
 | 
						|
              foreach ($options as $option) {
 | 
						|
                if ($new_value == $option['value']) {
 | 
						|
                  $post[$name] = $new_value;
 | 
						|
                  unset($edit[$name]);
 | 
						|
                  $done = TRUE;
 | 
						|
                  break;
 | 
						|
                }
 | 
						|
              }
 | 
						|
            }
 | 
						|
            break;
 | 
						|
          case 'file':
 | 
						|
            $upload[$name] = $edit[$name];
 | 
						|
            unset($edit[$name]);
 | 
						|
            break;
 | 
						|
        }
 | 
						|
      }
 | 
						|
      if (!isset($post[$name]) && !$done) {
 | 
						|
        switch ($type) {
 | 
						|
          case 'textarea':
 | 
						|
            $post[$name] = (string)$element;
 | 
						|
            break;
 | 
						|
          case 'select':
 | 
						|
            $single = empty($element['multiple']);
 | 
						|
            $first = TRUE;
 | 
						|
            $index = 0;
 | 
						|
            $key = preg_replace('/\[\]$/', '', $name);
 | 
						|
            $options = $this->getAllOptions($element);
 | 
						|
            foreach ($options as $option) {
 | 
						|
              // For single select, we load the first option, if there is a
 | 
						|
              // selected option that will overwrite it later.
 | 
						|
              if ($option['selected'] || ($first && $single)) {
 | 
						|
                $first = FALSE;
 | 
						|
                if ($single) {
 | 
						|
                  $post[$name] = (string)$option['value'];
 | 
						|
                }
 | 
						|
                else {
 | 
						|
                  $post[$key . '[' . $index++ . ']'] = (string)$option['value'];
 | 
						|
                }
 | 
						|
              }
 | 
						|
            }
 | 
						|
            break;
 | 
						|
          case 'file':
 | 
						|
            break;
 | 
						|
          case 'submit':
 | 
						|
          case 'image':
 | 
						|
            if ($submit == $value) {
 | 
						|
              $post[$name] = $value;
 | 
						|
              $submit_matches = TRUE;
 | 
						|
            }
 | 
						|
            break;
 | 
						|
          case 'radio':
 | 
						|
          case 'checkbox':
 | 
						|
            if (!isset($element['checked'])) {
 | 
						|
              break;
 | 
						|
            }
 | 
						|
            // Deliberate no break.
 | 
						|
          default:
 | 
						|
            $post[$name] = $value;
 | 
						|
        }
 | 
						|
      }
 | 
						|
    }
 | 
						|
    return $submit_matches;
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Perform an xpath search on the contents of the internal browser. The search
 | 
						|
   * is relative to the root element (HTML tag normally) of the page.
 | 
						|
   *
 | 
						|
   * @param $xpath
 | 
						|
   *   The xpath string to use in the search.
 | 
						|
   * @return
 | 
						|
   *   The return value of the xpath search. For details on the xpath string
 | 
						|
   *   format and return values see the SimpleXML documentation,
 | 
						|
   *   http://us.php.net/manual/function.simplexml-element-xpath.php.
 | 
						|
   */
 | 
						|
  protected function xpath($xpath) {
 | 
						|
    if ($this->parse()) {
 | 
						|
      return $this->elements->xpath($xpath);
 | 
						|
    }
 | 
						|
    return FALSE;
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Get all option elements, including nested options, in a select.
 | 
						|
   *
 | 
						|
   * @param $element
 | 
						|
   *   The element for which to get the options.
 | 
						|
   * @return
 | 
						|
   *   Option elements in select.
 | 
						|
   */
 | 
						|
  protected function getAllOptions(SimpleXMLElement $element) {
 | 
						|
    $options = array();
 | 
						|
    // Add all options items.
 | 
						|
    foreach ($element->option as $option) {
 | 
						|
      $options[] = $option;
 | 
						|
    }
 | 
						|
 | 
						|
    // Search option group children.
 | 
						|
    if (isset($element->optgroup)) {
 | 
						|
      foreach ($element->optgroup as $group) {
 | 
						|
        $options = array_merge($options, $this->getAllOptions($group));
 | 
						|
      }
 | 
						|
    }
 | 
						|
    return $options;
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Pass if a link with the specified label is found, and optional with the
 | 
						|
   * specified index.
 | 
						|
   *
 | 
						|
   * @param $label
 | 
						|
   *   Text between the anchor tags.
 | 
						|
   * @param $index
 | 
						|
   *   Link position counting from zero.
 | 
						|
   * @param $message
 | 
						|
   *   Message to display.
 | 
						|
   * @param $group
 | 
						|
   *   The group this message belongs to, defaults to 'Other'.
 | 
						|
   * @return
 | 
						|
   *   TRUE if the assertion succeeded, FALSE otherwise.
 | 
						|
   */
 | 
						|
  protected function assertLink($label, $index = 0, $message = '', $group = 'Other') {
 | 
						|
    $links = $this->xpath('//a[text()="' . $label . '"]');
 | 
						|
    $message = ($message ?  $message : t('Link with label %label found.', array('%label' => $label)));
 | 
						|
    return $this->assert(isset($links[$index]), $message, $group);
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Pass if a link with the specified label is not found.
 | 
						|
   *
 | 
						|
   * @param $label
 | 
						|
   *   Text between the anchor tags.
 | 
						|
   * @param $index
 | 
						|
   *   Link position counting from zero.
 | 
						|
   * @param $message
 | 
						|
   *   Message to display.
 | 
						|
   * @param $group
 | 
						|
   *   The group this message belongs to, defaults to 'Other'.
 | 
						|
   * @return
 | 
						|
   *   TRUE if the assertion succeeded, FALSE otherwise.
 | 
						|
   */
 | 
						|
  protected function assertNoLink($label, $message = '', $group = 'Other') {
 | 
						|
    $links = $this->xpath('//a[text()="' . $label . '"]');
 | 
						|
    $message = ($message ?  $message : t('Link with label %label not found.', array('%label' => $label)));
 | 
						|
    return $this->assert(empty($links), $message, $group);
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Pass if a link containing a given href (part) is found.
 | 
						|
   *
 | 
						|
   * @param $href
 | 
						|
   *   The full or partial value of the 'href' attribute of the anchor tag.
 | 
						|
   * @param $index
 | 
						|
   *   Link position counting from zero.
 | 
						|
   * @param $message
 | 
						|
   *   Message to display.
 | 
						|
   * @param $group
 | 
						|
   *   The group this message belongs to, defaults to 'Other'.
 | 
						|
   *
 | 
						|
   * @return
 | 
						|
   *   TRUE if the assertion succeeded, FALSE otherwise.
 | 
						|
   */
 | 
						|
  protected function assertLinkByHref($href, $index = 0, $message = '', $group = 'Other') {
 | 
						|
    $links = $this->xpath('//a[contains(@href, "' . $href . '")]');
 | 
						|
    $message = ($message ?  $message : t('Link containing href %href found.', array('%href' => $href)));
 | 
						|
    return $this->assert(isset($links[$index]), $message, $group);
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Pass if a link containing a given href (part) is not found.
 | 
						|
   *
 | 
						|
   * @param $href
 | 
						|
   *   The full or partial value of the 'href' attribute of the anchor tag.
 | 
						|
   * @param $message
 | 
						|
   *   Message to display.
 | 
						|
   * @param $group
 | 
						|
   *   The group this message belongs to, defaults to 'Other'.
 | 
						|
   *
 | 
						|
   * @return
 | 
						|
   *   TRUE if the assertion succeeded, FALSE otherwise.
 | 
						|
   */
 | 
						|
  protected function assertNoLinkByHref($href, $message = '', $group = 'Other') {
 | 
						|
    $links = $this->xpath('//a[contains(@href, "' . $href . '")]');
 | 
						|
    $message = ($message ?  $message : t('No link containing href %href found.', array('%href' => $href)));
 | 
						|
    return $this->assert(empty($links), $message, $group);
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Follows a link by name.
 | 
						|
   *
 | 
						|
   * Will click the first link found with this link text by default, or a
 | 
						|
   * later one if an index is given. Match is case insensitive with
 | 
						|
   * normalized space. The label is translated label. There is an assert
 | 
						|
   * for successful click.
 | 
						|
   *
 | 
						|
   * @param $label
 | 
						|
   *   Text between the anchor tags.
 | 
						|
   * @param $index
 | 
						|
   *   Link position counting from zero.
 | 
						|
   * @return
 | 
						|
   *   Page on success, or FALSE on failure.
 | 
						|
   */
 | 
						|
  protected function clickLink($label, $index = 0) {
 | 
						|
    $url_before = $this->getUrl();
 | 
						|
    $urls = $this->xpath('//a[text()="' . $label . '"]');
 | 
						|
 | 
						|
    if (isset($urls[$index])) {
 | 
						|
      $url_target = $this->getAbsoluteUrl($urls[$index]['href']);
 | 
						|
    }
 | 
						|
 | 
						|
    $this->assertTrue(isset($urls[$index]), t('Clicked link %label (@url_target) from @url_before', array('%label' => $label, '@url_target' => $url_target, '@url_before' => $url_before)), t('Browser'));
 | 
						|
 | 
						|
    if (isset($url_target)) {
 | 
						|
      return $this->drupalGet($url_target);
 | 
						|
    }
 | 
						|
    return FALSE;
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Takes a path and returns an absolute path.
 | 
						|
   *
 | 
						|
   * @param $path
 | 
						|
   *   A path from the internal browser content.
 | 
						|
   * @return
 | 
						|
   *   The $path with $base_url prepended, if necessary.
 | 
						|
   */
 | 
						|
  protected function getAbsoluteUrl($path) {
 | 
						|
    global $base_url, $base_path;
 | 
						|
 | 
						|
    $parts = parse_url($path);
 | 
						|
    if (empty($parts['host'])) {
 | 
						|
      // Ensure that we have a string (and no xpath object).
 | 
						|
      $path = (string) $path;
 | 
						|
      // Strip $base_path, if existent.
 | 
						|
      $length = strlen($base_path);
 | 
						|
      if (substr($path, 0, $length) === $base_path) {
 | 
						|
        $path = substr($path, $length);
 | 
						|
      }
 | 
						|
      // Ensure that we have an absolute path.
 | 
						|
      if ($path[0] !== '/') {
 | 
						|
        $path = '/' . $path;
 | 
						|
      }
 | 
						|
      // Finally, prepend the $base_url.
 | 
						|
      $path = $base_url . $path;
 | 
						|
    }
 | 
						|
    return $path;
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Get the current url from the cURL handler.
 | 
						|
   *
 | 
						|
   * @return
 | 
						|
   *   The current url.
 | 
						|
   */
 | 
						|
  protected function getUrl() {
 | 
						|
    return $this->url;
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Gets the HTTP response headers of the requested page. Normally we are only
 | 
						|
   * interested in the headers returned by the last request. However, if a page
 | 
						|
   * is redirected or HTTP authentication is in use, multiple requests will be
 | 
						|
   * required to retrieve the page. Headers from all requests may be requested
 | 
						|
   * by passing TRUE to this function.
 | 
						|
   *
 | 
						|
   * @param $all_requests
 | 
						|
   *   Boolean value specifying whether to return headers from all requests
 | 
						|
   *   instead of just the last request. Defaults to FALSE.
 | 
						|
   * @return
 | 
						|
   *   A name/value array if headers from only the last request are requested.
 | 
						|
   *   If headers from all requests are requested, an array of name/value
 | 
						|
   *   arrays, one for each request.
 | 
						|
   *
 | 
						|
   *   The pseudonym ":status" is used for the HTTP status line.
 | 
						|
   *
 | 
						|
   *   Values for duplicate headers are stored as a single comma-separated list.
 | 
						|
   */
 | 
						|
  protected function drupalGetHeaders($all_requests = FALSE) {
 | 
						|
    $request = 0;
 | 
						|
    $headers = array($request => array());
 | 
						|
    foreach ($this->headers as $header) {
 | 
						|
      $header = trim($header);
 | 
						|
      if ($header === '') {
 | 
						|
        $request++;
 | 
						|
      }
 | 
						|
      else {
 | 
						|
        if (strpos($header, 'HTTP/') === 0) {
 | 
						|
          $name = ':status';
 | 
						|
          $value = $header;
 | 
						|
        }
 | 
						|
        else {
 | 
						|
          list($name, $value) = explode(':', $header, 2);
 | 
						|
          $name = strtolower($name);
 | 
						|
        }
 | 
						|
        if (isset($headers[$request][$name])) {
 | 
						|
          $headers[$request][$name] .= ',' . trim($value);
 | 
						|
        }
 | 
						|
        else {
 | 
						|
          $headers[$request][$name] = trim($value);
 | 
						|
        }
 | 
						|
      }
 | 
						|
    }
 | 
						|
    if (!$all_requests) {
 | 
						|
      $headers = array_pop($headers);
 | 
						|
    }
 | 
						|
    return $headers;
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Gets the value of an HTTP response header. If multiple requests were
 | 
						|
   * required to retrieve the page, only the headers from the last request will
 | 
						|
   * be checked by default. However, if TRUE is passed as the second argument,
 | 
						|
   * all requests will be processed from last to first until the header is
 | 
						|
   * found.
 | 
						|
   *
 | 
						|
   * @param $name
 | 
						|
   *   The name of the header to retrieve. Names are case-insensitive (see RFC
 | 
						|
   *   2616 section 4.2).
 | 
						|
   * @param $all_requests
 | 
						|
   *   Boolean value specifying whether to check all requests if the header is
 | 
						|
   *   not found in the last request. Defaults to FALSE.
 | 
						|
   * @return
 | 
						|
   *   The HTTP header value or FALSE if not found.
 | 
						|
   */
 | 
						|
  protected function drupalGetHeader($name, $all_requests = FALSE) {
 | 
						|
    $name = strtolower($name);
 | 
						|
    $header = FALSE;
 | 
						|
    if ($all_requests) {
 | 
						|
      foreach (array_reverse($this->drupalGetHeaders(TRUE)) as $headers) {
 | 
						|
        if (isset($headers[$name])) {
 | 
						|
          $header = $headers[$name];
 | 
						|
          break;
 | 
						|
        }
 | 
						|
      }
 | 
						|
    }
 | 
						|
    else {
 | 
						|
      $headers = $this->drupalGetHeaders();
 | 
						|
      if (isset($headers[$name])) {
 | 
						|
        $header = $headers[$name];
 | 
						|
      }
 | 
						|
    }
 | 
						|
    return $header;
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Gets the current raw HTML of requested page.
 | 
						|
   */
 | 
						|
  protected function drupalGetContent() {
 | 
						|
    return $this->content;
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Gets an array containing all e-mails sent during this test case.
 | 
						|
   *
 | 
						|
   * @param $filter
 | 
						|
   *   An array containing key/value pairs used to filter the e-mails that are returned.
 | 
						|
   * @return
 | 
						|
   *   An array containing e-mail messages captured during the current test.
 | 
						|
   */
 | 
						|
  protected function drupalGetMails($filter = array()) {
 | 
						|
    $captured_emails = variable_get('drupal_test_email_collector', array());
 | 
						|
    $filtered_emails = array();
 | 
						|
 | 
						|
    foreach ($captured_emails as $message) {
 | 
						|
      foreach ($filter as $key => $value) {
 | 
						|
        if (!isset($message[$key]) || $message[$key] != $value) {
 | 
						|
          continue 2;
 | 
						|
        }
 | 
						|
      }
 | 
						|
      $filtered_emails[] = $message;
 | 
						|
    }
 | 
						|
 | 
						|
    return $filtered_emails;
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Sets the raw HTML content. This can be useful when a page has been fetched
 | 
						|
   * outside of the internal browser and assertions need to be made on the
 | 
						|
   * returned page.
 | 
						|
   *
 | 
						|
   * A good example would be when testing drupal_http_request(). After fetching
 | 
						|
   * the page the content can be set and page elements can be checked to ensure
 | 
						|
   * that the function worked properly.
 | 
						|
   */
 | 
						|
  protected function drupalSetContent($content, $url = 'internal:') {
 | 
						|
    $this->content = $content;
 | 
						|
    $this->url = $url;
 | 
						|
    $this->plainTextContent = FALSE;
 | 
						|
    $this->elements = FALSE;
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Pass if the raw text IS found on the loaded page, fail otherwise. Raw text
 | 
						|
   * refers to the raw HTML that the page generated.
 | 
						|
   *
 | 
						|
   * @param $raw
 | 
						|
   *   Raw (HTML) string to look for.
 | 
						|
   * @param $message
 | 
						|
   *   Message to display.
 | 
						|
   * @param $group
 | 
						|
   *   The group this message belongs to, defaults to 'Other'.
 | 
						|
   * @return
 | 
						|
   *   TRUE on pass, FALSE on fail.
 | 
						|
   */
 | 
						|
  protected function assertRaw($raw, $message = '', $group = 'Other') {
 | 
						|
    if (!$message) {
 | 
						|
      $message = t('Raw "@raw" found', array('@raw' => $raw));
 | 
						|
    }
 | 
						|
    return $this->assert(strpos($this->content, $raw) !== FALSE, $message, $group);
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Pass if the raw text is NOT found on the loaded page, fail otherwise. Raw text
 | 
						|
   * refers to the raw HTML that the page generated.
 | 
						|
   *
 | 
						|
   * @param $raw
 | 
						|
   *   Raw (HTML) string to look for.
 | 
						|
   * @param $message
 | 
						|
   *   Message to display.
 | 
						|
   * @param $group
 | 
						|
   *   The group this message belongs to, defaults to 'Other'.
 | 
						|
   * @return
 | 
						|
   *   TRUE on pass, FALSE on fail.
 | 
						|
   */
 | 
						|
  protected function assertNoRaw($raw, $message = '', $group = 'Other') {
 | 
						|
    if (!$message) {
 | 
						|
      $message = t('Raw "@raw" not found', array('@raw' => $raw));
 | 
						|
    }
 | 
						|
    return $this->assert(strpos($this->content, $raw) === FALSE, $message, $group);
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Pass if the text IS found on the text version of the page. The text version
 | 
						|
   * is the equivalent of what a user would see when viewing through a web browser.
 | 
						|
   * In other words the HTML has been filtered out of the contents.
 | 
						|
   *
 | 
						|
   * @param $text
 | 
						|
   *   Plain text to look for.
 | 
						|
   * @param $message
 | 
						|
   *   Message to display.
 | 
						|
   * @param $group
 | 
						|
   *   The group this message belongs to, defaults to 'Other'.
 | 
						|
   * @return
 | 
						|
   *   TRUE on pass, FALSE on fail.
 | 
						|
   */
 | 
						|
  protected function assertText($text, $message = '', $group = 'Other') {
 | 
						|
    return $this->assertTextHelper($text, $message, $group, FALSE);
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Pass if the text is NOT found on the text version of the page. The text version
 | 
						|
   * is the equivalent of what a user would see when viewing through a web browser.
 | 
						|
   * In other words the HTML has been filtered out of the contents.
 | 
						|
   *
 | 
						|
   * @param $text
 | 
						|
   *   Plain text to look for.
 | 
						|
   * @param $message
 | 
						|
   *   Message to display.
 | 
						|
   * @param $group
 | 
						|
   *   The group this message belongs to, defaults to 'Other'.
 | 
						|
   * @return
 | 
						|
   *   TRUE on pass, FALSE on fail.
 | 
						|
   */
 | 
						|
  protected function assertNoText($text, $message = '', $group = 'Other') {
 | 
						|
    return $this->assertTextHelper($text, $message, $group, TRUE);
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Helper for assertText and assertNoText.
 | 
						|
   *
 | 
						|
   * It is not recommended to call this function directly.
 | 
						|
   *
 | 
						|
   * @param $text
 | 
						|
   *   Plain text to look for.
 | 
						|
   * @param $message
 | 
						|
   *   Message to display.
 | 
						|
   * @param $group
 | 
						|
   *   The group this message belongs to.
 | 
						|
   * @param $not_exists
 | 
						|
   *   TRUE if this text should not exist, FALSE if it should.
 | 
						|
   * @return
 | 
						|
   *   TRUE on pass, FALSE on fail.
 | 
						|
   */
 | 
						|
  protected function assertTextHelper($text, $message, $group, $not_exists) {
 | 
						|
    if ($this->plainTextContent === FALSE) {
 | 
						|
      $this->plainTextContent = filter_xss($this->content, array());
 | 
						|
    }
 | 
						|
    if (!$message) {
 | 
						|
      $message = !$not_exists ? t('"@text" found', array('@text' => $text)) : t('"@text" not found', array('@text' => $text));
 | 
						|
    }
 | 
						|
    return $this->assert($not_exists == (strpos($this->plainTextContent, $text) === FALSE), $message, $group);
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Pass if the text is found ONLY ONCE on the text version of the page.
 | 
						|
   *
 | 
						|
   * The text version is the equivalent of what a user would see when viewing
 | 
						|
   * through a web browser. In other words the HTML has been filtered out of
 | 
						|
   * the contents.
 | 
						|
   *
 | 
						|
   * @param $text
 | 
						|
   *   Plain text to look for.
 | 
						|
   * @param $message
 | 
						|
   *   Message to display.
 | 
						|
   * @param $group
 | 
						|
   *   The group this message belongs to, defaults to 'Other'.
 | 
						|
   * @return
 | 
						|
   *   TRUE on pass, FALSE on fail.
 | 
						|
   */
 | 
						|
  protected function assertUniqueText($text, $message = '', $group = 'Other') {
 | 
						|
    return $this->assertUniqueTextHelper($text, $message, $group, TRUE);
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Pass if the text is found MORE THAN ONCE on the text version of the page.
 | 
						|
   *
 | 
						|
   * The text version is the equivalent of what a user would see when viewing
 | 
						|
   * through a web browser. In other words the HTML has been filtered out of
 | 
						|
   * the contents.
 | 
						|
   *
 | 
						|
   * @param $text
 | 
						|
   *   Plain text to look for.
 | 
						|
   * @param $message
 | 
						|
   *   Message to display.
 | 
						|
   * @param $group
 | 
						|
   *   The group this message belongs to, defaults to 'Other'.
 | 
						|
   * @return
 | 
						|
   *   TRUE on pass, FALSE on fail.
 | 
						|
   */
 | 
						|
  protected function assertNoUniqueText($text, $message = '', $group = 'Other') {
 | 
						|
    return $this->assertUniqueTextHelper($text, $message, $group, FALSE);
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Helper for assertUniqueText and assertNoUniqueText.
 | 
						|
   *
 | 
						|
   * It is not recommended to call this function directly.
 | 
						|
   *
 | 
						|
   * @param $text
 | 
						|
   *   Plain text to look for.
 | 
						|
   * @param $message
 | 
						|
   *   Message to display.
 | 
						|
   * @param $group
 | 
						|
   *   The group this message belongs to.
 | 
						|
   * @param $be_unique
 | 
						|
   *   TRUE if this text should be found only once, FALSE if it should be found more than once.
 | 
						|
   * @return
 | 
						|
   *   TRUE on pass, FALSE on fail.
 | 
						|
   */
 | 
						|
  protected function assertUniqueTextHelper($text, $message, $group, $be_unique) {
 | 
						|
    if ($this->plainTextContent === FALSE) {
 | 
						|
      $this->plainTextContent = filter_xss($this->content, array());
 | 
						|
    }
 | 
						|
    if (!$message) {
 | 
						|
      $message = '"' . $text . '"' . ($be_unique ? ' found only once' : ' found more than once');
 | 
						|
    }
 | 
						|
    $first_occurance = strpos($this->plainTextContent, $text);
 | 
						|
    if ($first_occurance === FALSE) {
 | 
						|
      return $this->assert(FALSE, $message, $group);
 | 
						|
    }
 | 
						|
    $offset = $first_occurance + strlen($text);
 | 
						|
    $second_occurance = strpos($this->plainTextContent, $text, $offset);
 | 
						|
    return $this->assert($be_unique == ($second_occurance === FALSE), $message, $group);
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Will trigger a pass if the Perl regex pattern is found in the raw content.
 | 
						|
   *
 | 
						|
   * @param $pattern
 | 
						|
   *   Perl regex to look for including the regex delimiters.
 | 
						|
   * @param $message
 | 
						|
   *   Message to display.
 | 
						|
   * @param $group
 | 
						|
   *   The group this message belongs to.
 | 
						|
   * @return
 | 
						|
   *   TRUE on pass, FALSE on fail.
 | 
						|
   */
 | 
						|
  protected function assertPattern($pattern, $message = '', $group = 'Other') {
 | 
						|
    if (!$message) {
 | 
						|
      $message = t('Pattern "@pattern" found', array('@pattern' => $pattern));
 | 
						|
    }
 | 
						|
    return $this->assert((bool) preg_match($pattern, $this->drupalGetContent()), $message, $group);
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Will trigger a pass if the perl regex pattern is not present in raw content.
 | 
						|
   *
 | 
						|
   * @param $pattern
 | 
						|
   *   Perl regex to look for including the regex delimiters.
 | 
						|
   * @param $message
 | 
						|
   *   Message to display.
 | 
						|
   * @param $group
 | 
						|
   *   The group this message belongs to.
 | 
						|
   * @return
 | 
						|
   *   TRUE on pass, FALSE on fail.
 | 
						|
   */
 | 
						|
  protected function assertNoPattern($pattern, $message = '', $group = 'Other') {
 | 
						|
    if (!$message) {
 | 
						|
      $message = t('Pattern "@pattern" not found', array('@pattern' => $pattern));
 | 
						|
    }
 | 
						|
    return $this->assert(!preg_match($pattern, $this->drupalGetContent()), $message, $group);
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Pass if the page title is the given string.
 | 
						|
   *
 | 
						|
   * @param $title
 | 
						|
   *   The string the title should be.
 | 
						|
   * @param $message
 | 
						|
   *   Message to display.
 | 
						|
   * @param $group
 | 
						|
   *   The group this message belongs to.
 | 
						|
   * @return
 | 
						|
   *   TRUE on pass, FALSE on fail.
 | 
						|
   */
 | 
						|
  protected function assertTitle($title, $message, $group = 'Other') {
 | 
						|
    return $this->assertEqual(current($this->xpath('//title')), $title, $message, $group);
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Pass if the page title is not the given string.
 | 
						|
   *
 | 
						|
   * @param $title
 | 
						|
   *   The string the title should not be.
 | 
						|
   * @param $message
 | 
						|
   *   Message to display.
 | 
						|
   * @param $group
 | 
						|
   *   The group this message belongs to.
 | 
						|
   * @return
 | 
						|
   *   TRUE on pass, FALSE on fail.
 | 
						|
   */
 | 
						|
  protected function assertNoTitle($title, $message, $group = 'Other') {
 | 
						|
    return $this->assertNotEqual(current($this->xpath('//title')), $title, $message, $group);
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Assert that a field exists in the current page by the given XPath.
 | 
						|
   *
 | 
						|
   * @param $xpath
 | 
						|
   *   XPath used to find the field.
 | 
						|
   * @param $value
 | 
						|
   *   Value of the field to assert.
 | 
						|
   * @param $message
 | 
						|
   *   Message to display.
 | 
						|
   * @param $group
 | 
						|
   *   The group this message belongs to.
 | 
						|
   * @return
 | 
						|
   *   TRUE on pass, FALSE on fail.
 | 
						|
   */
 | 
						|
  protected function assertFieldByXPath($xpath, $value, $message, $group = 'Other') {
 | 
						|
    $fields = $this->xpath($xpath);
 | 
						|
 | 
						|
    // If value specified then check array for match.
 | 
						|
    $found = TRUE;
 | 
						|
    if ($value) {
 | 
						|
      $found = FALSE;
 | 
						|
      if ($fields) {
 | 
						|
        foreach ($fields as $field) {
 | 
						|
          if (isset($field['value']) && $field['value'] == $value) {
 | 
						|
            // Input element with correct value.
 | 
						|
            $found = TRUE;
 | 
						|
          }
 | 
						|
          elseif (isset($field->option)) {
 | 
						|
            // Select element found.
 | 
						|
            if ($this->getSelectedItem($field) == $value) {
 | 
						|
              $found = TRUE;
 | 
						|
            }
 | 
						|
            else {
 | 
						|
              // No item selected so use first item.
 | 
						|
              $items = $this->getAllOptions($field);
 | 
						|
              if (!empty($items) && $items[0]['value'] == $value) {
 | 
						|
                $found = TRUE;
 | 
						|
              }
 | 
						|
            }
 | 
						|
          }
 | 
						|
          elseif ((string) $field == $value) {
 | 
						|
            // Text area with correct text.
 | 
						|
            $found = TRUE;
 | 
						|
          }
 | 
						|
        }
 | 
						|
      }
 | 
						|
    }
 | 
						|
    return $this->assertTrue($fields && $found, $message, $group);
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Get the selected value from a select field.
 | 
						|
   *
 | 
						|
   * @param $element
 | 
						|
   *   SimpleXMLElement select element.
 | 
						|
   * @return
 | 
						|
   *   The selected value or FALSE.
 | 
						|
   */
 | 
						|
  protected function getSelectedItem(SimpleXMLElement $element) {
 | 
						|
    foreach ($element->children() as $item) {
 | 
						|
      if (isset($item['selected'])) {
 | 
						|
        return $item['value'];
 | 
						|
      }
 | 
						|
      elseif ($item->getName() == 'optgroup') {
 | 
						|
        if ($value = $this->getSelectedItem($item)) {
 | 
						|
          return $value;
 | 
						|
        }
 | 
						|
      }
 | 
						|
    }
 | 
						|
    return FALSE;
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Assert that a field does not exist in the current page by the given XPath.
 | 
						|
   *
 | 
						|
   * @param $xpath
 | 
						|
   *   XPath used to find the field.
 | 
						|
   * @param $value
 | 
						|
   *   Value of the field to assert.
 | 
						|
   * @param $message
 | 
						|
   *   Message to display.
 | 
						|
   * @param $group
 | 
						|
   *   The group this message belongs to.
 | 
						|
   * @return
 | 
						|
   *   TRUE on pass, FALSE on fail.
 | 
						|
   */
 | 
						|
  protected function assertNoFieldByXPath($xpath, $value, $message, $group = 'Other') {
 | 
						|
    $fields = $this->xpath($xpath);
 | 
						|
 | 
						|
    // If value specified then check array for match.
 | 
						|
    $found = TRUE;
 | 
						|
    if ($value) {
 | 
						|
      $found = FALSE;
 | 
						|
      if ($fields) {
 | 
						|
        foreach ($fields as $field) {
 | 
						|
          if ($field['value'] == $value) {
 | 
						|
            $found = TRUE;
 | 
						|
          }
 | 
						|
        }
 | 
						|
      }
 | 
						|
    }
 | 
						|
    return $this->assertFalse($fields && $found, $message, $group);
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Assert that a field exists in the current page with the given name and value.
 | 
						|
   *
 | 
						|
   * @param $name
 | 
						|
   *   Name of field to assert.
 | 
						|
   * @param $value
 | 
						|
   *   Value of the field to assert.
 | 
						|
   * @param $message
 | 
						|
   *   Message to display.
 | 
						|
   * @param $group
 | 
						|
   *   The group this message belongs to.
 | 
						|
   * @return
 | 
						|
   *   TRUE on pass, FALSE on fail.
 | 
						|
   */
 | 
						|
  protected function assertFieldByName($name, $value = '', $message = '') {
 | 
						|
    return $this->assertFieldByXPath($this->constructFieldXpath('name', $name), $value, $message ? $message : t('Found field by name @name', array('@name' => $name)), t('Browser'));
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Assert that a field does not exist with the given name and value.
 | 
						|
   *
 | 
						|
   * @param $name
 | 
						|
   *   Name of field to assert.
 | 
						|
   * @param $value
 | 
						|
   *   Value of the field to assert.
 | 
						|
   * @param $message
 | 
						|
   *   Message to display.
 | 
						|
   * @param $group
 | 
						|
   *   The group this message belongs to.
 | 
						|
   * @return
 | 
						|
   *   TRUE on pass, FALSE on fail.
 | 
						|
   */
 | 
						|
  protected function assertNoFieldByName($name, $value = '', $message = '') {
 | 
						|
    return $this->assertNoFieldByXPath($this->constructFieldXpath('name', $name), $value, $message ? $message : t('Did not find field by name @name', array('@name' => $name)), t('Browser'));
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Assert that a field exists in the current page with the given id and value.
 | 
						|
   *
 | 
						|
   * @param $id
 | 
						|
   *   Id of field to assert.
 | 
						|
   * @param $value
 | 
						|
   *   Value of the field to assert.
 | 
						|
   * @param $message
 | 
						|
   *   Message to display.
 | 
						|
   * @param $group
 | 
						|
   *   The group this message belongs to.
 | 
						|
   * @return
 | 
						|
   *   TRUE on pass, FALSE on fail.
 | 
						|
   */
 | 
						|
  protected function assertFieldById($id, $value = '', $message = '') {
 | 
						|
    return $this->assertFieldByXPath($this->constructFieldXpath('id', $id), $value, $message ? $message : t('Found field by id @id', array('@id' => $id)), t('Browser'));
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Assert that a field does not exist with the given id and value.
 | 
						|
   *
 | 
						|
   * @param $id
 | 
						|
   *   Id of field to assert.
 | 
						|
   * @param $value
 | 
						|
   *   Value of the field to assert.
 | 
						|
   * @param $message
 | 
						|
   *   Message to display.
 | 
						|
   * @param $group
 | 
						|
   *   The group this message belongs to.
 | 
						|
   * @return
 | 
						|
   *   TRUE on pass, FALSE on fail.
 | 
						|
   */
 | 
						|
  protected function assertNoFieldById($id, $value = '', $message = '') {
 | 
						|
    return $this->assertNoFieldByXPath($this->constructFieldXpath('id', $id), $value, $message ? $message : t('Did not find field by id @id', array('@id' => $id)), t('Browser'));
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Assert that a checkbox field in the current page is checked.
 | 
						|
   *
 | 
						|
   * @param $id
 | 
						|
   *   Id of field to assert.
 | 
						|
   * @param $message
 | 
						|
   *   Message to display.
 | 
						|
   * @return
 | 
						|
   *   TRUE on pass, FALSE on fail.
 | 
						|
   */
 | 
						|
  protected function assertFieldChecked($id, $message = '') {
 | 
						|
    $elements = $this->xpath('//input[@id="' . $id . '"]');
 | 
						|
    return $this->assertTrue(isset($elements[0]) && !empty($elements[0]['checked']), $message ? $message : t('Checkbox field @id is checked.', array('@id' => $id)), t('Browser'));
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Assert that a checkbox field in the current page is not checked.
 | 
						|
   *
 | 
						|
   * @param $id
 | 
						|
   *   Id of field to assert.
 | 
						|
   * @param $message
 | 
						|
   *   Message to display.
 | 
						|
   * @return
 | 
						|
   *   TRUE on pass, FALSE on fail.
 | 
						|
   */
 | 
						|
  protected function assertNoFieldChecked($id, $message = '') {
 | 
						|
    $elements = $this->xpath('//input[@id="' . $id . '"]');
 | 
						|
    return $this->assertTrue(isset($elements[0]) && empty($elements[0]['checked']), $message ? $message : t('Checkbox field @id is not checked.', array('@id' => $id)), t('Browser'));
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Assert that a select option in the current page is not checked.
 | 
						|
   *
 | 
						|
   * @param $id
 | 
						|
   *   Id of select field to assert.
 | 
						|
   * @param $option
 | 
						|
   *   Option to assert.
 | 
						|
   * @param $message
 | 
						|
   *   Message to display.
 | 
						|
   * @return
 | 
						|
   *   TRUE on pass, FALSE on fail.
 | 
						|
   */
 | 
						|
  protected function assertOptionSelected($id, $option, $message = '') {
 | 
						|
    $elements = $this->xpath('//select[@id="' . $id . '"]//option[@value="' . $option . '"]');
 | 
						|
    return $this->assertTrue(isset($elements[0]) && !empty($elements[0]['selected']), $message ? $message : t('Option @option for field @id is selected.', array('@option' => $option, '@id' => $id)), t('Browser'));
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Assert that a select option in the current page is not checked.
 | 
						|
   *
 | 
						|
   * @param $id
 | 
						|
   *   Id of select field to assert.
 | 
						|
   * @param $option
 | 
						|
   *   Option to assert.
 | 
						|
   * @param $message
 | 
						|
   *   Message to display.
 | 
						|
   * @return
 | 
						|
   *   TRUE on pass, FALSE on fail.
 | 
						|
   */
 | 
						|
  protected function assertNoOptionSelected($id, $option, $message = '') {
 | 
						|
    $elements = $this->xpath('//select[@id="' . $id . '"]//option[@value="' . $option . '"]');
 | 
						|
    return $this->assertTrue(isset($elements[0]) && empty($elements[0]['selected']), $message ? $message : t('Option @option for field @id is not selected.', array('@option' => $option, '@id' => $id)), t('Browser'));
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Assert that a field exists with the given name or id.
 | 
						|
   *
 | 
						|
   * @param $field
 | 
						|
   *   Name or id of field to assert.
 | 
						|
   * @param $message
 | 
						|
   *   Message to display.
 | 
						|
   * @param $group
 | 
						|
   *   The group this message belongs to.
 | 
						|
   * @return
 | 
						|
   *   TRUE on pass, FALSE on fail.
 | 
						|
   */
 | 
						|
  protected function assertField($field, $message = '', $group = 'Other') {
 | 
						|
    return $this->assertFieldByXPath($this->constructFieldXpath('name', $field) . '|' . $this->constructFieldXpath('id', $field), '', $message, $group);
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Assert that a field does not exist with the given name or id.
 | 
						|
   *
 | 
						|
   * @param $field
 | 
						|
   *   Name or id of field to assert.
 | 
						|
   * @param $message
 | 
						|
   *   Message to display.
 | 
						|
   * @param $group
 | 
						|
   *   The group this message belongs to.
 | 
						|
   * @return
 | 
						|
   *   TRUE on pass, FALSE on fail.
 | 
						|
   */
 | 
						|
  protected function assertNoField($field, $message = '', $group = 'Other') {
 | 
						|
    return $this->assertNoFieldByXPath($this->constructFieldXpath('name', $field) . '|' . $this->constructFieldXpath('id', $field), '', $message, $group);
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Helper function: construct an XPath for the given set of attributes and value.
 | 
						|
   *
 | 
						|
   * @param $attribute
 | 
						|
   *   Field attributes.
 | 
						|
   * @param $value
 | 
						|
   *   Value of field.
 | 
						|
   * @return
 | 
						|
   *   XPath for specified values.
 | 
						|
   */
 | 
						|
  protected function constructFieldXpath($attribute, $value) {
 | 
						|
    return '//textarea[@' . $attribute . '="' . $value . '"]|//input[@' . $attribute . '="' . $value . '"]|//select[@' . $attribute . '="' . $value . '"]';
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Assert the page responds with the specified response code.
 | 
						|
   *
 | 
						|
   * @param $code
 | 
						|
   *   Response code. For example 200 is a successful page request. For a list
 | 
						|
   *   of all codes see http://www.w3.org/Protocols/rfc2616/rfc2616-sec10.html.
 | 
						|
   * @param $message
 | 
						|
   *   Message to display.
 | 
						|
   * @return
 | 
						|
   *   Assertion result.
 | 
						|
   */
 | 
						|
  protected function assertResponse($code, $message = '') {
 | 
						|
    $curl_code = curl_getinfo($this->curlHandle, CURLINFO_HTTP_CODE);
 | 
						|
    $match = is_array($code) ? in_array($curl_code, $code) : $curl_code == $code;
 | 
						|
    return $this->assertTrue($match, $message ? $message : t('HTTP response expected !code, actual !curl_code', array('!code' => $code, '!curl_code' => $curl_code)), t('Browser'));
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Assert that the most recently sent e-mail message has a field with the given value.
 | 
						|
   *
 | 
						|
   * @param $name
 | 
						|
   *   Name of field or message property to assert. Examples: subject, body, id, ...
 | 
						|
   * @param $value
 | 
						|
   *   Value of the field to assert.
 | 
						|
   * @param $message
 | 
						|
   *   Message to display.
 | 
						|
   * @return
 | 
						|
   *   TRUE on pass, FALSE on fail.
 | 
						|
   */
 | 
						|
  protected function assertMail($name, $value = '', $message = '') {
 | 
						|
    $captured_emails = variable_get('drupal_test_email_collector', array());
 | 
						|
    $email = end($captured_emails);
 | 
						|
    return $this->assertTrue($email && isset($email[$name]) && $email[$name] == $value, $message, t('E-mail'));
 | 
						|
  }
 | 
						|
 | 
						|
  /**
 | 
						|
   * Log verbose message in a text file.
 | 
						|
   *
 | 
						|
   * The a link to the vebose message will be placed in the test results via
 | 
						|
   * as a passing assertion with the text '[verbose message]'.
 | 
						|
   *
 | 
						|
   * @param $message
 | 
						|
   *   The verbose message to be stored.
 | 
						|
   * @see simpletest_verbose()
 | 
						|
   */
 | 
						|
  protected function verbose($message) {
 | 
						|
    if ($id = simpletest_verbose($message)) {
 | 
						|
      $url = file_create_url($this->originalFileDirectory . '/simpletest/verbose/' . get_class($this) . '-' . $id . '.html');
 | 
						|
      $this->error(l(t('Verbose message'), $url, array('attributes' => array('target' => '_blank'))), 'User notice');
 | 
						|
    }
 | 
						|
  }
 | 
						|
 | 
						|
}
 | 
						|
 | 
						|
/**
 | 
						|
 * Log verbose message in a text file.
 | 
						|
 *
 | 
						|
 * If verbose mode is enabled then page requests will be dumped to a file and
 | 
						|
 * presented on the test result screen. The messages will be placed in a file
 | 
						|
 * located in the simpletest directory in the original file system.
 | 
						|
 *
 | 
						|
 * @param $message
 | 
						|
 *   The verbose message to be stored.
 | 
						|
 * @param $original_file_directory
 | 
						|
 *   The original file directory, before it was changed for testing purposes.
 | 
						|
 * @param $test_class
 | 
						|
 *   The active test case class.
 | 
						|
 * @return
 | 
						|
 *   The ID of the message to be placed in related assertion messages.
 | 
						|
 * @see DrupalTestCase->originalFileDirectory
 | 
						|
 * @see DrupalWebTestCase->verbose()
 | 
						|
 */
 | 
						|
function simpletest_verbose($message, $original_file_directory = NULL, $test_class = NULL) {
 | 
						|
  static $file_directory = NULL, $class = NULL, $id = 1, $verbose = NULL;
 | 
						|
 | 
						|
  // Will pass first time during setup phase, and when verbose is TRUE.
 | 
						|
  if (!isset($original_file_directory) && !$verbose) {
 | 
						|
    return FALSE;
 | 
						|
  }
 | 
						|
 | 
						|
  if ($message && $file_directory) {
 | 
						|
    $message = '<hr />ID #' . $id . ' (<a href="' . $class . '-' . ($id - 1) . '.html">Previous</a> | <a href="' . $class . '-' . ($id + 1) . '.html">Next</a>)<hr />' . $message;
 | 
						|
    file_put_contents($file_directory . "/simpletest/verbose/$class-$id.html", $message, FILE_APPEND);
 | 
						|
    return $id++;
 | 
						|
  }
 | 
						|
 | 
						|
  if ($original_file_directory) {
 | 
						|
    $file_directory = $original_file_directory;
 | 
						|
    $class = $test_class;
 | 
						|
    $verbose = variable_get('simpletest_verbose', FALSE);
 | 
						|
    $directory = $file_directory . '/simpletest/verbose';
 | 
						|
    return file_prepare_directory($directory, FILE_CREATE_DIRECTORY);
 | 
						|
  }
 | 
						|
  return FALSE;
 | 
						|
}
 |