Merge pull request #2564 from jaapjansma/CRM-14276
[civicrm-core.git] / CRM / Profile / Form / Edit.php
1 <?php
2 /*
3 +--------------------------------------------------------------------+
4 | CiviCRM version 4.5 |
5 +--------------------------------------------------------------------+
6 | Copyright CiviCRM LLC (c) 2004-2014 |
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-2014
32 * $Id$
33 *
34 */
35
36 /**
37 * This class generates form components for custom data
38 *
39 * It delegates the work to lower level subclasses and integrates the changes
40 * back in. It also uses a lot of functionality with the CRM API's, so any change
41 * made here could potentially affect the API etc. Be careful, be aware, use unit tests.
42 *
43 */
44 class CRM_Profile_Form_Edit extends CRM_Profile_Form {
45 protected $_postURL = NULL;
46 protected $_cancelURL = NULL;
47 protected $_errorURL = NULL;
48 protected $_context;
49 protected $_blockNo;
50 protected $_prefix;
51
52 /**
53 * pre processing work done here.
54 *
55 * @param
56 *
57 * @return void
58 *
59 * @access public
60 *
61 */
62 function preProcess() {
63 $this->_mode = CRM_Profile_Form::MODE_CREATE;
64
65 $this->_onPopupClose = CRM_Utils_Request::retrieve('onPopupClose', 'String', $this);
66 $this->assign('onPopupClose', $this->_onPopupClose);
67
68 //set the context for the profile
69 $this->_context = CRM_Utils_Request::retrieve('context', 'String', $this);
70
71 //set the block no
72 $this->_blockNo = CRM_Utils_Request::retrieve('blockNo', 'String', $this);
73
74 //set the prefix
75 $this->_prefix = CRM_Utils_Request::retrieve('prefix', 'String', $this);
76
77 $this->assign('context', $this->_context);
78
79 if ($this->_blockNo) {
80 $this->assign('blockNo', $this->_blockNo);
81 $this->assign('prefix', $this->_prefix);
82 }
83
84 $this->assign('createCallback', CRM_Utils_Request::retrieve('createCallback', 'String', $this));
85
86 if ($this->get('skipPermission')) {
87 $this->_skipPermission = TRUE;
88 }
89
90 if ($this->get('edit')) {
91 // make sure we have right permission to edit this user
92 $session = CRM_Core_Session::singleton();
93 $userID = $session->get('userID');
94 $id = CRM_Utils_Request::retrieve('id', 'Positive', $this, FALSE, $userID);
95
96 if ($id) {
97 // this is edit mode.
98 $this->_mode = CRM_Profile_Form::MODE_EDIT;
99
100 if ($id != $userID) {
101 // do not allow edit for anon users in joomla frontend, CRM-4668, unless u have checksum CRM-5228
102 $config = CRM_Core_Config::singleton();
103 if ($config->userFrameworkFrontend) {
104 CRM_Contact_BAO_Contact_Permission::validateOnlyChecksum($id, $this);
105 }
106 else {
107 CRM_Contact_BAO_Contact_Permission::validateChecksumContact($id, $this);
108 }
109 $this->_isPermissionedChecksum = TRUE;
110 }
111 }
112 }
113
114 parent::preProcess();
115
116 // make sure the gid is set and valid
117 if (!$this->_gid) {
118 CRM_Core_Error::fatal(ts('The requested Profile (gid=%1) is disabled, OR there is no Profile with that ID, OR a valid \'gid=\' integer value is missing from the URL. Contact the site administrator if you need assistance.',
119 array(1 => $this->_gid)
120 ));
121 }
122
123 // and also the profile is of type 'Profile'
124 $query = "
125 SELECT module
126 FROM civicrm_uf_join
127 WHERE module = 'Profile'
128 AND uf_group_id = %1
129 ";
130 $params = array(1 => array($this->_gid, 'Integer'));
131 $dao = CRM_Core_DAO::executeQuery($query, $params);
132 if (!$dao->fetch()) {
133 CRM_Core_Error::fatal(ts('The requested Profile (gid=%1) is not configured to be used for \'Profile\' edit and view forms in its Settings. Contact the site administrator if you need assistance.',
134 array(1 => $this->_gid)
135 ));
136 }
137 }
138
139 /**
140 * Function to actually build the form
141 *
142 * @return void
143 * @access public
144 */
145 public function buildQuickForm() {
146 // add the hidden field to redirect the postProcess from
147 $ufGroup = new CRM_Core_DAO_UFGroup();
148
149 $ufGroup->id = $this->_gid;
150 if (!$ufGroup->find(TRUE)) {
151 CRM_Core_Error::fatal();
152 }
153
154 // set the title
155 if ($this->_multiRecord && $this->_customGroupTitle) {
156 $groupTitle = ($this->_multiRecord & CRM_Core_Action::UPDATE) ?
157 'Edit ' . $this->_customGroupTitle . ' Record' : $this->_customGroupTitle;
158
159 } else {
160 $groupTitle = $ufGroup->title;
161 }
162 CRM_Utils_System::setTitle($groupTitle);
163 $this->assign('recentlyViewed', FALSE);
164
165 if ($this->_context != 'dialog') {
166 $this->_postURL = CRM_Utils_Array::value('postURL', $_POST);
167 $this->_cancelURL = CRM_Utils_Array::value('cancelURL', $_POST);
168
169 $gidString = $this->_gid;
170 if (!empty($this->_profileIds)) {
171 $gidString = implode(',', $this->_profileIds);
172 }
173
174 if (!$this->_postURL) {
175 $this->_postURL = $ufGroup->post_URL;
176 }
177
178 if (!$this->_postURL) {
179 if ($this->_context == 'Search') {
180 $this->_postURL = CRM_Utils_System::url('civicrm/contact/search');
181 }
182 elseif ($this->_id && $this->_gid) {
183 $urlParams = "reset=1&id={$this->_id}&gid={$gidString}";
184 if ($this->_isContactActivityProfile && $this->_activityId) {
185 $urlParams .= "&aid={$this->_activityId}";
186 }
187 // get checksum if present
188 if ($this->get('cs')) {
189 $urlParams .= "&cs=" . $this->get('cs');
190 }
191 $this->_postURL = CRM_Utils_System::url('civicrm/profile/view', $urlParams);
192 }
193 }
194
195 if (!$this->_cancelURL) {
196 if ($ufGroup->cancel_URL) {
197 $this->_cancelURL = $ufGroup->cancel_URL;
198 }
199 else {
200 $this->_cancelURL = CRM_Utils_System::url('civicrm/profile',
201 "reset=1&gid={$gidString}"
202 );
203 }
204 }
205
206 // we do this gross hack since qf also does entity replacement
207 $this->_postURL = str_replace('&amp;', '&', $this->_postURL);
208 $this->_cancelURL = str_replace('&amp;', '&', $this->_cancelURL);
209
210 $this->addElement('hidden', 'postURL', $this->_postURL);
211 if ($this->_cancelURL) {
212 $this->addElement('hidden', 'cancelURL', $this->_cancelURL);
213 }
214
215 // also retain error URL if set
216 $this->_errorURL = CRM_Utils_Array::value('errorURL', $_POST);
217 if ($this->_errorURL) {
218 // we do this gross hack since qf also does entity replacement
219 $this->_errorURL = str_replace('&amp;', '&', $this->_errorURL);
220 $this->addElement('hidden', 'errorURL', $this->_errorURL);
221 }
222
223 // replace the session stack in case user cancels (and we dont go into postProcess)
224 $session = CRM_Core_Session::singleton();
225 $session->replaceUserContext($this->_postURL);
226 }
227
228 parent::buildQuickForm();
229
230 if (($this->_multiRecord & CRM_Core_Action::DELETE) && $this->_recordExists) {
231 $this->_deleteButtonName = $this->getButtonName('upload', 'delete');
232
233 $this->addElement('submit', $this->_deleteButtonName, ts('Delete'));
234
235 $buttons[] = array(
236 'type' => 'cancel',
237 'name' => ts('Cancel'),
238 'isDefault' => TRUE,
239 );
240 $this->addButtons($buttons);
241 return;
242 }
243
244 //get the value from session, this is set if there is any file
245 //upload field
246 $uploadNames = $this->get('uploadNames');
247
248 if (!empty($uploadNames)) {
249 $buttonName = 'upload';
250 }
251 else {
252 $buttonName = 'next';
253 }
254
255 $buttons[] = array(
256 'type' => $buttonName,
257 'name' => ts('Save'),
258 'isDefault' => TRUE,
259 );
260
261 $buttons[] = array(
262 'type' => 'cancel',
263 'name' => ts('Cancel'),
264 'isDefault' => TRUE,
265 );
266
267 $this->addButtons($buttons);
268
269 $this->addFormRule(array('CRM_Profile_Form', 'formRule'), $this);
270 }
271
272 /**
273 * Process the user submitted custom data values.
274 *
275 * @access public
276 *
277 * @return void
278 */
279 public function postProcess() {
280 parent::postProcess();
281
282 $displayName = CRM_Core_DAO::getFieldValue('CRM_Contact_DAO_Contact', $this->_id, 'display_name');
283 $sortName = CRM_Core_DAO::getFieldValue('CRM_Contact_DAO_Contact', $this->_id, 'sort_name');
284 $this->ajaxResponse['label'] = $sortName;
285
286 // When saving (not deleting) and not in an ajax popup
287 if (empty($_POST[$this->_deleteButtonName]) && $this->_context != 'dialog') {
288 CRM_Core_Session::setStatus(ts('Your information has been saved.'), ts('Thank you.'), 'success');
289 }
290
291 $session = CRM_Core_Session::singleton();
292 // only replace user context if we do not have a postURL
293 if (!$this->_postURL) {
294 $gidString = $this->_gid;
295 if (!empty($this->_profileIds)) {
296 $gidString = implode(',', $this->_profileIds);
297 }
298
299 $urlParams = "reset=1&id={$this->_id}&gid={$gidString}";
300 if ($this->_isContactActivityProfile && $this->_activityId) {
301 $urlParams .= "&aid={$this->_activityId}";
302 }
303 // Get checksum if present
304 if ($this->get('cs')) {
305 $urlParams .= "&cs=" . $this->get('cs');
306 }
307 // Generate one if needed
308 elseif (!CRM_Contact_BAO_Contact_Permission::allow($this->_id)) {
309 $urlParams .= "&cs=" . CRM_Contact_BAO_Contact_Utils::generateChecksum($this->_id);
310 }
311 $url = CRM_Utils_System::url('civicrm/profile/view', $urlParams);
312 }
313 else {
314 // Replace tokens from post URL
315 $contactParams = array(
316 'contact_id' => $this->_id,
317 'version' => 3,
318 );
319
320 $contact = civicrm_api('contact', 'get', $contactParams);
321 $contact = reset($contact['values']);
322
323 $dummyMail = new CRM_Mailing_BAO_Mailing();
324 $dummyMail->body_text = $this->_postURL;
325 $tokens = $dummyMail->getTokens();
326
327 $url = CRM_Utils_Token::replaceContactTokens($this->_postURL, $contact, FALSE, CRM_Utils_Array::value('text', $tokens));
328 }
329
330 $session->replaceUserContext($url);
331 }
332
333 /**
334 * Function to intercept QF validation and do our own redirection
335 *
336 * We use this to send control back to the user for a user formatted page
337 * This allows the user to maintain the same state and display the error messages
338 * in their own theme along with any modifications
339 *
340 * This is a first version and will be tweaked over a period of time
341 *
342 * @access public
343 *
344 * @return boolean true if no error found
345 */
346 function validate() {
347 $errors = parent::validate();
348
349 if (!$errors && !empty($_POST['errorURL'])) {
350 $message = NULL;
351 foreach ($this->_errors as $name => $mess) {
352 $message .= $mess;
353 $message .= '<p>';
354 }
355
356 CRM_Utils_System::setUFMessage($message);
357
358 $message = urlencode($message);
359
360 $errorURL = $_POST['errorURL'];
361 if (strpos($errorURL, '?') !== FALSE) {
362 $errorURL .= '&';
363 }
364 else {
365 $errorURL .= '?';
366 }
367 $errorURL .= "gid={$this->_gid}&msg=$message";
368 CRM_Utils_System::redirect($errorURL);
369 }
370
371 return $errors;
372 }
373 }
374