1630 |
raphael |
1 |
<?php
|
|
|
2 |
|
|
|
3 |
/**
|
|
|
4 |
* @category PHP
|
|
|
5 |
* @package jrest
|
|
|
6 |
* @author Raphaël Droz <raphael@tela-botania.org>
|
|
|
7 |
* @copyright 2013 Tela-Botanica
|
|
|
8 |
* @license http://www.cecill.info/licences/Licence_CeCILL_V2-fr.txt Licence CECILL
|
|
|
9 |
* @license GPL v3 <http://www.gnu.org/licenses/gpl.txt>
|
|
|
10 |
*/
|
|
|
11 |
|
|
|
12 |
/**
|
|
|
13 |
* Service d'export de données d'observation du CEL au format XLS
|
|
|
14 |
*
|
|
|
15 |
* Format du service :
|
|
|
16 |
* POST /ExportXLS
|
|
|
17 |
* POST /ExportXLS/<Utilisateur>
|
|
|
18 |
* TODO: GET /ExportXLS/<Utilisateur> [ sans "range" ? ]
|
|
|
19 |
*
|
|
|
20 |
* Les données POST acceptées sont:
|
|
|
21 |
* range (obligatoire): un range d'id_observation sous la forme d'entier ou d'intervalles d'entiers
|
|
|
22 |
* séparés par des virgules ou bien '*' (pour toutes)
|
|
|
23 |
* TODO: limit
|
|
|
24 |
* TODO: départ
|
|
|
25 |
* TODO: sets (ou colonnes, ou extended)
|
|
|
26 |
* TODO: + les critères supportés par fabriquerSousRequeteRecherche()
|
|
|
27 |
*
|
|
|
28 |
* Si <Utilisateur> est fourni, celui-ci doit être authentifié
|
|
|
29 |
* TODO: export des données public et non-sensible d'un utilisateur
|
|
|
30 |
*
|
|
|
31 |
* Si <Utilisateur> est fourni, le observations seront le résultat de l'intersection des 2 contraintes
|
|
|
32 |
*
|
|
|
33 |
*/
|
|
|
34 |
set_include_path(get_include_path() . PATH_SEPARATOR . dirname(dirname(realpath(__FILE__))) . '/lib');
|
1634 |
raphael |
35 |
// TERM
|
|
|
36 |
ini_set('html_errors', 0);
|
|
|
37 |
ini_set('xdebug.cli_color', 2);
|
|
|
38 |
require_once('lib/PHPExcel/Classes/PHPExcel.php');
|
1630 |
raphael |
39 |
|
1639 |
raphael |
40 |
define('SEPARATEUR_IMAGES', ",");
|
|
|
41 |
|
1633 |
raphael |
42 |
// si getNomCommun_v2 ou getNomCommun_v3 sont utilisés
|
|
|
43 |
/*require_once('/home/raphael/eflore/framework/framework/Framework.php');
|
|
|
44 |
Framework::setCheminAppli("/home/raphael/eflore/projets/services/index.php");
|
|
|
45 |
Framework::setInfoAppli(Config::get('info'));
|
|
|
46 |
require_once('/home/raphael/eflore/projets/services/modules/0.1/Projets.php');*/
|
|
|
47 |
|
1630 |
raphael |
48 |
class ExportXLS extends Cel {
|
|
|
49 |
|
1633 |
raphael |
50 |
private $cache = Array();
|
1639 |
raphael |
51 |
private $id_utilisateur = NULL;
|
1644 |
aurelien |
52 |
private $parametres_defaut = array("range" => "*",
|
|
|
53 |
"format" => "CSV");
|
1633 |
raphael |
54 |
|
1630 |
raphael |
55 |
function ExportXLS($config) {
|
|
|
56 |
parent::__construct($config);
|
|
|
57 |
}
|
1644 |
aurelien |
58 |
|
|
|
59 |
function getRessource() {
|
|
|
60 |
return $this->getElement(array());
|
|
|
61 |
}
|
|
|
62 |
|
|
|
63 |
function getElement($uid) {
|
|
|
64 |
$parametres_format = $this->traiterParametresFormat($uid, $_GET);
|
|
|
65 |
$filtres = $this->traiterFiltres($_GET);
|
|
|
66 |
$this->export($parametres_format, $filtres);
|
|
|
67 |
exit;
|
|
|
68 |
}
|
|
|
69 |
|
|
|
70 |
function traiterParametresFormat($uid, $params) {
|
|
|
71 |
$parametres = $this->parametres_defaut;
|
|
|
72 |
if(isset($params['format'])) {
|
|
|
73 |
if($params['format'] == 'csv') $parametres['format'] = 'CSV';
|
|
|
74 |
if($params['format'] == 'xls') $parametres['format'] = 'Excel5';
|
|
|
75 |
if($params['format'] == 'xlsx') $parametres['format'] = 'Excel2007';
|
1630 |
raphael |
76 |
}
|
1644 |
aurelien |
77 |
// TODO: $params['part'] pour le multi-part
|
|
|
78 |
$parametres['widget'] = isset($params['widget']) ? $params['widget'] : 'CEL';
|
|
|
79 |
$parametres['debut'] = isset($params['debut']) ? intval($params['debut']) : 0;
|
|
|
80 |
$parametres['limite'] = isset($params['limite']) ? intval($params['limite']) : 0;
|
|
|
81 |
$parametres['id_utilisateur'] = $this->traiterIdUtilisateur($uid);
|
|
|
82 |
$parametres['groupe_champs'] = null;
|
|
|
83 |
|
|
|
84 |
return $parametres;
|
|
|
85 |
}
|
|
|
86 |
|
|
|
87 |
function traiterIdUtilisateur($uid) {
|
|
|
88 |
$id_utilisateur = null;
|
|
|
89 |
// TODO: controleUtilisateur()
|
|
|
90 |
if(isset($uid[0])) {
|
|
|
91 |
$id_utilisateur = intval($uid[0]);
|
1630 |
raphael |
92 |
}
|
1644 |
aurelien |
93 |
return $id_utilisateur;
|
|
|
94 |
}
|
|
|
95 |
|
|
|
96 |
function traiterFiltres($params) {
|
|
|
97 |
$obs_ids = $this->traiterObsIds($params);
|
|
|
98 |
$filtres = array();
|
|
|
99 |
if(!$obs_ids || count($obs_ids) == 1 && $obs_ids[0] == '*') {
|
|
|
100 |
unset($filtres['sql_brut']);
|
|
|
101 |
}
|
1630 |
raphael |
102 |
else {
|
1644 |
aurelien |
103 |
$filtres = Array('sql_brut' =>
|
|
|
104 |
sprintf('id_observation IN (%s)', implode(',', $obs_ids)));
|
1630 |
raphael |
105 |
}
|
1644 |
aurelien |
106 |
return $filtres;
|
1630 |
raphael |
107 |
}
|
1644 |
aurelien |
108 |
|
|
|
109 |
|
|
|
110 |
function traiterObsIds($params) {
|
|
|
111 |
$obs_ids = Array('*');
|
|
|
112 |
if (isset($params['range']) && trim($params['range']) != '*') {
|
|
|
113 |
// trim() car: `POST http://url<<<"range=*"`
|
|
|
114 |
$obs_ids = self::rangeToList(trim($params['range']));
|
|
|
115 |
}
|
|
|
116 |
return $obs_ids;
|
|
|
117 |
}
|
1630 |
raphael |
118 |
|
|
|
119 |
/*
|
|
|
120 |
* $param: Tableau associatif, indexes supportés:
|
|
|
121 |
* - widget: le nom du widget d'origine (utilisé pour les méta-données du tableur)
|
|
|
122 |
*
|
|
|
123 |
*/
|
1644 |
aurelien |
124 |
function export(Array $parametres_format = Array(),Array $filtres = array()) {
|
1630 |
raphael |
125 |
$chercheur_observations = new RechercheObservation($this->config);
|
|
|
126 |
|
1632 |
raphael |
127 |
$observations = $chercheur_observations
|
1644 |
aurelien |
128 |
->rechercherObservations($parametres_format['id_utilisateur'], $filtres, $parametres_format['debut'], $parametres_format['limite'], TRUE)
|
1632 |
raphael |
129 |
->get();
|
|
|
130 |
// debug //echo ($chercheur_observations->requete_selection_observations);
|
1630 |
raphael |
131 |
// XXX: malheureusement l'instance de JRest n'est pas accessible ici
|
|
|
132 |
if(!$observations) {
|
|
|
133 |
header('HTTP/1.0 204 No Content');
|
|
|
134 |
exit;
|
|
|
135 |
}
|
1644 |
aurelien |
136 |
|
|
|
137 |
$colonnes = self::nomEnsembleVersListeColonnes($parametres_format['groupe_champs']);
|
|
|
138 |
// $colonne_abbrev = array_keys($colonnes);
|
|
|
139 |
$objPHPExcel = $this->gerenerFeuilleImportFormatee($parametres_format);
|
|
|
140 |
$feuille = $objPHPExcel->setActiveSheetIndex(0);
|
|
|
141 |
// attention formaterColonnesFeuille prend ses 2 premiers paramètres par référence
|
|
|
142 |
$this->formaterColonnesFeuille($feuille, $colonnes, $parametres_format);
|
|
|
143 |
$objPHPExcel->getActiveSheet()->getDefaultColumnDimension()->setWidth(12);
|
1630 |
raphael |
144 |
|
1644 |
aurelien |
145 |
$no_ligne = 2;
|
|
|
146 |
foreach ($observations as $obs) {
|
|
|
147 |
// attention traiterLigneObservation prend ses 3 premiers paramètres par référence
|
|
|
148 |
$this->traiterLigneObservation($obs, $colonnes, $feuille, $no_ligne);
|
|
|
149 |
$no_ligne++;
|
|
|
150 |
}
|
1630 |
raphael |
151 |
|
1644 |
aurelien |
152 |
$this->envoyerFeuille($objPHPExcel, $parametres_format);
|
|
|
153 |
}
|
|
|
154 |
|
|
|
155 |
private function envoyerFeuille($objPHPExcel, $parametres_format) {
|
|
|
156 |
header("Content-Type: application/vnd.ms-excel");
|
|
|
157 |
header("Content-Disposition: attachment; filename=\"liste.xls\"; charset=utf-8");
|
|
|
158 |
header("Cache-Control: max-age=0");
|
|
|
159 |
|
|
|
160 |
// csv|xls|xlsx => CSV|Excel5|Excel2007
|
|
|
161 |
// Note: le format Excel2007 utilise un fichier temporaire
|
|
|
162 |
$generateur = PHPExcel_IOFactory::createWriter($objPHPExcel, $parametres_format['format']);
|
|
|
163 |
$generateur->save('php://output');
|
|
|
164 |
exit;
|
|
|
165 |
}
|
|
|
166 |
|
|
|
167 |
private function traiterLigneObservation(&$obs, &$colonnes, &$feuille, $no_ligne) {
|
|
|
168 |
$no_colonne = 0;
|
|
|
169 |
foreach($colonnes as $abbrev => $colonne) {
|
|
|
170 |
$valeur = null;
|
|
|
171 |
if($colonne['extra'] == 2) continue;
|
|
|
172 |
|
|
|
173 |
// valeur direct depuis cel_obs ?
|
|
|
174 |
if(isset($obs[$abbrev])) $valeur = $obs[$abbrev];
|
|
|
175 |
|
|
|
176 |
// pré-processeur de la champs
|
|
|
177 |
if(function_exists($colonne['fonction'])) {
|
|
|
178 |
$valeur = $colonne['fonction']($valeur);
|
|
|
179 |
} elseif(method_exists(__CLASS__, $colonne['fonction'])) {
|
|
|
180 |
$valeur = call_user_func(array(__CLASS__, $colonne['fonction']), $valeur);
|
|
|
181 |
} elseif($colonne['fonction']) {
|
|
|
182 |
die("méthode {$colonne['fonction']} introuvable");
|
|
|
183 |
}
|
|
|
184 |
// fonction pour obtenir des champs (étendus)
|
|
|
185 |
elseif(function_exists($colonne['fonction_data'])) {
|
|
|
186 |
$valeur = $colonne['fonction_data']($obs);
|
|
|
187 |
}
|
|
|
188 |
elseif(method_exists(__CLASS__, $colonne['fonction_data'])) {
|
|
|
189 |
$valeur = call_user_func(array(__CLASS__, $colonne['fonction_data']), $obs);
|
|
|
190 |
}
|
|
|
191 |
|
|
|
192 |
// // cette section devrait être vide:
|
|
|
193 |
// // cas particuliers ingérable avec l'architecture actuelle:
|
|
|
194 |
if(false && $abbrev == 'date_observation' && $valeur == "0000-00-00") {
|
|
|
195 |
/* blah */
|
|
|
196 |
}
|
|
|
197 |
// // fin de section "cas particuliers"
|
|
|
198 |
$feuille->setCellValueByColumnAndRow($no_colonne, $no_ligne, $valeur);
|
|
|
199 |
$no_colonne++;
|
|
|
200 |
}
|
|
|
201 |
}
|
|
|
202 |
|
|
|
203 |
private function gerenerFeuilleImportFormatee($parametres_format) {
|
|
|
204 |
$objPHPExcel = new PHPExcel();
|
|
|
205 |
|
|
|
206 |
$objPHPExcel->getProperties()->setCreator($parametres_format['widget']) // ou $uid ?
|
|
|
207 |
->setLastModifiedBy("XX") // TODO: $uid
|
|
|
208 |
->setTitle("Export des observation du carnet en ligne") // TODO
|
|
|
209 |
->setSubject("Export") // TODO
|
|
|
210 |
->setDescription("Export");
|
|
|
211 |
//->setKeywords("office PHPExcel php")
|
|
|
212 |
//->setCategory("Test result file")
|
|
|
213 |
|
1630 |
raphael |
214 |
$objPHPExcel->getActiveSheet()->setTitle("Observations");
|
1644 |
aurelien |
215 |
return $objPHPExcel;
|
|
|
216 |
}
|
|
|
217 |
|
|
|
218 |
private function formaterColonnesFeuille(&$feuille, &$colonnes, $parametres_format) {
|
1630 |
raphael |
219 |
$colid = 0;
|
|
|
220 |
foreach($colonnes as $colonne) {
|
1639 |
raphael |
221 |
if($colonne['extra'] == 2) continue;
|
1644 |
aurelien |
222 |
|
1638 |
raphael |
223 |
$feuille->setCellValueByColumnAndRow($colid, 1, $colonne['nom']);
|
1639 |
raphael |
224 |
if($colonne['extra'] == 1) {
|
1638 |
raphael |
225 |
$feuille->getStyleByColumnAndRow($colid, 1)->getBorders()->applyFromArray(
|
1630 |
raphael |
226 |
array(
|
|
|
227 |
'allborders' => array(
|
|
|
228 |
'style' => PHPExcel_Style_Border::BORDER_DASHDOT,
|
|
|
229 |
'color' => array('rgb' => PHPExcel_Style_Color::COLOR_BLUE)
|
|
|
230 |
)
|
|
|
231 |
)
|
|
|
232 |
);
|
|
|
233 |
}
|
1642 |
raphael |
234 |
if(! $colonne['importable']) {
|
|
|
235 |
$feuille->getStyleByColumnAndRow($colid, 1)->getFill()->applyFromArray(
|
|
|
236 |
array(
|
|
|
237 |
'type' => PHPExcel_Style_Fill::FILL_SOLID,
|
|
|
238 |
'color' => array('rgb' => PHPExcel_Style_Color::COLOR_YELLOW)
|
|
|
239 |
)
|
|
|
240 |
);
|
|
|
241 |
}
|
1644 |
aurelien |
242 |
|
1630 |
raphael |
243 |
$colid++;
|
|
|
244 |
}
|
|
|
245 |
}
|
|
|
246 |
|
|
|
247 |
/*
|
|
|
248 |
* @param $fieldSets: un range, eg: 1-5,8,32,58-101
|
|
|
249 |
* @return un tableau trié, eg: 1,2,3,4,5,8,32,58,...,101
|
1638 |
raphael |
250 |
* http://stackoverflow.com/questions/7698664/converting-a-range-or-partial-array-in-the-form-3-6-or-3-6-12-into-an-arra
|
1630 |
raphael |
251 |
*/
|
|
|
252 |
static function rangeToList($in = '') {
|
|
|
253 |
$inSets = explode(',', $in);
|
|
|
254 |
$outSets = array();
|
1632 |
raphael |
255 |
|
1630 |
raphael |
256 |
foreach($inSets as $inSet) {
|
|
|
257 |
list($start,$end) = explode('-', $inSet . '-' . $inSet);
|
1634 |
raphael |
258 |
// ignore les ranges trop importants
|
|
|
259 |
if($start > 10000000 || $end > 10000000 || abs($start-$end) > 10000) continue;
|
1630 |
raphael |
260 |
$outSets = array_merge($outSets,range($start,$end));
|
|
|
261 |
}
|
|
|
262 |
$outSets = array_unique($outSets);
|
|
|
263 |
$outSets = array_filter($outSets, 'is_numeric');
|
|
|
264 |
sort($outSets);
|
|
|
265 |
return $outSets;
|
|
|
266 |
}
|
|
|
267 |
|
|
|
268 |
/*
|
|
|
269 |
* @param $fieldSets: un liste de noms de colonnes ou de sets de colonnes
|
|
|
270 |
* séparés par des virgules
|
|
|
271 |
* eg: "espece" ou "champs-etendus", ...
|
|
|
272 |
*
|
|
|
273 |
* @return: un tableau associatif déjà ordonné
|
1638 |
raphael |
274 |
* clé: abbrev [machine-name] de la colonne (eg: "espece" ou "mot-clef")
|
1630 |
raphael |
275 |
* valeur: des données relative à cette colonne, cf GenColInfo
|
|
|
276 |
*
|
|
|
277 |
* @TODO: fonction commune à la génération en CSV
|
1638 |
raphael |
278 |
*
|
1630 |
raphael |
279 |
*/
|
1644 |
aurelien |
280 |
static function nomEnsembleVersListeColonnes($groupe_de_champs = 'standard') {
|
1638 |
raphael |
281 |
if(! $groupe_de_champs) $groupe_de_champs = 'standard';
|
|
|
282 |
$groupe_de_champs = array_flip(explode(',', $groupe_de_champs));
|
1630 |
raphael |
283 |
$colonnes = Array();
|
|
|
284 |
|
1638 |
raphael |
285 |
if(isset($groupe_de_champs['standard'])) {
|
1630 |
raphael |
286 |
$colonnes += Array(
|
|
|
287 |
'nom_sel' => self::GenColInfo('nom_sel', 'Espèce'),
|
1642 |
raphael |
288 |
'nom_sel_nn' => self::GenColInfo('nom_sel_nn', 'Numéro nomenclatural', 0, NULL, NULL, FALSE),
|
|
|
289 |
'nom_ret' => self::GenColInfo('nom_ret', 'Nom retenu', 0, NULL, NULL, FALSE),
|
|
|
290 |
'nom_ret_nn' => self::GenColInfo('nom_ret_nn', 'Numéro nomenclatural nom retenu', 0, NULL, NULL, FALSE),
|
|
|
291 |
'nt' => self::GenColInfo('nt', 'Numéro taxonomique', 0, NULL, NULL, FALSE),
|
|
|
292 |
'famille' => self::GenColInfo('famille', 'Famille', 0, NULL, NULL, FALSE),
|
1630 |
raphael |
293 |
'nom_referentiel' => self::GenColInfo('nom_referentiel', 'Referentiel taxonomique'),
|
|
|
294 |
'zone_geo' => self::GenColInfo('zone_geo', 'Commune'),
|
|
|
295 |
'ce_zone_geo' => self::GenColInfo('ce_zone_geo', 'Identifiant Commune', 0, 'convertirCodeZoneGeoVersDepartement'),
|
|
|
296 |
'date_observation' => self::GenColInfo('date_observation', 'Date', 0, 'formaterDate'),
|
|
|
297 |
'lieudit' => self::GenColInfo('lieudit', 'Lieu-dit'),
|
|
|
298 |
'station' => self::GenColInfo('station', 'Station'),
|
|
|
299 |
'milieu' => self::GenColInfo('milieu', 'Milieu'),
|
|
|
300 |
'commentaire' => self::GenColInfo('commentaire', 'Notes'),
|
|
|
301 |
'latitude' => self::GenColInfo('latitude', 'Latitude', 1),
|
|
|
302 |
'longitude' => self::GenColInfo('longitude', 'Longitude', 1),
|
1642 |
raphael |
303 |
'geodatum' => self::GenColInfo('geodatum', 'Référentiel Géographique', 1, NULL, NULL, FALSE),
|
1630 |
raphael |
304 |
|
1635 |
raphael |
305 |
// TODO: importable = FALSE car pas de merge de données importées
|
|
|
306 |
'ordre' => self::GenColInfo('ordre', 'Ordre', 1, NULL, NULL, FALSE),
|
|
|
307 |
'id_observation' => self::GenColInfo('id_observation', 'Identifiant', 1, NULL, NULL, FALSE),
|
1630 |
raphael |
308 |
|
|
|
309 |
'mots_cles_texte' => self::GenColInfo('mots_cles_texte', 'Mots Clés', 1),
|
|
|
310 |
'commentaire' => self::GenColInfo('commentaire', 'Commentaires', 1),
|
1642 |
raphael |
311 |
'date_creation' => self::GenColInfo('date_creation', 'Date Création', 1, NULL, NULL, FALSE),
|
|
|
312 |
'date_modification' => self::GenColInfo('date_modification', 'Date Modification', 1, NULL, NULL, FALSE),
|
1639 |
raphael |
313 |
|
|
|
314 |
// rappel transmission = 1, signifie simplement "public"
|
|
|
315 |
// des données importées peuvent être d'emblée "publiques"
|
|
|
316 |
// "importable" = TRUE
|
|
|
317 |
'transmission' => self::GenColInfo('transmission', 'Transmis', 1),
|
1642 |
raphael |
318 |
'date_transmission' => self::GenColInfo('date_transmission', 'Date Transmission', 1, NULL, NULL, FALSE),
|
|
|
319 |
'abondance' => self::GenColInfo('abondance', 'Abondance', 1),
|
|
|
320 |
'certitude' => self::GenColInfo('certitude', 'Certitude', 1),
|
|
|
321 |
'phenologie' => self::GenColInfo('phenologie', 'Phénologie', 1),
|
1632 |
raphael |
322 |
|
1639 |
raphael |
323 |
'nom_commun' => self::GenColInfo('nom_commun', 'Nom Commun', 1, NULL, 'getNomCommun', FALSE),
|
|
|
324 |
//'nom-commun' => self::GenColInfo('nom-commun', 'Nom Commun', 1, NULL, 'getNomCommun_v2'),
|
|
|
325 |
//'nom-commun' => self::GenColInfo('nom-commun', 'Nom Commun', 1, NULL, 'getNomCommun_v3'),
|
|
|
326 |
|
1642 |
raphael |
327 |
'images' => self::GenColInfo('images', 'Image(s)', 1, NULL, 'getImages', TRUE),
|
1630 |
raphael |
328 |
);
|
|
|
329 |
}
|
|
|
330 |
|
|
|
331 |
return $colonnes;
|
|
|
332 |
}
|
|
|
333 |
|
|
|
334 |
/*
|
|
|
335 |
* Wrapper générant un tableau associatif:
|
1639 |
raphael |
336 |
|
|
|
337 |
* @param $abbrev (obligatoire): nom court de colonne, largement utilisé lors de l'import.
|
|
|
338 |
* En effet chaque ligne importée est accessible à l'aide du `define` de $abbrev en majuscule, préfixé de "C_"
|
|
|
339 |
* Exemple: $ligne[C_LONGITUDE] pour "longitude".
|
|
|
340 |
* cf: ImportXLS::detectionEntete()
|
|
|
341 |
|
|
|
342 |
* @param $nom (obligatoire): nom complet de colonne (utilisé pour la ligne d'en-tête)
|
|
|
343 |
|
|
|
344 |
* @param $is_extra:
|
|
|
345 |
* Si 0, la colonne est une colonne standard
|
|
|
346 |
* Si 1, la colonne est extra [le plus souvent générée automatiquement]
|
|
|
347 |
* (auquel cas une bordure bleue entoure son nom dans la ligne d'entête)
|
|
|
348 |
* Si 2, la colonne n'est pas traité à l'export, mais une définition peut lui être donnée
|
|
|
349 |
* qui pourra être utilisée à l'import, exemple: "image"
|
|
|
350 |
|
1632 |
raphael |
351 |
* @param $fonction (optionnel): un nom d'un fonction de préprocessing
|
|
|
352 |
* $fonction doit prendre comme seul argument la valeur d'origine et retourner la valeur transformée
|
1639 |
raphael |
353 |
|
1632 |
raphael |
354 |
* @param $fonction_data (optionnel): une *méthode* d'obtention de donnée
|
1639 |
raphael |
355 |
* $fonction_data doit prendre comme premier argument le tableau des champs de l'enregistrement existant
|
1632 |
raphael |
356 |
* $fonction_data doit retourner une valeur
|
|
|
357 |
|
1639 |
raphael |
358 |
* @param $importable (optionnel): défini si la colonne est traitée (ou absolument ignorée par PHPExcel) lors de
|
|
|
359 |
* l'import.
|
|
|
360 |
|
1630 |
raphael |
361 |
*/
|
1638 |
raphael |
362 |
static function GenColInfo($abbrev, $nom, $is_extra = 0, $fonction = NULL, $fonction_data = NULL, $importable = TRUE) {
|
|
|
363 |
return Array('abbrev' => $abbrev,
|
1630 |
raphael |
364 |
'nom' => $nom,
|
|
|
365 |
'extra' => $is_extra ? 1 : 0,
|
1632 |
raphael |
366 |
'fonction' => $fonction,
|
1635 |
raphael |
367 |
'fonction_data' => $fonction_data,
|
|
|
368 |
'importable' => $importable
|
1630 |
raphael |
369 |
);
|
|
|
370 |
}
|
|
|
371 |
|
|
|
372 |
protected function formaterDate($date_heure_mysql, $format = NULL) {
|
|
|
373 |
if (!$date_heure_mysql || $date_heure_mysql == "0000-00-00 00:00:00") return "00/00/0000";
|
1644 |
aurelien |
374 |
$date_format = DateTime::createFromFormat("Y-m-d H:i:s", $date_heure_mysql);
|
|
|
375 |
$timestamp = @$date_format->getTimestamp();
|
1630 |
raphael |
376 |
if(!$timestamp) return "00/00/0000";
|
1644 |
aurelien |
377 |
// TODO: les widgets ne font malheureusement pas usage de l'heure dans le CEL
|
1639 |
raphael |
378 |
// TODO: si modification, ne pas oublier de modifier le format d'import correspondant
|
|
|
379 |
// dans ImportXLS (actuellement: "d/m/Y")
|
|
|
380 |
$date_formatee = strftime('%d/%m/%Y', $timestamp);
|
1630 |
raphael |
381 |
if(!$date_formatee) return "00/00/0000";
|
|
|
382 |
return $date_formatee;
|
|
|
383 |
}
|
1633 |
raphael |
384 |
|
|
|
385 |
|
1639 |
raphael |
386 |
// TODO: mettre en static + param "id_utilisateur"
|
|
|
387 |
function getImages($obs) {
|
|
|
388 |
if(! $this->id_utilisateur) return NULL;
|
|
|
389 |
|
|
|
390 |
$rec = $this->requeter(
|
|
|
391 |
sprintf("SELECT GROUP_CONCAT(nom_original SEPARATOR '%s') FROM cel_images i"
|
|
|
392 |
. " LEFT JOIN cel_obs_images oi ON (i.id_image = oi.id_image)"
|
|
|
393 |
. " LEFT JOIN cel_obs o ON (oi.id_observation = o.id_observation)"
|
|
|
394 |
. " WHERE ce_utilisateur = %d",
|
|
|
395 |
|
|
|
396 |
SEPARATEUR_IMAGES,
|
|
|
397 |
$this->id_utilisateur));
|
|
|
398 |
return $rec ? array_pop($rec) : NULL;
|
|
|
399 |
|
|
|
400 |
}
|
|
|
401 |
|
|
|
402 |
|
1633 |
raphael |
403 |
// TODO: référentiel ne devrait pas être généré au moment d'un Config::get,
|
|
|
404 |
// comme dans Config::get('nomsVernaRechercheLimiteeTpl')
|
|
|
405 |
// Par exemple, la variable pour "nva" ?
|
|
|
406 |
function getNomCommun($obs) {
|
|
|
407 |
$langue = 'fra';
|
|
|
408 |
list($referentiel) = explode(':', strtolower($obs['nom_referentiel']));
|
|
|
409 |
if($referentiel == 'bdtfx') $referentiel = 'nvjfl';
|
|
|
410 |
else return '';
|
|
|
411 |
|
|
|
412 |
$cache_id = $referentiel . '-' . $obs['nt'] . '-' . $langue;
|
|
|
413 |
if(isset($this->cache['getNomCommun'][$cache_id])) {
|
|
|
414 |
//debug: error_log("require url_service_nom_attribution: OK ! (pour \"{$obs['nom_ret']}\")");
|
|
|
415 |
return $this->cache['getNomCommun'][$cache_id];
|
|
|
416 |
}
|
|
|
417 |
// pas de cache:
|
|
|
418 |
//debug: error_log("require url_service_nom_attribution pour \"{$obs['nom_ret']}\"");
|
|
|
419 |
|
|
|
420 |
// pour bdtfx:
|
|
|
421 |
// /service:eflore:0.1/nvjfl/noms-vernaculaires/attributions?masque.nt=X&masque.lg=fra&retour.champs=num_statut
|
|
|
422 |
// /projet/services/modules/0.1/nvjfl/NomsVernaculaires.php
|
|
|
423 |
$url = str_replace(Array('{referentiel}', '{valeur}', '{langue}'),
|
|
|
424 |
Array($referentiel, $obs['nt'], $langue),
|
|
|
425 |
$this->config['eflore']['url_service_nom_attribution']) .
|
|
|
426 |
"&retour.champs=num_statut";
|
|
|
427 |
$noms = @json_decode(file_get_contents($url));
|
|
|
428 |
if(! $noms) return '';
|
|
|
429 |
$noms = array_filter((array)($noms->resultat), function($item) { return ($item->num_statut == 1); });
|
|
|
430 |
$nom = array_pop($noms)->nom_vernaculaire;
|
|
|
431 |
|
|
|
432 |
// cache
|
|
|
433 |
$this->cache['getNomCommun'][$cache_id] = $nom;
|
|
|
434 |
return $nom;
|
|
|
435 |
}
|
|
|
436 |
|
|
|
437 |
|
|
|
438 |
/* Tente de bootstraper le framework au plus court et d'initialiser une instance de
|
|
|
439 |
NomsVernaculaires pour obtenir le nom commun */
|
|
|
440 |
function getNomCommun_v2($obs) {
|
|
|
441 |
static $service;
|
|
|
442 |
$service = new Projets();
|
|
|
443 |
|
|
|
444 |
$langue = 'fra';
|
|
|
445 |
list($referentiel) = explode(':', strtolower($obs['nom_referentiel']));
|
|
|
446 |
if($referentiel == 'bdtfx') $referentiel = 'nvjfl';
|
|
|
447 |
else return '';
|
|
|
448 |
|
|
|
449 |
$cache_id = $referentiel . '-' . $obs['nt'] . '-' . $langue;
|
|
|
450 |
if(isset($this->cache['getNomCommun'][$cache_id])) {
|
|
|
451 |
error_log("require NomsVernaculaires.php: OK ! (pour \"{$obs['nom_ret']}\")");
|
|
|
452 |
return $this->cache['getNomCommun'][$cache_id];
|
|
|
453 |
}
|
|
|
454 |
// pas de cache:
|
|
|
455 |
error_log("require NomsVernaculaires.php pour \"{$obs['nom_ret']}\"");
|
|
|
456 |
|
1638 |
raphael |
457 |
$donnees = Array('masque.nt' => $obs['nt'],
|
1633 |
raphael |
458 |
'masque.lg' => $langue,
|
|
|
459 |
'retour.champs' => 'num_statut');
|
1638 |
raphael |
460 |
$noms = $service->consulter(Array('nvjfl', 'noms-vernaculaires'), $donnees);
|
1633 |
raphael |
461 |
|
|
|
462 |
if(! $noms) return '';
|
|
|
463 |
$noms = array_filter((array)($noms->resultat), function($item) { return ($item->num_statut == 1); });
|
|
|
464 |
$nom = array_pop($noms)->nom_vernaculaire;
|
|
|
465 |
|
|
|
466 |
// cache
|
|
|
467 |
$this->cache['getNomCommun'][$cache_id] = $nom;
|
|
|
468 |
return $nom;
|
|
|
469 |
}
|
|
|
470 |
|
|
|
471 |
|
|
|
472 |
/* Effectue un bootstraping plus sage que ci-dessus, mais le gain d'efficacité
|
|
|
473 |
n'est pas aussi retentissant qu'espéré */
|
|
|
474 |
static $service;
|
|
|
475 |
function getNomCommun_v3($obs) {
|
|
|
476 |
if(! $this->service) $this->service = new Projets();
|
|
|
477 |
|
|
|
478 |
$langue = 'fra';
|
|
|
479 |
list($referentiel) = explode(':', strtolower($obs['nom_referentiel']));
|
|
|
480 |
if($referentiel == 'bdtfx') $referentiel = 'nvjfl';
|
|
|
481 |
else return '';
|
|
|
482 |
|
|
|
483 |
$cache_id = $referentiel . '-' . $obs['nt'] . '-' . $langue;
|
|
|
484 |
if(isset($this->cache['getNomCommun'][$cache_id])) {
|
|
|
485 |
error_log("require NomsVernaculaires.php: OK ! (pour \"{$obs['nom_ret']}\")");
|
|
|
486 |
return $this->cache['getNomCommun'][$cache_id];
|
|
|
487 |
}
|
|
|
488 |
// pas de cache:
|
|
|
489 |
error_log("require NomsVernaculaires.php pour \"{$obs['nom_ret']}\"");
|
|
|
490 |
|
1638 |
raphael |
491 |
$donnees = Array('masque.nt' => $obs['nt'],
|
1633 |
raphael |
492 |
'masque.lg' => $langue,
|
|
|
493 |
'retour.champs' => 'conseil_emploi');
|
1638 |
raphael |
494 |
$this->service->initialiserRessourcesEtParametres(Array('nvjfl', 'noms-vernaculaires', 'attributions'), $donnees);
|
1633 |
raphael |
495 |
try {
|
|
|
496 |
$noms = $this->service->traiterRessources();
|
|
|
497 |
} catch(Exception $e) { return ''; }
|
|
|
498 |
if(! $noms) return '';
|
|
|
499 |
$noms = array_filter($noms['resultat'], function($item) { return ($item['num_statut'] == 1); });
|
1644 |
aurelien |
500 |
$premier_nom = array_pop($noms);
|
|
|
501 |
$nom = $premier_nom['nom_vernaculaire'];
|
1633 |
raphael |
502 |
|
|
|
503 |
// cache
|
|
|
504 |
$this->cache['getNomCommun'][$cache_id] = $nom;
|
|
|
505 |
return $nom;
|
|
|
506 |
}
|
|
|
507 |
|
|
|
508 |
}
|