CRM/Admin/Page/CKEditorConfig.php

   1 <?php
   2 /*
   3  +--------------------------------------------------------------------+
   4  | CiviCRM version 4.7                                                |
   5  +--------------------------------------------------------------------+
   6  | Copyright CiviCRM LLC (c) 2004-2017                                |
   7  +--------------------------------------------------------------------+
   8  | This file is a part of CiviCRM.                                    |
   9  |                                                                    |
  10  | CiviCRM is free software; you can copy, modify, and distribute it  |
  11  | under the terms of the GNU Affero General Public License           |
  12  | Version 3, 19 November 2007 and the CiviCRM Licensing Exception.   |
  13  |                                                                    |
  14  | CiviCRM is distributed in the hope that it will be useful, but     |
  15  | WITHOUT ANY WARRANTY; without even the implied warranty of         |
  16  | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.               |
  17  | See the GNU Affero General Public License for more details.        |
  18  |                                                                    |
  19  | You should have received a copy of the GNU Affero General Public   |
  20  | License and the CiviCRM Licensing Exception along                  |
  21  | with this program; if not, contact CiviCRM LLC                     |
  22  | at info[AT]civicrm[DOT]org. If you have questions about the        |
  23  | GNU Affero General Public License or the licensing of CiviCRM,     |
  24  | see the CiviCRM license FAQ at http://civicrm.org/licensing        |
  25  +--------------------------------------------------------------------+
  26  */
  27
  28 /**
  29  *
  30  * @package CRM
  31  * @copyright CiviCRM LLC (c) 2004-2017
  32  */
  33
  34 /**
  35  * Page for configuring CKEditor options.
  36  *
  37  * Note that while this is implemented as a CRM_Core_Page, it is actually a form.
  38  * Because the form needs to be submitted and refreshed via javascript, it seemed like
  39  * Quickform and CRM_Core_Form/Controller might get in the way.
  40  */
  41 class CRM_Admin_Page_CKEditorConfig extends CRM_Core_Page {
  42
  43   const CONFIG_FILEPATH = '[civicrm.files]/persist/crm-ckeditor-';
  44
  45   /**
  46    * Settings that cannot be configured in "advanced options"
  47    *
  48    * @var array
  49    */
  50   public $blackList = array(
  51     'on',
  52     'skin',
  53     'extraPlugins',
  54     'toolbarGroups',
  55     'removeButtons',
  56     'filebrowserBrowseUrl',
  57     'filebrowserImageBrowseUrl',
  58     'filebrowserFlashBrowseUrl',
  59     'filebrowserUploadUrl',
  60     'filebrowserImageUploadUrl',
  61     'filebrowserFlashUploadUrl',
  62   );
  63
  64   public $preset;
  65
  66   /**
  67    * Run page.
  68    *
  69    * @return string
  70    */
  71   public function run() {
  72     $this->preset = CRM_Utils_Array::value('preset', $_REQUEST, 'default');
  73
  74     // If the form was submitted, take appropriate action.
  75     if (!empty($_POST['revert'])) {
  76       self::deleteConfigFile($this->preset);
  77       self::setConfigDefault();
  78     }
  79     elseif (!empty($_POST['config'])) {
  80       $this->save($_POST);
  81     }
  82
  83     $settings = $this->getConfigSettings();
  84
  85     CRM_Core_Resources::singleton()
  86       ->addScriptFile('civicrm', 'bower_components/ckeditor/ckeditor.js', 0, 'page-header')
  87       ->addScriptFile('civicrm', 'bower_components/ckeditor/samples/toolbarconfigurator/js/fulltoolbareditor.js', 1)
  88       ->addScriptFile('civicrm', 'bower_components/ckeditor/samples/toolbarconfigurator/js/abstracttoolbarmodifier.js', 2)
  89       ->addScriptFile('civicrm', 'bower_components/ckeditor/samples/toolbarconfigurator/js/toolbarmodifier.js', 3)
  90       ->addScriptFile('civicrm', 'js/wysiwyg/admin.ckeditor-configurator.js', 10)
  91       ->addStyleFile('civicrm', 'bower_components/ckeditor/samples/toolbarconfigurator/css/fontello.css')
  92       ->addStyleFile('civicrm', 'bower_components/ckeditor/samples/css/samples.css')
  93       ->addVars('ckConfig', array(
  94         'plugins' => array_values($this->getCKPlugins()),
  95         'blacklist' => $this->blackList,
  96         'settings' => $settings,
  97       ));
  98
  99     $configUrl = self::getConfigUrl($this->preset);
 100     if (!$configUrl) {
 101       $configUrl = self::getConfigUrl('default');
 102     }
 103
 104     $this->assign('preset', $this->preset);
 105     $this->assign('presets', CRM_Core_OptionGroup::values('wysiwyg_presets', FALSE, FALSE, FALSE, NULL, 'label', TRUE, FALSE, 'name'));
 106     $this->assign('skins', $this->getCKSkins());
 107     $this->assign('skin', CRM_Utils_Array::value('skin', $settings));
 108     $this->assign('extraPlugins', CRM_Utils_Array::value('extraPlugins', $settings));
 109     $this->assign('configUrl', $configUrl);
 110     $this->assign('revertConfirm', htmlspecialchars(ts('Are you sure you want to revert all changes?', array('escape' => 'js'))));
 111
 112     CRM_Utils_System::appendBreadCrumb(array(array(
 113       'url' => CRM_Utils_System::url('civicrm/admin/setting/preferences/display', 'reset=1'),
 114       'title' => ts('Display Preferences'),
 115     )));
 116
 117     return parent::run();
 118   }
 119
 120   /**
 121    * Generate the config js file based on posted data.
 122    *
 123    * @param array $params
 124    */
 125   public function save($params) {
 126     $config = self::fileHeader()
 127       // Standardize line-endings
 128       . preg_replace('~\R~u', "\n", $params['config']);
 129
 130     // Use all params starting with config_
 131     foreach ($params as $key => $val) {
 132       $val = trim($val);
 133       if (strpos($key, 'config_') === 0 && strlen($val)) {
 134         if ($val != 'true' && $val != 'false' && $val != 'null' && $val[0] != '{' && $val[0] != '[' && !is_numeric($val)) {
 135           $val = json_encode($val);
 136         }
 137         $pos = strrpos($config, '};');
 138         $key = preg_replace('/^config_/', 'config.', $key);
 139         $setting = "\n\t{$key} = {$val};\n";
 140         $config = substr_replace($config, $setting, $pos, 0);
 141       }
 142     }
 143     self::saveConfigFile($this->preset, $config);
 144     if (!empty($params['save'])) {
 145       CRM_Core_Session::setStatus(ts("You may need to clear your browser's cache to see the changes in CiviCRM."), ts('CKEditor Saved'), 'success');
 146     }
 147   }
 148
 149   /**
 150    * Get available CKEditor plugin list.
 151    *
 152    * @return array
 153    */
 154   private function getCKPlugins() {
 155     $plugins = array();
 156     $pluginDir = Civi::paths()->getPath('[civicrm.root]/bower_components/ckeditor/plugins');
 157
 158     foreach (glob($pluginDir . '/*', GLOB_ONLYDIR) as $dir) {
 159       $dir = rtrim(str_replace('\\', '/', $dir), '/');
 160       $name = substr($dir, strrpos($dir, '/') + 1);
 161       $dir = CRM_Utils_file::addTrailingSlash($dir, '/');
 162       if (is_file($dir . 'plugin.js')) {
 163         $plugins[$name] = array(
 164           'id' => $name,
 165           'text' => ucfirst($name),
 166           'icon' => NULL,
 167         );
 168         if (is_dir($dir . "icons")) {
 169           if (is_file($dir . "icons/$name.png")) {
 170             $plugins[$name]['icon'] = "bower_components/ckeditor/plugins/$name/icons/$name.png";
 171           }
 172           elseif (glob($dir . "icons/*.png")) {
 173             $icon = CRM_Utils_Array::first(glob($dir . "icons/*.png"));
 174             $icon = rtrim(str_replace('\\', '/', $icon), '/');
 175             $plugins[$name]['icon'] = "bower_components/ckeditor/plugins/$name/icons/" . substr($icon, strrpos($icon, '/') + 1);
 176           }
 177         }
 178       }
 179     }
 180
 181     return $plugins;
 182   }
 183
 184   /**
 185    * Get available CKEditor skins.
 186    *
 187    * @return array
 188    */
 189   private function getCKSkins() {
 190     $skins = array();
 191     $skinDir = Civi::paths()->getPath('[civicrm.root]/bower_components/ckeditor/skins');
 192     foreach (glob($skinDir . '/*', GLOB_ONLYDIR) as $dir) {
 193       $dir = rtrim(str_replace('\\', '/', $dir), '/');
 194       $skins[] = substr($dir, strrpos($dir, '/') + 1);
 195     }
 196     return $skins;
 197   }
 198
 199   /**
 200    * @return array
 201    */
 202   private function getConfigSettings() {
 203     $matches = $result = array();
 204     $file = self::getConfigFile($this->preset);
 205     if (!$file) {
 206       $file = self::getConfigFile('default');
 207     }
 208     $result['skin'] = 'moono';
 209     if ($file) {
 210       $contents = file_get_contents($file);
 211       preg_match_all("/\sconfig\.(\w+)\s?=\s?([^;]*);/", $contents, $matches);
 212       foreach ($matches[1] as $i => $match) {
 213         $result[$match] = trim($matches[2][$i], ' "\'');
 214       }
 215     }
 216     return $result;
 217   }
 218
 219   /**
 220    * @param string $preset
 221    *   Omit to get an array of all presets
 222    * @return array|null|string
 223    */
 224   public static function getConfigUrl($preset = NULL) {
 225     $items = array();
 226     $presets = CRM_Core_OptionGroup::values('wysiwyg_presets', FALSE, FALSE, FALSE, NULL, 'name');
 227     foreach ($presets as $key => $name) {
 228       if (self::getConfigFile($name)) {
 229         $items[$name] = Civi::paths()->getUrl(self::CONFIG_FILEPATH . $name . '.js', 'absolute');
 230       }
 231     }
 232     return $preset ? CRM_Utils_Array::value($preset, $items) : $items;
 233   }
 234
 235   /**
 236    * @param string $preset
 237    *
 238    * @return null|string
 239    */
 240   public static function getConfigFile($preset = 'default') {
 241     $fileName = Civi::paths()->getPath(self::CONFIG_FILEPATH . $preset . '.js');
 242     return is_file($fileName) ? $fileName : NULL;
 243   }
 244
 245   /**
 246    * @param string $contents
 247    */
 248   public static function saveConfigFile($preset, $contents) {
 249     $file = Civi::paths()->getPath(self::CONFIG_FILEPATH . $preset . '.js');
 250     file_put_contents($file, $contents);
 251   }
 252
 253   /**
 254    * Delete config file.
 255    */
 256   public static function deleteConfigFile($preset) {
 257     $file = self::getConfigFile($preset);
 258     if ($file) {
 259       unlink($file);
 260     }
 261   }
 262
 263   /**
 264    * Create default config file if it doesn't exist
 265    */
 266   public static function setConfigDefault() {
 267     if (!self::getConfigFile()) {
 268       $config = self::fileHeader() . "CKEDITOR.editorConfig = function( config ) {\n\tconfig.allowedContent = true;\n};\n";
 269       // Make sure directories exist
 270       if (!is_dir(Civi::paths()->getPath('[civicrm.files]/persist'))) {
 271         mkdir(Civi::paths()->getPath('[civicrm.files]/persist'));
 272       }
 273       $newFileName = Civi::paths()->getPath('[civicrm.files]/persist/crm-ckeditor-default.js');
 274       file_put_contents($newFileName, $config);
 275     }
 276   }
 277
 278   /**
 279    * @return string
 280    */
 281   public static function fileHeader() {
 282     return "/**\n"
 283     . " * CKEditor config file auto-generated by CiviCRM (" . date('Y-m-d H:i:s') . ").\n"
 284     . " *\n"
 285     . " * Note: This file will be overwritten if settings are modified at:\n"
 286     . " * @link " . CRM_Utils_System::url('civicrm/admin/ckeditor', NULL, TRUE, NULL, FALSE) . "\n"
 287     . " */\n";
 288   }
 289
 290 }