1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
|
<?php
// $Id$
/**
* @file
* Tests for the module API.
*/
/**
* Unit tests for the module API.
*/
class ModuleUnitTest extends DrupalWebTestCase {
public static function getInfo() {
return array(
'name' => 'Module API',
'description' => 'Test low-level module functions.',
'group' => 'Module',
);
}
/**
* The basic functionality of module_list().
*/
function testModuleList() {
// Build a list of modules, sorted alphabetically.
$profile_info = install_profile_info('standard', 'en');
$module_list = $profile_info['dependencies'];
// Install profile is a module that is expected to be loaded.
$module_list[] = 'standard';
sort($module_list);
// Compare this list to the one returned by module_list(). We expect them
// to match, since all default profile modules have a weight equal to 0
// (except for block.module, which has a lower weight but comes first in
// the alphabet anyway).
$this->assertModuleList($module_list, t('Standard profile'));
// Try to install a new module.
drupal_install_modules(array('contact'));
$module_list[] = 'contact';
sort($module_list);
$this->assertModuleList($module_list, t('After adding a module'));
// Try to mess with the module weights.
db_update('system')
->fields(array('weight' => 20))
->condition('name', 'contact')
->condition('type', 'module')
->execute();
// Reset the module list.
module_list(TRUE);
// Move contact to the end of the array.
unset($module_list[array_search('contact', $module_list)]);
$module_list[] = 'contact';
$this->assertModuleList($module_list, t('After changing weights'));
// Test the fixed list feature.
$fixed_list = array(
'system' => array('filename' => drupal_get_path('module', 'system')),
'menu' => array('filename' => drupal_get_path('module', 'menu')),
);
module_list(FALSE, FALSE, FALSE, $fixed_list);
$new_module_list = array_combine(array_keys($fixed_list), array_keys($fixed_list));
$this->assertModuleList($new_module_list, t('When using a fixed list'));
// Reset the module list.
module_list(TRUE);
$this->assertModuleList($module_list, t('After reset'));
}
/**
* Assert that module_list() return the expected values.
*
* @param $expected_values
* The expected values, sorted by weight and module name.
*/
protected function assertModuleList(Array $expected_values, $condition) {
$expected_values = array_combine($expected_values, $expected_values);
$this->assertEqual($expected_values, module_list(), t('@condition: module_list() returns correct results', array('@condition' => $condition)));
ksort($expected_values);
$this->assertIdentical($expected_values, module_list(FALSE, FALSE, TRUE), t('@condition: module_list() returns correctly sorted results', array('@condition' => $condition)));
}
/**
* Test module_implements() caching.
*/
function testModuleImplements() {
// Clear the cache.
cache_clear_all('module_implements', 'cache_bootstrap');
$this->assertFalse(cache_get('module_implements', 'cache_bootstrap'), t('The module implements cache is empty.'));
$this->drupalGet('');
$this->assertTrue(cache_get('module_implements', 'cache_bootstrap'), t('The module implements cache is populated after requesting a page.'));
// Test again with an authenticated user.
$this->user = $this->drupalCreateUser();
$this->drupalLogin($this->user);
cache_clear_all('module_implements', 'cache_bootstrap');
$this->drupalGet('');
$this->assertTrue(cache_get('module_implements', 'cache_bootstrap'), t('The module implements cache is populated after requesting a page.'));
}
/**
* Test drupal_install_modules() and dependency resolution.
*/
function testDrupalInstallModules() {
drupal_install_modules(array('module_test'));
$this->assertTrue(module_exists('module_test'), t('Test module is enabled.'));
// First, create a fake missing dependency. Forum depends on poll, which
// depends on a made-up module, foo. Nothing should be installed.
variable_set('dependency_test', 'missing dependency');
$result = drupal_install_modules(array('forum'));
$this->assertFalse($result, t('drupal_install_modules() returns FALSE if dependencies are missing.'));
$this->assertFalse(module_exists('forum'), t('drupal_install_modules() aborts if dependencies are missing.'));
// Now, fix the missing dependency. drupal_install_modules() should work.
variable_set('dependency_test', 'dependency');
$result = drupal_install_modules(array('forum'));
$this->assertTrue($result, t('drupal_install_modules() returns the correct value.'));
// Verify that the fake dependency chain was installed.
$this->assertTrue(module_exists('poll') && module_exists('php'), t('Dependency chain was installed by drupal_install_modules().'));
// Finally, verify that the original module was installed.
$this->assertTrue(module_exists('forum'), t('Module installation with unlisted dependencies succeeded.'));
}
}
/**
* Unit tests for module uninstallation and related hooks.
*/
class ModuleUninstallTestCase extends DrupalWebTestCase {
public static function getInfo() {
return array(
'name' => 'Module uninstallation',
'description' => 'Checks module uninstallation',
'group' => 'Module',
);
}
function setUp() {
parent::setUp('module_test', 'user');
}
/**
* Tests the hook_modules_uninstalled() of the user module.
*/
function testUserPermsUninstalled() {
// Uninstalls the module_test module, so hook_modules_uninstalled()
// is executed.
drupal_uninstall_modules(array('module_test'));
// Are the perms defined by module_test removed from {role_permission}.
$count = db_query("SELECT COUNT(rid) FROM {role_permission} WHERE permission = :perm", array(':perm' => 'module_test perm'))->fetchField();
$this->assertEqual(0, $count, t('Permissions were all removed.'));
}
}
|
