'-', 'rubrique2' => '-', 'breve1' => '+', 'breve2' => '+', 'site1' => '@', 'site2' => '@', 'auteur1' => '_', 'auteur2' => '_', 'mot1' => '+-', 'mot2' => '-+'))); // Retire les marqueurs de type dans une URL propre ancienne maniere // http://doc.spip.org/@retirer_marqueurs_url_propre function retirer_marqueurs_url_propre($url_propre) { if (preg_match(',^[+][-](.*?)[-][+]$,', $url_propre, $regs)) { return $regs[1]; } else if (preg_match(',^([-+_@])(.*?)\1?$,', $url_propre, $regs)) { return $regs[2]; } // les articles n'ont pas de marqueur return $url_propre; } // Pipeline pour creation d'une adresse : il recoit l'url propose par le // precedent, un tableau indiquant le titre de l'objet, son type, son id, // et doit donner en retour une chaine d'url, sans se soucier de la // duplication eventuelle, qui sera geree apres // http://doc.spip.org/@creer_chaine_url function urls_propres_creer_chaine_url($x) { // NB: ici url_old ne sert pas, mais un plugin qui ajouterait une date // pourrait l'utiliser pour juste ajouter la $url_old = $x['data']; $objet = $x['objet']; include_spip('inc/filtres'); if (!defined('_URLS_PROPRES_MAX')) define('_URLS_PROPRES_MAX', 35); if (!defined('_URLS_PROPRES_MIN')) define('_URLS_PROPRES_MIN', 3); include_spip('action/editer_url'); if (!$url = url_nettoyer($objet['titre'],_URLS_PROPRES_MAX,_URLS_PROPRES_MIN,'-',_url_minuscules?'strtolower':'')) $url = $objet['type'].$objet['id_objet']; $x['data'] = $url; return $x; } // Trouver l'URL associee a la n-ieme cle primaire d'une table SQL // http://doc.spip.org/@declarer_url_propre function declarer_url_propre($type, $id_objet) { $trouver_table = charger_fonction('trouver_table', 'base'); $desc = $trouver_table(table_objet($type)); $champ_titre = $desc['titre']; $col_id = @$desc['key']["PRIMARY KEY"]; // $type doit designer une table, avec champ indiquant un titre if (!$col_id OR !$champ_titre) return false; $table = $desc['table']; $id_objet = intval($id_objet); // Recuperer une URL propre correspondant a l'objet. $row = sql_fetsel("U.url, U.date, O.$champ_titre", "$table AS O LEFT JOIN spip_urls AS U ON (U.type='$type' AND U.id_objet=O.$col_id)", "O.$col_id=$id_objet", '', 'U.date DESC', 1); if (!$row) return ""; # Quand $id_objet n'est pas un numero connu $url_propre = $row['url']; // Se contenter de cette URL si elle existe ; // sauf si on invoque par "voir en ligne" avec droit de modifier l'url // l'autorisation est verifiee apres avoir calcule la nouvelle url propre // car si elle ne change pas, cela ne sert a rien de verifier les autorisations // qui requetent en base $modifier_url = $GLOBALS['var_urls']; if ($url_propre AND !$modifier_url) return $url_propre; // Sinon, creer une URL $url = pipeline('propres_creer_chaine_url', array( 'data' => $url_propre, // le vieux url_propre 'objet' => array_merge($row, array('type' => $type, 'id_objet' => $id_objet) ) ) ); // Eviter de tamponner les URLs a l'ancienne (cas d'un article // intitule "auteur2") include_spip('inc/urls'); $objets = urls_liste_objets(); if (preg_match(',^('.$objets.')[0-9]+$,', $url, $r) AND $r[1] != $type) $url = $url._url_propres_sep_id.$id_objet; // Pas de changement d'url if ($url == $url_propre) return $url_propre; // verifier l'autorisation, maintenant qu'on est sur qu'on va agir if ($modifier_url) { include_spip('inc/autoriser'); $modifier_url = autoriser('modifierurl', $type, $id_objet); } // Verifier si l'utilisateur veut effectivement changer l'URL if ($modifier_url AND CONFIRMER_MODIFIER_URL AND $url_propre AND $url != preg_replace('/,.*/', '', $url_propre)) $confirmer = true; else $confirmer = false; if ($confirmer AND !_request('ok')) { die ("vous changez d'url ? $url_propre -> $url"); } $set = array('url' => $url, 'type' => $type, 'id_objet' => $id_objet); include_spip('action/editer_url'); if (!url_insert($set,$confirmer,_url_propres_sep_id)) return $url_propre; //serveur out ? retourner au mieux return $set['url']; } // http://doc.spip.org/@_generer_url_propre function _generer_url_propre($type, $id, $args='', $ancre='') { if ($generer_url_externe = charger_fonction("generer_url_$type",'urls',true)) { $url = $generer_url_externe($id, $args, $ancre); if (NULL != $url) return $url; } if ($type == 'document') { include_spip('inc/documents'); return generer_url_document_dist($id, $args, $ancre); } // Mode compatibilite pour conserver la distinction -Rubrique- if (_MARQUEUR_URL) { $marqueur = unserialize(_MARQUEUR_URL); $marqueur1 = $marqueur[$type.'1']; // debut '+-' $marqueur2 = $marqueur[$type.'2']; // fin '-+' } else $marqueur1 = $marqueur2 = ''; // fin // Mode propre $propre = declarer_url_propre($type, $id); if ($propre === false) return ''; // objet inconnu. raccourci ? if ($propre) { $url = _debut_urls_propres . $marqueur1 . $propre . $marqueur2 . _terminaison_urls_propres; // Repositionne l'URL par rapport a la racine du site (#GLOBALS) $url = str_repeat('../', $GLOBALS['profondeur_url']).$url; } else { // objet connu mais sans possibilite d'URL lisible, revenir au defaut include_spip('base/connect_sql'); $id_type = id_table_objet($type); $url = _DIR_RACINE . get_spip_script('./')."?"._SPIP_PAGE."=$type&$id_type=$id"; } // Ajouter les args if ($args) $url .= ((strpos($url, '?')===false) ? '?' : '&') . $args; // Ajouter l'ancre if ($ancre) $url .= "#$ancre"; return $url; } // retrouve le fond et les parametres d'une URL propre // ou produit une URL propre si on donne un parametre // @return array([contexte],[type],[url_redirect],[fond]) : url decodee // http://doc.spip.org/@urls_propres_dist function urls_propres_dist($i, $entite, $args='', $ancre='') { if (is_numeric($i)) return _generer_url_propre($entite, $i, $args, $ancre); $url = $i; $id_objet = $type = 0; $url_redirect = null; // recuperer les &debut_xx; if (is_array($args)) $contexte = $args; else parse_str($args,$contexte); // Migration depuis anciennes URLs ? // traiter les injections domain.tld/spip.php/n/importe/quoi/rubrique23 if ($GLOBALS['profondeur_url']<=0 AND $_SERVER['REQUEST_METHOD'] != 'POST') { include_spip('inc/urls'); $r = nettoyer_url_page($i, $contexte); if ($r) { list($contexte, $type,,, $suite) = $r; $_id = id_table_objet($type); $id_objet = $contexte[$_id]; $url_propre = generer_url_entite($id_objet, $type); if (strlen($url_propre) AND !strstr($url,$url_propre)) { list(,$hash) = explode('#', $url_propre); $args = array(); foreach(array_filter(explode('&', $suite)) as $fragment) { if ($fragment != "$_id=$id_objet") $args[] = $fragment; } $url_redirect = generer_url_entite($id_objet, $type, join('&',array_filter($args)), $hash); return array($contexte, $type, $url_redirect, $type); } } } /* Fin compatibilite anciennes urls */ // Chercher les valeurs d'environnement qui indiquent l'url-propre if (isset($_SERVER['REDIRECT_url_propre'])) $url_propre = $_SERVER['REDIRECT_url_propre']; elseif (isset($_ENV['url_propre'])) $url_propre = $_ENV['url_propre']; else { // ne prendre que le segment d'url qui correspond, en fonction de la profondeur calculee $url = ltrim($url,'/'); $url = explode('/',$url); while (count($url)>$GLOBALS['profondeur_url']+1) array_shift($url); $url = implode('/',$url); $url_propre = preg_replace(',[?].*,', '', $url); } // Mode Query-String ? $is_qs = false; if (!$url_propre AND preg_match(',[?]([^=/?&]+)(&.*)?$,', $url, $r)) { $url_propre = $r[1]; $is_qs = true; } if (!$url_propre) return; // qu'est-ce qu'il veut ??? // gerer le cas de retour depuis des urls arbos // mais si url arbo ne trouve pas, on veut une 404 par securite if ($GLOBALS['profondeur_url']>0){ $urls_anciennes = charger_fonction('arbo','urls'); return $urls_anciennes($url_propre, $entite, $contexte); } include_spip('base/abstract_sql'); // chercher dans la table des URLS // Compatibilite avec propres2 $url_propre = preg_replace(',\.html$,i', '', $url_propre); // Revenir en utf-8 si encodage type %D8%A7 (farsi) $url_propre = rawurldecode($url_propre); // Compatibilite avec les anciens marqueurs d'URL propres // Tester l'entree telle quelle (avec 'url_libre' des sites ont pu avoir des entrees avec marqueurs dans la table spip_urls) if (!$row = sql_fetsel('id_objet, type, date', 'spip_urls', 'url='.sql_quote($url_propre))) { // Sinon enlever les marqueurs eventuels $url_propre2 = retirer_marqueurs_url_propre($url_propre); $row = sql_fetsel('id_objet, type, date', 'spip_urls', 'url='.sql_quote($url_propre2)); } if ($row) { $type = $row['type']; $col_id = id_table_objet($type); $contexte[$col_id] = $row['id_objet']; $entite = $row['type']; // Si l'url est vieux, donner le nouveau if ($recent = sql_fetsel('url, date', 'spip_urls', 'type='.sql_quote($row['type']).' AND id_objet='.sql_quote($row['id_objet']) .' AND date>'.sql_quote($row['date']), '', 'date DESC', 1)) { // Mode compatibilite pour conserver la distinction -Rubrique- if (_MARQUEUR_URL) { $marqueur = unserialize(_MARQUEUR_URL); $marqueur1 = $marqueur[$type.'1']; // debut '+-' $marqueur2 = $marqueur[$type.'2']; // fin '-+' } else $marqueur1 = $marqueur2 = ''; $url_redirect = $marqueur1 . $recent['url'] . $marqueur2; } } if ($entite=='' OR $entite=='type_urls' /* compat .htaccess 2.0 */) { if ($type) { $entite = ($type == 'syndic') ? 'site' : $type; } else { // Si ca ressemble a une URL d'objet, ce n'est pas la home // et on provoque un 404 if (preg_match(',^.*/[^\.]+(\.html)?$,', $url)) { $entite = '404'; $contexte['erreur'] = ''; // l'url n'existe pas... // on ne sait plus dire de quel type d'objet il s'agit // sauf si on a le marqueur. et la c'est un peu sale... if (_MARQUEUR_URL) { $fmarqueur = @array_flip(unserialize(_MARQUEUR_URL)); preg_match(',^([+][-]|[-+@_]),', $url_propre, $regs); $objet = $regs ? substr($fmarqueur[$regs[1]],0,n-1) : 'article'; $contexte['erreur'] = _T( ($objet=='rubrique' OR $objet=='breve') ? 'public:aucune_'.$objet : 'public:aucun_'.$objet ); } } } } return array($contexte, $entite, $url_redirect, $is_qs?$entite:null); } ?>