Rev 154 | Blame | Last modification | View Log | RSS feed
<?php/*vim: set expandtab tabstop=4 shiftwidth=4: */// +------------------------------------------------------------------------------------------------------+// | PHP version 4.1 |// +------------------------------------------------------------------------------------------------------+// | Copyright (C) 2004 Tela Botanica (accueil@tela-botanica.org) |// +------------------------------------------------------------------------------------------------------+// | This library is free software; you can redistribute it and/or |// | modify it under the terms of the GNU Lesser General Public |// | License as published by the Free Software Foundation; either |// | version 2.1 of the License, or (at your option) any later version. |// | |// | This library 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 |// | Lesser General Public License for more details. |// | |// | You should have received a copy of the GNU Lesser General Public |// | License along with this library; if not, write to the Free Software |// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |// +------------------------------------------------------------------------------------------------------+// CVS : $Id: bazar.fonct.php,v 1.57 2006-10-05 08:53:50 florian Exp $/**** Fonctions du module bazar***@package bazar//Auteur original :*@author Alexandre Granier <alexandre@tela-botanica.org>*@author Florian Schmitt <florian@ecole-et-nature.org>//Autres auteurs :*@copyright Tela-Botanica 2000-2004*@version $Revision: 1.57 $ $Date: 2006-10-05 08:53:50 $// +------------------------------------------------------------------------------------------------------+*/// +------------------------------------------------------------------------------------------------------+// | ENTETE du PROGRAMME |// +------------------------------------------------------------------------------------------------------+require_once PAP_CHEMIN_API_PEAR.'HTML/QuickForm.php' ;require_once PAP_CHEMIN_API_PEAR.'HTML/QuickForm/checkbox.php' ;require_once PAP_CHEMIN_API_PEAR.'HTML/QuickForm/textarea.php' ;require_once PAP_CHEMIN_API_PEAR.'HTML/Table.php' ;require_once 'bazar.fonct.formulaire.php';require_once 'bazar.fonct.rss.php';// +------------------------------------------------------------------------------------------------------+// | LISTE de FONCTIONS |// +------------------------------------------------------------------------------------------------------+/** niveau_droit() - Retourne le niveau de droit de l'utilisateur** @param integer Id de la nature d'offre pour connaitre les droits sur une rubrique* @param integer Id de la personne (par défaut la personne loguée)** @return string Retourne 'redacteur', 'administrateur', 'superadministrateur', ou 'aucun'*/function niveau_droit($id_nature_offre='0', $personne) {$requete = 'select bd_niveau_droit FROM bazar_droits WHERE bd_id_utilisateur='.$personne.' AND (bd_id_nature_offre="'.$id_nature_offre.'" OR bd_id_nature_offre=0)';$resultat = $GLOBALS['_BAZAR_']['db']->query ($requete) ;if (DB::isError($resultat)) {die ("Echec de la requete<br />".$resultat->getMessage()."<br />".$resultat->getDebugInfo()) ;}if ($resultat->numRows() != 0) {while ($ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC)) {if ($ligne['bd_niveau_droit']==0) return 'superadministrateur';if ($ligne['bd_niveau_droit']==1) return 'redacteur';if ($ligne['bd_niveau_droit']==2) return 'administrateur';}}else return 'aucun';}/** fiches_a_valider () - Renvoie les annonces restant à valider par un administrateur** @return string HTML*/function fiches_a_valider() {// Pour les administrateurs d'une rubrique, on affiche les fiches a valider de cette rubrique// On effectue une requete sur le bazar pour voir les fiches a administrer$res= '<h2>'.BAZ_ANNONCES_A_ADMINISTRER.'</h2><br />'."\n";$requete = 'SELECT * FROM bazar_fiche, bazar_nature WHERE bf_statut_fiche=0 AND bn_id_nature=bf_ce_nature AND bn_ce_id_menu='.$GLOBALS['_BAZAR_']['categorie_nature'].' ORDER BY bf_date_maj_fiche DESC' ;$resultat = $GLOBALS['_BAZAR_']['db']->query($requete) ;if (DB::isError($resultat)) {die ('Echec de la requete<br />'.$resultat->getMessage().'<br />'.$resultat->getDebugInfo()) ;}if ($resultat->numRows() != 0) {$tableAttr = array('id' => 'table_bazar') ;$table = new HTML_Table($tableAttr) ;$entete = array (BAZ_TITREANNONCE ,BAZ_ANNONCEUR, BAZ_TYPEANNONCE, BAZ_PUBLIER, BAZ_SUPPRIMER) ;$table->addRow($entete) ;$table->setRowType (0, 'th') ;// On affiche une ligne par propositionwhile ($ligne = $resultat->fetchRow (DB_FETCHMODE_ASSOC)) {//Requete pour trouver le nom et prénom de l'annonceur$requetenomprenom = 'SELECT '.BAZ_CHAMPS_PRENOM.', '.BAZ_CHAMPS_NOM.' FROM '.BAZ_ANNUAIRE.' WHERE '.BAZ_CHAMPS_ID.'='.$ligne['bf_ce_utilisateur'] ;$resultatnomprenom = $GLOBALS['_BAZAR_']['db']->query ($requetenomprenom) ;if (DB::isError($resultatnomprenom)) {echo ("Echec de la requete<br />".$resultatnomprenom->getMessage()."<br />".$resultatnomprenom->getDebugInfo()) ;}while ($lignenomprenom = $resultatnomprenom->fetchRow (DB_FETCHMODE_ASSOC)) {$annonceur=$lignenomprenom[BAZ_CHAMPS_PRENOM]." ".$lignenomprenom[BAZ_CHAMPS_NOM];}$lien_voir=$GLOBALS['_BAZAR_']['url'];$lien_voir->addQueryString('action', BAZ_VOIR_FICHE);$lien_voir->addQueryString('id_fiche', $ligne['bf_id_fiche']);$lien_voir->addQueryString('typeannonce', $ligne['bn_id_nature']);$lien_publie_oui=$GLOBALS['_BAZAR_']['url'];$lien_publie_oui->addQueryString('action', BAZ_ACTION_PUBLIER);$lien_publie_oui->addQueryString('id_fiche', $ligne['bf_id_fiche']);$lien_publie_oui->addQueryString('typeannonce', $ligne['bn_id_nature']);$lien_publie_non=$GLOBALS['_BAZAR_']['url'];$lien_publie_non->addQueryString('action', BAZ_ACTION_PAS_PUBLIER);$lien_publie_non->addQueryString('id_fiche', $ligne['bf_id_fiche']);$lien_publie_non->addQueryString('typeannonce', $ligne['bn_id_nature']);$lien_supprimer=$GLOBALS['_BAZAR_']['url'];$lien_supprimer->addQueryString('action', BAZ_ACTION_SUPPRESSION);$lien_supprimer->addQueryString('id_fiche', $ligne['bf_id_fiche']);$lien_supprimer->addQueryString('typeannonce', $ligne['bn_id_nature']);$table->addRow (array('<a href="'.$lien_voir->getURL().'">'.$ligne['bf_titre'].'</a>'."\n", // col 1 : le nom$annonceur."\n", // col 2 : annonceurconstant($ligne['bn_label_nature'])."\n", // col 3 : type annonce"<a href=\"".$lien_publie_oui->getURL()."\">".BAZ_OUI."</a> / \n"."<a href=\"".$lien_publie_non->getURL()."\">".BAZ_NON."</a>", // col 4 : publier ou pas"<a href=\"".$lien_supprimer->getURL()."\""." onclick=\"javascript:return confirm('".BAZ_CONFIRMATION_SUPPRESSION."');\">".BAZ_SUPPRIMER."</a>\n")) ; // col 5 : supprimer}$table->altRowAttributes(1, array("class" => "ligne_impaire"), array("class" => "ligne_paire"));$table->updateColAttributes(1, array("align" => "center"));$table->updateColAttributes(2, array("align" => "center"));$table->updateColAttributes(3, array("align" => "center"));$table->updateColAttributes(4, array("align" => "center"));$res .= $table->toHTML() ;}else {$res .= '<p class="zone_info">'.BAZ_PAS_DE_FICHE_A_VALIDER.'</p>'."\n" ;}$GLOBALS['_BAZAR_']['url']->addQueryString('action', BAZ_VOIR_TOUTES_ANNONCES);$res .= '<br /><ul style="clear:both;"><li><a href="'.$GLOBALS['_BAZAR_']['url']->getURL().'" title="'.BAZ_CONSULTER_FICHES_VALIDEES.'">'.BAZ_CONSULTER_FICHES_VALIDEES.'</a></li></ul>';$GLOBALS['_BAZAR_']['url']->removeQueryString('action');return $res;}/** mes_fiches () - Renvoie les fiches bazar d'un utilisateur** @return string HTML*/function mes_fiches() {$res= '<h2>'.BAZ_VOS_ANNONCES.'</h2><br />'."\n";if ($GLOBALS['AUTH']->getAuth()) {// requete pour voir si l'utilisateur a des fiches a son nom, classees par date de MAJ et nature d'annonce$requete = 'SELECT * FROM bazar_fiche, bazar_nature WHERE bf_ce_utilisateur='. $GLOBALS['id_user'].' AND bn_id_nature=bf_ce_nature AND bn_ce_id_menu='.$GLOBALS['_BAZAR_']['categorie_nature'].' ORDER BY bf_date_maj_fiche DESC,bf_ce_nature ASC';$resultat = $GLOBALS['_BAZAR_']['db']->query($requete) ;if (DB::isError($resultat)) {die ('Echec de la requete<br />'.$resultat->getMessage().'<br />'.$resultat->getDebugInfo()) ;}if ($resultat->numRows() != 0) {$tableAttr = array('id' => 'table_bazar') ;$table = new HTML_Table($tableAttr) ;$entete = array (BAZ_TITREANNONCE , BAZ_TYPEANNONCE, BAZ_ETATPUBLICATION, BAZ_MODIFIER, BAZ_SUPPRIMER) ;$table->addRow($entete) ;$table->setRowType (0, "th") ;// On affiche une ligne par propositionwhile ($ligne = $resultat->fetchRow (DB_FETCHMODE_ASSOC)) {if ($ligne['bf_statut_fiche']==1) $publiee=BAZ_PUBLIEE;elseif ($ligne['bf_statut_fiche']==0) $publiee=BAZ_ENCOURSDEVALIDATION;else $publiee=BAZ_REJETEE;$lien_voir=$GLOBALS['_BAZAR_']['url'];$lien_voir->addQueryString('action', BAZ_VOIR_FICHE);$lien_voir->addQueryString('id_fiche', $ligne['bf_id_fiche']);$lien_voir->addQueryString('typeannonce', $ligne['bn_id_nature']);$lien_voir_url=$lien_voir->getURL();$lien_modifier=$GLOBALS['_BAZAR_']['url'];$lien_modifier->addQueryString('action', BAZ_ACTION_MODIFIER);$lien_modifier->addQueryString('id_fiche', $ligne['bf_id_fiche']);$lien_modifier->addQueryString('typeannonce', $ligne['bn_id_nature']);$lien_modifier_url=$lien_modifier->getURL();$lien_supprimer=$GLOBALS['_BAZAR_']['url'];$lien_supprimer->addQueryString('action', BAZ_ACTION_SUPPRESSION);$lien_supprimer->addQueryString('id_fiche', $ligne['bf_id_fiche']);$lien_supprimer->addQueryString('typeannonce', $ligne['bn_id_nature']);$lien_supprimer_url=$lien_supprimer->getURL();$table->addRow (array('<a href="'.$lien_voir_url.'">'.$ligne['bf_titre'].'</a>'."\n", // col 1 : le nom$ligne['bn_label_nature']."\n", // col 2: type annonce$publiee."\n", // col 3 : publiee ou non'<a href="'.$lien_modifier_url.'">'.BAZ_MODIFIER.'</a>'."\n", // col 4 : modifier'<a href="'.$lien_supprimer_url.'" onclick="javascript:return '.'confirm(\''.BAZ_CONFIRMATION_SUPPRESSION.'\');" >'.BAZ_SUPPRIMER.'</a>'."\n")) ; // col 5 : supprimer}$table->altRowAttributes(1, array("class" => "ligne_impaire"), array("class" => "ligne_paire"));$table->updateColAttributes(1, array("align" => "left"));$table->updateColAttributes(2, array("align" => "center"));$table->updateColAttributes(3, array("align" => "center"));$table->updateColAttributes(4, array("align" => "center"));$res .= $table->toHTML() ;}else {$res .= '<p class="zone_info">'.BAZ_PAS_DE_FICHE.'</p>'."\n" ;}$GLOBALS['_BAZAR_']['url']->addQueryString('action', BAZ_DEPOSER_ANNONCE);$res .= '<br /><ul><li><a href="'.$GLOBALS['_BAZAR_']['url']->getURL().'" title="'.BAZ_SAISIR_UNE_NOUVELLE_FICHE.'">'.BAZ_SAISIR_UNE_NOUVELLE_FICHE.'</a></li></ul>';$GLOBALS['_BAZAR_']['url']->removeQueryString('action');}else {$res .= '<p class="zone_info">'.BAZ_IDENTIFIEZ_VOUS_POUR_SAISIR.'</p>'."\n" ;$res .= '<form id="form_connexion" style="clear:both;" class="form_identification" action="' ;$GLOBALS['_BAZAR_']['url']->addQueryString('action', BAZ_ACTION_VOIR_VOS_ANNONCES);$res .= $GLOBALS['_BAZAR_']['url']->getURL();$res .= '" method="post"><fieldset><legend>Identifiez vous</legend><label for="username">Courriel : </label><input type="text" id="username" name="username" maxlength="80" tabindex="1" value="courriel" /><label for="password">Mot de passe : </label><input type="password" id="password" name="password" maxlength="80" tabindex="2" value="mot de passe" /><input type="submit" id="connexion" name="connexion" tabindex="3" value="ok" /></fieldset></form>';}return $res;}/** baz_gestion_droits() interface de gestion des droits** return string le code HTML*/function baz_gestion_droits() {$lien_formulaire=$GLOBALS['_BAZAR_']['url'];$lien_formulaire->addQueryString('action', BAZ_GERER_DROITS);//contruction du squelette du formulaire$formtemplate = new HTML_QuickForm('formulaire', 'post', preg_replace ('/&/', '&', $lien_formulaire->getURL()) );$squelette =& $formtemplate->defaultRenderer();$squelette->setFormTemplate("\n".'<form {attributes}>'."\n".'<table style="border:0;">'."\n".'{content}'."\n".'</table>'."\n".'</form>'."\n");$squelette->setElementTemplate( '<tr>'."\n".'<td style="font-size:12px;width:150px;text-align:right;">'."\n".'{label} :</td>'."\n".'<td style="text-align:left;padding:5px;"> '."\n".'{element}'."\n".'<!-- BEGIN required --><span class="symbole_obligatoire">*</span><!-- END required -->'."\n".'<!-- BEGIN error --><span class="erreur">{error}</span><!-- END error -->'."\n".'</td>'."\n".'</tr>'."\n");$squelette->setElementTemplate( '<tr>'."\n".'<td colspan="2" class="liste_a_cocher"><strong>{label} {element}</strong>'."\n".'<!-- BEGIN required --><span class="symbole_obligatoire"> *</span><!-- END required -->'."\n".'</td>'."\n".'</tr>'."\n", 'accept_condition');$squelette->setElementTemplate( '<tr><td colspan="2" class="bouton">{label}{element}</td></tr>'."\n", 'valider');$squelette->setRequiredNoteTemplate("\n".'<tr>'."\n".'<td colspan="2" class="symbole_obligatoire">* {requiredNote}</td></tr>'."\n");//Traduction de champs requis$formtemplate->setRequiredNote(BAZ_CHAMPS_REQUIS) ;$formtemplate->setJsWarnings(BAZ_ERREUR_SAISIE,BAZ_VEUILLEZ_CORRIGER);//Initialisation de la variable personneif ( isset($_POST['personnes']) ) {$personne=$_POST['personnes'];}else $personne=0;//Cas ou les droits ont etes changesif (isset($_GET['pers'])) {$personne=$_GET['pers'];//CAS DES DROITS POUR UN TYPE D'ANNONCE: On efface tous les droits de la personne pour ce type d'annonceif (isset($_GET['idtypeannonce'])) {$requete = 'DELETE FROM bazar_droits WHERE bd_id_utilisateur='.$_GET['pers'].' AND bd_id_nature_offre='.$_GET['idtypeannonce'];$resultat = $GLOBALS['_BAZAR_']['db']->query($requete) ;if (DB::isError($resultat)) {die ($resultat->getMessage().$resultat->getDebugInfo()) ;}}//CAS DU SUPER ADMIN: On efface tous les droits de la personne en generalelse {$requete = 'DELETE FROM bazar_droits WHERE bd_id_utilisateur='.$_GET['pers'];$resultat = $GLOBALS['_BAZAR_']['db']->query($requete) ;if (DB::isError($resultat)) {die ($resultat->getMessage().$resultat->getDebugInfo()) ;}}if ($_GET['droits']=='superadmin') {$requete = 'INSERT INTO bazar_droits VALUES ('.$_GET['pers'].',0,0)';$resultat = $GLOBALS['_BAZAR_']['db']->query($requete) ;if (DB::isError($resultat)) {die ($resultat->getMessage().$resultat->getDebugInfo()) ;}}elseif ($_GET['droits']=='redacteur') {$requete = 'INSERT INTO bazar_droits VALUES ('.$_GET['pers'].','.$_GET['idtypeannonce'].',1)';$resultat = $GLOBALS['_BAZAR_']['db']->query($requete) ;if (DB::isError($resultat)) {die ($resultat->getMessage().$resultat->getDebugInfo()) ;}}elseif ($_GET['droits']=='admin') {$requete = 'INSERT INTO bazar_droits VALUES ('.$_GET['pers'].','.$_GET['idtypeannonce'].',2)';$resultat = $GLOBALS['_BAZAR_']['db']->query($requete) ;if (DB::isError($resultat)) {die ($resultat->getMessage().$resultat->getDebugInfo()) ;}}}//requete pour obtenir l'id, le nom et prenom des personnes inscrites a l'annuaire sauf soi meme$requete = 'SELECT '.BAZ_CHAMPS_ID.', '.BAZ_CHAMPS_NOM.', '.BAZ_CHAMPS_PRENOM.' FROM '.BAZ_ANNUAIRE.' WHERE '.BAZ_CHAMPS_ID."!=".$GLOBALS['id_user'].' ORDER BY '.BAZ_CHAMPS_NOM.' ASC';$resultat = $GLOBALS['_BAZAR_']['db']->query($requete) ;if (DB::isError($resultat)) {echo ($resultat->getMessage().$resultat->getDebugInfo()) ;}$res='<h2>'.BAZ_GESTION_DES_DROITS.'</h2><br />'."\n";$res.=BAZ_DESCRIPTION_GESTION_DES_DROITS.'<br /><br />'."\n";$personnes_select[0]=BAZ_SELECTION;while ($ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC)) {$personnes_select[$ligne[BAZ_CHAMPS_ID]] = $ligne[BAZ_CHAMPS_NOM]." ".$ligne[BAZ_CHAMPS_PRENOM] ;}$java=array ('style'=>'width:250px;','onchange'=>'this.form.submit();');$formtemplate->addElement ('select', 'personnes', BAZ_LABEL_CHOIX_PERSONNE, $personnes_select, $java) ;$defauts=array ('personnes'=>$personne);$formtemplate->setDefaults($defauts);$res.= $formtemplate->toHTML().'<br />'."\n" ;if ($personne!=0) {//cas du super utilisateur$utilisateur = new Utilisateur_bazar($personne) ;if ($utilisateur->isSuperAdmin()) {$res.= '<br />'.BAZ_EST_SUPERADMINISTRATEUR.'<br /><br />'."\n";$lien_enlever_superadmin=$GLOBALS['_BAZAR_']['url'];$lien_enlever_superadmin->addQueryString('action', BAZ_GERER_DROITS);$lien_enlever_superadmin->addQueryString('pers', $personne);$lien_enlever_superadmin->addQueryString('droits', 'aucun');$res.= '<a href='.$lien_enlever_superadmin->getURL().'>'.BAZ_CHANGER_SUPERADMINISTRATEUR.'</a><br />'."\n";}else {$lien_passer_superadmin=$GLOBALS['_BAZAR_']['url'];$lien_passer_superadmin->addQueryString('action', BAZ_GERER_DROITS);$lien_passer_superadmin->addQueryString('pers', $personne);$lien_passer_superadmin->addQueryString('droits', 'superadmin');$res.= '<a href='.$lien_passer_superadmin->getURL().'>'.BAZ_PASSER_SUPERADMINISTRATEUR.'</a><br />'."\n";//on cherche les differentes rubriques d'annonces$requete = 'SELECT bn_id_nature, bn_label_nature, bn_image_titre FROM bazar_nature';$resultat = $GLOBALS['_BAZAR_']['db']->query($requete) ;if (DB::isError($resultat)) {die ($resultat->getMessage().$resultat->getDebugInfo()) ;}$res.='<br /><b>'.BAZ_DROITS_PAR_TYPE.'</b><br /><br />';$table = new HTML_Table(array ('width' => '100%', 'class' => 'table_bazar')) ;$table->addRow(array ('<strong>'.BAZ_TYPE_ANNONCES.'</strong>','<strong>'.BAZ_DROITS_ACTUELS.'</strong>','<strong>'.BAZ_PASSER_EN.'</strong>','<strong>'.BAZ_OU_PASSER_EN.'</strong>')) ;$table->setRowType (0, 'th') ;while ($ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC)) {$droits=niveau_droit($ligne['bn_id_nature'],$personne);$lien_aucun_droit=$GLOBALS['_BAZAR_']['url'];$lien_aucun_droit->addQueryString('action', BAZ_GERER_DROITS);$lien_aucun_droit->addQueryString('pers', $personne);$lien_aucun_droit->addQueryString('droits', 'aucun');$lien_aucun_droit->addQueryString('idtypeannonce', $ligne["bn_id_nature"]);$lien_passer_redacteur=$GLOBALS['_BAZAR_']['url'];$lien_passer_redacteur->addQueryString('action', BAZ_GERER_DROITS);$lien_passer_redacteur->addQueryString('pers', $personne);$lien_passer_redacteur->addQueryString('droits', 'redacteur');$lien_passer_redacteur->addQueryString('idtypeannonce', $ligne["bn_id_nature"]);$lien_passer_admin=$GLOBALS['_BAZAR_']['url'];$lien_passer_admin->addQueryString('action', BAZ_GERER_DROITS);$lien_passer_admin->addQueryString('pers', $personne);$lien_passer_admin->addQueryString('droits', 'admin');$lien_passer_admin->addQueryString('idtypeannonce', $ligne["bn_id_nature"]);if (isset($ligne['bn_image_titre'])) {$titre=' <img src="client/bazar/images/'.$ligne['bn_image_titre'].'" alt="'.$ligne['bn_label_nature'].'" />'."\n";} else {$titre='<strong> '.$ligne['bn_label_nature'].'</strong>'."\n";}if ($utilisateur->isAdmin($ligne['bn_id_nature'])) {$table->addRow(array($titre,BAZ_DROIT_ADMIN,'<a href='.$lien_aucun_droit->getURL().'>'.BAZ_AUCUN_DROIT.'</a>','<a href='.$lien_passer_redacteur->getURL().'>'.BAZ_DROIT_REDACTEUR.'</a>'));}elseif ($utilisateur->isRedacteur($ligne['bn_id_nature'])) {$table->addRow(array($titre,BAZ_DROIT_REDACTEUR,'<a href='.$lien_aucun_droit->getURL().'>'.BAZ_AUCUN_DROIT.'</a>','<a href='.$lien_passer_admin->getURL().'>'.BAZ_DROIT_ADMIN.'</a>'));}else {$table->addRow(array($titre,BAZ_AUCUN_DROIT,'<a href='.$lien_passer_redacteur->getURL().'>'.BAZ_DROIT_REDACTEUR.'</a>','<a href='.$lien_passer_admin->getURL().'>'.BAZ_DROIT_ADMIN.'</a>'));}}$table->altRowAttributes(1, array('class' => 'ligne_impaire'), array('class' => 'ligne_paire'));$table->updateColAttributes(0, array('align' => 'left'));$table->updateColAttributes(1, array('align' => 'left'));$table->updateColAttributes(2, array('align' => 'left'));$table->updateColAttributes(3, array('align' => 'left'));$res.=$table->toHTML() ;}}return $res;}/** baz_formulaire() - Renvoie le menu pour les saisies et modification des annonces** @param string choix du formulaire a afficher (soit formulaire personnalise de* l'annonce, soit choix du type d'annonce)** @return string HTML*/function baz_formulaire($mode) {$res = '';if ($GLOBALS['AUTH']->getAuth()) {$lien_formulaire=$GLOBALS['_BAZAR_']['url'];//Definir le lien du formulaire en fonction du mode de formulaire choisiif ($mode == BAZ_DEPOSER_ANNONCE) {$lien_formulaire->addQueryString('action', BAZ_ACTION_NOUVEAU);if (isset($GLOBALS['_BAZAR_']['id_typeannonce']) && $GLOBALS['_BAZAR_']['id_typeannonce'] != 'toutes') {$mode = BAZ_ACTION_NOUVEAU ;}}if ($mode == BAZ_ACTION_NOUVEAU) {if ((!isset($_POST['accept_condition']))and($GLOBALS['_BAZAR_']['condition']!=NULL)) {$lien_formulaire->addQueryString('action', BAZ_ACTION_NOUVEAU);} else {$lien_formulaire->addQueryString('action', BAZ_ACTION_NOUVEAU_V);}}if ($mode == BAZ_ACTION_MODIFIER) {if (!isset($_POST['accept_condition'])and($GLOBALS['_BAZAR_']['condition']!=NULL)) {$lien_formulaire->addQueryString('action', BAZ_ACTION_MODIFIER);} else {$lien_formulaire->addQueryString('action', BAZ_ACTION_MODIFIER_V);}$lien_formulaire->addQueryString('id_fiche', $GLOBALS['_BAZAR_']['id_fiche']);}if ($mode == BAZ_ACTION_MODIFIER_V) {$lien_formulaire->addQueryString('action', BAZ_ACTION_MODIFIER_V);$lien_formulaire->addQueryString('id_fiche', $GLOBALS['_BAZAR_']['id_fiche']);}//contruction du squelette du formulaire$formtemplate = new HTML_QuickForm('formulaire', 'post', preg_replace ('/&/', '&', $lien_formulaire->getURL()) );$squelette =& $formtemplate->defaultRenderer();$squelette->setFormTemplate("\n".'<form {attributes}>'."\n".'<table style="border:0;width:100%;">'."\n".'{content}'."\n".'</table>'."\n".'</form>'."\n");$squelette->setElementTemplate( '<tr>'."\n".'<td style="font-size:12px;width:120px;text-align:right;">'."\n".'{label}'.'<!-- BEGIN required --><span class="symbole_obligatoire"> *</span><!-- END required -->'."\n".' :</td>'."\n".'<td style="text-align:left;padding:5px;"> '."\n".'{element}'."\n".'<!-- BEGIN error --><span class="erreur">{error}</span><!-- END error -->'."\n".'</td>'."\n".'</tr>'."\n");$squelette->setElementTemplate( '<tr>'."\n".'<td colspan="2" class="liste_a_cocher"><strong>{label} {element}</strong>'."\n".'<!-- BEGIN required --><span class="symbole_obligatoire"> *</span><!-- END required -->'."\n".'</td>'."\n".'</tr>'."\n", 'accept_condition');$squelette->setElementTemplate( '<tr><td colspan="2" class="bouton">{label}{element}</td></tr>'."\n", 'valider');$squelette->setRequiredNoteTemplate("\n".'<tr>'."\n".'<td colspan="2" class="symbole_obligatoire">* {requiredNote}</td></tr>'."\n");//Traduction de champs requis$formtemplate->setRequiredNote(BAZ_CHAMPS_REQUIS) ;$formtemplate->setJsWarnings(BAZ_ERREUR_SAISIE,BAZ_VEUILLEZ_CORRIGER);//------------------------------------------------------------------------------------------------//AFFICHAGE DU FORMULAIRE GENERAL DE CHOIX DU TYPE D'ANNONCE//------------------------------------------------------------------------------------------------if ($mode == BAZ_DEPOSER_ANNONCE) {$res = '';//requete pour obtenir le nom et la description des types d'annonce$requete = 'SELECT * FROM bazar_nature WHERE bn_ce_id_menu='.$GLOBALS['_BAZAR_']['categorie_nature'].' ORDER BY bn_label_nature ASC';$resultat = $GLOBALS['_BAZAR_']['db']->query($requete) ;if (DB::isError($resultat)) {die ($resultat->getMessage().$resultat->getDebugInfo()) ;}$res.='<h2>'.BAZ_DEPOSE_UNE_NOUVELLE_ANNONCE.'</h2>'."\n";if ($resultat->numRows()==1) {$ligne = $resultat->fetchRow (DB_FETCHMODE_ASSOC);$GLOBALS['_BAZAR_']['id_typeannonce']=$ligne['bn_id_nature'];$GLOBALS['_BAZAR_']['typeannonce']=$ligne['bn_label_nature'];$GLOBALS['_BAZAR_']['condition']=$ligne['bn_condition'];$GLOBALS['_BAZAR_']['template']=$ligne['bn_template'];$GLOBALS['_BAZAR_']['commentaire']=$ligne['bn_commentaire'];$GLOBALS['_BAZAR_']['appropriation']=$ligne['bn_appropriation'];$GLOBALS['_BAZAR_']['image_titre']=$ligne['bn_image_titre'];$GLOBALS['_BAZAR_']['image_logo']=$ligne['bn_image_logo'];$mode = BAZ_ACTION_NOUVEAU;$lien_formulaire->addQueryString('action', BAZ_ACTION_NOUVEAU_V);} else {$res.='<br />'.BAZ_CHOIX_TYPEANNONCE.'<br /><br />'."\n";while ($ligne = $resultat->fetchRow (DB_FETCHMODE_ASSOC)) {$droitspers=niveau_droit($ligne["bn_id_nature"],$GLOBALS["id_user"]);if (($droitspers=='redacteur') or ($droitspers=='administrateur')or ($droitspers=='superadministrateur' or !BAZ_RESTREINDRE_DEPOT)) {if ($ligne['bn_image_titre']!='') {$titre=' <img src="client/bazar/images/'.$ligne['bn_image_titre'].'" alt="'.$ligne['bn_label_nature'].'" />'.'<br />'."\n";} else {$titre='<h3>'.$ligne['bn_label_nature'].' : </h3>'."\n";}$formtemplate->addElement('radio', 'typeannonce', '',$titre.$ligne['bn_description'].'<br /><br />'."\n",$ligne['bn_id_nature'], array("id" => 'select'.$ligne['bn_id_nature'],"style" => 'float:left;'));}}$squelette->setElementTemplate( '<div class="listechoix">'."\n".'{element}'."\n".'</div>'."\n");//Mettre les annonces en choix par defaut$formtemplate->setdefaults(array('typeannonce'=>'1'));//Bouton de validation du formulaire$formtemplate->addElement('submit', 'valider', BAZ_VALIDER);//Affichage a l'ecran$res.= $formtemplate->toHTML()."\n".'<br />'."\n".mes_fiches(); ;}}//------------------------------------------------------------------------------------------------//AFFICHAGE DU FORMULAIRE CORRESPONDANT AU TYPE DE L'ANNONCE CHOISI PAR L'UTILISATEUR//------------------------------------------------------------------------------------------------if ($mode == BAZ_ACTION_NOUVEAU) {unset ($_SESSION['formulaire_annonce_valide']) ;$lien_formulaire->addQueryString('action', BAZ_ACTION_NOUVEAU_V);$formtemplate->updateAttributes(array('action' => str_replace('&', '&', $lien_formulaire->getURL())));$res = baz_afficher_formulaire_annonce('insertion',$formtemplate);}//------------------------------------------------------------------------------------------------//CAS DE LA MODIFICATION D'UNE ANNONCE (FORMULAIRE DE MODIFICATION)//------------------------------------------------------------------------------------------------if ($mode == BAZ_ACTION_MODIFIER) {$res=baz_afficher_formulaire_annonce('modification',$formtemplate);}//------------------------------------------------------------------------------------------------//CAS DE L'INSCRIPTION D'UNE ANNONCE//------------------------------------------------------------------------------------------------if ($mode == BAZ_ACTION_NOUVEAU_V) {if ($formtemplate->validate() && !isset($_SESSION['formulaire_annonce_valide'])) {$formtemplate->process('baz_insertion', false) ;$_SESSION['formulaire_annonce_valide'] = 1;return;}}//------------------------------------------------------------------------------------------------//CAS DE LA MODIFICATION D'UNE ANNONCE (VALIDATION ET MAJ)//------------------------------------------------------------------------------------------------if ($mode == BAZ_ACTION_MODIFIER_V) {if ($formtemplate->validate()) {$formtemplate->process('baz_mise_a_jour', false) ;return ;}}}else {$res .= '<h2>'.BAZ_DEPOSE_UNE_NOUVELLE_ANNONCE.'</h2><br />'."\n";$res .= '<p class="zone_info">'.BAZ_IDENTIFIEZ_VOUS_POUR_SAISIR.'</p>'."\n" ;$res .= '<form id="form_connexion" style="clear:both;" class="form_identification" action="' ;$GLOBALS['_BAZAR_']['url']->addQueryString('action', BAZ_DEPOSER_ANNONCE);$res .= $GLOBALS['_BAZAR_']['url']->getURL();$res .= '" method="post"><fieldset><legend>Identifiez vous</legend><label for="username">Courriel : </label><input type="text" id="username" name="username" maxlength="80" tabindex="1" value="courriel" /><label for="password">Mot de passe : </label><input type="password" id="password" name="password" maxlength="80" tabindex="2" value="mot de passe" /><input type="submit" id="connexion" name="connexion" tabindex="3" value="ok" /></fieldset></form>';}return $res;}/** baz_afficher_formulaire_annonce() - Genere le formulaire de saisie d'une annonce** @param string type de formulaire: insertion ou modification* @param mixed objet quickform du formulaire** @return string code HTML avec formulaire*/function baz_afficher_formulaire_annonce($mode='insertion',$formtemplate) {if ($mode=='modification') {//initialisation de la variable globale id_fiche$GLOBALS['_BAZAR_']['id_fiche'] = $_REQUEST['id_fiche'];//suppression eventuelle d'une url, d'un fichier ou d'une imageif (isset($_GET['id_url'])) {baz_suppression_url($_GET['id_url']);}if (isset($_GET['id_fichier'])) {baz_suppression_fichier($_GET['id_fichier']);}if (isset($_GET['image'])) {baz_suppression_image($GLOBALS['_BAZAR_']['id_fiche']);}}//titre de la rubrique$res= '<h2>'.BAZ_TITRE_SAISIE_ANNONCE.' '.$GLOBALS['_BAZAR_']['typeannonce'].'</h2><br />'."\n";if (($GLOBALS['_BAZAR_']['condition']!='')AND(!isset($_POST['accept_condition']))AND(!isset($_GET['url'])OR(!isset($_GET['fichier']))OR(!isset($_GET['image'])))) {require_once PAP_CHEMIN_API_PEAR.'HTML/QuickForm/html.php';$conditions= new HTML_QuickForm_html('<tr><td colspan="2" style="padding:5px; margin:5px; width: 90%; background: #C1CBA7;">'.$GLOBALS['_BAZAR_']['condition'].'</td>'."\n".'</tr>'."\n");$formtemplate->addElement($conditions);$formtemplate->addElement('checkbox', 'accept_condition',BAZ_ACCEPTE_CONDITIONS) ;$formtemplate->addElement('hidden', 'typeannonce', $GLOBALS['_BAZAR_']['id_typeannonce']);$formtemplate->addRule('accept_condition', BAZ_ACCEPTE_CONDITIONS_REQUIS, 'required', '', 'client') ;$formtemplate->addElement('submit', 'valider', BAZ_VALIDER);}//affichage du formulaire si conditions accepteeselse {//Parcours du fichier de templates, pour mettre les valeurs des champs$tableau=baz_valeurs_template($GLOBALS['_BAZAR_']['template']);if ($mode=='modification') {//Ajout des valeurs par defaut$valeurs_par_defaut = baz_valeurs_fiche($GLOBALS['_BAZAR_']['id_fiche']) ;for ($i=0; $i<count($tableau); $i++) {if ( $tableau[$i]['type']=='liste' || $tableau[$i]['type']=='checkbox' ) {$def=$tableau[$i]['type'].$tableau[$i]['nom_bdd'];}elseif ( $tableau[$i]['type']=='texte' || $tableau[$i]['type']=='textelong' || $tableau[$i]['type']=='listedatedeb' || $tableau[$i]['type']=='listedatefin' ) {$def=$tableau[$i]['nom_bdd'];}$tableau[$i]['type']($formtemplate, $tableau[$i]['nom_bdd'], $tableau[$i]['label'], $tableau[$i]['limite1'],$tableau[$i]['limite2'], $valeurs_par_defaut[$def], $tableau[$i]['table_source'], $tableau[$i]['obligatoire']) ;}}else {for ($i=0; $i<count($tableau); $i++) {$tableau[$i]['type']($formtemplate, $tableau[$i]['nom_bdd'], $tableau[$i]['label'], $tableau[$i]['limite1'],$tableau[$i]['limite2'], $tableau[$i]['defaut'], $tableau[$i]['table_source'], $tableau[$i]['obligatoire']) ;}}$formtemplate->addElement('hidden', 'typeannonce', $GLOBALS['_BAZAR_']['id_typeannonce']);$formtemplate->addElement('submit', 'valider', BAZ_VALIDER);}//Affichage a l'ecran$res .= $formtemplate->toHTML()."\n";return $res;}/** requete_bazar_fiche() - preparer la requete d'insertion ou de MAJ de la table bazar_fiche à partir du fichier de template** @global mixed L'objet contenant les valeurs issues de la saisie du formulaire* @return void*/function requete_bazar_fiche($valeur) {$requete=NULL;//l'annonce est directement publiée pour les adminsif ((niveau_droit($GLOBALS['_BAZAR_']['id_typeannonce'],$GLOBALS['id_user'])=='administrateur') or(niveau_droit($GLOBALS['_BAZAR_']['id_typeannonce'],$GLOBALS['id_user'])=='superadministrateur')) {$requete.='bf_statut_fiche=1, ';}else {$requete.='bf_statut_fiche="'.BAZ_ETAT_VALIDATION.'", ';}$tableau=baz_valeurs_template($GLOBALS['_BAZAR_']['template']);for ($i=0; $i<count($tableau); $i++) {//cas des checkbox et des listesif ($tableau[$i]['type']=='checkbox' || $tableau[$i]['type']=='liste') {//on supprime les anciennes valeurs de la table bazar_fiche_valeur_liste$requetesuppression='DELETE FROM bazar_fiche_valeur_liste WHERE bfvl_ce_fiche='.$GLOBALS['_BAZAR_']['id_fiche'].' AND bfvl_ce_liste='.$tableau[$i]['nom_bdd'];$resultat = $GLOBALS['_BAZAR_']['db']->query($requetesuppression) ;if (DB::isError($resultat)) {die ($resultat->getMessage().$resultat->getDebugInfo()) ;}if (isset($valeur[$tableau[$i]['type'].$tableau[$i]['nom_bdd']]) && ($valeur[$tableau[$i]['type'].$tableau[$i]['nom_bdd']]!=0)) {//on insere les nouvelles valeurs$requeteinsertion='INSERT INTO bazar_fiche_valeur_liste (bfvl_ce_fiche, bfvl_ce_liste, bfvl_valeur) VALUES ';//pour les checkbox, les différentes valeurs sont dans un tableauif (is_array($valeur[$tableau[$i]['type'].$tableau[$i]['nom_bdd']])) {$nb=0;while (list($cle, $val) = each($valeur[$tableau[$i]['type'].$tableau[$i]['nom_bdd']])) {if ($nb>0) $requeteinsertion .= ', ';$requeteinsertion .= '('.$GLOBALS['_BAZAR_']['id_fiche'].', '.$tableau[$i]['nom_bdd'].', '.$cle.') ';$nb++;}}//pour les listes, une insertion de la valeur suffitelse {$requeteinsertion .= '('.$GLOBALS['_BAZAR_']['id_fiche'].', '.$tableau[$i]['nom_bdd'].', '.$valeur[$tableau[$i]['type'].$tableau[$i]['nom_bdd']].')';}$resultat = $GLOBALS['_BAZAR_']['db']->query($requeteinsertion) ;if (DB::isError($resultat)) {die ($resultat->getMessage().$resultat->getDebugInfo()) ;}}}//cas des fichierselseif ($tableau[$i]['type']=='fichier') {if (isset($valeur['texte_fichier'.$tableau[$i]['nom_bdd']]) && $valeur['texte_fichier'.$tableau[$i]['nom_bdd']]!='') {baz_insertion_fichier($valeur['texte_fichier'.$tableau[$i]['nom_bdd']], $GLOBALS['_BAZAR_']['id_fiche'], 'fichier'.$tableau[$i]['nom_bdd']);}}//cas des urlselseif ($tableau[$i]['type']=='url') {if (isset($valeur['url_lien'.$tableau[$i]['nom_bdd']]) && $valeur['url_lien'.$tableau[$i]['nom_bdd']]!='' ) {baz_insertion_url($valeur['url_lien'.$tableau[$i]['nom_bdd']], $valeur['url_texte'.$tableau[$i]['nom_bdd']], $GLOBALS['_BAZAR_']['id_fiche']);}}//cas des imageselseif ($tableau[$i]['type']=='image') {if (isset($_FILES['image']['name']) && $_FILES['image']['name']!='') {$requete .= baz_insertion_image($GLOBALS['_BAZAR_']['id_fiche']);}}//cas des dateselseif ( $tableau[$i]['type']=='listedatedeb' || $tableau[$i]['type']=='listedatefin' ) {$val=$valeur[$tableau[$i]['nom_bdd']]['Y'].'-'.$valeur[$tableau[$i]['nom_bdd']]['m'].'-'.$valeur[$tableau[$i]['nom_bdd']]['d'] ;$requete .= $tableau[$i]['nom_bdd'].'="'.$val.'", ' ;}//cas des champs texteelseif ( $tableau[$i]['type']=='texte' || $tableau[$i]['type']=='textelong' ) {//on mets les slashes pour les saisies dans les champs texte et textearea$val=addslashes($valeur[$tableau[$i]['nom_bdd']]) ;$requete .= $tableau[$i]['nom_bdd'].'="'.$val.'", ' ;}//cas des wikiniselseif ( $tableau[$i]['type']=='wikini' && $_REQUEST['action']==BAZ_ACTION_NOUVEAU_V ) {//on appelle les pages des apis et de l'integrateur wikiniinclude_once PAP_CHEMIN_RACINE.'api/sql/SQL_manipulation.fonct.php';include_once PAP_CHEMIN_RACINE.'client/integrateur_wikini/configuration/adwi_configuration.inc.php' ;include_once PAP_CHEMIN_RACINE.'client/integrateur_wikini/bibliotheque/adwi_wikini.fonct.php' ;//génération du titre du wiki, sous la forme id-titre du projet$titre=baz_titre_wiki($valeur["bf_titre"]);//création du wiki$valeur=array ("action"=> "nouveau_v", "code_alpha_wikini"=>$titre, "page"=>"AccueiL", "bdd_hote"=> "","bdd_nom"=> "", "bdd_utilisateur"=> "", "bdd_mdp" => "", "table_prefix"=> "", "chemin" => "wikini/".$titre, "valider"=> "Valider");$val = insertion($valeur, $GLOBALS['_BAZAR_']['db']);}}$requete.=' bf_date_maj_fiche=NOW()';return $requete;}/** baz_insertion() - inserer une nouvelle fiche** @array Le tableau des valeurs a inserer* @integer Valeur de l'identifiant de la fiche* @return void*/function baz_insertion($valeur) {// =========== Insertion d'une nouvelle fiche ===================//requete d'insertion dans bazar_fiche$GLOBALS['_BAZAR_']['id_fiche'] = baz_nextid('bazar_fiche', 'bf_id_fiche', $GLOBALS['_BAZAR_']['db']) ;$requete = 'INSERT INTO bazar_fiche SET bf_id_fiche='.$GLOBALS['_BAZAR_']['id_fiche'].','.'bf_ce_utilisateur='.$GLOBALS['id_user'].', bf_ce_nature='.$GLOBALS['_BAZAR_']['id_typeannonce'].','.'bf_date_creation_fiche=NOW(),';if ($GLOBALS['_BAZAR_']['appropriation']== 1) {$requete .= 'bf_date_debut_validite_fiche=now(), ' ;}$requete .=requete_bazar_fiche(&$valeur) ;$resultat = $GLOBALS['_BAZAR_']['db']->query($requete) ;if (DB::isError($resultat)) {die ($resultat->getMessage().$resultat->getDebugInfo()) ;}return;}/** baz_insertion_url() - inserer un lien URL a une fiche** @global string L'url du lien* @global string Le texte du lien* @global integer L'identifiant de la fiche* @return void*/function baz_insertion_url($url_lien, $url_texte, $idfiche) {//requete d'insertion dans bazar_url$id_url = baz_nextId('bazar_url', 'bu_id_url', $GLOBALS['_BAZAR_']['db']) ;$requete = 'INSERT INTO bazar_url SET bu_id_url='.$id_url.', bu_ce_fiche='.$idfiche.', '.'bu_url="'.$url_lien.'", bu_descriptif_url="'.addslashes($url_texte).'"';$resultat = $GLOBALS['_BAZAR_']['db']->query($requete) ;if (DB::isError($resultat)) {die ($resultat->getMessage().$resultat->getDebugInfo()) ;}return;}/** baz_insertion_fichier() - inserer un fichier a une fiche** @global string Le label du fichier* @global string La description du fichier* @global integer L'identifiant de la fiche* @return void*/function baz_insertion_fichier($fichier_description, $idfiche, $nom_fichier='fichier_joint') {//verification de la presence de ce fichier$requete = 'SELECT bfj_id_fichier FROM bazar_fichier_joint WHERE bfj_fichier="'.$_FILES[$nom_fichier]['name'].'"';$resultat = $GLOBALS['_BAZAR_']['db']->query($requete) ;if (DB::isError($resultat)) {die ($resultat->getMessage().$resultat->getDebugInfo()) ;}if ($resultat->numRows()==0) {$chemin_destination=BAZ_CHEMIN_APPLI.'upload/'.$_FILES[$nom_fichier]['name'];move_uploaded_file($_FILES[$nom_fichier]['tmp_name'], $chemin_destination);}$id_fichier_joint = baz_nextId('bazar_fichier_joint', 'bfj_id_fichier', $GLOBALS['_BAZAR_']['db']) ;$requete = 'INSERT INTO bazar_fichier_joint SET bfj_id_fichier='.$id_fichier_joint.', bfj_ce_fiche='.$idfiche.', bfj_description="'.addslashes($fichier_description).'", bfj_fichier="'.$_FILES[$nom_fichier]['name'].'"';$resultat = $GLOBALS['_BAZAR_']['db']->query($requete) ;if (DB::isError($resultat)) {die ($resultat->getMessage().$resultat->getDebugInfo()) ;}return;}/** baz_insertion_image() - inserer une image a une fiche** @global integer L'identifiant de la fiche* @return string requete SQL*/function baz_insertion_image($idfiche) {//verification de la presence de ce fichier$requete = 'SELECT bf_id_fiche FROM bazar_fiche WHERE bf_url_image="'.$_FILES['image']['name'].'" AND bf_id_fiche!='.$idfiche;$resultat = $GLOBALS['_BAZAR_']['db']->query($requete) ;if (DB::isError($resultat)) {die ($resultat->getMessage().$resultat->getDebugInfo()) ;}if ($resultat->numRows()==0) {$chemin_destination=BAZ_CHEMIN_APPLI.'upload/'.$_FILES['image']['name'];move_uploaded_file($_FILES['image']['tmp_name'], $chemin_destination);}return 'bf_url_image="'.$_FILES['image']['name'].'", ' ;}/** baz_mise_a_jour() - Mettre a jour une fiche** @global Le contenu du formulaire de saisie de l'annonce* @return void*/function baz_mise_a_jour($valeur) {//MAJ de bazar_fiche$requete = 'UPDATE bazar_fiche SET '.requete_bazar_fiche(&$valeur,$GLOBALS['_BAZAR_']['id_typeannonce']);$requete.= ' WHERE bf_id_fiche='.$GLOBALS['_BAZAR_']['id_fiche'];$resultat = $GLOBALS['_BAZAR_']['db']->query($requete) ;if (DB::isError($resultat)) {die ($resultat->getMessage().$resultat->getDebugInfo()) ;}return;}/** baz_suppression() - Supprime une fiche** @global L'identifiant de la fiche a supprimer* @return void*/function baz_suppression() {$valeurs=baz_valeurs_fiche($_GET['id_fiche']);//suppression des wikinis associes//génération du titre du wiki, sous la forme id-titre du projet$titre=baz_titre_wiki($valeurs["bf_titre"]);$requete = 'SELECT gewi_id_wikini FROM gen_wikini WHERE gewi_code_alpha_wikini = "'.$titre.'"';$resultat = $GLOBALS['_BAZAR_']['db']->query($requete) ;if ($resultat->numRows()>0) {while ($ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC)) {$id_wikini=$ligne['gewi_id_wikini'];}include_once PAP_CHEMIN_RACINE.'api/sql/SQL_manipulation.fonct.php';include_once PAP_CHEMIN_RACINE.'client/integrateur_wikini/configuration/adwi_configuration.inc.php' ;include_once PAP_CHEMIN_RACINE.'client/integrateur_wikini/bibliotheque/adwi_wikini.fonct.php' ;adwi_supprimer_wikini($id_wikini, $GLOBALS['_BAZAR_']['db']);}// suppression des valeurs des listes et des cases à cocher$requete = 'DELETE FROM bazar_fiche_valeur_liste WHERE bfvl_ce_fiche='.$_GET['id_fiche'];$resultat = $GLOBALS['_BAZAR_']['db']->query($requete) ;if (DB::isError($resultat)) {die ($resultat->getMessage().$resultat->getDebugInfo()) ;}//suppression des urls associes$requete = 'SELECT bu_id_url FROM bazar_url WHERE bu_ce_fiche = '.$_GET['id_fiche'];$resultat = $GLOBALS['_BAZAR_']['db']->query($requete) ;if (DB::isError($resultat)) {die ('Echec de la requete<br />'.$resultat->getMessage().'<br />'.$resultat->getDebugInfo().'<br />'."\n") ;}while ($ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC)) {baz_suppression_url($ligne['bu_id_url']);}//suppression des fichiers associes$requete = 'SELECT bfj_id_fichier FROM bazar_fichier_joint WHERE bfj_ce_fiche = '.$_GET['id_fiche'];$resultat = $GLOBALS['_BAZAR_']['db']->query($requete) ;if (DB::isError($resultat)) {die ('Echec de la requete<br />'.$resultat->getMessage().'<br />'.$resultat->getDebugInfo().'<br />'."\n") ;}while ($ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC)) {baz_suppression_fichier($ligne['bfj_id_fichier']);}//suppression dans bazar_fiche$requete = 'DELETE FROM bazar_fiche WHERE bf_id_fiche = '.$_GET['id_fiche'];$resultat = $GLOBALS['_BAZAR_']['db']->query($requete) ;if (DB::isError($resultat)) {die ('Echec de la requete<br />'.$resultat->getMessage().'<br />'.$resultat->getDebugInfo().'<br />'."\n") ;}return ;}/** baz_suppression_url() - Supprimer un lien d'une fiche** @global integer L'identifiant du lien* @return void*/function baz_suppression_url($id_url) {//suppression dans bazar_url$requete = 'DELETE FROM bazar_url WHERE bu_id_url = '.$id_url;$resultat = $GLOBALS['_BAZAR_']['db']->query($requete) ;if (DB::isError($resultat)) {die ('Echec de la requete<br />'.$resultat->getMessage().'<br />'.$resultat->getDebugInfo()) ;}return;}/** baz_suppression_fichier() - Supprimer un fichier d'une fiche** @global integer L'identifiant du fichier* @return void*/function baz_suppression_fichier($id_fichier) {//verification de l'utilisation du fichier joint pour une autre annonce$requete = 'SELECT bfj_fichier FROM bazar_fichier_joint WHERE bfj_id_fichier='.$id_fichier;$resultat = $GLOBALS['_BAZAR_']['db']->query($requete) ;$ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC);$requete = 'SELECT bfj_fichier FROM bazar_fichier_joint WHERE bfj_fichier="'.$ligne['bfj_fichier'].'"';$resultat = $GLOBALS['_BAZAR_']['db']->query($requete) ;//si le fichier n'est que utilise dans cette fiche, on le supprime, on le laisse sinonif ($resultat->numRows()==1) {$ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC);unlink(BAZ_CHEMIN_APPLI.'upload/'.$ligne['bfj_fichier']);}//suppression dans la table bazar_fichier$requete = 'DELETE FROM bazar_fichier_joint WHERE bfj_id_fichier = '.$id_fichier;$resultat = $GLOBALS['_BAZAR_']['db']->query($requete) ;if (DB::isError($resultat)) {die ('Echec de la requete<br />'.$resultat->getMessage().'<br />'.$resultat->getDebugInfo()) ;}return;}/** baz_suppression_image() - Supprimer une image d'une fiche** @global integer L'identifiant de la fiche* @return void*/function baz_suppression_image($id_fiche) {//verification de l'utilisation de l'image pour une autre annonce$requete = 'SELECT bf_url_image FROM bazar_fiche WHERE bf_id_fiche='.$id_fiche;$resultat = $GLOBALS['_BAZAR_']['db']->query($requete) ;$ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC);$requete = 'SELECT bf_url_image FROM bazar_fiche WHERE bf_url_image="'.$ligne['bf_url_image'].'"';$resultat = $GLOBALS['_BAZAR_']['db']->query($requete) ;//si le fichier n'est que utilise dans cette fiche, on le supprime, on le laisse sinonif ($resultat->numRows()==1) {$ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC);unlink(BAZ_CHEMIN_APPLI.'upload/'.$ligne['bf_url_image']);}//suppression dans la table bazar_fiche$requete = 'UPDATE bazar_fiche SET bf_url_image=NULL WHERE bf_id_fiche = '.$id_fiche;$resultat = $GLOBALS['_BAZAR_']['db']->query($requete) ;if (DB::isError($resultat)) {die ('Echec de la requete<br />'.$resultat->getMessage().'<br />'.$resultat->getDebugInfo()) ;}return;}/** publier_fiche () - Publie ou non dans les fichiers XML la fiche bazar d'un utilisateur** @global boolean Valide: oui ou non* @return void*/function publier_fiche($valid) {if (isset($_GET['id_fiche'])) $GLOBALS['_BAZAR_']['id_fiche']=$_GET['id_fiche'];if (isset($_GET['typeannonce'])) $typeannonce=$_GET['typeannonce'];if ($valid==0) {$requete = 'UPDATE bazar_fiche SET bf_statut_fiche=2 WHERE bf_id_fiche="'.$GLOBALS['_BAZAR_']['id_fiche'].'"' ;}else {$requete = 'UPDATE bazar_fiche SET bf_statut_fiche=1 WHERE bf_id_fiche="'.$GLOBALS['_BAZAR_']['id_fiche'].'"' ;}// ====================Mise a jour de la table bazar_fiche====================$resultat = $GLOBALS['_BAZAR_']['db']->query($requete) ;if (DB::isError($resultat)) {die ($resultat->getMessage().$resultat->getDebugInfo()) ;}unset ($resultat) ;//TODO envoie mail annonceurreturn;}/** baz_s_inscrire() affiche le formulaire qui permet de s'inscrire pour recevoir des annonces d'un type** @return string le code HTML*/function baz_s_inscrire() {$res= '<h2>'.BAZ_S_INSCRIRE_AUX_ANNONCES.'</h2><br />'."\n";if (isset($_GET['inscrip'])) {//cas d'une desinscriptionif ($_GET['inscrip']==0) {$requete='DELETE FROM bazar_abonnement WHERE ba_id_utilisateur='.$GLOBALS['id_user'].' AND ba_id_rubrique='.$_GET['idtypeannonce'];}//cas d'une inscriptionelse {$requete='INSERT INTO bazar_abonnement VALUES ('.$GLOBALS['id_user'].', '.$_GET['idtypeannonce'].')';}$resultat = $GLOBALS['_BAZAR_']['db']->query($requete) ;if (DB::isError($resultat)) {die ($resultat->getMessage().$resultat->getDebugInfo()) ;}}if ($GLOBALS['AUTH']->getAuth()) {$res .= BAZ_LAIUS_S_ABONNER.'<br /><br />'."\n";//requete pour obtenir l'id et le label des types d'annonces$requete = 'SELECT bn_id_nature, bn_label_nature, bn_image_titre '.'FROM bazar_nature WHERE 1'; /*bn_ce_id_menu='.$GLOBALS['_BAZAR_']['categorie_nature'];*/$resultat = $GLOBALS['_BAZAR_']['db']->query($requete) ;if (DB::isError($resultat)) {die ($resultat->getMessage().$resultat->getDebugInfo()) ;}$table = new HTML_Table(array ('width' => '100%', 'class' => 'table_bazar')) ;$table->addRow(array ('<b>'.BAZ_TYPE_ANNONCES.'</b>','<b>'.BAZ_STATUT.'</b>','<b>'.BAZ_PASSER_EN.'</b>','<b>'.BAZ_RSS.'</b>',)) ;$table->setRowType (0, 'th') ;while ($ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC)) {$tab_parametres_GET = explode ("&", $_SERVER["argv"][0]) ;foreach ($tab_parametres_GET as $cle_param => $valeur_param) {$tab_valeur = explode ('=', $valeur_param) ;$GLOBALS['_BAZAR_']['url']->addQueryString($tab_valeur[0], $tab_valeur[1]);}$lien_s_abonner=$GLOBALS['_BAZAR_']['url'];$lien_s_abonner->addQueryString('action', BAZ_S_INSCRIRE);$lien_s_abonner->addQueryString('idtypeannonce', $ligne['bn_id_nature']);$lien_s_abonner->addQueryString('inscrip', 1);$lien_se_desabonner=$GLOBALS['_BAZAR_']['url'];$lien_se_desabonner->addQueryString('action', BAZ_S_INSCRIRE);$lien_se_desabonner->addQueryString('idtypeannonce', $ligne['bn_id_nature']);$lien_se_desabonner->addQueryString('inscrip', 0);$lien_RSS=$GLOBALS['_BAZAR_']['url'];$lien_RSS->addQueryString('action', BAZ_VOIR_FLUX_RSS);//requete pour savoir si la personne est inscrite a ce type d'annonce$requete = 'SELECT ba_id_utilisateur '.'FROM bazar_abonnement '.'WHERE ba_id_utilisateur='.$GLOBALS['id_user'].' AND ba_id_rubrique='.$ligne['bn_id_nature'];$resultat2 = $GLOBALS['_BAZAR_']['db']->query($requete) ;if (DB::isError($resultat2)) {die ($resultat2->getMessage().$resultat2->getDebugInfo()) ;}if (isset($ligne['bn_image_titre'])) {$titre=' <img src="client/bazar/images/'.$ligne['bn_image_titre'].'" alt="'.$ligne['bn_label_nature'].'" />'."\n";}else {$titre='<strong> '.$ligne['bn_label_nature'].'</strong>'."\n";}if ($resultat2->numRows()>0) {$lien_RSS->addQueryString('annonce', $ligne['bn_id_nature']);$table->addRow(array($titre,BAZ_ABONNE,'<a href='.$lien_se_desabonner->getURL().'>'.BAZ_SE_DESABONNER.'</a>','<a href='.$lien_RSS->getURL().'><img src="client/bazar/images/BAZ_rss.png" alt="'.BAZ_RSS.'"></a>'));$lien_RSS->removeQueryString('annonce');}else {$lien_RSS->addQueryString('annonce', $ligne['bn_id_nature']);$table->addRow(array($titre,BAZ_PAS_ABONNE,'<a href='.$lien_s_abonner->getURL().'>'.BAZ_S_ABONNER.'</a>','<a href='.$lien_RSS->getURL().'><img src="client/bazar/images/BAZ_rss.png" alt="'.BAZ_RSS.'" /></a>'));$lien_RSS->removeQueryString('annonce');}}$table->altRowAttributes(1, array('class' => 'ligne_impaire'), array('class' => 'ligne_paire'));$table->updateColAttributes(0, array('align' => 'center'));$table->updateColAttributes(1, array('align' => 'center'));$table->updateColAttributes(2, array('align' => 'center'));$table->updateColAttributes(3, array('style' => 'text-align:center;'));$res.=$table->toHTML() ;}else {$res .= '<p class="zone_info">'.BAZ_IDENTIFIEZ_VOUS_POUR_SAISIR.'</p>'."\n" ;$res .= '<form id="form_connexion" style="clear:both;" class="form_identification" action="' ;$GLOBALS['_BAZAR_']['url']->addQueryString('action', BAZ_S_INSCRIRE);$res .= $GLOBALS['_BAZAR_']['url']->getURL();$res .= '" method="post"><fieldset><legend>Identifiez vous</legend><label for="username">Courriel : </label><input type="text" id="username" name="username" maxlength="80" tabindex="1" value="courriel" /><label for="password">Mot de passe : </label><input type="password" id="password" name="password" maxlength="80" tabindex="2" value="mot de passe" /><input type="submit" id="connexion" name="connexion" tabindex="3" value="ok" /></fieldset></form>';}return $res;}/** baz_valeurs_fiche() - Renvoie un tableau avec les valeurs par defaut du formulaire d'inscription** @param integer Identifiant de la fiche** @return array Valeurs enregistrees pour cette fiche*/function baz_valeurs_fiche($idfiche) {$requete = 'SELECT * FROM bazar_fiche WHERE bf_id_fiche='.$idfiche;$resultat = $GLOBALS['_BAZAR_']['db']->query($requete) ;if (DB::isError($resultat)) {die ($resultat->getMessage().'<br />'.$resultat->getDebugInfo()) ;}$ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC) ;$valeurs_fiche = array() ;$tableau = baz_valeurs_template($GLOBALS['_BAZAR_']['template']);for ($i=0; $i<count($tableau); $i++) {if ($tableau[$i]['type']=='liste' || $tableau[$i]['type']=='checkbox') {$requete = 'SELECT bfvl_valeur FROM bazar_fiche_valeur_liste WHERE bfvl_ce_fiche='.$idfiche.' AND bfvl_ce_liste='.$tableau[$i]['nom_bdd'];$resultat = $GLOBALS['_BAZAR_']['db']->query($requete) ;if (DB::isError ($resultat)) {die ($resultat->getMessage().'<br />'.$resultat->getDebugInfo()) ;}$nb=0;$val='';while ($result = $resultat->fetchRow()) {if ($nb>0) $val .= ', ';$val .= $result[0];$nb++;}$valeurs_fiche[$tableau[$i]['type'].$tableau[$i]['nom_bdd']] = $val;}elseif ($tableau[$i]['type']=='texte' || $tableau[$i]['type']=='textelong' || $tableau[$i]['type']=='listedatedeb' || $tableau[$i]['type']=='listedatefin') {$valeurs_fiche[$tableau[$i]['nom_bdd']] = stripslashes($ligne[$tableau[$i]['nom_bdd']]);}}return $valeurs_fiche;}function baz_envoie_mail() {$headers['From'] = $_SERVER['SERVER_ADMIN'] ;$headers['To'] = "<".INS_MAIL_ADMIN_APRES_INSCRIPTION.">" ;$headers['Subject'] = INS_MAIL_ADMIN_APRES_INSCRIPTION_SUJET;$q = "select * from ".INS_ANNUAIRE." where ".INS_CHAMPS_MAIL."=\"".$_POST['mail']."\"" ;$r = $GLOBALS['_BAZAR_']['db']->query($q) ;if (DB::isError ($r)) {die ("echec de la requete") ;}$row = $r->fetchRow(DB_FETCHMODE_ASSOC) ;$body_entete = "Un nouvel inscrit à tela : \n" ;$body = "mail : ".$row[INS_CHAMPS_MAIL]."\n" ;$body .= "------------------------------------------\n";$body .= "nom: ".unhtmlentities($row[INS_CHAMPS_NOM])." \n" ;$body .= "prénom : ".unhtmlentities($row[INS_CHAMPS_PRENOM])." \n" ;$body .= "-------------------------------------------\n" ;// création du mail$mail_object =& Mail::factory('mail');if (!mail ($headers['To'], $headers['Subject'], $body)) {return "Une erreur s'est produite:<br />\n" ;}$body .= INS_MAIL_INSCRIPTION_2;$headers['To'] = $_POST['mail'] ;// création du mailif (mail($headers['To'], $headers['Subject'], INS_MAIL_INSCRIPTION_1.$body)) {return "Une erreur s'est produite<br />\n" ;}return;}/** function baz_nextId () Renvoie le prochain identifiant numerique libre d'une table** @param string Nom de la table* @param string Nom du champs identifiant* @param mixed Objet DB de PEAR pour la connexion a la base de donnees** return integer Le prochain numero d'identifiant disponible*/function baz_nextId($table, $colonne_identifiant, $bdd) {$requete = 'SELECT MAX('.$colonne_identifiant.') AS maxi FROM '.$table;$resultat = $bdd->query($requete) ;if (DB::isError($resultat)) {die (__FILE__ . __LINE__ . $resultat->getMessage() . $requete);return $bdd->raiseError($resultat) ;}if ($resultat->numRows() > 1) {return $bdd->raiseError('<br />La table '.$table.' a un identifiant non unique<br />') ;}$ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT) ;return $ligne->maxi + 1 ;}/** function baz_titre_wiki () Renvoie la chaine de caractere sous une forme compatible avec wikini** @param string mot à transformer (enlever accents, espaces)** return string mot transformé*/function baz_titre_wiki($nom) {$titre=trim($nom);for ($j = 0; $j < strlen ($titre); $j++) {if (!preg_match ('/[a-zA-Z0-9]/', $titre[$j])) {$titre[$j] = '_' ;}}return $titre;}/* +--Fin du code ----------------------------------------------------------------------------------------+** $Log: not supported by cvs2svn $* Revision 1.56 2006/09/28 15:41:36 alexandre_tb* Le formulaire pour se logguer dans l'action saisir reste sur l'action saisir après** Revision 1.55 2006/09/21 14:19:39 florian* amélioration des fonctions liés au wikini** Revision 1.54 2006/09/14 15:11:23 alexandre_tb* suppression temporaire de la gestion des wikinis** Revision 1.53 2006/07/25 13:24:44 florian* correction bug image** Revision 1.52 2006/07/25 13:05:00 alexandre_tb* Remplacement d un die par un echo** Revision 1.51 2006/07/18 14:17:32 alexandre_tb* Ajout d'un formulaire d identification** Revision 1.50 2006/06/21 08:37:59 alexandre_tb* Correction de bug, d'un appel constant (....) qui ne fonctionnais plus.** Revision 1.49 2006/06/02 09:29:07 florian* debut d'integration de wikini** Revision 1.48 2006/05/19 13:54:11 florian* stabilisation du moteur de recherche, corrections bugs, lien recherche avancee** Revision 1.47 2006/04/28 12:46:14 florian* integration des liens vers annuaire** Revision 1.46 2006/03/29 13:04:35 alexandre_tb* utilisation de la classe Administrateur_bazar** Revision 1.45 2006/03/24 09:28:02 alexandre_tb* utilisation de la variable globale $GLOBALS['_BAZAR_']['categorie_nature']** Revision 1.44 2006/03/14 17:10:21 florian* ajout des fonctions de syndication, changement du moteur de recherche** Revision 1.43 2006/03/02 20:36:52 florian* les entrees du formulaire de saisir ne sont plus dans les constantes mias dans des tables qui gerent le multilinguisme.** Revision 1.42 2006/03/01 16:23:22 florian* modifs textes fr et correction bug "undefined index"** Revision 1.41 2006/03/01 16:05:51 florian* ajout des fichiers joints** Revision 1.40 2006/02/06 09:33:00 alexandre_tb* correction de bug** Revision 1.39 2006/01/30 17:25:38 alexandre_tb* correction de bugs** Revision 1.38 2006/01/30 10:27:04 florian* - ajout des entrées de formulaire fichier, url, et image* - correction bug d'affichage du mode de saisie** Revision 1.37 2006/01/24 14:11:11 alexandre_tb* correction de bug sur l'ajout d'une image et d'un fichier** Revision 1.36 2006/01/19 17:42:11 florian* ajout des cases à cocher pré-cochées pour les maj** Revision 1.35 2006/01/18 11:06:51 florian* correction erreur saisie date** Revision 1.34 2006/01/18 10:53:28 florian* corrections bugs affichage fiche** Revision 1.33 2006/01/18 10:07:34 florian* recodage de l'insertion et de la maj des données relatives aux listes et checkbox dans des formulaires** Revision 1.32 2006/01/18 10:03:36 florian* recodage de l'insertion et de la maj des données relatives aux listes et checkbox dans des formulaires** Revision 1.31 2006/01/17 10:07:08 alexandre_tb* en cours** Revision 1.30 2006/01/16 09:42:57 alexandre_tb* en cours** Revision 1.29 2006/01/13 14:12:51 florian* utilisation des temlates dans la table bazar_nature** Revision 1.28 2006/01/05 16:28:24 alexandre_tb* prise en chage des checkbox, reste la mise à jour à gérer** Revision 1.27 2006/01/04 15:30:56 alexandre_tb* mise en forme du code** Revision 1.26 2006/01/03 10:19:31 florian* Mise à jour pour accepter des parametres dans papyrus: faire apparaitre ou non le menu, afficher qu'un type de fiches, définir l'action par défaut...** Revision 1.25 2005/12/20 14:49:35 ddelon* Fusion Head vers Livraison** Revision 1.24 2005/12/16 15:44:40 alexandre_tb* ajout de l'option restreindre dépôt** Revision 1.23 2005/12/01 17:03:34 florian* changement des chemins pour appli Pear** Revision 1.22 2005/12/01 16:05:41 florian* changement des chemins pour appli Pear** Revision 1.21 2005/12/01 15:31:30 florian* correction bug modifs et saisies** Revision 1.20 2005/11/30 13:58:45 florian* ajouts graphisme (logos, boutons), changement structure SQL bazar_fiche** Revision 1.19 2005/11/24 16:17:13 florian* corrections bugs, ajout des cases à cocher** Revision 1.18 2005/11/18 16:03:23 florian* correction bug html entites** Revision 1.17 2005/11/17 18:48:02 florian* corrections bugs + amélioration de l'application d'inscription** Revision 1.16 2005/11/07 17:30:36 florian* ajout controle sur les listes pour la saisie** Revision 1.15 2005/11/07 17:05:45 florian* amélioration validation conditions de saisie, ajout des règles spécifiques de saisie des formulaires** Revision 1.14 2005/11/07 08:48:02 florian* correction pb guillemets pour saisie et modif de fiche** Revision 1.13 2005/10/21 16:15:04 florian* mise a jour appropriation** Revision 1.11 2005/10/12 17:20:33 ddelon* Reorganisation calendrier + applette** Revision 1.10 2005/10/12 15:14:06 florian* amélioration de l'interface de bazar, de manière a simplifier les consultations, et à harmoniser par rapport aux Ressources** Revision 1.9 2005/10/10 16:22:52 alexandre_tb* Correction de bug. Lorsqu'on revient en arrière après avoir validé un formulaire.** Revision 1.8 2005/09/30 13:50:07 alexandre_tb* correction bug date parution ressource** Revision 1.7 2005/09/30 13:15:58 ddelon* compatibilité php5** Revision 1.6 2005/09/30 13:00:05 ddelon* Fiche bazar generique** Revision 1.5 2005/09/30 12:22:54 florian* Ajouts commentaires pour fiche, modifications graphiques, maj SQL** Revision 1.3 2005/07/21 19:03:12 florian* nouveautés bazar: templates fiches, correction de bugs, ...** Revision 1.1.1.1 2005/02/17 18:05:11 florian* Import initial de Bazar** Revision 1.1.1.1 2005/02/17 11:09:50 florian* Import initial** Revision 1.1.1.1 2005/02/16 18:06:35 florian* import de la nouvelle version** Revision 1.10 2004/07/08 17:25:25 florian* ajout commentaires + petits debuggages** Revision 1.8 2004/07/07 14:30:19 florian* débogage RSS** Revision 1.7 2004/07/06 16:22:01 florian* débogage modification + MAJ flux RSS** Revision 1.6 2004/07/06 09:28:26 florian* changement interface de modification** Revision 1.5 2004/07/05 15:10:23 florian* changement interface de saisie** Revision 1.4 2004/07/02 14:51:14 florian* ajouts divers pour faire fonctionner l'insertion de fiches** Revision 1.3 2004/07/01 16:37:42 florian* ajout de fonctions pour les templates** Revision 1.2 2004/07/01 13:00:13 florian* modif Florian** Revision 1.1 2004/06/23 09:58:32 alex* version initiale** Revision 1.1 2004/06/18 09:00:37 alex* version initiale*** +-- Fin du code ----------------------------------------------------------------------------------------+*/?>