Update Copywrite year to be 2019
[civicrm-core.git] / CRM / Admin / Form / Preferences.php
CommitLineData
6a488035
TO
1<?php
2/*
3 +--------------------------------------------------------------------+
fee14197 4 | CiviCRM version 5 |
6a488035 5 +--------------------------------------------------------------------+
6b83d5bd 6 | Copyright CiviCRM LLC (c) 2004-2019 |
6a488035
TO
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 +--------------------------------------------------------------------+
d25dd0ee 26 */
6a488035
TO
27
28/**
29 *
30 * @package CRM
6b83d5bd 31 * @copyright CiviCRM LLC (c) 2004-2019
6a488035
TO
32 */
33
34/**
ce064e4f 35 * Base class for settings forms.
6a488035
TO
36 */
37class CRM_Admin_Form_Preferences extends CRM_Core_Form {
a55c9b35 38
39 use CRM_Admin_Form_SettingTrait;
40
6a488035
TO
41 protected $_system = FALSE;
42 protected $_contactID = NULL;
3a936dab 43 public $_action = NULL;
6a488035
TO
44
45 protected $_checkbox = NULL;
46
b70c6629 47 protected $_varNames = [];
6a488035
TO
48
49 protected $_config = NULL;
50
51 protected $_params = NULL;
52
00be9182 53 public function preProcess() {
6a488035
TO
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
a55c9b35 91 $this->addFieldsDefinedInSettingsMetadata();
26cc63d3 92 $settings = Civi::settings();
601361a3 93 // @todo replace this by defining all in settings.
6a488035 94 foreach ($this->_varNames as $groupName => $settingNames) {
2f6c641a 95 CRM_Core_Error::deprecatedFunctionWarning('deprecated use of preferences form. This will be removed from core soon');
26cc63d3
TO
96 foreach ($settingNames as $settingName => $options) {
97 $this->_config->$settingName = $settings->get($settingName);
6a488035
TO
98 }
99 }
100 $session->pushUserContext(CRM_Utils_System::url('civicrm/admin', 'reset=1'));
101 }
102
e0ef6999
EM
103 /**
104 * @return array
105 */
00be9182 106 public function setDefaultValues() {
601361a3 107 $this->_defaults = array();
6a488035 108
601361a3 109 $this->setDefaultsForMetadataDefinedFields();
6a488035 110 foreach ($this->_varNames as $groupName => $settings) {
2f6c641a 111 CRM_Core_Error::deprecatedFunctionWarning('deprecated use of preferences form. This will be removed from core soon');
6a488035 112 foreach ($settings as $settingName => $settingDetails) {
601361a3 113 $this->_defaults[$settingName] = isset($this->_config->$settingName) ? $this->_config->$settingName : CRM_Utils_Array::value('default', $settingDetails, NULL);
6a488035
TO
114 }
115 }
116
601361a3 117 return $this->_defaults;
6a488035
TO
118 }
119
e0ef6999 120 /**
6821aa1d 121 * @todo deprecate in favour of setting using metadata.
122 *
e0ef6999
EM
123 * @param $defaults
124 */
00be9182 125 public function cbsDefaultValues(&$defaults) {
6a488035
TO
126
127 foreach ($this->_varNames as $groupName => $groupValues) {
2f6c641a 128 CRM_Core_Error::deprecatedFunctionWarning('deprecated use of preferences form. This will be removed from core soon');
6a488035
TO
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 /**
eceb18cc 150 * Build the form object.
6a488035
TO
151 */
152 public function buildQuickForm() {
153 parent::buildQuickForm();
154
6a488035 155 if (!empty($this->_varNames)) {
2f6c641a 156 CRM_Core_Error::deprecatedFunctionWarning('deprecated use of preferences form. This will be removed from core soon');
6a488035
TO
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':
65f9bd70
KJ
177 case 'checkbox':
178 $this->add($fieldValue['html_type'],
6a488035
TO
179 $fieldName,
180 $fieldValue['title']
181 );
182 break;
183
65f9bd70
KJ
184 case 'radio':
185 $options = CRM_Core_OptionGroup::values($fieldName, FALSE, FALSE, TRUE);
186 $this->addRadio($fieldName, $fieldValue['title'], $options, NULL, '&nbsp;&nbsp;');
6a488035
TO
187 break;
188
04c56532
SL
189 case 'YesNo':
190 $this->addRadio($fieldName, $fieldValue['title'], array(0 => 'No', 1 => 'Yes'), NULL, '&nbsp;&nbsp;');
191 break;
192
6a488035
TO
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;
8b01c2f2 206
b8ce3328 207 case 'select':
208 $this->addElement('select',
209 $fieldName,
210 $fieldValue['title'],
b5407aa9
JP
211 $fieldValue['option_values'],
212 CRM_Utils_Array::value('attributes', $fieldValue)
b8ce3328 213 );
214 break;
215
fff0f449 216 case 'wysiwyg':
5d51a2f9 217 $this->add('wysiwyg', $fieldName, $fieldValue['title'], $fieldValue['attributes']);
fff0f449 218 break;
219
8b01c2f2 220 case 'entity_reference':
c85faa08 221 $this->addEntityRef($fieldName, $fieldValue['title'], CRM_Utils_Array::value('options', $fieldValue, array()));
6a488035
TO
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 /**
eceb18cc 249 * Process the form submission.
6a488035
TO
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 }
6a488035
TO
261
262 /**
eceb18cc 263 * Process the form submission.
6a488035
TO
264 */
265 public function postProcessCommon() {
6821aa1d 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
6a488035
TO
274 foreach ($this->_varNames as $groupName => $groupValues) {
275 foreach ($groupValues as $settingName => $fieldValue) {
276 switch ($fieldValue['html_type']) {
277 case 'checkboxes':
a7488080 278 if (!empty($this->_params[$settingName]) &&
6a488035
TO
279 is_array($this->_params[$settingName])
280 ) {
281 $this->_config->$settingName = CRM_Core_DAO::VALUE_SEPARATOR . implode(CRM_Core_DAO::VALUE_SEPARATOR,
353ffa53
TO
282 array_keys($this->_params[$settingName])
283 ) . CRM_Core_DAO::VALUE_SEPARATOR;
6a488035
TO
284 }
285 else {
286 $this->_config->$settingName = NULL;
287 }
288 break;
289
290 case 'checkbox':
0d8afee2 291 $this->_config->$settingName = !empty($this->_params[$settingName]) ? 1 : 0;
6a488035
TO
292 break;
293
294 case 'text':
295 case 'select':
66c3132c 296 case 'radio':
04c56532 297 case 'YesNo':
e2106968 298 case 'entity_reference':
6a488035
TO
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;
08ef4ddd 317 Civi::settings()->set($settingName, $settingValue);
6a488035
TO
318 }
319 }
7b83e312
CW
320 // Update any settings stored in dynamic js
321 CRM_Core_Resources::singleton()->resetCacheCode();
6a488035
TO
322
323 CRM_Core_Session::setStatus(ts('Your changes have been saved.'), ts('Saved'), 'success');
324 }
325
326}