function BackupMigrateFunctionalityTest::delete_directory in Backup and Migrate 6.3

Same name and namespace in other branches

1. 5 tests/BackupMigrateFunctionalityTest.test \BackupMigrateFunctionalityTest::delete_directory()
2. 6.2 tests/backup_migrate.functionality.test \BackupMigrateFunctionalityTest::delete_directory()

File

tests/backup_migrate.functionality.test, line 143

Class

BackupMigrateFunctionalityTest

Unit tests for Backup and Migrate module.

Code

function delete_directory($dirname) {
  if (is_dir($dirname) && ($dir_handle = opendir($dirname))) {
    while ($file = readdir($dir_handle)) {
      if ($file != '.' && $file != '..') {
        if (!is_dir($dirname . '/' . $file)) {
          unlink($dirname . '/' . $file);
        }
        else {
          $this
            ->delete_directory($dirname . '/' . $file);
        }
      }
    }
    closedir($dir_handle);
    rmdir($dirname);
  }
}