| New file |
|---|
| 0,0 → 1,632 |
|---|
| <?php |
| |
| /** |
| * @category PHP |
| * @package jrest |
| * @author Raphaël Droz <raphael@tela-botania.org> |
| * @copyright 2013 Tela-Botanica |
| * @license http://www.cecill.info/licences/Licence_CeCILL_V2-fr.txt Licence CECILL |
| * @license GPL v3 <http://www.gnu.org/licenses/gpl.txt> |
| */ |
| define('SEPARATEUR_IMAGES', ","); |
| |
| Class FormateurGroupeColonne { |
| |
| // cache pour les données des fonctions |
| static $cache = Array(); |
| |
| // test sur la table cel_references, mis à TRUE si la table existe |
| static $is_table = false; |
| |
| // les groupes de champs utilisables |
| static $fieldGroups = array( |
| 'standard', |
| 'avance', |
| 'etendu', |
| 'baseflor' |
| ); |
| |
| // les données baseflor à récupérer: colonnes présentes dans cel_references |
| // et intitulés associés |
| static $baseflor_col = array( |
| "ve_lumiere" => "Lumière", |
| "ve_temperature" => "Température", |
| "ve_continentalite" => "Continentalité", |
| "ve_humidite_atmos" => "Humidité Atmosphérique", |
| "ve_humidite_edaph" => "Humidité", |
| "ve_reaction_sol" => "Réaction (pH)", |
| "ve_nutriments_sol" => "Nutriments", |
| "ve_salinite" => "Salinité", |
| "ve_texture_sol" => "Texture" , |
| "ve_mat_org_sol" => "Matière Organique", |
| "catminat_code" => "Code Catminat", |
| "syntaxon" => "Syntaxon", |
| ); |
| |
| static function colGroupsValidation($groupe_de_champs = 'standard,avance') { |
| if(! $groupe_de_champs) return FALSE; |
| if(is_string($groupe_de_champs)) { |
| $groupe_de_champs = array_flip(explode(',', $groupe_de_champs)); |
| } |
| elseif(is_array($groupe_de_champs)) { |
| $groupe_de_champs = array_flip($groupe_de_champs); |
| } |
| else { |
| return NULL; |
| } |
| $groupe_de_champs = array_intersect_key(array_flip(self::$fieldGroups), |
| $groupe_de_champs); |
| if(!$groupe_de_champs) return FALSE; |
| // toujours ajouter standard |
| $groupe_de_champs['standard'] = TRUE; |
| return implode(',', array_keys($groupe_de_champs)); |
| } |
| |
| /* |
| * @param $fieldSets: un liste de noms de colonnes ou de sets de colonnes |
| * séparés par des virgules |
| * eg: "espece" ou "champs-etendus", ... |
| * |
| * @return: un tableau associatif déjà ordonné |
| * clé: abbrev [machine-name] de la colonne (eg: "espece" ou "mot-clef") |
| * valeur: des données relative à cette colonne, cf GenColInfo |
| * |
| * @TODO: noms communs à part, gestion des champs étendus |
| * |
| */ |
| static function nomEnsembleVersListeColonnes($groupe_de_champs = 'standard') { |
| if(! $groupe_de_champs) $groupe_de_champs = 'standard'; |
| if(is_string($groupe_de_champs)) { |
| $groupe_de_champs = array_flip(explode(',', $groupe_de_champs)); |
| } |
| elseif(is_array($groupe_de_champs)) { |
| $groupe_de_champs = array_flip($groupe_de_champs); |
| } |
| else { |
| return NULL; |
| } |
| $groupe_de_champs = array_intersect_key(array_flip(self::$fieldGroups), |
| $groupe_de_champs); |
| if(!$groupe_de_champs) return NULL; |
| |
| $colonnes = Array(); |
| |
| if(isset($groupe_de_champs['standard'])) { |
| $colonnes += Array( |
| 'nom_sel' => self::GenColInfo('nom_sel', 'Espèce'), |
| 'nom_sel_nn' => self::GenColInfo('nom_sel_nn', 'Numéro nomenclatural', 0, NULL, NULL, FALSE), |
| 'nom_ret' => self::GenColInfo('nom_ret', 'Nom retenu', 0, NULL, NULL, FALSE), |
| 'nom_ret_nn' => self::GenColInfo('nom_ret_nn', 'Numéro nomenclatural nom retenu', 0, NULL, NULL, FALSE), |
| 'nt' => self::GenColInfo('nt', 'Numéro taxonomique', 0, NULL, NULL, FALSE), |
| 'famille' => self::GenColInfo('famille', 'Famille', 0, NULL, NULL, FALSE), |
| 'nom_referentiel' => self::GenColInfo('nom_referentiel', 'Referentiel taxonomique'), |
| 'zone_geo' => self::GenColInfo('zone_geo', 'Commune'), |
| 'ce_zone_geo' => self::GenColInfo('ce_zone_geo', 'Identifiant Commune', 0, 'convertirCodeZoneGeoVersDepartement'), |
| 'date_observation' => self::GenColInfo('date_observation', 'Date', 0, 'formaterDate'), |
| 'lieudit' => self::GenColInfo('lieudit', 'Lieu-dit'), |
| 'station' => self::GenColInfo('station', 'Station'), |
| 'milieu' => self::GenColInfo('milieu', 'Milieu'), |
| 'commentaire' => self::GenColInfo('commentaire', 'Notes'), |
| 'latitude' => self::GenColInfo('latitude', 'Latitude', 1), |
| 'longitude' => self::GenColInfo('longitude', 'Longitude', 1), |
| 'altitude' => self::GenColInfo('altitude', 'Altitude', 1), |
| 'geodatum' => self::GenColInfo('geodatum', 'Référentiel Géographique', 1, NULL, NULL, FALSE), |
| ); |
| } |
| |
| if(isset($groupe_de_champs['avance'])) { |
| $colonnes += array( |
| // TODO: importable = FALSE car pas de merge de données importées |
| 'ordre' => self::GenColInfo('ordre', 'Ordre', 1, NULL, NULL, FALSE), |
| 'id_observation' => self::GenColInfo('id_observation', 'Identifiant', 1, NULL, NULL, FALSE), |
| |
| 'mots_cles_texte' => self::GenColInfo('mots_cles_texte', 'Mots Clés', 1), |
| 'commentaire' => self::GenColInfo('commentaire', 'Commentaires', 1), |
| 'date_creation' => self::GenColInfo('date_creation', 'Date Création', 1, NULL, NULL, FALSE), |
| 'date_modification' => self::GenColInfo('date_modification', 'Date Modification', 1, NULL, NULL, FALSE), |
| |
| // rappel transmission = 1, signifie simplement "public" |
| // des données importées peuvent être d'emblée "publiques" |
| // "importable" = TRUE |
| 'transmission' => self::GenColInfo('transmission', 'Transmis', 1), |
| 'date_transmission' => self::GenColInfo('date_transmission', 'Date Transmission', 1, NULL, NULL, FALSE), |
| 'abondance' => self::GenColInfo('abondance', 'Abondance', 1), |
| 'certitude' => self::GenColInfo('certitude', 'Certitude', 1), |
| 'phenologie' => self::GenColInfo('phenologie', 'Phénologie', 1), |
| |
| // XXX: getImages() dépend du contexte de Cel, et doit être appelée comme cas particulier |
| // cf ExportXLS::traiterLigneObservation() |
| 'images' => self::GenColInfo('images', 'Image(s)', 1, NULL, NULL /* cas particulier 'getImages' */, TRUE), |
| |
| /* 'nom_commun' => self::GenColInfo('nom_commun', 'Nom Commun', 1, NULL, 'getNomCommun', FALSE), |
| 'nom-commun' => self::GenColInfo('nom-commun', 'Nom Commun', 1, NULL, 'getNomCommun_v2'), |
| 'nom-commun' => self::GenColInfo('nom-commun', 'Nom Commun', 1, NULL, 'getNomCommun_v3'), */ |
| 'nom-commun' => self::GenColInfo('nom-commun', 'Nom Commun', 1, NULL, NULL /* cas particu 'getNomCommun_v4' */, TRUE, array(__CLASS__, 'getNomCommun_preload')), |
| ); |
| } |
| |
| if(isset($groupe_de_champs['baseflor'])) { |
| $colonnes += array( |
| // champ dynamique |
| 'baseflor' => self::GenColInfo('baseflor', '', 1, NULL, NULL, FALSE, array(__CLASS__, 'baseflor_preload'), array(__CLASS__, 'baseflor_ligne')), |
| ); |
| } |
| |
| if(isset($groupe_de_champs['etendu'])) { |
| $colonnes += array( |
| // champ dynamique |
| 'etendu' => self::GenColInfo('etendu', '', 1, NULL, NULL, FALSE, array(__CLASS__, 'champsEtendus_preload'), array(__CLASS__, 'champsEtendus_ligne')), |
| ); |
| } |
| |
| return $colonnes; |
| } |
| |
| static function preload($colonnes, $cel, $ids) { |
| $result = array(); |
| foreach($colonnes as $abbrev => $colonne) { |
| if(!$colonne['preload']) continue; |
| $result[$abbrev] = call_user_func($colonne['preload'], $cel, $ids); |
| } |
| return $result; |
| } |
| |
| public static function getIntitulesColonnes($colonnes) { |
| // array_filter pour supprimer les colonnes "dynamique" n'ayant pas défini $nom (cf GenColInfo()) |
| return array_filter(array_map(array('FormateurGroupeColonne', 'retournerNomItem'), $colonnes)); |
| } |
| |
| public static function retournerNomItem(&$item) { |
| return $item['nom']; |
| } |
| |
| public static function getLigneObservation(&$obs, &$colonnes, $cel = false) { |
| |
| $ligne_formatee = array(); |
| foreach($colonnes as $abbrev => $colonne) { |
| $valeur = null; |
| if($colonne['extra'] == 2 || ! is_null($colonne['dyna'])) continue; |
| |
| // valeur direct depuis cel_obs ? |
| if(isset($obs[$abbrev])) $valeur = $obs[$abbrev]; |
| |
| // pré-processeur de la champs |
| if(function_exists($colonne['fonction'])) { |
| $valeur = $colonne['fonction']($valeur); |
| } elseif(method_exists(__CLASS__, $colonne['fonction'])) { |
| $valeur = call_user_func(array(__CLASS__, $colonne['fonction']), $valeur); |
| } elseif($colonne['fonction']) { |
| die("méthode {$colonne['fonction']} introuvable"); |
| } |
| // fonction pour obtenir des champs (étendus) |
| elseif(function_exists($colonne['fonction_data'])) { |
| $valeur = $colonne['fonction_data']($obs); |
| } |
| elseif(method_exists(__CLASS__, $colonne['fonction_data'])) { |
| $valeur = call_user_func(array(__CLASS__, $colonne['fonction_data']), $obs); |
| } |
| |
| // // cette section devrait être vide: |
| // // cas particuliers ingérable avec l'architecture actuelle: |
| if(false && $abbrev == 'date_observation' && $valeur == "0000-00-00") { |
| /* blah */ |
| } |
| // ici à cause du passage de $cel ($this), TODO: DB en Singleton ! |
| if($abbrev == 'images') { |
| $valeur = FormateurGroupeColonne::getImages($obs, $cel->id_utilisateur, $cel); |
| } |
| if($abbrev == 'nom-commun') { |
| $valeur = FormateurGroupeColonne::getNomCommun_v4($obs, $cel); |
| } |
| |
| if($valeur == null) { |
| $valeur = ""; |
| } |
| |
| // // fin de section "cas particuliers" |
| $ligne_formatee[] = $valeur; |
| } |
| |
| // uniquement les champŝ dynamiques |
| foreach($colonnes as $abbrev => $colonne) { |
| $valeur = null; |
| if(is_null($colonne['dyna'])) continue; |
| // XXX: PHP-5.3 |
| call_user_func_array($colonne['dyna'], |
| array($cel, $obs, &$ligne_formatee)); |
| } |
| |
| return $ligne_formatee; |
| } |
| |
| /* |
| * Wrapper générant un tableau associatif: |
| * Ne pas changer les valeurs par défaut du prototype sans réflexion sur l'implication pour nomEnsembleVersListeColonnes() |
| |
| * @param $abbrev (obligatoire): nom court de colonne, largement utilisé lors de l'import. |
| * En effet chaque ligne importée est accessible à l'aide du `define` de $abbrev en majuscule, préfixé de "C_" |
| * Exemple: $ligne[C_LONGITUDE] pour "longitude". |
| * cf: ImportXLS::detectionEntete() |
| |
| * @param $nom (obligatoire): nom complet de colonne (utilisé pour la ligne d'en-tête) |
| * Les définition de champs dynamique (correspondant à de multiples colonnes) doivent laisser cette valeur |
| * vide afin de ne pas créer une colonne supplémentaire erronée. |
| |
| * @param $is_extra: |
| * Si 0, la colonne est une colonne standard |
| * Si 1, la colonne est extra [le plus souvent générée automatiquement] |
| * (auquel cas une bordure bleue entoure son nom dans la ligne d'entête) |
| * Si 2, la colonne n'est pas traité à l'export, mais une définition peut lui être donnée |
| * qui pourra être utilisée à l'import, exemple: "image" |
| |
| * @param $fonction (optionnel): un nom d'un fonction de préprocessing |
| * $fonction doit prendre comme seul argument la valeur d'origine et retourner la valeur transformée |
| |
| * @param $fonction_data (optionnel): une *méthode* d'obtention de donnée |
| * $fonction_data doit prendre comme premier argument le tableau des champs de l'enregistrement existant |
| * $fonction_data doit retourner une valeur |
| |
| * @param $importable (optionnel): défini si la colonne est traitée (ou absolument ignorée par PHPExcel) lors de |
| * l'import. |
| |
| * @param $preload (optionnel): défini une fonction de préchargement massif de donnée potentiellement utilisable par $fonction_data. |
| * Utile, notamment, dans le cadre de l'export |
| |
| * @param $fonction_dynamique (optionnel): défini une fonction ajoutant un nombre arbitraire de colonnes à une ligne donnée |
| * Utile, notamment, dans le cadre de l'export des champs étendus ou des données baseflor |
| * La fonction doit TOUJOURS alterer la ligne en lui ajoutant une nombre CONSTANT d'éléments (NULL ou non) |
| * La fonction doit prendre comme arguments ($cel, $obs, &$ligne_formatee) |
| */ |
| static function GenColInfo($abbrev, $nom, $is_extra = 0, $fonction = NULL, $fonction_data = NULL, $importable = TRUE, $preload = NULL, $fonction_dynamique = NULL) { |
| return Array('abbrev' => $abbrev, |
| 'nom' => $nom, |
| 'extra' => $is_extra ? 1 : 0, |
| 'fonction' => $fonction, |
| 'fonction_data' => $fonction_data, |
| 'importable' => $importable, |
| 'preload' => $preload, |
| 'dyna' => $fonction_dynamique, |
| ); |
| } |
| |
| static function formaterDate($date_heure_mysql) { |
| //return ""; |
| if (!$date_heure_mysql || $date_heure_mysql == "0000-00-00 00:00:00") return NULL; |
| // malheureusement pas disponible en php < 5.3 |
| //$date_format = DateTime::createFromFormat("Y-m-d H:i:s", $date_heure_mysql); |
| $val = explode(' ', $date_heure_mysql); |
| $date = explode('-', $val[0]); |
| $heure = explode(':', $val[1]); |
| $timestamp = mktime((int) $heure[0], (int) $heure[1], (int) $heure[2], (int) $date[1], (int) $date[2], (int) $date[0]); |
| if(!$timestamp) return NULL; |
| // TODO: les widgets ne font malheureusement pas usage de l'heure dans le CEL |
| // TODO: si modification, ne pas oublier de modifier le format d'import correspondant |
| // dans ImportXLS, traiterDateObs() (actuellement: "Y/m/d" car utilisation de strtotime() qui ne lit pas tout) |
| // $date_formatee = strftime('%d/%m/%Y', $timestamp); |
| $date_formatee = strftime('%Y/%m/%d', $timestamp); |
| if(!$date_formatee) return "00/00/0000"; |
| return $date_formatee; |
| } |
| |
| static function getImages($obs, $id_utilisateur, $cel) { |
| if(! $id_utilisateur) return NULL; |
| $rec = $cel->requeter( |
| sprintf("SELECT GROUP_CONCAT(nom_original SEPARATOR '%s') FROM cel_images i" |
| ." LEFT JOIN cel_obs_images oi ON (i.id_image = oi.id_image)" |
| ." LEFT JOIN cel_obs o ON (oi.id_observation = o.id_observation)" |
| ." WHERE ce_utilisateur = %d", |
| SEPARATEUR_IMAGES, |
| $id_utilisateur)); |
| return $rec ? array_pop($rec) : NULL; |
| } |
| |
| public static function convertirCodeZoneGeoVersDepartement($code_zone_geo) { |
| $code_departement = ''; |
| if(self::estUnCodeInseeDepartement($code_zone_geo)) { |
| $code_departement = substr(ltrim($code_zone_geo,'INSEE-C:'),0,2); |
| } |
| |
| return $code_departement; |
| } |
| |
| public static function estUnCodeInseeDepartement($code_a_tester) { |
| return preg_match('/^INSEE-C:[0-9]{5}/',$code_a_tester); |
| } |
| |
| |
| // TODO: référentiel ne devrait pas être généré au moment d'un Config::get, |
| // comme dans Config::get('nomsVernaRechercheLimiteeTpl') |
| // Par exemple, la variable pour "nva" ? |
| function getNomCommun($obs) { |
| $langue = 'fra'; |
| list($referentiel) = explode(':', strtolower($obs['nom_referentiel'])); |
| if($referentiel == 'bdtfx') $referentiel = 'nvjfl'; |
| else return ''; |
| |
| $cache_id = $referentiel . '-' . $obs['nt'] . '-' . $langue; |
| if(isset(self::$cache['getNomCommun'][$cache_id])) { |
| //debug: error_log("require url_service_nom_attribution: OK ! (pour \"{$obs['nom_ret']}\")"); |
| return self::$cache['getNomCommun'][$cache_id]; |
| } |
| // pas de cache: |
| //debug: error_log("require url_service_nom_attribution pour \"{$obs['nom_ret']}\""); |
| |
| // pour bdtfx: |
| // /service:eflore:0.1/nvjfl/noms-vernaculaires/attributions?masque.nt=X&masque.lg=fra&retour.champs=num_statut |
| // /projet/services/modules/0.1/nvjfl/NomsVernaculaires.php |
| $url = str_replace(Array('{referentiel}', '{valeur}', '{langue}'), |
| Array($referentiel, $obs['nt'], $langue), |
| self::$config['eflore']['url_service_nom_attribution']) . // TODO ! |
| "&retour.champs=num_statut"; |
| $noms = @json_decode(file_get_contents($url)); |
| if(! $noms) return ''; |
| $noms = array_filter((array)($noms->resultat), array($this, retournerNumStatutUn)); // XXX: php 5.3 |
| $nom = array_pop($noms)->nom_vernaculaire; |
| |
| // cache |
| self::$cache['getNomCommun'][$cache_id] = $nom; |
| return $nom; |
| } |
| |
| private function retournerNumStatutUn(&$item) { |
| return ($item->num_statut == 1); |
| } |
| |
| private function retournerNumStatutUnArr(&$item) { |
| return ($item['num_statut'] == 1); |
| } |
| |
| // si getNomCommun_v2 ou getNomCommun_v3 sont utilisés |
| /* require_once('/home/raphael/eflore/framework/framework/Framework.php'); |
| Framework::setCheminAppli("/home/raphael/eflore/projets/services/index.php"); |
| Framework::setInfoAppli(Config::get('info')); |
| require_once('/home/raphael/eflore/projets/services/modules/0.1/Projets.php');*/ |
| |
| /* Tente de bootstraper le framework au plus court et d'initialiser une instance de |
| NomsVernaculaires pour obtenir le nom commun */ |
| function getNomCommun_v2($obs) { |
| static $service; |
| $service = new Projets(); |
| |
| $langue = 'fra'; |
| list($referentiel) = explode(':', strtolower($obs['nom_referentiel'])); |
| if($referentiel == 'bdtfx') $referentiel = 'nvjfl'; |
| else return ''; |
| |
| $cache_id = $referentiel . '-' . $obs['nt'] . '-' . $langue; |
| if(isset(self::$cache['getNomCommun'][$cache_id])) { |
| error_log("require NomsVernaculaires.php: OK ! (pour \"{$obs['nom_ret']}\")"); |
| return self::$cache['getNomCommun'][$cache_id]; |
| } |
| // pas de cache: |
| error_log("require NomsVernaculaires.php pour \"{$obs['nom_ret']}\""); |
| |
| $donnees = Array('masque.nt' => $obs['nt'], |
| 'masque.lg' => $langue, |
| 'retour.champs' => 'num_statut'); |
| $noms = $service->consulter(Array('nvjfl', 'noms-vernaculaires'), $donnees); |
| |
| if(! $noms) return ''; |
| $noms = array_filter((array)($noms->resultat), array($this, retournerNumStatutUn)); // XXX: php 5.3 |
| $nom = array_pop($noms)->nom_vernaculaire; |
| |
| // cache |
| self::$cache['getNomCommun'][$cache_id] = $nom; |
| return $nom; |
| } |
| |
| |
| /* Effectue un bootstraping plus sage que ci-dessus, mais le gain d'efficacité |
| n'est pas aussi retentissant qu'espéré */ |
| static $service; |
| function getNomCommun_v3($obs) { |
| if(! $this->service) $this->service = new Projets(); |
| |
| $langue = 'fra'; |
| list($referentiel) = explode(':', strtolower($obs['nom_referentiel'])); |
| if($referentiel == 'bdtfx') $referentiel = 'nvjfl'; |
| else return ''; |
| |
| $cache_id = $referentiel . '-' . $obs['nt'] . '-' . $langue; |
| if(isset(self::$cache['getNomCommun'][$cache_id])) { |
| error_log("require NomsVernaculaires.php: OK ! (pour \"{$obs['nom_ret']}\")"); |
| return self::$cache['getNomCommun'][$cache_id]; |
| } |
| // pas de cache: |
| error_log("require NomsVernaculaires.php pour \"{$obs['nom_ret']}\""); |
| |
| $donnees = Array('masque.nt' => $obs['nt'], |
| 'masque.lg' => $langue, |
| 'retour.champs' => 'conseil_emploi'); |
| $this->service->initialiserRessourcesEtParametres(Array('nvjfl', 'noms-vernaculaires', 'attributions'), $donnees); |
| try { |
| $noms = $this->service->traiterRessources(); |
| } catch(Exception $e) { |
| return ''; |
| } |
| if(! $noms) return ''; |
| $noms = array_filter($noms['resultat'], array($this, retournerNumStatutUnArr)); // XXX: php 5.3 |
| $premier_nom = array_pop($noms); |
| $nom = $premier_nom['nom_vernaculaire']; |
| |
| // cache |
| self::$cache['getNomCommun'][$cache_id] = $nom; |
| return $nom; |
| } |
| |
| /* Cette fonction initialise le cache des noms communs en 1 fois, sur la liste des observations à exporter. |
| Ainsi, les appels successifs à getNomCommun_v4() ne sont pas couteux (pas de requête SQL) */ |
| static function getNomCommun_preload($cel, $obsids) { |
| if(!$obsids) return; |
| if(!self::referenceTableExiste($cel)) return NULL; |
| |
| // CREATE INDEX i_nom_referentiel ON cel_obs (nom_referentiel(5)); |
| $req = sprintf("SELECT r.referentiel, r.num_taxon, r.nom_commun FROM cel_references r" . |
| " INNER JOIN cel_obs c ON (r.referentiel = substring_index(c.nom_referentiel, ':', 1) and r.num_taxon = c.nt)" . |
| " WHERE c.id_observation IN (%s)", |
| implode(',', $obsids)); |
| $res = $cel->requeter($req); |
| foreach($res as $v) { |
| self::$cache['getNomCommun'][$v['referentiel'] . '-' . $v['num_taxon'] . '-' . 'fra'] = $v['nom_commun']; |
| } |
| return NULL; |
| } |
| |
| static function referenceTableExiste($cel) { |
| if(!self::$is_table) { |
| // une seule fois |
| if(! $cel->executerRequete("SHOW TABLES LIKE 'cel_references'", Cel::SQL_RETOUR_LIGNE)) return FALSE; |
| self::$is_table = TRUE; |
| } |
| return TRUE; |
| } |
| |
| static function getNomCommun_v4($obs, $cel) { |
| if(! $obs['nt']) return NULL; |
| if(! self::referenceTableExiste($cel)) return NULL; |
| |
| $langue = 'fra'; |
| list($referentiel) = explode(':', strtolower($obs['nom_referentiel'])); |
| $cache_id = $referentiel . '-' . $obs['nt'] . '-' . $langue; |
| |
| if(isset(self::$cache['getNomCommun'][$cache_id])) return self::$cache['getNomCommun'][$cache_id]; |
| // XXX: problème de valeurs NULL ? |
| if(array_key_exists($cache_id, self::$cache['getNomCommun'])) return self::$cache['getNomCommun'][$cache_id]; |
| |
| // pas de cache: |
| $nom = $cel->executerRequete(sprintf("SELECT nom_commun FROM cel_references " . |
| "WHERE referentiel = '%s' AND num_taxon = %d LIMIT 1", |
| $referentiel, |
| $obs['nt']), |
| Cel::SQL_RETOUR_LIGNE); |
| |
| if(! $nom) return NULL; |
| $nom = $nom["nom_commun"]; |
| |
| // cache |
| self::$cache['getNomCommun'][$cache_id] = $nom; |
| return $nom; |
| } |
| |
| |
| /* Cette fonction initialise le cache des données baseflor en 1 fois, sur la liste des observations à exporter. |
| Ainsi, les appels successifs à baseflor_ligne() ne sont pas couteux (pas de requête SQL) */ |
| static function baseflor_preload($cel, $obsids) { |
| if(!$obsids) return; |
| if(!self::referenceTableExiste($cel)) return NULL; |
| |
| $req = sprintf("SELECT referentiel, num_nom_retenu, %s FROM cel_references r" . |
| " INNER JOIN cel_obs c ON (r.num_nom_retenu = c.nom_ret_nn)" . |
| " WHERE c.id_observation IN (%s)", |
| //" AND catminat_code IS NOT NULL", // TODO: suppression des NULL ici signifie que le cache sera partiel... |
| implode(',', array_keys(self::$baseflor_col)), |
| implode(',', $obsids)); |
| $res = $cel->requeter($req); |
| if(!$res) return NULL; |
| |
| foreach($res as $v) { |
| $data = $v; |
| unset($data['referentiel']); // non nécessaire |
| unset($data['num_nom_retenu']); // non nécessaire |
| self::$cache['getBaseflor'][$v['referentiel'] . '-' . $v['num_nom_retenu']] = $data; |
| } |
| |
| return NULL; |
| } |
| |
| |
| static function baseflor_ligne($cel, $obs, &$ligne) { |
| if(! $obs['nom_ret_nn']) { |
| $ligne = array_merge($ligne, array_fill(0, count(self::$baseflor_col), NULL)); |
| return; |
| } |
| |
| if(! self::referenceTableExiste($cel)) { |
| $ligne = array_merge($ligne, array_fill(0, count(self::$baseflor_col), NULL)); |
| return; |
| } |
| |
| list($referentiel) = explode(':', strtolower($obs['nom_referentiel'])); |
| $cache_id = $referentiel . '-' . $obs['nom_ret_nn']; |
| |
| // XXX: problème de valeurs NULL pour utiliser simplement isset() ? |
| // @ car getBaseflor[] n'est peut-être pas encore initialisé |
| if(@array_key_exists($cache_id, self::$cache['getBaseflor'])) { |
| $ligne = array_merge($ligne, self::$cache['getBaseflor'][$cache_id]); |
| return; |
| } |
| |
| // pas de cache: |
| $data = $cel->executerRequete(sprintf("SELECT %s FROM cel_references " . |
| "WHERE referentiel = '%s' AND num_nom_retenu = %d LIMIT 1", |
| implode(', ', array_keys(self::$baseflor_col)), |
| $referentiel, |
| $obs['nom_ret_nn']), |
| Cel::SQL_RETOUR_LIGNE); |
| |
| if(! $data) { |
| $ligne = array_merge($ligne, array_fill(0, count(self::$baseflor_col), NULL)); |
| return; |
| } |
| |
| // cache |
| self::$cache['getBaseflor'][$cache_id] = $data; |
| $ligne = array_merge($ligne, $data); |
| } |
| |
| static function champsEtendus_preload($cel, $obsids) { |
| $gestion_champs_etendus = new GestionChampsEtendus($cel->config, 'obs'); |
| $champs_supp_par_obs = $gestion_champs_etendus->consulterParLots($obsids); |
| $colonnes_champs_supp_par_obs = $gestion_champs_etendus->consulterClesParLots($obsids); |
| self::$cache['champsEtendus']['header'] = $colonnes_champs_supp_par_obs; |
| foreach($champs_supp_par_obs as &$v) { |
| $v = self::champsEtendus_aplatir($v); |
| } |
| self::$cache['champsEtendus']['data'] = $champs_supp_par_obs; |
| // ce return est temporaire, |
| // le temps que toutes les fonctions bougent ici et utilise plutôt le cache statique |
| // encore utilisé pour les entêtes (self::$cache['champsEtendus']['header']) |
| return self::$cache['champsEtendus']; |
| } |
| |
| // XXX: PHP-5.3, fonction anonyme + array_map |
| static function champsEtendus_aplatir($ligne_champs_etendus) { |
| $champs_etendus_fmt = array(); |
| if(!$ligne_champs_etendus) return $champs_etendus_fmt; |
| foreach($ligne_champs_etendus as $champ) { |
| $champs_etendus_fmt[$champ->cle] = $champ->valeur; |
| } |
| return $champs_etendus_fmt; |
| } |
| |
| static function champsEtendus_ligne($cel, $obs, &$ligne) { |
| // si header n'est pas défini, aucune observation ne possède de champ étendu |
| // et nous n'ajoutons ni colonnes, ni valeurs. |
| if(! isset(self::$cache['champsEtendus']['header'])) return; |
| |
| $ligne_etendue_aplatie = @self::$cache['champsEtendus']['data'][$ligne['id_observation']]; |
| |
| $ligne_supp = array_fill(0, count(self::$cache['champsEtendus']['header']), ''); |
| $ligne_etendue_fmt = array(); |
| |
| // si, cependant cette seule observation n'a pas de champs étendus, |
| // nous devons rajouter des blancs (notamment dans le cas ou d'autres |
| // champs viennent à être ajoutés en aval à l'avenir |
| // cf: $fonction_dynamique dans FormateurGroupeColonne::GenColInfo() |
| if(! $ligne_etendue_aplatie) { |
| $ligne = array_merge($ligne, $ligne_supp); |
| return; |
| } |
| |
| foreach(self::$cache['champsEtendus']['header'] as $colonne) { |
| if(!isset($ligne_etendue_aplatie[$colonne])) { |
| $ligne_etendue_fmt[$colonne] = ''; |
| } else { |
| $ligne_etendue_fmt[$colonne] = $ligne_etendue_aplatie[$colonne]; |
| } |
| } |
| |
| // XXX/ array_merge() ? |
| $ligne += $ligne_etendue_fmt; |
| } |
| } |