ecrire/action/redirect.php

   1 <?php
   2
   3 /***************************************************************************\
   4  *  SPIP, Systeme de publication pour l'internet                           *
   5  *                                                                         *
   6  *  Copyright (c) 2001-2007                                                *
   7  *  Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James  *
   8  *                                                                         *
   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 \***************************************************************************/
  12
  13 // pour rediriger vers l'URL canonique de l'article,
  14 // en indiquant recalcul et previsu
  15
  16 if (!defined("_ECRIRE_INC_VERSION")) return;
  17
  18 charger_generer_url();
  19
  20 // http://doc.spip.org/@action_redirect_dist
  21 function action_redirect_dist()
  22 {
  23   global $id_article, $id_auteur, $id_breve, $id_forum, $id_mot, $id_rubrique, $id_site, $id_syndic, $var_mode;
  24
  25
  26   if ($id_article = intval($id_article)) {
  27         $url = generer_url_article($id_article);
  28 }
  29   else if ($id_breve = intval($id_breve)) {
  30         $url = generer_url_breve($id_breve);
  31 }
  32   else if ($id_forum = intval($id_forum)) {
  33         $url = generer_url_forum($id_forum);
  34 }
  35   else if ($id_rubrique = intval($id_rubrique)) {
  36         $url = generer_url_rubrique($id_rubrique);
  37 }
  38   else if ($id_mot = intval($id_mot)) {
  39         $url = generer_url_mot($id_mot);
  40 }
  41   else if ($id_auteur = intval($id_auteur)) {
  42         $url = generer_url_auteur($id_auteur);
  43 }
  44   else if ($id_syndic = intval($id_syndic) OR $id_syndic = intval($id_site)) {
  45         $url = generer_url_site($id_syndic);
  46 }
  47 else {
  48         $url = _DIR_RESTREINT_ABS;
  49 }
  50
  51 // Ne pas masquer cette eventuelle erreur (aide a detecter des lignes vides
  52 // dans inc-urls ou mes_fonctions/mes_options)
  53  header("Location: " . (!$var_mode ?  $url : ($url . (strpos($url,'?') ? '&' : '?') ."var_mode=" . $var_mode)));
  54 }
  55
  56
  57 ?>