www/ecrire/inc/lien_court.php

   1 <?php
   2
   3 /***************************************************************************\
   4  *  SPIP, Systeme de publication pour l'internet                           *
   5  *                                                                         *
   6  *  Copyright (c) 2001-2019                                                *
   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')) {
  14         return;
  15 }
  16
  17 /*
  18  * Cette fonction prend une URL et la raccourcit si elle est trop longue
  19  * de cette maniere au lieu d'afficher
  20  * "http://zoumzamzouilam/truc/chose/machin/qui/fait/peur/a/tout/le/monde.mp3"
  21  * on affiche
  22  * http://zoumzamzouilam/truc/chose/machin..."
  23  */
  24 function inc_lien_court($url) {
  25         $long_url = defined('_MAX_LONG_URL') ? _MAX_LONG_URL : 40;
  26         $coupe_url = defined('_MAX_COUPE_URL') ? _MAX_COUPE_URL : 35;
  27
  28         if (strlen($url) > $long_url) {
  29                 $url = substr($url, 0, $coupe_url) . '...';
  30         }
  31
  32         return $url;
  33 }