3 +--------------------------------------------------------------------+
4 | CiviCRM version 4.4 |
5 +--------------------------------------------------------------------+
6 | Copyright CiviCRM LLC (c) 2004-2013 |
7 +--------------------------------------------------------------------+
8 | This file is a part of CiviCRM. |
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. |
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. |
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 +--------------------------------------------------------------------+
31 * @copyright CiviCRM LLC (c) 2004-2013
37 * This class generates form components for custom data
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.
44 class CRM_Profile_Form_Edit
extends CRM_Profile_Form
{
45 protected $_postURL = NULL;
46 protected $_cancelURL = NULL;
47 protected $_errorURL = NULL;
53 * pre processing work done here.
62 function preProcess() {
63 $this->_mode
= CRM_Profile_Form
::MODE_CREATE
;
65 $this->_onPopupClose
= CRM_Utils_Request
::retrieve('onPopupClose', 'String', $this);
66 $this->assign('onPopupClose', $this->_onPopupClose
);
68 //set the context for the profile
69 $this->_context
= CRM_Utils_Request
::retrieve('context', 'String', $this);
72 $this->_blockNo
= CRM_Utils_Request
::retrieve('blockNo', 'String', $this);
75 $this->_prefix
= CRM_Utils_Request
::retrieve('prefix', 'String', $this);
77 $this->assign('context', $this->_context
);
79 if ($this->_blockNo
) {
80 $this->assign('blockNo', $this->_blockNo
);
81 $this->assign('prefix', $this->_prefix
);
84 $this->assign('createCallback', CRM_Utils_Request
::retrieve('createCallback', 'String', $this));
86 if ($this->get('skipPermission')) {
87 $this->_skipPermission
= TRUE;
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);
98 $this->_mode
= CRM_Profile_Form
::MODE_EDIT
;
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);
107 CRM_Contact_BAO_Contact_Permission
::validateChecksumContact($id, $this);
109 $this->_isPermissionedChecksum
= TRUE;
114 parent
::preProcess();
116 // make sure the gid is set and valid
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
)
123 // and also the profile is of type 'Profile'
127 WHERE module = 'Profile'
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
)
140 * Function to actually build the form
145 public function buildQuickForm() {
146 if (empty($this->_ufGroup
['id'])) {
147 CRM_Core_Error
::fatal();
151 if ($this->_multiRecord
&& $this->_customGroupTitle
) {
152 $groupTitle = ($this->_multiRecord
& CRM_Core_Action
::UPDATE
) ?
153 'Edit ' . $this->_customGroupTitle
. ' Record' : $this->_customGroupTitle
;
156 $groupTitle = $this->_ufGroup
['title'];
158 CRM_Utils_System
::setTitle($groupTitle);
159 $this->assign('recentlyViewed', FALSE);
161 if ($this->_context
!= 'dialog') {
162 $this->_postURL
= $this->_ufGroup
['post_URL'];
163 $this->_cancelURL
= $this->_ufGroup
['cancel_URL'];
165 $gidString = $this->_gid
;
166 if (!empty($this->_profileIds
)) {
167 $gidString = implode(',', $this->_profileIds
);
170 if (!$this->_postURL
) {
171 if ($this->_context
== 'Search') {
172 $this->_postURL
= CRM_Utils_System
::url('civicrm/contact/search');
174 elseif ($this->_id
&& $this->_gid
) {
175 $urlParams = "reset=1&id={$this->_id}&gid={$gidString}";
176 if ($this->_isContactActivityProfile
&& $this->_activityId
) {
177 $urlParams .= "&aid={$this->_activityId}";
179 // get checksum if present
180 if ($this->get('cs')) {
181 $urlParams .= "&cs=" . $this->get('cs');
183 $this->_postURL
= CRM_Utils_System
::url('civicrm/profile/view', $urlParams);
187 if (!$this->_cancelURL
) {
188 $this->_cancelURL
= CRM_Utils_System
::url('civicrm/profile',
189 "reset=1&gid={$gidString}"
193 if ($this->_multiRecordProfile
) {
194 $urlParams = "reset=1&id={$this->_id}&gid={$gidString}";
196 // get checksum if present
197 if ($this->get('cs')) {
198 $urlParams .= "&cs=" . $this->get('cs');
200 $this->_postURL
= CRM_Utils_System
::url('civicrm/profile/edit', $urlParams);
201 $this->_cancelURL
= CRM_Utils_System
::url('civicrm/profile/edit', $urlParams);
203 //passing the post url to template so the popup form does
204 //proper redirection and proccess form errors if any
205 if (!isset($this->_onPopupClose
) ||
$this->_onPopupClose
== 'redirectToProfile') {
206 $popupRedirect = CRM_Utils_System
::url('civicrm/profile/edit', $urlParams, FALSE, NULL, FALSE);
208 elseif ($this->_onPopupClose
== 'redirectToTab') {
209 $popupRedirect = CRM_Utils_System
::url('civicrm/contact/view',
210 "reset=1&cid={$this->_id}&selectedChild=custom_{$this->_customGroupId}", FALSE, NULL, FALSE);
213 $this->assign('urlParams', $urlParams);
214 $this->assign('postUrl', $popupRedirect);
217 // we do this gross hack since qf also does entity replacement
218 $this->_postURL
= str_replace('&', '&', $this->_postURL
);
219 $this->_cancelURL
= str_replace('&', '&', $this->_cancelURL
);
221 // also retain error URL if set
222 $this->_errorURL
= CRM_Utils_Array
::value('errorURL', $_POST);
223 if ($this->_errorURL
) {
224 // we do this gross hack since qf also does entity replacement
225 $this->_errorURL
= str_replace('&', '&', $this->_errorURL
);
226 $this->addElement('hidden', 'errorURL', $this->_errorURL
);
229 // replace the session stack in case user cancels (and we dont go into postProcess)
230 $session = CRM_Core_Session
::singleton();
231 $session->replaceUserContext($this->_postURL
);
234 parent
::buildQuickForm();
236 if (($this->_multiRecord
& CRM_Core_Action
::DELETE
) && $this->_recordExists
) {
237 $this->_deleteButtonName
= $this->getButtonName('upload', 'delete');
239 $this->addElement('submit',
240 $this->_deleteButtonName
,
246 'name' => ts('Cancel'),
248 'js' => array('onclick' => "location.href='{$this->_cancelURL}'; return false;"),
250 $this->addButtons($buttons);
254 //get the value from session, this is set if there is any file
256 $uploadNames = $this->get('uploadNames');
258 if (!empty($uploadNames)) {
259 $buttonName = 'upload';
262 $buttonName = 'next';
266 'type' => $buttonName,
267 'name' => ts('Save'),
271 if ($this->_context
!= 'dialog') {
274 'name' => ts('Cancel'),
276 'js' => array('onclick' => "location.href='{$this->_cancelURL}'; return false;"),
280 $this->addButtons($buttons);
282 $this->addFormRule(array('CRM_Profile_Form', 'formRule'), $this);
286 * Process the user submitted custom data values.
292 public function postProcess() {
293 parent
::postProcess();
295 // this is special case when we create contact using Dialog box
296 if ($this->_context
== 'dialog') {
297 $displayName = CRM_Core_DAO
::getFieldValue('CRM_Contact_DAO_Contact', $this->_id
, 'display_name');
298 $sortName = CRM_Core_DAO
::getFieldValue('CRM_Contact_DAO_Contact', $this->_id
, 'sort_name');
299 $returnArray = array(
300 'contactID' => $this->_id
,
301 'displayName' => $displayName,
302 'sortName' => $sortName,
303 'newContactSuccess' => TRUE,
306 echo json_encode($returnArray);
307 CRM_Utils_System
::civiExit();
310 //for delete record handling
311 if (!CRM_Utils_Array
::value($this->_deleteButtonName
, $_POST)) {
312 CRM_Core_Session
::setStatus(ts('Your information has been saved.'), ts('Thank you.'), 'success');
315 $session = CRM_Core_Session
::singleton();
316 // only replace user context if we do not have a postURL
317 if (!$this->_postURL
) {
318 $gidString = $this->_gid
;
319 if (!empty($this->_profileIds
)) {
320 $gidString = implode(',', $this->_profileIds
);
323 $urlParams = "reset=1&id={$this->_id}&gid={$gidString}";
324 if ($this->_isContactActivityProfile
&& $this->_activityId
) {
325 $urlParams .= "&aid={$this->_activityId}";
327 // Get checksum if present
328 if ($this->get('cs')) {
329 $urlParams .= "&cs=" . $this->get('cs');
331 // Generate one if needed
332 elseif (!CRM_Contact_BAO_Contact_Permission
::allow($this->_id
)) {
333 $urlParams .= "&cs=" . CRM_Contact_BAO_Contact_Utils
::generateChecksum($this->_id
);
335 $url = CRM_Utils_System
::url('civicrm/profile/view', $urlParams);
338 // Replace tokens from post URL
339 $contactParams = array(
340 'contact_id' => $this->_id
,
344 $contact = civicrm_api('contact', 'get', $contactParams);
345 $contact = reset($contact['values']);
347 $dummyMail = new CRM_Mailing_BAO_Mailing();
348 $dummyMail->body_text
= $this->_postURL
;
349 $tokens = $dummyMail->getTokens();
351 $url = CRM_Utils_Token
::replaceContactTokens($this->_postURL
, $contact, FALSE, CRM_Utils_Array
::value('text', $tokens));
354 $session->replaceUserContext($url);
358 * Function to intercept QF validation and do our own redirection
360 * We use this to send control back to the user for a user formatted page
361 * This allows the user to maintain the same state and display the error messages
362 * in their own theme along with any modifications
364 * This is a first version and will be tweaked over a period of time
368 * @return boolean true if no error found
370 function validate() {
371 $errors = parent
::validate();
374 CRM_Utils_Array
::value('errorURL', $_POST)
377 foreach ($this->_errors
as $name => $mess) {
382 CRM_Utils_System
::setUFMessage($message);
384 $message = urlencode($message);
386 $errorURL = $_POST['errorURL'];
387 if (strpos($errorURL, '?') !== FALSE) {
393 $errorURL .= "gid={$this->_gid}&msg=$message";
394 CRM_Utils_System
::redirect($errorURL);