*
* 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$
*/
/**
\file htdocs/admin/system/dolibarr.php
\brief Fichier page info systemes Dolibarr
\version $Revision$
*/
require("./pre.inc.php");
if (!$user->admin)
accessforbidden();
llxHeader();
print_fiche_titre("Dolibarr",'','setup');
print "
\n";
$var=true;
print '
';
print '| '.$langs->trans("Parameter").' | '.$langs->trans("Value").' |
'."\n";
$var=!$var;
print "| ".$langs->trans("Version")." | ".DOL_VERSION." |
\n";
$var=!$var;
print "| ".$langs->trans("CurrentTheme")." | ".$conf->theme." |
\n";
$var=!$var;
print "| ".$langs->trans("CurrentTopMenuHandler")." | ".$conf->top_menu." |
\n";
$var=!$var;
print "| ".$langs->trans("CurrentLeftMenuHandler")." | ".$conf->left_menu." |
\n";
print '
';
print '
';
$var=true;
print '';
print '| '.$langs->trans("LanguageDolibarrParameter").' | '.$langs->trans("Value").' |
'."\n";
$var=!$var;
print "| ".$langs->trans("LanguageBrowserParameter","HTTP_ACCEPT_LANGUAGE")." | ".$_SERVER["HTTP_ACCEPT_LANGUAGE"]." |
\n";
$var=!$var;
print "| ".$langs->trans("LanguageParameter","PHP LC_ALL")." | ".setlocale(LC_ALL,0)." |
\n";
$var=!$var;
print "| ".$langs->trans("LanguageParameter","PHP LC_NUMERIC")." | ".setlocale(LC_NUMERIC,0)." |
\n";
$var=!$var;
print "| ".$langs->trans("LanguageParameter","PHP LC_TIME")." | ".setlocale(LC_TIME,0)." |
\n";
$var=!$var;
print "| ".$langs->trans("LanguageParameter","PHP LC_MONETARY")." | ".setlocale(LC_MONETARY,0)." |
\n";
$var=!$var;
print "| ".$langs->trans("CurrentDolibarrLanguage")." | ".$langs->getDefaultLang()." |
\n";
print '
';
print '
';
// Charge les modules
$db->begin();
$dir = DOL_DOCUMENT_ROOT . "/includes/modules/";
$handle=opendir($dir);
$modules = array();
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);
$modules[$objMod->numero]=$objMod;
$modules_names[$objMod->numero]=$objMod->name;
$picto[$objMod->numero]=(isset($objMod->picto) && $objMod->picto)?$objMod->picto:'generic';
}
}
}
print '';
print '';
print '| '.$langs->trans("Modules").' | ';
print ''.$langs->trans("Version").' | ';
print ''.$langs->trans("Id Module").' | ';
print ''.$langs->trans("Id Permissions").' | ';
print '
';
$var=false;
$sortorder=$modules_names;
ksort($sortorder);
foreach($sortorder as $numero=>$name)
{
$idperms="";
$var=!$var;
// Module
print "| ".img_object("",$picto[$numero]).' '.$modules[$numero]->getName()." | ";
// Version
print ''.$modules[$numero]->getVersion().' | ';
// Id
print ''.$numero.' | ';
// Permissions
if ($modules[$numero]->rights)
{
foreach($modules[$numero]->rights as $rights)
{
$idperms.=($idperms?",":"").$rights[0];
}
}
print ''.($idperms?$idperms:" ").' | ';
print "
\n";
}
print '
';
print '
';
llxFooter('$Date$ - $Revision$');
?>