class ModuleDependencyTestCase

class ModuleDependencyTestCase extends ModuleTestCase {
  public static function getInfo() {
    return array(
      'name' => 'Module dependencies',
      'description' => 'Enable module without dependency enabled.',
      'group' => 'Module',
    );
  }

  /**
   * Checks functionality of project namespaces for dependencies.
   */
  function testProjectNamespaceForDependencies() {

    // Enable module with project namespace to ensure nothing breaks.
    $edit = array(
      'modules[Testing][system_project_namespace_test][enable]' => TRUE,
    );
    $this
      ->drupalPost('admin/modules', $edit, t('Save configuration'));
    $this
      ->assertModules(array(
      'system_project_namespace_test',
    ), TRUE);
  }

  /**
   * Attempt to enable translation module without locale enabled.
   */
  function testEnableWithoutDependency() {

    // Attempt to enable content translation without locale enabled.
    $edit = array();
    $edit['modules[Core][translation][enable]'] = 'translation';
    $this
      ->drupalPost('admin/modules', $edit, t('Save configuration'));
    $this
      ->assertText(t('Some required modules must be enabled'), 'Dependency required.');
    $this
      ->assertModules(array(
      'translation',
      'locale',
    ), FALSE);

    // Assert that the locale tables weren't enabled.
    $this
      ->assertTableCount('languages', FALSE);
    $this
      ->assertTableCount('locale', FALSE);
    $this
      ->drupalPost(NULL, NULL, t('Continue'));
    $this
      ->assertText(t('The configuration options have been saved.'), 'Modules status has been updated.');
    $this
      ->assertModules(array(
      'translation',
      'locale',
    ), TRUE);

    // Assert that the locale tables were enabled.
    $this
      ->assertTableCount('languages', TRUE);
    $this
      ->assertTableCount('locale', TRUE);
  }

  /**
   * Attempt to enable a module with a missing dependency.
   */
  function testMissingModules() {

    // Test that the system_dependencies_test module is marked
    // as missing a dependency.
    $this
      ->drupalGet('admin/modules');
    $this
      ->assertRaw(t('@module (<span class="admin-missing">missing</span>)', array(
      '@module' => drupal_ucfirst('_missing_dependency'),
    )), 'A module with missing dependencies is marked as such.');
    $checkbox = $this
      ->xpath('//input[@type="checkbox" and @disabled="disabled" and @name="modules[Testing][system_dependencies_test][enable]"]');
    $this
      ->assert(count($checkbox) == 1, 'Checkbox for the module is disabled.');

    // Force enable the system_dependencies_test module.
    module_enable(array(
      'system_dependencies_test',
    ), FALSE);

    // Verify that the module is forced to be disabled when submitting
    // the module page.
    $this
      ->drupalPost('admin/modules', array(), t('Save configuration'));
    $this
      ->assertText(t('The @module module is missing, so the following module will be disabled: @depends.', array(
      '@module' => '_missing_dependency',
      '@depends' => 'system_dependencies_test',
    )), 'The module missing dependencies will be disabled.');

    // Confirm.
    $this
      ->drupalPost(NULL, NULL, t('Continue'));

    // Verify that the module has been disabled.
    $this
      ->assertModules(array(
      'system_dependencies_test',
    ), FALSE);
  }

  /**
   * Tests enabling a module that depends on an incompatible version of a module.
   */
  function testIncompatibleModuleVersionDependency() {

    // Test that the system_incompatible_module_version_dependencies_test is
    // marked as having an incompatible dependency.
    $this
      ->drupalGet('admin/modules');
    $this
      ->assertRaw(t('@module (<span class="admin-missing">incompatible with</span> version @version)', array(
      '@module' => 'System incompatible module version test (>2.0)',
      '@version' => '1.0',
    )), 'A module that depends on an incompatible version of a module is marked as such.');
    $checkbox = $this
      ->xpath('//input[@type="checkbox" and @disabled="disabled" and @name="modules[Testing][system_incompatible_module_version_dependencies_test][enable]"]');
    $this
      ->assert(count($checkbox) == 1, 'Checkbox for the module is disabled.');
  }

  /**
   * Tests enabling a module that depends on a module with an incompatible core version.
   */
  function testIncompatibleCoreVersionDependency() {

    // Test that the system_incompatible_core_version_dependencies_test is
    // marked as having an incompatible dependency.
    $this
      ->drupalGet('admin/modules');
    $this
      ->assertRaw(t('@module (<span class="admin-missing">incompatible with</span> this version of Drupal core)', array(
      '@module' => 'System incompatible core version test',
    )), 'A module that depends on a module with an incompatible core version is marked as such.');
    $checkbox = $this
      ->xpath('//input[@type="checkbox" and @disabled="disabled" and @name="modules[Testing][system_incompatible_core_version_dependencies_test][enable]"]');
    $this
      ->assert(count($checkbox) == 1, 'Checkbox for the module is disabled.');
  }

  /**
   * Tests enabling a module that depends on a module which fails hook_requirements().
   */
  function testEnableRequirementsFailureDependency() {
    $this
      ->assertModules(array(
      'requirements1_test',
    ), FALSE);
    $this
      ->assertModules(array(
      'requirements2_test',
    ), FALSE);

    // Attempt to install both modules at the same time.
    $edit = array();
    $edit['modules[Testing][requirements1_test][enable]'] = 'requirements1_test';
    $edit['modules[Testing][requirements2_test][enable]'] = 'requirements2_test';
    $this
      ->drupalPost('admin/modules', $edit, t('Save configuration'));

    // Makes sure the modules were NOT installed.
    $this
      ->assertText(t('Requirements 1 Test failed requirements'), 'Modules status has been updated.');
    $this
      ->assertModules(array(
      'requirements1_test',
    ), FALSE);
    $this
      ->assertModules(array(
      'requirements2_test',
    ), FALSE);

    // Makes sure that already enabled modules the failing modules depend on
    // were not disabled.
    $this
      ->assertModules(array(
      'comment',
    ), TRUE);
  }

  /**
   * Tests that module dependencies are enabled in the correct order via the
   * UI. Dependencies should be enabled before their dependents.
   */
  function testModuleEnableOrder() {
    module_enable(array(
      'module_test',
    ), FALSE);
    $this
      ->resetAll();
    $this
      ->assertModules(array(
      'module_test',
    ), TRUE);
    variable_set('dependency_test', 'dependency');

    // module_test creates a dependency chain: forum depends on poll, which
    // depends on php. The correct enable order is, php, poll, forum.
    $expected_order = array(
      'php',
      'poll',
      'forum',
    );

    // Enable the modules through the UI, verifying that the dependency chain
    // is correct.
    $edit = array();
    $edit['modules[Core][forum][enable]'] = 'forum';
    $this
      ->drupalPost('admin/modules', $edit, t('Save configuration'));
    $this
      ->assertModules(array(
      'forum',
    ), FALSE);
    $this
      ->assertText(t('You must enable the Poll, PHP filter modules to install Forum.'), t('Dependency chain created.'));
    $edit['modules[Core][poll][enable]'] = 'poll';
    $edit['modules[Core][php][enable]'] = 'php';
    $this
      ->drupalPost('admin/modules', $edit, t('Save configuration'));
    $this
      ->assertModules(array(
      'forum',
      'poll',
      'php',
    ), TRUE);

    // Check the actual order which is saved by module_test_modules_enabled().
    $this
      ->assertIdentical(variable_get('test_module_enable_order', FALSE), $expected_order, t('Modules enabled in the correct order.'));
  }

  /**
   * Tests attempting to uninstall a module that has installed dependents.
   */
  function testUninstallDependents() {

    // Enable the forum module.
    $edit = array(
      'modules[Core][forum][enable]' => 'forum',
    );
    $this
      ->drupalPost('admin/modules', $edit, t('Save configuration'));
    $this
      ->assertModules(array(
      'forum',
    ), TRUE);

    // Disable forum and comment. Both should now be installed but disabled.
    $edit = array(
      'modules[Core][forum][enable]' => FALSE,
    );
    $this
      ->drupalPost('admin/modules', $edit, t('Save configuration'));
    $this
      ->assertModules(array(
      'forum',
    ), FALSE);
    $edit = array(
      'modules[Core][comment][enable]' => FALSE,
    );
    $this
      ->drupalPost('admin/modules', $edit, t('Save configuration'));
    $this
      ->assertModules(array(
      'comment',
    ), FALSE);

    // Check that the taxonomy module cannot be uninstalled.
    $this
      ->drupalGet('admin/modules/uninstall');
    $checkbox = $this
      ->xpath('//input[@type="checkbox" and @disabled="disabled" and @name="uninstall[comment]"]');
    $this
      ->assert(count($checkbox) == 1, 'Checkbox for uninstalling the comment module is disabled.');

    // Uninstall the forum module, and check that taxonomy now can also be
    // uninstalled.
    $edit = array(
      'uninstall[forum]' => 'forum',
    );
    $this
      ->drupalPost('admin/modules/uninstall', $edit, t('Uninstall'));
    $this
      ->drupalPost(NULL, NULL, t('Uninstall'));
    $this
      ->assertText(t('The selected modules have been uninstalled.'), 'Modules status has been updated.');
    $edit = array(
      'uninstall[comment]' => 'comment',
    );
    $this
      ->drupalPost('admin/modules/uninstall', $edit, t('Uninstall'));
    $this
      ->drupalPost(NULL, NULL, t('Uninstall'));
    $this
      ->assertText(t('The selected modules have been uninstalled.'), 'Modules status has been updated.');
  }

  /**
   * Tests whether the correct module metadata is returned.
   */
  function testModuleMetaData() {

    // Generate the list of available modules.
    $modules = system_rebuild_module_data();

    // Check that the mtime field exists for the system module.
    $this
      ->assertTrue(!empty($modules['system']->info['mtime']), 'The system.info file modification time field is present.');

    // Use 0 if mtime isn't present, to avoid an array index notice.
    $test_mtime = !empty($modules['system']->info['mtime']) ? $modules['system']->info['mtime'] : 0;

    // Ensure the mtime field contains a number that is greater than zero.
    $this
      ->assertTrue(is_numeric($test_mtime) && $test_mtime > 0, 'The system.info file modification time field contains a timestamp.');
  }

  /**
   * Tests whether the correct theme metadata is returned.
   */
  function testThemeMetaData() {

    // Generate the list of available themes.
    $themes = system_rebuild_theme_data();

    // Check that the mtime field exists for the bartik theme.
    $this
      ->assertTrue(!empty($themes['bartik']->info['mtime']), 'The bartik.info file modification time field is present.');

    // Use 0 if mtime isn't present, to avoid an array index notice.
    $test_mtime = !empty($themes['bartik']->info['mtime']) ? $themes['bartik']->info['mtime'] : 0;

    // Ensure the mtime field contains a number that is greater than zero.
    $this
      ->assertTrue(is_numeric($test_mtime) && $test_mtime > 0, 'The bartik.info file modification time field contains a timestamp.');
  }

}