Subversion Repositories Applications.papyrus

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
70 jpm 1 
<?php
2 
/*vim: set expandtab tabstop=4 shiftwidth=4: */
3 
// +------------------------------------------------------------------------------------------------------+
4 
// | PHP version 4.1                                                                                      |
5 
// +------------------------------------------------------------------------------------------------------+
6 
// | Copyright (C) 2004 Tela Botanica (accueil@tela-botanica.org)                                         |
7 
// +------------------------------------------------------------------------------------------------------+
8 
// | This library is free software; you can redistribute it and/or                                        |
9 
// | modify it under the terms of the GNU Lesser General Public                                           |
10 
// | License as published by the Free Software Foundation; either                                         |
11 
// | version 2.1 of the License, or (at your option) any later version.                                   |
12 
// |                                                                                                      |
13 
// | This library is distributed in the hope that it will be useful,                                      |
14 
// | but WITHOUT ANY WARRANTY; without even the implied warranty of                                       |
15 
// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU                                    |
16 
// | Lesser General Public License for more details.                                                      |
17 
// |                                                                                                      |
18 
// | You should have received a copy of the GNU Lesser General Public                                     |
19 
// | License along with this library; if not, write to the Free Software                                  |
20 
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
21 
// +------------------------------------------------------------------------------------------------------+
74 jpm 22 
// CVS : $Id: FIC_manipulation.fonct.php,v 1.3 2004-10-19 15:57:03 jpm Exp $
70 jpm 23 
/**
24 
* Bibliothèque de fonctions permettant de manipuler des fichier ou des dossiers.
25 
*
26 
* Contient des fonctions permettant de manipuler des fichier ou des dossiers.
27 
*
28 
*@package Fichier
29 
//Auteur original :
30 
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
31 
//Autres auteurs :
32 
*@author        Aucun
33 
*@copyright     Tela-Botanica 2000-2004
74 jpm 34 
*@version       $Revision: 1.3 $ $Date: 2004-10-19 15:57:03 $
70 jpm 35 
// +------------------------------------------------------------------------------------------------------+
36 
*/
37 
 
38 
// +------------------------------------------------------------------------------------------------------+
39 
// |                                           LISTE de FONCTIONS                                         |
40 
// +------------------------------------------------------------------------------------------------------+
41 
 
42 
/**
43 
* Fonction supprimerDossier() - Supprime un fichier ou un dossier et tout son contenu.
44 
*
45 
* Fonction récursive supprimant tout le contenu d'un dossier.
46 
* Auteur d'origine : Aidan Lister (http://aidan.dotgeek.org/lib/?file=function.rmdirr.php)
47 
* Traduction française et ajout gestion séparateur : Jean-Pascal Milcent
48 
*
49 
* @author      Aidan Lister <aidan@php.net>
50 
* @author      Jean-Pascal Milcent <jpm@tela-botanica.org>
51 
* @version     1.0.0
71 jpm 52 
* @param       string   le chemin du dossier à supprimer.
53 
* @param       string   le caractère représentant le séparateur dans un chemin d'accès.
74 jpm 54 
* @return      bool     retoure TRUE en cas de succès, FALSE dans le cas contraire.
70 jpm 55 
*/
74 jpm 56 
function supprimerDossier($dossier_nom, $separateur = '/')
70 jpm 57 
{
58 
    // Simple suppression d'un fichier
59 
    if (is_file($dossier_nom)) {
60 
        return unlink($dossier_nom);
61 
    }
71 jpm 62 
 
74 jpm 63 
    if (is_dir($dossier_nom)) {
64 
        // Analyse du dossier
65 
        $dossier = dir($dossier_nom);
66 
        while (false !== $entree = $dossier->read()) {
67 
            // Nous sautons les pointeurs
68 
            if ($entree == '.' || $entree == '..') {
69 
                continue;
70 
            }
71 
 
72 
            // Suppression du dossier ou appel récursif de la fonction
73 
            if (is_dir($dossier_nom.$separateur.$entree)) {
74 
                supprimerDossier($dossier_nom.$separateur.$entree, $separateur);
75 
            } else {
76 
                unlink($dossier_nom.$separateur.$entree);
77 
            }
70 jpm 78 
        }
74 jpm 79 
        // Nettoyage
80 
        $dossier->close();
81 
        return rmdir($dossier_nom);
82 
    } else {
83 
        return false;
84 
    }
85 
}
86 
 
87 
/**
88 
* Fonction creerDossier() - Créer une structure de dossier.
89 
*
90 
* Fonction récursive créant une structure de dossiers.
91 
* Auteur d'origine : Aidan Lister (http://aidan.dotgeek.org/lib/?file=function.mkdirr.php)
92 
* Traduction française et ajout gestion séparateur : Jean-Pascal Milcent
93 
*
94 
* @author      Aidan Lister <aidan@php.net>
95 
* @version     1.0.0
96 
* @param       string   la structure de dossier à créer.
97 
* @param       string   le mode de création du répertoire.
98 
* @param       string   le caractère représentant le séparateur dans un chemin d'accès.
99 
* @return      bool     retourne TRUE en cas de succès, FALSE dans le cas contraire.
100 
*/
101 
 
102 
function creerDossier($chemin, $mode = null, $separateur = '/')
103 
{
104 
    // Check if directory already exists
105 
    if (is_dir($chemin) || empty($chemin)) {
106 
        return true;
107 
    }
108 
 
109 
    // Ensure a file does not already exist with the same name
110 
    if (is_file($chemin)) {
111 
        trigger_error('mkdirr() File exists', E_USER_WARNING);
112 
        return false;
113 
    }
114 
 
115 
    // Crawl up the directory tree
116 
    $chemin_suite = substr($chemin, 0, strrpos($chemin, $separateur));
117 
    if (creerDossier($chemin_suite, $mode, $separateur)) {
118 
        if (!file_exists($chemin)) {
119 
            return @mkdir($chemin, $mode);
70 jpm 120 
        }
121 
    }
71 jpm 122 
 
74 jpm 123 
    return false;
70 jpm 124 
}
125 
 
126 
/* +--Fin du code ----------------------------------------------------------------------------------------+
127 
*
128 
* $Log: not supported by cvs2svn $
74 jpm 129 
* Revision 1.2  2004/10/18 10:12:22  jpm
130 
* Traduction commentaires...
131 
*
71 jpm 132 
* Revision 1.1  2004/10/18 10:09:12  jpm
133 
* Ajout d'une fonction permettant de supprimer récursivement un répertoire.
70 jpm 134 
*
71 jpm 135 
*
70 jpm 136 
* +-- Fin du code ----------------------------------------------------------------------------------------+
137 
*/
138 
?>