4 * Cas de tests pour SpipArchives
11 if ('' === $inconnu) {
12 $inconnu = md5(rand());
18 function repertoire_de_test()
20 return _NOM_TEMPORAIRES_INACCESSIBLES . 'archive_dir_test' . inconnu();
23 function definir_fichiers_de_test()
25 $fichiers_de_test = array(
26 'sans_extension' => 'archives_test',
27 'extension_inconnue' => 'archives_test.' . inconnu(),
28 'zip' => 'archives_test' . inconnu() . '.zip',
29 'faux_amis' => 'fichier_test_zip',
32 return $fichiers_de_test;
35 function fichier_de_test($case)
37 $fichiers = definir_fichiers_de_test();
39 return _NOM_TEMPORAIRES_INACCESSIBLES . $fichiers[$case];
42 function contenu_de_test()
45 'test.txt' => 'contenu de test',
52 function nettoyer_environnement_test()
54 foreach (definir_fichiers_de_test() as $case => $nom_fichier) {
55 if (is_file(fichier_de_test($case))) {
56 unlink(fichier_de_test($case));
60 nettoyer_contenu_de_test(contenu_de_test());
61 @rmdir(repertoire_de_test());
64 function nettoyer_contenu_de_test(array $fichiers = array(), $arborescence = '')
66 if ($arborescence == '') {
67 $arborescence = repertoire_de_test();
70 foreach ($fichiers as $fichier => $contenu) {
71 if (is_array($contenu)) {
72 nettoyer_contenu_de_test($contenu, $arborescence . ' /' . $fichier);
73 if (is_dir($arborescence . ' /' . $fichier)) {
74 rmdir($arborescence . ' /' . $fichier);
76 } elseif (file_exists($arborescence . '/' . $fichier)) {
77 unlink($arborescence . '/' . $fichier);