Rev 1719 | Rev 1821 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed
<?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 CelMotCle {private $projet = null;private $tagsObs = null;private $tagsImg = null;private $champsEtendusObs = null;private $utilisateur_id = null;const DUREE_DE_VIE_IMG = 86400;// 3600 * 24 * 2 = 172 800const ARRET_SERVICE = false;// Permet de bloquer le service en cas de problème sur le serveurprivate $correspondanceIdImgTags = array();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 : ok';$this->projet = $requeteDonnees['projet'];if (array_key_exists('tag-obs', $requeteDonnees) && $requeteDonnees['tag-obs'] != '') {$this->tagsObs = explode(',', $requeteDonnees['tag-obs']);}$this->tagsObs[] = 'Projets coopératifs>'.$this->projet;if (array_key_exists('tag-img', $requeteDonnees) && $requeteDonnees['tag-img'] != '') {$this->tagsImg = explode(',', $requeteDonnees['tag-img']);}$this->tagsImg[] = 'Projets coopératifs>'.$this->projet;if (filter_var($requeteDonnees['utilisateur']['courriel'], FILTER_VALIDATE_EMAIL)) {$this->debug[] = 'Utilisateur : ok';$utilisateur = $requeteDonnees['utilisateur'];if (array_key_exists('courriel', $utilisateur)) {$this->debug[] = 'Courriel : ok';$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['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);}$observations[$ordreObs] = array('obs' => $this->protegerTableau($obsAAjouter),'img' => $imgAAjouter);}}$this->debug[] = 'Nbre obs ajoutée : '.count($observations);// 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()->executerRequeteSimple($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 traiteif ($img != null) {$this->nettoyerImagesUploades();$img_a_taguer_ids = $this->stockerImagesEtLierAObs($img, $id_utilisateur, $utilisateur);}}$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.";}$msg = (count($this->messages) > 0) ? 'erreur' : 'ok';$retour = (object) array('msg' => $msg);$this->envoyerJson($retour);exit;}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;}}}}$ajout_champ_etendus = $gestionChampsEtendus->ajouterParLots($champs_etendus_obs);return $ajout_champ_etendus;}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 64if (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 64if (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()->executerRequete($requete, 'Column');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) {$idTagParent = self::OBS_RACINE_ID;$listeIdsTags = array();foreach ($tags as $tag) {$tag = $this->nettoyerTag($tag);if ($tag != '') {$id_mot_cle = $this->ajouterMotCleObs($this->utilisateur_id, $tag, $idTagParent);if ($id_mot_cle !== false) {$listeIdsTags[] = $id_mot_cle;$idTagParent = $id_mot_cle;}}}$liaison_ok = $this->lierMotCleObs($this->utilisateur_id, $listeIdsTags, $observations_ids);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 aif(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) {$idTagParent = self::IMG_RACINE_ID;$listeIdsTags = array();foreach ($tags as $tag) {$tag = $this->nettoyerTag($tag);if ($tag != '') {$id_mot_cle = $this->ajouterMotCleImg($this->utilisateur_id, $tag, $idTagParent);if ($id_mot_cle !== false) {$listeIdsTags[] = $id_mot_cle;$idTagParent = $id_mot_cle;}}}$liaison_ok = $this->lierMotCleImg($this->utilisateur_id, $listeIdsTags, $images_ids);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()->executerRequeteSimple($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()->executerRequete($requete);$id_obs = (count($resultat) > 0) ? $resultat[0]['id_observation'] : false;return $id_obs;}private function obtenirIdsObsPourTableauOrdres($id_utilisateur, $ordres) {$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).") ";$resultat = Cel::db()->executerRequete($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()->executerRequeteSimple($requete);if ($resultat !== false) {$idImage = $this->obtenirIdImagePourIdentifiantEtOrdre($idUtilisateur, $nouvelOrdre);if ($idImage !== false) {$manipulateurImage = new ImageRecreation($this->config);$stockageOk = $manipulateurImage->stockerFichierEtCreerMiniatures($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()->executerRequete($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()->executerRequete($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;}}?>