dolibarr/htdocs/admin/modules.php

<?PHP
/* Copyright (C) 2003 Rodolphe Quiedeville <rodolphe@quiedeville.org>
 * Copyright (C) 2003 Jean-Louis Bergamo <jlb@j1b.org>
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
 *
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
 *
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
 * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
 *
 * $Id$
 * $Source$
 */
require("./pre.inc.php");

//
// TODO mettre cette section dans la base de donn<6E>es
//

if ($_GET["action"] == 'set' && $user->admin)
{
  Activate($_GET["value"]);

  Header("Location: modules.php");
}

function Activate($value)
{
  global $db, $modules;

  $modName = $value;

  if ($modName)
    {
      $file = $modName . ".class.php";
      include_once("../includes/modules/$file");
      $objMod = new $modName($db);
      $objMod->init();
    }
  
  for ($i = 0; $i < sizeof($objMod->depends); $i++)
    {
      Activate($objMod->depends[$i]);
    }
}

if ($_GET["action"] == 'reset' && $user->admin)
{
  $modName = $_GET["value"];

  if ($modName)
    {
      $file = $modName . ".class.php";
      include_once("../includes/modules/$file");
      $objMod = new $modName($db);
      $objMod->remove();
    }

  Header("Location: modules.php");
}

$db->close();

llxHeader();

if (!$user->admin)
{
  print "Forbidden";
  llxfooter();
  exit;
}

print_titre("Modules");

print '<table class="border" cellpadding="3" cellspacing="0">';
print '<TR class="liste_titre">';
print '<td>Nom</td>';
print '<td>Info</td>';
print '<td align="center">Activ<69></td>';
print '<td colspan="2">&nbsp;</td>';
print "</tr>\n";


$dir = DOL_DOCUMENT_ROOT . "/includes/modules/";

$handle=opendir($dir);
$modules = array();
$i = 0;
$j = 0;
while (($file = readdir($handle))!==false)
{
  if (is_readable($dir.$file) && substr($file, 0, 3) == 'mod'  && substr($file, strlen($file) - 10) == '.class.php')
    {
      $modName = substr($file, 0, strlen($file) - 10);

      if ($modName)
	{
	  include_once("../includes/modules/$file");
	  $objMod = new $modName($db);

	  if ($objMod->numero > 0)
	    {
	      $j = $objMod->numero;
	      $modules[$objMod->numero] = $modName;
	    }
	  else
	    {
	      $j = 1000 + $i;
	    }
	  $modules[$j] = $modName;
	  $orders[$i] = $j;
	  $j++;
	  $i++;
	}
    }
}

sort($orders);

foreach ($orders as $key => $value)
{
  $modName = $modules[$orders[$key]];

  if ($modName)
    {
      $objMod = new $modName($db);
    }
  
  $const_name = $objMod->const_name;
  $const_value = $objMod->const_config;
  
  print '<tr class="pair"><td>';
  echo $objMod->name;
  print "</td><td>\n";
  print $objMod->description;
  print '</td><td align="center">';
  
  if ($const_value == 1)
    {
      print '<img src="'.DOL_URL_ROOT.'/theme/'.$conf->theme.'/img/tick.png" border="0"></a>';
    }
  else
    {
      print "&nbsp;";
    }
  
  print '</td><td align="center">';
  
  
  if ($const_value == 1)
    {
      print '<a href="modules.php?action=reset&value='.$modName.'">D<>sactiver</a></td>';
      
      
      if ($objMod->config_page_url)
	{
	  print '<td><a href="'.$objMod->config_page_url.'">Configurer</a></td>';
	}
      else
	{
	  print "<td>&nbsp;</td>";
	}
      
    }
  else
    {
      print '<a href="modules.php?action=set&value='.$modName.'">Activer</a></td><td>&nbsp;</td>';
    }
  
  print '</tr>';
  
}
print "</table>";

llxFooter();
?>