| 705 |
delphine |
1 |
<?php
|
|
|
2 |
/** Exemple lancement:
|
|
|
3 |
* /opt/lampp/bin/php -d memory_limit=3500M ~/web/eflore-projets/scripts/cli.php sauvages -a chargerTous
|
|
|
4 |
*/
|
|
|
5 |
class Sauvages extends EfloreScript {
|
|
|
6 |
private $contenu_fichier = array();
|
|
|
7 |
protected $parametres_autorises = array(
|
|
|
8 |
'-f' => array(true, true, 'Nom du fichier ou du dossier à traiter'));
|
| 853 |
delphine |
9 |
private $caracteresAccentues = array(
|
|
|
10 |
'À', 'Á', 'Â', 'Ã', 'Ä', 'Å', 'Æ', 'Ç', 'È', 'É', 'Ê', 'Ë', 'Ì', 'Í', 'Î',
|
|
|
11 |
'Ï', 'Ð', 'Ñ', 'Ò', 'Ó', 'Ô', 'Õ', 'Ö', 'Ø', 'Ù', 'Ú', 'Û', 'Ü', 'Ý', 'ß',
|
|
|
12 |
'à', 'á', 'â', 'ã', 'ä', 'å', 'æ', 'ç', 'è', 'é', 'ê', 'ë', 'ì', 'í', 'î',
|
|
|
13 |
'ï', 'ñ', 'ò', 'ó', 'ô', 'õ', 'ö', 'ø', 'ù', 'ú', 'û', 'ü', 'ý', 'ÿ', 'Ā',
|
|
|
14 |
'ā', 'Ă', 'ă', 'Ą', 'ą', 'Ć', 'ć', 'Ĉ', 'ĉ', 'Ċ', 'ċ', 'Č', 'č', 'Ď', 'ď',
|
|
|
15 |
'Đ', 'đ', 'Ē', 'ē', 'Ĕ', 'ĕ', 'Ė', 'ė', 'Ę', 'ę', 'Ě', 'ě', 'Ĝ', 'ĝ', 'Ğ',
|
|
|
16 |
'ğ', 'Ġ', 'ġ', 'Ģ', 'ģ', 'Ĥ', 'ĥ', 'Ħ', 'ħ', 'Ĩ', 'ĩ', 'Ī', 'ī', 'Ĭ', 'ĭ',
|
|
|
17 |
'Į', 'į', 'İ', 'ı', 'IJ', 'ij', 'Ĵ', 'ĵ', 'Ķ', 'ķ', 'Ĺ', 'ĺ', 'Ļ', 'ļ', 'Ľ',
|
|
|
18 |
'ľ', 'Ŀ', 'ŀ', 'Ł', 'ł', 'Ń', 'ń', 'Ņ', 'ņ', 'Ň', 'ň', 'ʼn', 'Ō', 'ō', 'Ŏ',
|
|
|
19 |
'ŏ', 'Ő', 'ő', 'Œ', 'œ', 'Ŕ', 'ŕ', 'Ŗ', 'ŗ', 'Ř', 'ř', 'Ś', 'ś', 'Ŝ', 'ŝ',
|
|
|
20 |
'Ş', 'ş', 'Š', 'š', 'Ţ', 'ţ', 'Ť', 'ť', 'Ŧ', 'ŧ', 'Ũ', 'ũ', 'Ū', 'ū', 'Ŭ',
|
|
|
21 |
'ŭ', 'Ů', 'ů', 'Ű', 'ű', 'Ų', 'ų', 'Ŵ', 'ŵ', 'Ŷ', 'ŷ', 'Ÿ', 'Ź', 'ź', 'Ż',
|
|
|
22 |
'ż', 'Ž', 'ž', 'ſ', 'ƒ', 'Ơ', 'ơ', 'Ư', 'ư', 'Ǎ', 'ǎ', 'Ǐ', 'ǐ', 'Ǒ', 'ǒ',
|
|
|
23 |
'Ǔ', 'ǔ', 'Ǖ', 'ǖ', 'Ǘ', 'ǘ', 'Ǚ', 'ǚ', 'Ǜ', 'ǜ', 'Ǻ', 'ǻ', 'Ǽ', 'ǽ', 'Ǿ', 'ǿ');
|
|
|
24 |
private $caracteresNormaux = array(
|
|
|
25 |
'A', 'A', 'A', 'A', 'A', 'A', 'AE', 'C', 'E', 'E', 'E', 'E', 'I', 'I', 'I',
|
|
|
26 |
'I', 'D', 'N', 'O', 'O', 'O', 'O', 'O', 'O', 'U', 'U', 'U', 'U', 'Y', 's',
|
|
|
27 |
'a', 'a', 'a', 'a', 'a', 'a', 'ae', 'c', 'e', 'e', 'e', 'e', 'i', 'i', 'i',
|
|
|
28 |
'i', 'n', 'o', 'o', 'o', 'o', 'o', 'o', 'u', 'u', 'u', 'u', 'y', 'y', 'A', 'a',
|
|
|
29 |
'A', 'a', 'A', 'a', 'C', 'c', 'C', 'c', 'C', 'c', 'C', 'c', 'D', 'd', 'D', 'd',
|
|
|
30 |
'E', 'e', 'E', 'e', 'E', 'e', 'E', 'e', 'E', 'e', 'G', 'g', 'G', 'g', 'G', 'g',
|
|
|
31 |
'G', 'g', 'H', 'h', 'H', 'h', 'I', 'i', 'I', 'i', 'I', 'i', 'I', 'i', 'I', 'i',
|
|
|
32 |
'IJ', 'ij', 'J', 'j', 'K', 'k', 'L', 'l', 'L', 'l', 'L', 'l', 'L', 'l', 'l', 'l',
|
|
|
33 |
'N', 'n', 'N', 'n', 'N', 'n', 'n', 'O', 'o', 'O', 'o', 'O', 'o', 'OE', 'oe', 'R',
|
|
|
34 |
'r', 'R', 'r', 'R', 'r', 'S', 's', 'S', 's', 'S', 's', 'S', 's', 'T', 't', 'T', 't',
|
|
|
35 |
'T', 't', 'U', 'u', 'U', 'u', 'U', 'u', 'U', 'u', 'U', 'u', 'U', 'u', 'W', 'w', 'Y',
|
|
|
36 |
'y', 'Y', 'Z', 'z', 'Z', 'z', 'Z', 'z', 's', 'f', 'O', 'o', 'U', 'u', 'A', 'a', 'I',
|
|
|
37 |
'i', 'O', 'o', 'U', 'u', 'U', 'u', 'U', 'u', 'U', 'u', 'U', 'u', 'A', 'a', 'AE', 'ae', 'O', 'o');
|
| 705 |
delphine |
38 |
|
|
|
39 |
public function executer() {
|
|
|
40 |
// Lancement de l'action demandée
|
|
|
41 |
try {
|
|
|
42 |
$this->initialiserProjet('sauvages');
|
|
|
43 |
|
|
|
44 |
$cmd = $this->getParametre('a');
|
|
|
45 |
switch ($cmd) {
|
|
|
46 |
case 'chargerTous' :
|
|
|
47 |
$this->creerXmlTaxons();
|
|
|
48 |
$this->creerXmlCriteres();
|
|
|
49 |
break;
|
|
|
50 |
case 'creerXmlCriteres' :
|
|
|
51 |
$this->creerXmlCriteres();
|
|
|
52 |
break;
|
|
|
53 |
case 'creerXmlTaxons' :
|
|
|
54 |
$this->creerXmlTaxons();
|
|
|
55 |
break;
|
|
|
56 |
default :
|
|
|
57 |
throw new Exception("Erreur : la commande '$cmd' n'existe pas!");
|
|
|
58 |
}
|
|
|
59 |
} catch (Exception $e) {
|
|
|
60 |
$this->traiterErreur($e->getMessage());
|
|
|
61 |
}
|
|
|
62 |
}
|
|
|
63 |
|
|
|
64 |
public function creerXmlCriteres() {
|
|
|
65 |
$this->recupererContenuFichier();
|
| 853 |
delphine |
66 |
$criteres_nom = $this->contenu_fichier[0];
|
|
|
67 |
unset($this->contenu_fichier[0]);
|
|
|
68 |
$criteres_label = $this->contenu_fichier[1];
|
| 705 |
delphine |
69 |
unset($this->contenu_fichier[1]);
|
| 853 |
delphine |
70 |
$description_label = $this->contenu_fichier[2];
|
|
|
71 |
unset($this->contenu_fichier[2]);
|
| 705 |
delphine |
72 |
$criteres_valeurs = $this->extraireValeurs();
|
| 853 |
delphine |
73 |
$xml = $this->formerXmlCriteres($criteres_nom, $criteres_label, $description_label, $criteres_valeurs);//print_r($xml);
|
| 705 |
delphine |
74 |
file_put_contents("./xml_criteres.xml", $xml);
|
|
|
75 |
}
|
|
|
76 |
|
|
|
77 |
|
| 853 |
delphine |
78 |
public function formerXmlCriteres($nom, $label, $description, $valeurs) {
|
| 705 |
delphine |
79 |
$xml='<keys>
|
|
|
80 |
<groupe id="1">
|
|
|
81 |
<nom>Arbres</nom>
|
|
|
82 |
<media>images/pictos/icone_arbre.png</media>
|
|
|
83 |
<criteres>';
|
|
|
84 |
foreach ($label as $id=>$criteres) {
|
|
|
85 |
if ($id > 2) {
|
|
|
86 |
$xml .= '<critere id="1.'.$id.'">
|
|
|
87 |
<label>'.$criteres.'</label>
|
|
|
88 |
<description>'.$description[$id].'</description>
|
|
|
89 |
<valeurs>';
|
|
|
90 |
foreach ($valeurs[$id] as $id_val=>$valeur) {
|
|
|
91 |
if ($valeur != "0") {
|
| 853 |
delphine |
92 |
$crit = str_replace(" ", "_", $this->supprimerAccents($nom[$id]));
|
|
|
93 |
$val = str_replace(" ", "_", $this->supprimerAccents($valeur));
|
|
|
94 |
$image = $crit."_".$val;
|
| 705 |
delphine |
95 |
$xml .= '<valeur code="1.'.$id.'.'.$id_val.'" media="images/pictos/'.$image.'.png">'.$valeur.'</valeur>';
|
|
|
96 |
}
|
|
|
97 |
}
|
|
|
98 |
$xml .= '</valeurs></critere>';
|
|
|
99 |
}
|
|
|
100 |
}
|
|
|
101 |
$xml .= "</criteres>
|
|
|
102 |
</groupe>
|
|
|
103 |
</keys>";
|
|
|
104 |
return $xml;
|
|
|
105 |
}
|
|
|
106 |
|
|
|
107 |
private function extraireValeurs() {
|
|
|
108 |
$valeurs = array();
|
|
|
109 |
foreach ($this->contenu_fichier as $ligne) {
|
|
|
110 |
$i = 0;
|
|
|
111 |
foreach ($ligne as $critere) {
|
|
|
112 |
if (!isset($valeurs[$i]) || !in_array(trim($critere), $valeurs[$i])) {
|
|
|
113 |
$valeurs[$i][] = trim($critere);
|
|
|
114 |
}
|
|
|
115 |
$i++;
|
|
|
116 |
}
|
|
|
117 |
}
|
|
|
118 |
return $valeurs;
|
|
|
119 |
}
|
|
|
120 |
|
|
|
121 |
|
|
|
122 |
public function creerXmlTaxons() {
|
|
|
123 |
$this->recupererContenuFichier();
|
|
|
124 |
$criteres_label = array_flip($this->contenu_fichier[0]);
|
|
|
125 |
unset($this->contenu_fichier[0]);
|
|
|
126 |
unset($this->contenu_fichier[1]);
|
| 853 |
delphine |
127 |
unset($this->contenu_fichier[2]);
|
| 705 |
delphine |
128 |
$criteres_valeurs = $this->extraireValeurs();
|
|
|
129 |
$xml = $this->formerXmlTaxons($criteres_label, $criteres_valeurs); //print_r($xml);
|
|
|
130 |
file_put_contents("./xml_taxons.xml", $xml);
|
|
|
131 |
}
|
|
|
132 |
|
|
|
133 |
public function formerXmlTaxons($criteres_label, $criteres_valeurs) {
|
|
|
134 |
$xml='<?xml version="1.0" ?><TAXONS SUBJECT="XML">';
|
|
|
135 |
$rest = new RestClient();
|
|
|
136 |
foreach ($this->contenu_fichier as $id=>$taxon) {
|
|
|
137 |
$infos_taxon = $this->rechercherInfosTaxon($rest, $taxon[$criteres_label["nom scientifique"]]);
|
|
|
138 |
$xml .= '<TAXON id="'.$id.'" value="'.
|
| 965 |
delphine |
139 |
ucfirst($taxon[$criteres_label["nom vernaculaire"]]).'" sciName="'.trim($taxon[$criteres_label["nom scientifique"]]).'" groupe="1">
|
| 705 |
delphine |
140 |
<DESCRIPTION>'.$infos_taxon["description"].'</DESCRIPTION>
|
|
|
141 |
<PICTURES>';
|
|
|
142 |
if ($infos_taxon["images"] != array()) {
|
|
|
143 |
foreach ($infos_taxon["images"] as $image) {
|
|
|
144 |
$xml .= '<PICTURE media="'.$image["binaire.href"].'"><author>'.$image["auteur.libelle"].'</author></PICTURE>';
|
|
|
145 |
}
|
|
|
146 |
}
|
|
|
147 |
$xml .= '</PICTURES><CRITERIAS>';
|
|
|
148 |
for ($i=3; $i < count($taxon); $i++) {
|
|
|
149 |
if (trim($taxon[$i]) !== "0") {
|
|
|
150 |
$xml .= '<VALUE code="1.'.$i.'.'.array_search(trim($taxon[$i]), $criteres_valeurs[$i]).'"/>';
|
|
|
151 |
}
|
|
|
152 |
}
|
|
|
153 |
$xml .= '</CRITERIAS></TAXON>';
|
|
|
154 |
}
|
|
|
155 |
$xml .= "</TAXONS>";
|
|
|
156 |
return $xml;
|
|
|
157 |
}
|
|
|
158 |
|
|
|
159 |
private function rechercherInfosTaxon($rest, $ns) {
|
|
|
160 |
$info = array("description" => "", "images" => array());
|
| 965 |
delphine |
161 |
|
|
|
162 |
$reponse = $this->consulterWebService($rest, "bdtfx",
|
|
|
163 |
"noms", "?retour.champs=nom_retenu.id,num_taxonomique&retour.tri=retenu&masque=".urlencode(trim($ns)));
|
| 705 |
delphine |
164 |
if (is_array($reponse["resultat"])) {
|
| 965 |
delphine |
165 |
$num_nom = $reponse["resultat"][key($reponse["resultat"])]["nom_retenu.id"];
|
|
|
166 |
$num_taxon = $reponse["resultat"][key($reponse["resultat"])]['num_taxonomique'];
|
|
|
167 |
}
|
|
|
168 |
|
|
|
169 |
$url_wiki = "http://www.tela-botanica.org/wikini/eFloreRedaction/api/rest/0.5/pages/SmartFloreBDTFXnt".
|
|
|
170 |
$num_taxon."?txt.format=text/plain&txt.section.titre=Comment%20la%20reconnaître%20%3F";
|
|
|
171 |
$wiki = $rest->consulter($url_wiki); $wiki = json_decode($wiki, true);
|
|
|
172 |
if ($wiki['texte'] != ""){
|
|
|
173 |
$info["description"] = $this->formaterSmatflore($wiki['texte']);
|
| 705 |
delphine |
174 |
} else {
|
| 965 |
delphine |
175 |
$coste = $this->consulterWebService($rest, "coste", "textes", "/bdtfx.nn:".$num_nom);
|
|
|
176 |
if ($coste['resultats'] != array() && $coste['resultats'][key($coste["resultats"])]['texte'] != "") {
|
|
|
177 |
$texte = str_replace("**", "", $coste['resultats'][key($coste["resultats"])]['texte']);
|
|
|
178 |
$texte = str_replace("//", "", $texte);
|
|
|
179 |
$texte = explode(" – ", $texte);
|
|
|
180 |
unset($texte[0],$texte[1]);
|
|
|
181 |
if (strpos($texte[2], ";") === false) {unset($texte[2]);} //else {print_r($texte[2]);}
|
|
|
182 |
|
|
|
183 |
if (preg_match('/^[\w|\s|\-|,]*\.*\s*$/', $texte[2]) == true) {print_r($texte[2]); unset($texte[2]);}
|
|
|
184 |
$info["description"] = implode(" – ", $texte);
|
|
|
185 |
} else {
|
|
|
186 |
$baseflor = $this->consulterWebService($rest, "baseflor", "informations", "/bdtfx.nn:".$num_nom);
|
|
|
187 |
$info["description"] = $this->formaterBaseflor($baseflor);
|
| 705 |
delphine |
188 |
}
|
|
|
189 |
}
|
| 965 |
delphine |
190 |
if ($info["description"] == "En cours de rédaction.") {echo $num_nom." ".$ns;
|
|
|
191 |
print_r($coste);
|
| 705 |
delphine |
192 |
}
|
| 965 |
delphine |
193 |
$reponse = $this->consulterWebService($rest, "cel", "images", "?navigation.limite=5&retour.format=CRS&masque.nn=".$num_nom);
|
| 705 |
delphine |
194 |
$info["images"] = $reponse["resultats"];
|
|
|
195 |
return $info;
|
|
|
196 |
}
|
|
|
197 |
|
| 965 |
delphine |
198 |
|
|
|
199 |
|
|
|
200 |
private function formaterSmatflore($texte) {
|
|
|
201 |
$a_enlever = array(Chr(10).'=', '='.Chr(10), Chr(10).''.Chr(10));
|
|
|
202 |
$texte = str_replace($a_enlever, '', $texte);
|
|
|
203 |
$texte = str_replace(Chr(10), '<br />', $texte);
|
|
|
204 |
return $texte;
|
|
|
205 |
}
|
|
|
206 |
|
| 705 |
delphine |
207 |
private function formaterBaseflor($reponse) {
|
|
|
208 |
$description = "En cours de rédaction.";
|
| 965 |
delphine |
209 |
if ($reponse["nom_sci"] != "") {
|
| 853 |
delphine |
210 |
$description = "Formation végétale : ".$reponse["form_vegetale"]."; ".
|
| 705 |
delphine |
211 |
"Inflorescence : ".$reponse["inflorescence"]."; ".
|
|
|
212 |
"Couleur de la fleur : ".$reponse["couleur_fleur"]."; ".
|
|
|
213 |
"Sexualité : ".$reponse["sexualite"]."; ".
|
|
|
214 |
"Fruit : ".$reponse["fruit"]."; ".
|
|
|
215 |
"Pollinisation : ".$reponse["pollinisation"]."; ".
|
|
|
216 |
"Dissémination : ".$reponse["dissemination"]."; ".
|
|
|
217 |
"Ecologie : ".$reponse["carac_ecolo"]." – ".
|
|
|
218 |
"Chorologie : ".$reponse["chorologie"]."; ".
|
|
|
219 |
"Floraison : ".$reponse["floraison"];
|
|
|
220 |
}
|
|
|
221 |
return $description;
|
|
|
222 |
}
|
|
|
223 |
|
|
|
224 |
private function consulterWebService($rest, $projet,$resssource,$parametres) {
|
|
|
225 |
$url_id = "http://www.tela-botanica.org/service:eflore:0.1/".$projet."/".$resssource.$parametres;
|
|
|
226 |
$reponse = $rest->consulter($url_id);
|
|
|
227 |
return json_decode($reponse, true);
|
|
|
228 |
}
|
|
|
229 |
|
|
|
230 |
|
|
|
231 |
private function recupererContenuFichier() {
|
|
|
232 |
$nomFichier = Config::get('dossierCsv').Config::get('projet');
|
|
|
233 |
if ($nomFichier && file_exists($nomFichier) ){
|
|
|
234 |
$extensionFichier = strtolower(strrchr($nomFichier, '.'));
|
|
|
235 |
if ($extensionFichier === ".csv"){
|
|
|
236 |
$file = new SplFileObject($nomFichier);
|
|
|
237 |
$file->setFlags(SplFileObject::SKIP_EMPTY);
|
|
|
238 |
$i = 0;
|
|
|
239 |
echo "Traitement du fichier : ";
|
|
|
240 |
while (!$file->eof()){
|
|
|
241 |
$ligne_csv = $file->fgetcsv($delimiter = ';');
|
|
|
242 |
$this->contenu_fichier[$i] = $ligne_csv;
|
|
|
243 |
echo str_repeat(chr(8), ( strlen( $i ) + 1 ))."\t".$i++;
|
|
|
244 |
}
|
|
|
245 |
echo "\n";
|
|
|
246 |
} else {
|
|
|
247 |
$this->traiterErreur("Le fichier : $nomFichier n'est pas au format csv.");
|
|
|
248 |
}
|
|
|
249 |
} else {
|
|
|
250 |
$this->traiterErreur("Le fichier : $nomFichier n'existe pas.");
|
|
|
251 |
}
|
|
|
252 |
}
|
| 853 |
delphine |
253 |
|
|
|
254 |
public function supprimerAccents($chaine) {
|
|
|
255 |
return str_replace($this->caracteresAccentues, $this->caracteresNormaux, $chaine);
|
|
|
256 |
}
|
| 705 |
delphine |
257 |
}
|
|
|
258 |
?>
|