Subversion Repositories eFlore/Applications.cel

Rev

Rev 2459 | Rev 2538 | Go to most recent revision | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 2459 Rev 2461
1
<?php
1
<?php
2
 
-
 
-
 
2
// declare(encoding='UTF-8');
3
/**
3
/**
-
 
4
 * Classe métier de mise en forme des groupes de colonnes pour les exports.
-
 
5
 *
-
 
6
 * @internal   Mininum PHP version : 5.2
4
* @category  PHP
7
 * @category   CEL
5
* @package   jrest
8
 * @package    Services
-
 
9
 * @subpackage Bibliothèques
-
 
10
 * @version    0.1
-
 
11
 * @author     Mathias CHOUET <mathias@tela-botanica.org>
6
* @author    Raphaël Droz <raphael@tela-botania.org>
12
 * @author     Raphaël Droz <raphael@tela-botania.org>
7
* @copyright 2013 Tela-Botanica
13
 * @author     Jean-Pascal MILCENT <jpm@tela-botanica.org>
8
* @license   http://www.cecill.info/licences/Licence_CeCILL_V2-fr.txt Licence CECILL
14
 * @author     Aurelien PERONNET <aurelien@tela-botanica.org>
9
* @license GPL v3 <http://www.gnu.org/licenses/gpl.txt>
15
 * @license    GPL v3 <http://www.gnu.org/licenses/gpl.txt>
-
 
16
 * @license    CECILL v2 <http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt>
-
 
17
 * @copyright  1999-2014 Tela Botanica <accueil@tela-botanica.org>
10
*/
18
 */
11
define('SEPARATEUR_IMAGES', " / ");
19
define('SEPARATEUR_IMAGES', ' / ');
12
define('PREFIX_CHAMPS_ETENDUS', "ext:");
20
define('PREFIX_CHAMPS_ETENDUS', 'ext:');
13
// utilisé par formaterUrlUser() [ nécessaire pour le widget d'export)
21
// utilisé par formaterUrlUser() [ nécessaire pour le widget d'export)
14
define('USER_BASEURL', 'http://www.tela-botanica.org/profil:%d');
22
define('USER_BASEURL', 'http://www.tela-botanica.org/profil:%d');
15
 
23
 
16
Class FormateurGroupeColonne {
24
class FormateurGroupeColonne {
17
 
25
 
18
	// cache pour les données des fonctions
26
	// cache pour les données des fonctions
19
	static $cache = Array();
27
	static $cache = Array();
20
 
28
 
21
	// test sur la table cel_references, mis à TRUE si la table existe
29
	// test sur la table cel_references, mis à TRUE si la table existe
22
	static $is_table = false;
30
	static $is_table = false;
23
 
31
 
24
	// les groupes de champs utilisables
32
	// les groupes de champs utilisables
25
	static $fieldGroups = array(
33
	static $fieldGroups = array(
26
		'standard',
34
		'standard',
27
		'avance',
35
		'avance',
28
		'etendu',
36
		'etendu',
29
		'baseflor',
37
		'baseflor',
30
		'auteur'
38
		'auteur'
31
	);
39
	);
32
 
40
 
33
	// les données baseflor à récupérer: colonnes présentes dans cel_references
41
	// les données baseflor à récupérer: colonnes présentes dans cel_references
34
	// et intitulés associés
42
	// et intitulés associés
35
	static $baseflor_col = array(
43
	static $baseflor_col = array(
36
		"ve_lumiere" => "Lumière",
44
		've_lumiere' => 'Lumière',
37
		"ve_temperature" => "Température",
45
		've_temperature' => 'Température',
38
		"ve_continentalite" => "Continentalité",
46
		've_continentalite' => 'Continentalité',
39
		"ve_humidite_atmos" => "Humidité Atmosphérique",
47
		've_humidite_atmos' => 'Humidité Atmosphérique',
40
		"ve_humidite_edaph" => "Humidité",
48
		've_humidite_edaph' => 'Humidité',
41
		"ve_reaction_sol" => "Réaction (pH)",
49
		've_reaction_sol' => 'Réaction (pH)',
42
		"ve_nutriments_sol" => "Nutriments",
50
		've_nutriments_sol' => 'Nutriments',
43
		"ve_salinite" => "Salinité",
51
		've_salinite' => 'Salinité',
44
		"ve_texture_sol" => "Texture" ,
52
		've_texture_sol' => 'Texture' ,
45
		"ve_mat_org_sol" => "Matière Organique",
53
		've_mat_org_sol' => 'Matière Organique',
46
		"catminat_code" => "Code Catminat",
54
		'catminat_code' => 'Code Catminat',
47
		"syntaxon" => "Syntaxon",
55
		'syntaxon' => 'Syntaxon',
48
	);
56
	);
49
 
57
 
50
	// TODO: dirty, ordre des champs étendus... souhaité pour florilèges:
58
	// TODO: dirty, ordre des champs étendus... souhaité pour florilèges:
51
	static $ordre_champ_etendus_Florileges = array(
59
	static $ordre_champ_etendus_Florileges = array(
52
		"personneStructure",
60
		'personneStructure',
53
		"personneService",
61
		'personneService',
54
		"personneFonction",
62
		'personneFonction',
55
		"adresse",
63
		'adresse',
56
		"latitudeDebutRue",
64
		'latitudeDebutRue',
57
		"longitudeDebutRue",
65
		'longitudeDebutRue',
58
		"latitudeFinRue",
66
		'latitudeFinRue',
59
		"longitudeFinRue",
67
		'longitudeFinRue',
60
		"typoUrbaine",
68
		'typoUrbaine',
61
		"revetementSol",
69
		'revetementSol',
62
		"presenceZoneVegetalise",
70
		'presenceZoneVegetalise',
63
		"hauteurBatimentAvoisinant",
71
		'hauteurBatimentAvoisinant',
64
		"intensiteGestion",
72
		'intensiteGestion',
65
		"periodiciteTraitementPhyto",
73
		'periodiciteTraitementPhyto',
66
		"dateArretTraitementPhyto",
74
		'dateArretTraitementPhyto',
67
		"itineraireGestion",
75
		'itineraireGestion',
68
		"dateDerniereIntervention",
76
		'dateDerniereIntervention',
69
		"hauteurPlante",
77
		'hauteurPlante',
70
		"resistanceTraitementPhyto",
78
		'resistanceTraitementPhyto',
71
		"vitesseCroissance",
79
		'vitesseCroissance',
72
		"perceptionTechnicien",
80
		'perceptionTechnicien',
73
		"perceptionRiverainMauvaise",
81
		'perceptionRiverainMauvaise',
74
	);
82
	);
75
 
83
 
76
	static function colGroupsValidation($groupe_de_champs = 'standard,avance') {
84
	static function colGroupsValidation($groupe_de_champs = 'standard,avance') {
77
		if(! $groupe_de_champs) return FALSE;
85
		if (! $groupe_de_champs) return FALSE;
78
		if(is_string($groupe_de_champs)) {
86
		if (is_string($groupe_de_champs)) {
79
			$groupe_de_champs = array_flip(explode(',', $groupe_de_champs));
87
			$groupe_de_champs = array_flip(explode(',', $groupe_de_champs));
80
		}
-
 
81
		elseif(is_array($groupe_de_champs)) {
88
		} elseif(is_array($groupe_de_champs)) {
82
			$groupe_de_champs = array_flip($groupe_de_champs);
89
			$groupe_de_champs = array_flip($groupe_de_champs);
-
 
90
		} else {
-
 
91
			return null;
83
		}
92
		}
-
 
93
		$groupe_de_champs = array_intersect_key(array_flip(self::$fieldGroups), $groupe_de_champs);
84
		else {
94
		if (!$groupe_de_champs) {
85
			return NULL;
95
			return false;
86
		}
96
		}
87
		$groupe_de_champs = array_intersect_key(array_flip(self::$fieldGroups),
-
 
88
												$groupe_de_champs);
-
 
89
		if(!$groupe_de_champs) return FALSE;
-
 
90
		// toujours ajouter standard
97
		// toujours ajouter standard
91
		$groupe_de_champs['standard'] = TRUE;
98
		$groupe_de_champs['standard'] = true;
92
		return implode(',', array_keys($groupe_de_champs));
99
		return implode(',', array_keys($groupe_de_champs));
93
	}
100
	}
94
 
101
 
95
	/*
102
	/*
96
	* @param $fieldSets: un liste de noms de colonnes ou de sets de colonnes
103
	* @param $fieldSets: un liste de noms de colonnes ou de sets de colonnes
97
	*		séparés par des virgules
104
	*		séparés par des virgules
98
	* 		eg: "espece" ou "champs-etendus", ...
105
	* 		eg: "espece" ou "champs-etendus", ...
99
	*
106
	*
100
	* @return: un tableau associatif déjà ordonné
107
	* @return: un tableau associatif déjà ordonné
101
	* 		clé: abbrev [machine-name] de la colonne (eg: "espece" ou "mot-clef")
108
	* 		clé: abbrev [machine-name] de la colonne (eg: "espece" ou "mot-clef")
102
	* 		valeur: des données relative à cette colonne, cf GenColInfo
109
	* 		valeur: des données relative à cette colonne, cf GenColInfo
103
	*
110
	*
104
	* Si la colonne n'utilise pas de fonction de récupération particulière
111
	* Si la colonne n'utilise pas de fonction de récupération particulière
105
	* (ie: si le champ exportés [ou importé] correspond exactement au champ dans la base de donnée)
112
	* (ie: si le champ exportés [ou importé] correspond exactement au champ dans la base de donnée)
106
	* Alors 'abbrev' doit avoir la même valeur que le nom de la colonne dans la table mysql `cel_obs`.
113
	* Alors 'abbrev' doit avoir la même valeur que le nom de la colonne dans la table mysql `cel_obs`.
107
	*
-
 
108
	*/
114
	*/
109
	static function nomEnsembleVersListeColonnes($groupe_de_champs = 'standard') {
115
	static function nomEnsembleVersListeColonnes($groupe_de_champs = 'standard') {
110
		if(! $groupe_de_champs) $groupe_de_champs = 'standard';
-
 
111
		if(is_string($groupe_de_champs)) {
116
		if (! $groupe_de_champs) {
112
			$groupe_de_champs = array_flip(explode(',', $groupe_de_champs));
117
			$groupe_de_champs = 'standard';
113
		}
118
		}
-
 
119
		if (is_string($groupe_de_champs)) {
-
 
120
			$groupe_de_champs = array_flip(explode(',', $groupe_de_champs));
114
		elseif(is_array($groupe_de_champs)) {
121
		} elseif(is_array($groupe_de_champs)) {
115
			$groupe_de_champs = array_flip($groupe_de_champs);
122
			$groupe_de_champs = array_flip($groupe_de_champs);
-
 
123
		} else {
-
 
124
			return null;
116
		}
125
		}
-
 
126
		$groupe_de_champs = array_intersect_key(array_flip(self::$fieldGroups), $groupe_de_champs);
117
		else {
127
		if (!$groupe_de_champs) {
118
			return NULL;
128
			return null;
119
		}
129
		}
120
		$groupe_de_champs = array_intersect_key(array_flip(self::$fieldGroups),
-
 
121
												$groupe_de_champs);
-
 
122
		if(!$groupe_de_champs) return NULL;
-
 
123
 
-
 
124
		$colonnes = Array();
-
 
-
 
130
 
125
 
131
		$colonnes = array();
126
		if(isset($groupe_de_champs['standard'])) {
132
		if (isset($groupe_de_champs['standard'])) {
127
			$colonnes += Array(
133
			$colonnes += Array(
128
				'nom_sel'			=> self::GenColInfo(Array('abbrev' => 'nom_sel',
134
				'nom_sel'			=> self::GenColInfo(Array('abbrev' => 'nom_sel',
129
															  'nom' => 'Espèce')),
135
															  'nom' => 'Espèce')),
130
				'nom_sel_nn'		=> self::GenColInfo(Array('abbrev' => 'nom_sel_nn',
136
				'nom_sel_nn'		=> self::GenColInfo(Array('abbrev' => 'nom_sel_nn',
131
															  'nom' => 'Numéro nomenclatural',
137
															  'nom' => 'Numéro nomenclatural',
132
															  'importable' => FALSE)),
138
															  'importable' => FALSE)),
133
				'nom_ret'			=> self::GenColInfo(Array('abbrev' => 'nom_ret',
139
				'nom_ret'			=> self::GenColInfo(Array('abbrev' => 'nom_ret',
134
															  'nom' => 'Nom retenu',
140
															  'nom' => 'Nom retenu',
135
															  'importable' => FALSE)),
141
															  'importable' => FALSE)),
136
				'nom_ret_nn'		=> self::GenColInfo(Array('abbrev' => 'nom_ret_nn',
142
				'nom_ret_nn'		=> self::GenColInfo(Array('abbrev' => 'nom_ret_nn',
137
															  'nom' => 'Numéro nomenclatural nom retenu',
143
															  'nom' => 'Numéro nomenclatural nom retenu',
138
															  'importable' => FALSE)),
144
															  'importable' => FALSE)),
139
				'nt'				=> self::GenColInfo(Array('abbrev' => 'nt',
145
				'nt'				=> self::GenColInfo(Array('abbrev' => 'nt',
140
															  'nom' => 'Numéro taxonomique',
146
															  'nom' => 'Numéro taxonomique',
141
															  'importable' => FALSE)),
147
															  'importable' => FALSE)),
142
				'famille'			=> self::GenColInfo(Array('abbrev' => 'famille',
148
				'famille'			=> self::GenColInfo(Array('abbrev' => 'famille',
143
															  'nom' => 'Famille',
149
															  'nom' => 'Famille',
144
															  'importable' => FALSE)),
150
															  'importable' => FALSE)),
145
				'nom_referentiel'	=> self::GenColInfo(Array('abbrev' => 'nom_referentiel',
151
				'nom_referentiel'	=> self::GenColInfo(Array('abbrev' => 'nom_referentiel',
146
															  'nom' => 'Referentiel taxonomique')),
152
															  'nom' => 'Referentiel taxonomique')),
147
				'zone_geo'			=> self::GenColInfo(Array('abbrev' => 'zone_geo',
153
				'zone_geo'			=> self::GenColInfo(Array('abbrev' => 'zone_geo',
148
															  'nom' => 'Commune')),
154
															  'nom' => 'Commune')),
149
				'ce_zone_geo'		=> self::GenColInfo(Array('abbrev' => 'ce_zone_geo',
155
				'ce_zone_geo'		=> self::GenColInfo(Array('abbrev' => 'ce_zone_geo',
150
															  'nom' => 'Identifiant Commune',
156
															  'nom' => 'Identifiant Commune',
151
															  'fonction' => 'convertirCodeZoneGeoVersDepartement')),
157
															  'fonction' => 'convertirCodeZoneGeoVersDepartement')),
152
				'date_observation'	=> self::GenColInfo(Array('abbrev' => 'date_observation',
158
				'date_observation'	=> self::GenColInfo(Array('abbrev' => 'date_observation',
153
															  'nom' => 'Date',
159
															  'nom' => 'Date',
154
															  'fonction' => 'formaterDate')),
160
															  'fonction' => 'formaterDate')),
155
				'lieudit'			=> self::GenColInfo(Array('abbrev' => 'lieudit',
161
				'lieudit'			=> self::GenColInfo(Array('abbrev' => 'lieudit',
156
															  'nom' => 'Lieu-dit')),
162
															  'nom' => 'Lieu-dit')),
157
				'station'			=> self::GenColInfo(Array('abbrev' => 'station',
163
				'station'			=> self::GenColInfo(Array('abbrev' => 'station',
158
															  'nom' => 'Station')),
164
															  'nom' => 'Station')),
159
				'milieu'			=> self::GenColInfo(Array('abbrev' => 'milieu',
165
				'milieu'			=> self::GenColInfo(Array('abbrev' => 'milieu',
160
															  'nom' => 'Milieu')),
166
															  'nom' => 'Milieu')),
161
				'commentaire'		=> self::GenColInfo(Array('abbrev' => 'commentaire',
167
				'commentaire'		=> self::GenColInfo(Array('abbrev' => 'commentaire',
162
															  'nom' => 'Notes')),
168
															  'nom' => 'Notes')),
163
				'latitude'			=> self::GenColInfo(Array('abbrev' => 'latitude',
169
				'latitude'			=> self::GenColInfo(Array('abbrev' => 'latitude',
164
															  'nom' => 'Latitude',
170
															  'nom' => 'Latitude',
165
															  'extra' => 1,
171
															  'extra' => 1,
166
															  'fonction' => 'trim0')),
172
															  'fonction' => 'trim0')),
167
				'longitude'			=> self::GenColInfo(Array('abbrev' => 'longitude',
173
				'longitude'			=> self::GenColInfo(Array('abbrev' => 'longitude',
168
															  'nom' => 'Longitude',
174
															  'nom' => 'Longitude',
169
															  'extra' => 1,
175
															  'extra' => 1,
170
															  'fonction' => 'trim0')),
176
															  'fonction' => 'trim0')),
171
				'altitude'			=> self::GenColInfo(Array('abbrev' => 'altitude',
177
				'altitude'			=> self::GenColInfo(Array('abbrev' => 'altitude',
172
															  'nom' => 'Altitude',
178
															  'nom' => 'Altitude',
173
															  'extra' => 1)), // pas de trim0 car INT(5) en DB
179
															  'extra' => 1)), // pas de trim0 car INT(5) en DB
174
				'geodatum'			=> self::GenColInfo(Array('abbrev' => 'geodatum',
180
				'geodatum'			=> self::GenColInfo(Array('abbrev' => 'geodatum',
175
															  'nom' => 'Référentiel Géographique',
181
															  'nom' => 'Référentiel Géographique',
176
															  'extra' => 1,
182
															  'extra' => 1,
177
															  'importable' => FALSE)),
183
															  'importable' => FALSE)),
178
			);
184
			);
179
		}
185
		}
180
 
186
 
181
		if(isset($groupe_de_champs['avance'])) {
187
		if(isset($groupe_de_champs['avance'])) {
182
			$colonnes += array(
188
			$colonnes += array(
183
				// TODO: importable = FALSE car pas de merge de données importées
189
				// TODO: importable = FALSE car pas de merge de données importées
184
				'ordre'				=> self::GenColInfo(Array('abbrev' => 'ordre',
190
				'ordre'				=> self::GenColInfo(Array('abbrev' => 'ordre',
185
															  'nom' => 'Ordre',
191
															  'nom' => 'Ordre',
186
															  'extra' => 1,
192
															  'extra' => 1,
187
															  'importable' => FALSE)),
193
															  'importable' => FALSE)),
188
				'id_observation'	=> self::GenColInfo(Array('abbrev' => 'id_observation',
194
				'id_observation'	=> self::GenColInfo(Array('abbrev' => 'id_observation',
189
															  'nom' => 'Identifiant',
195
															  'nom' => 'Identifiant',
190
															  'extra' => 1,
196
															  'extra' => 1,
191
															  'importable' => FALSE)),
197
															  'importable' => FALSE)),
192
 
198
 
193
				'mots_cles_texte'	=> self::GenColInfo(Array('abbrev' => 'mots_cles_texte',
199
				'mots_cles_texte'	=> self::GenColInfo(Array('abbrev' => 'mots_cles_texte',
194
															  'nom' => 'Mots Clés',
200
															  'nom' => 'Mots Clés',
195
															  'extra' => 1)),
201
															  'extra' => 1)),
196
				'date_creation'		=> self::GenColInfo(Array('abbrev' => 'date_creation',
202
				'date_creation'		=> self::GenColInfo(Array('abbrev' => 'date_creation',
197
															  'nom' => 'Date Création',
203
															  'nom' => 'Date Création',
198
															  'extra' => 1,
204
															  'extra' => 1,
199
															  'importable' => FALSE)),
205
															  'importable' => FALSE)),
200
				'date_modification'	=> self::GenColInfo(Array('abbrev' => 'date_modification',
206
				'date_modification'	=> self::GenColInfo(Array('abbrev' => 'date_modification',
201
															  'nom' => 'Date Modification',
207
															  'nom' => 'Date Modification',
202
															  'extra' => 1,
208
															  'extra' => 1,
203
															  'importable' => FALSE)),
209
															  'importable' => FALSE)),
204
 
210
 
205
				// rappel transmission = 1, signifie simplement "public"
211
				// rappel transmission = 1, signifie simplement "public"
206
				// des données importées peuvent être d'emblée "publiques"
212
				// des données importées peuvent être d'emblée "publiques"
207
				// "importable" = TRUE
213
				// "importable" = TRUE
208
				'transmission'		=> self::GenColInfo(Array('abbrev' => 'transmission',
214
				'transmission'		=> self::GenColInfo(Array('abbrev' => 'transmission',
209
															  'nom' => 'Transmis',
215
															  'nom' => 'Transmis',
210
															  'extra' => 1,
216
															  'extra' => 1,
211
															  'fonction' => 'boolOuiNon')),
217
															  'fonction' => 'boolOuiNon')),
212
				'date_transmission'	=> self::GenColInfo(Array('abbrev' => 'date_transmission',
218
				'date_transmission'	=> self::GenColInfo(Array('abbrev' => 'date_transmission',
213
															  'nom' => 'Date Transmission',
219
															  'nom' => 'Date Transmission',
214
															  'extra' => 1,
220
															  'extra' => 1,
215
															  'importable' => FALSE)),
221
															  'importable' => FALSE)),
216
				'abondance'			=> self::GenColInfo(Array('abbrev' => 'abondance',
222
				'abondance'			=> self::GenColInfo(Array('abbrev' => 'abondance',
217
															  'nom' => 'Abondance',
223
															  'nom' => 'Abondance',
218
															  'extra' => 1)),
224
															  'extra' => 1)),
219
				'certitude'			=> self::GenColInfo(Array('abbrev' => 'certitude',
225
				'certitude'			=> self::GenColInfo(Array('abbrev' => 'certitude',
220
															  'nom' => 'Certitude',
226
															  'nom' => 'Certitude',
221
															  'extra' => 1)),
227
															  'extra' => 1)),
222
				'phenologie'		=> self::GenColInfo(Array('abbrev' => 'phenologie',
228
				'phenologie'		=> self::GenColInfo(Array('abbrev' => 'phenologie',
223
															  'nom' => 'Phénologie',
229
															  'nom' => 'Phénologie',
224
															  'extra' => 1)),
230
															  'extra' => 1)),
225
 
231
 
226
				// XXX: getImages() dépend du contexte de Cel, et doit être appelée comme cas particulier
232
				// XXX: getImages() dépend du contexte de Cel, et doit être appelée comme cas particulier
227
				// cf ExportXLS::traiterLigneObservation()
233
				// cf ExportXLS::traiterLigneObservation()
228
				'images'			=> self::GenColInfo(Array('abbrev' => 'images',
234
				'images'			=> self::GenColInfo(Array('abbrev' => 'images',
229
															  'nom' => 'Image(s)',
235
															  'nom' => 'Image(s)',
230
															  'extra' => 1,
236
															  'extra' => 1,
231
															  'fonction_data' => NULL /* cas particulier 'getImages' */,
237
															  'fonction_data' => NULL /* cas particulier 'getImages' */,
232
															  'importable' => TRUE,
238
															  'importable' => TRUE,
233
															  //'preload' => array(__CLASS__, 'getImages_preload')//TODO
239
															  //'preload' => array(__CLASS__, 'getImages_preload')//TODO
234
				)),
240
				)),
235
 
241
 
236
				/* 'nom_commun'			=> self::GenColInfo(Array('abbrev' => 'nom_commun',
242
				/* 'nom_commun'			=> self::GenColInfo(Array('abbrev' => 'nom_commun',
237
				   'nom' => 'Nom Commun',
243
				   'nom' => 'Nom Commun',
238
				   'extra' => 1,
244
				   'extra' => 1,
239
				   'fonction_data' => 'getNomCommun',
245
				   'fonction_data' => 'getNomCommun',
240
				   'importable' => FALSE),
246
				   'importable' => FALSE),
241
 
247
 
242
				   'nom-commun'			=> self::GenColInfo(Array('abbrev' => 'nom-commun',
248
				   'nom-commun'			=> self::GenColInfo(Array('abbrev' => 'nom-commun',
243
				   'nom' => 'Nom Commun',
249
				   'nom' => 'Nom Commun',
244
				   'extra' => 1,
250
				   'extra' => 1,
245
				   'fonction_data' => 'getNomCommun_v2'),
251
				   'fonction_data' => 'getNomCommun_v2'),
246
 
252
 
247
				   'nom-commun'			=> self::GenColInfo(Array('abbrev' => 'nom-commun',
253
				   'nom-commun'			=> self::GenColInfo(Array('abbrev' => 'nom-commun',
248
				   'nom' => 'Nom Commun',
254
				   'nom' => 'Nom Commun',
249
				   'extra' => 1,
255
				   'extra' => 1,
250
				   'fonction_data' => 'getNomCommun_v3'),
256
				   'fonction_data' => 'getNomCommun_v3'),
251
				   'importable' => FALSE), */
257
				   'importable' => FALSE), */
252
				'nom-commun'		=> self::GenColInfo(Array('abbrev' => 'nom-commun',
258
				'nom-commun' => self::GenColInfo(array(
-
 
259
					'abbrev' => 'nom-commun',
253
															  'nom' => 'Nom Commun',
260
					'nom' => 'Nom Commun',
254
															  'extra' => 1,
261
					'extra' => 1,
255
															  'fonction_data' => NULL /* cas particu 'getNomCommun_v4' */,
262
					'fonction_data' => null /* cas particu 'getNomCommun_v4' */,
256
															  'preload' => array(__CLASS__, 'getNomCommun_preload')))
263
					'preload' => array(__CLASS__, 'getNomCommun_preload')))
257
			);
264
			);
258
		}
265
		}
259
 
266
 
260
		if(isset($groupe_de_champs['baseflor'])) {
267
		if(isset($groupe_de_champs['baseflor'])) {
261
			$colonnes += array(
268
			$colonnes += array(
262
				// champ dynamique
269
				// champ dynamique
263
				'baseflor'			=> self::GenColInfo(Array('abbrev' => 'baseflor',
270
				'baseflor' => self::GenColInfo(array(
-
 
271
					'abbrev' => 'baseflor',
264
															  'nom' => '',
272
					'nom' => '',
265
															  'extra' => 1,
273
					'extra' => 1,
266
															  'importable' => FALSE,
274
					'importable' => false,
267
															  'preload' => array(__CLASS__, 'baseflor_preload'),
275
					'preload' => array(__CLASS__, 'baseflor_preload'),
268
															  'dyna' => array(__CLASS__, 'baseflor_ligne'))),
276
					'dyna' => array(__CLASS__, 'baseflor_ligne'))),
269
			);
277
			);
270
		}
278
		}
271
 
279
 
272
		if(isset($groupe_de_champs['etendu'])) {
280
		if (isset($groupe_de_champs['etendu'])) {
273
			$colonnes += array(
281
			$colonnes += array(
274
				// champ dynamique
282
				// champ dynamique
-
 
283
				'etendu' => self::GenColInfo(array(
275
				'etendu'			=> self::GenColInfo(Array('abbrev' => 'etendu',
284
					'abbrev' => 'etendu',
276
															  'nom' => '',
285
					'nom' => '',
277
															  'extra' => 1,
286
					'extra' => 1,
278
															  'importable' => FALSE,
287
					'importable' => false,
279
															  'preload' => array(__CLASS__, 'champsEtendus_preload'),
288
					'preload' => array(__CLASS__, 'champsEtendus_preload'),
280
															  'dyna' => array(__CLASS__, 'champsEtendus_ligne'))),
289
					'dyna' => array(__CLASS__, 'champsEtendus_ligne'))),
281
			);
290
			);
282
		}
291
		}
283
 
292
 
284
		if(isset($groupe_de_champs['auteur'])) {
293
		if (isset($groupe_de_champs['auteur'])) {
285
			$colonnes += array(
294
			$colonnes += array(
-
 
295
				'observateur' => self::GenColInfo(array(
286
				'observateur'	=> self::GenColInfo(Array('abbrev' => 'observateur',
296
					'abbrev' => 'observateur',
287
														  'nom' => 'Observateur',
297
					'nom' => 'Observateur',
288
														  'extra' => 1,
298
					'extra' => 1,
289
														  'fonction_data' => 'formaterUrlUser',
299
					'fonction_data' => 'formaterUrlUser',
290
														  'importable' => FALSE)),
300
					'importable' => false)),
291
			);
301
			);
292
		}
-
 
293
 
302
		}
294
		return $colonnes;
303
		return $colonnes;
295
	}
304
	}
296
 
305
 
297
	static function preload($colonnes, $cel, $ids) {
306
	static function preload($colonnes, $cel, $ids) {
298
		$result = array();
307
		$result = array();
299
		foreach($colonnes as $abbrev => $colonne) {
308
		foreach ($colonnes as $abbrev => $colonne) {
300
			if(!$colonne['preload']) continue;
309
			if (!$colonne['preload']) {
-
 
310
				continue;
-
 
311
			}
301
			$result[$abbrev] = call_user_func($colonne['preload'], $cel, $ids);
312
			$result[$abbrev] = call_user_func($colonne['preload'], $cel, $ids);
302
		}
313
		}
303
		return $result;
314
		return $result;
304
	}
315
	}
305
 
316
 
306
	public static function getIntitulesColonnes($colonnes) {
317
	public static function getIntitulesColonnes($colonnes) {
307
		// array_filter pour supprimer les colonnes "dynamique" n'ayant pas défini $nom (cf GenColInfo())
318
		// array_filter pour supprimer les colonnes "dynamique" n'ayant pas défini $nom (cf GenColInfo())
308
		return array_filter(array_map(array('FormateurGroupeColonne', 'retournerNomItem'), $colonnes));
319
		return array_filter(array_map(array('FormateurGroupeColonne', 'retournerNomItem'), $colonnes));
309
	}
320
	}
310
 
321
 
311
	public static function retournerNomItem(&$item) {
322
	public static function retournerNomItem(&$item) {
312
		return $item['nom'];
323
		return $item['nom'];
313
	}
324
	}
314
 
325
 
315
	public static function getLigneObservation(&$obs, &$colonnes, $cel = false) {
326
	public static function getLigneObservation(&$obs, &$colonnes, $cel = false) {
316
		$ligne_formatee = array();
327
		$ligne_formatee = array();
317
		foreach($colonnes as $abbrev => $colonne) {
328
		foreach($colonnes as $abbrev => $colonne) {
318
			$valeur = null;
329
			$valeur = null;
319
			if($colonne['extra'] == 2 || ! is_null($colonne['dyna'])) continue;
330
			if ($colonne['extra'] == 2 || ! is_null($colonne['dyna'])) {
-
 
331
				continue;
-
 
332
			}
320
 
333
 
321
			// valeur directe depuis cel_obs ?
334
			// valeur directe depuis cel_obs ?
-
 
335
			if (isset($obs[$abbrev])) {
-
 
336
				$valeur = $obs[$abbrev];
322
			if(isset($obs[$abbrev])) $valeur = $obs[$abbrev];
337
			}
323
 
338
 
324
			// pré-processeur des champs
339
			// pré-processeur des champs
325
			if(function_exists($colonne['fonction'])) {
340
			if (function_exists($colonne['fonction'])) {
326
				$valeur = $colonne['fonction']($valeur);
341
				$valeur = $colonne['fonction']($valeur);
327
			} elseif(method_exists(__CLASS__, $colonne['fonction'])) {
342
			} else if(method_exists(__CLASS__, $colonne['fonction'])) {
328
				$valeur = call_user_func(array(__CLASS__, $colonne['fonction']), $valeur);
343
				$valeur = call_user_func(array(__CLASS__, $colonne['fonction']), $valeur);
329
			} elseif($colonne['fonction']) {
-
 
330
				die("méthode {$colonne['fonction']} introuvable");
-
 
331
			}
344
			} else if($colonne['fonction']) {
332
			// fonction pour obtenir des champs (étendus)
345
				die("méthode {$colonne['fonction']} introuvable");
333
			elseif(function_exists($colonne['fonction_data'])) {
-
 
334
				$valeur = $colonne['fonction_data']($obs);
346
			} else if(function_exists($colonne['fonction_data'])) {// fonction pour obtenir des champs (étendus)
335
			}
347
				$valeur = $colonne['fonction_data']($obs);
336
			elseif(method_exists(__CLASS__, $colonne['fonction_data'])) {
348
			} else if(method_exists(__CLASS__, $colonne['fonction_data'])) {
337
				$valeur = call_user_func(array(__CLASS__, $colonne['fonction_data']), $obs);
349
				$valeur = call_user_func(array(__CLASS__, $colonne['fonction_data']), $obs);
338
			}
350
			}
339
 
351
 
340
			// // cette section devrait être vide:
352
			// // cette section devrait être vide:
341
			// // cas particuliers ingérable avec l'architecture actuelle:
353
			// // cas particuliers ingérable avec l'architecture actuelle:
342
			if(false && $abbrev == 'date_observation' && $valeur == "0000-00-00") {
354
			if (false && $abbrev == 'date_observation' && $valeur == '0000-00-00') {
343
				/* blah */
355
				/* blah */
344
			}
356
			}
345
			// ici à cause du passage de $cel ($this->utilisateur)
357
			// ici à cause du passage de $cel ($this->utilisateur)
346
			if($abbrev == 'images') {
358
			if ($abbrev == 'images') {
347
				$valeur = FormateurGroupeColonne::getImages($obs, $cel->id_utilisateur);
359
				$valeur = FormateurGroupeColonne::getImages($obs, $cel->id_utilisateur);
348
			}
360
			}
349
			if($abbrev == 'nom-commun') {
361
			if ($abbrev == 'nom-commun') {
350
				$valeur = FormateurGroupeColonne::getNomCommun_v4($obs);
362
				$valeur = FormateurGroupeColonne::getNomCommun_v4($obs);
351
			}
363
			}
352
 
364
 
353
			if($valeur == null) {
365
			if ($valeur == null) {
354
				$valeur = "";
366
				$valeur = '';
355
			}
367
			}
356
 
368
 
357
			// // fin de section "cas particuliers"
369
			// fin de section "cas particuliers"
358
			$ligne_formatee[] = $valeur;
370
			$ligne_formatee[] = $valeur;
359
		}
371
		}
360
 
372
 
361
		// uniquement les champs dynamiques
373
		// uniquement les champs dynamiques
362
		foreach($colonnes as $abbrev => $colonne) {
374
		foreach($colonnes as $abbrev => $colonne) {
363
			$valeur = null;
375
			$valeur = null;
364
			if(is_null($colonne['dyna'])) continue;
376
			if (is_null($colonne['dyna'])) {
365
			// XXX: PHP-5.3
377
				continue;
-
 
378
			}
366
			call_user_func_array($colonne['dyna'],
379
			call_user_func_array($colonne['dyna'], array($obs, &$ligne_formatee));
367
								 array($obs, &$ligne_formatee));
-
 
368
		}
380
		}
369
 
-
 
370
		return $ligne_formatee;
381
		return $ligne_formatee;
371
	}
382
	}
372
 
383
 
373
	/*
384
	/*
374
	* Wrapper générant un tableau associatif:
385
	* Wrapper générant un tableau associatif:
375
	* Ne pas changer les valeurs par défaut du prototype sans réflexion sur l'implication pour nomEnsembleVersListeColonnes()
386
	* Ne pas changer les valeurs par défaut du prototype sans réflexion sur l'implication pour nomEnsembleVersListeColonnes()
376
 
387
 
377
	* @param $abbrev (obligatoire): nom court de colonne, largement utilisé lors de l'import.
388
	* @param $abbrev (obligatoire): nom court de colonne, largement utilisé lors de l'import.
378
	*		  En effet chaque ligne importée est accessible à l'aide du `define` de $abbrev en majuscule, préfixé de "C_"
389
	*		  En effet chaque ligne importée est accessible à l'aide du `define` de $abbrev en majuscule, préfixé de "C_"
379
	*		  Exemple: $ligne[C_LONGITUDE] pour "longitude".
390
	*		  Exemple: $ligne[C_LONGITUDE] pour "longitude".
380
	*		  cf: ImportXLS::detectionEntete()
391
	*		  cf: ImportXLS::detectionEntete()
381
 
392
 
382
	* @param $nom (obligatoire): nom complet de colonne (utilisé pour la ligne d'en-tête)
393
	* @param $nom (obligatoire): nom complet de colonne (utilisé pour la ligne d'en-tête)
383
	*		  Les définition de champs dynamique (correspondant à de multiples colonnes) doivent laisser cette valeur
394
	*		  Les définition de champs dynamique (correspondant à de multiples colonnes) doivent laisser cette valeur
384
	*		  vide afin de ne pas créer une colonne supplémentaire erronée.
395
	*		  vide afin de ne pas créer une colonne supplémentaire erronée.
385
 
396
 
386
	* @param $is_extra:
397
	* @param $is_extra:
387
	* Si 0, la colonne est une colonne standard
398
	* Si 0, la colonne est une colonne standard
388
	* Si 1, la colonne est extra [le plus souvent générée automatiquement]
399
	* Si 1, la colonne est extra [le plus souvent générée automatiquement]
389
	*		 (auquel cas une bordure bleue entoure son nom dans la ligne d'entête)
400
	*		 (auquel cas une bordure bleue entoure son nom dans la ligne d'entête)
390
	* Si 2, la colonne n'est pas traité à l'export, mais une définition peut lui être donnée
401
	* Si 2, la colonne n'est pas traité à l'export, mais une définition peut lui être donnée
391
	*		 qui pourra être utilisée à l'import, exemple: "image"
402
	*		 qui pourra être utilisée à l'import, exemple: "image"
392
 
403
 
393
	* @param $fonction (optionnel): un nom d'un fonction de préprocessing
404
	* @param $fonction (optionnel): un nom d'un fonction de préprocessing
394
	* 		  $fonction doit prendre comme seul argument la valeur d'origine et retourner la valeur transformée
405
	* 		  $fonction doit prendre comme seul argument la valeur d'origine et retourner la valeur transformée
395
 
406
 
396
	* @param $fonction_data (optionnel): une *méthode* d'obtention de donnée
407
	* @param $fonction_data (optionnel): une *méthode* d'obtention de donnée
397
	* 		  $fonction_data doit prendre comme premier argument le tableau des champs de l'enregistrement existant
408
	* 		  $fonction_data doit prendre comme premier argument le tableau des champs de l'enregistrement existant
398
	*		  $fonction_data doit retourner une valeur
409
	*		  $fonction_data doit retourner une valeur
399
 
410
 
400
	* @param $importable (optionnel): défini si la colonne est traitée (ou absolument ignorée par PHPExcel) lors de
411
	* @param $importable (optionnel): défini si la colonne est traitée (ou absolument ignorée par PHPExcel) lors de
401
	*		  l'import.
412
	*		  l'import.
402
 
413
 
403
	* @param $preload (optionnel): défini une fonction de préchargement massif de donnée potentiellement utilisable par $fonction_data.
414
	* @param $preload (optionnel): défini une fonction de préchargement massif de donnée potentiellement utilisable par $fonction_data.
404
	*		  Utile, notamment, dans le cadre de l'export
415
	*		  Utile, notamment, dans le cadre de l'export
405
 
416
 
406
	* @param $fonction_dynamique (optionnel): défini une fonction ajoutant un nombre arbitraire de colonnes à une ligne donnée
417
	* @param $fonction_dynamique (optionnel): défini une fonction ajoutant un nombre arbitraire de colonnes à une ligne donnée
407
	*		  Utile, notamment, dans le cadre de l'export des champs étendus ou des données baseflor
418
	*		  Utile, notamment, dans le cadre de l'export des champs étendus ou des données baseflor
408
	*		  La fonction doit TOUJOURS alterer la ligne en lui ajoutant une nombre CONSTANT d'éléments (NULL ou non)
419
	*		  La fonction doit TOUJOURS alterer la ligne en lui ajoutant une nombre CONSTANT d'éléments (NULL ou non)
409
	*		  La fonction doit prendre comme arguments ($obs, &$ligne_formatee)
420
	*		  La fonction doit prendre comme arguments ($obs, &$ligne_formatee)
410
	*/
421
	*/
411
	static function GenColInfo($args) {
422
	static function GenColInfo($args) {
412
		$default = Array('abbrev' => NULL,
423
		$default = array(
-
 
424
			'abbrev' => null,
413
						 'nom' => NULL,
425
			'nom' => null,
414
						 'extra' => 0,
426
			'extra' => 0,
415
						 'fonction' => NULL,
427
			'fonction' => null,
416
						 'fonction_data' => NULL,
428
			'fonction_data' => null,
417
						 'importable' => TRUE,
429
			'importable' => true,
418
						 'preload' => NULL,
430
			'preload' => null,
419
						 'dyna' => NULL);
431
			'dyna' => null);
420
		$ret = array_intersect_key($args, $default);
432
		$ret = array_intersect_key($args, $default);
421
		return array_merge($default, $ret);
433
		return array_merge($default, $ret);
422
	}
434
	}
423
 
435
 
424
	static function formaterDate($date_heure_mysql) {
436
	static function formaterDate($date_heure_mysql) {
425
		//return "";
437
		//return "";
426
		if (!$date_heure_mysql || $date_heure_mysql == "0000-00-00 00:00:00") return NULL;
438
		if (!$date_heure_mysql || $date_heure_mysql == "0000-00-00 00:00:00") {
-
 
439
			return null;
-
 
440
		}
427
		// malheureusement pas disponible en php < 5.3
441
		// malheureusement pas disponible en php < 5.3
428
		//$date_format = DateTime::createFromFormat("Y-m-d H:i:s", $date_heure_mysql);
442
		//$date_format = DateTime::createFromFormat("Y-m-d H:i:s", $date_heure_mysql);
429
		$val = explode(' ', $date_heure_mysql);
443
		$val = explode(' ', $date_heure_mysql);
430
		$date = explode('-', $val[0]);
444
		$date = explode('-', $val[0]);
431
		$heure = explode(':', $val[1]);
445
		$heure = explode(':', $val[1]);
432
		$timestamp = mktime((int) $heure[0], (int) $heure[1], (int) $heure[2], (int) $date[1], (int) $date[2], (int) $date[0]);
446
		$timestamp = mktime((int) $heure[0], (int) $heure[1], (int) $heure[2], (int) $date[1], (int) $date[2], (int) $date[0]);
433
		if(!$timestamp) return NULL;
447
		if (!$timestamp) {
-
 
448
			return null;
-
 
449
		}
434
		// TODO: les widgets ne font malheureusement pas usage de l'heure dans le CEL
450
		// TODO: les widgets ne font malheureusement pas usage de l'heure dans le CEL
435
		// TODO: si modification, ne pas oublier de modifier le format d'import correspondant
451
		// TODO: si modification, ne pas oublier de modifier le format d'import correspondant
436
		//	dans ImportXLS, traiterDateObs() (actuellement: "Y/m/d" car utilisation de strtotime() qui ne lit pas tout)
452
		//	dans ImportXLS, traiterDateObs() (actuellement: "Y/m/d" car utilisation de strtotime() qui ne lit pas tout)
437
		// $date_formatee = strftime('%d/%m/%Y', $timestamp);
453
		// $date_formatee = strftime('%d/%m/%Y', $timestamp);
438
		$date_formatee = strftime('%Y/%m/%d', $timestamp);
454
		$date_formatee = strftime('%Y/%m/%d', $timestamp);
439
		if(!$date_formatee) return "00/00/0000";
455
		if (!$date_formatee) {
-
 
456
			return '00/00/0000';
-
 
457
		}
440
		return $date_formatee;
458
		return $date_formatee;
441
	}
459
	}
442
 
460
 
443
	static function formaterUrlUser($obs) {
461
	static function formaterUrlUser($obs) {
444
		$is_id = is_numeric($obs['ce_utilisateur']);
462
		$is_id = is_numeric($obs['ce_utilisateur']);
445
		return sprintf("%s %s <%s>%s",
463
		return sprintf("%s %s <%s>%s",
446
					   $obs['prenom_utilisateur'],
464
			$obs['prenom_utilisateur'],
447
					   $obs['nom_utilisateur'],
465
			$obs['nom_utilisateur'],
448
					   preg_replace(';@.*;', '@...', $obs['courriel_utilisateur']),
466
			preg_replace(';@.*;', '@...', $obs['courriel_utilisateur']),
449
					   $is_id ? sprintf(' (' . USER_BASEURL . ')', $obs['ce_utilisateur']) : '');
467
			$is_id ? sprintf(' (' . USER_BASEURL . ')', $obs['ce_utilisateur']) : '');
450
	}
468
	}
451
 
469
 
452
	static function getImages_preload($cel, $obsids) {
470
	static function getImages_preload($cel, $obsids) {
453
		if(!$obsids) return;
471
		if (!$obsids) return;
454
		$rec = Cel::db()->requeter(
472
		$rec = Cel::db()->requeter(
455
			sprintf("SELECT o.id_observation, GROUP_CONCAT(nom_original ORDER BY nom_original ASC SEPARATOR '%s') AS i " .
473
			sprintf("SELECT o.id_observation, GROUP_CONCAT(nom_original ORDER BY nom_original ASC SEPARATOR '%s') AS i " .
456
					"FROM cel_images i LEFT JOIN cel_obs o ON (i.ce_observation = o.id_observation) " .
474
					"FROM cel_images i LEFT JOIN cel_obs o ON (i.ce_observation = o.id_observation) " .
457
					"WHERE o.ce_utilisateur = %d AND o.id_observation IN (%s) " .
475
					"WHERE o.ce_utilisateur = %d AND o.id_observation IN (%s) " .
458
					"GROUP BY id_observation",
476
					"GROUP BY id_observation",
459
					SEPARATEUR_IMAGES,
477
					SEPARATEUR_IMAGES,
460
					$cel->id_utilisateur,
478
					$cel->id_utilisateur,
461
					implode(',', $obsids)));
479
					implode(',', $obsids)));
462
		foreach($rec as $v) {
480
		foreach ($rec as $v) {
463
			self::$cache['getImages'][$v['id_observation']] = $v['i'];
481
			self::$cache['getImages'][$v['id_observation']] = $v['i'];
464
		}
482
		}
465
		return NULL;
483
		return null;
466
	}
484
	}
467
 
485
 
468
	static function getImages($obs, $id_utilisateur) {
486
	static function getImages($obs, $id_utilisateur) {
469
		if(! $id_utilisateur) return NULL;
487
		if(! $id_utilisateur) return NULL;
470
		if(isset(self::$cache['getImages'][$obs['id_observation']]))
488
		if(isset(self::$cache['getImages'][$obs['id_observation']]))
471
			return self::$cache['getImages'][$obs['id_observation']];
489
			return self::$cache['getImages'][$obs['id_observation']];
472
 
490
 
473
		$rec = Cel::db()->requeter(
491
		$rec = Cel::db()->requeter(
474
			sprintf("SELECT GROUP_CONCAT(nom_original ORDER BY nom_original ASC SEPARATOR '%s') AS i ".
492
			sprintf("SELECT GROUP_CONCAT(nom_original ORDER BY nom_original ASC SEPARATOR '%s') AS i ".
475
					"FROM cel_images i ".
493
					"FROM cel_images i ".
476
					"	LEFT JOIN cel_obs o ON (i.ce_observation = o.id_observation) ".
494
					"	LEFT JOIN cel_obs o ON (i.ce_observation = o.id_observation) ".
477
					"WHERE o.ce_utilisateur = %d ".
495
					"WHERE o.ce_utilisateur = %d ".
478
					"	AND o.id_observation = %d ".
496
					"	AND o.id_observation = %d ".
479
					'LIMIT 1',
497
					'LIMIT 1',
480
					SEPARATEUR_IMAGES,
498
					SEPARATEUR_IMAGES,
481
					$id_utilisateur,
499
					$id_utilisateur,
482
					$obs['id_observation']));
500
					$obs['id_observation']));
483
		return $rec ? $rec[0]['i'] : NULL;
501
		return $rec ? $rec[0]['i'] : NULL;
484
	}
502
	}
485
 
503
 
486
	public static function convertirCodeZoneGeoVersDepartement($code_zone_geo) {
504
	public static function convertirCodeZoneGeoVersDepartement($code_zone_geo) {
487
		$code_departement = '';
505
		$code_departement = '';
488
		if(self::estUnCodeInseeDepartement($code_zone_geo)) {
506
		if(self::estUnCodeInseeDepartement($code_zone_geo)) {
489
			$code_departement = substr(ltrim($code_zone_geo,'INSEE-C:'),0,2);
507
			$code_departement = substr(ltrim($code_zone_geo,'INSEE-C:'),0,2);
490
		}
508
		}
491
 
509
 
492
		return $code_departement;
510
		return $code_departement;
493
	}
511
	}
494
 
512
 
495
	public static function trim0($lonlat) {
513
	public static function trim0($lonlat) {
496
		return trim(trim($lonlat, "0"), ".");
514
		return trim(trim($lonlat, "0"), ".");
497
	}
515
	}
498
 
516
 
499
	public static function boolOuiNon($transmission) {
517
	public static function boolOuiNon($transmission) {
500
		return $transmission ? 'oui' : '';
518
		return $transmission ? 'oui' : '';
501
	}
519
	}
502
 
520
 
503
	public static function estUnCodeInseeDepartement($code_a_tester) {
521
	public static function estUnCodeInseeDepartement($code_a_tester) {
504
		return preg_match('/^INSEE-C:[0-9]{5}/',$code_a_tester);
522
		return preg_match('/^INSEE-C:[0-9]{5}/',$code_a_tester);
505
	}
523
	}
506
 
-
 
507
 
524
 
508
	// TODO: référentiel ne devrait pas être généré au moment d'un Config::get,
525
	// TODO: référentiel ne devrait pas être généré au moment d'un Config::get,
509
	// comme dans Config::get('nomsVernaRechercheLimiteeTpl')
526
	// comme dans Config::get('nomsVernaRechercheLimiteeTpl')
510
	// Par exemple, la variable pour "nva" ?
527
	// Par exemple, la variable pour "nva" ?
511
	function getNomCommun($obs) {
528
	function getNomCommun($obs) {
512
		$langue = 'fra';
529
		$langue = 'fra';
513
		list($referentiel) = explode(':', strtolower($obs['nom_referentiel']));
530
		list($referentiel) = explode(':', strtolower($obs['nom_referentiel']));
514
		if($referentiel == 'bdtfx') $referentiel = 'nvjfl';
531
		if($referentiel == 'bdtfx') $referentiel = 'nvjfl';
515
		else return '';
532
		else return '';
516
 
533
 
517
		$cache_id = $referentiel . '-' . $obs['nt'] . '-' . $langue;
534
		$cache_id = $referentiel . '-' . $obs['nt'] . '-' . $langue;
518
		if(isset(self::$cache['getNomCommun'][$cache_id])) {
535
		if(isset(self::$cache['getNomCommun'][$cache_id])) {
519
			//debug: error_log("require url_service_nom_attribution: OK ! (pour \"{$obs['nom_ret']}\")");
536
			//debug: error_log("require url_service_nom_attribution: OK ! (pour \"{$obs['nom_ret']}\")");
520
			return self::$cache['getNomCommun'][$cache_id];
537
			return self::$cache['getNomCommun'][$cache_id];
521
		}
538
		}
522
		// pas de cache:
539
		// pas de cache:
523
		//debug: error_log("require url_service_nom_attribution pour \"{$obs['nom_ret']}\"");
540
		//debug: error_log("require url_service_nom_attribution pour \"{$obs['nom_ret']}\"");
524
 
541
 
525
		// pour bdtfx:
542
		// pour bdtfx:
526
		// /service:eflore:0.1/nvjfl/noms-vernaculaires/attributions?masque.nt=X&masque.lg=fra&retour.champs=num_statut
543
		// /service:eflore:0.1/nvjfl/noms-vernaculaires/attributions?masque.nt=X&masque.lg=fra&retour.champs=num_statut
527
		// /projet/services/modules/0.1/nvjfl/NomsVernaculaires.php
544
		// /projet/services/modules/0.1/nvjfl/NomsVernaculaires.php
528
		$url = str_replace(Array('{referentiel}', '{valeur}', '{langue}'),
545
		$url = str_replace(Array('{referentiel}', '{valeur}', '{langue}'),
529
						   Array($referentiel, $obs['nt'], $langue),
546
						   Array($referentiel, $obs['nt'], $langue),
530
						   self::$config['eflore']['url_service_nom_attribution']) . // TODO !
547
						   self::$config['eflore']['url_service_nom_attribution']) . // TODO !
531
			"&retour.champs=num_statut";
548
			"&retour.champs=num_statut";
532
		$noms = @json_decode(file_get_contents($url));
549
		$noms = @json_decode(file_get_contents($url));
533
		if(! $noms) return '';
550
		if(! $noms) return '';
534
		$noms = array_filter((array)($noms->resultat), array($this, retournerNumStatutUn)); // XXX: php 5.3
551
		$noms = array_filter((array)($noms->resultat), array($this, retournerNumStatutUn)); // XXX: php 5.3
535
		$nom = array_pop($noms)->nom_vernaculaire;
552
		$nom = array_pop($noms)->nom_vernaculaire;
536
 
553
 
537
		// cache
554
		// cache
538
		self::$cache['getNomCommun'][$cache_id] = $nom;
555
		self::$cache['getNomCommun'][$cache_id] = $nom;
539
		return $nom;
556
		return $nom;
540
	}
557
	}
541
 
558
 
542
	private function retournerNumStatutUn(&$item) {
559
	private function retournerNumStatutUn(&$item) {
543
		return ($item->num_statut == 1);
560
		return ($item->num_statut == 1);
544
	}
561
	}
545
 
562
 
546
	private function retournerNumStatutUnArr(&$item) {
563
	private function retournerNumStatutUnArr(&$item) {
547
		return ($item['num_statut'] == 1);
564
		return ($item['num_statut'] == 1);
548
	}
565
	}
549
 
566
 
550
	// si getNomCommun_v2 ou getNomCommun_v3 sont utilisés
567
	// si getNomCommun_v2 ou getNomCommun_v3 sont utilisés
551
	/* require_once('/home/raphael/eflore/framework/framework/Framework.php');
568
	/* require_once('/home/raphael/eflore/framework/framework/Framework.php');
552
	Framework::setCheminAppli("/home/raphael/eflore/projets/services/index.php");
569
	Framework::setCheminAppli("/home/raphael/eflore/projets/services/index.php");
553
	Framework::setInfoAppli(Config::get('info'));
570
	Framework::setInfoAppli(Config::get('info'));
554
	require_once('/home/raphael/eflore/projets/services/modules/0.1/Projets.php');*/
571
	require_once('/home/raphael/eflore/projets/services/modules/0.1/Projets.php');*/
555
 
572
 
556
	/* Tente de bootstraper le framework au plus court et d'initialiser une instance de
573
	/* Tente de bootstraper le framework au plus court et d'initialiser une instance de
557
	   NomsVernaculaires pour obtenir le nom commun */
574
	   NomsVernaculaires pour obtenir le nom commun */
558
	function getNomCommun_v2($obs) {
575
	function getNomCommun_v2($obs) {
559
		static $service;
576
		static $service;
560
		$service = new Projets();
577
		$service = new Projets();
561
 
578
 
562
		$langue = 'fra';
579
		$langue = 'fra';
563
		list($referentiel) = explode(':', strtolower($obs['nom_referentiel']));
580
		list($referentiel) = explode(':', strtolower($obs['nom_referentiel']));
564
		if($referentiel == 'bdtfx') $referentiel = 'nvjfl';
581
		if($referentiel == 'bdtfx') $referentiel = 'nvjfl';
565
		else return '';
582
		else return '';
566
 
583
 
567
		$cache_id = $referentiel . '-' . $obs['nt'] . '-' . $langue;
584
		$cache_id = $referentiel . '-' . $obs['nt'] . '-' . $langue;
568
		if(isset(self::$cache['getNomCommun'][$cache_id])) {
585
		if(isset(self::$cache['getNomCommun'][$cache_id])) {
569
			error_log("require NomsVernaculaires.php: OK ! (pour \"{$obs['nom_ret']}\")");
586
			error_log("require NomsVernaculaires.php: OK ! (pour \"{$obs['nom_ret']}\")");
570
			return self::$cache['getNomCommun'][$cache_id];
587
			return self::$cache['getNomCommun'][$cache_id];
571
		}
588
		}
572
		// pas de cache:
589
		// pas de cache:
573
		error_log("require NomsVernaculaires.php pour \"{$obs['nom_ret']}\"");
590
		error_log("require NomsVernaculaires.php pour \"{$obs['nom_ret']}\"");
574
 
591
 
575
		$donnees = Array('masque.nt' => $obs['nt'],
592
		$donnees = Array('masque.nt' => $obs['nt'],
576
						 'masque.lg' => $langue,
593
						 'masque.lg' => $langue,
577
						 'retour.champs' => 'num_statut');
594
						 'retour.champs' => 'num_statut');
578
		$noms = $service->consulter(Array('nvjfl', 'noms-vernaculaires'), $donnees);
595
		$noms = $service->consulter(Array('nvjfl', 'noms-vernaculaires'), $donnees);
579
 
596
 
580
		if(! $noms) return '';
597
		if(! $noms) return '';
581
		$noms = array_filter((array)($noms->resultat), array($this, retournerNumStatutUn)); // XXX: php 5.3
598
		$noms = array_filter((array)($noms->resultat), array($this, retournerNumStatutUn)); // XXX: php 5.3
582
		$nom = array_pop($noms)->nom_vernaculaire;
599
		$nom = array_pop($noms)->nom_vernaculaire;
583
 
600
 
584
		// cache
601
		// cache
585
		self::$cache['getNomCommun'][$cache_id] = $nom;
602
		self::$cache['getNomCommun'][$cache_id] = $nom;
586
		return $nom;
603
		return $nom;
587
	}
604
	}
588
 
605
 
589
 
606
 
590
	/* Effectue un bootstraping plus sage que ci-dessus, mais le gain d'efficacité
607
	/* Effectue un bootstraping plus sage que ci-dessus, mais le gain d'efficacité
591
	   n'est pas aussi retentissant qu'espéré */
608
	   n'est pas aussi retentissant qu'espéré */
592
	static $service;
609
	static $service;
593
	function getNomCommun_v3($obs) {
610
	function getNomCommun_v3($obs) {
594
		if(! $this->service) $this->service = new Projets();
611
		if(! $this->service) $this->service = new Projets();
595
 
612
 
596
		$langue = 'fra';
613
		$langue = 'fra';
597
		list($referentiel) = explode(':', strtolower($obs['nom_referentiel']));
614
		list($referentiel) = explode(':', strtolower($obs['nom_referentiel']));
598
		if($referentiel == 'bdtfx') $referentiel = 'nvjfl';
615
		if($referentiel == 'bdtfx') $referentiel = 'nvjfl';
599
		else return '';
616
		else return '';
600
 
617
 
601
		$cache_id = $referentiel . '-' . $obs['nt'] . '-' . $langue;
618
		$cache_id = $referentiel . '-' . $obs['nt'] . '-' . $langue;
602
		if(isset(self::$cache['getNomCommun'][$cache_id])) {
619
		if(isset(self::$cache['getNomCommun'][$cache_id])) {
603
			error_log("require NomsVernaculaires.php: OK ! (pour \"{$obs['nom_ret']}\")");
620
			error_log("require NomsVernaculaires.php: OK ! (pour \"{$obs['nom_ret']}\")");
604
			return self::$cache['getNomCommun'][$cache_id];
621
			return self::$cache['getNomCommun'][$cache_id];
605
		}
622
		}
606
		// pas de cache:
623
		// pas de cache:
607
		error_log("require NomsVernaculaires.php pour \"{$obs['nom_ret']}\"");
624
		error_log("require NomsVernaculaires.php pour \"{$obs['nom_ret']}\"");
608
 
625
 
609
		$donnees = Array('masque.nt' => $obs['nt'],
626
		$donnees = Array('masque.nt' => $obs['nt'],
610
						 'masque.lg' => $langue,
627
						 'masque.lg' => $langue,
611
						 'retour.champs' => 'conseil_emploi');
628
						 'retour.champs' => 'conseil_emploi');
612
		$this->service->initialiserRessourcesEtParametres(Array('nvjfl', 'noms-vernaculaires', 'attributions'), $donnees);
629
		$this->service->initialiserRessourcesEtParametres(Array('nvjfl', 'noms-vernaculaires', 'attributions'), $donnees);
613
		try {
630
		try {
614
			$noms = $this->service->traiterRessources();
631
			$noms = $this->service->traiterRessources();
615
		} catch(Exception $e) {
632
		} catch(Exception $e) {
616
			return '';
633
			return '';
617
		}
634
		}
618
		if(! $noms) return '';
635
		if(! $noms) return '';
619
		$noms = array_filter($noms['resultat'], array($this, retournerNumStatutUnArr)); // XXX: php 5.3
636
		$noms = array_filter($noms['resultat'], array($this, retournerNumStatutUnArr)); // XXX: php 5.3
620
		$premier_nom = array_pop($noms);
637
		$premier_nom = array_pop($noms);
621
		$nom = $premier_nom['nom_vernaculaire'];
638
		$nom = $premier_nom['nom_vernaculaire'];
622
 
639
 
623
		// cache
640
		// cache
624
		self::$cache['getNomCommun'][$cache_id] = $nom;
641
		self::$cache['getNomCommun'][$cache_id] = $nom;
625
		return $nom;
642
		return $nom;
626
	}
643
	}
627
 
644
 
628
	/* Cette fonction initialise le cache des noms communs en 1 fois, sur la liste des observations à exporter.
645
	/* Cette fonction initialise le cache des noms communs en 1 fois, sur la liste des observations à exporter.
629
	   Ainsi, les appels successifs à getNomCommun_v4() ne sont pas couteux (pas de requête SQL) */
646
	   Ainsi, les appels successifs à getNomCommun_v4() ne sont pas couteux (pas de requête SQL) */
630
	static function getNomCommun_preload($cel, $obsids) {
647
	static function getNomCommun_preload($cel, $obsids) {
631
		if(!$obsids) return;
648
		if(!$obsids) return;
632
		if(!self::referenceTableExiste()) return NULL;
649
		if(!self::referenceTableExiste()) return NULL;
633
 
650
 
634
		// CREATE INDEX i_nom_referentiel ON cel_obs (nom_referentiel(5));
651
		// CREATE INDEX i_nom_referentiel ON cel_obs (nom_referentiel(5));
635
		$req = sprintf("SELECT r.referentiel, r.num_taxon, r.nom_commun FROM cel_references r" .
652
		$req = sprintf("SELECT r.referentiel, r.num_taxon, r.nom_commun FROM cel_references r" .
636
					   " INNER JOIN cel_obs c ON (r.referentiel = substring_index(c.nom_referentiel, ':', 1) and r.num_taxon = c.nt)" .
653
					   " INNER JOIN cel_obs c ON (r.referentiel = substring_index(c.nom_referentiel, ':', 1) and r.num_taxon = c.nt)" .
637
					   " WHERE c.id_observation IN (%s)",
654
					   " WHERE c.id_observation IN (%s)",
638
					   implode(',', $obsids));
655
					   implode(',', $obsids));
639
		$res = Cel::db()->requeter($req);
656
		$res = Cel::db()->requeter($req);
640
		foreach($res as $v) {
657
		foreach($res as $v) {
641
			self::$cache['getNomCommun'][$v['referentiel'] . '-' . $v['num_taxon'] . '-' . 'fra'] = $v['nom_commun'];
658
			self::$cache['getNomCommun'][$v['referentiel'] . '-' . $v['num_taxon'] . '-' . 'fra'] = $v['nom_commun'];
642
		}
659
		}
643
		return NULL;
660
		return NULL;
644
	}
661
	}
645
 
662
 
646
	static function referenceTableExiste() {
663
	static function referenceTableExiste() {
647
		if (!self::$is_table) {
664
		if (!self::$is_table) {
648
			// une seule fois
665
			// une seule fois
649
			if (! Cel::db()->requeterLigne("SHOW TABLES LIKE 'cel_references'")) return FALSE;
666
			if (! Cel::db()->requeterLigne("SHOW TABLES LIKE 'cel_references'")) return FALSE;
650
			self::$is_table = TRUE;
667
			self::$is_table = TRUE;
651
		}
668
		}
652
		return TRUE;
669
		return TRUE;
653
	}
670
	}
654
 
671
 
655
	static function getNomCommun_v4($obs) {
672
	static function getNomCommun_v4($obs) {
656
		// Attention la fonction suppose que l'on ait fait appel à getNomCommun_preload avant
673
		// Attention la fonction suppose que l'on ait fait appel à getNomCommun_preload avant
657
		// d'être appelée
674
		// d'être appelée
658
		if(! $obs['nt']) return NULL;
675
		if(! $obs['nt']) return NULL;
659
		if(! self::referenceTableExiste()) return NULL;
676
		if(! self::referenceTableExiste()) return NULL;
660
 
677
 
661
		$langue = 'fra';
678
		$langue = 'fra';
662
		list($referentiel) = explode(':', strtolower($obs['nom_referentiel']));
679
		list($referentiel) = explode(':', strtolower($obs['nom_referentiel']));
663
		$cache_id = $referentiel . '-' . $obs['nt'] . '-' . $langue;
680
		$cache_id = $referentiel . '-' . $obs['nt'] . '-' . $langue;
664
 
681
 
665
		$nom = null;
682
		$nom = null;
666
		// cache:
683
		// cache:
667
		if(isset(self::$cache['getNomCommun'])) {
684
		if(isset(self::$cache['getNomCommun'])) {
668
			if(isset(self::$cache['getNomCommun'][$cache_id])) return self::$cache['getNomCommun'][$cache_id];
685
			if(isset(self::$cache['getNomCommun'][$cache_id])) return self::$cache['getNomCommun'][$cache_id];
669
			// XXX: problème de valeurs NULL ?
686
			// XXX: problème de valeurs NULL ?
670
			if(array_key_exists($cache_id, self::$cache['getNomCommun'])) {
687
			if(array_key_exists($cache_id, self::$cache['getNomCommun'])) {
671
				$nom = self::$cache['getNomCommun'][$cache_id];
688
				$nom = self::$cache['getNomCommun'][$cache_id];
672
			}
689
			}
673
		}
690
		}
674
 
691
 
675
		return $nom;
692
		return $nom;
676
	}
693
	}
677
 
694
 
678
 
695
 
679
	/* Cette fonction initialise le cache des données baseflor en 1 fois, sur la liste des observations à exporter.
696
	/* Cette fonction initialise le cache des données baseflor en 1 fois, sur la liste des observations à exporter.
680
	   Ainsi, les appels successifs à baseflor_ligne() ne sont pas couteux (pas de requête SQL) */
697
	   Ainsi, les appels successifs à baseflor_ligne() ne sont pas couteux (pas de requête SQL) */
681
	static function baseflor_preload($cel, $obsids) {
698
	static function baseflor_preload($cel, $obsids) {
682
		if(!$obsids) return;
699
		if(!$obsids) return;
683
		if(!self::referenceTableExiste()) return NULL;
700
		if(!self::referenceTableExiste()) return NULL;
684
 
701
 
685
		// Attention (en attendant de faire une meilleure table et une meilleure requete) le distinct est très important
702
		// Attention (en attendant de faire une meilleure table et une meilleure requete) le distinct est très important
686
		$req = sprintf("SELECT DISTINCT referentiel, num_nom_retenu, %s FROM cel_references r" .
703
		$req = sprintf("SELECT DISTINCT referentiel, num_nom_retenu, %s FROM cel_references r" .
687
						" INNER JOIN cel_obs c ON (r.num_nom_retenu = c.nom_ret_nn)" .
704
						" INNER JOIN cel_obs c ON (r.num_nom_retenu = c.nom_ret_nn)" .
688
						" AND r.referentiel = IF(LOCATE(':', c.nom_referentiel) = 0, c.nom_referentiel, SUBSTR(c.nom_referentiel FROM 1 FOR LOCATE(':', c.nom_referentiel) - 1))" .
705
						" AND r.referentiel = IF(LOCATE(':', c.nom_referentiel) = 0, c.nom_referentiel, SUBSTR(c.nom_referentiel FROM 1 FOR LOCATE(':', c.nom_referentiel) - 1))" .
689
						" WHERE c.id_observation IN (%s)",
706
						" WHERE c.id_observation IN (%s)",
690
						//" AND catminat_code IS NOT NULL", // TODO: suppression des NULL ici signifie que le cache sera partiel...
707
						//" AND catminat_code IS NOT NULL", // TODO: suppression des NULL ici signifie que le cache sera partiel...
691
						implode(',', array_keys(self::$baseflor_col)),
708
						implode(',', array_keys(self::$baseflor_col)),
692
						implode(',', $obsids));
709
						implode(',', $obsids));
693
		$res = Cel::db()->requeter($req);
710
		$res = Cel::db()->requeter($req);
694
		if(!$res) return NULL;
711
		if(!$res) return NULL;
695
 
712
 
696
		foreach($res as $v) {
713
		foreach($res as $v) {
697
			$data = $v;
714
			$data = $v;
698
			unset($data['referentiel']); // non nécessaire
715
			unset($data['referentiel']); // non nécessaire
699
			unset($data['num_nom_retenu']); // non nécessaire
716
			unset($data['num_nom_retenu']); // non nécessaire
700
 
717
 
701
			// Des fois les synonymes ont des valeurs pour baseflor et pas le nom retenu et vice versa
718
			// Des fois les synonymes ont des valeurs pour baseflor et pas le nom retenu et vice versa
702
			// on les fusionne pour avoir le maximum d'infos, en attendant de repenser la table référence
719
			// on les fusionne pour avoir le maximum d'infos, en attendant de repenser la table référence
703
			if(isset(self::$cache['getBaseflor'][$v['referentiel'] . '-' . $v['num_nom_retenu']])) {
720
			if(isset(self::$cache['getBaseflor'][$v['referentiel'] . '-' . $v['num_nom_retenu']])) {
704
				$orig  = array_filter(self::$cache['getBaseflor'][$v['referentiel'] . '-' . $v['num_nom_retenu']], 'strlen');
721
				$orig  = array_filter(self::$cache['getBaseflor'][$v['referentiel'] . '-' . $v['num_nom_retenu']], 'strlen');
705
				$data  = array_filter($data , 'strlen');
722
				$data  = array_filter($data , 'strlen');
706
				$data = array_merge($orig, $data);
723
				$data = array_merge($orig, $data);
707
			}
724
			}
708
 
725
 
709
			self::$cache['getBaseflor'][$v['referentiel'] . '-' . $v['num_nom_retenu']] = $data;
726
			self::$cache['getBaseflor'][$v['referentiel'] . '-' . $v['num_nom_retenu']] = $data;
710
		}
727
		}
711
 
728
 
712
		return NULL;
729
		return NULL;
713
	}
730
	}
714
 
731
 
715
	/**
732
	/**
716
	 * Attention la fonction suppose que l'on ait fait appel à baseflor_preload avant
733
	 * Attention la fonction suppose que l'on ait fait appel à baseflor_preload avant
717
	 * d'être appelée
734
	 * d'être appelée
718
	 * @CASSECOUILLES elle pourrait le détecter et le faire elle-même
735
	 * @CASSECOUILLES elle pourrait le détecter et le faire elle-même
719
	 */
736
	 */
720
	static function baseflor_ligne($obs, &$ligne) {
737
	static function baseflor_ligne($obs, &$ligne) {
721
		$clefsBF = array_keys(self::$baseflor_col);
738
		$clefsBF = array_keys(self::$baseflor_col);
722
		// par défaut des colonnes vides pour ne pas décaler le bousin
739
		// par défaut des colonnes vides pour ne pas décaler le bousin
723
		$donneesBF = array_fill_keys($clefsBF, "");
740
		$donneesBF = array_fill_keys($clefsBF, "");
724
 
741
 
725
		// s'il y a des données baseflor
742
		// s'il y a des données baseflor
726
		if ($obs['nom_ret_nn'] && self::referenceTableExiste() && count(self::$cache['getBaseflor']) > 0) {
743
		if ($obs['nom_ret_nn'] && self::referenceTableExiste() && count(self::$cache['getBaseflor']) > 0) {
727
			// l'astuce à un franc vingt
744
			// l'astuce à un franc vingt
728
			list($referentiel) = explode(':', strtolower($obs['nom_referentiel']));
745
			list($referentiel) = explode(':', strtolower($obs['nom_referentiel']));
729
			$cache_id = $referentiel . '-' . $obs['nom_ret_nn'];
746
			$cache_id = $referentiel . '-' . $obs['nom_ret_nn'];
730
 
747
 
731
			// si les données baseflor existent dans le cache pour ce nom_ret_nn
748
			// si les données baseflor existent dans le cache pour ce nom_ret_nn
732
			if (array_key_exists($cache_id, self::$cache['getBaseflor'])) {
749
			if (array_key_exists($cache_id, self::$cache['getBaseflor'])) {
733
				$donneesBFATrous = self::$cache['getBaseflor'][$cache_id];
750
				$donneesBFATrous = self::$cache['getBaseflor'][$cache_id];
734
				foreach($clefsBF as $colbf) { // remplit les trous tout en préservant l'ordre
751
				foreach($clefsBF as $colbf) { // remplit les trous tout en préservant l'ordre
735
					if(array_key_exists($colbf, $donneesBFATrous)) {
752
					if(array_key_exists($colbf, $donneesBFATrous)) {
736
						$donneesBF[$colbf] = $donneesBFATrous[$colbf];
753
						$donneesBF[$colbf] = $donneesBFATrous[$colbf];
737
					} else {
754
					} else {
738
						$donneesBF[$colbf] = "";
755
						$donneesBF[$colbf] = "";
739
					}
756
					}
740
				}
757
				}
741
			}
758
			}
742
		}
759
		}
743
 
760
 
744
		// Quand les données sont prêtes, on les fusionne
761
		// Quand les données sont prêtes, on les fusionne
745
		$ligne = array_merge($ligne, $donneesBF);
762
		$ligne = array_merge($ligne, $donneesBF);
746
	}
763
	}
747
 
764
 
748
	static function champsEtendus_preload($cel, $obsids) {
765
	static function champsEtendus_preload($cel, $obsids) {
749
		$gestion_champs_etendus = new GestionChampsEtendus($cel->config, 'obs');
766
		$gestion_champs_etendus = new GestionChampsEtendus($cel->config, 'obs');
750
		$colonnes_champs_supp_par_obs = $gestion_champs_etendus->consulterClesParLots($obsids);
767
		$colonnes_champs_supp_par_obs = $gestion_champs_etendus->consulterClesParLots($obsids);
751
 
768
 
752
		// Supprime les champs étendus considérés comme privés dans le cas de l'export public en chargeant
769
		// Supprime les champs étendus considérés comme privés dans le cas de l'export public en chargeant
753
		// le catalogue et en excluant ceux qui sont explicitement privés
770
		// le catalogue et en excluant ceux qui sont explicitement privés
754
		if(!$cel->export_prive) {
771
		if(!$cel->export_prive) {
755
			$indices_a_supprimer = array();
772
			$indices_a_supprimer = array();
756
			$catalogue_champs_etendus = $gestion_champs_etendus->consulterCatalogueChampsEtendusPredefinis();
773
			$catalogue_champs_etendus = $gestion_champs_etendus->consulterCatalogueChampsEtendusPredefinis();
757
			foreach($catalogue_champs_etendus as $champ_catalogue) {
774
			foreach($catalogue_champs_etendus as $champ_catalogue) {
758
				if($champ_catalogue['options']['prive'] == 1) {
775
				if($champ_catalogue['options']['prive'] == 1) {
759
					// Les champs étendus peuvent avoir des variantes lorsqu'ils apparaissent de multiples fois.
776
					// Les champs étendus peuvent avoir des variantes lorsqu'ils apparaissent de multiples fois.
760
					// Vont donc matcher monChamp mais aussi monChamp:1, monChamp:2 ou bien monChamp1, monChamp: etc...
777
					// Vont donc matcher monChamp mais aussi monChamp:1, monChamp:2 ou bien monChamp1, monChamp: etc...
761
					// pour plus de sécurité (ce filtra n'est affectué qu'une fois au début de l'export donc on ne s'en prive pas)
778
					// pour plus de sécurité (ce filtra n'est affectué qu'une fois au début de l'export donc on ne s'en prive pas)
762
					$entrees = preg_grep("/".$champ_catalogue['cle']."(?::?\d*)?$/", $colonnes_champs_supp_par_obs);
779
					$entrees = preg_grep("/".$champ_catalogue['cle']."(?::?\d*)?$/", $colonnes_champs_supp_par_obs);
763
					$indices_a_supprimer = array_merge($indices_a_supprimer, array_keys($entrees));
780
					$indices_a_supprimer = array_merge($indices_a_supprimer, array_keys($entrees));
764
				}
781
				}
765
			}
782
			}
766
			// les champs étendus sont renvoyés dans l'export suivant les colonnes présentes dans ce tableau
783
			// les champs étendus sont renvoyés dans l'export suivant les colonnes présentes dans ce tableau
767
			// les éliminer de la liste des colonnes suffit à les faire ignorer par l'export
784
			// les éliminer de la liste des colonnes suffit à les faire ignorer par l'export
768
			foreach($indices_a_supprimer as $indice_supp) {
785
			foreach($indices_a_supprimer as $indice_supp) {
769
				unset($colonnes_champs_supp_par_obs[$indice_supp]);
786
				unset($colonnes_champs_supp_par_obs[$indice_supp]);
770
			}
787
			}
771
		}
788
		}
772
 
789
 
773
		// ces deux lignes réordonnent l'ordre des colonnes des champs étendus en fonction de l'ordre (très spécifique)
790
		// ces deux lignes réordonnent l'ordre des colonnes des champs étendus en fonction de l'ordre (très spécifique)
774
		// de self::$ordre_champ_etendus_Florileges, les champs non-mentionnés sont ajoutés à la fin.
791
		// de self::$ordre_champ_etendus_Florileges, les champs non-mentionnés sont ajoutés à la fin.
775
		$colonnes_champs_supp_par_obs = self::sortArrayByArray(array_flip($colonnes_champs_supp_par_obs),
792
		$colonnes_champs_supp_par_obs = self::sortArrayByArray(array_flip($colonnes_champs_supp_par_obs),
776
															   self::$ordre_champ_etendus_Florileges);
793
															   self::$ordre_champ_etendus_Florileges);
777
		$colonnes_champs_supp_par_obs = array_keys($colonnes_champs_supp_par_obs);
794
		$colonnes_champs_supp_par_obs = array_keys($colonnes_champs_supp_par_obs);
778
 
795
 
779
		// si le SELECT des clefs ne retourne rien, une autre requêtes est inutile
796
		// si le SELECT des clefs ne retourne rien, une autre requêtes est inutile
780
		// TODO: optimize, 1 seule requête
797
		// TODO: optimize, 1 seule requête
781
		if(!$colonnes_champs_supp_par_obs) return Array('header' => array(), 'data' => array());
798
		if(!$colonnes_champs_supp_par_obs) return Array('header' => array(), 'data' => array());
782
 
799
 
783
		$champs_supp_par_obs = $gestion_champs_etendus->consulterParLots($obsids);
800
		$champs_supp_par_obs = $gestion_champs_etendus->consulterParLots($obsids);
784
 
801
 
785
		self::$cache['champsEtendus']['header'] = self::champsEtendus_prefixHeader($colonnes_champs_supp_par_obs);
802
		self::$cache['champsEtendus']['header'] = self::champsEtendus_prefixHeader($colonnes_champs_supp_par_obs);
786
 
803
 
787
		foreach($champs_supp_par_obs as &$v) {
804
		foreach($champs_supp_par_obs as &$v) {
788
			$v = self::champsEtendus_aplatir($v);
805
			$v = self::champsEtendus_aplatir($v);
789
		}
806
		}
790
		self::$cache['champsEtendus']['data'] = $champs_supp_par_obs;
807
		self::$cache['champsEtendus']['data'] = $champs_supp_par_obs;
791
		// ce return est temporaire,
808
		// ce return est temporaire,
792
		// le temps que toutes les fonctions bougent ici et utilise plutôt le cache statique
809
		// le temps que toutes les fonctions bougent ici et utilise plutôt le cache statique
793
		// encore utilisé pour les entêtes (self::$cache['champsEtendus']['header'])
810
		// encore utilisé pour les entêtes (self::$cache['champsEtendus']['header'])
794
		return self::$cache['champsEtendus'];
811
		return self::$cache['champsEtendus'];
795
	}
812
	}
796
 
813
 
797
	// XXX: PHP-5.3, fonction anonyme + array_map
814
	// XXX: PHP-5.3, fonction anonyme + array_map
798
	static function champsEtendus_prefixHeader($array) {
815
	static function champsEtendus_prefixHeader($array) {
799
		return array_map(create_function('$v', 'return "' . PREFIX_CHAMPS_ETENDUS . '".$v;'), $array);
816
		return array_map(create_function('$v', 'return "' . PREFIX_CHAMPS_ETENDUS . '".$v;'), $array);
800
	}
817
	}
801
 
818
 
802
	// XXX: PHP-5.3, fonction anonyme + array_map
819
	// XXX: PHP-5.3, fonction anonyme + array_map
803
	static function champsEtendus_aplatir($ligne_champs_etendus) {
820
	static function champsEtendus_aplatir($ligne_champs_etendus) {
804
		$champs_etendus_fmt = array();
821
		$champs_etendus_fmt = array();
805
		if(!$ligne_champs_etendus) return $champs_etendus_fmt;
822
		if(!$ligne_champs_etendus) return $champs_etendus_fmt;
806
		foreach($ligne_champs_etendus as $champ) {
823
		foreach($ligne_champs_etendus as $champ) {
807
			$champs_etendus_fmt[PREFIX_CHAMPS_ETENDUS . $champ->cle] = $champ->valeur;
824
			$champs_etendus_fmt[PREFIX_CHAMPS_ETENDUS . $champ->cle] = $champ->valeur;
808
		}
825
		}
809
		return $champs_etendus_fmt;
826
		return $champs_etendus_fmt;
810
	}
827
	}
811
 
828
 
812
	static function champsEtendus_ligne($obs, &$ligne) {
829
	static function champsEtendus_ligne($obs, &$ligne) {
813
		// si header n'est pas défini, aucune observation ne possède de champ étendu
830
		// si header n'est pas défini, aucune observation ne possède de champ étendu
814
		// et nous n'ajoutons ni colonnes, ni valeurs.
831
		// et nous n'ajoutons ni colonnes, ni valeurs.
815
		if(! isset(self::$cache['champsEtendus']['header'])) return;
832
		if(! isset(self::$cache['champsEtendus']['header'])) return;
816
		$ligne_etendue_aplatie = @self::$cache['champsEtendus']['data'][$obs['id_observation']];
833
		$ligne_etendue_aplatie = @self::$cache['champsEtendus']['data'][$obs['id_observation']];
817
 
834
 
818
		$ligne_supp = array_fill(0, count(self::$cache['champsEtendus']['header']), '');
835
		$ligne_supp = array_fill(0, count(self::$cache['champsEtendus']['header']), '');
819
		$ligne_etendue_fmt = array();
836
		$ligne_etendue_fmt = array();
820
 
837
 
821
		// si, cependant cette seule observation n'a pas de champs étendus,
838
		// si, cependant cette seule observation n'a pas de champs étendus,
822
		// nous devons rajouter des blancs (notamment dans le cas ou d'autres
839
		// nous devons rajouter des blancs (notamment dans le cas ou d'autres
823
		// champs viennent à être ajoutés en aval à l'avenir
840
		// champs viennent à être ajoutés en aval à l'avenir
824
		// cf: $fonction_dynamique dans FormateurGroupeColonne::GenColInfo()
841
		// cf: $fonction_dynamique dans FormateurGroupeColonne::GenColInfo()
825
		if(! $ligne_etendue_aplatie) {
842
		if(! $ligne_etendue_aplatie) {
826
			$ligne = array_merge($ligne, $ligne_supp);
843
			$ligne = array_merge($ligne, $ligne_supp);
827
			return;
844
			return;
828
		}
845
		}
829
 
846
 
830
		foreach(self::$cache['champsEtendus']['header'] as $colonne) {
847
		foreach(self::$cache['champsEtendus']['header'] as $colonne) {
831
			if(!isset($ligne_etendue_aplatie[$colonne])) {
848
			if(!isset($ligne_etendue_aplatie[$colonne])) {
832
				$ligne_etendue_fmt[$colonne] = '';
849
				$ligne_etendue_fmt[$colonne] = '';
833
			} else {
850
			} else {
834
				$ligne_etendue_fmt[$colonne] = $ligne_etendue_aplatie[$colonne];
851
				$ligne_etendue_fmt[$colonne] = $ligne_etendue_aplatie[$colonne];
835
			}
852
			}
836
		}
853
		}
837
 
854
 
838
		// XXX/ array_merge() ?
855
		// XXX/ array_merge() ?
839
		$ligne += $ligne_etendue_fmt;
856
		$ligne += $ligne_etendue_fmt;
840
	}
857
	}
841
 
858
 
842
	/* HELPERS */
859
	/* HELPERS */
843
 
860
 
844
	// http://stackoverflow.com/questions/348410/sort-an-array-based-on-another-array
861
	// http://stackoverflow.com/questions/348410/sort-an-array-based-on-another-array
845
	// XXX; redéfinition, utilisé aussi par ExportXLS
862
	// XXX; redéfinition, utilisé aussi par ExportXLS
846
	static function sortArrayByArray($array, $orderArray) {
863
	static function sortArrayByArray($array, $orderArray) {
847
		$ordered = array();
864
		$ordered = array();
848
		foreach($orderArray as $key) {
865
		foreach($orderArray as $key) {
849
			if(array_key_exists($key, $array)) {
866
			if(array_key_exists($key, $array)) {
850
				$ordered[$key] = $array[$key];
867
				$ordered[$key] = $array[$key];
851
				unset($array[$key]);
868
				unset($array[$key]);
852
			}
869
			}
853
		}
870
		}
854
		return $ordered + $array;
871
		return $ordered + $array;
855
	}
872
	}
856
 
-
 
857
}
873
}
858
874