Subversion Repositories Applications.papyrus

<?php

//vim: set expandtab tabstop=4 shiftwidth=4: 
// +-----------------------------------------------------------------------------------------------+
// | PHP version 4.0                                                                               |
// +-----------------------------------------------------------------------------------------------+
// | Copyright (c) 1997, 1998, 1999, 2000, 2001 The PHP Group                                      |
// +-----------------------------------------------------------------------------------------------+
// | This source file is subject to version 2.0 of the PHP license,                                | 
// | that is bundled with this package in the file LICENSE, and is                                 |
// | available at through the world-wide-web at                                                    |
// | http://www.php.net/license/2_02.txt.                                                          |
// | If you did not receive a copy of the PHP license and are unable to                            |
// | obtain it through the world-wide-web, please send a note to                                   |
// | license@php.net so we can mail you a copy immediately.                                        |
// +-----------------------------------------------------------------------------------------------+
/**
*
*Fichier des fonctions du bottin
*
*@package bottin
//Auteur original :
*@author                Alexandre GRANIER <alexandre@tela-botanica.org.org>
//Autres auteurs :
*@copyright         Outils-reseaux 2006-2040
*@version           05 avril 2006
// +-----------------------------------------------------------------------------------------------+
//
// $Id: bottin.class.php,v 1.2 2007-05-25 14:31:24 alexandre_tb Exp $
// FICHIER : $RCSfile: bottin.class.php,v $
// AUTEUR    : $Author: alexandre_tb $
// VERSION : $Revision: 1.2 $
// DATE        : $Date: 2007-05-25 14:31:24 $
*/


// +------------------------------------------------------------------------------------------------------+
// |                                            ENTETE du PROGRAMME                                       |
// +------------------------------------------------------------------------------------------------------+

require_once PAP_CHEMIN_API_PEAR.'PEAR.php';


class lettresAlphabet extends PEAR {
        
        var $url;
        
        var $variable_lettre ;
        
        /**
     * Constructeur
     *
     * @param Net_URL un objet Net_URL
     * @param string $variable_lettre le nom de la variable $_GET qui sera place dans l URL
     * @return void
     * @access public
     */
        function lettresAlphabet($url, $variable_lettre = 'lettre') {
                $this->url = $url ;
                $this->variable_lettre = $variable_lettre ;     
        }
        
        /**
         * Renvoie le code HTML d une liste avec les lettres
         * 
         * @return string HTML
         * @access public
         */
        function toHMTL() {
                
                $res = '<ul class="liste_lettre">'."\n" ;
                for ($i = 65 ; $i <91 ; $i++) {
                        $this->url->addQueryString($this->variable_lettre, chr($i)) ;
                        $res .= "\t".'<li class="liste_lettre"><a class="lien_alphabet" '.
                                        'href="'.
                                        $this->url->getURL().'">';
                        $res .= chr($i) ;
                        $res .= '</a></li>'."\n";
                }
                $res .= '</ul>';
                return $res ;
        }       
}


class inscription extends PEAR {
        
        /**
     * Constructeur
     *
     *  
     * @return void
     * @access public
     */
        function inscription() {
                        
        }
        
        /**
         * Renvoie le code HTML d une liste avec les lettres
         * 
         * @global  Un pointeur vers une connexion de base de donnee $GLOBALS['ins_url']
         * @return array ['ic_param'] les parametres tels que dans la table inscription_config
         * @access public
         */
        function getConfig() {
                // Recuperation de la configuration
            $requete = 'select * from inscription_configuration';
            $resultat = $GLOBALS['ins_db']->query($requete);
            if (DB::isError($resultat)) return "Echec de la requete : $requete<br />".$resultat->getMessage() ;
                    if ($resultat->numRows() != 0) {
                    $ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC);
                    return $ligne;
            } else {
                return $this->raiseError('La table inscription_configuration est vide...');
            }
        }
        
        /**
         * Renvoi un tableau avec les informations de inscription_attente
         * 
         * @global  Un pointeur vers une connexion de base de donnee $GLOBALS['ins_db']
         * @return array Un tableau ['id'], ['nom'], ['prenom'] ... ou la chaine vide si il n'y a personne en attente
         * @access public
         */
        function getInscritEnAttenteModeration() {
                $requete = 'select * from inscription_attente';
                $resultat = $GLOBALS['ins_db']->query($requete);
                
                $tableau_inscrit = array();
                if (DB::isError($resultat)) return "Echec de la requete : $requete<br />".$resultat->getMessage() ;
                    if ($resultat->numRows() != 0) {
                            while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
                                    $donnees = unserialize (stripslashes($ligne->ia_donnees)) ;
                                    array_push ($tableau_inscrit, array_merge (array('id' => $ligne->ia_id_inscription, 'date' => $ligne->ia_date), $donnees));
                            }
                            return $tableau_inscrit;
                    } else {
                        return '';
                }
        }
        
        /** Renvoi le tableau des inscrits en attente
         * 
         * @global      $GLOBALS['ins_url'] un objet Net_URL avec l url courante
         * @param array Un tableau de tableau d inscrit avec ['id'],['nom'],['prenom'],['email'],['ville'],['date']
         * @return string Un tableau HTML
         */
         
         function getTableauEnAttente($tableau) {
                $html = '';
                
                $table = new HTML_Table();
                $table->addRow(array (INS_NOM, INS_EMAIL, INS_VILLE, INS_DATE_INS, INS_ACTION), '', 'TH');
                $GLOBALS['ins_url']->addQueryString(ANN_NOM_VARIABLE_ACTION, ANN_ACTION_VALIDER_INSCRIPTION);
                $action = '<a href="'.$GLOBALS['ins_url']->getURL().'">'.'</a>';
                foreach ($tableau as $demandeur) {
                        $table->addRow(array($demandeur['nom'].' '.$demandeur['prenom'], $demandeur['email'], $demandeur['ville'], $demandeur['date']));
                }
                return $table->toHTML();
         }
        
        /**
         * Renvoie un tableau avec les moderateurs de l inscription
         * ceux du champs ic_mail_moderateur
         * 
         * @return array Un tableau de mail de moderateur
         */
        function getModerateurs() {
                
        }
        /**
         * Insere une demande d inscription dans la table inscription_attente et 
         * envoi un mail aux moderateurs
         * 
         * @param       string  Un identifiant de session, soit genere aleatoirement soit venu de la tablea inscription_demande
         * @global array la globale $GLOBALS['ins_config']
         * @global mixed un pointeur vers une base de donnees $GLOBALS['ins_db']
         * @return string Un message a renvoye a l utilisateur indiquant que sa demande a ete prise en compte
         */
        function demandeInscriptionModere($valeurs) {
        // On stocke les informations dans un variable de session
            // On coupe l'identifiant de session pour ne prendre que les 8 premiers caractères
            // afin d'éviter d'obtenir une url trop longue
            $chaine = substr (session_id(), 0, 8) ;
            $requete_verif = 'select * from inscription_attente where ia_id_inscription="'.$chaine.'"' ;
            $resultat_verif = $GLOBALS['ins_db']->query ($requete_verif) ;
            if ($resultat_verif->numRows() != 0) {
                $requete_suppression = 'delete from inscription_attente where ia_id_inscription="'.$chaine.'"' ;
                $GLOBALS['ins_db']->query ($requete_suppression) ;
            }
            $requete = 'insert into inscription_attente set ia_id_inscription="'.$chaine.'", ia_donnees="'.
                        addslashes(serialize($valeurs)).'", ia_date=NOW()' ;
            $resultat = $GLOBALS['ins_db']->query ($requete) ;
            if (DB::isError ($resultat)) {
                echo ("Echec de la requete : $requete<br />".$resultat->getMessage()) ;
            }
            // On envoie un email aux moderateurs
            
            require_once PAP_CHEMIN_RACINE.'api/pear/HTML/Template/IT.php';
            $tpl = new HTML_Template_IT() ;
            // Le gabarit du mail est dans un template
            // template 3
            $url = $GLOBALS['ins_url']->getURL();
            $requete = 'select it_template from inscription_template where it_id_template=3'.
                                ' and it_i18n like "%'.INS_LANGUE_DEFAUT.'"' ;
            
            if (!$tpl -> setTemplate($GLOBALS['ins_db']->getOne ($requete))) {
                echo 'erreur' ; 
            }
                $tpl->setVariable('URL_INSCRIPTION', $url) ;
                $mails_moderateur = split ('/\n/', $GLOBALS['ins_config']['ic_mail_moderateur']);
                foreach ($mails_moderateur as $mail) {
                        mail ($mail, INS_MODERATION_SUJET, INS_NOUVELLE_INSCRIPTION_A_MODERE) ;
                }
            return INS_MESSAGE_EN_ATTENTE ;
        }
}
//-- Fin du code source    ------------------------------------------------------------
/*
* $Log: not supported by cvs2svn $
* Revision 1.1  2006/12/13 13:26:52  alexandre_tb
* version initiale
*
*/
?>