[SPIP] +installation version 3.0.10
[lhc/web/www.git] / www / plugins-dist / urls_etendues / urls_administrations.php
diff --git a/www/plugins-dist/urls_etendues/urls_administrations.php b/www/plugins-dist/urls_etendues/urls_administrations.php
new file mode 100644 (file)
index 0000000..c58086b
--- /dev/null
@@ -0,0 +1,108 @@
+<?php
+
+/***************************************************************************\
+ *  SPIP, Systeme de publication pour l'internet                           *
+ *                                                                         *
+ *  Copyright (c) 2001-2013                                                *
+ *  Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James  *
+ *                                                                         *
+ *  Ce programme est un logiciel libre distribue sous licence GNU/GPL.     *
+ *  Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne.   *
+\***************************************************************************/
+
+if (!defined('_ECRIRE_INC_VERSION')) return;
+
+/**
+ * Installation/maj des tables urls
+ *
+ * @param string $nom_meta_base_version
+ * @param string $version_cible
+ */
+function urls_upgrade($nom_meta_base_version,$version_cible){
+       // cas particulier :
+       // si plugin pas installe mais que la table existe
+       // considerer que c'est un upgrade depuis v 1.0.0
+       // pour gerer l'historique des installations SPIP <=2.1
+       if (!isset($GLOBALS['meta'][$nom_meta_base_version])){
+               $trouver_table = charger_fonction('trouver_table','base');
+               if ($desc = $trouver_table('spip_urls')
+                 AND isset($desc['exist'])){
+                       ecrire_meta($nom_meta_base_version,'1.0.0');
+               }
+               // si pas de table en base, on fera une simple creation de base
+       }
+
+       $maj = array();
+       $maj['create'] = array(
+               array('maj_tables',array('spip_urls')),
+       );
+       $maj['1.1.0'] = array(
+               array('sql_alter',"table spip_urls ADD id_parent bigint(21) DEFAULT '0' NOT NULL"),
+               array('sql_alter',"table spip_urls DROP PRIMARY KEY"),
+               array('sql_alter',"table spip_urls ADD PRIMARY KEY (id_parent, url)"),
+       );
+       $maj['1.1.1'] = array(
+               array('urls_migre_arbo_prefixes'),
+       );
+
+       $maj['1.1.2'] = array(
+               array('sql_alter',"table spip_urls ADD segments SMALLINT(3) DEFAULT '1' NOT NULL"),
+               array('urls_migre_urls_segments'),
+       );
+       $maj['1.1.3'] = array(
+               array('sql_alter',"table spip_urls ADD perma TINYINT(1) DEFAULT '0' NOT NULL"),
+       );
+
+       include_spip('base/upgrade');
+       maj_plugin($nom_meta_base_version, $version_cible, $maj);
+}
+
+function urls_migre_arbo_prefixes(){
+       $res = sql_select('*','spip_urls',"url REGEXP '\d+:\/\/'");
+       while($row = sql_fetch($res)){
+               $url = explode("://",$row['url']);
+               $set = array('id_parent'=>intval(reset($url)),'url'=>end($url));
+               if (!sql_updateq('spip_urls',$set,"id_parent=".intval($row['id_parent'])." AND url=".sql_quote($row['url']))){
+                       if ($set['id_parent']==0
+                         AND sql_countsel('spip_urls',"id_parent=".intval($set['id_parent'])." AND url=".sql_quote($set['url'])." AND type=".sql_quote($row['type'])." AND id_objet=".sql_quote($row['id_objet']))){
+                               spip_log('suppression url doublon '.var_export($row,1),'urls.'._LOG_INFO_IMPORTANTE);
+                               sql_delete('spip_urls',"id_parent=".intval($row['id_parent'])." AND url=".sql_quote($row['url']));
+                       }
+                       else {
+                               spip_log('Impossible de convertir url doublon '.var_export($row,1),'urls.'._LOG_ERREUR);
+                               echo "Impossible de convertir l'url ".$row['url'].". Verifiez manuellement dans spip_urls";
+                       }
+               }
+               if (time() >= _TIME_OUT){
+                       sql_free($res);
+                       return;
+               }
+       }
+}
+
+function urls_migre_urls_segments(){
+       sql_updateq('spip_urls',array('segments'=>1),"segments<1 OR NOT(url REGEXP '\/')");
+       $res = sql_select('DISTINCT url','spip_urls',"url REGEXP '\/' AND segments=1");
+       while($row = sql_fetch($res)){
+               $segments = count(explode('/',$row['url']));
+               sql_updateq('spip_urls',array('segments'=>$segments),"url=".sql_quote($row['url']));
+               if (time() >= _TIME_OUT){
+                       sql_free($res);
+                       return;
+               }
+       }
+}
+
+/**
+ * Desinstallation/suppression des tables urls
+ *
+ * @param string $nom_meta_base_version
+ */
+function urls_vider_tables($nom_meta_base_version) {
+       // repasser dans les urls par defaut
+       ecrire_meta('type_urls','page');
+       sql_drop_table("spip_urls");
+       effacer_meta($nom_meta_base_version);
+}
+
+?>
\ No newline at end of file