www/ecrire/action/redirect.php

   1 <?php
   2
   3 /***************************************************************************\
   4  *  SPIP, Systeme de publication pour l'internet                           *
   5  *                                                                         *
   6  *  Copyright (c) 2001-2011                                                *
   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 if (!defined('_ECRIRE_INC_VERSION')) return;
  14
  15 // Un script utile pour recalculer une URL symbolique des son changement
  16
  17 function action_redirect_dist()
  18 {
  19         $type = _request('type');
  20         if (!preg_match('/^\w+$/', $type)) return;
  21         if ($m = _request('var_mode')) {
  22                 $GLOBALS['var_urls'] = true; // forcer la mise a jour de l'url de cet objet !
  23                 $m = 'var_mode='.urlencode($m);
  24         }
  25         $h = generer_url_entite_absolue(intval(_request('id')), $type, $m, '', true);
  26         $status = '302';
  27         if (_request('status') AND _request('status')=='301')
  28                 $status = '301';
  29
  30         if ($h)
  31                 redirige_par_entete(str_replace('&amp;', '&', $h),'',$status);
  32         else
  33                 redirige_par_entete('/','',$status);
  34 }
  35
  36 ?>