<?php
// declare(encoding='UTF-8');
/**
 * Service permettant d'insérer les informations fournie par le widget Saisie dans le CEL.
 * Encodage en entrée : utf8
 * Encodage en sortie : utf8
 *
 * Cas d'utilisation :
 * PUT /CelWidgetSaisie : ajout de données en les passant via $_POST
 *
 * @author Jean-Pascal MILCENT <jpm@clapas.org>
 * @license GPL v3 <http://www.gnu.org/licenses/gpl.txt>
 * @license CECILL v2 <http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt>
 * @version $Id$
 * @copyright © 2011, Jean-Pascal MILCENT
 */
class CelWidgetSaisie extends Cel {

	private $projet = null;
	private $projetTags = array();
	private $tagsObs = null;
	private $tagsImg = null;
	private $champsEtendusObs = null;
	private $utilisateur_id = null;
	const DUREE_DE_VIE_IMG = 86400;// 3600 * 24 * 2 = 172 800
	const ARRET_SERVICE = false;// Permet de bloquer le service en cas de problème sur le serveur

	private $correspondanceIdImgTags = array();
	private $gestionMotsClesObs = null;
	private $gestionMotsClesImages = null;

	public function createElement($requeteDonnees) {
		if (self::ARRET_SERVICE) {
			$this->messages[] = "Désactivation temporaire du service d'envoi des données au CEL.";
		} else if (array_key_exists('projet', $requeteDonnees)) {
			$this->debug[] = 'Projet : '.$requeteDonnees['projet'];
			$this->projet = $requeteDonnees['projet'];

			// Traitements des tags multiples de projet
			$this->traiterProjetTags();

			// Traitement des tags spécifique aux obs
			$this->traiterTagObs($requeteDonnees);

			// Traitement des tags spécifique aux images
			$this->traiterTagImg($requeteDonnees);

			// Traitement des observations et des images
			if (filter_var($requeteDonnees['utilisateur']['courriel'], FILTER_VALIDATE_EMAIL)) {
				$this->debug[] = 'Utilisateur : '.print_r($requeteDonnees['utilisateur'], true);
				$utilisateur = $requeteDonnees['utilisateur'];
				if (array_key_exists('courriel', $utilisateur)) {
					$this->debug[] = 'Courriel : '.$utilisateur['courriel'];
					$utilisateur = $this->affecterChampsManquantsUtilisateur($utilisateur);
					extract($utilisateur);
					$this->utilisateur_id = $id_utilisateur;
					$ordre = $this->getMaxOrdre($id_utilisateur);
					if (!is_null($ordre)) {
						$requeteDonnees = $this->supprimerSlashesProfond($requeteDonnees);
						// Triage et manipulation des données
						$observations = array();
						foreach ($requeteDonnees as $cle => $obs) {
							if (preg_match('/^obsId[0-9]+$/', $cle)) {
								$ordreObs = $ordre++;

								$this->debug[] = 'commune_nom : '.$obs['commune_nom'];
								$this->debug[] = 'commune_code_insee : '.$obs['commune_code_insee'];

								$obsAAjouter = array();
								$obsAAjouter['ce_utilisateur'] = $id_utilisateur;
								$obsAAjouter['courriel_utilisateur'] = $courriel;
								$obsAAjouter['prenom_utilisateur'] = $prenom;
								$obsAAjouter['nom_utilisateur'] = $nom;
								$obsAAjouter['ordre'] = $ordreObs;

								$obsAAjouter['nom_sel'] = $obs['nom_sel'];
								$obsAAjouter['nom_sel_nn'] = isset($obs['num_nom_sel']) ? $obs['num_nom_sel'] : null;
								$obsAAjouter['nom_ret'] = isset($obs['nom_ret']) ? $obs['nom_ret'] : null;
								$obsAAjouter['nom_ret_nn'] = isset($obs['num_nom_ret']) ? $obs['num_nom_ret'] : null;
								$obsAAjouter['nt'] = isset($obs['num_taxon']) ? $obs['num_taxon'] : null;
								$obsAAjouter['famille'] = isset($obs['famille']) ? $obs['famille'] : null;
								$obsAAjouter['nom_referentiel'] = isset($obs['referentiel']) ? $obs['referentiel'] : null;

								$obsAAjouter['date_observation'] = $this->transormerDateFrVersMysql($obs['date']);
								$obsAAjouter['commentaire'] = $obs['notes'];

								$obsAAjouter['zone_geo'] = $obs['commune_nom'];
								$obsAAjouter['ce_zone_geo'] = 'INSEE-C:'.$obs['commune_code_insee'];
								$obsAAjouter['lieudit'] = isset($obs['lieudit']) ? $obs['lieudit'] : null;
								$obsAAjouter['station'] = isset($obs['station']) ? $obs['station'] : null;
								$obsAAjouter['milieu'] = isset($obs['milieu']) ? $obs['milieu'] : null;
								$obsAAjouter['latitude'] = $obs['latitude'];
								$obsAAjouter['longitude'] = $obs['longitude'];
								$obsAAjouter['geodatum'] = 'WGS84';

								$obsAAjouter['certitude'] = isset($obs['certitude']) ? $obs['certitude'] : null;
								$obsAAjouter['phenologie'] = isset($obs['phenologie']) ? $obs['phenologie'] : null;
								$obsAAjouter['abondance'] = isset($obs['abondance']) ? $obs['abondance'] : null;

								$obsAAjouter['transmission'] = '1';
								$obsAAjouter['date_creation'] = date('Y-m-d H:i:s');
								$obsAAjouter['date_modification'] = $obsAAjouter['date_creation'];
								$obsAAjouter['date_transmission'] = $obsAAjouter['date_creation'];

								$this->champsEtendusObs[$ordreObs] = isset($obs['obs_etendue']) ? $obs['obs_etendue'] : array();

								$imgAAjouter = null;
								if (!empty($obs['image_nom'])) {
									$imgAAjouter = $this->traiterImagesALierAObs($id_utilisateur, $ordreObs, $obs);
								}

								if(!trim($courriel) && !trim($id_utilisateur)) {
									// XXX: debug
									file_put_contents("/tmp/debug-cel-" . time(),
													  $_POST . "\n=\n" . $requeteDonnees . "\n=\n" . var_export($obsAAjouter, true) .
													  "\n=\n", $_SERVER);
								}

								$observations[$ordreObs] = array(
									'obs' => $this->protegerTableau($obsAAjouter),
									'img' => $imgAAjouter);
							}
						}
						$this->debug[] = 'Nbre obs ajoutée : '.count($observations);
						$this->debug[] = 'projet : '.$this->projet;
						$this->debug[] = 'tagsObs : '.print_r($this->tagsObs, true);
						$this->debug[] = 'tagsImg : '.print_r($this->tagsImg, true);

						// Insertion dans la base
						$obs_a_taguer_ordres = array();
						$img_a_taguer_ids = array();
						foreach ($observations as $infos) {
							$obs = $infos['obs'];
							$img = $infos['img'];

							$champs = implode(', ', array_keys($obs));
							$valeurs = implode(', ', $obs);
							$requete = "INSERT INTO cel_obs ($champs) VALUES ($valeurs) ";

							if (Cel::db()->executer($requete) === false) {
								$this->messages[] = "Un problème est survenu lors de l'insertion de l'obs dans la base de données.";
							} else {
								$obs_a_taguer_ordres[] = trim($obs['ordre'], "'");
							}

							// si le formulaire contient une image on la traite
							if ($img != null) {
								$this->nettoyerImagesUploades();
								$img_a_taguer_ids = $this->stockerImagesEtLierAObs($img, $id_utilisateur, $utilisateur);
								$cmd = sprintf($this->config['cel']['commande_script_images'],implode(',', $img_a_taguer_ids));
								pclose(popen($cmd,"r"));
							}
						}

						$this->gestionMotsClesObs = new GestionMotsClesChemin($this->config,'obs');
						$this->gestionMotsClesImages = new GestionMotsClesChemin($this->config,'images');

						$obs_a_taguer_ids = $this->obtenirIdsObsPourTableauOrdres($this->utilisateur_id, $obs_a_taguer_ordres);
						$this->taguerObs($obs_a_taguer_ids);
						$this->taguerImg($img_a_taguer_ids);

						// Les champs taggés sont des champs supplémentaires stockés sous forme de clé => valeur
						$this->ajouterChampsEtendusObs($obs_a_taguer_ids, $this->champsEtendusObs);
					} else {
						$this->messages[] = "Un nouveau numéro d'ordre d'observation n'a pu être généré.";
					}
				} else {
					$this->messages[] = "L'identifiant de l'utilisateur (courriel) n'a pas été transmis.";
				}
			} else {
				$this->messages[] = "Les informations concernant l'utilisateur (prénom, nom, courriel) n'ont pas été transmises.";
			}
		} else {
			$this->messages[] = "Les informations concernant le projet coopératif n'ont pas été transmises.";
		}
		if (count($this->messages) > 0) {
			$this->debug[] = print_r($this->messages, true);
		}
		$msg = (count($this->messages) > 0) ? 'erreur' : 'ok';
		$retour = (object) array('msg' => $msg);
		$this->envoyerJson($retour);
		exit;
	}

	private function traiterProjetTags() {
		if (strpos($this->projet, ',') === false) {
			$this->projetTags = array('Projets coopératifs>'.$this->projet);
		} else {
			$projetTagsTxt = explode(',', $this->projet);
			foreach ($projetTagsTxt as $tag) {
				$this->projetTags[] = 'Projets coopératifs>'.$tag;
			}
		}
	}

	private function traiterTagObs($requeteDonnees) {
		if (array_key_exists('tag-obs', $requeteDonnees) && $requeteDonnees['tag-obs'] != '') {
			$this->tagsObs = explode(',', $requeteDonnees['tag-obs']);
		}
		foreach ($this->projetTags as $tag) {
			$this->tagsObs[] = $tag;
		}
	}

	private function traiterTagImg($requeteDonnees) {
		if (array_key_exists('tag-img', $requeteDonnees) && $requeteDonnees['tag-img'] != '') {
			$this->tagsImg = explode(',', $requeteDonnees['tag-img']);
		}
		foreach ($this->projetTags as $tag) {
			$this->tagsImg[] = $tag;
		}
	}

	private function ajouterChampsEtendusObs($obs_ids, $obs_a_champs_etendus) {
		$champs_etendus_obs = array();
		$gestionChampsEtendus = new GestionChampsEtendus($this->config, 'obs');

		foreach ($obs_ids as $id_obs) {
			$champs = array_shift($obs_a_champs_etendus);
			if ($champs != null && is_array($champs)) {
				foreach ($champs as $infosChamp) {
					$cle = isset($infosChamp['cle']) ? $infosChamp['cle'] : '';
					$label = isset($infosChamp['label']) ? $infosChamp['label'] : '';
					$valeur = isset($infosChamp['valeur']) ? $infosChamp['valeur'] : '';

					if (empty($cle) && !empty($label)) {
						$cle = $gestionChampsEtendus->transformerLabelEnCle($label);
					}

					if (!empty($cle) && !empty($valeur)) {
						$champEtendu = new ChampEtendu();
						$champEtendu->id = $id_obs;
						$champEtendu->cle = $cle;
						$champEtendu->label = empty($label) ? $cle : $label;
						$champEtendu->valeur = $valeur;

						$champs_etendus_obs[] = $champEtendu;
					}
				}
			}
		}

        if(! $champs_etendus_obs) return TRUE;

		return $gestionChampsEtendus->ajouterParLots($champs_etendus_obs);
	}

	private function traiterImagesALierAObs($id_utilisateur, $ordreObs, $obs) {
		$imgAAjouter = null;
		if (is_array($obs['image_nom'])) {
			$imgAAjouter = array();
			foreach ($obs['image_nom'] as $index => $nom_image) {
				$image = array();
				$image['id_utilisateur'] = $id_utilisateur;
				$image['id_obs'] = $ordreObs;
				$image['nom'] = $nom_image;
				$image['tags'] = isset($obs['image_tag'][$index]) ? explode(',',$obs['image_tag'][$index]) : '';
				// on suppose que les b64 des images sont envoyés dans le même ordre que leurs noms
				// TODO: indexer le tableau avec le nom des images
				$image['b64'] = isset($obs['image_b64'][$index]) ? $obs['image_b64'][$index] : '';
				$this->debug[] = 'Contient B64 : '.(empty($obs['image_b64']) ? 'non' : 'oui');
				$imgAAjouter[] = $image;
			}
		} else {
			if (!empty($obs['image_nom'])) {
				$imgAAjouter = array();
				$imgAAjouter['id_utilisateur'] = $id_utilisateur;
				$imgAAjouter['id_obs'] = $ordreObs;
				$imgAAjouter['nom'] = $obs['image_nom'];
				//$imgAAjouter['tags'] = isset($obs['image_tag']) ? explode(',',$obs['image_tag']) : '';
				$imgAAjouter['b64'] = isset($obs['image_b64']) ? $obs['image_b64'] : array();
				$this->debug[] = 'Contient B64 : '.(empty($obs['image_b64']) ? 'non' : 'oui');
			}
		}

		return $imgAAjouter;
	}

	private function stockerImagesEtLierAObs($img, $id_utilisateur, $utilisateur) {
		$img_a_taguer_ids = array();
		if (!isset($img['nom']) && is_array($img)) {
			foreach ($img as $index => $image) {
				$nomFichierImg = $this->traiterNomFichierImage($image['nom']);
				$cheminImage = $this->config['cel']['chemin_stockage_temp']."/$nomFichierImg";
				// Si l'image est transmise en base 64
				if (empty($image['b64']) === false) {
					$this->transformerBase64enFichier($cheminImage, $image['b64']);
				}

				$this->debug[] = 'Nom fichier img debut :'.$nomFichierImg;
				$idImg = $this->ajouterImageSurDdEtBdd($utilisateur, $cheminImage, $nomFichierImg);
				if ($idImg !== false) {
					$liaisonOk = $this->lierObsEtImg($idImg, $id_utilisateur, $image['id_obs']);
					if ($liaisonOk === true) {
						$img_a_taguer_ids[] = $idImg;
						if (isset($image['tags'])) {
							$this->correspondanceIdImgTags[$idImg] = $image['tags'];
						}
					}
				}
			}
		} else {
			$nomFichierImg = $this->traiterNomFichierImage($img['nom']);
			$cheminImage = $this->config['cel']['chemin_stockage_temp']."/$nomFichierImg";
			// Si l'image est transmise en base 64
			if (empty($img['b64']) === false) {
				$this->transformerBase64enFichier($cheminImage, $img['b64']);
			}

			$this->debug[] = 'Nom fichier img debut :'.$nomFichierImg;
			$idImg = $this->ajouterImageSurDdEtBdd($utilisateur, $cheminImage, $nomFichierImg);
			if ($idImg !== false) {
				$liaisonOk = $this->lierObsEtImg($idImg, $id_utilisateur, $img['id_obs']);
				if ($liaisonOk === true) {
					$img_a_taguer_ids[] = $idImg;
					if (isset($img['tags'])) {
						$this->correspondanceIdImgTags[$idImg] = $img['tags'];
					}
				}
			}
		}

		return $img_a_taguer_ids;
	}

	private function affecterChampsManquantsUtilisateur($utilisateur) {
		$gestion_utilisateur = new User($this->config);
		$infos_complementaires = $gestion_utilisateur->obtenirUtilisateurSiExiste($utilisateur['courriel']);
		if(!isset($utilisateur['id_utilisateur']) || trim($utilisateur['id_utilisateur']) == '') {
			$utilisateur['id_utilisateur'] = ($infos_complementaires['connecte']) ? $infos_complementaires['id_utilisateur'] : $utilisateur['courriel'];
			$utilisateur['prenom'] = trim($infos_complementaires['prenom']) != '' ? $infos_complementaires['prenom'] : $utilisateur['prenom'];
			$utilisateur['nom'] = trim($infos_complementaires['nom']) != '' ? $infos_complementaires['nom'] : $utilisateur['nom'];
		}

		return $utilisateur;
	}

	private function supprimerSlashesProfond($valeur) {
		$valeur = is_array($valeur) ? array_map(array($this, 'supprimerSlashesProfond'), $valeur) : stripslashes($valeur);
		return $valeur;
	}

	private function getMaxOrdre($id_utilisateur) {
		$ordre = null;
		$identifiant = Cel::db()->quote($id_utilisateur);
		$requete = 	"SELECT MAX(ordre) AS ordre ".
					"FROM cel_obs ".
					"WHERE ce_utilisateur = ".Cel::db()->proteger($id_utilisateur)." ";

		$ordre_max = Cel::db()->requeterValeurUnique($requete);
		if ($ordre_max !== false) {
			$ordre = $ordre_max + 1;
		}
		return $ordre;
	}

	/**
	 * Transforme une date au format français (jj/mm/aaaa) dans un format Mysql (aaaa-mm-jj).
	 * @param string $dateFr date au format français (jj/mm/aaaa)
	 * @return string date au format Mysql (aaaa-mm-jj)
	 */
	private function transormerDateFrVersMysql($dateFr) {
		$dateMysql = '0000-00-00';
		$morceauxDate = explode('/', $dateFr);
		if (count($morceauxDate) == 3) {
			$dateMysql = implode('-', array_reverse($morceauxDate));
		}
		return $dateMysql;
	}

	private function taguerObs($obs_a_taguer_ids) {
		if (count($obs_a_taguer_ids) > 0) {
			foreach ($this->tagsObs as $hierarchieTag) {
				$tagsALier = explode('>', $hierarchieTag);
				$liaisonOk = $this->lierObsAMotsCles($obs_a_taguer_ids, $tagsALier);
				if ($liaisonOk === false) {
					$e = "Toutes les observations n'ont pas pu être liées aux mots-clés : $hierarchieTag";
					$this->messages[] = $e;
				}
			}
		}
	}

	private function lierObsAMotsCles($observations_ids, $tags) {
		$chemin_parent = "/";
		$listeIdsTags = array();
		foreach ($tags as $tag) {
			$tag = $this->nettoyerTag($tag);
			if ($tag != '') {
				$id_mot_cle = $this->gestionMotsClesObs->insererParCheminSiInexistant($tag, $chemin_parent, $this->utilisateur_id);
				if ($id_mot_cle !== false) {
					$listeIdsTags[] = $id_mot_cle;
					$chemin_parent .= $tag."/";
				}
			}
		}

		$liaison_ok = $this->gestionMotsClesObs->lierParTableaux($listeIdsTags, $observations_ids);
		if($liaison_ok) {
			foreach($observations_ids as $id) {
				GestionMotsClesChemin::regenererIndexTexteMotCle($id, 'obs');
			}
		}
		return $liaison_ok;
	}

	private function taguerImg($img_a_taguer_ids) {
		if (count($img_a_taguer_ids) > 0) {
			$this->debug[] = "Tags img : ".print_r($this->tagsImg, true);
			foreach ($this->tagsImg as $hierarchieTag) {
				$tagsALier = explode('>', $hierarchieTag);
				$liaisonOk = $this->lierImgAMotsCles($img_a_taguer_ids, $tagsALier);
				if ($liaisonOk === false) {
					$e = "Toutes les images n'ont pas pu être liées aux mots-clés : $hierarchieTag";
					$this->messages[] = $e;
				}
			}
		}
		// Liaison des tags spécifiques à chaque image s'il y en a
		if (count($this->correspondanceIdImgTags) > 0) {
			foreach ($this->correspondanceIdImgTags as $id_img => $tags) {
				if ($tags != null && !empty($tags)) {
					$this->lierImgAMotsCles(array($id_img), $tags);
				}
			}
		}
	}

	private function lierImgAMotsCles($images_ids, $tags) {
		$chemin_parent = "/";
		$listeIdsTags = array();
		foreach ($tags as $tag) {
			$tag = $this->nettoyerTag($tag);
			if ($tag != '') {
				$id_mot_cle = $this->gestionMotsClesImages->insererParCheminSiInexistant($tag, $chemin_parent, $this->utilisateur_id);
				if ($id_mot_cle !== false) {
					$listeIdsTags[] = $id_mot_cle;
					$chemin_parent .= $tag."/";
				}
			}
		}
		$liaison_ok = $this->gestionMotsClesImages->lierParTableaux($listeIdsTags, $images_ids);
		if($liaison_ok) {
			foreach($images_ids as $id) {
				GestionMotsClesChemin::regenererIndexTexteMotCle($id, 'images');
			}
		}
		return $liaison_ok;
	}

	private function nettoyerTag($tag) {
		$tag = trim($tag);
		$tag = preg_replace('/(?:\s+|[,]+)/', ' ', $tag);
		return $tag;
	}

	private function traiterNomFichierImage($fichierNom) {
		$fichierNom = preg_replace('/[.](jpeg|jpg)$/i', '.jpg', strtolower(trim($fichierNom)));
		return $fichierNom;
	}

	/**
	* Décode l'image en base64,enregistre celle-ci sous forme de fichier du type de l'image
	*  dans un dossier temporaire.
	*/
	private function transformerBase64enFichier($cheminImage, $imageInfosB64) {
		// Enleve la partie data:image qui permet la previsalisation pour firefox de l'image en base64
		$imageBase64 = explode(';', $imageInfosB64);
		$dataBase64 = explode(',',$imageBase64[1]);
		$dataImg = base64_decode($dataBase64[1]);

		$imageRessource = fopen($cheminImage, 'wb');
		fwrite($imageRessource, $dataImg);
		fclose($imageRessource);

		if (file_exists($cheminImage) == false) {
			 $this->messages[] = "Erreur lors de la création du fichier";
		}
	}

	public function lierObsEtImg($id_image, $utilisateur, $ordre_obs) {
		$id_image = Cel::db()->proteger($id_image);
		$id_obs = Cel::db()->proteger($this->obtenirIdObsPourIdentifiantEtOrdre($utilisateur, $ordre_obs));

		$requete = 'INSERT INTO cel_obs_images '.
			'	(id_image, id_observation, date_liaison) '.
			"VALUES ($id_image, $id_obs, NOW()) ".
			'	ON DUPLICATE KEY UPDATE id_image = id_image';

		$liaison = true;
		if (Cel::db()->executer($requete) === false) {
			$this->messages[] = "La requête de liaison de l'obs $id_obs à l'image $id_image pour l'utilisateur $id_utilisateur a échouée.";
			$liaison = false;
		}
		return $liaison;
	}

	private function obtenirIdObsPourIdentifiantEtOrdre($id_utilisateur, $ordre) {

		$id_utilisateur = Cel::db()->proteger($id_utilisateur);
		$ordre = Cel::db()->proteger($ordre);

		$requete = 'SELECT id_observation '.
			'FROM cel_obs '.
			"WHERE ce_utilisateur = $id_utilisateur ".
			"	AND ordre = $ordre ";

		$resultat = Cel::db()->requeter($requete);

		$id_obs = (count($resultat) > 0) ? $resultat[0]['id_observation'] : false;
		return $id_obs;
	}

	private function obtenirIdsObsPourTableauOrdres($id_utilisateur, $ordres) {
		$this->debug[] = print_r($ordres,true);
		$id_utilisateur = Cel::db()->proteger($id_utilisateur);
		$ordres = array_map(array(Cel::db(),'proteger'), $ordres);

		$requete = 'SELECT id_observation '.
			'FROM cel_obs '.
			"WHERE ce_utilisateur = $id_utilisateur ".
			"	AND ordre IN (".implode(',',$ordres).") ";
		$this->debug[] = $requete;
		$resultat = Cel::db()->requeter($requete);
		$ids = array();
		foreach($resultat as $id) {
			$ids[] = $id['id_observation'];
		}
		return $ids;
	}

	public function nettoyerImagesUploades() {
		$dossierStockage = $this->config['cel']['chemin_stockage_temp'].'/';
		if (is_dir($dossierStockage)) {
			$objets = scandir($dossierStockage);
			if ($objets !== false) {
				foreach ($objets as $objet) {
					$chemin = $dossierStockage.$objet;
					if (is_file($chemin)) {
						$filemtime = @filemtime($chemin);
						if ($filemtime !== false) {
							$suppression = (time() - $filemtime >= self::DUREE_DE_VIE_IMG) ? true : false;
							if ($suppression === true) {
								unlink($chemin);
							}
						}
					}
				}
			}
		}
	}

	/**
	* Ajoute une image dans la base de données et stocke le fichier en fabriquant les miniatures,
	* renvoie le nouvel id d'image en cas de succès
	*
	* @param string $utilisateur l'utilisateur
	* @param string $cheminImage le chemin vers le fichier original de l'image
	* @param string $nomFichierImage le nom du fichier original de l'image
	*/
	public function ajouterImageSurDdEtBdd($utilisateur, $cheminImage, $nomFichierImage) {
		$idImage = false;
		$idUtilisateur = $utilisateur['id_utilisateur'];
		$nouvelOrdre = $this->obtenirNouvelOrdrePourUtilisateur($idUtilisateur);
		if ($nouvelOrdre !== false) {
			if (file_exists($cheminImage)) {
				$extracteurMetadonnees = new ExtracteurMetadonnees();
				$metadonnees = $extracteurMetadonnees->extraireMetadonnees($cheminImage) ;
				if ($metadonnees !== false) {
					$infosImage = $metadonnees;
					$infosImage['ordre'] = $nouvelOrdre;
					$infosImage['publiable_eflore'] = 'false';
					$infosImage['nom_original'] = $nomFichierImage;
					$infosImage['ce_utilisateur'] = $idUtilisateur;
					$infosImage['courriel_utilisateur'] = $utilisateur['courriel'];
					$infosImage['nom_utilisateur'] = $utilisateur['nom'];
					$infosImage['prenom_utilisateur'] = $utilisateur['prenom'];
					$infosImage['md5'] = md5_file($cheminImage);
					$this->debug[] = 'Nom fichier img meta :'.$nomFichierImage;
					$requete = $this->construireRequeteInsertionImage($infosImage);
					$resultat = Cel::db()->executer($requete);
					if ($resultat !== false) {
						$idImage = $this->obtenirIdImagePourIdentifiantEtOrdre($idUtilisateur, $nouvelOrdre);
						if ($idImage !== false) {
							$manipulateurImage = new ImageRecreation($this->config);
							$stockageOk = $manipulateurImage->stockerFichierOriginal($cheminImage, $idImage);
							if ($stockageOk) {
								$miniatureChemin = str_replace('.jpg', '_min.jpg', $cheminImage);
								if (file_exists($miniatureChemin)) {
									if (@unlink($miniatureChemin) === false) {
										$this->messages[] = "La miniature de l'image n'a pu être supprimée.";
									}
								}

							} else {
								$this->messages[] = "Une erreur s'est produite lors du stockage du fichier.";
							}
						} else {
							$this->messages[] =  "Impossible d'obtenir le nouvel identifiant de l'image";
						}
					} else {
						$this->messages[] = "Echec de l'insertion dans la base de donnees des informations de l'image.";
					}
				} else {
					$this->messages[] = "Erreur lors de l'extraction des metadonnées.";
				}
			} else {
				$this->messages[] = "L'image originale est introuvable sur le serveur.";
			}
		} else {
			$this->messages[] = "Erreur lors du calcul du nouvel ordre de l'image.";
		}
		return $idImage;
	}

	private function obtenirNouvelOrdrePourUtilisateur($id_utilisateur) {
		$id_utilisateur = Cel::db()->proteger($id_utilisateur);

		$requete = 'SELECT MAX(ordre) as max_ordre '.
			'FROM cel_images '.
			"WHERE ce_utilisateur = $id_utilisateur ";
		$resultat = Cel::db()->requeter($requete);

		$ordre = ($resultat) ? ++$resultat[0]['max_ordre'] : 0;
		return $ordre;
	}

	private function obtenirIdImagePourIdentifiantEtOrdre($id_utilisateur, $ordre) {
		$id_utilisateur = Cel::db()->proteger($id_utilisateur);
		$ordre = Cel::db()->proteger($ordre);

		$requete = 'SELECT id_image '.
			'FROM cel_images '.
			"WHERE ce_utilisateur = $id_utilisateur ".
			"	AND ordre = $ordre ";
		$resultat = Cel::db()->requeter($requete);

		$id_image = (count($resultat) > 0) ? $resultat[0]['id_image'] : false;
		return $id_image;

	}

	private function construireRequeteInsertionImage($informations) {
		$champs = array('date_creation');
		$valeurs = array('CURRENT_TIMESTAMP()');

		foreach ($informations as $champ => $valeur) {
			$champs[] = $champ;
			$valeurs[] = is_null($valeur) ? 'NULL' : Cel::db()->proteger($valeur);
			if ($champ == 'date_creation' && $valeur != 'NULL') {
				$champs[] = 'date_creation';
				$valeurs[] = Cel::db()->proteger($valeur);
			}
		}
		$champs = implode(', ', $champs);
		$valeurs = implode(', ', $valeurs);

		$requete = "INSERT INTO cel_images ($champs) VALUES ($valeurs) ";

		return $requete;
	}
}
?>