New file |
0,0 → 1,301 |
<?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. | |
// +-----------------------------------------------------------------------------------------------+ |
/** |
* |
*Page permettant l'affichage des informations de cartographie des inscrits |
* |
*@package cartographie |
//Auteur original : |
*@author Alexandre GRANIER <alexandre@tela-botanica.org> |
//Autres auteurs : |
*@copyright Tela-Botanica 2000-2004 |
*@version 03 mai 2004 |
// +-----------------------------------------------------------------------------------------------+ |
// |
// $Id: cartographie.php,v 1.6 2005/03/14 09:43:13 alex Exp $ |
// FICHIER : $RCSfile: cartographie.php,v $ |
// AUTEUR : $Author: alex $ |
// VERSION : $Revision: 1.6 $ |
// DATE : $Date: 2005/03/14 09:43:13 $ |
*/ |
|
include_once 'client/cartographie/configuration/car_config.inc.php' ; |
if (isset($lang)) { |
include_once CAR_CHEMIN_APPLI."/langues/car_langue_$lang.inc.php" ; |
} else { |
include_once CAR_CHEMIN_APPLI.'/langues/car_langue_fr.inc.php' ; |
} |
|
include_once CAR_CHEMIN_APPLI.'/bibliotheque/lib.carto.php' ; |
include_once CAR_CHEMIN_APPLI.'/bibliotheque/car_cartographie.fonct.php' ; |
include_once 'HTML/QuickForm.php' ; |
|
// Ajout d'une feuille de style externe |
GEN_stockerStyleExterne ('cartographie', 'client/cartographie/cartographie.css') ; |
|
if (isset($GLOBALS['logout']) && $GLOBALS['logout']==1) { |
$GLOBALS['car_auth']->logout(); |
} |
//================================================================================================ |
//================================================================================================ |
function AUTH_formulaire_login() { |
|
// l'url de la page en cours |
$url = CAR_URL; |
|
$res = '<h2 class="titre2_cartographie">'.CAR_TEXTE_IDENTIFICATION_2.'</h2>'; |
|
$res .= "<div>".CAR_LAIUS_INSCRIPTION." <a href=\"".CAR_CHEMIN_INSCRIPTION."\">".CAR_S_INSCRIRE."</a></div>\n" ; |
$res .= '<h2 class="titre2_cartographie">'.CAR_TEXTE_IDENTIFICATION_1.'</h2>'; |
$form = new HTML_QuickForm ('inscription', 'post', preg_replace ('/&/', '&', $url).'&historique_cartes='.$GLOBALS['historique_cartes'].'&fin=true') ; |
$form->addElement ('text', 'username', CAR_EMAIL) ; |
$form->addElement ('password', 'password', CAR_MOT_DE_PASSE) ; |
$form->addElement('submit', 'connexion', CAR_VALIDER); |
|
$res .= $form->toHTML() ; |
|
//$res .= "<div>".CAR_TEXTE_PERDU."</div>\n" ; |
return $res; |
} |
|
function afficherContenuCorps () |
{ |
global $image_x; |
global $image_y; |
global $historique_cartes; |
global $mailer; |
global $fin; |
global $sendpwd;//utilisé dans liste_inscrit.php |
global $select;//utilisé dans liste_inscrit.php |
global $liste_zone_carte; |
|
//=========================================================================================================== |
$requete_01 = |
"SELECT *,count(cp_id_continent) as nbr". |
" FROM ".CAR_ANNUAIRE.", carto_PAYS". |
" WHERE ".CAR_CHAMPS_CE_PAYS." = cp_id_pays". |
" GROUP BY cp_id_continent"; |
|
$resultat_01 = $GLOBALS['car_db']->query ($requete_01) ; |
if (DB::isError($resultat_01)) { |
die ($resultat_01->getMessage().'<br />'.$resultat_01->getDebugInfo()) ; |
} |
|
$tableau_ad_continent=array(); |
|
while ($ligne_01 = $resultat_01->fetchRow(DB_FETCHMODE_OBJECT)) { |
$tableau_ad_continent[$ligne_01->CP_ID_Continent] = $ligne_01->nbr; |
|
} |
$info_continent['nom_table_zone'] = 'carto_CONTINENT'; |
$info_continent['nom_chp_id_zone'] = 'CC_ID_Continent'; |
$info_continent['nom_chp_nom_zone'] = 'CC_Intitule_continent'; |
$info_continent['nom_chp_rouge'] = 'CC_Couleur_R'; |
$info_continent['nom_chp_vert'] = 'CC_Couleur_V'; |
$info_continent['nom_chp_bleu'] = 'CC_Couleur_B'; |
$info_continent['nom_chp_zone_sup'] = ''; |
$info_continent['tableau_valeurs_zone'] = $tableau_ad_continent; |
|
//============================================================================================================ |
|
$requete_02 = 'SELECT CC_ID_Continent FROM carto_CONTINENT'; |
|
$resultat_02 = $GLOBALS['car_db']->query ($requete_02) ; |
if (DB::isError($resultat_02)) { |
die ($resultat_02->getMessage().'<br />'.$resultat_02->getDebugInfo()) ; |
} |
|
while ($ligne_02 = $resultat_02->fetchRow(DB_FETCHMODE_OBJECT)) { |
$requete_03 = |
'SELECT *, count(cp_id_pays) as nbr '. |
' FROM '.CAR_ANNUAIRE.', carto_PAYS'. |
' WHERE '.CAR_CHAMPS_CE_PAYS.'= cp_id_pays'. |
' AND cp_id_continent = "'.$ligne_02->CC_ID_Continent.'"'. |
' GROUP BY cp_id_pays'; |
|
$resultat_03 = $GLOBALS['car_db']->query ($requete_03) ; |
if (DB::isError($resultat_03)) { |
die ($resultat_03->getMessage().'<br />'.$resultat_03->getDebugInfo()) ; |
} |
|
$tableau_ad_pays = array(); |
|
while ($ligne_03 = $resultat_03->fetchRow(DB_FETCHMODE_OBJECT)) { |
$tableau_ad_pays[$ligne_03->CP_ID_Pays] = $ligne_03->nbr; |
} |
|
$info_pays[$ligne_02->CC_ID_Continent]['nom_table_zone'] = 'carto_PAYS'; |
$info_pays[$ligne_02->CC_ID_Continent]['nom_chp_id_zone'] = 'CP_ID_Pays'; |
$info_pays[$ligne_02->CC_ID_Continent]['nom_chp_nom_zone'] = 'CP_Intitule_pays'; |
$info_pays[$ligne_02->CC_ID_Continent]['nom_chp_rouge'] = 'CP_Couleur_R'; |
$info_pays[$ligne_02->CC_ID_Continent]['nom_chp_vert'] = 'CP_Couleur_V'; |
$info_pays[$ligne_02->CC_ID_Continent]['nom_chp_bleu'] = 'CP_Couleur_B'; |
$info_pays[$ligne_02->CC_ID_Continent]['nom_chp_zone_sup'] = 'CP_ID_Continent'; |
$info_pays[$ligne_02->CC_ID_Continent]['tableau_valeurs_zone'] = $tableau_ad_pays; |
} |
//============================================================================================================ |
|
$requete_04 = "SELECT * ,count(cd_id_departement) as nbr". |
" FROM ".CAR_ANNUAIRE.", carto_DEPARTEMENT". |
" WHERE ".CAR_CHAMPS_CE_PAYS." = 'fr'". |
" AND ".CAR_CHAMPS_DPT." = cd_id_departement". |
" GROUP BY cd_id_Departement"; |
|
$resultat_04 = $GLOBALS['car_db']->query ($requete_04) ; |
if (DB::isError($resultat_04)) { |
die(' |
<H2 style="text-align: center; font-weight: bold; font-size: 26px;">Erreur de requête</H2>'. |
'<b>Requete : </b>'.$requete_04. |
'<br/><br/><b>Erreur : </b>'.$resultat_04->getMessage()); |
} |
|
$tableau_ad_dpt_france = array(); |
|
while ($ligne_04 = $resultat_04->fetchRow(DB_FETCHMODE_OBJECT)) { |
$tableau_ad_dpt_france[$ligne_04->CD_ID_Departement] = $ligne_04->nbr; |
} |
|
$info_dpt_france['nom_table_zone'] = 'carto_DEPARTEMENT'; |
$info_dpt_france['nom_chp_id_zone'] = 'CD_ID_Departement'; |
$info_dpt_france['nom_chp_nom_zone'] = 'CD_Intitule_departement'; |
$info_dpt_france['nom_chp_rouge'] = 'CD_Couleur_R'; |
$info_dpt_france['nom_chp_vert'] = 'CD_Couleur_V'; |
$info_dpt_france['nom_chp_bleu'] = 'CD_Couleur_B'; |
$info_dpt_france['nom_chp_zone_sup'] = 'CD_ID_Pays'; |
$info_dpt_france['tableau_valeurs_zone'] = $tableau_ad_dpt_france; |
|
//============================================================================================================ |
|
|
//============================================================================================================ |
// On cree tout d'abord l'arborescence |
|
$monde = new Carto_Carte ('continent', '', 'Monde', 'monde_masque5c.png', 'monde5c.png', CAR_CHEMIN_APPLI.'/fonds/', $info_continent); |
|
$monde->definirCouleurs ('255', '255', '255','255', '250', '130','255', '165', '0','255', '115', '0') ; |
|
$monde->historique_cartes = $historique_cartes; |
$monde->image_x = $image_x; |
$monde->image_y = $image_y; |
$monde->liste_zone_carte = $liste_zone_carte; |
$monde->url = CAR_URL; |
|
foreach ($info_pays as $cle => $valeur) { |
$requete_05 = |
"SELECT CDC_Titre_carte, CDC_ID_Carte, CDC_Carte_fond, CDC_Carte_masque, CDC_ID_Zone_geo_carte". |
" FROM carto_DESCRIPTION_CARTE, carto_ACTION ". |
" WHERE CA_ID_Zone_geo = '$cle'". |
" AND CA_Type_zone = 1". |
" AND CA_ID_Carte_destination = CDC_ID_Carte"; |
|
$resultat_05 = $GLOBALS['car_db']->query ($requete_05) ; |
if (DB::isError($resultat_05)) { |
die ($resultat_05->getMessage().'<br />'.$resultat_05->getDebugInfo()) ; |
} |
|
$ligne_05 = $resultat_05->fetchRow(DB_FETCHMODE_OBJECT); |
|
$monde->ajouterFils($ligne_05->CDC_ID_Carte, $ligne_05->CDC_ID_Zone_geo_carte, $ligne_05->CDC_Titre_carte, |
$ligne_05->CDC_Carte_masque, $ligne_05->CDC_Carte_fond, $valeur); |
$monde->fils[$ligne_05->CDC_ID_Carte]->definirCouleurs ('255', '255', '255','255', '250', '130','255', '165', '0','255', '115', '0') ; |
} |
|
$monde->fils['europe']->ajouterFils('france', 'fr', 'France' ,'france_masque.png', 'france_region.png', $info_dpt_france); |
$monde->fils['europe']->fils['france']->definirCouleurs ('255', '255', '255','255', '250', '130','255', '165', '0','255', '115', '0') ; |
|
// Une fois l'arborescence créée on lance la methode donnerFormulaireImage() pour recuperer la carte |
// (dans $img). S'il n'y a pas de carte a afficher donnerFormulaireImage() renvoi false. On peut alors recuperer |
// le niveau ou on en est grace a $monde->historique (du type continent*namerique*ca). |
$res = ''; |
|
|
$img = false; |
if ($mailer == 1 || $fin == true) { |
$objet_carte = $_SESSION['carte'] ; |
$monde = unserialize($objet_carte);} |
else { |
$img = $monde->donnerFormulaireImage(); |
} |
|
// On teste donc img |
|
if (!$img ) { |
include 'liste_inscrit.php'; |
return $res; |
} |
else { |
$historique_carte = new Carto_HistoriqueCarte ($monde, '>', 'chemin_carto'); |
$res .= $historique_carte->afficherHistoriqueCarte(); |
$res .= "<br />\n" ; |
$tab = explode('*',$monde->historique); |
$res .= carto_ad_consulterNbreInscrits($tab[(count($tab)-1)]); |
$res .= $img; |
$res .= '<div class="cliquer2">'.CAR_CLIQUER.'</div>'; |
$res .= '<div class="couleur">'.CAR_COULEUR.'</div>'."\n"; |
$res .= '<div class="avertissement_carto" id="d"><h2 class="titre2_cartographie">'.CAR_AVERTISSEMENT_TITRE.' : </h2>'; |
$res .= '<span class="texte_avertissement">'.CAR_AVERTISSEMENT."</span></div>\n"; |
|
return $res; |
} |
} |
|
|
//-- Fin du code source ------------------------------------------------------------ |
/* |
* $Log: cartographie.php,v $ |
* Revision 1.6 2005/03/14 09:43:13 alex |
* changement des couleurs |
* |
* Revision 1.5 2005/03/11 15:58:21 alex |
* suppression d'une phrase |
* |
* Revision 1.2 2005/03/11 15:18:36 alex |
* migration version 4 |
* |
* Revision 1.1 2004/11/30 13:37:32 tam |
* installation |
* |
* Revision 1.1.1.1 2004/11/23 17:48:17 tam |
* Importation |
* |
* Revision 1.1 2004/11/23 17:29:40 tam |
* installation |
* |
* Revision 1.2 2004/06/18 08:48:03 alex |
* améliorations diverses |
* |
* Revision 1.1 2004/06/09 13:56:47 alex |
* corrections diverses |
* |
* Revision 1.9 2003/05/06 12:49:27 alex |
* remplacement include par include_once |
* |
* Revision 1.8 2003/03/07 15:20:32 jpm |
* Correction d'une erreur de texte. |
* |
* Revision 1.7 2003/02/28 08:43:33 jpm |
* Gestion des nouvelles tables MySql carto. |
* |
* Revision 1.6 2003/02/21 13:50:19 jpm |
* Mise à jour nouvel objet Carto_Carte. |
* |
* Revision 1.5 2003/02/17 14:33:52 jpm |
* Modification pour être compatible avec la nouvelle classe carte. |
* |
* |
*/ |
?> |