You are here

Home » API reference » Access Control Kit 7 » access.test

class AccessSchemeFunctionTest in Access Control Kit 7

Tests for access scheme functions.

Hierarchy

Expanded class hierarchy of AccessSchemeFunctionTest

File

./access.test, line 422
Tests for the access control kit module.

View source 
class AccessSchemeFunctionTest extends AccessWebTestCase {

  /**
   * An array of access schemes.
   *
   * @var array
   */
  protected $schemes;

  /**
   * Implements getInfo(), required method for SimpleTest.
   */
  public static function getInfo() {
    return array(
      'name' => 'Access schemes',
      'description' => 'Tests loading, saving and deleting access schemes.',
      'group' => 'Access control kit',
    );
  }

  /**
   * Overrides DrupalWebTestCase::setUp().
   */
  public function setUp() {

    // Enable the access control kit module.
    parent::setUp(array(
      'access',
    ));

    // Create two schemes for testing.
    $this->schemes = array();
    $this->schemes[] = $this
      ->createScheme();
    $this->schemes[] = $this
      ->createScheme();

    // Attach a handler to each.
    foreach ($this->schemes as $scheme) {
      entity_get_controller('access_scheme')
        ->attachHandler($scheme, 'node', 'ACKEntityField');
      access_scheme_save($scheme);
    }
  }

  /**
   * Test basic create, read, update, and delete functions.
   */
  public function testSchemeCRUD() {
    $loaded_schemes = access_scheme_load_multiple(FALSE, TRUE);
    $this
      ->assertTrue(count($loaded_schemes), 'Access schemes exist in the database.');
    $i = 0;
    $count = count($this->schemes);
    $names = access_scheme_names();
    $bundles = field_info_bundles('access_grant');
    foreach ($this->schemes as $scheme) {
      $i++;

      // Find the test scheme in the name list.
      $this
        ->assertTrue(isset($names[$scheme->machine_name]) && $names[$scheme->machine_name] == $scheme->name, "[scheme {$i} of {$count}] Found the scheme in the name list.");

      // Find the test scheme in the bundle list.
      $this
        ->assertTrue(isset($bundles[$scheme->machine_name]), "[scheme {$i} of {$count}] Found the scheme in the bundle list.");

      // Confirm that the loaded scheme matches expected values.
      $loaded_scheme = $loaded_schemes[$scheme->sid];
      $this
        ->assertEqual($scheme->sid, $loaded_scheme->sid, "[scheme {$i} of {$count}] ID is OK.");
      $this
        ->assertEqual($scheme->machine_name, $loaded_scheme->machine_name, "[scheme {$i} of {$count}] Machine name is OK.");
      $this
        ->assertEqual($scheme->name, $loaded_scheme->name, "[scheme {$i} of {$count}] Human-readable name is OK.");
      $this
        ->assertEqual($scheme->type, $loaded_scheme->type, "[scheme {$i} of {$count}] Scheme type is OK.");
      $this
        ->assertEqual($scheme->description, $loaded_scheme->description, "[scheme {$i} of {$count}] Description is OK.");

      // Confirm that the scheme's access realm field exists.
      $this
        ->assertTrue(isset($loaded_scheme->realm_field) && isset($loaded_scheme->realm_field['field_name']) && $loaded_scheme->realm_field['field_name'] == $scheme->realm_field_name, "[scheme {$i} of {$count}] Realm field exists.");

      // Confirm that scheme type and realm information were attached.
      $this
        ->assertTrue(isset($loaded_scheme->info) && isset($loaded_scheme->info['type']) && $loaded_scheme->info['type'] == 'boolean', "[scheme {$i} of {$count}] Scheme type info was attached.");
      $this
        ->assertTrue(isset($loaded_scheme->realms) && is_array($loaded_scheme->realms) && $loaded_scheme->realms[0] == t('False') && $loaded_scheme->realms[1] == t('True'), "[scheme {$i} of {$count}] Realm values were attached.");

      // Confirm that role information was attached.
      $this
        ->assertTrue(isset($loaded_scheme->roles) && is_array($loaded_scheme->roles), "[scheme {$i} of {$count}] Roles were attached.");

      // Confirm that handlers were attached.
      $this
        ->assertTrue(isset($loaded_scheme->handlers) && isset($loaded_scheme->handlers['node']), "[scheme {$i} of {$count}] Handlers were attached.");
      $this
        ->assertEqual(get_class($loaded_scheme->handlers['node']), 'ACKEntityField');
    }

    // Attempt to load a scheme that doesn't exist.
    $sid = count($loaded_schemes) + 1;
    $scheme = access_scheme_load($sid);
    $this
      ->assertFalse($scheme, 'Invalid scheme ID does not load.');

    // Create a new scheme, which should end up with $sid as its ID.
    $this
      ->createScheme();

    // Make sure that the previously invalid ID now loads properly.
    $scheme = access_scheme_load($sid);
    $this
      ->assertTrue(!empty($scheme) && is_object($scheme), 'Newly created access scheme loads properly.');
    $this
      ->assertEqual($scheme->sid, $sid, 'Loaded scheme ID is the same as the previously invalid ID.');

    // Confirm that schemes can be loaded by machine name.
    $loaded_scheme = access_scheme_machine_name_load(str_replace('_', '-', $scheme->machine_name));
    $this
      ->assertEqual($scheme->sid, $loaded_scheme->sid, 'Scheme loads by machine name.');

    // Confirm that the scheme can be updated.
    $new_name = $this
      ->randomName();
    $loaded_scheme->name = $new_name;
    $this
      ->assertEqual(access_scheme_save($loaded_scheme), SAVED_UPDATED, 'Scheme updated.');
    $loaded_scheme = access_scheme_load($scheme->sid, TRUE);
    $this
      ->assertEqual($loaded_scheme->name, $new_name);

    // Confirm that the scheme can be deleted.
    entity_get_controller('access_scheme')
      ->attachHandler($loaded_scheme, 'node', 'ACKEntityField');
    access_scheme_save($loaded_scheme);
    $handlers = db_query('SELECT * FROM {access_handler} WHERE scheme = :scheme', array(
      ':scheme' => $loaded_scheme->machine_name,
    ));
    $handler = $handlers
      ->fetch();
    $this
      ->assertFalse(empty($handler), 'Handlers were attached.');
    $this
      ->assertEqual(access_scheme_delete($loaded_scheme->sid), SAVED_DELETED, 'Scheme deleted.');
    $this
      ->assertFalse(access_scheme_load($loaded_scheme->sid));
    $handlers = db_query('SELECT * FROM {access_handler} WHERE scheme = :scheme', array(
      ':scheme' => $loaded_scheme->machine_name,
    ));
    $this
      ->assertFalse($handlers
      ->fetch(), 'Handlers were detached.');
    $this
      ->assertNull(variable_get('access_scheme_roles_' . $loaded_scheme->machine_name), 'Role configuration was deleted.');
    $bundles = field_info_bundles('access_grant');
    $this
      ->assertFalse(isset($bundles[$loaded_scheme->machine_name]), 'Bundle was deleted.');

    // Confirm that the scheme can be recreated.
    unset($loaded_scheme->sid);
    $this
      ->assertEqual(access_scheme_save($loaded_scheme), SAVED_NEW, 'Scheme created.');
    $this
      ->assertNotNull($loaded_scheme->sid);
  }

  /**
   * Test deleting an access scheme that contains grants.
   */
  public function testSchemeDeleteWithGrants() {
    $this
      ->assertEqual(2, count($this->schemes));

    // Create five access grants each for the two test schemes.
    foreach ($this->schemes as $scheme) {

      // Assert that there are no existing grants for the access scheme.
      $has_rows = (bool) db_query_range('SELECT 1 FROM {access_grant} WHERE scheme = :scheme', 0, 1, array(
        ':scheme' => $scheme->machine_name,
      ))
        ->fetchField();
      $this
        ->assertFalse($has_rows);
      for ($i = 0; $i < 5; $i++) {
        $this
          ->createGrant($scheme);
      }

      // Assert that there are now five grants for the access scheme.
      $this
        ->assertEqual(5, db_query('SELECT COUNT(*) FROM {access_grant} WHERE scheme = :scheme', array(
        ':scheme' => $scheme->machine_name,
      ))
        ->fetchField());
    }

    // Delete the first scheme.
    $scheme = reset($this->schemes);
    access_scheme_delete($scheme->sid);

    // Assert that there are no grants left for the deleted scheme.
    $has_rows = (bool) db_query_range('SELECT 1 FROM {access_grant} WHERE scheme = :scheme', 0, 1, array(
      ':scheme' => $scheme->machine_name,
    ))
      ->fetchField();
    $this
      ->assertFalse($has_rows);

    // Assert that there are still five grants for the remaining scheme.
    $scheme = array_pop($this->schemes);
    $this
      ->assertEqual(5, db_query('SELECT COUNT(*) FROM {access_grant} WHERE scheme = :scheme', array(
      ':scheme' => $scheme->machine_name,
    ))
      ->fetchField());
  }

  /**
   * Ensure that the access scheme static reset works correctly.
   */
  public function testSchemeStaticReset() {
    $original_scheme = access_scheme_load($this->schemes[0]->sid);
    $this
      ->assertTrue(is_object($original_scheme) && $original_scheme->name == $this->schemes[0]->name, 'Scheme loaded successfully.');

    // Change the name and description.
    $scheme = $original_scheme;
    $scheme->name = $this
      ->randomName();
    $scheme->description = $this
      ->randomName();
    access_scheme_save($scheme);

    // Load the scheme.
    $new_scheme = access_scheme_load($original_scheme->sid);
    $this
      ->assertEqual($new_scheme->name, $scheme->name);
    $this
      ->assertEqual($new_scheme->description, $scheme->description);

    // Delete the scheme.
    access_scheme_delete($this->schemes[0]->sid);
    $schemes = access_scheme_load_multiple(FALSE);
    $this
      ->assertTrue(!isset($schemes[$this->schemes[0]->sid]), 'The scheme was deleted.');
  }

}

Members

Namesort descending Modifiers Type Description Overrides
AccessSchemeFunctionTest::$schemes protected property An array of access schemes.
AccessSchemeFunctionTest::getInfo public static function Implements getInfo(), required method for SimpleTest.
AccessSchemeFunctionTest::setUp public function Overrides DrupalWebTestCase::setUp(). Overrides DrupalWebTestCase::setUp
AccessSchemeFunctionTest::testSchemeCRUD public function Test basic create, read, update, and delete functions.
AccessSchemeFunctionTest::testSchemeDeleteWithGrants public function Test deleting an access scheme that contains grants.
AccessSchemeFunctionTest::testSchemeStaticReset public function Ensure that the access scheme static reset works correctly.
AccessWebTestCase::createGrant public function Creates and returns a new access grant for the given scheme.
AccessWebTestCase::createListScheme public function Creates a list-based scheme with generic realms.
AccessWebTestCase::createScheme public function Creates and returns a new access scheme with random properties.
AccessWebTestCase::createTaxonomyTermScheme public function Creates a taxonomy-based scheme with randomly named realms.
DrupalTestCase::$assertions protected property Assertions thrown in that test case.
DrupalTestCase::$databasePrefix protected property The database prefix of this test run.
DrupalTestCase::$originalFileDirectory protected property The original file directory, before it was changed for testing purposes.
DrupalTestCase::$results public property Current results of this test case.
DrupalTestCase::$setup protected property Flag to indicate whether the test has been set up.
DrupalTestCase::$setupDatabasePrefix protected property
DrupalTestCase::$setupEnvironment protected property
DrupalTestCase::$skipClasses protected property This class is skipped when looking for the source of an assertion.
DrupalTestCase::$testId protected property The test run ID.
DrupalTestCase::$timeLimit protected property Time limit for the test.
DrupalTestCase::$useSetupInstallationCache public property Whether to cache the installation part of the setUp() method.
DrupalTestCase::$useSetupModulesCache public property Whether to cache the modules installation part of the setUp() method.
DrupalTestCase::$verboseDirectoryUrl protected property URL to the verbose output file directory.
DrupalTestCase::assert protected function Internal helper: stores the assert.
DrupalTestCase::assertEqual protected function Check to see if two values are equal.
DrupalTestCase::assertFalse protected function Check to see if a value is false (an empty string, 0, NULL, or FALSE).
DrupalTestCase::assertIdentical protected function Check to see if two values are identical.
DrupalTestCase::assertNotEqual protected function Check to see if two values are not equal.
DrupalTestCase::assertNotIdentical protected function Check to see if two values are not identical.
DrupalTestCase::assertNotNull protected function Check to see if a value is not NULL.
DrupalTestCase::assertNull protected function Check to see if a value is NULL.
DrupalTestCase::assertTrue protected function Check to see if a value is not false (not an empty string, 0, NULL, or FALSE).
DrupalTestCase::deleteAssert public static function Delete an assertion record by message ID.
DrupalTestCase::error protected function Fire an error assertion. 1
DrupalTestCase::errorHandler public function Handle errors during test runs. 1
DrupalTestCase::exceptionHandler protected function Handle exceptions.
DrupalTestCase::fail protected function Fire an assertion that is always negative.
DrupalTestCase::generatePermutations public static function Converts a list of possible parameters into a stack of permutations.
DrupalTestCase::getAssertionCall protected function Cycles through backtrace until the first non-assertion method is found.
DrupalTestCase::getDatabaseConnection public static function Returns the database connection to the site running Simpletest.
DrupalTestCase::insertAssert public static function Store an assertion from outside the testing context.
DrupalTestCase::pass protected function Fire an assertion that is always positive.
DrupalTestCase::randomName public static function Generates a random string containing letters and numbers.
DrupalTestCase::randomString public static function Generates a random string of ASCII characters of codes 32 to 126.
DrupalTestCase::run public function Run all tests in this class.
DrupalTestCase::verbose protected function Logs a verbose message in a text file.
DrupalWebTestCase::$additionalCurlOptions protected property Additional cURL options.
DrupalWebTestCase::$content protected property The content of the page currently loaded in the internal browser.
DrupalWebTestCase::$cookieFile protected property The current cookie file used by cURL.
DrupalWebTestCase::$cookies protected property The cookies of the page currently loaded in the internal browser.
DrupalWebTestCase::$curlHandle protected property The handle of the current cURL connection.
DrupalWebTestCase::$drupalSettings protected property The value of the Drupal.settings JavaScript variable for the page currently loaded in the internal browser.
DrupalWebTestCase::$elements protected property The parsed version of the page.
DrupalWebTestCase::$generatedTestFiles protected property Whether the files were copied to the test files directory.
DrupalWebTestCase::$headers protected property The headers of the page currently loaded in the internal browser.
DrupalWebTestCase::$httpauth_credentials protected property HTTP authentication credentials (<username>:<password>).
DrupalWebTestCase::$httpauth_method protected property HTTP authentication method
DrupalWebTestCase::$loggedInUser protected property The current user logged in using the internal browser.
DrupalWebTestCase::$originalShutdownCallbacks protected property The original shutdown handlers array, before it was cleaned for testing purposes.
DrupalWebTestCase::$originalUser protected property The original user, before it was changed to a clean uid = 1 for testing purposes.
DrupalWebTestCase::$plainTextContent protected property The content of the page currently loaded in the internal browser (plain text version).
DrupalWebTestCase::$profile protected property The profile to install as a basis for testing. 20
DrupalWebTestCase::$redirect_count protected property The number of redirects followed during the handling of a request.
DrupalWebTestCase::$session_id protected property The current session ID, if available.
DrupalWebTestCase::$session_name protected property The current session name, if available.
DrupalWebTestCase::$url protected property The URL currently loaded in the internal browser.
DrupalWebTestCase::assertField protected function Asserts that a field exists with the given name or ID.
DrupalWebTestCase::assertFieldById protected function Asserts that a field exists in the current page with the given ID and value.
DrupalWebTestCase::assertFieldByName protected function Asserts that a field exists in the current page with the given name and value.
DrupalWebTestCase::assertFieldByXPath protected function Asserts that a field exists in the current page by the given XPath.
DrupalWebTestCase::assertFieldChecked protected function Asserts that a checkbox field in the current page is checked.
DrupalWebTestCase::assertLink protected function Pass if a link with the specified label is found, and optional with the specified index.
DrupalWebTestCase::assertLinkByHref protected function Pass if a link containing a given href (part) is found.
DrupalWebTestCase::assertMail protected function Asserts that the most recently sent e-mail message has the given value.
DrupalWebTestCase::assertMailPattern protected function Asserts that the most recently sent e-mail message has the pattern in it.
DrupalWebTestCase::assertMailString protected function Asserts that the most recently sent e-mail message has the string in it.
DrupalWebTestCase::assertNoDuplicateIds protected function Asserts that each HTML ID is used for just a single element.
DrupalWebTestCase::assertNoField protected function Asserts that a field does not exist with the given name or ID.
DrupalWebTestCase::assertNoFieldById protected function Asserts that a field does not exist with the given ID and value.
DrupalWebTestCase::assertNoFieldByName protected function Asserts that a field does not exist with the given name and value.
DrupalWebTestCase::assertNoFieldByXPath protected function Asserts that a field doesn't exist or its value doesn't match, by XPath.
DrupalWebTestCase::assertNoFieldChecked protected function Asserts that a checkbox field in the current page is not checked.
DrupalWebTestCase::assertNoLink protected function Pass if a link with the specified label is not found.
DrupalWebTestCase::assertNoLinkByHref protected function Pass if a link containing a given href (part) is not found.
DrupalWebTestCase::assertNoOptionSelected protected function Asserts that a select option in the current page is not checked.
DrupalWebTestCase::assertNoPattern protected function Will trigger a pass if the perl regex pattern is not present in raw content.
DrupalWebTestCase::assertNoRaw protected function 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.
DrupalWebTestCase::assertNoResponse protected function Asserts the page did not return the specified response code.
DrupalWebTestCase::assertNoText protected function 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.
DrupalWebTestCase::assertNoTitle protected function Pass if the page title is not the given string.
DrupalWebTestCase::assertNoUniqueText protected function Pass if the text is found MORE THAN ONCE on the text version of the page.
DrupalWebTestCase::assertOptionSelected protected function Asserts that a select option in the current page is checked.
DrupalWebTestCase::assertPattern protected function Will trigger a pass if the Perl regex pattern is found in the raw content.
DrupalWebTestCase::assertRaw protected function Pass if the raw text IS found on the loaded page, fail otherwise. Raw text refers to the raw HTML that the page generated.
DrupalWebTestCase::assertResponse protected function Asserts the page responds with the specified response code.
DrupalWebTestCase::assertText protected function 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.
DrupalWebTestCase::assertTextHelper protected function Helper for assertText and assertNoText.
DrupalWebTestCase::assertThemeOutput protected function Asserts themed output.
DrupalWebTestCase::assertTitle protected function Pass if the page title is the given string.
DrupalWebTestCase::assertUniqueText protected function Pass if the text is found ONLY ONCE on the text version of the page.
DrupalWebTestCase::assertUniqueTextHelper protected function Helper for assertUniqueText and assertNoUniqueText.
DrupalWebTestCase::assertUrl protected function Pass if the internal browser's URL matches the given path.
DrupalWebTestCase::buildXPathQuery protected function Builds an XPath query.
DrupalWebTestCase::changeDatabasePrefix protected function Changes the database connection to the prefixed one.
DrupalWebTestCase::checkForMetaRefresh protected function 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.
DrupalWebTestCase::checkPermissions protected function Check to make sure that the array of permissions are valid.
DrupalWebTestCase::clickLink protected function Follows a link by name.
DrupalWebTestCase::constructFieldXpath protected function Helper function: construct an XPath for the given set of attributes and value.
DrupalWebTestCase::copySetupCache protected function Copy the setup cache from/to another table and files directory.
DrupalWebTestCase::cronRun protected function Runs cron in the Drupal installed by Simpletest.
DrupalWebTestCase::curlClose protected function Close the cURL handler and unset the handler.
DrupalWebTestCase::curlExec protected function Initializes and executes a cURL request.
DrupalWebTestCase::curlHeaderCallback protected function Reads headers and registers errors received from the tested site.
DrupalWebTestCase::curlInitialize protected function Initializes the cURL connection.
DrupalWebTestCase::drupalCompareFiles protected function Compare two files based on size and file name.
DrupalWebTestCase::drupalCreateContentType protected function Creates a custom content type based on default settings.
DrupalWebTestCase::drupalCreateNode protected function Creates a node based on default settings.
DrupalWebTestCase::drupalCreateRole protected function Creates a role with specified permissions.
DrupalWebTestCase::drupalCreateUser protected function Create a user with a given set of permissions.
DrupalWebTestCase::drupalGet protected function Retrieves a Drupal path or an absolute path.
DrupalWebTestCase::drupalGetAJAX protected function Retrieve a Drupal path or an absolute path and JSON decode the result.
DrupalWebTestCase::drupalGetContent protected function Gets the current raw HTML of requested page.
DrupalWebTestCase::drupalGetHeader protected function 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…
DrupalWebTestCase::drupalGetHeaders protected function 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…
DrupalWebTestCase::drupalGetMails protected function Gets an array containing all e-mails sent during this test case.
DrupalWebTestCase::drupalGetNodeByTitle function Get a node from the database based on its title.
DrupalWebTestCase::drupalGetSettings protected function Gets the value of the Drupal.settings JavaScript variable for the currently loaded page.
DrupalWebTestCase::drupalGetTestFiles protected function Get a list files that can be used in tests.
DrupalWebTestCase::drupalGetToken protected function Generate a token for the currently logged in user.
DrupalWebTestCase::drupalHead protected function Retrieves only the headers for a Drupal path or an absolute path.
DrupalWebTestCase::drupalLogin protected function Log in a user with the internal browser.
DrupalWebTestCase::drupalLogout protected function
DrupalWebTestCase::drupalPost protected function Execute a POST request on a Drupal page. It will be done as usual POST request with SimpleBrowser.
DrupalWebTestCase::drupalPostAJAX protected function Execute an Ajax submission.
DrupalWebTestCase::drupalSetContent protected function 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.
DrupalWebTestCase::drupalSetSettings protected function Sets the value of the Drupal.settings JavaScript variable for the currently loaded page.
DrupalWebTestCase::getAbsoluteUrl protected function Takes a path and returns an absolute path.
DrupalWebTestCase::getAllOptions protected function Get all option elements, including nested options, in a select.
DrupalWebTestCase::getSelectedItem protected function Get the selected value from a select field.
DrupalWebTestCase::getSetupCacheKey protected function Returns the cache key used for the setup caching.
DrupalWebTestCase::getUrl protected function Get the current URL from the cURL handler.
DrupalWebTestCase::handleForm protected function 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.
DrupalWebTestCase::loadSetupCache protected function Copies the cached tables and files for a cached installation setup.
DrupalWebTestCase::parse protected function Parse content returned from curlExec using DOM and SimpleXML.
DrupalWebTestCase::preloadRegistry protected function Preload the registry from the testing site.
DrupalWebTestCase::prepareDatabasePrefix protected function Generates a database prefix for running tests.
DrupalWebTestCase::prepareEnvironment protected function Prepares the current environment for running the test.
DrupalWebTestCase::recursiveDirectoryCopy protected function Recursively copy one directory to another.
DrupalWebTestCase::refreshVariables protected function Refresh the in-memory set of variables. Useful after a page request is made that changes a variable in a different thread. 1
DrupalWebTestCase::resetAll protected function Reset all data structures after having enabled new modules.
DrupalWebTestCase::storeSetupCache protected function Store the installation setup to a cache.
DrupalWebTestCase::tearDown protected function Delete created files and temporary files directory, delete the tables created by setUp(), and reset the database prefix. 6
DrupalWebTestCase::verboseEmail protected function Outputs to verbose the most recent $count emails sent.
DrupalWebTestCase::xpath protected function 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.
DrupalWebTestCase::__construct function Constructor for DrupalWebTestCase. Overrides DrupalTestCase::__construct 1