WebSVN – eFlore/Applications.cel – Diff – /trunk/jrest/services/ImportXLS.php

 		parent::__construct($config);
+	}
 	function createElement($pairs) {
 		if(!isset($pairs['utilisateur']) || trim($pairs['utilisateur']) == '') {
-			echo '0'; exit;
+			exit('0');
+		}
 		/* list(self;;$insert_prefix_ordre, self::$insert_ligne_pattern_ordre) =
 		   $this->initialiser_pdo_ordered_statements($this->colonnes_statiques); */
 		list(self::$insert_prefix, self::$insert_ligne_pattern) =
 			$this->initialiser_pdo_statements($this->colonnes_statiques);
 		$infos_fichier = array_pop($_FILES);
+		}
 		restore_error_handler();
+		if($this->bilan) echo implode("\n", $this->bilan) . "\n";
+ 		$summary = sprintf('%1$d observation%2$c ajoutée%2$c' . "\n" .
+						   '%3$d image%4$c attachée%4$c' . "\n" .
+						   // '%5$d mot%6$c-clef ajouté%6$c [TODO]' . "\n" . // TODO
-		if($this->bilan) echo implode("\n", $this->bilan) . "\n";
+						   count($filtre->exclues) > 0? 'colonnes non-traitées: %7$s' . "\n" : '',
- 		$summary = sprintf("%d observation(s) ajoutée(s)\n%d image(s) attachée(s)\n%d mot(s)-clé ajouté(s) [TODO]\ncolonnes non-traitées: %s\n",
+						   $obs_ajouts,
+						   count($obs_ajouts) > 1 ? 's' : '',
-						   $obs_ajouts,
+						   $nb_images_ajoutees,
+						   count($nb_images_ajoutees) > 1 ? 's' : '',
-						   $nb_images_ajoutees,
+						   $nb_mots_cle_ajoutes,
-						   $nb_mots_cle_ajoutes,
+						   count($nb_mots_cle_ajoutes) > 1 ? 's' : '',
 						   implode(', ', $filtre->exclues));
 					$colonnes_reconnues[$k] = 1;
 					break;
+				}
+			}
+		}
+		// défini tous les index que nous utilisons à une valeur d'index de colonne Excel qui n'existe pas dans
+		// le tableau renvoyé par PHPExcel
+		// Attention cependant d'utiliser des indexes différenciés car traiterLonLat() et traiterEspece()
+		// les utilisent
+		foreach($cols as $col) {
+			if(!defined("C_" . strtoupper($col['abbrev'])))
+				define("C_" . strtoupper($col['abbrev']), "C_" . strtoupper($col['abbrev']));
+		}
 		// prépare le filtre de PHPExcel qui évitera le traitement de toutes les colonnes superflues
 	  cad aucune des valeurs retournée par traiter{Espece|Localisation}()
 	  car ce tableau est passé à un PDO::preparedStatement() qui applique
 	  proprement les règle d'échappement.
 	 */
 	static function chargerLigne($ligne, $dernier_ordre, $cel) {
+		// évite des notices d'index lors des trigger_error()
+		$ref_ligne = !empty($ligne[C_NOM_SEL]) ? trim($ligne[C_NOM_SEL]) : '';
 		// en premier car le résultat est utile pour
 		// * traiter espèce (traiterEspece())
 		// * traiter longitude et latitude (traiterLonLat())
-		$referentiel = self::identReferentiel(trim(strtolower($ligne[C_NOM_REFERENTIEL])), $ligne);
+		$referentiel = self::identReferentiel(trim(strtolower(@$ligne[C_NOM_REFERENTIEL])), $ligne, $ref_ligne);
 		// $espece est rempli de plusieurs informations
 		$espece = Array(C_NOM_SEL => NULL, C_NOM_SEL_NN => NULL, C_NOM_RET => NULL,
 						C_NOM_RET_NN => NULL, C_NT => NULL, C_FAMILLE => NULL);
 			"zone_geo" => $localisation[C_ZONE_GEO],
 			"ce_zone_geo" => $localisation[C_CE_ZONE_GEO],
 			// $ligne: uniquement pour les infos en cas de gestion d'erreurs (date incompréhensible)
-			"date_observation" => self::traiterDateObs($ligne[C_DATE_OBSERVATION], $ligne),
+			"date_observation" => isset($ligne[C_DATE_OBSERVATION]) ? self::traiterDateObs($ligne[C_DATE_OBSERVATION], $ref_ligne) : NULL,
 			"transmission" => $transmission,
 			"date_transmission" => $transmission ? date("Y-m-d H:i:s") : NULL, // pas de fonction SQL dans un PDO statement, <=> now()
 			// $ligne: uniquement pour les infos en cas de gestion d'erreurs (lon/lat incompréhensible)
-			"latitude" => isset($ligne[C_LATITUDE]) ? self::traiterLonLat(NULL, $ligne[C_LATITUDE], $referentiel, $ligne) : NULL,
+			"latitude" => isset($ligne[C_LATITUDE]) ? self::traiterLonLat(NULL, $ligne[C_LATITUDE], $referentiel, $ref_ligne) : NULL,
-			"longitude" => isset($ligne[C_LONGITUDE]) ? self::traiterLonLat($ligne[C_LONGITUDE], NULL, $referentiel, $ligne) : NULL,
+			"longitude" => isset($ligne[C_LONGITUDE]) ? self::traiterLonLat($ligne[C_LONGITUDE], NULL, $referentiel, $ref_ligne) : NULL,
 			"altitude" => isset($ligne[C_ALTITUDE]) ? intval($ligne[C_ALTITUDE]) : NULL, // TODO: guess alt from lon/lat
 	/* FONCTIONS de TRANSFORMATION de VALEUR DE CELLULE */
 	// TODO: PHP 5.3, utiliser date_parse_from_format()
 	// TODO: parser les heures (cf product-owner)
 	// TODO: passer par le timestamp pour s'assurer de la validité
-	static function traiterDateObs($date, $ligne) {
+	static function traiterDateObs($date, $ref_ligne) {
 		// TODO: see https://github.com/PHPOffice/PHPExcel/issues/208
 		if(is_double($date)) {
 			if($date > 0)
 				return PHPExcel_Style_NumberFormat::toFormattedString($date, PHPExcel_Style_NumberFormat::FORMAT_DATE_YYYYMMDD2) . " 00:00:00";
-			trigger_error("ligne \"{$ligne[C_NOM_SEL]}\": " .
+			trigger_error("ligne \"{$ref_ligne}\": " .
 						  "Attention: date antérieure à 1970 et format de cellule \"DATE\" utilisés ensemble",
 						  E_USER_NOTICE);
 			// throw new Exception("erreur: date antérieure à 1970 et format de cellule \"DATE\" utilisés ensemble");
 			// attention, UNIX timestamp, car Excel les décompte depuis 1900
 			if(preg_match(';^([0-3]?\d)/([01]\d)/([12]\d\d\d)$;', $date, $matches)) {
 				$date = $matches[3] . '/' . $matches[2] . '/' . $matches[1];
+			}
 			$timestamp = strtotime($date);
 			if(! $timestamp) {
-				if($date) trigger_error("ligne \"{$ligne[C_NOM_SEL]}\": Attention: date erronée ($date)", E_USER_NOTICE);
+				if($date) trigger_error("ligne \"{$ref_ligne}\": Attention: date erronée ($date)", E_USER_NOTICE);
 				return NULL;
+			}
 			return strftime("%Y-%m-%d 00:00:00", $timestamp);
+		}
+	}
-	static function identReferentiel($referentiel, $ligne) {
+	static function identReferentiel($referentiel, $ligne, $ref_ligne) {
 		// SELECT DISTINCT nom_referentiel, COUNT(id_observation) AS count FROM cel_obs GROUP BY nom_referentiel ORDER BY count DESC;
 		if(strpos($referentiel, 'bdtfx') !== FALSE) return 'bdtfx:v1.01';
 		if(strpos($referentiel, 'bdtxa') !== FALSE) return 'bdtxa:v1.00';
 		if(strpos($referentiel, 'bdnff') !== FALSE) return 'bdnff:4.02';
 		if(strpos($referentiel, 'isfan') !== FALSE) return 'isfan:v1.00';
 		if(strpos($referentiel, 'autre') !== FALSE) return 'autre';
-		if($referentiel) {
+		if($referentiel && isset($ligne[C_NOM_SEL]) && $ligne[C_NOM_SEL]) {
-			trigger_error("ligne \"{$ligne[C_NOM_SEL]}\": Attention: référentiel inconnu", E_USER_NOTICE);
+			trigger_error("ligne \"{$ref_ligne}\": Attention: référentiel inconnu", E_USER_NOTICE);
+			return 'autre';
+		}
 			return 'autre';
 		// pas de référentiel ou pas de NOM_SEL: NULL
 		return NULL;
 		/* TODO: cf story,
 		   En cas de NULL faire une seconde passe de détection à partir du nom saisi
 		   + accepter les n° de version */
+	}
-	static function traiterLonLat($lon = NULL, $lat = NULL, $referentiel = 'bdtfx:v1.01', $ligne) {
+	static function traiterLonLat($lon = NULL, $lat = NULL, $referentiel = 'bdtfx:v1.01', $ref_ligne) {
 		// en CSV ces valeurs sont des string, avec séparateur en français (","; cf défauts dans ExportXLS)
 		if($lon && is_string($lon)) $lon = str_replace(',', '.', $lon);
 		if($lat && is_string($lat)) $lat = str_replace(',', '.', $lat);
 		// sprintf applique une précision à 5 décimale (comme le ferait MySQL)
 		// tout en uniformisant le format de séparateur des décimales (le ".")
 		if($lon && is_numeric($lon) && $lon >= -180 && $lon <= 180) return sprintf('%.5F', $lon);
 		if($lat && is_numeric($lat) && $lat >= -90 && $lat <= 90) return sprintf('%.5F', $lat);
 		if($lon || $lat) {
 	/*
 	  TODO: s'affranchir du webservice pour la détermination du nom scientifique en s'appuyant sur cel_references,
 	  pour des questions de performances
 	*/
 	static function traiterEspece($ligne, Array &$espece, $referentiel, $cel) {
-		if(!$ligne[C_NOM_SEL]) return;
+		if(empty($ligne[C_NOM_SEL])) return;
 		// nom_sel reste toujours celui de l'utilisateur
 		$espece[C_NOM_SEL] = trim($ligne[C_NOM_SEL]);
 		*/
 		$espece[C_NOM_RET] = $complement['Nom_Retenu'];
 		$espece[C_NOM_RET_NN] = $complement['Num_Nom_Retenu'];
 		$espece[C_NT] = $complement['Num_Taxon'];
 		$espece[C_FAMILLE] = $complement['Famille'];
-		//var_dump("a", $espece);die;
+		//var_dump($complement, $espece);die;
+	}
 	static function detectFromNom($nom) {
 		$r = Cel::db()->requeter(sprintf("SELECT num_nom, num_tax_sup FROM bdtfx_v1_01 WHERE (nom_sci LIKE '%s') ".
 		return $r;
+	}
+	static function traiterLocalisation($ligne, Array &$localisation) {
+		if(empty($ligne[C_ZONE_GEO])) $ligne[C_ZONE_GEO] = NULL;
 		if(empty($ligne[C_CE_ZONE_GEO])) $ligne[C_CE_ZONE_GEO] = NULL;
 	static function traiterLocalisation($ligne, Array &$localisation) {
 	    $identifiant_commune = trim($ligne[C_ZONE_GEO]);
 		if(!$identifiant_commune) {
 			$departement = trim($ligne[C_CE_ZONE_GEO]);

Subversion Repositories eFlore/Applications.cel

(root)/trunk/jrest/services/ImportXLS.php @ 1765 – Rev 1765 → 1770