* Copyright (C) 2010-2012 Regis Houssin * Copyright (C) 2015 Alexandre Spangaro * * 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 3 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, see . * or see http://www.gnu.org/ */ /** * \file htdocs/core/lib/doleditor.lib.php * \brief Ensemble de fonctions de base pour la gestion des utilisaterus et groupes */ /** * Show list of ckeditor's themes. * * @param User|null $fuser User concerned or null for global theme * @param int $edit 1 to add edit form * @return void */ function show_skin($fuser,$edit=0) { global $conf,$langs,$db; global $bc; require_once DOL_DOCUMENT_ROOT . '/core/class/html.formother.class.php'; $formother = new FormOther($db); $dirskins=array('/includes/ckeditor/ckeditor/skins'); if (! empty($conf->modules_parts['theme'])) // Using this feature slow down application { foreach($conf->modules_parts['theme'] as $reldir) { $dirskins=array_merge($dirskins,(array) ($reldir.'theme')); } } $dirskins=array_unique($dirskins); // Now dir_themes=array('/themes') or dir_themes=array('/theme','/mymodule/theme') $selected_theme=''; if (empty($conf->global->FCKEDITOR_SKIN)) $selected_theme='moono-lisa'; else $selected_theme=$conf->global->FCKEDITOR_SKIN; $colspan=2; $thumbsbyrow=6; print ''; $var=false; // Title print ''; print ''; print ''; print ''; print ''; print ''; // print ''; print '
'.$langs->trans("DefaultSkin").''; $url='http://ckeditor.com/addons/skins/all'; /*print ''; print $langs->trans('DownloadMoreSkins'); print '';*/ print '
'.$langs->trans("ThemeDir").''; foreach($dirskins as $dirskin) { echo '"'.$dirskin.'" '; } print '
'; print '
'; $i=0; foreach($dirskins as $dir) { //print $dirroot.$dir;exit; $dirskin=dol_buildpath($dir,0); // This include loop on $conf->file->dol_document_root $urltheme=dol_buildpath($dir,1); if (is_dir($dirskin)) { $handle=opendir($dirskin); if (is_resource($handle)) { while (($subdir = readdir($handle))!==false) { if (is_dir($dirskin."/".$subdir) && substr($subdir, 0, 1) <> '.' && substr($subdir, 0, 3) <> 'CVS' && ! preg_match('/common|phones/i',$subdir)) { // Disable not stable themes (dir ends with _exp or _dev) if ($conf->global->MAIN_FEATURES_LEVEL < 2 && preg_match('/_dev$/i',$subdir)) continue; if ($conf->global->MAIN_FEATURES_LEVEL < 1 && preg_match('/_exp$/i',$subdir)) continue; print '
'; if ($subdir == $selected_theme) { print ' '.$subdir.''; } else { print ' '.$subdir; } print '
'; $i++; } } } } } print '
'; print '
'; }