3 /***************************************************************************\
4 * SPIP, Systeme de publication pour l'internet *
6 * Copyright (c) 2001-2011 *
7 * Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James *
9 * Ce programme est un logiciel libre distribue sous licence GNU/GPL. *
10 * Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne. *
11 \***************************************************************************/
13 if (!defined('_ECRIRE_INC_VERSION')) return;
16 function urls_liste_objets(){
17 $url_objets = pipeline('declarer_url_objets',array('article','breve','rubrique','mot','auteur','site','syndic'));
18 $url_objets = implode('|',array_map('preg_quote',$url_objets));
22 function nettoyer_url_page($url, $contexte=array())
24 $url_objets = urls_liste_objets();
25 $raccourci_url_page_html = ',^(?:[^?]*/)?('. $url_objets . ')([0-9]+)(?:\.html)?([?&].*)?$,';
26 $raccourci_url_page_id = ',^(?:[^?]*/)?('. $url_objets .')\.php3?[?]id_\1=([0-9]+)([?&].*)?$,';
27 $raccourci_url_page_spip = ',^(?:[^?]*/)?(?:spip[.]php)?[?]('. $url_objets .')([0-9]+)(&.*)?$,';
29 if (preg_match($raccourci_url_page_html, $url, $regs)
30 OR preg_match($raccourci_url_page_id, $url, $regs)
31 OR preg_match($raccourci_url_page_spip, $url, $regs)) {
32 $type = preg_replace(',s$,', '', table_objet($regs[1]));
33 if ($type == 'syndic') $type = 'site';
34 $_id = id_table_objet($regs[1]);
35 $contexte[$_id] = $regs[2];
37 return array($contexte, $type, null, $type, $suite);
42 // fonction produisant les URL d'acces en lecture ou en ecriture
43 // des items des tables SQL principales, selon le statut de publication
45 // http://doc.spip.org/@generer_url_ecrire_article
46 function generer_url_ecrire_article($id, $args='', $ancre='', $statut='', $connect='') {
47 $a = "id_article=" . intval($id);
49 $statut = sql_getfetsel('statut', 'spip_articles', $a,'','','','',$connect);
51 $h = ($statut == 'publie' OR $connect)
52 ?
generer_url_entite_absolue($id, 'article', $args, $ancre, $connect)
53 : (generer_url_ecrire('articles', $a . ($args ?
"&$args" : ''))
54 . ($ancre ?
"#$ancre" : ''));
58 // http://doc.spip.org/@generer_url_ecrire_rubrique
59 function generer_url_ecrire_rubrique($id, $args='', $ancre='', $statut='', $connect='') {
60 $a = "id_rubrique=" . intval($id);
62 $statut = sql_getfetsel('statut', 'spip_rubriques', $a,'','','','',$connect);
64 $h = ($statut == 'publie' OR $connect)
65 ?
generer_url_entite_absolue($id, 'rubrique', $args, $ancre, $connect)
66 : (generer_url_ecrire('naviguer',$a . ($args ?
"&$args" : ''))
67 . ($ancre ?
"#$ancre" : ''));
71 // http://doc.spip.org/@generer_url_ecrire_breve
72 function generer_url_ecrire_breve($id, $args='', $ancre='', $statut='', $connect='') {
73 $a = "id_breve=" . intval($id);
75 $statut = sql_getfetsel('statut', 'spip_breves', $a,'','','','',$connect);
77 $h = ($statut == 'publie' OR $connect)
78 ?
generer_url_entite_absolue($id, 'breve', $args, $ancre, $connect)
79 : (generer_url_ecrire('breves_voir',$a . ($args ?
"&$args" : ''))
80 . ($ancre ?
"#$ancre" : ''));
84 // http://doc.spip.org/@generer_url_ecrire_mot
85 function generer_url_ecrire_mot($id, $args='', $ancre='', $statut='', $connect='') {
86 $a = "id_mot=" . intval($id);
87 $h = (!$statut OR $connect)
88 ?
generer_url_entite_absolue($id, 'mot', $args, $ancre, $connect)
89 : (generer_url_ecrire('mots_edit',$a . ($args ?
"&$args" : ''))
90 . ($ancre ?
"#$ancre" : ''));
94 // http://doc.spip.org/@generer_url_ecrire_site
95 function generer_url_ecrire_site($id, $args='', $ancre='', $statut='', $connect='') {
96 $a = "id_syndic=" . intval($id);
97 $h = (!$statut OR $connect)
98 ?
generer_url_entite_absolue($id, 'site', $args, $ancre, $connect)
99 : (generer_url_ecrire('sites',$a . ($args ?
"&$args" : ''))
100 . ($ancre ?
"#$ancre" : ''));
104 // http://doc.spip.org/@generer_url_ecrire_auteur
105 function generer_url_ecrire_auteur($id, $args='', $ancre='', $statut='', $connect='') {
106 $a = "id_auteur=" . intval($id);
107 $h = (!$statut OR $connect)
108 ?
generer_url_entite_absolue($id, 'auteur', $args, $ancre, $connect)
109 : (generer_url_ecrire('auteur_infos',$a . ($args ?
"&$args" : ''))
110 . ($ancre ?
"#$ancre" : ''));
114 // http://doc.spip.org/@generer_url_ecrire_forum
115 function generer_url_ecrire_forum($id, $args='', $ancre='', $statut='', $connect='') {
116 $a = "id_forum=" . intval($id);
118 $statut = sql_getfetsel('statut', 'spip_forum', $a,'','','','',$connect);
120 $h = ($statut == 'publie' OR $connect)
121 ?
generer_url_entite_absolue($id, 'forum', $args, $ancre, $connect)
122 : (generer_url_ecrire('controle_forum', "debut_id_forum=$id" . ($args ?
"&$args" : ''))
123 . ($ancre ?
"#$ancre" : ''));
127 // http://doc.spip.org/@generer_url_ecrire_document
128 function generer_url_ecrire_document($id, $args='', $ancre='', $statut='', $connect='') {
129 include_spip('inc/documents');
130 return generer_url_document_dist($id);
133 // http://doc.spip.org/@generer_url_ecrire_statistiques
134 function generer_url_ecrire_statistiques($id_article) {
135 return generer_url_ecrire('statistiques_visites', "id_article=$id_article");