50 |
aurelien |
1 |
<?php
|
|
|
2 |
// declare(encoding='UTF-8');
|
|
|
3 |
/**
|
|
|
4 |
*
|
|
|
5 |
* @category wiki/smart'Flore
|
|
|
6 |
* @package Scripts
|
|
|
7 |
* @author Aurelien PERONNET <aurelien@tela-botanica.org>
|
|
|
8 |
* @license GPL v3 <http://www.gnu.org/licenses/gpl.txt>
|
|
|
9 |
* @license CECILL v2 <http://www.cecill.info/licences/Licence_CeCILL_V2-en.txt>
|
|
|
10 |
* @copyright 1999-2015 Tela Botanica <accueil@tela-botanica.org>
|
|
|
11 |
*/
|
|
|
12 |
|
|
|
13 |
class MigrationSmartFlore extends Script {
|
|
|
14 |
|
|
|
15 |
protected $mode_verbeux = false;
|
|
|
16 |
|
|
|
17 |
public function executer() {
|
|
|
18 |
$cmd = $this->getParametre('a');
|
|
|
19 |
$this->mode_verbeux = $this->getParametre('v');
|
|
|
20 |
|
|
|
21 |
switch($cmd) {
|
64 |
aurelien |
22 |
case 'migrerFormatSmartFlore' :
|
50 |
aurelien |
23 |
$this->migrerFormatSmartFlore();
|
|
|
24 |
break;
|
|
|
25 |
|
73 |
mathias |
26 |
case 'migrerSentiersSmartFlore' :
|
|
|
27 |
$this->migrerSentiersSmartFlore();
|
64 |
aurelien |
28 |
break;
|
|
|
29 |
|
50 |
aurelien |
30 |
default:
|
|
|
31 |
}
|
|
|
32 |
}
|
|
|
33 |
|
64 |
aurelien |
34 |
protected function migrerSentiersSmartFlore() {
|
73 |
mathias |
35 |
$this->wiki = Registre::get('wikiApi');
|
|
|
36 |
$requete = 'SELECT * FROM '.$this->wiki->GetConfigValue('table_prefix').'pages WHERE latest = "Y" '.
|
64 |
aurelien |
37 |
'AND tag = "AccesProjet" ';
|
73 |
mathias |
38 |
|
64 |
aurelien |
39 |
$page_sentiers = $this->wiki->LoadSingle($requete);
|
67 |
aurelien |
40 |
// Attention les wiki sont en iso Argh%#[{!?
|
73 |
mathias |
41 |
// Il faut convertir car sinon certains sentiers ne matcheront pas à leur propriétaire
|
67 |
aurelien |
42 |
$page_sentiers['body'] = mb_convert_encoding($page_sentiers['body'], Config::get('encodage_appli'), Config::get('encodage_wiki'));
|
|
|
43 |
preg_match_all("|\[\[([^\]\]]*)\]\]|", $page_sentiers['body'], $sentiers, PREG_PATTERN_ORDER);
|
64 |
aurelien |
44 |
|
67 |
aurelien |
45 |
// Seule une partie du tableau contenant les noms des sentiers nous interesse
|
64 |
aurelien |
46 |
$sentiers = $sentiers[1];
|
73 |
mathias |
47 |
|
64 |
aurelien |
48 |
echo "Nombre de sentiers à migrer : ".count($sentiers)."\n";
|
|
|
49 |
|
|
|
50 |
$valeurs_sentiers_a_inserer = array();
|
|
|
51 |
|
|
|
52 |
$proprietaires_sentiers = array();
|
|
|
53 |
// Chargement du fichier contenant les propriétaires à associer aux sentiers
|
73 |
mathias |
54 |
$fichier = file(realpath(dirname(__FILE__)).'/proprietaires_sentiers.csv');
|
64 |
aurelien |
55 |
|
|
|
56 |
foreach ($fichier as $ligne) {
|
|
|
57 |
$data = str_getcsv($ligne);
|
67 |
aurelien |
58 |
if($data[2] != "") {
|
73 |
mathias |
59 |
// on associe un titre de sentier à un email (la clé est le titre de sentier)
|
64 |
aurelien |
60 |
$proprietaires_sentiers[trim($data[0])] = trim($data[2]);
|
|
|
61 |
}
|
|
|
62 |
}
|
|
|
63 |
|
|
|
64 |
$courriel_proprietaires = array_values(array_unique($proprietaires_sentiers));
|
67 |
aurelien |
65 |
// Chargement des infos des utilisateurs pour obtenirs leurs nomWikis associés
|
64 |
aurelien |
66 |
$url_infos_courriels = Config::get('annuaire_infos_courriels_url').implode(',', $courriel_proprietaires);
|
|
|
67 |
$infos_proprietaires = json_decode(file_get_contents($url_infos_courriels), true);
|
|
|
68 |
|
|
|
69 |
$infos_proprietaires_a_sentier = array();
|
|
|
70 |
|
|
|
71 |
foreach($proprietaires_sentiers as $nom_sentier => $proprietaire_sentier) {
|
|
|
72 |
if(isset($infos_proprietaires[$proprietaire_sentier])) {
|
|
|
73 |
$infos_proprietaires_a_sentier[$nom_sentier] = $infos_proprietaires[$proprietaire_sentier]['nomWiki'];
|
|
|
74 |
} else {
|
|
|
75 |
// les sentiers sans propriétaires sont affectés au compte accueil
|
|
|
76 |
$infos_proprietaires_a_sentier[$nom_sentier] = "AssociationTelaBotanica";
|
|
|
77 |
}
|
|
|
78 |
}
|
|
|
79 |
|
|
|
80 |
$requete_insertion = 'INSERT INTO '.$this->wiki->GetConfigValue('table_prefix').'triples '.
|
|
|
81 |
'(resource, property, value) VALUES ';
|
|
|
82 |
|
|
|
83 |
foreach($sentiers as $sentier) {
|
73 |
mathias |
84 |
|
|
|
85 |
list($tag, $titre) = explode(' ', $sentier, 2);
|
|
|
86 |
$titre = trim($titre);
|
|
|
87 |
// Reconversion dans l'encodage du wiki pour l'insertion
|
67 |
aurelien |
88 |
$titre_encode_wiki = mb_convert_encoding($titre, Config::get('encodage_wiki'), Config::get('encodage_appli'));
|
64 |
aurelien |
89 |
|
73 |
mathias |
90 |
$requete = 'SELECT * FROM '.$this->wiki->GetConfigValue('table_prefix').'pages WHERE latest = "Y" '.
|
|
|
91 |
'AND tag = "'.$tag.'" ';
|
|
|
92 |
|
64 |
aurelien |
93 |
$infos_sentier = $this->wiki->LoadSingle($requete);
|
67 |
aurelien |
94 |
|
64 |
aurelien |
95 |
$proprietaire = !empty($infos_proprietaires_a_sentier[$titre]) ? $infos_proprietaires_a_sentier[$titre] : "AssociationTelaBotanica";
|
67 |
aurelien |
96 |
$valeurs_sentiers_a_inserer[] = "('".addslashes(trim($titre_encode_wiki))."', 'smartFlore.sentiers', '".$proprietaire."')";
|
64 |
aurelien |
97 |
|
67 |
aurelien |
98 |
// Recherche de toutes les fiches contenues dans le sentier (normalement sous forme de liens vers des fiches de type
|
|
|
99 |
// SmartFloreYYYntZZZ où YYY est un code de référentiel et ZZZ un numéro taxonomique)
|
64 |
aurelien |
100 |
preg_match_all("|\[\[(SmartFlore[^(?:nt)]*nt[0-9]*)|", $infos_sentier['body'], $fiches_du_sentier, PREG_PATTERN_ORDER);
|
|
|
101 |
|
|
|
102 |
if(!empty($fiches_du_sentier[0])) {
|
67 |
aurelien |
103 |
foreach($fiches_du_sentier[1] as $fiche_du_sentier) {
|
|
|
104 |
$valeurs_fiches_a_associer[] = "('".$fiche_du_sentier."', 'smartFlore.sentiers.fiche', '".addslashes(trim($titre_encode_wiki))."')";
|
64 |
aurelien |
105 |
}
|
|
|
106 |
}
|
|
|
107 |
}
|
|
|
108 |
|
73 |
mathias |
109 |
$valeurs_a_inserer = array_merge($valeurs_sentiers_a_inserer, $valeurs_fiches_a_associer);
|
64 |
aurelien |
110 |
$requete_insertion .= implode(', '."\n", $valeurs_a_inserer);
|
|
|
111 |
// Tout est contenu dans la table triple du wiki, donc une seule requête suffit pour tout insérer
|
|
|
112 |
$this->wiki->Query($requete_insertion);
|
|
|
113 |
|
|
|
114 |
echo 'Migration des sentiers effectuée'."\n";
|
|
|
115 |
exit;
|
|
|
116 |
}
|
|
|
117 |
|
50 |
aurelien |
118 |
protected function migrerFormatSmartFlore() {
|
|
|
119 |
|
62 |
mathias |
120 |
// sections "souples" - attention, ne seront pas "quotées" mais interprétées comme morceaux de regexp directement !
|
|
|
121 |
$sections = array("Fiche simplifi.+e Smart.+flore", "Introduction","Comment la reconna.+tre.+","Son histoire","Ses usages",".+(?:cologie|habitat).+","Ce qu.+il faut savoir.+","Sources");
|
73 |
mathias |
122 |
$nouvelles_sections = array(
|
64 |
aurelien |
123 |
"Description" => array("Introduction","Comment la reconna.+tre.+","Son histoire"),
|
|
|
124 |
"Usages" => array("Ses usages", "Ce qu.+il faut savoir.+"),
|
62 |
mathias |
125 |
"Écologie & habitat" => array(".+(?:cologie|habitat).+"), // groupe non-capturant avec (?:a|b)
|
64 |
aurelien |
126 |
"Sources" => array("Sources")
|
50 |
aurelien |
127 |
);
|
|
|
128 |
|
|
|
129 |
$where_section = 'body NOT LIKE "';
|
|
|
130 |
$nouvelles_sections_k = array_keys($nouvelles_sections);
|
|
|
131 |
foreach($nouvelles_sections_k as $nouvelle_section_k) {
|
|
|
132 |
// Encore et toujours de l'iso (d'ailleurs si on ne fait pas de conversion la requete se comporte
|
|
|
133 |
// très bizarrement et renvoie des résultats en trop une fois le script déjà exécuté)
|
|
|
134 |
$where_section .= '%'.addslashes(ManipulationPage::convertirTexteAppliVersEncodageWiki($nouvelle_section_k)).'%';
|
|
|
135 |
}
|
|
|
136 |
$where_section = $where_section.'"';
|
|
|
137 |
|
|
|
138 |
$this->wiki = Registre::get('wikiApi');
|
|
|
139 |
$requete = 'SELECT * FROM '.$this->wiki->GetConfigValue('table_prefix').'pages WHERE latest = "Y" '.
|
|
|
140 |
'AND tag LIKE "SmartFlore%nt%" '.
|
|
|
141 |
'AND '.$where_section;
|
|
|
142 |
|
|
|
143 |
$pages = $this->wiki->LoadAll($requete);
|
|
|
144 |
$pages_fmt = array();
|
|
|
145 |
echo "Nombre de pages à migrer : ".count($pages)."\n";
|
|
|
146 |
|
|
|
147 |
if(!empty($pages)) {
|
|
|
148 |
$manipulation = new ManipulationPage($this->wiki, $pages[0]);
|
|
|
149 |
echo "Migration en cours... \n";
|
|
|
150 |
|
|
|
151 |
foreach($pages as &$page) {
|
|
|
152 |
|
|
|
153 |
$page_fmt = array();
|
|
|
154 |
|
|
|
155 |
// On capte l'entête de la page situé avant la première section pour le recopier
|
|
|
156 |
// dans les nouvelles pages (il contient les backlinks et les noms)
|
|
|
157 |
$delim_entete = strpos($page["body"], "==== Introduction ====");
|
|
|
158 |
if($delim_entete === false) {
|
|
|
159 |
$delim_entete = strpos($page["body"], "====Introduction====");
|
|
|
160 |
}
|
|
|
161 |
// Attention l'entete est en iso, il faut le convertir manuellement
|
|
|
162 |
$entete = $manipulation->convertirTexteWikiVersEncodageAppli(substr($page["body"], 0, $delim_entete));
|
|
|
163 |
|
|
|
164 |
// Par contre ici consulterPageSectionsFormatees est gentil et fait la conversion vers l'encodage de l'appli pour nous
|
|
|
165 |
$manipulation->consulterPageSectionsFormatees($page, implode(',', $sections));
|
|
|
166 |
|
|
|
167 |
// Fusion des anciennes sections dans les nouvelles
|
|
|
168 |
foreach($nouvelles_sections as $nom_nouvelle_section => $sections_a_fusionner) {
|
|
|
169 |
$page_fmt[$nom_nouvelle_section] = '===='.$nom_nouvelle_section.'====';
|
|
|
170 |
foreach($sections_a_fusionner as $section_a_fusionner) {
|
|
|
171 |
if(isset($page['sections'][$section_a_fusionner])) {
|
|
|
172 |
$page_fmt[$nom_nouvelle_section] .= $page['sections'][$section_a_fusionner];
|
|
|
173 |
}
|
|
|
174 |
}
|
|
|
175 |
}
|
|
|
176 |
|
|
|
177 |
$corps = $entete."\n".implode("\n", $page_fmt);
|
|
|
178 |
$manipulation->ecrirePage($page["tag"], $corps);
|
|
|
179 |
}
|
|
|
180 |
}
|
|
|
181 |
echo "Migration effectuée \n";
|
|
|
182 |
// Le exit est là pour empecher l'affichage d'être pollué par les erreurs
|
|
|
183 |
// dûes à certaines antédiluviennités de wikini
|
|
|
184 |
exit;
|
|
|
185 |
}
|
|
|
186 |
|
|
|
187 |
// http://stackoverflow.com/questions/834303/startswith-and-endswith-functions-in-php
|
73 |
mathias |
188 |
protected function endsWith($haystack, $needle) {
|
|
|
189 |
// search forward starting from end minus needle length characters
|
|
|
190 |
return $needle === "" || (($temp = strlen($haystack) - strlen($needle)) >= 0 && strpos($haystack, $needle, $temp) !== FALSE);
|
50 |
aurelien |
191 |
}
|
|
|
192 |
}
|