SPIP 1.9.2c : /ecrire/public/admin.php source

[Sommaire] [Imprimer]
   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  
  14  // Inserer la feuille de style selon les normes, dans le <head>
  15  // puis les boutons
  16  // Feuilles de style admin : d'abord la CSS officielle, puis la perso
  17  
  18  
  19  // Compatibilite : on utilise stripos/strripos() qui n'existent pas en php4
  20  if (!function_exists('strripos')) {
  21  // http://doc.spip.org/@strripos
  22  	function strripos($botte, $aiguille) {
  23          if (preg_match('@^(.*)' . preg_quote($aiguille, '@') . '@is',
  24          $botte, $regs)) { 
  25              return strlen($regs[1]);
  26          }
  27          return false;
  28      }
  29  }
  30  if (!function_exists('stripos')) {
  31  // http://doc.spip.org/@stripos
  32  	function stripos($botte, $aiguille) {
  33          if (preg_match('@^(.*)' . preg_quote($aiguille, '@') . '@isU',
  34          $botte, $regs)) { 
  35              return strlen($regs[1]);
  36          }
  37          return false;
  38      }
  39  }
  40  
  41  // http://doc.spip.org/@affiche_boutons_admin
  42  function affiche_boutons_admin($contenu) {
  43      include_spip('inc/filtres');
  44  
  45      // Inserer le css d'admin
  46      $css = "<link rel='stylesheet' href='".url_absolue(find_in_path('spip_admin.css'))
  47      . "' type='text/css' />\n";
  48      if ($f = find_in_path('spip_admin_perso.css'))
  49          $css .= "<link rel='stylesheet' href='"
  50          . url_absolue($f) . "' type='text/css' />\n";
  51  
  52      ($pos = stripos($contenu, '</head>'))
  53          || ($pos = stripos($contenu, '<body>'))
  54          || ($pos = 0);
  55      $contenu = substr_replace($contenu, $css, $pos, 0);
  56  
  57  
  58      // Inserer la balise #FORMULAIRE_ADMIN, en float
  59      $boutons_admin = inclure_balise_dynamique(
  60          balise_FORMULAIRE_ADMIN_dyn('spip-admin-float'),
  61      false);
  62  
  63      ($pos = strripos($contenu, '</body>'))
  64          || ($pos = strripos($contenu, '</html>'))
  65          || ($pos = strlen($contenu));
  66      $contenu = substr_replace($contenu, $boutons_admin, $pos, 0);
  67  
  68  
  69      return $contenu;
  70  }
  71  
  72  ?>
Code source de SPIP 1.9.2c

/ecrire/public/ -> admin.php (source)

Généré le : Wed Nov 21 10:20:27 2007	par Balluche grâce à PHPXref 0.7