forked from Wavyzz/dolibarr
325 lines
11 KiB
PHP
325 lines
11 KiB
PHP
<?php
|
|
/* Copyright (C) 2004-2011 Laurent Destailleur <eldy@users.sourceforge.net>
|
|
* Copyright (C) 2005-2011 Regis Houssin <regis@dolibarr.fr>
|
|
* Copyright (C) 2007 Patrick Raguin <patrick.raguin@gmail.com>
|
|
*
|
|
* 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.
|
|
*/
|
|
|
|
/**
|
|
* \file htdocs/core/class/html.formadmin.class.php
|
|
* \ingroup core
|
|
* \brief File of class for html functions for admin pages
|
|
* \version $Id$
|
|
*/
|
|
|
|
|
|
/**
|
|
* \class FormAdmin
|
|
* \brief Class to generate html code for admin pages
|
|
*/
|
|
class FormAdmin
|
|
{
|
|
var $db;
|
|
var $error;
|
|
|
|
|
|
/**
|
|
* \brief Constructor
|
|
* \param DB handler d'acces base de donnee
|
|
*/
|
|
function FormAdmin($DB)
|
|
{
|
|
$this->db = $DB;
|
|
|
|
return 1;
|
|
}
|
|
|
|
/**
|
|
* Output list with available languages.
|
|
* @deprecated Use select_language instead
|
|
* @param selected Langue pre-selectionnee
|
|
* @param htmlname Nom de la zone select
|
|
* @param showauto Affiche choix auto
|
|
* @param filter Array of keys to exclude in list
|
|
* @param showempty Add empty value
|
|
*/
|
|
function select_lang($selected='',$htmlname='lang_id',$showauto=0,$filter=0,$showempty=0)
|
|
{
|
|
print $this->select_language($selected,$htmlname,$showauto,$filter,$showempty);
|
|
}
|
|
|
|
/**
|
|
* Return html select list with available languages (key='en_US', value='United States' for example)
|
|
* @param selected Langue pre-selectionnee
|
|
* @param htmlname Nom de la zone select
|
|
* @param showauto Affiche choix auto
|
|
* @param filter Array of keys to exclude in list
|
|
* @param showempty Add empty value
|
|
* @param showwarning Show a warning if language is not complete
|
|
*/
|
|
function select_language($selected='',$htmlname='lang_id',$showauto=0,$filter=0,$showempty=0,$showwarning=0)
|
|
{
|
|
global $langs;
|
|
|
|
$langs_available=$langs->get_available_languages(DOL_DOCUMENT_ROOT,12);
|
|
|
|
$out='';
|
|
|
|
$out.= '<select class="flat" name="'.$htmlname.'">';
|
|
if ($showempty)
|
|
{
|
|
$out.= '<option value=""';
|
|
if ($selected == '') $out.= ' selected="selected"';
|
|
$out.= '> </option>';
|
|
}
|
|
if ($showauto)
|
|
{
|
|
$out.= '<option value="auto"';
|
|
if ($selected == 'auto') $out.= ' selected="selected"';
|
|
$out.= '>'.$langs->trans("AutoDetectLang").'</option>';
|
|
}
|
|
|
|
asort($langs_available);
|
|
|
|
$uncompletelanguages=array('da_DA','fi_FI','hu_HU','is_IS','pl_PL','ro_RO','ru_RU','sv_SV','tr_TR','zh_CN');
|
|
foreach ($langs_available as $key => $value)
|
|
{
|
|
if ($showwarning && in_array($key,$uncompletelanguages))
|
|
{
|
|
//$value.=' - '.$langs->trans("TranslationUncomplete",$key);
|
|
}
|
|
if ($filter && is_array($filter))
|
|
{
|
|
if ( ! array_key_exists($key, $filter))
|
|
{
|
|
$out.= '<option value="'.$key.'">'.$value.'</option>';
|
|
}
|
|
}
|
|
else if ($selected == $key)
|
|
{
|
|
$out.= '<option value="'.$key.'" selected="selected">'.$value.'</option>';
|
|
}
|
|
else
|
|
{
|
|
$out.= '<option value="'.$key.'">'.$value.'</option>';
|
|
}
|
|
}
|
|
$out.= '</select>';
|
|
|
|
return $out;
|
|
}
|
|
|
|
/**
|
|
* Return list of available menus (eldy_backoffice, ...)
|
|
* @param selected Preselected menu value
|
|
* @param htmlname Name of html select
|
|
* @param dirmenu Directory to scan or array of directories to scan
|
|
* @param moreattrib More attributes on html select tag
|
|
*/
|
|
function select_menu($selected='', $htmlname, $dirmenu, $moreattrib='')
|
|
{
|
|
global $langs,$conf;
|
|
|
|
if ($selected == 'eldy.php') $selected='eldy_backoffice.php'; // For compatibility
|
|
|
|
$menuarray=array();
|
|
foreach ($conf->file->dol_document_root as $dirroot)
|
|
{
|
|
if (is_array($dirmenu)) $dirmenus=$dirmenu;
|
|
else $dirmenus=array($dirmenu);
|
|
foreach($dirmenus as $dirtoscan)
|
|
{
|
|
$dir=$dirroot.$dirtoscan;
|
|
if (is_dir($dir))
|
|
{
|
|
$handle=opendir($dir);
|
|
if (is_resource($handle))
|
|
{
|
|
while (($file = readdir($handle))!==false)
|
|
{
|
|
if (is_file($dir."/".$file) && substr($file, 0, 1) <> '.' && substr($file, 0, 3) <> 'CVS')
|
|
{
|
|
if (preg_match('/lib\.php$/i',$file)) continue; // We exclude library files
|
|
$filelib=preg_replace('/\.php$/i','',$file);
|
|
$prefix='';
|
|
// 0=Recommanded, 1=Experimental, 2=Developpement, 3=Other
|
|
if (preg_match('/^eldy/i',$file)) $prefix='0';
|
|
else if (preg_match('/^smartphone/i',$file)) $prefix='2';
|
|
else $prefix='3';
|
|
|
|
if ($file == $selected)
|
|
{
|
|
$menuarray[$prefix.'_'.$file]='<option value="'.$file.'" selected="selected">'.$filelib.'</option>';
|
|
}
|
|
else
|
|
{
|
|
$menuarray[$prefix.'_'.$file]='<option value="'.$file.'">'.$filelib.'</option>';
|
|
}
|
|
}
|
|
}
|
|
closedir($handle);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
ksort($menuarray);
|
|
|
|
// Output combo list of menus
|
|
print '<select class="flat" id="'.$htmlname.'" name="'.$htmlname.'"'.($moreattrib?' '.$moreattrib:'').'>';
|
|
$oldprefix='';
|
|
foreach ($menuarray as $key => $val)
|
|
{
|
|
$tab=explode('_',$key);
|
|
$newprefix=$tab[0];
|
|
if ($newprefix=='1' && ($conf->global->MAIN_FEATURES_LEVEL < 1)) continue;
|
|
if ($newprefix=='2' && ($conf->global->MAIN_FEATURES_LEVEL < 2)) continue;
|
|
if (! empty($conf->browser->firefox) && $newprefix != $oldprefix) // Add separators
|
|
{
|
|
// Affiche titre
|
|
print '<option value="-1" disabled="disabled">';
|
|
if ($newprefix=='0') print '-- '.$langs->trans("VersionRecommanded").' --';
|
|
if ($newprefix=='1') print '-- '.$langs->trans("VersionExperimental").' --';
|
|
if ($newprefix=='2') print '-- '.$langs->trans("VersionDevelopment").' --';
|
|
if ($newprefix=='3') print '-- '.$langs->trans("Other").' --';
|
|
print '</option>';
|
|
$oldprefix=$newprefix;
|
|
}
|
|
print $val."\n"; // Show menu entry
|
|
}
|
|
print '</select>';
|
|
}
|
|
|
|
/**
|
|
* Return combo list of available menu families
|
|
* @param selected Menu pre-selected
|
|
* @param htmlname Name of html select
|
|
* @param dirmenuarray Directories to scan
|
|
*/
|
|
function select_menu_families($selected='',$htmlname,$dirmenuarray)
|
|
{
|
|
global $langs,$conf;
|
|
|
|
//$expdevmenu=array('smartphone_backoffice.php','smartphone_frontoffice.php'); // Menu to disable if $conf->global->MAIN_FEATURES_LEVEL is not set
|
|
$expdevmenu=array();
|
|
|
|
$menuarray=array();
|
|
|
|
foreach($dirmenuarray as $dirmenu)
|
|
{
|
|
foreach ($conf->file->dol_document_root as $dirroot)
|
|
{
|
|
$dir=$dirroot.$dirmenu;
|
|
if (is_dir($dir))
|
|
{
|
|
$handle=opendir($dir);
|
|
if (is_resource($handle))
|
|
{
|
|
while (($file = readdir($handle))!==false)
|
|
{
|
|
if (is_file($dir."/".$file) && substr($file, 0, 1) <> '.' && substr($file, 0, 3) <> 'CVS')
|
|
{
|
|
$filelib=preg_replace('/(_backoffice|_frontoffice)?\.php$/i','',$file);
|
|
if (preg_match('/^default/i',$filelib)) continue;
|
|
if (preg_match('/^empty/i',$filelib)) continue;
|
|
if (preg_match('/\.lib/i',$filelib)) continue;
|
|
if (empty($conf->global->MAIN_FEATURES_LEVEL) && in_array($file,$expdevmenu)) continue;
|
|
|
|
$menuarray[$filelib]=1;
|
|
}
|
|
$menuarray['all']=1;
|
|
}
|
|
closedir($handle);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
ksort($menuarray);
|
|
|
|
// Affichage liste deroulante des menus
|
|
print '<select class="flat" name="'.$htmlname.'">';
|
|
$oldprefix='';
|
|
foreach ($menuarray as $key => $val)
|
|
{
|
|
$tab=explode('_',$key);
|
|
$newprefix=$tab[0];
|
|
print '<option value="'.$key.'"';
|
|
if ($key == $selected)
|
|
{
|
|
print ' selected="selected"';
|
|
}
|
|
//if ($key == 'rodolphe') print ' disabled="true"';
|
|
print '>';
|
|
if ($key == 'all') print $langs->trans("AllMenus");
|
|
else print $key;
|
|
//if ($key == 'rodolphe') print ' ('.$langs->trans("PersonalizedMenusNotSupported").')';
|
|
print '</option>'."\n";
|
|
}
|
|
print '</select>';
|
|
}
|
|
|
|
|
|
/**
|
|
* \brief Retourne la liste deroulante des menus disponibles (eldy)
|
|
* \param selected Menu pre-selectionnee
|
|
* \param htmlname Nom de la zone select
|
|
*/
|
|
function select_timezone($selected='',$htmlname)
|
|
{
|
|
global $langs,$conf;
|
|
|
|
print '<select class="flat" name="'.$htmlname.'">';
|
|
print '<option value="-1"> </option>';
|
|
|
|
$arraytz=array(
|
|
"Pacific/Midway"=>"GMT-11:00",
|
|
"Pacific/Fakaofo"=>"GMT-10:00",
|
|
"America/Anchorage"=>"GMT-09:00",
|
|
"America/Los_Angeles"=>"GMT-08:00",
|
|
"America/Dawson_Creek"=>"GMT-07:00",
|
|
"America/Chicago"=>"GMT-06:00",
|
|
"America/Bogota"=>"GMT-05:00",
|
|
"America/Anguilla"=>"GMT-04:00",
|
|
"America/Araguaina"=>"GMT-03:00",
|
|
"America/Noronha"=>"GMT-02:00",
|
|
"Atlantic/Azores"=>"GMT-01:00",
|
|
"Africa/Abidjan"=>"GMT+00:00",
|
|
"Europe/Paris"=>"GMT+01:00",
|
|
"Europe/Helsinki"=>"GMT+02:00",
|
|
"Europe/Moscow"=>"GMT+03:00",
|
|
"Asia/Dubai"=>"GMT+04:00",
|
|
"Asia/Karachi"=>"GMT+05:00",
|
|
"Indian/Chagos"=>"GMT+06:00",
|
|
"Asia/Jakarta"=>"GMT+07:00",
|
|
"Asia/Hong_Kong"=>"GMT+08:00",
|
|
"Asia/Tokyo"=>"GMT+09:00",
|
|
"Australia/Sydney"=>"GMT+10:00",
|
|
"Pacific/Noumea"=>"GMT+11:00",
|
|
"Pacific/Auckland"=>"GMT+12:00",
|
|
"Pacific/Enderbury"=>"GMT+13:00"
|
|
);
|
|
foreach ($arraytz as $lib => $gmt)
|
|
{
|
|
print '<option value="'.$lib.'"';
|
|
if ($selected == $lib || $selected == $gmt) print ' selected="selected"';
|
|
print '>'.$gmt.'</option>'."\n";
|
|
}
|
|
print '</select>';
|
|
}
|
|
|
|
}
|
|
?>
|