Commit | Line | Data |
---|---|---|
6a488035 TO |
1 | <?php |
2 | /* | |
3 | +--------------------------------------------------------------------+ | |
06b69b18 | 4 | | CiviCRM version 4.5 | |
6a488035 | 5 | +--------------------------------------------------------------------+ |
06b69b18 | 6 | | Copyright CiviCRM LLC (c) 2004-2014 | |
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 | +--------------------------------------------------------------------+ | |
26 | */ | |
27 | ||
28 | /** | |
29 | * | |
30 | * @package CRM | |
06b69b18 | 31 | * @copyright CiviCRM LLC (c) 2004-2014 |
6a488035 TO |
32 | * $Id$ |
33 | * | |
34 | */ | |
35 | class CRM_Dedupe_Merger { | |
6a488035 TO |
36 | |
37 | // FIXME: consider creating a common structure with cidRefs() and eidRefs() | |
38 | // FIXME: the sub-pages references by the URLs should | |
39 | // be loaded dynamically on the merge form instead | |
e0ef6999 EM |
40 | /** |
41 | * @return array | |
42 | */ | |
6a488035 TO |
43 | static function relTables() { |
44 | static $relTables; | |
45 | ||
46 | $config = CRM_Core_Config::singleton(); | |
47 | if ($config->userSystem->is_drupal) { | |
48 | $userRecordUrl = CRM_Utils_System::url('user/%ufid'); | |
49 | $title = ts('%1 User: %2; user id: %3', array(1 => $config->userFramework, 2 => '$ufname', 3 => '$ufid')); | |
50 | } | |
51 | elseif ($config->userFramework == 'Joomla') { | |
52 | $userRecordUrl = $config->userFrameworkVersion > 1.5 ? $config->userFrameworkBaseURL . "index.php?option=com_users&view=user&task=user.edit&id=" . '%ufid' : $config->userFrameworkBaseURL . "index2.php?option=com_users&view=user&task=edit&id[]=" . '%ufid'; | |
53 | $title = ts('%1 User: %2; user id: %3', array(1 => $config->userFramework, 2 => '$ufname', 3 => '$ufid')); | |
54 | } | |
55 | ||
56 | if (!$relTables) { | |
57 | $relTables = array( | |
58 | 'rel_table_contributions' => array( | |
59 | 'title' => ts('Contributions'), | |
60 | 'tables' => array('civicrm_contribution', 'civicrm_contribution_recur', 'civicrm_contribution_soft'), | |
61 | 'url' => CRM_Utils_System::url('civicrm/contact/view', 'reset=1&force=1&cid=$cid&selectedChild=contribute'), | |
62 | ), | |
63 | 'rel_table_contribution_page' => array( | |
64 | 'title' => ts('Contribution Pages'), | |
65 | 'tables' => array('civicrm_contribution_page'), | |
66 | 'url' => CRM_Utils_System::url('civicrm/admin/contribute', 'reset=1&cid=$cid'), | |
67 | ), | |
68 | 'rel_table_memberships' => array( | |
69 | 'title' => ts('Memberships'), | |
70 | 'tables' => array('civicrm_membership', 'civicrm_membership_log', 'civicrm_membership_type'), | |
71 | 'url' => CRM_Utils_System::url('civicrm/contact/view', 'reset=1&force=1&cid=$cid&selectedChild=member'), | |
72 | ), | |
73 | 'rel_table_participants' => array( | |
74 | 'title' => ts('Participants'), | |
75 | 'tables' => array('civicrm_participant'), | |
76 | 'url' => CRM_Utils_System::url('civicrm/contact/view', 'reset=1&force=1&cid=$cid&selectedChild=participant'), | |
77 | ), | |
78 | 'rel_table_events' => array( | |
79 | 'title' => ts('Events'), | |
80 | 'tables' => array('civicrm_event'), | |
81 | 'url' => CRM_Utils_System::url('civicrm/event/manage', 'reset=1&cid=$cid'), | |
82 | ), | |
83 | 'rel_table_activities' => array( | |
84 | 'title' => ts('Activities'), | |
91da6cd5 | 85 | 'tables' => array('civicrm_activity', 'civicrm_activity_contact'), |
6a488035 TO |
86 | 'url' => CRM_Utils_System::url('civicrm/contact/view', 'reset=1&force=1&cid=$cid&selectedChild=activity'), |
87 | ), | |
88 | 'rel_table_relationships' => array( | |
89 | 'title' => ts('Relationships'), | |
90 | 'tables' => array('civicrm_relationship'), | |
91 | 'url' => CRM_Utils_System::url('civicrm/contact/view', 'reset=1&force=1&cid=$cid&selectedChild=rel'), | |
92 | ), | |
93 | 'rel_table_custom_groups' => array( | |
94 | 'title' => ts('Custom Groups'), | |
95 | 'tables' => array('civicrm_custom_group'), | |
96 | 'url' => CRM_Utils_System::url('civicrm/admin/custom/group', 'reset=1'), | |
97 | ), | |
98 | 'rel_table_uf_groups' => array( | |
99 | 'title' => ts('Profiles'), | |
100 | 'tables' => array('civicrm_uf_group'), | |
101 | 'url' => CRM_Utils_System::url('civicrm/admin/uf/group', 'reset=1'), | |
102 | ), | |
103 | 'rel_table_groups' => array( | |
104 | 'title' => ts('Groups'), | |
105 | 'tables' => array('civicrm_group_contact'), | |
106 | 'url' => CRM_Utils_System::url('civicrm/contact/view', 'reset=1&force=1&cid=$cid&selectedChild=group'), | |
107 | ), | |
108 | 'rel_table_notes' => array( | |
109 | 'title' => ts('Notes'), | |
110 | 'tables' => array('civicrm_note'), | |
111 | 'url' => CRM_Utils_System::url('civicrm/contact/view', 'reset=1&force=1&cid=$cid&selectedChild=note'), | |
112 | ), | |
113 | 'rel_table_tags' => array( | |
114 | 'title' => ts('Tags'), | |
115 | 'tables' => array('civicrm_entity_tag'), | |
116 | 'url' => CRM_Utils_System::url('civicrm/contact/view', 'reset=1&force=1&cid=$cid&selectedChild=tag'), | |
117 | ), | |
118 | 'rel_table_mailings' => array( | |
119 | 'title' => ts('Mailings'), | |
120 | 'tables' => array('civicrm_mailing', 'civicrm_mailing_event_queue', 'civicrm_mailing_event_subscribe'), | |
121 | 'url' => CRM_Utils_System::url('civicrm/mailing', 'reset=1&force=1&cid=$cid'), | |
122 | ), | |
123 | 'rel_table_cases' => array( | |
124 | 'title' => ts('Cases'), | |
125 | 'tables' => array('civicrm_case_contact'), | |
126 | 'url' => CRM_Utils_System::url('civicrm/contact/view', 'reset=1&force=1&cid=$cid&selectedChild=case'), | |
127 | ), | |
128 | 'rel_table_grants' => array( | |
129 | 'title' => ts('Grants'), | |
130 | 'tables' => array('civicrm_grant'), | |
131 | 'url' => CRM_Utils_System::url('civicrm/contact/view', 'reset=1&force=1&cid=$cid&selectedChild=grant'), | |
132 | ), | |
133 | 'rel_table_pcp' => array( | |
134 | 'title' => ts('PCPs'), | |
135 | 'tables' => array('civicrm_pcp'), | |
136 | 'url' => CRM_Utils_System::url('civicrm/contribute/pcp/manage', 'reset=1'), | |
137 | ), | |
138 | 'rel_table_pledges' => array( | |
139 | 'title' => ts('Pledges'), | |
140 | 'tables' => array('civicrm_pledge', 'civicrm_pledge_payment'), | |
141 | 'url' => CRM_Utils_System::url('civicrm/contact/view', 'reset=1&force=1&cid=$cid&selectedChild=pledge'), | |
142 | ), | |
143 | 'rel_table_users' => array( | |
144 | 'title' => $title, | |
145 | 'tables' => array('civicrm_uf_match'), | |
146 | 'url' => $userRecordUrl, | |
147 | ), | |
148 | ); | |
149 | ||
76c53278 CW |
150 | $relTables += self::getMultiValueCustomSets('relTables'); |
151 | ||
6a488035 TO |
152 | // Allow hook_civicrm_merge() to adjust $relTables |
153 | CRM_Utils_Hook::merge('relTables', $relTables); | |
154 | } | |
155 | return $relTables; | |
156 | } | |
157 | ||
158 | /** | |
159 | * Returns the related tables groups for which a contact has any info entered | |
160 | */ | |
161 | static function getActiveRelTables($cid) { | |
162 | $cid = (int) $cid; | |
163 | $groups = array(); | |
164 | ||
165 | $relTables = self::relTables(); | |
166 | $cidRefs = self::cidRefs(); | |
167 | $eidRefs = self::eidRefs(); | |
168 | foreach ($relTables as $group => $params) { | |
169 | $sqls = array(); | |
170 | foreach ($params['tables'] as $table) { | |
171 | if (isset($cidRefs[$table])) { | |
172 | foreach ($cidRefs[$table] as $field) { | |
173 | $sqls[] = "SELECT COUNT(*) AS count FROM $table WHERE $field = $cid"; | |
174 | } | |
175 | } | |
176 | if (isset($eidRefs[$table])) { | |
177 | foreach ($eidRefs[$table] as $entityTable => $entityId) { | |
178 | $sqls[] = "SELECT COUNT(*) AS count FROM $table WHERE $entityId = $cid AND $entityTable = 'civicrm_contact'"; | |
179 | } | |
180 | } | |
181 | foreach ($sqls as $sql) { | |
182 | if (CRM_Core_DAO::singleValueQuery($sql) > 0) { | |
183 | $groups[] = $group; | |
184 | } | |
185 | } | |
186 | } | |
187 | } | |
188 | return array_unique($groups); | |
189 | } | |
190 | ||
191 | /** | |
e4f8c98c | 192 | * Return tables and their fields referencing civicrm_contact.contact_id explicitly |
6a488035 TO |
193 | */ |
194 | static function cidRefs() { | |
195 | static $cidRefs; | |
196 | if (!$cidRefs) { | |
e4f8c98c | 197 | $sql = " |
198 | SELECT | |
199 | table_name, | |
200 | column_name | |
201 | FROM information_schema.key_column_usage | |
202 | WHERE | |
203 | referenced_table_schema = database() AND | |
204 | referenced_table_name = 'civicrm_contact' AND | |
205 | referenced_column_name = 'id'; | |
206 | "; | |
6a488035 TO |
207 | $dao = CRM_Core_DAO::executeQuery($sql); |
208 | while ($dao->fetch()) { | |
209 | $cidRefs[$dao->table_name][] = $dao->column_name; | |
210 | } | |
64b3569d | 211 | |
212 | // FixME for time being adding below line statically as no Foreign key constraint defined for table 'civicrm_entity_tag' | |
213 | $cidRefs['civicrm_entity_tag'][] = 'entity_id'; | |
6a488035 TO |
214 | $dao->free(); |
215 | ||
216 | // Allow hook_civicrm_merge() to adjust $cidRefs | |
217 | CRM_Utils_Hook::merge('cidRefs', $cidRefs); | |
218 | } | |
219 | return $cidRefs; | |
220 | } | |
221 | ||
222 | /** | |
223 | * Return tables and their fields referencing civicrm_contact.contact_id with entity_id | |
224 | */ | |
225 | static function eidRefs() { | |
226 | static $eidRefs; | |
227 | if (!$eidRefs) { | |
228 | // FIXME: this should be generated dynamically from the schema | |
229 | // tables that reference contacts with entity_{id,table} | |
230 | $eidRefs = array( | |
231 | 'civicrm_acl' => array('entity_table' => 'entity_id'), | |
232 | 'civicrm_acl_entity_role' => array('entity_table' => 'entity_id'), | |
233 | 'civicrm_entity_file' => array('entity_table' => 'entity_id'), | |
234 | 'civicrm_log' => array('entity_table' => 'entity_id'), | |
235 | 'civicrm_mailing_group' => array('entity_table' => 'entity_id'), | |
236 | 'civicrm_note' => array('entity_table' => 'entity_id'), | |
6a488035 TO |
237 | ); |
238 | ||
239 | // Allow hook_civicrm_merge() to adjust $eidRefs | |
240 | CRM_Utils_Hook::merge('eidRefs', $eidRefs); | |
241 | } | |
242 | return $eidRefs; | |
243 | } | |
244 | ||
76c53278 CW |
245 | /** |
246 | * We treat multi-valued custom sets as "related tables" similar to activities, contributions, etc. | |
247 | * @param string $request 'relTables' or 'cidRefs' | |
248 | * @see CRM-13836 | |
249 | */ | |
250 | static function getMultiValueCustomSets($request) { | |
251 | static $data = NULL; | |
252 | if ($data === NULL) { | |
253 | $data = array( | |
254 | 'relTables' => array(), | |
255 | 'cidRefs' => array(), | |
256 | ); | |
257 | $result = civicrm_api3('custom_group', 'get', array( | |
258 | 'is_multiple' => 1, | |
259 | 'extends' => array('IN' => array('Individual', 'Organization', 'Household', 'Contact')), | |
260 | 'return' => array('id', 'title', 'table_name', 'style'), | |
261 | )); | |
262 | foreach($result['values'] as $custom) { | |
263 | $data['cidRefs'][$custom['table_name']] = array('entity_id'); | |
264 | $urlSuffix = $custom['style'] == 'Tab' ? '&selectedChild=custom_' . $custom['id'] : ''; | |
265 | $data['relTables']['rel_table_custom_' . $custom['id']] = array( | |
266 | 'title' => $custom['title'], | |
267 | 'tables' => array($custom['table_name']), | |
268 | 'url' => CRM_Utils_System::url('civicrm/contact/view', 'reset=1&force=1&cid=$cid' . $urlSuffix), | |
269 | ); | |
270 | } | |
271 | } | |
272 | return $data[$request]; | |
273 | } | |
274 | ||
6a488035 TO |
275 | /** |
276 | * Tables which require custom processing should declare functions to call here. | |
277 | * Doing so will override normal processing. | |
278 | */ | |
279 | static function cpTables() { | |
280 | static $tables; | |
281 | if (!$tables) { | |
282 | $tables = array( | |
283 | 'civicrm_case_contact' => array('CRM_Case_BAO_Case' => 'mergeContacts'), | |
284 | 'civicrm_group_contact' => array('CRM_Contact_BAO_GroupContact' => 'mergeGroupContact'), | |
285 | // Empty array == do nothing - this table is handled by mergeGroupContact | |
286 | 'civicrm_subscription_history' => array(), | |
287 | 'civicrm_relationship' => array('CRM_Contact_BAO_Relationship' => 'mergeRelationships'), | |
288 | ); | |
289 | } | |
290 | return $tables; | |
291 | } | |
292 | ||
293 | /** | |
294 | * return payment related table. | |
295 | */ | |
296 | static function paymentTables() { | |
297 | static $tables; | |
298 | if (!$tables) { | |
299 | $tables = array('civicrm_pledge', 'civicrm_membership', 'civicrm_participant'); | |
300 | } | |
301 | ||
302 | return $tables; | |
303 | } | |
304 | ||
305 | /** | |
306 | * return payment update Query. | |
307 | */ | |
308 | static function paymentSql($tableName, $mainContactId, $otherContactId) { | |
309 | $sqls = array(); | |
310 | if (!$tableName || !$mainContactId || !$otherContactId) { | |
311 | return $sqls; | |
312 | } | |
313 | ||
314 | $paymentTables = self::paymentTables(); | |
315 | if (!in_array($tableName, $paymentTables)) { | |
316 | return $sqls; | |
317 | } | |
318 | ||
319 | switch ($tableName) { | |
320 | case 'civicrm_pledge': | |
321 | $sqls[] = " | |
322 | UPDATE IGNORE civicrm_contribution contribution | |
323 | INNER JOIN civicrm_pledge_payment payment ON ( payment.contribution_id = contribution.id ) | |
324 | INNER JOIN civicrm_pledge pledge ON ( pledge.id = payment.pledge_id ) | |
325 | SET contribution.contact_id = $mainContactId | |
326 | WHERE pledge.contact_id = $otherContactId"; | |
327 | break; | |
328 | ||
329 | case 'civicrm_membership': | |
330 | $sqls[] = " | |
331 | UPDATE IGNORE civicrm_contribution contribution | |
332 | INNER JOIN civicrm_membership_payment payment ON ( payment.contribution_id = contribution.id ) | |
333 | INNER JOIN civicrm_membership membership ON ( membership.id = payment.membership_id ) | |
334 | SET contribution.contact_id = $mainContactId | |
335 | WHERE membership.contact_id = $otherContactId"; | |
336 | break; | |
337 | ||
338 | case 'civicrm_participant': | |
339 | $sqls[] = " | |
340 | UPDATE IGNORE civicrm_contribution contribution | |
341 | INNER JOIN civicrm_participant_payment payment ON ( payment.contribution_id = contribution.id ) | |
342 | INNER JOIN civicrm_participant participant ON ( participant.id = payment.participant_id ) | |
343 | SET contribution.contact_id = $mainContactId | |
344 | WHERE participant.contact_id = $otherContactId"; | |
345 | break; | |
346 | } | |
347 | ||
348 | return $sqls; | |
349 | } | |
350 | ||
e0ef6999 EM |
351 | /** |
352 | * @param $mainId | |
353 | * @param $otherId | |
354 | * @param $tableName | |
355 | * @param array $tableOperations | |
356 | * @param string $mode | |
357 | * | |
358 | * @return array | |
359 | */ | |
6a488035 TO |
360 | static function operationSql($mainId, $otherId, $tableName, $tableOperations = array(), $mode = 'add') { |
361 | $sqls = array(); | |
362 | if (!$tableName || !$mainId || !$otherId) { | |
363 | return $sqls; | |
364 | } | |
365 | ||
366 | ||
367 | switch ($tableName) { | |
368 | case 'civicrm_membership': | |
369 | if (array_key_exists($tableName, $tableOperations) && $tableOperations[$tableName]['add']) | |
370 | break; | |
371 | if ($mode == 'add') { | |
372 | $sqls[] = " | |
373 | DELETE membership1.* FROM civicrm_membership membership1 | |
374 | INNER JOIN civicrm_membership membership2 ON membership1.membership_type_id = membership2.membership_type_id | |
375 | AND membership1.contact_id = {$mainId} | |
376 | AND membership2.contact_id = {$otherId} "; | |
377 | } | |
378 | if ($mode == 'payment') { | |
379 | $sqls[] = " | |
380 | DELETE contribution.* FROM civicrm_contribution contribution | |
381 | INNER JOIN civicrm_membership_payment payment ON payment.contribution_id = contribution.id | |
382 | INNER JOIN civicrm_membership membership1 ON membership1.id = payment.membership_id | |
383 | AND membership1.contact_id = {$mainId} | |
384 | INNER JOIN civicrm_membership membership2 ON membership1.membership_type_id = membership2.membership_type_id | |
385 | AND membership2.contact_id = {$otherId}"; | |
386 | } | |
387 | break; | |
388 | ||
389 | case 'civicrm_uf_match': | |
390 | // normal queries won't work for uf_match since that will lead to violation of unique constraint, | |
391 | // failing to meet intended result. Therefore we introduce this additonal query: | |
392 | $sqls[] = "DELETE FROM civicrm_uf_match WHERE contact_id = {$mainId}"; | |
393 | break; | |
394 | } | |
395 | ||
396 | return $sqls; | |
397 | } | |
398 | ||
399 | /** | |
400 | * Based on the provided two contact_ids and a set of tables, move the | |
401 | * belongings of the other contact to the main one. | |
402 | * | |
403 | * @static | |
404 | */ | |
405 | static function moveContactBelongings($mainId, $otherId, $tables = FALSE, $tableOperations = array()) { | |
406 | $cidRefs = self::cidRefs(); | |
407 | $eidRefs = self::eidRefs(); | |
408 | $cpTables = self::cpTables(); | |
409 | $paymentTables = self::paymentTables(); | |
ada104d5 | 410 | $membershipMerge = FALSE; // CRM-12695 |
6a488035 TO |
411 | |
412 | $affected = array_merge(array_keys($cidRefs), array_keys($eidRefs)); | |
413 | if ($tables !== FALSE) { | |
414 | // if there are specific tables, sanitize the list | |
415 | $affected = array_unique(array_intersect($affected, $tables)); | |
416 | } | |
417 | else { | |
418 | // if there aren't any specific tables, don't affect the ones handled by relTables() | |
419 | $relTables = self::relTables(); | |
420 | $handled = array(); | |
421 | foreach ($relTables as $params) { | |
422 | $handled = array_merge($handled, $params['tables']); | |
423 | } | |
424 | $affected = array_diff($affected, $handled); | |
ada104d5 AW |
425 | /** |
426 | * CRM-12695 | |
427 | * Set $membershipMerge flag only once | |
428 | * while doing contact related migration | |
429 | * to call addMembershipToRealtedContacts() | |
430 | * function only once. | |
431 | * Since the current function (moveContactBelongings) is called twice | |
432 | * with & without parameters $tables & $tableOperations | |
433 | */ | |
434 | // retrieve main contact's related table(s) | |
435 | $activeMainRelTables = CRM_Dedupe_Merger::getActiveRelTables($mainId); | |
436 | // check if membership table exists in main contact's related table(s) | |
437 | if (in_array('rel_table_memberships', $activeMainRelTables)) { | |
438 | $membershipMerge = TRUE; // set membership flag - CRM-12695 | |
439 | } | |
6a488035 TO |
440 | } |
441 | ||
442 | $mainId = (int) $mainId; | |
443 | $otherId = (int) $otherId; | |
444 | ||
445 | $sqls = array(); | |
446 | foreach ($affected as $table) { | |
447 | // Call custom processing function for objects that require it | |
448 | if (isset($cpTables[$table])) { | |
449 | foreach ($cpTables[$table] as $className => $fnName) { | |
450 | $className::$fnName($mainId, $otherId, $sqls); | |
451 | } | |
452 | // Skip normal processing | |
453 | continue; | |
454 | } | |
b3fdbf3d | 455 | |
6a488035 TO |
456 | // use UPDATE IGNORE + DELETE query pair to skip on situations when |
457 | // there's a UNIQUE restriction on ($field, some_other_field) pair | |
458 | if (isset($cidRefs[$table])) { | |
459 | foreach ($cidRefs[$table] as $field) { | |
460 | // carry related contributions CRM-5359 | |
461 | if (in_array($table, $paymentTables)) { | |
6a488035 TO |
462 | $paymentSqls = self::paymentSql($table, $mainId, $otherId); |
463 | $sqls = array_merge($sqls, $paymentSqls); | |
71560cf3 C |
464 | |
465 | if (!empty($tables) && !in_array('civicrm_contribution', $tables)) { | |
466 | $payOprSqls = self::operationSql($mainId, $otherId, $table, $tableOperations, 'payment'); | |
467 | $sqls = array_merge($sqls, $payOprSqls); | |
468 | } | |
6a488035 TO |
469 | } |
470 | ||
471 | $preOperationSqls = self::operationSql($mainId, $otherId, $table, $tableOperations); | |
472 | $sqls = array_merge($sqls, $preOperationSqls); | |
473 | ||
474 | $sqls[] = "UPDATE IGNORE $table SET $field = $mainId WHERE $field = $otherId"; | |
475 | $sqls[] = "DELETE FROM $table WHERE $field = $otherId"; | |
476 | } | |
477 | } | |
478 | if (isset($eidRefs[$table])) { | |
479 | foreach ($eidRefs[$table] as $entityTable => $entityId) { | |
480 | $sqls[] = "UPDATE IGNORE $table SET $entityId = $mainId WHERE $entityId = $otherId AND $entityTable = 'civicrm_contact'"; | |
481 | $sqls[] = "DELETE FROM $table WHERE $entityId = $otherId AND $entityTable = 'civicrm_contact'"; | |
482 | } | |
483 | } | |
484 | } | |
485 | ||
486 | // Allow hook_civicrm_merge() to add SQL statements for the merge operation. | |
487 | CRM_Utils_Hook::merge('sqls', $sqls, $mainId, $otherId, $tables); | |
488 | ||
489 | // call the SQL queries in one transaction | |
490 | $transaction = new CRM_Core_Transaction(); | |
491 | foreach ($sqls as $sql) { | |
492 | CRM_Core_DAO::executeQuery($sql, array(), TRUE, NULL, TRUE); | |
493 | } | |
ada104d5 AW |
494 | // CRM-12695 |
495 | if ($membershipMerge) { | |
496 | // call to function adding membership to related contacts | |
497 | CRM_Dedupe_Merger::addMembershipToRealtedContacts($mainId); | |
498 | } | |
6a488035 TO |
499 | $transaction->commit(); |
500 | } | |
501 | ||
502 | /** | |
503 | * Find differences between contacts. | |
b3fdbf3d | 504 | * |
6a488035 TO |
505 | * @param array $main contact details |
506 | * @param array $other contact details | |
507 | * | |
77b97be7 | 508 | * @return array |
6a488035 TO |
509 | * @static |
510 | */ | |
511 | static function findDifferences($main, $other) { | |
512 | $result = array( | |
513 | 'contact' => array(), | |
514 | 'custom' => array(), | |
515 | ); | |
16254ae1 | 516 | foreach (self::getContactFields() as $validField) { |
6a488035 TO |
517 | if (CRM_Utils_Array::value($validField, $main) != CRM_Utils_Array::value($validField, $other)) { |
518 | $result['contact'][] = $validField; | |
519 | } | |
520 | } | |
521 | ||
522 | $mainEvs = CRM_Core_BAO_CustomValueTable::getEntityValues($main['id']); | |
523 | $otherEvs = CRM_Core_BAO_CustomValueTable::getEntityValues($other['id']); | |
524 | $keys = array_unique(array_merge(array_keys($mainEvs), array_keys($otherEvs))); | |
525 | foreach ($keys as $key) { | |
76c53278 CW |
526 | // Exclude multi-value fields CRM-13836 |
527 | if (strpos($key, '_')) { | |
528 | continue; | |
529 | } | |
6a488035 TO |
530 | $key1 = CRM_Utils_Array::value($key, $mainEvs); |
531 | $key2 = CRM_Utils_Array::value($key, $otherEvs); | |
532 | if ($key1 != $key2) { | |
533 | $result['custom'][] = $key; | |
534 | } | |
535 | } | |
536 | return $result; | |
537 | } | |
538 | ||
539 | /** | |
540 | * Function to batch merge a set of contacts based on rule-group and group. | |
541 | * | |
77b97be7 EM |
542 | * @param int $rgid rule group id |
543 | * @param int $gid group id | |
544 | * @param string $mode helps decide how to behave when there are conflicts. | |
6a488035 TO |
545 | * A 'safe' value skips the merge if there are any un-resolved conflicts. |
546 | * Does a force merge otherwise. | |
77b97be7 EM |
547 | * @param boolean $autoFlip wether to let api decide which contact to retain and which to delete. |
548 | * | |
6a488035 | 549 | * |
77b97be7 | 550 | * @param bool $redirectForPerformance |
6a488035 | 551 | * |
77b97be7 EM |
552 | * @return array|bool |
553 | * @internal param array $cacheParams prev-next-cache params based on which next pair of contacts are computed. | |
554 | * Generally used with batch-merge. | |
6a488035 TO |
555 | * @static |
556 | * @access public | |
557 | */ | |
558 | static function batchMerge($rgid, $gid = NULL, $mode = 'safe', $autoFlip = TRUE, $redirectForPerformance = FALSE) { | |
559 | $contactType = CRM_Core_DAO::getFieldValue('CRM_Dedupe_DAO_RuleGroup', $rgid, 'contact_type'); | |
560 | $cacheKeyString = "merge {$contactType}"; | |
561 | $cacheKeyString .= $rgid ? "_{$rgid}" : '_0'; | |
562 | $cacheKeyString .= $gid ? "_{$gid}" : '_0'; | |
563 | $join = "LEFT JOIN civicrm_dedupe_exception de ON ( pn.entity_id1 = de.contact_id1 AND | |
564 | pn.entity_id2 = de.contact_id2 )"; | |
565 | ||
566 | $limit = $redirectForPerformance ? 75 : 1; | |
567 | $where = "de.id IS NULL LIMIT {$limit}"; | |
568 | ||
569 | $dupePairs = CRM_Core_BAO_PrevNextCache::retrieve($cacheKeyString, $join, $where); | |
570 | if (empty($dupePairs) && !$redirectForPerformance) { | |
571 | // If we haven't found any dupes, probably cache is empty. | |
572 | // Try filling cache and give another try. | |
573 | CRM_Core_BAO_PrevNextCache::refillCache($rgid, $gid, $cacheKeyString); | |
574 | $dupePairs = CRM_Core_BAO_PrevNextCache::retrieve($cacheKeyString, $join, $where); | |
575 | } | |
576 | ||
577 | $cacheParams = array( | |
578 | 'cache_key_string' => $cacheKeyString, | |
579 | 'join' => $join, | |
580 | 'where' => $where, | |
581 | ); | |
582 | return CRM_Dedupe_Merger::merge($dupePairs, $cacheParams, $mode, $autoFlip, $redirectForPerformance); | |
583 | } | |
584 | ||
585 | /** | |
586 | * Function to merge given set of contacts. Performs core operation. | |
587 | * | |
77b97be7 EM |
588 | * @param array $dupePairs set of pair of contacts for whom merge is to be done. |
589 | * @param array $cacheParams prev-next-cache params based on which next pair of contacts are computed. | |
6a488035 | 590 | * Generally used with batch-merge. |
77b97be7 | 591 | * @param string $mode helps decide how to behave when there are conflicts. |
6a488035 TO |
592 | * A 'safe' value skips the merge if there are any un-resolved conflicts. |
593 | * Does a force merge otherwise (aggressive mode). | |
77b97be7 | 594 | * @param boolean $autoFlip wether to let api decide which contact to retain and which to delete. |
6a488035 TO |
595 | * |
596 | * | |
77b97be7 EM |
597 | * @param bool $redirectForPerformance |
598 | * | |
599 | * @return array|bool | |
6a488035 TO |
600 | * @static |
601 | * @access public | |
602 | */ | |
603 | static function merge($dupePairs = array( | |
604 | ), $cacheParams = array(), $mode = 'safe', | |
605 | $autoFlip = TRUE, $redirectForPerformance = FALSE | |
606 | ) { | |
607 | $cacheKeyString = CRM_Utils_Array::value('cache_key_string', $cacheParams); | |
608 | $resultStats = array('merged' => array(), 'skipped' => array()); | |
609 | ||
610 | // we don't want dupe caching to get reset after every-merge, and therefore set the | |
611 | // doNotResetCache flag | |
612 | $config = CRM_Core_Config::singleton(); | |
613 | $config->doNotResetCache = 1; | |
614 | ||
615 | while (!empty($dupePairs)) { | |
616 | foreach ($dupePairs as $dupes) { | |
1cf05c3e | 617 | CRM_Utils_Hook::merge('flip', $dupes, $dupes['dstID'], $dupes['srcID']); |
6a488035 TO |
618 | $mainId = $dupes['dstID']; |
619 | $otherId = $dupes['srcID']; | |
602789b5 DS |
620 | $isAutoFlip = CRM_Utils_Array::value('auto_flip', $dupes, $autoFlip); |
621 | // if we can, make sure that $mainId is the one with lower id number | |
622 | if ($isAutoFlip && ($mainId > $otherId)) { | |
6a488035 TO |
623 | $mainId = $dupes['srcID']; |
624 | $otherId = $dupes['dstID']; | |
625 | } | |
626 | if (!$mainId || !$otherId) { | |
627 | // return error | |
628 | return FALSE; | |
629 | } | |
630 | ||
631 | // Generate var $migrationInfo. The variable structure is exactly same as | |
632 | // $formValues submitted during a UI merge for a pair of contacts. | |
633 | $rowsElementsAndInfo = &CRM_Dedupe_Merger::getRowsElementsAndInfo($mainId, $otherId); | |
634 | ||
635 | $migrationInfo = &$rowsElementsAndInfo['migration_info']; | |
636 | ||
637 | // add additional details that we might need to resolve conflicts | |
638 | $migrationInfo['main_details'] = &$rowsElementsAndInfo['main_details']; | |
639 | $migrationInfo['other_details'] = &$rowsElementsAndInfo['other_details']; | |
640 | $migrationInfo['main_loc_block'] = &$rowsElementsAndInfo['main_loc_block']; | |
641 | $migrationInfo['rows'] = &$rowsElementsAndInfo['rows']; | |
642 | ||
643 | // go ahead with merge if there is no conflict | |
644 | if (!CRM_Dedupe_Merger::skipMerge($mainId, $otherId, $migrationInfo, $mode)) { | |
645 | CRM_Dedupe_Merger::moveAllBelongings($mainId, $otherId, $migrationInfo); | |
646 | $resultStats['merged'][] = array('main_d' => $mainId, 'other_id' => $otherId); | |
647 | } | |
648 | else { | |
649 | $resultStats['skipped'][] = array('main_d' => $mainId, 'other_id' => $otherId); | |
650 | } | |
651 | ||
652 | // delete entry from PrevNextCache table so we don't consider the pair next time | |
653 | // pair may have been flipped, so make sure we delete using both orders | |
654 | CRM_Core_BAO_PrevNextCache::deletePair($mainId, $otherId, $cacheKeyString); | |
655 | CRM_Core_BAO_PrevNextCache::deletePair($otherId, $mainId, $cacheKeyString); | |
656 | ||
657 | CRM_Core_DAO::freeResult(); | |
658 | unset($rowsElementsAndInfo, $migrationInfo); | |
659 | } | |
660 | ||
661 | if ($cacheKeyString && !$redirectForPerformance) { | |
662 | // retrieve next pair of dupes | |
663 | $dupePairs = CRM_Core_BAO_PrevNextCache::retrieve($cacheKeyString, | |
664 | $cacheParams['join'], | |
665 | $cacheParams['where'] | |
666 | ); | |
667 | } | |
668 | else { | |
669 | // do not proceed. Terminate the loop | |
670 | unset($dupePairs); | |
671 | } | |
672 | } | |
673 | return $resultStats; | |
674 | } | |
675 | ||
676 | /** | |
677 | * A function which uses various rules / algorithms for choosing which contact to bias to | |
678 | * when there's a conflict (to handle "gotchas"). Plus the safest route to merge. | |
679 | * | |
77b97be7 EM |
680 | * @param int $mainId main contact with whom merge has to happen |
681 | * @param int $otherId duplicate contact which would be deleted after merge operation | |
682 | * @param array $migrationInfo array of information about which elements to merge. | |
683 | * @param string $mode helps decide how to behave when there are conflicts. | |
6a488035 TO |
684 | * A 'safe' value skips the merge if there are any un-resolved conflicts. |
685 | * Does a force merge otherwise (aggressive mode). | |
686 | * | |
77b97be7 | 687 | * @return bool |
6a488035 TO |
688 | * @static |
689 | * @access public | |
690 | */ | |
691 | static function skipMerge($mainId, $otherId, &$migrationInfo, $mode = 'safe') { | |
692 | $conflicts = array(); | |
693 | $migrationData = array( | |
694 | 'old_migration_info' => $migrationInfo, | |
695 | 'mode' => $mode, | |
696 | ); | |
b2b0530a | 697 | $allLocationTypes = CRM_Core_PseudoConstant::get('CRM_Core_DAO_Address', 'location_type_id'); |
6a488035 TO |
698 | |
699 | foreach ($migrationInfo as $key => $val) { | |
700 | if ($val === "null") { | |
701 | // Rule: no overwriting with empty values in any mode | |
702 | unset($migrationInfo[$key]); | |
703 | continue; | |
704 | } | |
16254ae1 | 705 | elseif ((in_array(substr($key, 5), CRM_Dedupe_Merger::getContactFields()) or |
6a488035 TO |
706 | substr($key, 0, 12) == 'move_custom_' |
707 | ) and $val != NULL) { | |
708 | // Rule: if both main-contact has other-contact, let $mode decide if to merge a | |
709 | // particular field or not | |
710 | if (!empty($migrationInfo['rows'][$key]['main'])) { | |
711 | // if main also has a value its a conflict | |
712 | if ($mode == 'safe') { | |
713 | // note it down & lets wait for response from the hook. | |
714 | // For no response skip this merge | |
715 | $conflicts[$key] = NULL; | |
716 | } | |
717 | elseif ($mode == 'aggressive') { | |
718 | // let the main-field be overwritten | |
719 | continue; | |
720 | } | |
721 | } | |
722 | } | |
723 | elseif (substr($key, 0, 14) == 'move_location_' and $val != NULL) { | |
724 | $locField = explode('_', $key); | |
725 | $fieldName = $locField[2]; | |
726 | $fieldCount = $locField[3]; | |
727 | ||
728 | // Rule: resolve address conflict if any - | |
729 | if ($fieldName == 'address') { | |
730 | $mainNewLocTypeId = $migrationInfo['location'][$fieldName][$fieldCount]['locTypeId']; | |
a7488080 | 731 | if (!empty($migrationInfo['main_loc_address']) && |
6a488035 TO |
732 | array_key_exists("main_{$mainNewLocTypeId}", $migrationInfo['main_loc_address'])) { |
733 | // main loc already has some address for the loc-type. Its a overwrite situation. | |
734 | ||
735 | // look for next available loc-type | |
736 | $newTypeId = NULL; | |
737 | foreach ($allLocationTypes as $typeId => $typeLabel) { | |
738 | if (!array_key_exists("main_{$typeId}", $migrationInfo['main_loc_address'])) { | |
739 | $newTypeId = $typeId; | |
740 | } | |
741 | } | |
742 | if ($newTypeId) { | |
743 | // try insert address at new available loc-type | |
744 | $migrationInfo['location'][$fieldName][$fieldCount]['locTypeId'] = $newTypeId; | |
745 | } | |
746 | elseif ($mode == 'safe') { | |
747 | // note it down & lets wait for response from the hook. | |
748 | // For no response skip this merge | |
749 | $conflicts[$key] = NULL; | |
750 | } | |
751 | elseif ($mode == 'aggressive') { | |
752 | // let the loc-type-id be same as that of other-contact & go ahead | |
753 | // with merge assuming aggressive mode | |
754 | continue; | |
755 | } | |
756 | } | |
757 | } | |
758 | elseif ($migrationInfo['rows'][$key]['main'] == $migrationInfo['rows'][$key]['other']) { | |
759 | // for loc blocks other than address like email, phone .. if values are same no point in merging | |
760 | // and adding redundant value | |
761 | unset($migrationInfo[$key]); | |
762 | } | |
763 | } | |
764 | } | |
765 | ||
766 | // A hook to implement other algorithms for choosing which contact to bias to when | |
767 | // there's a conflict (to handle "gotchas"). fields_in_conflict could be modified here | |
768 | // merge happens with new values filled in here. For a particular field / row not to be merged | |
769 | // field should be unset from fields_in_conflict. | |
770 | $migrationData['fields_in_conflict'] = $conflicts; | |
771 | CRM_Utils_Hook::merge('batch', $migrationData, $mainId, $otherId); | |
772 | $conflicts = $migrationData['fields_in_conflict']; | |
773 | ||
774 | if (!empty($conflicts)) { | |
775 | foreach ($conflicts as $key => $val) { | |
776 | if ($val === NULL and $mode == 'safe') { | |
777 | // un-resolved conflicts still present. Lets skip this merge. | |
778 | return TRUE; | |
779 | } | |
780 | else { | |
781 | // copy over the resolved values | |
782 | $migrationInfo[$key] = $val; | |
783 | } | |
784 | } | |
785 | } | |
786 | return FALSE; | |
787 | } | |
788 | ||
789 | /** | |
790 | * A function to build an array of information required by merge function and the merge UI. | |
791 | * | |
77b97be7 EM |
792 | * @param int $mainId main contact with whom merge has to happen |
793 | * @param int $otherId duplicate contact which would be deleted after merge operation | |
6a488035 | 794 | * |
77b97be7 | 795 | * @return array|bool|int |
6a488035 TO |
796 | * @static |
797 | * @access public | |
798 | */ | |
799 | static function getRowsElementsAndInfo($mainId, $otherId) { | |
800 | $qfZeroBug = 'e8cddb72-a257-11dc-b9cc-0016d3330ee9'; | |
801 | ||
802 | // Fetch contacts | |
803 | foreach (array('main' => $mainId, 'other' => $otherId) as $moniker => $cid) { | |
16254ae1 | 804 | $params = array('contact_id' => $cid, 'version' => 3, 'return' => array_merge(array('display_name'), self::getContactFields())); |
6a488035 TO |
805 | $result = civicrm_api('contact', 'get', $params); |
806 | ||
807 | if (empty($result['values'][$cid]['contact_type'])) { | |
808 | return FALSE; | |
809 | } | |
810 | $$moniker = $result['values'][$cid]; | |
811 | } | |
812 | ||
813 | static $fields = array(); | |
814 | if (empty($fields)) { | |
815 | $fields = CRM_Contact_DAO_Contact::fields(); | |
816 | CRM_Core_DAO::freeResult(); | |
817 | } | |
818 | ||
a14df814 | 819 | // get all contact subtypes |
820 | $contactSubTypes = CRM_Contact_BAO_ContactType::subTypePairs(NULL, TRUE, ''); | |
821 | ||
6a488035 TO |
822 | // FIXME: there must be a better way |
823 | foreach (array('main', 'other') as $moniker) { | |
824 | $contact = &$$moniker; | |
825 | $preferred_communication_method = CRM_Utils_array::value('preferred_communication_method', $contact); | |
826 | $value = empty($preferred_communication_method) ? array() : $preferred_communication_method; | |
827 | $specialValues[$moniker] = array( | |
828 | 'preferred_communication_method' => $value, | |
a14df814 | 829 | 'contact_sub_type' => $value, |
0e357872 | 830 | 'communication_style_id' => $value, |
6a488035 TO |
831 | ); |
832 | ||
a7488080 | 833 | if (!empty($contact['preferred_communication_method'])){ |
6a488035 | 834 | // api 3 returns pref_comm_method as an array, which breaks the lookup; so we reconstruct |
b3fdbf3d DL |
835 | $prefCommList = is_array($specialValues[$moniker]['preferred_communication_method']) ? |
836 | implode(CRM_Core_DAO::VALUE_SEPARATOR, $specialValues[$moniker]['preferred_communication_method']) : | |
6a488035 TO |
837 | $specialValues[$moniker]['preferred_communication_method']; |
838 | $specialValues[$moniker]['preferred_communication_method'] = CRM_Core_DAO::VALUE_SEPARATOR . $prefCommList . CRM_Core_DAO::VALUE_SEPARATOR; | |
839 | } | |
840 | $names = array( | |
841 | 'preferred_communication_method' => | |
842 | array( | |
843 | 'newName' => 'preferred_communication_method_display', | |
844 | 'groupName' => 'preferred_communication_method', | |
845 | ), | |
846 | ); | |
847 | CRM_Core_OptionGroup::lookupValues($specialValues[$moniker], $names); | |
a14df814 | 848 | |
849 | if (!empty($contact['contact_sub_type'])) { | |
850 | $specialValues[$moniker]['contact_sub_type'] = implode(CRM_Core_DAO::VALUE_SEPARATOR, $contact['contact_sub_type']); | |
851 | ||
852 | // fix contact sub type label for contact with sub type | |
853 | $subtypes = array(); | |
854 | foreach ($contact['contact_sub_type'] as $key => $value) { | |
855 | $subtypes[] = CRM_Utils_Array::retrieveValueRecursive($contactSubTypes, $value); | |
856 | } | |
857 | $contact['contact_sub_type_display'] = $specialValues[$moniker]['contact_sub_type_display'] = implode(', ', $subtypes); | |
858 | } | |
0e357872 C |
859 | |
860 | if (!empty($contact['communication_style'])) { | |
861 | $specialValues[$moniker]['communication_style_id_display'] = $contact['communication_style']; | |
862 | } | |
6a488035 TO |
863 | } |
864 | ||
865 | static $optionValueFields = array(); | |
866 | if (empty($optionValueFields)) { | |
867 | $optionValueFields = CRM_Core_OptionValue::getFields(); | |
868 | } | |
869 | foreach ($optionValueFields as $field => $params) { | |
870 | $fields[$field]['title'] = $params['title']; | |
871 | } | |
872 | ||
873 | $diffs = self::findDifferences($main, $other); | |
874 | ||
875 | $rows = $elements = $relTableElements = $migrationInfo = array(); | |
876 | ||
877 | foreach ($diffs['contact'] as $field) { | |
878 | foreach (array('main', 'other') as $moniker) { | |
879 | $contact = &$$moniker; | |
880 | $value = CRM_Utils_Array::value($field, $contact); | |
881 | if (isset($specialValues[$moniker][$field]) && is_string($specialValues[$moniker][$field])) { | |
882 | $value = CRM_Core_DAO::VALUE_SEPARATOR . trim($specialValues[$moniker][$field], CRM_Core_DAO::VALUE_SEPARATOR) . CRM_Core_DAO::VALUE_SEPARATOR; | |
883 | } | |
884 | $label = isset($specialValues[$moniker]["{$field}_display"]) ? $specialValues[$moniker]["{$field}_display"] : $value; | |
a7488080 | 885 | if (!empty($fields[$field]['type']) && $fields[$field]['type'] == CRM_Utils_Type::T_DATE) { |
6a488035 TO |
886 | if ($value) { |
887 | $value = str_replace('-', '', $value); | |
888 | $label = CRM_Utils_Date::customFormat($label); | |
889 | } | |
890 | else { | |
891 | $value = "null"; | |
892 | } | |
893 | } | |
a7488080 | 894 | elseif (!empty($fields[$field]['type']) && $fields[$field]['type'] == CRM_Utils_Type::T_BOOLEAN) { |
6a488035 TO |
895 | if ($label === '0') { |
896 | $label = ts('[ ]'); | |
897 | } | |
898 | if ($label === '1') { | |
899 | $label = ts('[x]'); | |
900 | } | |
00f3da2e BS |
901 | } |
902 | elseif ($field == 'individual_prefix' || $field == 'prefix_id') { | |
903 | $label = CRM_Utils_Array::value('individual_prefix', $contact); | |
6a488035 TO |
904 | $value = CRM_Utils_Array::value('prefix_id', $contact); |
905 | $field = 'prefix_id'; | |
00f3da2e BS |
906 | } |
907 | elseif ($field == 'individual_suffix' || $field == 'suffix_id') { | |
908 | $label = CRM_Utils_Array::value('individual_suffix', $contact); | |
6a488035 TO |
909 | $value = CRM_Utils_Array::value('suffix_id', $contact); |
910 | $field = 'suffix_id'; | |
911 | } | |
912 | $rows["move_$field"][$moniker] = $label; | |
913 | if ($moniker == 'other') { | |
7154d2a4 BS |
914 | //CRM-14334 |
915 | if ($value === NULL || $value == '') { | |
6a488035 TO |
916 | $value = 'null'; |
917 | } | |
918 | if ($value === 0 or $value === '0') { | |
919 | $value = $qfZeroBug; | |
920 | } | |
8cc574cf | 921 | if (is_array($value) && empty($value[1])) { |
6a488035 TO |
922 | $value[1] = NULL; |
923 | } | |
924 | $elements[] = array('advcheckbox', "move_$field", NULL, NULL, NULL, $value); | |
925 | $migrationInfo["move_$field"] = $value; | |
926 | } | |
927 | } | |
928 | $rows["move_$field"]['title'] = $fields[$field]['title']; | |
929 | } | |
930 | ||
931 | // handle location blocks. | |
932 | $locationBlocks = array('email', 'phone', 'address'); | |
933 | $locations = array(); | |
934 | ||
935 | foreach ($locationBlocks as $block) { | |
936 | foreach (array('main' => $mainId, 'other' => $otherId) as $moniker => $cid) { | |
937 | $cnt = 1; | |
938 | $values = civicrm_api($block, 'get', array('contact_id' => $cid, 'version' => 3)); | |
939 | $count = $values['count']; | |
940 | if ($count) { | |
941 | if ($count > $cnt) { | |
942 | foreach ($values['values'] as $value) { | |
943 | if ($block == 'address') { | |
944 | CRM_Core_BAO_Address::fixAddress($value); | |
945 | $display = CRM_Utils_Address::format($value); | |
946 | $locations[$moniker][$block][$cnt] = $value; | |
947 | $locations[$moniker][$block][$cnt]['display'] = $display; | |
948 | } | |
949 | else { | |
950 | $locations[$moniker][$block][$cnt] = $value; | |
951 | } | |
952 | ||
953 | $cnt++; | |
954 | } | |
955 | } | |
956 | else { | |
957 | $id = $values['id']; | |
958 | if ($block == 'address') { | |
959 | CRM_Core_BAO_Address::fixAddress($values['values'][$id]); | |
960 | $display = CRM_Utils_Address::format($values['values'][$id]); | |
961 | $locations[$moniker][$block][$cnt] = $values['values'][$id]; | |
962 | $locations[$moniker][$block][$cnt]['display'] = $display; | |
963 | } | |
964 | else { | |
965 | $locations[$moniker][$block][$cnt] = $values['values'][$id]; | |
966 | } | |
967 | } | |
968 | } | |
969 | } | |
970 | } | |
971 | ||
b2b0530a | 972 | $allLocationTypes = CRM_Core_PseudoConstant::get('CRM_Core_DAO_Address', 'location_type_id'); |
6a488035 TO |
973 | |
974 | $mainLocBlock = $locBlockIds = array(); | |
975 | $locBlockIds['main'] = $locBlockIds['other'] = array(); | |
976 | foreach (array('Email', 'Phone', 'IM', 'OpenID', 'Address') as $block) { | |
977 | $name = strtolower($block); | |
978 | foreach (array('main', 'other') as $moniker) { | |
979 | $locIndex = CRM_Utils_Array::value($moniker, $locations); | |
980 | $blockValue = CRM_Utils_Array::value($name, $locIndex, array()); | |
981 | if (empty($blockValue)) { | |
982 | $locValue[$moniker][$name] = 0; | |
983 | $locLabel[$moniker][$name] = $locTypes[$moniker][$name] = array(); | |
984 | } | |
985 | else { | |
986 | $locValue[$moniker][$name] = TRUE; | |
987 | foreach ($blockValue as $count => $blkValues) { | |
988 | $fldName = $name; | |
989 | $locTypeId = $blkValues['location_type_id']; | |
990 | if ($name == 'im') { | |
991 | $fldName = 'name'; | |
992 | } | |
993 | if ($name == 'address') { | |
994 | $fldName = 'display'; | |
995 | } | |
996 | $locLabel[$moniker][$name][$count] = CRM_Utils_Array::value($fldName, | |
997 | $blkValues | |
998 | ); | |
999 | $locTypes[$moniker][$name][$count] = $locTypeId; | |
1000 | if ($moniker == 'main' && in_array($name, $locationBlocks)) { | |
1001 | $mainLocBlock["main_$name$locTypeId"] = CRM_Utils_Array::value($fldName, | |
1002 | $blkValues | |
1003 | ); | |
1004 | $locBlockIds['main'][$name][$locTypeId] = $blkValues['id']; | |
1005 | } | |
1006 | else { | |
1007 | $locBlockIds[$moniker][$name][$count] = $blkValues['id']; | |
1008 | } | |
1009 | } | |
1010 | } | |
1011 | } | |
1012 | ||
1013 | if ($locValue['other'][$name] != 0) { | |
1014 | foreach ($locLabel['other'][$name] as $count => $value) { | |
1015 | $locTypeId = $locTypes['other'][$name][$count]; | |
1016 | $rows["move_location_{$name}_$count"]['other'] = $value; | |
1017 | $rows["move_location_{$name}_$count"]['main'] = CRM_Utils_Array::value($count, | |
1018 | $locLabel['main'][$name] | |
1019 | ); | |
1020 | $rows["move_location_{$name}_$count"]['title'] = ts('%1:%2:%3', | |
1021 | array( | |
1022 | 1 => $block, | |
1023 | 2 => $count, | |
1024 | 3 => $allLocationTypes[$locTypeId] | |
1025 | ) | |
1026 | ); | |
1027 | ||
1028 | $elements[] = array('advcheckbox', "move_location_{$name}_{$count}"); | |
1029 | $migrationInfo["move_location_{$name}_{$count}"] = 1; | |
1030 | ||
1031 | // make sure default location type is always on top | |
1032 | $mainLocTypeId = CRM_Utils_Array::value($count, $locTypes['main'][$name], $locTypeId); | |
1033 | $locTypeValues = $allLocationTypes; | |
1034 | $defaultLocType = array($mainLocTypeId => $locTypeValues[$mainLocTypeId]); | |
1035 | unset($locTypeValues[$mainLocTypeId]); | |
1036 | ||
1037 | // keep 1-1 mapping for address - location type. | |
1038 | $js = NULL; | |
1039 | if (in_array($name, $locationBlocks) && !empty($mainLocBlock)) { | |
1040 | $js = array('onChange' => "mergeBlock('$name', this, $count );"); | |
1041 | } | |
1042 | $elements[] = array( | |
1043 | 'select', "location[{$name}][$count][locTypeId]", NULL, | |
1044 | $defaultLocType + $locTypeValues, $js, | |
1045 | ); | |
1046 | // keep location-type-id same as that of other-contact | |
1047 | $migrationInfo['location'][$name][$count]['locTypeId'] = $locTypeId; | |
1048 | ||
1049 | if ($name != 'address') { | |
1050 | $elements[] = array('advcheckbox', "location[{$name}][$count][operation]", NULL, ts('add new')); | |
1051 | // always use add operation | |
1052 | $migrationInfo['location'][$name][$count]['operation'] = 1; | |
1053 | } | |
1054 | } | |
1055 | } | |
1056 | } | |
1057 | ||
1058 | // add the related tables and unset the ones that don't sport any of the duplicate contact's info | |
1059 | $config = CRM_Core_Config::singleton(); | |
1060 | $mainUfId = CRM_Core_BAO_UFMatch::getUFId($mainId); | |
1061 | $mainUser = NULL; | |
1062 | if ($mainUfId) { | |
1063 | // d6 compatible | |
1064 | if ($config->userSystem->is_drupal == '1' && function_exists($mainUser)) { | |
1065 | $mainUser = user_load($mainUfId); | |
1066 | } | |
1067 | elseif ($config->userFramework == 'Joomla') { | |
1068 | $mainUser = JFactory::getUser($mainUfId); | |
1069 | } | |
1070 | } | |
1071 | $otherUfId = CRM_Core_BAO_UFMatch::getUFId($otherId); | |
1072 | $otherUser = NULL; | |
1073 | if ($otherUfId) { | |
1074 | // d6 compatible | |
1075 | if ($config->userSystem->is_drupal == '1' && function_exists($mainUser)) { | |
1076 | $otherUser = user_load($otherUfId); | |
1077 | } | |
1078 | elseif ($config->userFramework == 'Joomla') { | |
1079 | $otherUser = JFactory::getUser($otherUfId); | |
1080 | } | |
1081 | } | |
1082 | ||
1083 | $relTables = CRM_Dedupe_Merger::relTables(); | |
1084 | $activeRelTables = CRM_Dedupe_Merger::getActiveRelTables($otherId); | |
1085 | $activeMainRelTables = CRM_Dedupe_Merger::getActiveRelTables($mainId); | |
1086 | foreach ($relTables as $name => $null) { | |
1087 | if (!in_array($name, $activeRelTables) && | |
1088 | !(($name == 'rel_table_users') && in_array($name, $activeMainRelTables)) | |
1089 | ) { | |
1090 | unset($relTables[$name]); | |
1091 | continue; | |
1092 | } | |
1093 | ||
1094 | $relTableElements[] = array('checkbox', "move_$name"); | |
1095 | $migrationInfo["move_$name"] = 1; | |
1096 | ||
1097 | $relTables[$name]['main_url'] = str_replace('$cid', $mainId, $relTables[$name]['url']); | |
1098 | $relTables[$name]['other_url'] = str_replace('$cid', $otherId, $relTables[$name]['url']); | |
1099 | if ($name == 'rel_table_users') { | |
1100 | $relTables[$name]['main_url'] = str_replace('%ufid', $mainUfId, $relTables[$name]['url']); | |
1101 | $relTables[$name]['other_url'] = str_replace('%ufid', $otherUfId, $relTables[$name]['url']); | |
1102 | $find = array('$ufid', '$ufname'); | |
1103 | if ($mainUser) { | |
1104 | $replace = array($mainUfId, $mainUser->name); | |
1105 | $relTables[$name]['main_title'] = str_replace($find, $replace, $relTables[$name]['title']); | |
1106 | } | |
1107 | if ($otherUser) { | |
1108 | $replace = array($otherUfId, $otherUser->name); | |
1109 | $relTables[$name]['other_title'] = str_replace($find, $replace, $relTables[$name]['title']); | |
1110 | } | |
1111 | } | |
1112 | if ($name == 'rel_table_memberships') { | |
1113 | $elements[] = array('checkbox', "operation[move_{$name}][add]", NULL, ts('add new')); | |
1114 | $migrationInfo["operation"]["move_{$name}"]['add'] = 1; | |
1115 | } | |
1116 | } | |
1117 | foreach ($relTables as $name => $null) { | |
1118 | $relTables["move_$name"] = $relTables[$name]; | |
1119 | unset($relTables[$name]); | |
1120 | } | |
1121 | ||
1122 | // handle custom fields | |
1123 | $mainTree = CRM_Core_BAO_CustomGroup::getTree($main['contact_type'], CRM_Core_DAO::$_nullObject, $mainId, -1, | |
1124 | CRM_Utils_Array::value('contact_sub_type', $main) | |
1125 | ); | |
1126 | $otherTree = CRM_Core_BAO_CustomGroup::getTree($main['contact_type'], CRM_Core_DAO::$_nullObject, $otherId, -1, | |
1127 | CRM_Utils_Array::value('contact_sub_type', $other) | |
1128 | ); | |
1129 | CRM_Core_DAO::freeResult(); | |
1130 | ||
1131 | foreach ($otherTree as $gid => $group) { | |
1132 | $foundField = FALSE; | |
1133 | if (!isset($group['fields'])) { | |
1134 | continue; | |
1135 | } | |
1136 | ||
1137 | foreach ($group['fields'] as $fid => $field) { | |
1138 | if (in_array($fid, $diffs['custom'])) { | |
1139 | if (!$foundField) { | |
1140 | $rows["custom_group_$gid"]['title'] = $group['title']; | |
1141 | $foundField = TRUE; | |
1142 | } | |
a7488080 | 1143 | if (!empty($mainTree[$gid]['fields'][$fid]['customValue'])) { |
6a488035 TO |
1144 | foreach ($mainTree[$gid]['fields'][$fid]['customValue'] as $valueId => $values) { |
1145 | $rows["move_custom_$fid"]['main'] = CRM_Core_BAO_CustomGroup::formatCustomValues($values, | |
1146 | $field, TRUE | |
1147 | ); | |
1148 | } | |
1149 | } | |
1150 | $value = "null"; | |
a7488080 | 1151 | if (!empty($otherTree[$gid]['fields'][$fid]['customValue'])) { |
6a488035 TO |
1152 | foreach ($otherTree[$gid]['fields'][$fid]['customValue'] as $valueId => $values) { |
1153 | $rows["move_custom_$fid"]['other'] = CRM_Core_BAO_CustomGroup::formatCustomValues($values, | |
1154 | $field, TRUE | |
1155 | ); | |
1156 | if ($values['data'] === 0 || $values['data'] === '0') { | |
1157 | $values['data'] = $qfZeroBug; | |
1158 | } | |
1159 | $value = ($values['data']) ? $values['data'] : $value; | |
1160 | } | |
1161 | } | |
1162 | $rows["move_custom_$fid"]['title'] = $field['label']; | |
1163 | ||
1164 | $elements[] = array('advcheckbox', "move_custom_$fid", NULL, NULL, NULL, $value); | |
1165 | $migrationInfo["move_custom_$fid"] = $value; | |
1166 | } | |
1167 | } | |
1168 | } | |
1169 | $result = array( | |
1170 | 'rows' => $rows, | |
1171 | 'elements' => $elements, | |
1172 | 'rel_table_elements' => $relTableElements, | |
1173 | 'main_loc_block' => $mainLocBlock, | |
1174 | 'rel_tables' => $relTables, | |
1175 | 'main_details' => $main, | |
1176 | 'other_details' => $other, | |
1177 | 'migration_info' => $migrationInfo, | |
1178 | ); | |
1179 | ||
1180 | $result['main_details']['loc_block_ids'] = $locBlockIds['main']; | |
1181 | $result['other_details']['loc_block_ids'] = $locBlockIds['other']; | |
1182 | ||
1183 | return $result; | |
1184 | } | |
1185 | ||
1186 | /** | |
1187 | * Based on the provided two contact_ids and a set of tables, move the belongings of the | |
1188 | * other contact to the main one - be it Location / CustomFields or Contact .. related info. | |
1189 | * A superset of moveContactBelongings() function. | |
1190 | * | |
77b97be7 EM |
1191 | * @param int $mainId main contact with whom merge has to happen |
1192 | * @param int $otherId duplicate contact which would be deleted after merge operation | |
1193 | * | |
1194 | * @param $migrationInfo | |
6a488035 | 1195 | * |
77b97be7 | 1196 | * @return bool |
6a488035 TO |
1197 | * @static |
1198 | * @access public | |
1199 | */ | |
1200 | static function moveAllBelongings($mainId, $otherId, $migrationInfo) { | |
1201 | if (empty($migrationInfo)) { | |
1202 | return FALSE; | |
1203 | } | |
1204 | ||
1205 | $qfZeroBug = 'e8cddb72-a257-11dc-b9cc-0016d3330ee9'; | |
1206 | $relTables = CRM_Dedupe_Merger::relTables(); | |
1207 | $moveTables = $locBlocks = $tableOperations = array(); | |
1208 | foreach ($migrationInfo as $key => $value) { | |
1209 | if ($value == $qfZeroBug) { | |
1210 | $value = '0'; | |
1211 | } | |
7154d2a4 BS |
1212 | if ((in_array(substr($key, 5), CRM_Dedupe_Merger::getContactFields()) || |
1213 | substr($key, 0, 12) == 'move_custom_') && | |
1214 | $value != NULL | |
1215 | ) { | |
6a488035 TO |
1216 | $submitted[substr($key, 5)] = $value; |
1217 | } | |
1218 | elseif (substr($key, 0, 14) == 'move_location_' and $value != NULL) { | |
1219 | $locField = explode('_', $key); | |
1220 | $fieldName = $locField[2]; | |
1221 | $fieldCount = $locField[3]; | |
1222 | $operation = CRM_Utils_Array::value('operation', $migrationInfo['location'][$fieldName][$fieldCount]); | |
1223 | // default operation is overwrite. | |
1224 | if (!$operation) { | |
1225 | $operation = 2; | |
1226 | } | |
1227 | ||
1228 | $locBlocks[$fieldName][$fieldCount]['operation'] = $operation; | |
1229 | $locBlocks[$fieldName][$fieldCount]['locTypeId'] = CRM_Utils_Array::value('locTypeId', $migrationInfo['location'][$fieldName][$fieldCount]); | |
1230 | } | |
1231 | elseif (substr($key, 0, 15) == 'move_rel_table_' and $value == '1') { | |
1232 | $moveTables = array_merge($moveTables, $relTables[substr($key, 5)]['tables']); | |
1233 | if (array_key_exists('operation', $migrationInfo)) { | |
1234 | foreach ($relTables[substr($key, 5)]['tables'] as $table) { | |
1235 | if (array_key_exists($key, $migrationInfo['operation'])) { | |
1236 | $tableOperations[$table] = $migrationInfo['operation'][$key]; | |
1237 | } | |
1238 | } | |
1239 | } | |
1240 | } | |
1241 | } | |
1242 | ||
1243 | ||
1244 | // **** Do location related migration: | |
1245 | if (!empty($locBlocks)) { | |
1246 | $locComponent = array( | |
1247 | 'email' => 'Email', | |
1248 | 'phone' => 'Phone', | |
1249 | 'im' => 'IM', | |
1250 | 'openid' => 'OpenID', | |
1251 | 'address' => 'Address', | |
1252 | ); | |
1253 | ||
1254 | $primaryBlockIds = CRM_Contact_BAO_Contact::getLocBlockIds($mainId, array('is_primary' => 1)); | |
1255 | $billingBlockIds = CRM_Contact_BAO_Contact::getLocBlockIds($mainId, array('is_billing' => 1)); | |
1256 | ||
1257 | foreach ($locBlocks as $name => $block) { | |
1258 | if (!is_array($block) || CRM_Utils_System::isNull($block)) { | |
1259 | continue; | |
1260 | } | |
1261 | $daoName = 'CRM_Core_DAO_' . $locComponent[$name]; | |
1262 | $primaryDAOId = (array_key_exists($name, $primaryBlockIds)) ? array_pop($primaryBlockIds[$name]) : NULL; | |
1263 | $billingDAOId = (array_key_exists($name, $billingBlockIds)) ? array_pop($billingBlockIds[$name]) : NULL; | |
1264 | ||
1265 | foreach ($block as $blkCount => $values) { | |
1266 | $locTypeId = CRM_Utils_Array::value('locTypeId', $values, 1); | |
1267 | $operation = CRM_Utils_Array::value('operation', $values, 2); | |
1268 | $otherBlockId = CRM_Utils_Array::value($blkCount, | |
1269 | $migrationInfo['other_details']['loc_block_ids'][$name] | |
1270 | ); | |
1271 | ||
1272 | // keep 1-1 mapping for address - loc type. | |
1273 | $idKey = $blkCount; | |
1274 | if (array_key_exists($name, $locComponent)) { | |
1275 | $idKey = $locTypeId; | |
1276 | } | |
1277 | ||
1278 | if (isset($migrationInfo['main_details']['loc_block_ids'][$name])) { | |
1279 | $mainBlockId = CRM_Utils_Array::value($idKey, $migrationInfo['main_details']['loc_block_ids'][$name]); | |
1280 | } | |
1281 | ||
1282 | if (!$otherBlockId) { | |
1283 | continue; | |
1284 | } | |
1285 | ||
1286 | // for the block which belongs to other-contact, link the contact to main-contact | |
1287 | $otherBlockDAO = new $daoName(); | |
1288 | $otherBlockDAO->id = $otherBlockId; | |
1289 | $otherBlockDAO->contact_id = $mainId; | |
1290 | $otherBlockDAO->location_type_id = $locTypeId; | |
1291 | ||
1292 | // if main contact already has primary & billing, set the flags to 0. | |
1293 | if ($primaryDAOId) { | |
1294 | $otherBlockDAO->is_primary = 0; | |
1295 | } | |
1296 | if ($billingDAOId) { | |
1297 | $otherBlockDAO->is_billing = 0; | |
1298 | } | |
1299 | ||
1300 | // overwrite - need to delete block which belongs to main-contact. | |
1301 | if ($mainBlockId && ($operation == 2)) { | |
1302 | $deleteDAO = new $daoName(); | |
1303 | $deleteDAO->id = $mainBlockId; | |
1304 | $deleteDAO->find(TRUE); | |
1305 | ||
1306 | // if we about to delete a primary / billing block, set the flags for new block | |
1307 | // that we going to assign to main-contact | |
1308 | if ($primaryDAOId && ($primaryDAOId == $deleteDAO->id)) { | |
1309 | $otherBlockDAO->is_primary = 1; | |
1310 | } | |
1311 | if ($billingDAOId && ($billingDAOId == $deleteDAO->id)) { | |
1312 | $otherBlockDAO->is_billing = 1; | |
1313 | } | |
1314 | ||
1315 | $deleteDAO->delete(); | |
1316 | $deleteDAO->free(); | |
1317 | } | |
1318 | ||
1319 | $otherBlockDAO->update(); | |
1320 | $otherBlockDAO->free(); | |
1321 | } | |
1322 | } | |
1323 | } | |
1324 | ||
1325 | // **** Do tables related migrations | |
1326 | if (!empty($moveTables)) { | |
1327 | CRM_Dedupe_Merger::moveContactBelongings($mainId, $otherId, $moveTables, $tableOperations); | |
1328 | unset($moveTables, $tableOperations); | |
1329 | } | |
1330 | ||
1331 | // **** Do contact related migrations | |
1332 | CRM_Dedupe_Merger::moveContactBelongings($mainId, $otherId); | |
1333 | ||
1334 | // FIXME: fix gender, prefix and postfix, so they're edible by createProfileContact() | |
1335 | $names['gender'] = array('newName' => 'gender_id', 'groupName' => 'gender'); | |
1336 | $names['individual_prefix'] = array('newName' => 'prefix_id', 'groupName' => 'individual_prefix'); | |
1337 | $names['individual_suffix'] = array('newName' => 'suffix_id', 'groupName' => 'individual_suffix'); | |
aa62b355 | 1338 | $names['communication_style'] = array('newName' => 'communication_style_id', 'groupName' => 'communication_style'); |
6a488035 TO |
1339 | $names['addressee'] = array('newName' => 'addressee_id', 'groupName' => 'addressee'); |
1340 | $names['email_greeting'] = array('newName' => 'email_greeting_id', 'groupName' => 'email_greeting'); | |
1341 | $names['postal_greeting'] = array('newName' => 'postal_greeting_id', 'groupName' => 'postal_greeting'); | |
1342 | CRM_Core_OptionGroup::lookupValues($submitted, $names, TRUE); | |
1343 | ||
1344 | // fix custom fields so they're edible by createProfileContact() | |
1345 | static $treeCache = array(); | |
1346 | if (!array_key_exists($migrationInfo['main_details']['contact_type'], $treeCache)) { | |
1347 | $treeCache[$migrationInfo['main_details']['contact_type']] = CRM_Core_BAO_CustomGroup::getTree($migrationInfo['main_details']['contact_type'], | |
1348 | CRM_Core_DAO::$_nullObject, NULL, -1 | |
1349 | ); | |
1350 | } | |
1351 | $cgTree = &$treeCache[$migrationInfo['main_details']['contact_type']]; | |
1352 | ||
1353 | $cFields = array(); | |
1354 | foreach ($cgTree as $key => $group) { | |
1355 | if (!isset($group['fields'])) { | |
1356 | continue; | |
1357 | } | |
1358 | foreach ($group['fields'] as $fid => $field) { | |
1359 | $cFields[$fid]['attributes'] = $field; | |
1360 | } | |
1361 | } | |
1362 | ||
1363 | if (!isset($submitted)) { | |
1364 | $submitted = array(); | |
1365 | } | |
1366 | foreach ($submitted as $key => $value) { | |
1367 | if (substr($key, 0, 7) == 'custom_') { | |
1368 | $fid = (int) substr($key, 7); | |
0e357872 C |
1369 | if (empty($cFields[$fid])) { |
1370 | continue; | |
1371 | } | |
6a488035 TO |
1372 | $htmlType = $cFields[$fid]['attributes']['html_type']; |
1373 | switch ($htmlType) { | |
1374 | case 'File': | |
1375 | $customFiles[] = $fid; | |
1376 | unset($submitted["custom_$fid"]); | |
1377 | break; | |
1378 | ||
1379 | case 'Select Country': | |
1380 | case 'Select State/Province': | |
1381 | $submitted[$key] = CRM_Core_BAO_CustomField::getDisplayValue($value, $fid, $cFields); | |
1382 | break; | |
1383 | ||
1384 | case 'CheckBox': | |
1385 | case 'AdvMulti-Select': | |
1386 | case 'Multi-Select': | |
1387 | case 'Multi-Select Country': | |
1388 | case 'Multi-Select State/Province': | |
1389 | // Merge values from both contacts for multivalue fields, CRM-4385 | |
1390 | // get the existing custom values from db. | |
1391 | $customParams = array('entityID' => $mainId, $key => TRUE); | |
1392 | $customfieldValues = CRM_Core_BAO_CustomValueTable::getValues($customParams); | |
a7488080 | 1393 | if (!empty($customfieldValues[$key])) { |
6a488035 TO |
1394 | $existingValue = explode(CRM_Core_DAO::VALUE_SEPARATOR, $customfieldValues[$key]); |
1395 | if (is_array($existingValue) && !empty($existingValue)) { | |
1396 | $mergeValue = $submmtedCustomValue = array(); | |
1397 | if ($value) { | |
1398 | $submmtedCustomValue = explode(CRM_Core_DAO::VALUE_SEPARATOR, $value); | |
1399 | } | |
1400 | ||
1401 | //hack to remove null and duplicate values from array. | |
1402 | foreach (array_merge($submmtedCustomValue, $existingValue) as $k => $v) { | |
1403 | if ($v != '' && !in_array($v, $mergeValue)) { | |
1404 | $mergeValue[] = $v; | |
1405 | } | |
1406 | } | |
1407 | ||
1408 | //keep state and country as array format. | |
1409 | //for checkbox and m-select format w/ VALUE_SEPARATOR | |
1410 | if (in_array($htmlType, array( | |
1411 | 'CheckBox', 'Multi-Select', 'AdvMulti-Select'))) { | |
1412 | $submitted[$key] = CRM_Core_DAO::VALUE_SEPARATOR . implode(CRM_Core_DAO::VALUE_SEPARATOR, | |
1413 | $mergeValue | |
1414 | ) . CRM_Core_DAO::VALUE_SEPARATOR; | |
1415 | } | |
1416 | else { | |
1417 | $submitted[$key] = $mergeValue; | |
1418 | } | |
1419 | } | |
1420 | } | |
1421 | elseif (in_array($htmlType, array( | |
1422 | 'Multi-Select Country', 'Multi-Select State/Province'))) { | |
1423 | //we require submitted values should be in array format | |
1424 | if ($value) { | |
1425 | $mergeValueArray = explode(CRM_Core_DAO::VALUE_SEPARATOR, $value); | |
1426 | //hack to remove null values from array. | |
1427 | $mergeValue = array(); | |
1428 | foreach ($mergeValueArray as $k => $v) { | |
1429 | if ($v != '') { | |
1430 | $mergeValue[] = $v; | |
1431 | } | |
1432 | } | |
1433 | $submitted[$key] = $mergeValue; | |
1434 | } | |
1435 | } | |
1436 | break; | |
1437 | ||
1438 | default: | |
1439 | break; | |
1440 | } | |
1441 | } | |
1442 | } | |
1443 | ||
1444 | // **** Do file custom fields related migrations | |
1445 | // FIXME: move this someplace else (one of the BAOs) after discussing | |
b3fdbf3d | 1446 | // where to, and whether CRM_Core_BAO_File::deleteFileReferences() shouldn't actually, |
6a488035 TO |
1447 | // like, delete a file... |
1448 | ||
1449 | if (!isset($customFiles)) { | |
1450 | $customFiles = array(); | |
1451 | } | |
1452 | foreach ($customFiles as $customId) { | |
1453 | list($tableName, $columnName, $groupID) = CRM_Core_BAO_CustomField::getTableColumnGroup($customId); | |
1454 | ||
1455 | // get the contact_id -> file_id mapping | |
1456 | $fileIds = array(); | |
1457 | $sql = "SELECT entity_id, {$columnName} AS file_id FROM {$tableName} WHERE entity_id IN ({$mainId}, {$otherId})"; | |
1458 | $dao = CRM_Core_DAO::executeQuery($sql, CRM_Core_DAO::$_nullArray); | |
1459 | while ($dao->fetch()) { | |
1460 | $fileIds[$dao->entity_id] = $dao->file_id; | |
1461 | } | |
1462 | $dao->free(); | |
1463 | ||
1464 | // delete the main contact's file | |
1465 | if (!empty($fileIds[$mainId])) { | |
b3fdbf3d | 1466 | CRM_Core_BAO_File::deleteFileReferences($fileIds[$mainId], $mainId, $customId); |
6a488035 TO |
1467 | } |
1468 | ||
1469 | // move the other contact's file to main contact | |
1470 | //NYSS need to INSERT or UPDATE depending on whether main contact has an existing record | |
1471 | if ( CRM_Core_DAO::singleValueQuery("SELECT id FROM {$tableName} WHERE entity_id = {$mainId}") ) { | |
1472 | $sql = "UPDATE {$tableName} SET {$columnName} = {$fileIds[$otherId]} WHERE entity_id = {$mainId}"; | |
1473 | } | |
1474 | else { | |
1475 | $sql = "INSERT INTO {$tableName} ( entity_id, {$columnName} ) VALUES ( {$mainId}, {$fileIds[$otherId]} )"; | |
1476 | } | |
1477 | CRM_Core_DAO::executeQuery($sql, CRM_Core_DAO::$_nullArray); | |
1478 | ||
1479 | if ( CRM_Core_DAO::singleValueQuery(" | |
1480 | SELECT id | |
1481 | FROM civicrm_entity_file | |
1482 | WHERE entity_table = '{$tableName}' AND file_id = {$fileIds[$otherId]}") ) { | |
1483 | $sql = " | |
1484 | UPDATE civicrm_entity_file | |
1485 | SET entity_id = {$mainId} | |
1486 | WHERE entity_table = '{$tableName}' AND file_id = {$fileIds[$otherId]}"; | |
1487 | } | |
1488 | else { | |
1489 | $sql = " | |
1490 | INSERT INTO civicrm_entity_file ( entity_table, entity_id, file_id ) | |
1491 | VALUES ( '{$tableName}', {$mainId}, {$fileIds[$otherId]} )"; | |
1492 | } | |
1493 | CRM_Core_DAO::executeQuery($sql, CRM_Core_DAO::$_nullArray); | |
1494 | } | |
1495 | ||
1496 | // move view only custom fields CRM-5362 | |
1497 | $viewOnlyCustomFields = array(); | |
1498 | foreach ($submitted as $key => $value) { | |
1499 | $fid = (int) substr($key, 7); | |
8cc574cf | 1500 | if (array_key_exists($fid, $cFields) && !empty($cFields[$fid]['attributes']['is_view'])) { |
6a488035 TO |
1501 | $viewOnlyCustomFields[$key] = $value; |
1502 | } | |
1503 | } | |
1504 | ||
1505 | // special case to set values for view only, CRM-5362 | |
1506 | if (!empty($viewOnlyCustomFields)) { | |
1507 | $viewOnlyCustomFields['entityID'] = $mainId; | |
1508 | CRM_Core_BAO_CustomValueTable::setValues($viewOnlyCustomFields); | |
1509 | } | |
1510 | ||
1511 | // **** Delete other contact & update prev-next caching | |
1512 | $otherParams = array( | |
1513 | 'contact_id' => $otherId, | |
1514 | 'id' => $otherId, | |
1515 | 'version' => 3, | |
1516 | ); | |
1517 | if (CRM_Core_Permission::check('merge duplicate contacts') && | |
1518 | CRM_Core_Permission::check('delete contacts') | |
1519 | ) { | |
1520 | // if ext id is submitted then set it null for contact to be deleted | |
a7488080 | 1521 | if (!empty($submitted['external_identifier'])) { |
6a488035 TO |
1522 | $query = "UPDATE civicrm_contact SET external_identifier = null WHERE id = {$otherId}"; |
1523 | CRM_Core_DAO::executeQuery($query); | |
1524 | } | |
1525 | ||
1526 | civicrm_api('contact', 'delete', $otherParams); | |
1527 | CRM_Core_BAO_PrevNextCache::deleteItem($otherId); | |
1528 | } | |
1529 | // FIXME: else part | |
1530 | /* else { */ | |
1531 | ||
1532 | /* CRM_Core_Session::setStatus( ts('Do not have sufficient permission to delete duplicate contact.') ); */ | |
1533 | ||
1534 | /* } */ | |
1535 | ||
1536 | ||
1537 | // **** Update contact related info for the main contact | |
1538 | if (!empty($submitted)) { | |
1539 | $submitted['contact_id'] = $mainId; | |
1540 | ||
1541 | //update current employer field | |
1542 | if ($currentEmloyerId = CRM_Utils_Array::value('current_employer_id', $submitted)) { | |
1543 | if (!CRM_Utils_System::isNull($currentEmloyerId)) { | |
1544 | $submitted['current_employer'] = $submitted['current_employer_id']; | |
1545 | } else { | |
1546 | $submitted['current_employer'] = ''; | |
1547 | } | |
1548 | unset($submitted['current_employer_id']); | |
1549 | } | |
1550 | ||
00f3da2e BS |
1551 | //CRM-14312 include prefix/suffix from mainId if not overridden for proper construction of display/sort name |
1552 | if ( !isset($submitted['prefix_id']) && !empty($migrationInfo['main_details']['prefix_id']) ) { | |
1553 | $submitted['prefix_id'] = $migrationInfo['main_details']['prefix_id']; | |
1554 | } | |
1555 | if ( !isset($submitted['suffix_id']) && !empty($migrationInfo['main_details']['suffix_id']) ) { | |
1556 | $submitted['suffix_id'] = $migrationInfo['main_details']['suffix_id']; | |
1557 | } | |
1558 | ||
6a488035 TO |
1559 | CRM_Contact_BAO_Contact::createProfileContact($submitted, CRM_Core_DAO::$_nullArray, $mainId); |
1560 | unset($submitted); | |
1561 | } | |
1562 | ||
1563 | return TRUE; | |
1564 | } | |
16254ae1 ARW |
1565 | |
1566 | /** | |
1567 | * @return array of field names which will be compared, so everything except ID. | |
1568 | */ | |
1569 | static function getContactFields() { | |
1570 | $contactFields = CRM_Contact_DAO_Contact::fields(); | |
77b97be7 | 1571 | $invalidFields = array('api_key', 'contact_is_deleted', 'created_date', 'display_name', 'hash', 'id', 'modified_date', |
b857bab2 | 1572 | 'primary_contact_id', 'sort_name', 'user_unique_id'); |
bdd7870e RN |
1573 | foreach ($contactFields as $field => $value) { |
1574 | if (in_array($field, $invalidFields)) { | |
1575 | unset($contactFields[$field]); | |
1576 | } | |
1577 | } | |
16254ae1 ARW |
1578 | return array_keys($contactFields); |
1579 | } | |
ada104d5 AW |
1580 | |
1581 | /** | |
1582 | * Added for CRM-12695 | |
1583 | * Based on the contactId provided | |
1584 | * add/update membership(s) to related contacts | |
1585 | * | |
1586 | * @param contactId | |
1587 | */ | |
1588 | static function addMembershipToRealtedContacts($contactID) { | |
1589 | $dao = new CRM_Member_DAO_Membership(); | |
1590 | $dao->contact_id = $contactID; | |
1591 | $dao->is_test = 0; | |
1592 | $dao->find(); | |
1593 | ||
1594 | //checks membership of contact itself | |
1595 | while ($dao->fetch()) { | |
1596 | $relationshipTypeId = CRM_Core_DAO::getFieldValue('CRM_Member_DAO_MembershipType', $dao->membership_type_id, 'relationship_type_id', 'id'); | |
1597 | if ($relationshipTypeId) { | |
1598 | $membershipParams = array( | |
1599 | 'id' => $dao->id, | |
1600 | 'contact_id' => $dao->contact_id, | |
1601 | 'membership_type_id' => $dao->membership_type_id, | |
1602 | 'join_date' => CRM_Utils_Date::isoToMysql($dao->join_date), | |
1603 | 'start_date' => CRM_Utils_Date::isoToMysql($dao->start_date), | |
1604 | 'end_date' => CRM_Utils_Date::isoToMysql($dao->end_date), | |
1605 | 'source' => $dao->source, | |
1606 | 'status_id' => $dao->status_id | |
1607 | ); | |
1608 | // create/update membership(s) for related contact(s) | |
1609 | CRM_Member_BAO_Membership::createRelatedMemberships($membershipParams, $dao); | |
1610 | } // end of if relationshipTypeId | |
1611 | } | |
1612 | } | |
6a488035 | 1613 | } |