Variante172ContribLa

<?php

/***************************************************************************
 *  SPIP, Systeme de publication pour l'internet                           *
 *                                                                         *
 *  Copyright (c)      2005                                                *
 *  balluche.free.fr                                                       *
 *                                                                         *
 *  URL rewriting même si non géré par apache (serveur free par ex.)       *
 *                                                                         *
 *                                                                         *
 *  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.   *
***************************************************************************/


// executer une seule fois
if (defined("_INC_BALLUCHE")) return;
define("_INC_BALLUCHE", "1");

/*

- Comment utiliser ce jeu d'URLs ?

Déplacez le fichier index.php et inc-urls-balluche.php3 à la racine de votre de site

Definissez ensuite dans ecrire/mes_options.php3 :
	type_urls = 'balluche';
SPIP calculera alors ses liens sous la forme "/?no_article/Mon-titre-d-article".

*/

function _generer_url_propre($type, $id_objet) {
	$table = "spip_".$type."s";
	$col_id = "id_".$type;

	// D'abord, essayer de recuperer l'URL existante si possible
	$query = "SELECT url_propre, titre FROM $table WHERE $col_id=$id_objet";
	if ($result = spip_query($query))
	{
		if (!($row = spip_fetch_array($result))) return "";
	}

	// Sinon, creer l'URL
	include_ecrire("inc_filtres.php3");
	include_ecrire("inc_charsets.php3");
	$url = translitteration(corriger_caracteres(supprimer_tags(supprimer_numero($row['titre']))));
	$url = @preg_replace(',[[:punct:][:space:]]+,u', ' ', $url);

	// Verifier les eventuels doublons et mettre a jour
	$query = "SELECT $col_id FROM $table WHERE url_propre='".addslashes($url)."'";
	if ($result = spip_query($query))
	{
		if (spip_num_rows($result) > 0) {
			$url = $url.','.$id_objet;
		}
		$query = "UPDATE $table SET url_propre='".addslashes($url)."' WHERE $col_id=$id_objet";
		spip_query($query);
	}

	return $url;
}

function generer_url_article($id_article) {
	$url = _generer_url_propre('article', $id_article);
	if ($url)
		return lire_meta("adresse_site") . "?$id_article/$url";
	else
		return "article.php3?id_article=$id_article";
}

function generer_url_rubrique($id_rubrique) {
	$url = _generer_url_propre('rubrique', $id_rubrique);
	if ($url)
		return lire_meta("adresse_site") . "?$id_rubrique/-$url-";
	else
		return "rubrique.php3?id_rubrique=$id_rubrique";
}

function generer_url_breve($id_breve) {
	$url = _generer_url_propre('breve', $id_breve);
	if ($url)
		return lire_meta("adresse_site") . "?$id_breve/+$url+";
	else
		return "breve.php3?id_breve=$id_breve";
}

function generer_url_forum($id_forum) {
	return "forum.php3?id_forum=$id_forum";
}

function generer_url_mot($id_mot) {
	$url = _generer_url_propre('mot', $id_mot);
	if ($url)
		return lire_meta("adresse_site") . "?$id_mot/+-$url-+";
	else
		return "mot.php3?id_mot=$id_mot";
}

function generer_url_auteur($id_auteur) {
	$url = _generer_url_propre('auteur', $id_auteur);
	if ($url)
		return lire_meta("adresse_site") . "?$id_auteur/_${url}_";
	else
		return "auteur.php3?id_auteur=$id_auteur";
}

function generer_url_document($id_document) {
	if ($id_document > 0) {
		$query = "SELECT fichier FROM spip_documents WHERE id_document = $id_document";
		$result = spip_query($query);
		if ($row = spip_fetch_array($result)) {
			$url = $row['fichier'];
		}
	}
	return $url;
}

function recuperer_parametres_url($fond, $url) {
	global $contexte;

	// Migration depuis anciennes URLs ?
	if ($GLOBALS['HTTP_SERVER_VARS']['REQUEST_METHOD'] != 'POST' &&
		preg_match(',(^|/)(article|breve|rubrique|mot).php3?([?&].*)?$,', $url, $regs)) {
		$type = $regs[2];
		$id_objet = intval($GLOBALS['id_'.$type]);
		if ($id_objet) {
			$func = "generer_url_$type";
			$url_propre = $func($id_objet);
			if ($url_propre) {
				http_status(301);
				// recuperer les arguments supplementaires (&debut_xxx=...)
				$reste = preg_replace('/^&/','?', preg_replace("/[?&]id_$type=$id_objet/",'',$regs[5]));
				Header("Location: $url_propre$reste");
				exit;
			}
		}
		return;
	}
}
?>