Rev 257 | Rev 268 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed
<?php// declare(encoding='UTF-8');/*** Classe Controleur du module Fiche Collection.** @category Php 5.2* @package Collection* @author Jean-Pascal MILCENT <jpm@tela-botanica.org>* @copyright 2010 Tela-Botanica* @license http://www.cecill.info/licences/Licence_CeCILL_V2-fr.txt Licence CECILL* @license http://www.gnu.org/licenses/gpl.html Licence GNU-GPL* @version SVN: $Id: Fiche.php 96 2010-06-21 16:46:31Z jpm $*/class FicheCollection extends Fiche {private $donnees = array();protected $collectionDao = null;//+----------------------------------------------------------------------------------------------------------------+// Méthodes/*** Fonction d'affichage par défaut*/public function executerActionParDefaut() {return $this->afficherCollection();}// +---------------------------------------------------------------------------------------------------------------+// FICHE COLLECTIONpublic function afficherCollection() {// Gestion des actions par défaut$this->executerAction('Recherche', 'chargerMoteurRecherche');// Gestion des données de la requêteif (!isset($_GET['id'])) {} else {// Récupération des données$this->donnees['id'] = $_GET['id'];$this->donnees['info'] = $this->collectionDao->getCollection($this->donnees['id']);$this->creerPaginationPersonnes($this->donnees['id']);$this->creerPaginationPublications($this->donnees['id']);$this->creerPaginationCommentaires($this->donnees['id']);// Traitements des données$this->traiterDonneesCollection($this->donnees['info']);$this->traiterDonneesCollectionAPersonne($this->donnees['personnes']);$this->traiterDonneesElementAPublication($this->donnees['publications']);$this->traiterDonneesCollectionDescription($this->donnees['info']);$this->traiterDonneesCollectionContenu($this->donnees['info']);$this->traiterDonneesCollectionInventaire($this->donnees['info']);$this->traiterDonneesCollectionACommentaire($this->donnees['commentaires']);$this->postraiterDonnees($this->donnees);$this->donnees['info'] = $this->formaterMetaDonneesSpecifiques($this->donnees['info']);$this->donnees['metadonnees'] = $this->traiterMetaDonnees($this->donnees['info']);// Création des méta-données de la page$titre = $this->donnees['info']['cc_nom'];$description = $this->donnees['info']['cc_description'];$tags = "Collection, id:{$this->donnees['id']}, {$this->donnees['info']['_guid_']}";// Envoie à la sortie//Debug::printr($this->donnees);$this->setSortie(self::META_TITRE, $titre);$this->setSortie(self::META_DESCRIPTION, $description);$this->setSortie(self::META_TAGS, $tags);$this->setSortie(self::RENDU_CORPS, $this->getVue('fiche_collection', $this->donnees));$this->chargerPiedDePage();}}private function formaterMetaDonneesSpecifiques($donnees_info) {// TODO: ceci cause trois appels de web services supplémentaires// l'idéal serait d'avoir un service qui renvoie tout ça une fois// (après l'appel n'est pas très couteux en temps et performance)$sources = $this->collectionDao->getPublicationsSourcesLiees($this->donnees['id']);$experts = $this->collectionDao->getPersonnesLieesExpertes($this->donnees['id']);$contributeurs = $this->collectionDao->getPersonnesLieesContributrices($this->donnees['id']);$donnees_info['contributeur'] = $this->formaterTableauMetadonnees($contributeurs, 'cp_fmt_nom_complet');$donnees_info['expert'] = $this->formaterTableauMetadonnees($experts, 'cp_fmt_nom_complet');$donnees_info['cmhl_source'] = $this->formaterTableauMetadonnees($sources, 'cpu_fmt_nom_complet', "<br />");return $donnees_info;}private function formaterTableauMetadonnees(&$donnees, $champ_a_extraire, $separateur = ", ") {$donnees_fmt = array();foreach($donnees as &$donnee) {$donnees_fmt[] = $donnee[$champ_a_extraire];}return implode($separateur, $donnees_fmt);}private function creerPaginationPersonnes($id_collection) {// Gestion du nombre de résultats$donnees_total = $this->collectionDao->getNbrePersonnesLiees($id_collection);// Gestion du fragmenteur$urlFiche = $this->obtenirObjetUrlFicheCollection($id_collection);$options = array('url' => $urlFiche,'donnees_total' => $donnees_total,'donnees_par_page' => Config::get('resultat_par_page_defaut'),'donnees_par_page_choix' => Config::get('resultat_par_page_choix'),);$fragmenteur = Composant::fabrique('fragmenteur', $options);$this->donnees['personnesFrag'] = $fragmenteur->executer();list($de, $a) = $fragmenteur->getDeplacementParPageId();$this->url->unsetVariablesRequete(array('page'));// Gestion de l'accès aux données$this->collectionDao->setLimitation(($de - 1), $fragmenteur->getDonneesParPage());$this->collectionDao->setDistinction(1);$this->donnees['personnes'] = $this->collectionDao->getPersonnesLiees($id_collection);}private function creerPaginationPublications($id_collection) {// Gestion du nombre de résultats$donnees_total = $this->collectionDao->getNbrePublicationsLiees($id_collection);// Gestion du fragmenteur$urlFiche = $this->obtenirObjetUrlFicheCollection($id_collection);$options = array('url' => $urlFiche,'donnees_total' => $donnees_total,'donnees_par_page' => Config::get('resultat_par_page_defaut'),'donnees_par_page_choix' => Config::get('resultat_par_page_choix'),);$fragmenteur = Composant::fabrique('fragmenteur', $options);$this->donnees['publicationsFrag'] = $fragmenteur->executer();list($de, $a) = $fragmenteur->getDeplacementParPageId();$this->url->unsetVariablesRequete(array('page'));// Gestion de l'accès aux données$this->collectionDao->setLimitation(($de - 1), $fragmenteur->getDonneesParPage());$this->collectionDao->setDistinction(1);$this->donnees['publications'] = $this->collectionDao->getPublicationsLiees($id_collection);}private function creerPaginationCommentaires($id_collection) {// Gestion du nombre de résultats$donnees_total = $this->collectionDao->getNbreCommentairesLies($id_collection);// Gestion du fragmenteur$urlFiche = $this->obtenirObjetUrlFicheCollection($id_collection);$options = array('url' => $urlFiche,'donnees_total' => $donnees_total,'donnees_par_page' => Config::get('resultat_par_page_defaut'),'donnees_par_page_choix' => Config::get('resultat_par_page_choix'),);$fragmenteur = Composant::fabrique('fragmenteur', $options);$this->donnees['commentairesFrag'] = $fragmenteur->executer();list($de, $a) = $fragmenteur->getDeplacementParPageId();$this->url->unsetVariablesRequete(array('page'));// Gestion de l'accès aux données$this->collectionDao->setLimitation(($de - 1), $fragmenteur->getDonneesParPage());$this->collectionDao->setDistinction(1);$this->donnees['commentaires'] = $this->collectionDao->getCommentairesLies($id_collection);}private function traiterDonneesCollection(&$donnees) {// liste 29 : Liste des types de collection dans le standard NCDOntologie::chargerListe(1032);// liste 30 : Liste des types de dépôt de collectionOntologie::chargerListe(1033);// liste 31 : Liste des principes de groupement d'une collection dans le standard NCDOntologie::chargerListe(1034);// liste 32 : Liste des buts de réalisation d'une collection dans le standard NCDOntologie::chargerListe(1035);// liste 38 : Liste indéterminé/peut-être/oui/nonOntologie::chargerListe(1041);// liste 39 : Liste des types de classement des spécimens types dans une collectionOntologie::chargerListe(1042);// liste 79 : Liste exact/approximatifOntologie::chargerListe(1082);$guid_id_valeur = Config::get('guid_id_collection').$donnees['cc_id_collection'];$donnees['_guid_'] = sprintf(Config::get('guid'), $guid_id_valeur);$donnees['_structure_url_'] = $this->obtenirUrlFicheStructure($donnees['cc_ce_structure']);$donnees['_nom_alternatif_'] = $this->construireTxtTruck($donnees['cc_truk_nom_alternatif']);$donnees['_type_ncd_'] = $this->construireTxtListeOntologie($donnees['cc_ce_type']);$donnees['_type_depot_'] = $this->construireTxtListeOntologie($donnees['cc_ce_type_depot']);$donnees['_code_'] = $this->construireTxtTruckSansMajuscule($donnees['cc_truk_code']);$donnees['_url_'] = $this->construireTxtTruckSansMajuscule($donnees['cc_truk_url']);$donnees['_specimen_type_'] = $this->construireTxtListeOntologie($donnees['cc_ce_specimen_type']);$donnees['_specimen_type_nbre_'] = ($donnees['cc_specimen_type_nbre'] == 0) ? '' : $donnees['cc_specimen_type_nbre'];$donnees['_specimen_type_nbre_precision_'] = $this->construireTxtListeOntologie($donnees['cc_ce_specimen_type_nbre_precision']);$donnees['_specimen_type_nbre_precision_'] = $this->formaterParenthese($donnees['_specimen_type_nbre_precision_']);$donnees['_specimen_type_classement_'] = $this->construireTxtListeOntologie($donnees['cc_ce_specimen_type_classement']);$donnees['_couverture_lieu_'] = $this->construireTxtTruck($donnees['cc_truk_couverture_lieu']);$donnees['_couverture_periode_'] = $donnees["cc_periode_constitution_debut"];$donnees['_couverture_periode_'] .= ($donnees["cc_periode_constitution_fin"] != "") ? " - ".$donnees["cc_periode_constitution_fin"] : "";}private function traiterDonneesCollectionAPersonne(&$personnes) {// liste 27 : Liste des relations entre une collection et une personneOntologie::chargerListe(1030);// liste 77 : Liste indéterminé/oui/nonOntologie::chargerListe(1080);foreach ($personnes as &$personne) {$personne['_role_'] = $this->construireTxtListeOntologie($personne['ccap_id_role']);$personne['_deces_'] = $this->construireTxtListeOntologie($personne['cp_ce_deces']);$personne['_naissance_date_'] = $this->formaterDate($personne['cp_naissance_date'], aControleur::FMT_DATE);$personne['_deces_date_'] = $this->formaterDate($personne['cp_deces_date'], aControleur::FMT_DATE, '');$personne['_url_'] = $this->obtenirUrlFichePersonne($personne['ccap_id_personne']);}}private function traiterDonneesCollectionDescription(&$donnees) {// liste 22 : Liste de traitement anti-insecte pour les collections botaniquesOntologie::chargerListe(1025);// liste 23 : Liste des poisons utilisés pour les collections botaniquesOntologie::chargerListe(1026);// liste 38 : Liste indéterminé/peut-être/oui/nonOntologie::chargerListe(1041);// liste 41 : Liste des types d'unité de rangement pour les collections botaniquesOntologie::chargerListe(1044);// liste 42 : Liste des étatsOntologie::chargerListe(1045);// liste 43 : Liste des types de support pour les spécimens des collections botaniquesOntologie::chargerListe(1046);// liste 44 : Liste des types de papier de support pour les spécimens des collections botaniquesOntologie::chargerListe(1047);// liste 45 : Liste des méthodes de rangement des supports pour les spécimens des collections botaniquesOntologie::chargerListe(1048);// liste 46 : Liste des méthodes de fixation sur le support pour les collections botaniquesOntologie::chargerListe(1049);// liste 47 : Liste des méthodes de fixation des étiquettes sur les spécimens pour les collections botaniquesOntologie::chargerListe(1050);// liste 48 : Liste des types d'écriture d'étiquetteOntologie::chargerListe(1051);// liste 49 : Liste des origines des dégradations des spécimens de collections botaniquesOntologie::chargerListe(1052);// liste 50 : Liste des origines des dégradations des supports de collections botaniquesOntologie::chargerListe(1053);// liste 51 : Liste des niveaux de détermination des spécimens de collections botaniquesOntologie::chargerListe(1054);$donnees['_type_'] = $this->construireTxtListeOntologie($donnees['ccb_ce_truk_type']);$etats = array("1" => "Très mauvais", "2" => "Mauvais", 3 => "Moyen", "4" => "Bon", 5 => "Très bon");$donnees['_unite_rangement_etat_'] = isset($etats[$donnees['ccb_ce_unite_rangement_etat']]) ? $etats[$donnees['ccb_ce_unite_rangement_etat']] : "";$donnees['_cartons_'] = ($donnees['ccb_format_cartons_herbier'] === "") ? $donnees['ccb_nb_cartons_herbier'] : $donnees['ccb_nb_cartons_herbier']." ".$donnees['ccb_format_cartons_herbier'];$donnees['_liasses_'] = ($donnees['ccb_format_liasses'] === "") ? $donnees['ccb_nb_liasses'] : $donnees['ccb_nb_liasses']." ".$donnees['ccb_format_liasses'];$donnees['_autres_rangements_'] = $donnees["ccb_autres_unites_rangement"];$donnees['_nb_planches_herbier_'] = $donnees["ccb_nb_planches_herbiers"];$donnees['_nb_especes_'] = $donnees["ccb_nb_especes"];$donnees['_conservation_papier_type_'] = $this->construireTxtListeOntologie($donnees['ccb_truk_conservation_papier_type']);$donnees['_conservation_methode_'] = $this->construireTxtListeOntologie($donnees['ccb_truk_conservation_methode']);$donnees['_specimen_fixation_methode_'] = $this->construireTxtListeOntologie($donnees['ccb_truk_specimen_fixation_methode']);$donnees['_etiquette_fixation_support_'] = $this->construireTxtListeOntologie($donnees['ccb_truk_etiquette_fixation_support']);$donnees['_etiquette_fixation_specimen_'] = $this->construireTxtListeOntologie($donnees['ccb_truk_etiquette_fixation_specimen']);$donnees['_etiquette_ecriture_'] = $this->construireTxtListeOntologie($donnees['ccb_truk_etiquette_ecriture']);$donnees['_traitement_'] = $this->construireTxtListeOntologie($donnees['ccb_ce_traitement']);$donnees['_traitement_poison_'] = $this->construireTxtListeOntologie($donnees['ccb_truk_traitement_poison']);$donnees['_traitement_insecte_'] = $this->construireTxtListeOntologie($donnees['ccb_truk_traitement_insecte']);$donnees['_etat_general_'] = isset($etats[$donnees['ccb_ce_etat_general']]) ? $etats[$donnees['ccb_ce_etat_general']] : "";$valeurEstOntologie = false;$typeEstOntologie = true;$donneeEstOntologie = true;$donnees['_degradation_specimen_'] = $this->construireTxtListeOntologie($donnees['ccb_truk_degradation_specimen'], $valeurEstOntologie, $typeEstOntologie, $donneeEstOntologie);$donnees['_degradation_presentation_'] = $this->construireTxtListeOntologie($donnees['ccb_truk_degradation_presentation'], $valeurEstOntologie, $typeEstOntologie, $donneeEstOntologie);$donnees['_determination_'] = $this->construireTxtListeOntologie($donnees['ccb_ce_determination']);}private function traiterDonneesCollectionContenu(&$donnees) {// liste 20 : Liste oui/non/en partieOntologie::chargerListe(1023);// liste 37 : Liste des siècles pour les collections naturalistesOntologie::chargerListe(1040);// liste 38 : Liste indéterminé/peut-être/oui/nonOntologie::chargerListe(1041);// liste 42 : Liste des étatsOntologie::chargerListe(1045);// liste 52 : Liste des types de date de débutOntologie::chargerListe(1055);// liste 53 : Liste des types de date de finOntologie::chargerListe(1056);// liste 80 : Liste des types de collection botaniqueOntologie::chargerListe(1083);$donnees['_nature_'] = $this->construireTxtListeOntologie($donnees['ccb_truk_nature']);$donnees['_periode_constitution_'] = $this->construireTxtListeOntologie($donnees['cc_truk_periode_constitution']);$donnees['_classement_etat_'] = $this->construireTxtListeOntologie($donnees['ccb_ce_classement_etat']);$donnees['_etiquette_renseignement_'] = $this->construireTxtEtiquetteRenseignement($donnees['ccb_truk_etiquette_renseignement']);$donnees['_precision_localite_'] = $this->construireTxtListeOntologie($donnees['ccb_ce_precision_localite']);$donnees['_precision_date_'] = $this->construireTxtListeOntologie($donnees['ccb_ce_precision_date']);$donnees['_collection_integre_'] = $this->construireTxtListeOntologie($donnees['ccb_ce_collection_integre']);$donnees['_collection_integre_info_'] = $this->construireTxtListeOntologie($donnees['ccb_ce_collection_integre_info']);}private function traiterDonneesCollectionInventaire(&$donnees) {// liste 38 : Liste indéterminé/peut-être/oui/nonOntologie::chargerListe(1041);// liste 57 : Liste indéterminé/parfois/oui/nonOntologie::chargerListe(1060);// liste 58 : Liste des formes d'inventaireOntologie::chargerListe(1061);// liste 59 : Liste des types de logiciel pour les inventaires informatiquesOntologie::chargerListe(1062);// liste 60 : Liste des états d'inventaireOntologie::chargerListe(1063);$donnees['_inventaire_'] = $this->construireTxtListeOntologie($donnees['ccb_ce_inventaire']);$donnees['_inventaire_auteur_'] = $this->construireTxtListeOntologie($donnees['ccb_ce_inventaire_auteur']);$donnees['_inventaire_forme_'] = $this->construireTxtListeOntologie($donnees['ccb_ce_inventaire_forme']);$donnees['_inventaire_digital_'] = $this->construireTxtListeOntologie($donnees['ccb_ce_truk_inventaire_digital']);$donnees['_inventaire_etat_'] = $this->construireTxtListeOntologie($donnees['ccb_ce_inventaire_etat']);}private function traiterDonneesCollectionACommentaire(&$commentaires) {// liste 65 : Liste des types de commentaires associés à une collectionOntologie::chargerListe(1068);foreach ($commentaires as &$commentaire) {$commentaire['_type_'] = $this->construireTxtListeOntologie($commentaire['ccac_truk_type']);}}private function construireTxtEtiquetteRenseignement($valeur) {$etiquetteRenseignements = '';$infos = $this->parserEtiquetteRenseignement($valeur);if (count($infos) > 0) {foreach ($infos as $cle => $info) {if ($cle == 'AT') {$etiquetteRenseignements .= 'auteur de la collection';} else if ($cle == 'F') {$etiquetteRenseignements .= 'famille';} else if ($cle == 'G') {$etiquetteRenseignements .= 'genre';} else if ($cle == 'SP') {$etiquetteRenseignements .= 'espèce';} else if ($cle == 'ASP') {$etiquetteRenseignements .= "auteur de l'espèce";} else if ($cle == 'L') {$etiquetteRenseignements .= 'localité';} else if ($cle == 'D') {$etiquetteRenseignements .= 'date de récolte';} else {$etiquetteRenseignements .= 'Inconnue';}$etiquetteRenseignements .= ': '.$info.'%, ';}$etiquetteRenseignements = rtrim($etiquetteRenseignements, ', ').'.';}return $etiquetteRenseignements;}private function parserEtiquetteRenseignement($valeurTruk) {$infos = array();if ($valeurTruk != '') {$pourcentages = explode(self::SEPARATEUR_VALEURS, $valeurTruk);foreach ($pourcentages as $pourcentage) {$pourcentageIdValeur = explode(self::SEPARATEUR_TYPE_VALEUR, $pourcentage);$id = $pourcentageIdValeur[0];$valeur = $pourcentageIdValeur[1];$infos[$id] = $valeur;}}return $infos;}private function parserValeurUniteBase($valeurTruk) {$unitesEnregistrees = array();if ($valeurTruk != '') {$unites = explode(self::SEPARATEUR_VALEURS, $valeurTruk);$unites_nbre = count($unites);for ($i = 0; $i < $unites_nbre; $i++) {$uniteTypeIdDonnees = explode(self::SEPARATEUR_TYPE_VALEUR, $unites[$i]);$uniteChaineDonnees = $uniteTypeIdDonnees[1];$uniteDonnees = explode(self::SEPARATEUR_DONNEES, $uniteChaineDonnees);$uniteDonneesNbre = count($uniteDonnees);$uniteBase = array();if ($uniteDonneesNbre > 0) {$uniteBase['nbre'] = $uniteDonnees[0];}if ($uniteDonnees[0] > 0 || $uniteDonnees[2] != '' || $uniteDonnees[3] > 0 || $uniteDonnees[5] > 0) {if ($uniteDonneesNbre > 1) {$uniteBase['precision'] = self::getPrecisionNom($uniteDonnees[1]);}if ($uniteDonneesNbre > 2) {$uniteBase['format'] = $uniteDonnees[2];}if ($uniteDonneesNbre > 3) {$uniteBase['part_nbre'] = $uniteDonnees[3];}if ($uniteDonneesNbre > 4) {$uniteBase['part_precision'] = self::getPrecisionNom($uniteDonnees[4]);}if ($uniteDonneesNbre > 5) {$uniteBase['sp_nbre'] = $uniteDonnees[5];}if ($uniteDonneesNbre > 6) {$uniteBase['sp_precision'] = self::getPrecisionNom($uniteDonnees[6]);}if (preg_match('/^[0-9]+$/', $uniteTypeIdDonnees[0])) {$uniteBase['id'] = $uniteTypeIdDonnees[0];$uniteBase['type'] = Ontologie::getValeurNom($uniteTypeIdDonnees[0]);} else {$uniteBase['type'] = $uniteTypeIdDonnees[0];}$unitesEnregistrees[] = $uniteBase;}}}return $unitesEnregistrees;}private function parserValeurUniteRangement($valeurTruk) {$unitesEnregistrees = array();if ($valeurTruk != '') {$unites = explode(self::SEPARATEUR_VALEURS, $valeurTruk);$unites_nbre = count($unites);for ($i = 0; $i < $unites_nbre; $i++) {$uniteTypeIdDonnees = explode(self::SEPARATEUR_TYPE_VALEUR, $unites[$i]);$uniteChaineDonnees = $uniteTypeIdDonnees[1];$uniteDonnees = explode(self::SEPARATEUR_DONNEES, $uniteChaineDonnees);$uniteDonneesNbre = count($uniteDonnees);$uniteRangement = array();if ($uniteDonneesNbre > 0) {$uniteRangement['nbre'] = $uniteDonnees[0];}if ($uniteRangement['nbre'] > 0) {if ($uniteDonneesNbre > 1) {$uniteRangement['precision'] = self::getPrecisionNom($uniteDonnees[1]);}if ($uniteDonneesNbre > 2) {$uniteRangement['format'] = $uniteDonnees[2];}if (preg_match('/^[0-9]+$/', $uniteTypeIdDonnees[0])) {$uniteRangement['id'] = $uniteTypeIdDonnees[0];$uniteRangement['type'] = Ontologie::getValeurNom($uniteTypeIdDonnees[0]);} else {$uniteRangement['type'] = $uniteTypeIdDonnees[0];}$unitesEnregistrees[] = $uniteRangement;}}}return $unitesEnregistrees;}private static function getPrecisionNom($precisionAbr) {$precision_nom = '';if ($precisionAbr != 'NULL') {// liste 79 : Liste exact/approximatif$precisions = Ontologie::getListeFormatee(1082);foreach ($precisions as $precision) {if ($precision['abreviation'] == $precisionAbr) {$precision_nom = $precision['nom'];break;}}}return $precision_nom;}}