www/ecrire/action/virtualiser.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 include_spip('inc/filtres');
  16
  17 // http://doc.spip.org/@action_virtualiser_dist
  18 function action_virtualiser_dist() {
  19
  20         $securiser_action = charger_fonction('securiser_action', 'inc');
  21         $arg = $securiser_action();
  22         $url = _request('virtuel');
  23
  24         if (!preg_match(",^\W*(\d+)$,", $arg, $r)) {
  25                  spip_log("action_virtualiser_dist $arg $url pas compris");
  26         } else action_virtualiser_post($r, $url);
  27 }
  28
  29 // http://doc.spip.org/@action_virtualiser_post
  30 function action_virtualiser_post($r, $url)
  31 {
  32         $url = preg_replace(",^ *https?://$,i", "", rtrim($url));
  33         if ($url) $url = corriger_caracteres("=$url");
  34         sql_updateq('spip_articles', array('chapo'=> $url, 'date_modif' => date('Y-m-d H:i:s')), "id_article=" . $r[1]);
  35 }
  36 ?>