3 +--------------------------------------------------------------------+
5 +--------------------------------------------------------------------+
6 | Copyright CiviCRM LLC (c) 2004-2019 |
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-2019
37 * This class generates form components for processing a contribution.
39 class CRM_PCP_Form_PCPAccount
extends CRM_Core_Form
{
42 * Variable defined for Contribution Page Id.
45 public $_pageId = NULL;
47 public $_component = NULL;
50 * Are we in single form mode or wizard mode?
56 public function preProcess() {
57 $session = CRM_Core_Session
::singleton();
58 $config = CRM_Core_Config
::singleton();
59 $this->_action
= CRM_Utils_Request
::retrieve('action', 'String', $this, FALSE);
60 $this->_pageId
= CRM_Utils_Request
::retrieve('pageId', 'Positive', $this);
61 $this->_component
= CRM_Utils_Request
::retrieve('component', 'String', $this);
62 $this->_id
= CRM_Utils_Request
::retrieve('id', 'Positive', $this);
64 if (!$this->_pageId
&& $config->userFramework
== 'Joomla' && $config->userFrameworkFrontend
) {
65 $this->_pageId
= $this->_id
;
69 $contactID = CRM_Core_DAO
::getFieldValue('CRM_PCP_DAO_PCP', $this->_id
, 'contact_id');
72 $this->_contactID
= isset($contactID) ?
$contactID : $session->get('userID');
73 if (!$this->_pageId
) {
75 $msg = ts('We can\'t load the requested web page due to an incomplete link. This can be caused by using your browser\'s Back button or by using an incomplete or invalid link.');
76 CRM_Core_Error
::fatal($msg);
79 $this->_pageId
= CRM_Core_DAO
::getFieldValue('CRM_PCP_DAO_PCP', $this->_id
, 'page_id');
83 if (!$this->_pageId
) {
84 CRM_Core_Error
::fatal(ts('Could not find source page id.'));
87 $this->_single
= $this->get('single');
89 if (!$this->_single
) {
90 $this->_single
= $session->get('singleForm');
93 $this->set('action', $this->_action
);
94 $this->set('page_id', $this->_id
);
95 $this->set('component_page_id', $this->_pageId
);
97 // we do not want to display recently viewed items, so turn off
98 $this->assign('displayRecent', FALSE);
100 $this->assign('pcpComponent', $this->_component
);
102 if ($this->_single
) {
103 CRM_Utils_System
::setTitle(ts('Update Contact Information'));
110 public function setDefaultValues() {
111 $this->_defaults
= [];
112 if ($this->_contactID
) {
113 foreach ($this->_fields
as $name => $dontcare) {
117 CRM_Core_BAO_UFGroup
::setProfileDefaults($this->_contactID
, $fields, $this->_defaults
);
119 //set custom field defaults
120 foreach ($this->_fields
as $name => $field) {
121 if ($customFieldID = CRM_Core_BAO_CustomField
::getKeyID($name)) {
122 if (!isset($this->_defaults
[$name])) {
123 CRM_Core_BAO_CustomField
::setProfileDefaults($customFieldID, $name, $this->_defaults
,
124 NULL, CRM_Profile_Form
::MODE_REGISTER
129 return $this->_defaults
;
133 * Build the form object.
137 public function buildQuickForm() {
138 $id = CRM_PCP_BAO_PCP
::getSupporterProfileId($this->_pageId
, $this->_component
);
139 if (CRM_PCP_BAO_PCP
::checkEmailProfile($id)) {
140 $this->assign('profileDisplay', TRUE);
143 if ($this->_contactID
) {
144 if (CRM_Core_BAO_UFGroup
::filterUFGroups($id, $this->_contactID
)) {
145 $fields = CRM_Core_BAO_UFGroup
::getFields($id, FALSE, CRM_Core_Action
::ADD
);
147 $this->addFormRule(['CRM_PCP_Form_PCPAccount', 'formRule'], $this);
150 CRM_Core_BAO_CMSUser
::buildForm($this, $id, TRUE);
152 $fields = CRM_Core_BAO_UFGroup
::getFields($id, FALSE, CRM_Core_Action
::ADD
);
156 $this->assign('fields', $fields);
158 foreach ($fields as $key => $field) {
159 if (isset($field['data_type']) && $field['data_type'] == 'File') {
160 // ignore file upload fields
163 CRM_Core_BAO_UFGroup
::buildProfile($this, $field, CRM_Profile_Form
::MODE_CREATE
);
164 $this->_fields
[$key] = $field;
166 // CRM-11316 Is ReCAPTCHA enabled for this profile AND is this an anonymous visitor
167 if ($field['add_captcha'] && !$this->_contactID
) {
173 $captcha = &CRM_Utils_ReCAPTCHA
::singleton();
174 $captcha->add($this);
175 $this->assign('isCaptcha', TRUE);
179 if ($this->_component
== 'contribute') {
180 $this->assign('campaignName', CRM_Contribute_PseudoConstant
::contributionPage($this->_pageId
));
182 elseif ($this->_component
== 'event') {
183 $this->assign('campaignName', CRM_Event_PseudoConstant
::event($this->_pageId
));
186 if ($this->_single
) {
190 'name' => ts('Save'),
191 'spacing' => ' ',
196 'name' => ts('Cancel'),
203 'name' => ts('Continue'),
204 'spacing' => ' ',
208 $this->addFormRule(['CRM_PCP_Form_PCPAccount', 'formRule'], $this);
209 $this->addButtons($button);
215 * @param array $fields
216 * The input form values.
217 * @param array $files
218 * The uploaded files if any.
223 * true if no errors, else array of errors
225 public static function formRule($fields, $files, $self) {
227 foreach ($fields as $key => $value) {
228 if (strpos($key, 'email-') !== FALSE && !empty($value)) {
229 $ufContactId = CRM_Core_DAO
::getFieldValue('CRM_Core_DAO_UFMatch', $value, 'contact_id', 'uf_name');
230 if ($ufContactId && $ufContactId != $self->_contactID
) {
231 $errors[$key] = ts('There is already an user associated with this email address. Please enter different email address.');
235 return empty($errors) ?
TRUE : $errors;
239 * Process the form submission.
244 public function postProcess() {
245 $params = $this->controller
->exportValues($this->getName());
247 if (!$this->_contactID
&& isset($params['cms_create_account'])) {
248 foreach ($params as $key => $value) {
249 if (substr($key, 0, 5) == 'email' && !empty($value)) {
250 list($fieldName, $locTypeId) = CRM_Utils_System
::explode('-', $key, 2);
252 if ($locTypeId == 'Primary') {
253 $locTypeDefault = CRM_Core_BAO_LocationType
::getDefault();
255 if ($locTypeDefault) {
256 $locTypeId = $locTypeDefault->id
;
261 $params['email'] = [];
262 $params['email'][1]['email'] = $value;
263 $params['email'][1]['location_type_id'] = $locTypeId;
264 $params['email'][1]['is_primary'] = $isPrimary;
269 $this->_contactID
= CRM_Contact_BAO_Contact
::getFirstDuplicateContact($params, 'Individual', 'Unsupervised', [], FALSE);
271 $contactID = CRM_Contact_BAO_Contact
::createProfileContact($params, $this->_fields
, $this->_contactID
);
272 $this->set('contactID', $contactID);
274 if (!empty($params['email'])) {
275 $params['email'] = $params['email'][1]['email'];
278 CRM_Contribute_BAO_Contribution_Utils
::createCMSUser($params, $contactID, 'email');