3 +--------------------------------------------------------------------+
4 | Copyright CiviCRM LLC. All rights reserved. |
6 | This work is published under the GNU AGPLv3 license with some |
7 | permitted exceptions and without any warranty. For full license |
8 | and copyright information, see https://civicrm.org/licensing |
9 +--------------------------------------------------------------------+
15 * @copyright CiviCRM LLC https://civicrm.org/licensing
19 class CRM_Logging_Differ
{
28 * @param string $log_conn_id
29 * @param string $log_date
30 * @param string $interval
32 public function __construct($log_conn_id, $log_date, $interval = '10 SECOND') {
33 $dsn = defined('CIVICRM_LOGGING_DSN') ? DB
::parseDSN(CIVICRM_LOGGING_DSN
) : DB
::parseDSN(CIVICRM_DSN
);
34 $this->db
= $dsn['database'];
35 $this->log_conn_id
= $log_conn_id;
36 $this->log_date
= $log_date;
37 $this->interval
= self
::filterInterval($interval);
45 public function diffsInTables($tables) {
47 foreach ($tables as $table) {
48 $diff = $this->diffsInTable($table);
50 $diffs[$table] = $diff;
58 * @param int $contactID
62 public function diffsInTable($table, $contactID = NULL) {
66 1 => [$this->log_conn_id
, 'String'],
69 $logging = new CRM_Logging_Schema();
70 $addressCustomTables = $logging->entityCustomDataLogTables('Address');
72 $contactIdClause = $join = '';
74 $params[3] = [$contactID, 'Integer'];
76 case 'civicrm_contact':
77 $contactIdClause = "AND id = %3";
81 $contactIdClause = "AND (( entity_id = %3 AND entity_table = 'civicrm_contact' ) OR (entity_id IN (SELECT note.id FROM `{$this->db}`.log_civicrm_note note WHERE note.entity_id = %3 AND note.entity_table = 'civicrm_contact') AND entity_table = 'civicrm_note'))";
84 case 'civicrm_entity_tag':
85 $contactIdClause = "AND entity_id = %3 AND entity_table = 'civicrm_contact'";
88 case 'civicrm_relationship':
89 $contactIdClause = "AND (contact_id_a = %3 OR contact_id_b = %3)";
92 case 'civicrm_activity':
93 $activityContacts = CRM_Activity_BAO_ActivityContact
::buildOptions('record_type_id', 'validate');
94 $sourceID = CRM_Utils_Array
::key('Activity Source', $activityContacts);
95 $assigneeID = CRM_Utils_Array
::key('Activity Assignees', $activityContacts);
96 $targetID = CRM_Utils_Array
::key('Activity Targets', $activityContacts);
99 LEFT JOIN civicrm_activity_contact at ON at.activity_id = lt.id AND at.contact_id = %3 AND at.record_type_id = {$targetID}
100 LEFT JOIN civicrm_activity_contact aa ON aa.activity_id = lt.id AND aa.contact_id = %3 AND aa.record_type_id = {$assigneeID}
101 LEFT JOIN civicrm_activity_contact source ON source.activity_id = lt.id AND source.contact_id = %3 AND source.record_type_id = {$sourceID} ";
102 $contactIdClause = "AND (at.id IS NOT NULL OR aa.id IS NOT NULL OR source.id IS NOT NULL)";
106 $contactIdClause = "AND id = (select case_id FROM civicrm_case_contact WHERE contact_id = %3 LIMIT 1)";
110 if (array_key_exists($table, $addressCustomTables)) {
111 $join = "INNER JOIN `{$this->db}`.`log_civicrm_address` et ON et.id = lt.entity_id";
112 $contactIdClause = "AND contact_id = %3";
116 // allow tables to be extended by report hook query objects
117 list($contactIdClause, $join) = CRM_Report_BAO_Hook
::singleton()->logDiffClause($this, $table);
119 if (empty($contactIdClause)) {
120 $contactIdClause = "AND contact_id = %3";
122 if (strpos($table, 'civicrm_value') !== FALSE) {
123 $contactIdClause = "AND entity_id = %3";
129 if ($this->log_date
) {
130 $params[2] = [$this->log_date
, 'String'];
132 AND lt.log_date BETWEEN DATE_SUB(%2, INTERVAL {$this->interval}) AND DATE_ADD(%2, INTERVAL {$this->interval})
136 // find ids in this table that were affected in the given connection (based on connection id and a ±10 s time period around the date)
138 SELECT DISTINCT lt.id FROM `{$this->db}`.`log_$table` lt
140 WHERE lt.log_conn_id = %1
143 $dao = CRM_Core_DAO
::executeQuery($sql, $params);
144 while ($dao->fetch()) {
145 $diffs = array_merge($diffs, $this->diffsInTableForId($table, $dao->id
));
156 * @throws \CRM_Core_Exception
158 private function diffsInTableForId($table, $id) {
162 1 => [$this->log_conn_id
, 'String'],
163 3 => [$id, 'Integer'],
166 // look for all the changes in the given connection that happened less than {$this->interval} s later than log_date to the given id to catch multi-query changes
168 if ($this->log_date
&& $this->interval
) {
169 $logDateClause = " AND log_date >= %2 AND log_date < DATE_ADD(%2, INTERVAL {$this->interval})";
170 $params[2] = [$this->log_date
, 'String'];
173 $changedSQL = "SELECT * FROM `{$this->db}`.`log_$table` WHERE log_conn_id = %1 $logDateClause AND id = %3 ORDER BY log_date DESC LIMIT 1";
175 $changedDAO = CRM_Core_DAO
::executeQuery($changedSQL, $params);
176 while ($changedDAO->fetch()) {
177 if (empty($this->log_date
) && !self
::checkLogCanBeUsedWithNoLogDate($changedDAO->log_date
)) {
178 throw new CRM_Core_Exception('The connection date must be passed in to disambiguate this logging entry per CRM-18193');
180 $changed = $changedDAO->toArray();
182 // return early if nothing found
183 if (empty($changed)) {
187 switch ($changed['log_action']) {
189 // the previous state is kept in the current state, current should keep the keys and clear the values
190 $original = $changed;
191 foreach ($changed as & $val) {
194 $changed['log_action'] = 'Delete';
198 // the previous state does not exist
203 $params[2] = [$changedDAO->log_date
, 'String'];
204 // look for the previous state (different log_conn_id) of the given id
205 $originalSQL = "SELECT * FROM `{$this->db}`.`log_$table` WHERE log_conn_id != %1 AND log_date < %2 AND id = %3 ORDER BY log_date DESC LIMIT 1";
206 $original = $this->sqlToArray($originalSQL, $params);
207 if (empty($original)) {
208 // A blank original array is not possible for Update action, otherwise we 'll end up displaying all information
209 // in $changed variable as updated-info
210 $original = $changed;
216 // populate $diffs with only the differences between $changed and $original
217 $skipped = ['log_action', 'log_conn_id', 'log_date', 'log_user_id'];
218 foreach (array_keys(array_diff_assoc($changed, $original)) as $diff) {
219 if (in_array($diff, $skipped)) {
223 if (CRM_Utils_Array
::value($diff, $original) === CRM_Utils_Array
::value($diff, $changed)) {
227 // hack: case_type_id column is a varchar with separator. For proper mapping to type labels,
228 // we need to make sure separators are trimmed
229 if ($diff == 'case_type_id') {
230 foreach (['original', 'changed'] as $var) {
231 if (!empty($
{$var[$diff]})) {
233 $val = explode(CRM_Case_BAO_Case
::VALUE_SEPARATOR
, $holder[$diff]);
234 $holder[$diff] = CRM_Utils_Array
::value(1, $val);
240 'action' => $changed['log_action'],
243 'from' => CRM_Utils_Array
::value($diff, $original),
244 'to' => CRM_Utils_Array
::value($diff, $changed),
246 'log_date' => $changed['log_date'],
247 'log_conn_id' => $changed['log_conn_id'],
256 * Get the titles & metadata option values for the table.
258 * For custom fields the titles may change so we use the ones as at the reference date.
260 * @param string $table
261 * @param string $referenceDate
265 public function titlesAndValuesForTable($table, $referenceDate) {
266 // static caches for subsequent calls with the same $table
270 if (!isset($titles[$table]) or !isset($values[$table])) {
271 if (($tableDAO = CRM_Core_DAO_AllCoreTables
::getClassForTable($table)) != FALSE) {
272 // FIXME: these should be populated with pseudo constants as they
273 // were at the time of logging rather than their current values
274 // FIXME: Use *_BAO:buildOptions() method rather than pseudoconstants & fetch programmatically
276 'contribution_page_id' => CRM_Contribute_PseudoConstant
::contributionPage(),
277 'contribution_status_id' => CRM_Contribute_PseudoConstant
::contributionStatus(NULL, 'label'),
278 'financial_type_id' => CRM_Contribute_PseudoConstant
::financialType(),
279 'country_id' => CRM_Core_PseudoConstant
::country(),
280 'gender_id' => CRM_Core_PseudoConstant
::get('CRM_Contact_DAO_Contact', 'gender_id'),
281 'location_type_id' => CRM_Core_PseudoConstant
::get('CRM_Core_DAO_Address', 'location_type_id'),
282 'payment_instrument_id' => CRM_Contribute_PseudoConstant
::paymentInstrument(),
283 'phone_type_id' => CRM_Core_PseudoConstant
::get('CRM_Core_DAO_Phone', 'phone_type_id'),
284 'preferred_communication_method' => CRM_Contact_BAO_Contact
::buildOptions('preferred_communication_method'),
285 'preferred_language' => CRM_Contact_BAO_Contact
::buildOptions('preferred_language'),
286 'prefix_id' => CRM_Contact_BAO_Contact
::buildOptions('prefix_id'),
287 'provider_id' => CRM_Core_PseudoConstant
::get('CRM_Core_DAO_IM', 'provider_id'),
288 'state_province_id' => CRM_Core_PseudoConstant
::stateProvince(),
289 'suffix_id' => CRM_Contact_BAO_Contact
::buildOptions('suffix_id'),
290 'website_type_id' => CRM_Core_PseudoConstant
::get('CRM_Core_DAO_Website', 'website_type_id'),
291 'activity_type_id' => CRM_Core_PseudoConstant
::activityType(TRUE, TRUE, FALSE, 'label', TRUE),
292 'case_type_id' => CRM_Case_PseudoConstant
::caseType('title', FALSE),
293 'priority_id' => CRM_Core_PseudoConstant
::get('CRM_Activity_DAO_Activity', 'priority_id'),
296 // for columns that appear in more than 1 table
299 $values[$table]['status_id'] = CRM_Case_PseudoConstant
::caseStatus('label', FALSE);
302 case 'civicrm_activity':
303 $values[$table]['status_id'] = CRM_Core_PseudoConstant
::activityStatus();
307 $dao = new $tableDAO();
308 foreach ($dao->fields() as $field) {
309 $titles[$table][$field['name']] = CRM_Utils_Array
::value('title', $field);
311 if ($field['type'] == CRM_Utils_Type
::T_BOOLEAN
) {
312 $values[$table][$field['name']] = ['0' => ts('false'), '1' => ts('true')];
316 elseif (substr($table, 0, 14) == 'civicrm_value_') {
317 list($titles[$table], $values[$table]) = $this->titlesAndValuesForCustomDataTable($table, $referenceDate);
320 $titles[$table] = $values[$table] = [];
324 return [$titles[$table], $values[$table]];
329 * @param array $params
333 private function sqlToArray($sql, $params) {
334 $dao = CRM_Core_DAO
::executeQuery($sql, $params);
336 return $dao->toArray();
340 * Get the field titles & option group values for the custom table as at the reference date.
342 * @param string $table
343 * @param string $referenceDate
347 private function titlesAndValuesForCustomDataTable($table, $referenceDate) {
352 1 => [$this->log_conn_id
, 'String'],
353 2 => [$referenceDate, 'String'],
354 3 => [$table, 'String'],
357 $sql = "SELECT id, title FROM `{$this->db}`.log_civicrm_custom_group WHERE log_date <= %2 AND table_name = %3 ORDER BY log_date DESC LIMIT 1";
358 $cgDao = CRM_Core_DAO
::executeQuery($sql, $params);
361 $params[3] = [$cgDao->id
, 'Integer'];
363 SELECT column_name, data_type, label, name, option_group_id
364 FROM `{$this->db}`.log_civicrm_custom_field
366 AND custom_group_id = %3
369 $cfDao = CRM_Core_DAO
::executeQuery($sql, $params);
371 while ($cfDao->fetch()) {
372 $titles[$cfDao->column_name
] = "{$cgDao->title}: {$cfDao->label}";
374 switch ($cfDao->data_type
) {
376 $values[$cfDao->column_name
] = ['0' => ts('false'), '1' => ts('true')];
380 $values[$cfDao->column_name
] = [];
381 if (!empty($cfDao->option_group_id
)) {
382 $params[3] = [$cfDao->option_group_id
, 'Integer'];
385 FROM `{$this->db}`.log_civicrm_option_value
387 AND option_group_id = %3
390 $ovDao = CRM_Core_DAO
::executeQuery($sql, $params);
391 while ($ovDao->fetch()) {
392 $values[$cfDao->column_name
][$ovDao->value
] = $ovDao->label
;
399 return [$titles, $values];
403 * Get all changes made in the connection.
405 * @param array $tables
406 * Array of tables to inspect.
410 public function getAllChangesForConnection($tables) {
411 $params = [1 => [$this->log_conn_id
, 'String']];
412 foreach ($tables as $table) {
414 $sql = " SELECT '{$table}' as table_name, id FROM {$this->db}.log_{$table} WHERE log_conn_id = %1";
417 $sql .= " UNION SELECT '{$table}' as table_name, id FROM {$this->db}.log_{$table} WHERE log_conn_id = %1";
421 $dao = CRM_Core_DAO
::executeQuery($sql, $params);
422 while ($dao->fetch()) {
423 if (empty($this->log_date
)) {
424 $this->log_date
= CRM_Core_DAO
::singleValueQuery("SELECT log_date FROM {$this->db}.log_{$table} WHERE log_conn_id = %1 LIMIT 1", $params);
426 $diffs = array_merge($diffs, $this->diffsInTableForId($dao->table_name
, $dao->id
));
432 * Check that the log record relates to a unique log id.
434 * If the record was recorded using the old non-unique style then the
436 * MUST be set to get the (fairly accurate) list of changes. In this case the
437 * nasty 10 second interval rule is applied.
439 * See CRM-18193 for a discussion of unique log id.
441 * @param string $change_date
444 * @throws \CiviCRM_API3_Exception
446 public static function checkLogCanBeUsedWithNoLogDate($change_date) {
448 if (civicrm_api3('Setting', 'getvalue', ['name' => 'logging_all_tables_uniquid', 'group' => 'CiviCRM Preferences'])) {
451 $uniqueDate = civicrm_api3('Setting', 'getvalue', [
452 'name' => 'logging_uniqueid_date',
453 'group' => 'CiviCRM Preferences',
455 if (strtotime($uniqueDate) <= strtotime($change_date)) {
465 * Filter a MySQL interval expression.
467 * @param string $interval
469 * Normalized version of $interval
470 * @throws \CRM_Core_Exception
471 * If the expression is invalid.
472 * @see https://dev.mysql.com/doc/refman/5.5/en/date-and-time-functions.html#function_date-add
474 private static function filterInterval($interval) {
475 if (empty($interval)) {
479 $units = ['MICROSECOND', 'SECOND', 'MINUTE', 'HOUR', 'DAY', 'WEEK', 'MONTH', 'QUARTER', 'YEAR'];
480 $interval = strtoupper($interval);
481 if (preg_match('/^([0-9]+) ([A-Z]+)$/', $interval, $matches)) {
482 if (in_array($matches[2], $units)) {
486 if (preg_match('/^\'([0-9: \.\-]+)\' ([A-Z]+)_([A-Z]+)$/', $interval, $matches)) {
487 if (in_array($matches[2], $units) && in_array($matches[3], $units)) {
491 throw new CRM_Core_Exception("Malformed interval");