CRM/Admin/Form/Preferences.php

   1 <?php
   2 /*
   3  +--------------------------------------------------------------------+
   4  | CiviCRM version 5                                                  |
   5  +--------------------------------------------------------------------+
   6  | Copyright CiviCRM LLC (c) 2004-2018                                |
   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-2018
  32  */
  33
  34 /**
  35  * Base class for settings forms.
  36  */
  37 class CRM_Admin_Form_Preferences extends CRM_Core_Form {
  38
  39   use CRM_Admin_Form_SettingTrait;
  40
  41   protected $_system = FALSE;
  42   protected $_contactID = NULL;
  43   public $_action = NULL;
  44
  45   protected $_checkbox = NULL;
  46
  47   protected $_varNames = [];
  48
  49   protected $_config = NULL;
  50
  51   protected $_params = NULL;
  52
  53   public function preProcess() {
  54     $this->_contactID = CRM_Utils_Request::retrieve('cid', 'Positive',
  55       $this, FALSE
  56     );
  57     $this->_system = CRM_Utils_Request::retrieve('system', 'Boolean',
  58       $this, FALSE, TRUE
  59     );
  60     $this->_action = CRM_Utils_Request::retrieve('action', 'String',
  61       $this, FALSE, 'update'
  62     );
  63     if (isset($action)) {
  64       $this->assign('action', $action);
  65     }
  66
  67     $session = CRM_Core_Session::singleton();
  68
  69     $this->_config = new CRM_Core_DAO();
  70
  71     if ($this->_system) {
  72       if (CRM_Core_Permission::check('administer CiviCRM')) {
  73         $this->_contactID = NULL;
  74       }
  75       else {
  76         CRM_Utils_System::fatal('You do not have permission to edit preferences');
  77       }
  78       $this->_config->contact_id = NULL;
  79     }
  80     else {
  81       if (!$this->_contactID) {
  82         $this->_contactID = $session->get('userID');
  83         if (!$this->_contactID) {
  84           CRM_Utils_System::fatal('Could not retrieve contact id');
  85         }
  86         $this->set('cid', $this->_contactID);
  87       }
  88       $this->_config->contact_id = $this->_contactID;
  89     }
  90
  91     $this->addFieldsDefinedInSettingsMetadata();
  92     $settings = Civi::settings();
  93     // @todo replace this by defining all in settings.
  94     foreach ($this->_varNames as $groupName => $settingNames) {
  95       CRM_Core_Error::deprecatedFunctionWarning('deprecated use of preferences form. This will be removed from core soon');
  96       foreach ($settingNames as $settingName => $options) {
  97         $this->_config->$settingName = $settings->get($settingName);
  98       }
  99     }
 100     $session->pushUserContext(CRM_Utils_System::url('civicrm/admin', 'reset=1'));
 101   }
 102
 103   /**
 104    * @return array
 105    */
 106   public function setDefaultValues() {
 107     $this->_defaults = array();
 108
 109     $this->setDefaultsForMetadataDefinedFields();
 110     foreach ($this->_varNames as $groupName => $settings) {
 111       CRM_Core_Error::deprecatedFunctionWarning('deprecated use of preferences form. This will be removed from core soon');
 112       foreach ($settings as $settingName => $settingDetails) {
 113         $this->_defaults[$settingName] = isset($this->_config->$settingName) ? $this->_config->$settingName : CRM_Utils_Array::value('default', $settingDetails, NULL);
 114       }
 115     }
 116
 117     return $this->_defaults;
 118   }
 119
 120   /**
 121    * @todo deprecate in favour of setting using metadata.
 122    *
 123    * @param $defaults
 124    */
 125   public function cbsDefaultValues(&$defaults) {
 126
 127     foreach ($this->_varNames as $groupName => $groupValues) {
 128       CRM_Core_Error::deprecatedFunctionWarning('deprecated use of preferences form. This will be removed from core soon');
 129       foreach ($groupValues as $settingName => $fieldValue) {
 130         if ($fieldValue['html_type'] == 'checkboxes') {
 131           if (isset($this->_config->$settingName) &&
 132             $this->_config->$settingName
 133           ) {
 134             $value = explode(CRM_Core_DAO::VALUE_SEPARATOR,
 135               substr($this->_config->$settingName, 1, -1)
 136             );
 137             if (!empty($value)) {
 138               $defaults[$settingName] = array();
 139               foreach ($value as $n => $v) {
 140                 $defaults[$settingName][$v] = 1;
 141               }
 142             }
 143           }
 144         }
 145       }
 146     }
 147   }
 148
 149   /**
 150    * Build the form object.
 151    */
 152   public function buildQuickForm() {
 153     parent::buildQuickForm();
 154
 155     if (!empty($this->_varNames)) {
 156       CRM_Core_Error::deprecatedFunctionWarning('deprecated use of preferences form. This will be removed from core soon');
 157       foreach ($this->_varNames as $groupName => $groupValues) {
 158         $formName = CRM_Utils_String::titleToVar($groupName);
 159         $this->assign('formName', $formName);
 160         $fields = array();
 161         foreach ($groupValues as $fieldName => $fieldValue) {
 162           $fields[$fieldName] = $fieldValue;
 163
 164           switch ($fieldValue['html_type']) {
 165             case 'text':
 166               $this->addElement('text',
 167                 $fieldName,
 168                 $fieldValue['title'],
 169                 array(
 170                   'maxlength' => 64,
 171                   'size' => 32,
 172                 )
 173               );
 174               break;
 175
 176             case 'textarea':
 177             case 'checkbox':
 178               $this->add($fieldValue['html_type'],
 179                 $fieldName,
 180                 $fieldValue['title']
 181               );
 182               break;
 183
 184             case 'radio':
 185               $options = CRM_Core_OptionGroup::values($fieldName, FALSE, FALSE, TRUE);
 186               $this->addRadio($fieldName, $fieldValue['title'], $options, NULL, '&nbsp;&nbsp;');
 187               break;
 188
 189             case 'YesNo':
 190               $this->addRadio($fieldName, $fieldValue['title'], array(0 => 'No', 1 => 'Yes'), NULL, '&nbsp;&nbsp;');
 191               break;
 192
 193             case 'checkboxes':
 194               $options = array_flip(CRM_Core_OptionGroup::values($fieldName, FALSE, FALSE, TRUE));
 195               $newOptions = array();
 196               foreach ($options as $key => $val) {
 197                 $newOptions[$key] = $val;
 198               }
 199               $this->addCheckBox($fieldName,
 200                 $fieldValue['title'],
 201                 $newOptions,
 202                 NULL, NULL, NULL, NULL,
 203                 array('&nbsp;&nbsp;', '&nbsp;&nbsp;', '<br/>')
 204               );
 205               break;
 206
 207             case 'select':
 208               $this->addElement('select',
 209                 $fieldName,
 210                 $fieldValue['title'],
 211                 $fieldValue['option_values'],
 212                 CRM_Utils_Array::value('attributes', $fieldValue)
 213               );
 214               break;
 215
 216             case 'wysiwyg':
 217               $this->add('wysiwyg', $fieldName, $fieldValue['title'], $fieldValue['attributes']);
 218               break;
 219
 220             case 'entity_reference':
 221               $this->addEntityRef($fieldName, $fieldValue['title'], CRM_Utils_Array::value('options', $fieldValue, array()));
 222           }
 223         }
 224
 225         $fields = CRM_Utils_Array::crmArraySortByField($fields, 'weight');
 226         $this->assign('fields', $fields);
 227       }
 228     }
 229
 230     $this->addButtons(array(
 231         array(
 232           'type' => 'next',
 233           'name' => ts('Save'),
 234           'isDefault' => TRUE,
 235         ),
 236         array(
 237           'type' => 'cancel',
 238           'name' => ts('Cancel'),
 239         ),
 240       )
 241     );
 242
 243     if ($this->_action == CRM_Core_Action::VIEW) {
 244       $this->freeze();
 245     }
 246   }
 247
 248   /**
 249    * Process the form submission.
 250    */
 251   public function postProcess() {
 252     $config = CRM_Core_Config::singleton();
 253     if ($this->_action == CRM_Core_Action::VIEW) {
 254       return;
 255     }
 256
 257     $this->_params = $this->controller->exportValues($this->_name);
 258
 259     $this->postProcessCommon();
 260   }
 261
 262   /**
 263    * Process the form submission.
 264    */
 265   public function postProcessCommon() {
 266     try {
 267       $this->saveMetadataDefinedSettings($this->_params);
 268       $this->filterParamsSetByMetadata($this->_params);
 269     }
 270     catch (CiviCRM_API3_Exception $e) {
 271       CRM_Core_Session::setStatus($e->getMessage(), ts('Save Failed'), 'error');
 272     }
 273
 274     foreach ($this->_varNames as $groupName => $groupValues) {
 275       foreach ($groupValues as $settingName => $fieldValue) {
 276         switch ($fieldValue['html_type']) {
 277           case 'checkboxes':
 278             if (!empty($this->_params[$settingName]) &&
 279               is_array($this->_params[$settingName])
 280             ) {
 281               $this->_config->$settingName = CRM_Core_DAO::VALUE_SEPARATOR . implode(CRM_Core_DAO::VALUE_SEPARATOR,
 282                   array_keys($this->_params[$settingName])
 283                 ) . CRM_Core_DAO::VALUE_SEPARATOR;
 284             }
 285             else {
 286               $this->_config->$settingName = NULL;
 287             }
 288             break;
 289
 290           case 'checkbox':
 291             $this->_config->$settingName = !empty($this->_params[$settingName]) ? 1 : 0;
 292             break;
 293
 294           case 'text':
 295           case 'select':
 296           case 'radio':
 297           case 'YesNo':
 298           case 'entity_reference':
 299             $this->_config->$settingName = CRM_Utils_Array::value($settingName, $this->_params);
 300             break;
 301
 302           case 'textarea':
 303             $value = CRM_Utils_Array::value($settingName, $this->_params);
 304             if ($value) {
 305               $value = trim($value);
 306               $value = str_replace(array("\r\n", "\r"), "\n", $value);
 307             }
 308             $this->_config->$settingName = $value;
 309             break;
 310         }
 311       }
 312     }
 313
 314     foreach ($this->_varNames as $groupName => $groupValues) {
 315       foreach ($groupValues as $settingName => $fieldValue) {
 316         $settingValue = isset($this->_config->$settingName) ? $this->_config->$settingName : NULL;
 317         Civi::settings()->set($settingName, $settingValue);
 318       }
 319     }
 320     // Update any settings stored in dynamic js
 321     CRM_Core_Resources::singleton()->resetCacheCode();
 322
 323     CRM_Core_Session::setStatus(ts('Your changes have been saved.'), ts('Saved'), 'success');
 324   }
 325
 326 }