Subversion Repositories eFlore/Applications.cel

Rev

Rev 3763 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
719 jpm 1
<?php
2
// declare(encoding='UTF-8');
3
/**
4
 * Service permettant d'insérer les informations fournie par le widget Saisie dans le CEL.
5
 *
6
 * Cas d'utilisation :
7
 * PUT /CelWidgetSaisie : ajout de données en les passant via $_POST
8
 *
2461 jpm 9
 * @internal   Mininum PHP version : 5.2
10
 * @category   CEL
11
 * @package    Services
2462 jpm 12
 * @subpackage Widget
2461 jpm 13
 * @version    0.1
14
 * @author     Mathias CHOUET <mathias@tela-botanica.org>
15
 * @author     Jean-Pascal MILCENT <jpm@tela-botanica.org>
16
 * @author     Aurelien PERONNET <aurelien@tela-botanica.org>
17
 * @license    GPL v3 <http://www.gnu.org/licenses/gpl.txt>
18
 * @license    CECILL v2 <http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt>
19
 * @copyright  1999-2014 Tela Botanica <accueil@tela-botanica.org>
719 jpm 20
 */
2056 aurelien 21
class CelWidgetSaisie extends Cel {
3720 idir 22
 
3678 delphine 23
    private $projet = null;
24
    private $projetId = null;
25
    private $projetTags = array();
26
    private $tagsObs = null;
27
    private $tagsImg = null;
28
    private $userId = null;
29
    private $userEmail = null;
30
    private $userIntitule = null;
3756 killian 31
    private $isPlantnetPull = false;
3678 delphine 32
    private $isSauvages = false;
33
    const DUREE_DE_VIE_IMG = 86400;// 3600 * 24 = 86 400 (1 journée)
34
    const ARRET_SERVICE = false;// Permet de bloquer le service en cas de problème sur le serveur
3720 idir 35
 
3678 delphine 36
    private $correspondanceIdImgTags = array();
37
    private $gestionMotsClesObs = null;
38
    private $gestionMotsClesImages = null;
3720 idir 39
 
3678 delphine 40
    public function createElement($requeteDonnees) {
41
        if (self::ARRET_SERVICE) {
42
            $this->messages[] = "Désactivation temporaire du service d'envoi des données au CEL.";
43
        } else if (array_key_exists('projet', $requeteDonnees)) {
44
            $this->debug[] = 'Projet : '.$requeteDonnees['projet'];
45
            if ($requeteDonnees['projet'] != "base") {
3731 delphine 46
                $this->projet = $requeteDonnees['projet'] ?? null;
3678 delphine 47
                $this->projetId = $requeteDonnees['id_projet'] ?? null;
48
            }
3720 idir 49
 
3678 delphine 50
            // Si c'est une obs Pl@ntNet
51
            if (! empty($requeteDonnees['tag-obs']) && strpos(strtolower($requeteDonnees['tag-obs']), 'plantnet') !== false) {
3756 killian 52
                if (isset($requeteDonnees['origin']) && 'pullPlantnet' === $requeteDonnees['origin']) {
53
                    // on traite les obs PN qui viennent du script de pull
54
                    $this->isPlantnetPull = true;
55
                } else {
56
                    // fake ID pour les obs PN provenant de PlantNet V1
57
                    $retour = (object) [
58
                        'msg' => 'observation Pl@ntNet non sauvegardée',
59
                        'id' => 'fake-' . uniqid(),
60
                        'images' => []
61
                    ];
62
                    $this->envoyerJson($retour);
63
                    exit; // envoyerJson() ne termine pas le script !
64
                }
3678 delphine 65
            }
3756 killian 66
            // Si c'est une obs Sauvages de ma rue
3678 delphine 67
            if (! empty($requeteDonnees['tag-obs']) && strpos(strtolower($requeteDonnees['tag-obs']), 'mobileSauvages') !== false) {
68
                $this->isSauvages = true;
69
            }
3720 idir 70
 
3678 delphine 71
            // Traitements des tags multiples de projet
72
            $this->traiterProjetTags();
3720 idir 73
 
3678 delphine 74
            // Traitement des tags spécifiques aux obs
75
            $this->traiterTagObs($requeteDonnees);
3720 idir 76
 
3678 delphine 77
            // Traitement des tags spécifiques aux images
78
            $this->traiterTagImg($requeteDonnees);
3720 idir 79
 
3678 delphine 80
            // Traitement des observations et des images
81
            if (isset($requeteDonnees['utilisateur']['courriel']) && filter_var($requeteDonnees['utilisateur']['courriel'], FILTER_VALIDATE_EMAIL)) {
82
                $this->debug[] = 'Utilisateur : '.print_r($requeteDonnees['utilisateur'], true);
83
                $utilisateur = $requeteDonnees['utilisateur'];
3720 idir 84
 
3678 delphine 85
                // hop on récupère les infos de l'utilisateur
86
                $infosUtilisateur = $this->infosInscritTela($utilisateur['courriel']);
87
                if ($infosUtilisateur) {
88
                    $this->userId = $infosUtilisateur['id'];
89
                    $this->userIntitule = $infosUtilisateur['intitule'];
90
                } else {
3714 idir 91
                    $this->userId = 0;
3678 delphine 92
                    $this->userIntitule = $utilisateur['prenom'] . ' ' . $utilisateur['nom'];
93
                }
94
                $this->userEmail = $utilisateur['courriel'];
3720 idir 95
 
3678 delphine 96
                $this->debug[] = 'Courriel : ' . $this->userEmail;
97
                $requeteDonnees = $this->supprimerSlashesProfond($requeteDonnees);
98
                // Triage et manipulation des données
99
                $observations = array();
100
                foreach ($requeteDonnees as $cle => $obs) {
101
                    if (preg_match('/^obsId[0-9]+$/', $cle)) {
102
                        $this->debug[] = 'commune_nom : '.$obs['commune_nom'];
103
                        $this->debug[] = 'commune_code_insee : '. (isset($obs['commune_code_insee']) ? $obs['commune_code_insee'] : 'n/a');
3720 idir 104
 
3678 delphine 105
                        $obsAAjouter = array();
106
                        $obsAAjouter['user_id'] = $this->userId;
107
                        $obsAAjouter['user_email'] = $this->userEmail;
108
                        $obsAAjouter['user_pseudo'] = $this->userIntitule;
3720 idir 109
 
3678 delphine 110
                        $obsAAjouter['user_sci_name'] = isset($obs['nom_sel']) ? $obs['nom_sel'] : null;
3720 idir 111
                        $obsAAjouter['user_sci_name_id'] = isset($obs['num_nom_sel']) && '' !== $obs['num_nom_sel'] ? $obs['num_nom_sel'] : null;
3678 delphine 112
                        $obsAAjouter['accepted_sci_name'] = isset($obs['nom_ret']) ? $obs['nom_ret'] : null;
3720 idir 113
                        $obsAAjouter['accepted_sci_name_id'] = isset($obs['num_nom_ret']) && '' !== $obs['num_nom_ret'] ? $obs['num_nom_ret'] : null;
3678 delphine 114
                        $obsAAjouter['family'] = isset($obs['famille']) ? $obs['famille'] : null;
115
                        $obsAAjouter['taxo_repo'] = isset($obs['referentiel']) ? ($obs['referentiel'] == 'bdtfxr') ? 'bdtfx' : $obs['referentiel'] : null;
3720 idir 116
 
3678 delphine 117
                        $obsAAjouter['date_observed'] = $this->transormerDateFrVersMysql($obs['date']);
118
                        $obsAAjouter['annotation'] = isset($obs['notes']) && trim($obs['notes']) !== "" ? $obs['notes'] : null;
3720 idir 119
 
3678 delphine 120
                        // Pays est pour le moment sur un varchar(2) dans la base
121
                        // alors qu'il est envoyé complet par le script WidgetSaisie
122
                        $obsAAjouter['osm_country'] = (isset($obs['pays'])) ? $obs['pays'] : null;
3763 killian 123
                        $obsAAjouter['osm_postcode'] = (isset($obs['code_postal'])) ? $obs['code_postal'] : null;
124
                        $obsAAjouter['locality'] = isset($obs['commune_nom']) && trim($obs['commune_nom']) !== "" ? $obs['commune_nom'] : null;
125
                        $obsAAjouter['locality_insee_code'] = isset($obs['commune_code_insee']) && trim($obs['commune_code_insee']) !== "" ? $obs['commune_code_insee'] : null;
3678 delphine 126
                        $obsAAjouter['sublocality'] = isset($obs['lieudit']) && trim($obs['lieudit']) !== "" ? $obs['lieudit'] : null;
127
                        $obsAAjouter['station'] = isset($obs['station']) && trim($obs['station']) !== "" ? $obs['station'] : null;
128
                        $obsAAjouter['environment'] = isset($obs['milieu']) && trim($obs['milieu']) !== "" ? $obs['milieu'] : null;
129
                        $obsAAjouter['elevation'] = (! empty($obs['altitude'])) ? $obs['altitude'] : null;
130
                        $obsAAjouter['geometry'] = $obs['geometry'] ?? json_encode([
3720 idir 131
                                'type' => 'Point',
3763 killian 132
                                'coordinates' => [
133
                                    round((float)str_replace(',', '.', $obs['longitude']), 6),
134
                                    round((float)str_replace(',', '.', $obs['latitude']), 6)
135
                                ]
3720 idir 136
                            ]); // CONCAT('{\"type\":\"Point\",\"coordinates\":[', longitude, ',', latitude,']}'),
3678 delphine 137
                        $obsAAjouter['geodatum'] = 'WGS84';
3735 delphine 138
                        $obsAAjouter['published_location'] = ($this->tagsObs != null && in_array('sensible', $this->tagsObs) == true) ?
3731 delphine 139
                            "localité" : "précise";
3720 idir 140
 
3678 delphine 141
                        $obsAAjouter['phenology'] = isset($obs['phenologie']) ? $obs['phenologie'] : null;
142
                        $obsAAjouter['coef'] = isset($obs['abondance']) ? $obs['abondance'] : null;
3720 idir 143
 
3678 delphine 144
                        $obsAAjouter['is_public'] = '1';
145
                        $obsAAjouter['date_created'] = date('Y-m-d H:i:s');
146
                        $obsAAjouter['date_updated'] = $obsAAjouter['date_created'];
147
                        $obsAAjouter['date_published'] = $obsAAjouter['date_created'];
3720 idir 148
 
3678 delphine 149
                        $obsAAjouter['image_nom'] = $obs['image_nom'] ?? null;
150
                        $obsAAjouter['image_b64'] = $obs['image_b64'] ?? null;
3720 idir 151
 
3732 delphine 152
                        $obsAAjouter['certainty'] = null;
3678 delphine 153
                        if (isset($obs['certitude'])) {
154
                            switch ($obs['certitude']) {
155
                                case 'certaine':
156
                                    $obsAAjouter['certainty'] = 'certain';
157
                                    break;
158
                                case 'douteuse':
159
                                    $obsAAjouter['certainty'] = 'douteux';
160
                                    break;
161
                                default:
162
                                    $obsAAjouter['certainty'] = $obs['certitude'];
163
                                    break;
164
                            }
165
                        }
3734 delphine 166
                        $obsAAjouter['certainty'] = ($this->projet == "aDeterminer") ? 'à déterminer' : $obsAAjouter['certainty'];
3678 delphine 167
                        $obsAAjouter['input_source'] = 'widget';
3783 delphine 168
                        $obsAAjouter['project_id'] =  ($this->projetId == 3) ? null : $this->projetId;
3737 delphine 169
                        // racommodage en attendant mieux
3783 delphine 170
                        $obsAAjouter['project'] = ($this->projetId == null  || $this->projetId == 3) ? null : ($this->projetId == 53) ? "missions-flore" : $this->projet ;
3756 killian 171
                        if ($this->isPlantnetPull) {
3678 delphine 172
                            $obsAAjouter['input_source'] = 'PlantNet';
173
                            $obsAAjouter['plantnet_id'] = $obs['obs_id'];
174
                        }
175
                        if ($this->isSauvages) {
176
                            $obsAAjouter['input_source'] = 'autre';
177
                            $obsAAjouter['project'] = 'sauvages';
178
                        }
3720 idir 179
 
3678 delphine 180
                        $obsAAjouter['obs_etendue'] = isset($obs['obs_etendue']) ? $obs['obs_etendue'] : array();
3720 idir 181
 
3678 delphine 182
                        // Tentative d'enrichissement des données taxonomiques
183
                        // @TODO attention aux perfs, aux timeouts de WS etc.
184
                        $this->enrichirDonneesTaxonomiques($obsAAjouter);
3720 idir 185
 
3678 delphine 186
                        $observations[] = $obsAAjouter;
187
                    }
188
                }
189
                $this->debug[] = 'Nbre obs ajoutée : '.count($observations);
190
                $this->debug[] = 'projet : '.$this->projet;
191
                $this->debug[] = 'tagsObs : '.print_r($this->tagsObs, true);
192
                $this->debug[] = 'tagsImg : '.print_r($this->tagsImg, true);
3720 idir 193
 
3756 killian 194
                // début transaction car si insertions par le même utilisateur en parallèle,
195
                // De plus, ça permet de ne pas conserver les données d'obs si l'image provoque une erreur
196
                //Cel::db()->setAttribute(PDO::ATTR_AUTOCOMMIT, false);
197
                Cel::db()->beginTransaction();
198
                $erreursDurantTraitement = false;
199
                $nomsOriginauxImagesTemp = array();
200
 
3678 delphine 201
                // Insertion dans la base
202
                $obs_a_taguer_ids = array();
203
                $img_a_taguer_ids_noms = array();
204
                $champsEtendusObs = array();
205
                foreach ($observations as $obs) {
206
                    $fullObs = $obs;
207
                    unset($obs['obs_etendue']);
208
                    unset($obs['image_nom']);
209
                    unset($obs['image_b64']);
3720 idir 210
 
3678 delphine 211
                    $obs = $this->protegerTableau($obs);
3720 idir 212
 
3678 delphine 213
                    $champs = implode(', ', array_keys($obs));
214
                    $valeurs = implode(', ', $obs);
215
                    $requete = "INSERT INTO occurrence ($champs) VALUES ($valeurs) ";
3720 idir 216
 
3678 delphine 217
                    if (Cel::db()->executer($requete) === false) {
218
                        $erreursDurantTraitement = true;
219
                        $this->messages[] = "Un problème est survenu lors de l'insertion de l'obs dans la base de données.";
220
                    }
3720 idir 221
 
3678 delphine 222
                    // récupérer l'id de l'obs nouvellement insérée
223
                    $idNouvelleObs = Cel::db()->obtenirDernierId();
224
                    $obs_a_taguer_ids[] = $idNouvelleObs;
225
                    $champsEtendusObs[$idNouvelleObs] = $fullObs['obs_etendue'];
3720 idir 226
 
3678 delphine 227
                    $imgAAjouter = null;
228
                    if (isset($fullObs['image_nom'])) {
229
                        $imgAAjouter = $this->traiterImagesALierAObs($idNouvelleObs, $fullObs);
230
                        foreach ($imgAAjouter as $uneImgAAjouter) {
231
                            $nomsOriginauxImagesTemp[] = $uneImgAAjouter['nom'];
232
                        }
233
                    }
3720 idir 234
 
3678 delphine 235
                    // si le formulaire contient une image on la traite
236
                    if (!empty($imgAAjouter)) {
237
                        $this->nettoyerImagesUploades();
238
                        $img_a_taguer_ids_noms = $this->stockerImagesEtLierAObs($idNouvelleObs, $imgAAjouter);
239
                        if (empty($img_a_taguer_ids_noms)) {
240
                            $erreursDurantTraitement = true;
241
                            $this->messages[] = "Au moins une des images n'a pas pu être enregistrée.";
242
                        } else {
243
                            $cmd = sprintf($this->config['cel']['commande_script_images'],implode(',', array_keys($img_a_taguer_ids_noms)));
244
                            pclose(popen($cmd,"r"));
245
                        }
246
                    }
247
                }
3720 idir 248
 
3678 delphine 249
                $this->gestionMotsClesObs = new GestionMotsClesChemin($this->config,'obs');
250
                $this->gestionMotsClesImages = new GestionMotsClesChemin($this->config,'images');
3720 idir 251
 
3678 delphine 252
                $this->taguerObs($obs_a_taguer_ids);
253
                if (!empty($img_a_taguer_ids_noms)) {
254
                    $this->taguerImg(array_keys($img_a_taguer_ids_noms));
255
                }
3720 idir 256
 
3678 delphine 257
                // Les champs taggés sont des champs supplémentaires stockés sous forme de clé => valeur
258
                $this->ajouterChampsEtendusObs($obs_a_taguer_ids, $champsEtendusObs);
259
                // Fin de la transaction - on considère que commit() et rollback() ne ratent jamais
260
                if ($erreursDurantTraitement === false) {
261
                    // Suppression des fichiers images temporaires
262
                    $this->nettoyerImagesUploades($nomsOriginauxImagesTemp);
263
                    Cel::db()->commit();
264
                } else {
265
                    // On annule l'écriture des images enregistrées sur le disque dur - la transaction
266
                    // se charge de les retirer de la base de données
267
                    if ($img_a_taguer_ids_noms !== false) {
268
                        foreach (array_keys($img_a_taguer_ids_noms) as $idImageASupprimer) {
269
                            $this->effacerImageDuDd($idImageASupprimer);
270
                        }
271
                    }
272
                    Cel::db()->rollBack();
273
                }
274
            } else {
275
                $this->messages[] = '[' . $requeteDonnees['utilisateur']['courriel'] . "] n'est pas une adresse email valide.";
276
            }
277
        } else {
278
            $this->messages[] = "Les informations concernant le projet coopératif n'ont pas été transmises.";
279
        }
280
        if (count($this->messages) > 0) {
281
            $this->debug[] = print_r($this->messages, true);
282
        }
283
        if (count($this->messages) > 0) {
284
            $msg = 'erreur';
285
            $idNouvelleObs = null;
286
        } else {
287
            $msg = 'ok';
288
        }
289
        // renvoi des infos d'images (id, nom) ordonnées, en plus des infos obs.
290
        $infosImages = array();
291
        if (! empty($img_a_taguer_ids_noms)) {
292
            foreach ($img_a_taguer_ids_noms as $id => $nom) {
293
                $infosImages[] = array(
294
                    'id' => $id,
295
                    'nom' => $nom
296
                );
297
            }
298
        }
299
        $retour = (object) array(
300
            'msg' => $msg,
301
            'id' => $idNouvelleObs,
302
            'images' => $infosImages
303
        );
304
        $this->envoyerJson($retour);
305
        exit;
306
    }
3720 idir 307
 
3678 delphine 308
    /**
309
     * Retourne les infos du compte correspondant à $courriel
310
     * si présent dans l'annuaire Tela,
311
     * false sinon
312
     */
313
    protected function infosInscritTela($courriel) {
314
        if (empty($courriel)) {
315
            return false;
316
        }
317
        // interrogation de l'annuaire
318
        $url = sprintf($this->config['settings']['baseURLServicesAnnuaireTpl'], 'utilisateur/identite-par-courriel/' . $courriel);
319
        $retour = file_get_contents($url);
320
        if (! $retour) {
321
            return false;
322
        }
323
        try {
324
            $retour = json_decode($retour, true);
325
        } catch (Exception $e) {
326
            return false;
327
        }
328
        if (isset($retour['error'])) {
329
            return false;
330
        }
331
        // le service annuaire a retourné qqch de valide
332
        return array_shift($retour);
333
    }
3720 idir 334
 
3678 delphine 335
    /**
336
     * Retourne true si les champs suivants sont présents dans le tableau :
337
     *  - obsId1[user_sci_name]
338
     *  - obsId1[latitude]' : obs.geoloc.lat || '',
3720 idir 339
    'obsId1[longitude]' : obs.geoloc.lon || '',
3678 delphine 340
     *  mot-clé "pn:referentiel"
341
     */
342
    protected function estUneDonneeQualifiee($donnees) {
343
        // vérifier date et géoloc
344
        // lancer enrichirDonneesTaxonomiques et vérifier si ça a retrouvé un nn
345
    }
3720 idir 346
 
3678 delphine 347
    /**
348
     * Si les données taxonomiques sont incomplètes dans $obs
349
     * (clefs 'nom_sel_nn', 'user_sci_name', 'taxo_repo', 'accepted_sci_name_id',
350
     * 'accepted_sci_name', 'family'), tente d'en récupérer un maximum à l'aide des
351
     * services eFlore, à condition que soient mentionnés au moins :
352
     *  - un nom de référentiel
353
     *  - un nom_sel_nn OU un user_sci_name
354
     */
355
    protected function enrichirDonneesTaxonomiques(&$obs) {
356
        // sans référentiel, on ne peut rien faire
357
        if (! empty($obs['taxo_repo'])) {
358
            // copies locales pour ne pas abimer les données d'entrée
359
            $nn = $obs['user_sci_name_id'];
360
            $ref = $obs['taxo_repo'];
361
            $ns = $obs['user_sci_name'];
362
            $nr = $obs['accepted_sci_name'];
363
            $nnr = $obs['accepted_sci_name_id'];
364
            $fam = $obs['family'];
3720 idir 365
 
3678 delphine 366
            // si j'ai un nn, tentative de retrouver le nnr, le user_sci_name,
367
            // le accepted_sci_name et la famille, s'ils ne sont pas déjà présents (on
368
            // pourrait les écraser systématiquement mais l'appel au service
369
            // dégrade les perfs)
370
            if ((! empty($nn) && is_numeric($nn))
371
                // omission du test sur 'accepted_sci_name' car le service eFlore noms ne le retourne que sans auteur (pas bon)
372
                && (empty($ns) || empty($nnr) || empty($fam) /*|| empty($nr)*/)) {
3720 idir 373
                // go
374
                $this->enrichirDonneesTaxonomiquesParNN($ref, $nn, $obs);
375
            } else {
376
                // si j'ai un nom complet, avec un peu de bol il sera dans le référentiel
377
                if ((! empty($ns))
378
                    && (empty($nn) || empty($nnr) || empty($fam) /*|| empty($nr)*/)) {
3678 delphine 379
                    // go
3720 idir 380
                    $this->enrichirDonneesTaxonomiquesParNS($ref, $ns, $obs);
381
                }
382
            } // sinon fuque
383
 
3678 delphine 384
        }
385
    }
3720 idir 386
 
3678 delphine 387
    /**
388
     * Enrichit le tableau $obs destiné à être inséré dans le BDD, en
389
     * interrogeant le service eFlore/noms par référentiel + nom scientifique
390
     * avec auteur
391
     */
392
    protected function enrichirDonneesTaxonomiquesParNS($ref, $ns, &$obs) {
393
        $url_nom = $this->config['eflore']['url_service_nom'];
394
        $url_nom = str_replace('{referentiel}', $ref, $url_nom);
395
        $url_nom .= '?recherche=etendue&ns.structure=au&masque=' . urlencode($ns);
396
        // un horrible @ car les erreurs de file_get_contents() ne sont pas try/catchables
397
        // @TODO mettre du cURL à l'occase
398
        $infos_nom = @file_get_contents($url_nom);
399
        if ($infos_nom != NULL) {
400
            try {
401
                $infos_nom = json_decode($infos_nom, true);
402
                if (count($infos_nom['resultat']) > 0) {
403
                    $nn_trouve = null;
404
                    $ret_trouve = false;
405
                    // on prend le nom avec auteur correspondant exactement;
406
                    // s'il y en a plusieurs on prend le premier qui est retenu
407
                    foreach($infos_nom['resultat'] as $n => $nom) {
408
                        if (! $ret_trouve) {
409
                            if ($nom['nom_sci_complet'] == $ns) {
410
                                if ($nn_trouve == null || $nom['retenu'] == 'true') {
411
                                    $nn_trouve = $n;
412
                                    $ret_trouve = ($nom['retenu'] == 'true');
413
                                }
414
                            }
415
                        }
416
                    }
417
                    if ($nn_trouve != null) {
418
                        // gagné !
419
                        $obs['user_sci_name_id'] = $nn_trouve;
420
                        // et maintenant on recolle ce qu'on peut à partir du nn
421
                        $this->enrichirDonneesTaxonomiquesParNN($ref, $nn_trouve, $obs);
422
                    }
423
                }
424
            } catch(Exception $e) {
425
                // échec silencieux
426
            }
427
        }
428
    }
3720 idir 429
 
3678 delphine 430
    /**
431
     * Enrichit le tableau $obs destiné à être inséré dans le BDD, en
432
     * interrogeant le service eFlore/noms par référentiel + nn
433
     */
434
    protected function enrichirDonneesTaxonomiquesParNN($ref, $nn, &$obs) {
435
        $url_nom = $this->config['eflore']['url_service_nom'];
436
        $url_nom = str_replace('{referentiel}', $ref, $url_nom);
3756 killian 437
        $url_nom .= '/' . $nn . '?ns.structure=au,an';
3678 delphine 438
        // un horrible @ car les erreurs de file_get_contents() ne sont pas try/catchables
439
        // @TODO mettre du cURL à l'occase
440
        $infos_nom = @file_get_contents($url_nom);
441
        if ($infos_nom != NULL) {
442
            try {
443
                $infos_nom = json_decode($infos_nom, true);
444
                // une fois qu'on a les infos, on écrase tout
445
                if ($infos_nom['nom_sci_complet'] != null) {
446
                    $obs['user_sci_name'] = $infos_nom['nom_sci_complet'];
447
                }
448
                if ($infos_nom['nom_retenu_complet'] != null) {
449
                    $obs['accepted_sci_name'] = $infos_nom['nom_retenu_complet'];
450
                }
451
                if ($infos_nom['nom_retenu.id'] != null) {
452
                    $obs['accepted_sci_name_id'] = $infos_nom['nom_retenu.id'];
453
                }
454
                if ($infos_nom['famille'] != null) {
455
                    $obs['family'] = $infos_nom['famille'];
456
                }
457
            } catch(Exception $e) {
458
                // échec silencieux
459
            }
460
        }
461
    }
3720 idir 462
 
3678 delphine 463
    private function traiterProjetTags() {
464
        if (strpos($this->projet, ',') === false) {
3683 delphine 465
            $this->projetTags = array('Projets coopératifs>'.$this->projet);
3678 delphine 466
        } else {
467
            $projetTagsTxt = explode(',', $this->projet);
468
            foreach ($projetTagsTxt as $tag) {
3683 delphine 469
                $this->projetTags[] = 'Projets coopératifs>'.$tag;
3678 delphine 470
            }
471
        }
472
    }
3720 idir 473
 
3678 delphine 474
    private function traiterTagObs($requeteDonnees) {
475
        if (array_key_exists('tag-obs', $requeteDonnees) && $requeteDonnees['tag-obs'] != '') {
476
            $this->tagsObs = explode(',', $requeteDonnees['tag-obs']);
477
        }
478
        foreach ($this->projetTags as $tag) {
479
            $this->tagsObs[] = $tag;
480
        }
481
    }
3720 idir 482
 
3678 delphine 483
    private function traiterTagImg($requeteDonnees) {
484
        if (array_key_exists('tag-img', $requeteDonnees) && $requeteDonnees['tag-img'] != '') {
485
            $this->tagsImg = explode(',', $requeteDonnees['tag-img']);
486
        }
487
        foreach ($this->projetTags as $tag) {
488
            $this->tagsImg[] = $tag;
489
        }
490
    }
3720 idir 491
 
3678 delphine 492
    private function ajouterChampsEtendusObs($obs_ids, $obs_a_champs_etendus) {
493
        $champs_etendus_obs = array();
494
        $gestionChampsEtendus = new GestionChampsEtendus($this->config, 'obs');
3720 idir 495
 
3678 delphine 496
        foreach ($obs_ids as $id_obs) {
497
            $champs = array_shift($obs_a_champs_etendus);
498
            if ($champs != null && is_array($champs)) {
499
                foreach ($champs as $infosChamp) {
500
                    $cle = isset($infosChamp['cle']) ? $infosChamp['cle'] : '';
501
                    $valeur = isset($infosChamp['valeur']) ? $infosChamp['valeur'] : '';
3720 idir 502
 
3678 delphine 503
                    if (!empty($cle) && $valeur !== '') {
504
                        $champEtendu = new ObsEtendue();
505
                        $champEtendu->id = $id_obs;
506
                        $champEtendu->cle = $cle;
507
                        $champEtendu->valeur = $valeur;
3720 idir 508
 
3678 delphine 509
                        $champs_etendus_obs[] = $champEtendu;
510
                    }
511
                }
512
            }
513
        }
3720 idir 514
 
1903 raphael 515
        if(! $champs_etendus_obs) return TRUE;
3720 idir 516
 
3678 delphine 517
        return $gestionChampsEtendus->ajouterParLots($champs_etendus_obs, $this->projet);
518
    }
3720 idir 519
 
3678 delphine 520
    private function traiterImagesALierAObs($idObs, $obs) {
521
        $imgAAjouter = array();
522
        if (is_array($obs['image_nom'])) {
523
            foreach ($obs['image_nom'] as $index => $nom_image) {
524
                $image = array();
525
                $image['id_utilisateur'] = $this->userId;
526
                $image['id_obs'] = $idObs;
527
                $image['nom'] = $nom_image;
528
                // on suppose que les b64 des images sont envoyés dans le même ordre que leurs noms
529
                // TODO: indexer le tableau avec le nom des images
530
                $image['b64'] = (is_array($obs['image_b64']) && isset($obs['image_b64'][$index])) ? $obs['image_b64'][$index] : null;
531
                $this->debug[] = 'Contient B64 : '.(isset($obs['image_b64']) ? 'oui' : 'non');
532
                $imgAAjouter[] = $image;
533
            }
534
        } else {
535
            $image = array();
536
            $image['id_utilisateur'] = $this->userId;
537
            $image['id_obs'] = $idObs;
538
            $image['nom'] = $obs['image_nom'];
539
            $image['b64'] = $obs['image_b64'] ?? null;
540
            $this->debug[] = 'Contient B64 : '.(isset($obs['image_b64']) ? 'oui' : 'non');
541
            $imgAAjouter[] = $image;
542
        }
3720 idir 543
 
3678 delphine 544
        return $imgAAjouter;
545
    }
3720 idir 546
 
3678 delphine 547
    protected function stockerImagesEtLierAObs($id_obs, $img) {
548
        $img_a_taguer_ids_noms = array();
549
        foreach ($img as $image) {
550
            $image['nom'] = trim(rtrim($image['nom'], "'"), "'");
551
            $nomFichierImg = $this->traiterNomFichierImage($image['nom']);
552
            $cheminImage = $this->config['cel']['chemin_stockage_temp']."/$nomFichierImg";
553
            // Si l'image est transmise en base 64
554
            if (isset($image['b64'])) {
555
                $this->transformerBase64enFichier($cheminImage, $image['b64']);
556
            }
3720 idir 557
 
3678 delphine 558
            $this->debug[] = 'Nom fichier img debut :'.$nomFichierImg;
559
            $idImg = $this->ajouterImageSurDdEtBdd($id_obs, $cheminImage, $nomFichierImg);
560
            if ($idImg !== false) {
561
                $img_a_taguer_ids_noms[$idImg] = $nomFichierImg;
562
                if (isset($image['tags'])) {
563
                    $this->correspondanceIdImgTags[$idImg] = $image['tags'];
564
                }
565
            } else {
566
                // L'image n'a pas pu être écrite.
567
                // On annule l'écriture des précédentes et on s'arrête là - la transaction
568
                // se chargera de les retirer de la base de données
569
                foreach (array_keys($img_a_taguer_ids_noms) as $idImageASupprimer) {
570
                    $this->effacerImageDuDd($idImageASupprimer);
571
                }
572
                $img_a_taguer_ids_noms = array();
573
                break;
574
            }
575
        }
576
        return $img_a_taguer_ids_noms;
577
    }
3720 idir 578
 
3678 delphine 579
    private function supprimerSlashesProfond($valeur) {
580
        $valeur = is_array($valeur) ? array_map(array($this, 'supprimerSlashesProfond'), $valeur) : stripslashes($valeur);
581
        return $valeur;
582
    }
3720 idir 583
 
3678 delphine 584
    /**
585
     * Transforme une date au format français (jj/mm/aaaa) dans un format Mysql (aaaa-mm-jj).
586
     * @param string $dateFr date au format français (jj/mm/aaaa)
587
     * @return string date au format Mysql (aaaa-mm-jj)
588
     */
589
    private function transormerDateFrVersMysql($dateFr) {
590
        $dateMysql = '0000-00-00';
591
        $morceauxDate = explode('/', $dateFr);
592
        if (count($morceauxDate) == 3) {
593
            $dateMysql = implode('-', array_reverse($morceauxDate));
594
        }
595
        return $dateMysql;
596
    }
3720 idir 597
 
3678 delphine 598
    private function taguerObs($obs_a_taguer_ids) {
599
        if (count($obs_a_taguer_ids) > 0) {
600
            foreach ($this->tagsObs as $hierarchieTag) {
601
                $tagsALier = explode('>', $hierarchieTag);
602
                $liaisonOk = $this->lierObsAMotsCles($obs_a_taguer_ids, $tagsALier);
603
                if ($liaisonOk === false) {
604
                    $e = "Toutes les observations n'ont pas pu être liées aux mots-clés : $hierarchieTag";
605
                    $this->messages[] = $e;
606
                }
607
            }
608
        }
609
    }
3720 idir 610
 
3678 delphine 611
    private function lierObsAMotsCles($observations_ids, $tags) {
612
        // pas de mots clés pour les non-inscrits
3691 delphine 613
        if ($this->userId == null) {
3678 delphine 614
            $this->userId = 0;
615
        }
3720 idir 616
 
3678 delphine 617
        $chemin_parent = '/';
618
        $listeIdsTags = array();
619
        foreach ($tags as $tag) {
620
            $tag = $this->nettoyerTag($tag);
621
            if ($tag != '') {
622
                $id_mot_cle = $this->gestionMotsClesObs->insererParCheminSiInexistant($tag, $chemin_parent, $this->userId);
623
                if ($id_mot_cle !== false) {
624
                    $listeIdsTags[] = $id_mot_cle;
625
                    $chemin_parent .= $tag."/";
626
                }
627
            }
628
        }
3720 idir 629
 
3678 delphine 630
        $liaison_ok = $this->gestionMotsClesObs->lierParTableaux($listeIdsTags, $observations_ids);
631
        return $liaison_ok;
632
    }
3720 idir 633
 
3678 delphine 634
    private function taguerImg($img_a_taguer_ids) {
635
        if (count($img_a_taguer_ids) > 0) {
636
            $this->debug[] = "Tags img : ".print_r($this->tagsImg, true);
637
            foreach ($this->tagsImg as $hierarchieTag) {
638
                $tagsALier = explode('>', $hierarchieTag);
639
                $liaisonOk = $this->lierImgAMotsCles($img_a_taguer_ids, $tagsALier);
640
                if ($liaisonOk === false) {
641
                    $e = "Toutes les images n'ont pas pu être liées aux mots-clés : $hierarchieTag";
642
                    $this->messages[] = $e;
643
                }
644
            }
645
        }
646
        // Liaison des tags spécifiques à chaque image s'il y en a
647
        if (count($this->correspondanceIdImgTags) > 0) {
648
            foreach ($this->correspondanceIdImgTags as $id_img => $tags) {
649
                if ($tags != null && !empty($tags)) {
650
                    $this->lierImgAMotsCles(array($id_img), $tags);
651
                }
652
            }
653
        }
654
    }
3720 idir 655
 
3678 delphine 656
    private function lierImgAMotsCles($images_ids, $tags) {
657
        // pas de mots clés pour les non-inscrits
3691 delphine 658
        if ($this->userId == null) {
3678 delphine 659
            $this->userId = 0;
660
        }
3720 idir 661
 
3678 delphine 662
        $chemin_parent = "/";
663
        $listeIdsTags = array();
664
        foreach ($tags as $tag) {
665
            $tag = $this->nettoyerTag($tag);
666
            if ($tag != '') {
667
                $id_mot_cle = $this->gestionMotsClesImages->insererParCheminSiInexistant($tag, $chemin_parent, $this->userId);
668
                if ($id_mot_cle !== false) {
669
                    $listeIdsTags[] = $id_mot_cle;
670
                    $chemin_parent .= $tag."/";
671
                }
672
            }
673
        }
674
        $liaison_ok = $this->gestionMotsClesImages->lierParTableaux($listeIdsTags, $images_ids);
675
        return $liaison_ok;
676
    }
3720 idir 677
 
3678 delphine 678
    private function nettoyerTag($tag) {
679
        $tag = trim($tag);
680
        $tag = preg_replace('/(?:\s+|[,]+)/', ' ', $tag);
681
        return $tag;
682
    }
3720 idir 683
 
3678 delphine 684
    private function traiterNomFichierImage($fichierNom) {
685
        $fichierNom = preg_replace('/[.](jpeg|jpg)$/i', '.jpg', strtolower(trim($fichierNom)));
3731 delphine 686
 
3678 delphine 687
        return $fichierNom;
688
    }
3720 idir 689
 
3678 delphine 690
    /**
691
     * Décode l'image en base64,enregistre celle-ci sous forme de fichier du type de l'image
692
     *  dans un dossier temporaire.
693
     */
694
    private function transformerBase64enFichier($cheminImage, $imageInfosB64) {
695
        // Enleve la partie data:image qui permet la previsalisation pour firefox de l'image en base64
696
        $imageBase64 = explode(';', $imageInfosB64);
697
        $dataBase64 = explode(',',$imageBase64[1]);
698
        $dataImg = base64_decode($dataBase64[1]);
3720 idir 699
 
3678 delphine 700
        $imageRessource = fopen($cheminImage, 'wb');
701
        fwrite($imageRessource, $dataImg);
702
        fclose($imageRessource);
3720 idir 703
 
3678 delphine 704
        if (file_exists($cheminImage) == false) {
705
            $this->messages[] = "Erreur lors de la création du fichier";
706
        }
707
    }
3720 idir 708
 
3678 delphine 709
    /**
710
     * Supprime toutes les images temporaires dont :
711
     * - l'ancienneté est supérieure à DUREE_DE_VIE_IMG (si $nomsDeFichiers est vide, par défaut)
712
     * - le nom correspond à un des éléments du tableau $nomsDeFichiers (s'il est spécifié et non vide)
713
     */
714
    protected function nettoyerImagesUploades($nomsDeFichiers = array()) {
715
        $dossierStockage = $this->config['cel']['chemin_stockage_temp'].'/';
716
        if (is_dir($dossierStockage)) {
717
            $objets = scandir($dossierStockage);
718
            if (is_array($objets)) {
719
                foreach ($objets as $objet) {
720
                    $chemin = $dossierStockage . $objet;
721
                    if (is_file($chemin)) {
722
                        // critère de suppression
723
                        if (count($nomsDeFichiers) > 0) {
724
                            $suppression = in_array($objet, $nomsDeFichiers);
725
                        } else {
726
                            $filemtime = @filemtime($chemin);
727
                            if ($filemtime !== false) {
728
                                $suppression = (time() - $filemtime >= self::DUREE_DE_VIE_IMG) ? true : false;
729
                            }
730
                        }
731
                        // suppression
732
                        if ($suppression === true) {
733
                            unlink($chemin);
734
                        }
735
                    }
736
                }
737
            }
738
        }
739
    }
3720 idir 740
 
3678 delphine 741
    /**
742
     * Ajoute une image dans la base de données et stocke le fichier en fabriquant les miniatures,
743
     * renvoie le nouvel id d'image en cas de succès
744
     *
745
     * @param string $id_obs l'id de l'obs
746
     * @param string $cheminImage le chemin vers le fichier original de l'image
747
     * @param string $nomFichierImage le nom du fichier original de l'image
748
     */
749
    public function ajouterImageSurDdEtBdd($id_obs, $cheminImage, $nomFichierImage) {
750
        $idImage = false;
751
        if (file_exists($cheminImage)) {
752
            $extracteurMetadonnees = new ExtracteurMetadonnees();
753
            $metadonnees = $extracteurMetadonnees->extraireMetadonnees($cheminImage);
754
            if ($metadonnees !== false) {
755
                $infosImage = array();
756
                $infosImage['date_shot'] = $metadonnees['date_shot'];
757
                $infosImage['size'] = $metadonnees['size'];
758
                $infosImage['occurrence_id'] = $id_obs;
759
                $infosImage['original_name'] = $nomFichierImage;
760
                $infosImage['user_id'] = $this->userId;
761
                $infosImage['user_email'] = $this->userEmail;
762
                $infosImage['user_pseudo'] = $this->userIntitule;
763
                $infosImage['content_url'] = $cheminImage;
764
                $infosImage['mime_type'] = mime_content_type($cheminImage);
765
                // $infosImage['md5'] = md5_file($cheminImage);
766
                $infosImage['date_created'] = 'NOW()';
767
                $infosImage['date_updated'] = 'NOW()';
768
                $infosImage['date_linked_to_occurrence'] = 'NOW()';
769
                $this->debug[] = 'Nom fichier img meta :'.$nomFichierImage;
770
                $requete = $this->construireRequeteInsertionImage($infosImage);
771
                $resultat = Cel::db()->executer($requete);
772
                if ($resultat !== false) {
3731 delphine 773
                    $idImage = $this->traiterEtRecupererIdImage($nomFichierImage, $id_obs);
3678 delphine 774
                    if ($idImage !== false) {
3682 delphine 775
                        $infosImage['url'] = 'https://api.tela-botanica.org/img:'.str_pad($idImage, 9, '0', STR_PAD_LEFT).'O';
3720 idir 776
 
3678 delphine 777
                        $manipulateurImage = new ImageRecreation($this->config);
778
                        // Stocke le fichier en conservant les fichiers temporaires, ce qui permet de réessayer
779
                        // de les traiter en cas d'échec de la totalité du processus de traitement de l'obs
780
                        $stockageOk = $manipulateurImage->stockerFichierOriginal($cheminImage, $idImage, true);
781
                        if ($stockageOk) {
782
                            $miniatureChemin = str_replace('.jpg', '_min.jpg', $cheminImage);
783
                            if (file_exists($miniatureChemin)) {
784
                                if (@unlink($miniatureChemin) === false) {
785
                                    $this->messages[] = "La miniature de l'image n'a pu être supprimée.";
786
                                }
787
                            }
3720 idir 788
 
3678 delphine 789
                        } else {
790
                            $this->messages[] = "Une erreur s'est produite lors du stockage du fichier.";
791
                            // Remise à zéro d'idImage pour que l'erreur ne soit pas ignorée par l'appelant
792
                            $idImage = false;
793
                        }
794
                    } else {
795
                        $this->messages[] =  "Impossible d'obtenir le nouvel identifiant de l'image";
796
                    }
797
                } else {
798
                    $this->messages[] = "Echec de l'insertion dans la base de donnees des informations de l'image.";
799
                }
800
            } else {
801
                $this->messages[] = "Erreur lors de l'extraction des metadonnées.";
802
            }
803
        } else {
804
            $this->messages[] = "L'image originale est introuvable sur le serveur.";
805
        }
806
        return $idImage;
807
    }
3720 idir 808
 
3678 delphine 809
    /**
810
     * Supprime une image du disque dur. Ne touche pas à la base de données, on considère
811
     * que c'est le rôle de la transaction d'annuler les écritures en cas de problème
812
     *
813
     * @param Integer $idImageASupprimer
814
     * @return boolean $ok true si la suppression s'est bien passée, false s'il reste au moins un fichier
815
     */
816
    protected function effacerImageDuDd($idImageASupprimer) {
817
        $manipulateurImage = new ImageRecreation($this->config);
818
        $ok = $manipulateurImage->detruireImageSurDisque($idImageASupprimer);
3720 idir 819
 
3678 delphine 820
        return $ok;
821
    }
3720 idir 822
 
3731 delphine 823
    private function traiterEtRecupererIdImage($original_name, $id_obs) {
3678 delphine 824
        $original_name = Cel::db()->proteger($original_name);
3732 delphine 825
        $id_obs = Cel::db()->proteger($id_obs);
826
 
3678 delphine 827
        $requete = 'SELECT id '.
828
            'FROM photo '.
3733 delphine 829
            "WHERE occurrence_id = ".$id_obs.
3678 delphine 830
            "	AND original_name = $original_name ";
831
        $resultat = Cel::db()->requeter($requete);
832
        $id_image = $resultat[0]['id'] ?? false;
3720 idir 833
 
3678 delphine 834
        if ($id_image) {
835
            $full_id_image = str_pad($id_image, 9, '0', STR_PAD_LEFT) . 'O';
836
            $image_url = sprintf($this->config['settings']['celImgUrlTpl'], $full_id_image);
837
            $requete = 'UPDATE photo'
838
                . ' SET url = ' . Cel::db()->proteger($image_url)
839
                . ' WHERE id = ' . Cel::db()->proteger($id_image);
3720 idir 840
            $resultat = Cel::db()->requeter($requete);
3678 delphine 841
        }
3720 idir 842
 
3678 delphine 843
        return $id_image;
3720 idir 844
 
3678 delphine 845
    }
3720 idir 846
 
3678 delphine 847
    private function construireRequeteInsertionImage($informations) {
848
        $champs = array();
849
        $valeurs = array();
850
        foreach ($informations as $champ => $valeur) {
851
            $champs[] = $champ;
852
            if (is_null($valeur)) {
853
                $valeurs[$champ] = 'NULL';
854
            } else if ($valeur === 'NOW()') {
855
                $valeurs[$champ] = $valeur;
856
            } else {
857
                $valeurs[$champ] = Cel::db()->proteger($valeur);
858
            }
859
        }
860
        $champsConcat = implode(', ', $champs);
861
        $valeursConcat = implode(', ', $valeurs);
3720 idir 862
 
3678 delphine 863
        $requete = "INSERT INTO photo ($champsConcat) VALUES ($valeursConcat) ".
864
            ' -- '.__FILE__.':'.__LINE__;
865
        return $requete;
866
    }
3019 killian 867
}