Subversion Repositories Applications.papyrus

Rev

Rev 70 | Rev 74 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 70 Rev 71
Line 17... Line 17...
17
// |                                                                                                      |
17
// |                                                                                                      |
18
// | You should have received a copy of the GNU Lesser General Public                                     |
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                                  |
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                            |
20
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
21
// +------------------------------------------------------------------------------------------------------+
21
// +------------------------------------------------------------------------------------------------------+
22
// CVS : $Id: FIC_manipulation.fonct.php,v 1.1 2004-10-18 10:09:12 jpm Exp $
22
// CVS : $Id: FIC_manipulation.fonct.php,v 1.2 2004-10-18 10:12:22 jpm Exp $
23
/**
23
/**
24
* Bibliothèque de fonctions permettant de manipuler des fichier ou des dossiers.
24
* Bibliothèque de fonctions permettant de manipuler des fichier ou des dossiers.
25
*
25
*
26
* Contient des fonctions permettant de manipuler des fichier ou des dossiers.
26
* Contient des fonctions permettant de manipuler des fichier ou des dossiers.
27
*
27
*
Line 29... Line 29...
29
//Auteur original :
29
//Auteur original :
30
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
30
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
31
//Autres auteurs :
31
//Autres auteurs :
32
*@author        Aucun
32
*@author        Aucun
33
*@copyright     Tela-Botanica 2000-2004
33
*@copyright     Tela-Botanica 2000-2004
34
*@version       $Revision: 1.1 $ $Date: 2004-10-18 10:09:12 $
34
*@version       $Revision: 1.2 $ $Date: 2004-10-18 10:12:22 $
35
// +------------------------------------------------------------------------------------------------------+
35
// +------------------------------------------------------------------------------------------------------+
36
*/
36
*/
Line 37... Line 37...
37
 
37
 
38
// +------------------------------------------------------------------------------------------------------+
38
// +------------------------------------------------------------------------------------------------------+
Line 47... Line 47...
47
* Traduction française et ajout gestion séparateur : Jean-Pascal Milcent
47
* Traduction française et ajout gestion séparateur : Jean-Pascal Milcent
48
*
48
*
49
* @author      Aidan Lister <aidan@php.net>
49
* @author      Aidan Lister <aidan@php.net>
50
* @author      Jean-Pascal Milcent <jpm@tela-botanica.org>
50
* @author      Jean-Pascal Milcent <jpm@tela-botanica.org>
51
* @version     1.0.0
51
* @version     1.0.0
52
* @param       string   $dirname    The directory to delete
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.
53
* @return      bool     Returns true on success, false on failure
54
* @return      bool     retoure true en cas de succès, false dans le cas contraire.
54
*/
55
*/
55
function supprimerDossier($dossier_nom, $separateur)
56
function supprimerDossier($dossier_nom, $separateur)
56
{
57
{
57
    // Simple suppression d'un fichier
58
    // Simple suppression d'un fichier
58
    if (is_file($dossier_nom)) {
59
    if (is_file($dossier_nom)) {
59
        return unlink($dossier_nom);
60
        return unlink($dossier_nom);
60
    }
61
    }
61
 
62
    
62
    // Analyse du dossier
63
    // Analyse du dossier
63
    $dossier = dir($dossier_nom);
64
    $dossier = dir($dossier_nom);
64
    while (false !== $entree = $dossier->read()) {
65
    while (false !== $entree = $dossier->read()) {
65
        // Nous sautons les pointeurs
66
        // Nous sautons les pointeurs
66
        if ($entree == '.' || $entree == '..') {
67
        if ($entree == '.' || $entree == '..') {
67
            continue;
68
            continue;
68
        }
69
        }
69
 
70
        
70
        // Suppression du dossier ou appel récursif de la fonction
71
        // Suppression du dossier ou appel récursif de la fonction
71
        if (is_dir($dossier_nom.$separateur.$entree)) {
72
        if (is_dir($dossier_nom.$separateur.$entree)) {
72
            supprimerDossier($dossier_nom.$separateur.$entree);
73
            supprimerDossier($dossier_nom.$separateur.$entree);
73
        } else {
74
        } else {
74
            unlink($dossier_nom.$separateur.$entree);
75
            unlink($dossier_nom.$separateur.$entree);
75
        }
76
        }
76
    }
77
    }
77
 
78
    
78
    // Nettoyage
79
    // Nettoyage
79
    $dossier->close();
80
    $dossier->close();
80
    return rmdir($dossier_nom);
81
    return rmdir($dossier_nom);
81
}
82
}
Line 82... Line 83...
82
 
83
 
83
/* +--Fin du code ----------------------------------------------------------------------------------------+
84
/* +--Fin du code ----------------------------------------------------------------------------------------+
84
*
85
*
-
 
86
* $Log: not supported by cvs2svn $
-
 
87
* Revision 1.1  2004/10/18 10:09:12  jpm
-
 
88
* Ajout d'une fonction permettant de supprimer récursivement un répertoire.
85
* $Log: not supported by cvs2svn $
89
*
86
*
90
*
87
* +-- Fin du code ----------------------------------------------------------------------------------------+
91
* +-- Fin du code ----------------------------------------------------------------------------------------+
88
*/
92
*/
89
?>
93
?>