Subversion Repositories eFlore/Applications.cel

Rev

Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
1502 aurelien 1
<?php
1873 raphael 2
/**
3
 * @category  PHP
4
 * @package   jrest
5
 * @author    Aurélien Peronnet <aurelien@tela-botania.org>
6
 * @author    Raphaël Droz <raphael@tela-botania.org>
7
 * @copyright 2013 Tela-Botanica
8
 * @license   Licence CECILL <http://www.cecill.info/licences/Licence_CeCILL_V2-fr.txt>
9
 * @license	  GPL v3 <http://www.gnu.org/licenses/gpl.txt>
10
 *
11
 */
1502 aurelien 12
class CelValidationObservation extends Cel {
13
	/**
14
	* Méthode appelée avec une requête de type POST avec un identifiant d'obs.
15
	* Modifie le taxon associé à une observation avec les informations envoyées
1870 raphael 16
	* Utilisé par:
17
	* - del/services/modules/0.1/determinations/ValiderDetermination.php::modifierObservationParDetermination()
1502 aurelien 18
	*
19
	* @param int $uid[0] identifiant observation
20
	* @param pairs array tableau contenant les valeurs à modifier
1873 raphael 21
	* @param pairs['obsKeywordDelete'] optional string: mot-clef à délier à cette observation
1502 aurelien 22
	*/
1870 raphael 23
	public function updateElement($uid, $pairs) {
1502 aurelien 24
		// ce service est uniquement destiné à être appelé en local,
25
		// depuis le serveur lui même
26
		// en particulier par l'application identiplante
27
		$this->controleAppelIpAutorisee();
1870 raphael 28
		self::verifierParametresObligatoires($uid, $pairs);
1502 aurelien 29
		$id = $uid[0];
30
 
31
		$gestion_observation = new GestionObservation($this->config);
1873 raphael 32
		$pairs = array_map('trim', $pairs);
1502 aurelien 33
		$utilisateur = $pairs['ce_utilisateur'];
1870 raphael 34
		unset($pairs['ce_utilisateur'], $pairs['id_observation']);
1873 raphael 35
 
36
		// mise à jour des mots-clefs suite à une validation:
37
		// typiquement, DEL modifierObservationParDetermination()
38
		// nous enverra obsKeywordDelete=aDeterminer en plus de certitude=Certaine
39
		$obsKeywordDelete = @trim($pairs['obsKeywordDelete']);
40
		// $imgKeywordDelete = @trim($pairs['imgKeywordDelete']);
41
		unset($pairs['obsKeywordDelete']); // , $pairs['imgKeywordDelete']);
42
 
1877 raphael 43
		// complete les données de la proposition validée car:
44
		// 1) la table tb_del.del_commentaire ne contient pas toutes les informations nécessaires
45
		// 2) la table tb_del.del_commentaire ne *devrait* pas contenir beaucoup plus que nom_sel et nom_sel_nn
46
		// 3) la génération de ces données ici, au moment de l'UPDATE, est le meilleur garant de leur fiabilité
47
		$more_data = CelTaxonNomFrom::NN2($this->bdd, @$pairs['nom_sel_nn'], @$pairs['nom_referentiel']);
48
		if($more_data) $pairs = array_merge($pairs, $more_data);
49
 
1502 aurelien 50
		$modification = $gestion_observation->modifierObservationPublique($utilisateur, $id, $pairs);
1870 raphael 51
		if($modification) {
1873 raphael 52
			// quel impact de ces valeurs de retour ?
53
			if($kid = InventoryKeyWordList::getMotsClefId($utilisateur, 'obs', $obsKeywordDelete))
54
				InventoryKeyWordObsLink::unlinkKeyword($this->config, 'obs', explode(',', $id), $utilisateur, $kid);
55
			/* if($kid = InventoryKeyWordList::getMotsClefId($utilisateur, 'images', $imgKeywordDelete))
56
			   InventoryKeyWordObsLink::unlinkKeyword($this->config, 'obs', explode(',', $id), $utilisateur, $kid); */
1870 raphael 57
			header("Content-Type: text/plain; charset=utf-8");
58
			die("OK"); // attention, compatibilité avec ValiderDetermination.php de DEL !
1502 aurelien 59
		}
1877 raphael 60
		// cf TODO: n'arrivera pas tant que l'UPDATE ajoutera systématiquement date_modification = now()
1870 raphael 61
		elseif($modification === 0) {
62
			http_response_code(304); // Not Modified
63
			header("Content-Type: text/plain; charset=utf-8");
64
			die("Not Modified");
65
		}
66
		else {
67
			http_response_code(500); // Internal Server Error
68
			header("Content-Type: text/plain; charset=utf-8");
69
			die("Impossible de modifier l'observation associée à cet identifiant " . mysql_error());
70
		}
1502 aurelien 71
	}
72
 
1870 raphael 73
	static function verifierParametresObligatoires($uid, $params) {
74
		if(!@intval($uid[0]) || !@intval($params['id_observation'])) {
75
			header("Content-Type: text/plain; charset=utf-8");
76
			die("L'identifiant d'observation doit être un entier");
1502 aurelien 77
		}
1870 raphael 78
 
79
		// TODO: check sur 'id_observation' en tant que param est superflu ?
1877 raphael 80
		// TODO: avec l'apparition de CelTaxonNomFrom, "nom_sel" devrait être optionnel
81
		// puisque nous regénérons des données valides avant l'update et puisque
82
		// seul un nom_sel_nn *valide* a pu nous provenir depuis une validation de proposition de la part de DEL.
83
		$params_obligatoires = array('id_observation', 'ce_utilisateur', 'nom_sel');
1502 aurelien 84
		foreach($params_obligatoires as $param) {
1870 raphael 85
			if(@trim($params[$param])) continue;
86
			http_response_code(412); // Precondition Failed
87
			header("Content-Type: text/plain; charset=utf-8");
88
			die(sprintf("Paramètre %s manquant (parmi %s)", $param, implode(', ', $params_obligatoires)));
1502 aurelien 89
		}
90
	}
91
}
1877 raphael 92
 
93
// pour les modifications touchants aux nom_sel(nn)/nom_ret(nn)/...
94
// les clefs du tableau (= les aliases de champs) correspondent aux champs attendus
95
// par tb_cel.cel_obs afin de pouvoir array_merger() et passer le résultat à modifierObservationPublique()
96
class CelTaxonNomFrom {
97
  const db = 'tb_eflore';
98
  const bdtfx = 'bdtfx_v2_00';
99
  const bdtxa = 'bdtxa_v1_01';
100
  const isfan = 'isfan_v2013';
101
 
102
  // get from num_nom(_sel)
103
  static function NN($db, $id, $ref) {
104
	if(!$db || !$id || !$ref) return FALSE;
105
	return $db->query(sprintf("SELECT num_nom_retenu AS nom_ret_nn, num_taxon AS nt, CONCAT(nom_sci, ' ', auteur) AS nom_sel".
106
							  " FROM cel_references".
107
							  " WHERE referentiel = %s AND num_nom = %d", $db->quote($ref), intval($id)))->fetch(PDO::FETCH_ASSOC);
108
  }
109
 
110
  // get from num_nom(_sel) directement via la DB
111
  // ce qui nous permet l'initialisation des champs non-présents dans cel_references
112
  // cf TODO
113
  static function NN2($db, $id, $ref) {
114
	if(!$db || !$id || !$ref) return FALSE;
115
	switch($ref) {
116
	case "bdtfx":
117
	  return $db->query(sprintf("SELECT o.num_nom_retenu AS nom_ret_nn, o.num_taxonomique AS nt, CONCAT(o.nom_sci, ' ', o.auteur) AS nom_sel".
118
								" , o.famille, CONCAT(ret.nom_sci, ' ', ret.auteur) AS nom_ret".
119
								" FROM %s.%s o".
120
								" LEFT JOIN %s.%s ret ON o.num_nom_retenu != 0 AND o.num_nom_retenu = ret.num_nom".
121
								" WHERE o.num_nom = %d -- %s:%d", self::db, self::bdtfx,  self::db, self::bdtfx, intval($id), __FILE__, __LINE__))->fetch(PDO::FETCH_ASSOC);
122
	case "bdtxa":
123
	  return $db->query(sprintf("SELECT o.num_nom_retenu AS nom_ret_nn, o.num_tax AS nt, CONCAT(o.nom_sci, ' ', o.auteur) AS nom_sel". // subtilité: "num_tax"
124
								" , o.famille, CONCAT(ret.nom_sci, ' ', ret.auteur) AS nom_ret".
125
								" FROM %s.%s o".
126
								" LEFT JOIN %s.%s ret ON o.num_nom_retenu != 0 AND o.num_nom_retenu = ret.num_nom".
127
								" WHERE o.num_nom = %d -- %s:%d", self::db, self::bdtxa,  self::db, self::bdtxa, intval($id), __FILE__, __LINE__))->fetch(PDO::FETCH_ASSOC);
128
	case "isfan":
129
	  return $db->query(sprintf("SELECT o.num_nom_retenu AS nom_ret_nn, o.num_taxonomique AS nt, CONCAT(o.nom_sci, ' ', o.auteur) AS nom_sel".
130
								" , o.famille, CONCAT(ret.nom_sci, ' ', ret.auteur) AS nom_ret".
131
								" FROM %s.%s o".
132
								" LEFT JOIN %s.%s ret ON o.num_nom_retenu != 0 AND o.num_nom_retenu = ret.num_nom".
133
								" WHERE o.num_nom = %d -- %s:%d", self::db, self::isfan,  self::db, self::isfan, intval($id), __FILE__, __LINE__))->fetch(PDO::FETCH_ASSOC);
134
	}
135
	return FALSE;
136
  }
137
}