Subversion Repositories Sites.tela-botanica.org

Compare Revisions

Ignore whitespace Rev 375 → Rev 376

/trunk/scripts/modules/wikini/Wikini.class.php
New file
0,0 → 1,490
<?php
/*vim: set expandtab tabstop=4 shiftwidth=4: */
// +------------------------------------------------------------------------------------------------------+
// | PHP version 5.1 |
// +------------------------------------------------------------------------------------------------------+
// | Copyright (C) 1999-2006 Tela Botanica (accueil@tela-botanica.org) |
// +------------------------------------------------------------------------------------------------------+
// | This file is part of eflore_bp. |
// | |
// | eflore_bp is free software; you can redistribute it and/or modify |
// | it under the terms of the GNU General Public License as published by |
// | the Free Software Foundation; either version 2 of the License, or |
// | (at your option) any later version. |
// | |
// | eflore_bp is distributed in the hope that it will be useful, |
// | but WITHOUT ANY WARRANTY; without even the implied warranty of |
// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
// | GNU General Public License for more details. |
// | |
// | You should have received a copy of the GNU General Public License |
// | along with Foobar; if not, write to the Free Software |
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |
// +------------------------------------------------------------------------------------------------------+
// CVS : $Id: RecueilDeDonnees.class.php,v 1.5 2007-07-25 17:45:19 jp_milcent Exp $
/**
* eflore_bp - ReccueilDeDonnee.php
*
* Description :
*
*@package eflore_bp
//Auteur original :
*@author Jean-Pascal MILCENT <jpm@tela-botanica.org>
//Autres auteurs :
*@author Aucun
*@copyright Tela-Botanica 1999-2007
*@version $Revision: 1.5 $ $Date: 2007-07-25 17:45:19 $
// +------------------------------------------------------------------------------------------------------+
*/
 
// +------------------------------------------------------------------------------------------------------+
// | ENTÊTE du PROGRAMME |
// +------------------------------------------------------------------------------------------------------+
 
 
// +------------------------------------------------------------------------------------------------------+
// | CORPS du PROGRAMME |
// +------------------------------------------------------------------------------------------------------+
class Wikini extends aModule {
private $bdd_principale = SC_BDD_NOM_PRINCIPALE;
private $bdd_options = array('debug' => 3);
private $bdd_dsn = SC_DSN_PRINCIPAL;
private $connexion = null;
private $sites = array('http://www.tela-botanica.org', 'http://www.outils-reseaux.org');
public function __construct()
{
$this->connexion = DB::connect($this->bdd_dsn, $this->bdd_options);
if (PEAR::isError($this->connexion)) {
$e = $this->connexion->getMessage();
trigger_error($e, E_USER_ERROR);
}
parent::__construct();
}
// La méthode executer est appellé par défaut
public function executer()
{
$this->poursuivreVers('config_fichier');
}
public function executerConfigFichier()
{
// Initialisation des variables
$this->setChrono('debut');
$aso_donnees = $this->getRegistre()->get('squelette_donnees');
// Gestion de l'url de l'envoie de mail
$url = clone $GLOBALS['_SCRIPT_']['url'];
$url->addQueryString('module', 'wikini');
$url->addQueryString('action', 'maj_fichier');
$aso_donnees['url'] = $url->getUrl();
// Attribution des données pour remplir le squelette
$this->getRegistre()->set('squelette_donnees', $aso_donnees);
$this->setChrono('fin');
}
public function executerMajFichier()
{
// Initialisation des variables
$this->setChrono('debut');
$asso_donnees = array();
// Récupération des infos pour conpléter le squelette du courriel
if (isset($_POST['sc_chemin'])) {
$chemin = $_POST['sc_chemin'];
if (is_dir($chemin)) {
foreach (scandir($chemin) as $dossier) {
if (file_exists($fichier = $chemin.$dossier.DIRECTORY_SEPARATOR.'wakka.config.php')) {
$arrFile = file($fichier);
$handle = fopen($fichier, 'w');
if($handle != false){
// Set counters
$currentLine = 0;
$cntFile = count($arrFile);// Nombre de ligne
// Write contents, inserting $item as first item
while ($currentLine <= $cntFile){
if (isset($arrFile[$currentLine])) {
foreach ($_POST as $cle => $val) {
if ($val != '') {
if(preg_match('/"'.preg_replace('/^sc_/', '', $cle).'" =>/', $arrFile[$currentLine])) {
$arrFile[$currentLine] = preg_replace('/=> ".*"/', '=> "'.$val.'"', $arrFile[$currentLine]);
}
}
}
fwrite($handle, $arrFile[$currentLine]);
if (preg_match('/^\?>$/', $arrFile[$currentLine])) {
fclose($handle);
$currentLine = $cntFile;
}
}
$currentLine++;
}
} else {
trigger_error('Fichier '.$fichier.' impossible à ouvrir', E_USER_WARNING);
}
}
}
} else {
trigger_error('Le chemin suivant n\'est pas un dossier :'.$chemin, E_USER_WARNING);
}
}
// Attribution des données pour remplir le squelette
$this->getRegistre()->set('squelette_donnees', $asso_donnees);
$this->setChrono('fin');
 
// Nous ajoutons une action à éxecuter avant de rendre la main
$this->poursuivreVers('config_fichier');
}
public function executerSupprimerUtilisateur()
{
// Initialisation des variables
$this->setChrono('debut');
$aso_donnees = $this->getRegistre()->get('squelette_donnees');
// Gestion de l'url de l'envoie de mail
$url = clone $GLOBALS['_SCRIPT_']['url'];
$url->addQueryString('module', 'wikini');
$url->addQueryString('action', 'maj_utilisateur');
$aso_donnees['url'] = $url->getUrl();
// Attribution des données pour remplir le squelette
$this->getRegistre()->set('squelette_donnees', $aso_donnees);
$this->setChrono('fin');
}
public function executerMajUtilisateur()
{
// Initialisation des variables
$this->setChrono('debut');
$asso_donnees = array();
// Récupération des infos pour conpléter le squelette du courriel
if (isset($_POST['sc_chemin'])) {
$chemin = $_POST['sc_chemin'];
if (is_dir($chemin)) {
foreach (scandir($chemin) as $dossier) {
if (file_exists($fichier = $chemin.$dossier.DIRECTORY_SEPARATOR.'wakka.config.php')) {
}
if (file_exists($fichier = $chemin.$dossier.DIRECTORY_SEPARATOR.'wakka.config.php')) {
// Initialisation de variables
$wakka_config = array();
$requetes = array();
// Récupération de la config du wikini
$tab_fichier = file($fichier);
foreach ($tab_fichier as $ligne_num => $ligne) {
if(preg_match('/"(.*)"\s*=>\s*"(.*)"\s*,/', $ligne, $match)) {
//trigger_error(print_r($match, true), E_USER_NOTICE);
$wakka_config[$match[1]] = $match[2];
}
}
//trigger_error(print_r($wakka_config, true), E_USER_NOTICE);
if (isset($wakka_config['mysql_user']) && isset($wakka_config['mysql_password']) && isset($wakka_config['mysql_host']) && isset($wakka_config['mysql_database'])) {
// Connexion à la base de données
$dsn = 'mysql://'.$wakka_config['mysql_user'].':'.$wakka_config['mysql_password'].'@'.$wakka_config['mysql_host'].'/'.$wakka_config['mysql_database'];
$this->connexion = DB::connect($dsn, $this->bdd_options);
if (PEAR::isError($this->connexion)) {
$e = $this->connexion->getMessage();
trigger_error($e, E_USER_ERROR);
}
// Traitement de la chaine utilisateur
$tab_utilisateurs = explode(',', trim($_POST['sc_utilisateur']));
$chaine_utilisateur = '';
foreach ($tab_utilisateurs as $utilisateur) {
$chaine_utilisateur .= '"'.trim($utilisateur).'", ';
}
$chaine_utilisateur = trim($chaine_utilisateur, ', ');
// Suppression de l'utilisateur
$requete = 'DELETE FROM '.$wakka_config['table_prefix'].'users '.
'WHERE name IN ('.$chaine_utilisateur.')';
$requetes[] = $requete."\n";
$res = $this->connexion->query($requete);
if (PEAR::isError($res)) {
$requetes[] = $res->getMessage().$res->getDebugInfo();
trigger_error($res->getMessage().$res->getDebugInfo(), E_USER_WARNING);
}
// Stockage des requetes
if (count($requetes) > 0 ) {
$aso_donnees['wikinis'][] = array( 'dossier' => $dossier,
'nom' => $wakka_config['wakka_name'],
'version' => $wakka_config['wikini_version'],
'requetes' => $requetes);
}
} else {
trigger_error(print_r($wakka_config, true), E_USER_NOTICE);
}
}
}
} else {
trigger_error('Le chemin suivant n\'est pas un dossier :'.$chemin, E_USER_WARNING);
}
}
// Attribution des données pour remplir le squelette
$this->getRegistre()->set('squelette_donnees', $aso_donnees);
$this->setChrono('fin');
 
// Nous ajoutons une action à éxecuter avant de rendre la main
$this->poursuivreVers('supprimer_utilisateur');
}
public function executerConfigBdd()
{
// Initialisation des variables
$this->setChrono('debut');
$aso_donnees = $this->getRegistre()->get('squelette_donnees');
// Gestion de l'url de l'envoie de mail
$url = clone $GLOBALS['_SCRIPT_']['url'];
$url->addQueryString('module', 'wikini');
$url->addQueryString('action', 'maj_bdd');
$aso_donnees['url'] = $url->getUrl();
// Attribution des données pour remplir le squelette
$this->getRegistre()->set('squelette_donnees', $aso_donnees);
$this->setChrono('fin');
}
public function executerMajBdd()
{
// Initialisation des variables
$this->setChrono('debut');
$asso_donnees = array();
// Récupération des infos pour conpléter le squelette du courriel
if (isset($_POST['sc_chemin'])) {
$chemin = $_POST['sc_chemin'];
if (is_dir($chemin)) {
foreach (scandir($chemin) as $dossier) {
if (file_exists($fichier = $chemin.$dossier.DIRECTORY_SEPARATOR.'wakka.config.php')) {
}
if (file_exists($fichier = $chemin.$dossier.DIRECTORY_SEPARATOR.'wakka.config.php')) {
// Initialisation de variables
$wakka_config = array();
$requetes = array();
// Récupération de la config du wikini
$tab_fichier = file($fichier);
foreach ($tab_fichier as $ligne_num => $ligne) {
if(preg_match('/"(.*)"\s*=>\s*"(.*)"\s*,/', $ligne, $match)) {
//trigger_error(print_r($match, true), E_USER_NOTICE);
$wakka_config[$match[1]] = $match[2];
}
}
//trigger_error(print_r($wakka_config, true), E_USER_NOTICE);
if (isset($wakka_config['mysql_user']) && isset($wakka_config['mysql_password']) && isset($wakka_config['mysql_host']) && isset($wakka_config['mysql_database'])) {
// Connexion à la base de données
$dsn = 'mysql://'.$wakka_config['mysql_user'].':'.$wakka_config['mysql_password'].'@'.$wakka_config['mysql_host'].'/'.$wakka_config['mysql_database'];
$this->connexion = DB::connect($dsn, $this->bdd_options);
if (PEAR::isError($this->connexion)) {
$e = $this->connexion->getMessage();
trigger_error($e, E_USER_ERROR);
}
// Mise à jour des droits
$requete = 'UPDATE '.$wakka_config['table_prefix'].'acls '.
'SET list = "'.$wakka_config['default_write_acl'].'" '.
'WHERE privilege = "write" ';
$requetes[] = $requete."\n";
$res = $this->connexion->query($requete);
if (PEAR::isError($res)) {
$requetes[] = $res->getMessage().$res->getDebugInfo();
trigger_error($res->getMessage().$res->getDebugInfo(), E_USER_WARNING);
}
 
$requete = 'UPDATE '.$wakka_config['table_prefix'].'acls '.
'SET list = "'.$wakka_config['default_read_acl'].'" '.
'WHERE privilege = "read" ';
$requetes[] = $requete."\n";
$res = $this->connexion->query($requete);
if (PEAR::isError($res)) {
$requetes[] = $res->getMessage().$res->getDebugInfo();
trigger_error($res->getMessage().$res->getDebugInfo(), E_USER_WARNING);
}
 
$requete = 'UPDATE '.$wakka_config['table_prefix'].'acls '.
'SET list = "'.$wakka_config['default_comment_acl'].'" '.
'WHERE privilege = "comment" ';
$requetes[] = $requete."\n";
$res = $this->connexion->query($requete);
if (PEAR::isError($res)) {
$requetes[] = $res->getMessage().$res->getDebugInfo();
trigger_error($res->getMessage().$res->getDebugInfo(), E_USER_WARNING);
}
$requete = 'DELETE FROM '.$wakka_config['table_prefix'].'acls '.
'WHERE page_tag = "ParametresUtilisateur"';
$requetes[] = $requete."\n";
$res = $this->connexion->query($requete);
if (PEAR::isError($res)) {
$requetes[] = $res->getMessage().$res->getDebugInfo();
trigger_error($res->getMessage().$res->getDebugInfo(), E_USER_WARNING);
}
$requete = 'INSERT INTO '.$wakka_config['table_prefix'].'acls '.
'VALUES ("ParametresUtilisateur", "write", "*") ';
$requetes[] = $requete."\n";
$res = $this->connexion->query($requete);
if (PEAR::isError($res)) {
$requetes[] = $res->getMessage().$res->getDebugInfo();
trigger_error($res->getMessage().$res->getDebugInfo(), E_USER_WARNING);
}
// Stockage des requetes
if (count($requetes) > 0 ) {
$aso_donnees['wikinis'][] = array( 'dossier' => $dossier,
'nom' => $wakka_config['wakka_name'],
'version' => $wakka_config['wikini_version'],
'requetes' => $requetes);
}
} else {
trigger_error(print_r($wakka_config, true), E_USER_NOTICE);
}
}
}
} else {
trigger_error('Le chemin suivant n\'est pas un dossier :'.$chemin, E_USER_WARNING);
}
}
// Attribution des données pour remplir le squelette
$this->getRegistre()->set('squelette_donnees', $aso_donnees);
$this->setChrono('fin');
 
// Nous ajoutons une action à éxecuter avant de rendre la main
$this->poursuivreVers('config_bdd');
}
public function executerNettoyage()
{
// Initialisation des variables
$this->setChrono('debut');
$aso_donnees = array();
$res = $this->connexion->query('SHOW TABLES');
if (PEAR::isError($res)) {
die($res->getMessage());
}
$tab_tables = array();
$ligne = '';
while ($res->fetchInto($ligne)) {
$tab_tables[] = $ligne[0];
}
 
foreach ($tab_tables as $table) {
$requetes = array();
// Referrers
if (preg_match('/_referrers$/', $table)) {
$site_nbre = count($this->sites);
$site_0 = $this->sites[0];
$requete = 'DELETE FROM '.$table.' '.
'WHERE referrer NOT LIKE "'.$site_0.'%" ';
for ($i = 1; $i < $site_nbre; $i++) {
$requete .= 'AND referrer NOT LIKE "'.$this->sites[$i].'%" ';
}
$requetes[] = $requete."\n";
$res = $this->connexion->query($requete);
if (PEAR::isError($res)) {
die($res->getMessage());
}
}
 
// Pages : commentaires
if (preg_match('/_pages$/', $table)) {
$requete = 'SELECT tag FROM '.$table.' '.
'WHERE tag LIKE "Comment%" ';
$requetes[] = $requete."\n";
$aso_pages = $this->connexion->getAll($requete, null, DB_FETCHMODE_ASSOC);
if (PEAR::isError($aso_pages)) {
die($aso_pages->getMessage());
}
if (count($aso_pages) > 0) {
$tab_pages = array();
foreach ($aso_pages as $page) {
if (preg_match('/^Comment\d+$/', $page['tag'])){
$tab_pages[] = $page['tag'];
}
}
if (count($tab_pages) > 0) {
$requete = 'DELETE FROM '.$table.' '.
'WHERE tag IN ("'.implode('","', $tab_pages).'") ';
$requetes[] = $requete."\n";
$res = $this->connexion->query($requete);
if (PEAR::isError($res)) {
die($res->getMessage());
}
}
}
}
// ACLs : commentaires
if (preg_match('/_acls$/', $table)) {
$requete = 'DELETE FROM '.$table.' '.
'WHERE page_tag LIKE "Comment%" ';
$requetes[] = $requete."\n";
$res = $this->connexion->query($requete);
if (PEAR::isError($res)) {
die($res->getMessage());
}
$requete = 'UPDATE '.$table.' '.
'SET list = "+" '.
'WHERE privilege = "comment" ';
$requetes[] = $requete."\n";
$res = $this->connexion->query($requete);
if (PEAR::isError($res)) {
die($res->getMessage());
}
}
// Stockage des requetes
if (count($requetes) > 0 ) {
$aso_table['nom'] = $table;
$aso_table['requetes'] = $requetes;
$aso_donnees['tables'][] = $aso_table;
}
}
 
// Attribution des données pour remplir le squelette
$this->getRegistre()->set('squelette_donnees', $aso_donnees);
$this->setChrono('fin');
}
}
 
/* +--Fin du code ----------------------------------------------------------------------------------------+
*
* $Log: RecueilDeDonnees.class.php,v $
* Revision 1.5 2007-07-25 17:45:19 jp_milcent
* Corrections des champs obligatoires.
*
* Revision 1.4 2007-07-24 14:31:57 jp_milcent
* Ajout dans les fichiers de configuration de l'hôte smtp.
*
* Revision 1.3 2007-07-11 13:11:06 jp_milcent
* Ajout de la vérification des donnés du formulaire côté serveur.
*
* Revision 1.2 2007-07-10 16:47:30 jp_milcent
* Ajout de l'identification et améliorations diverses.
*
* Revision 1.1 2007-07-09 19:29:26 jp_milcent
* Ajout du module Recueil de données
*
* Revision 1.1 2007-07-09 15:45:59 jp_milcent
* Début ajout du module de Reccueil de Données.
*
*
* +-- Fin du code ----------------------------------------------------------------------------------------+
*/
?>