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
17 class CRM_Logging_Schema
{
20 * Default storage engine for log tables
24 const ENGINE
= 'InnoDB';
30 private $useDBPrefix = TRUE;
33 'logging/contact/detail',
34 'logging/contact/summary',
35 'logging/contribute/detail',
36 'logging/contribute/summary',
40 * Columns that should never be subject to logging.
42 * CRM-13028 / NYSS-6933 - table => array (cols) - to be excluded from the update statement
46 private $exceptions = [
47 'civicrm_job' => ['last_run'],
48 'civicrm_group' => ['cache_date', 'refresh_date'],
52 * Specifications of all log table including
53 * - engine (default is InnoDB, if not set.)
54 * - engine_config, a string appended to the engine type.
55 * For INNODB space can be saved with 'ROW_FORMAT=COMPRESSED KEY_BLOCK_SIZE=4'
56 * - indexes (default is none and they cannot be added unless engine is innodb. If they are added and
57 * engine is not set to innodb an exception will be thrown since quiet acquiescence is easier to miss).
58 * - exceptions (by default those stored in $this->exceptions are included). These are
59 * excluded from the triggers.
63 private $logTableSpec = [];
66 * Setting Callback - Validate.
69 * @param array $fieldSpec
72 * @throws API_Exception
74 public static function checkLoggingSupport(&$value, $fieldSpec) {
75 if (!(CRM_Core_DAO
::checkTriggerViewPermission(FALSE)) && $value) {
76 throw new API_Exception(ts("In order to use this functionality, the installation's database user must have privileges to create triggers and views (if binary logging is enabled – this means the SUPER privilege). This install does not have the required privilege(s) enabled."));
78 // dev/core#1812 Disable logging in a multilingual environment.
79 if (CRM_Core_I18n
::isMultilingual() && $value) {
80 throw new API_Exception(ts("Logging is not supported in a multilingual environment!"));
86 * Setting Callback - On Change.
88 * Respond to changes in the "logging" setting. Set up or destroy
91 * @param array $oldValue
92 * List of component names.
93 * @param array $newValue
94 * List of component names.
95 * @param array $metadata
96 * Specification of the setting (per *.settings.php).
98 public static function onToggle($oldValue, $newValue, $metadata) {
99 if ($oldValue == $newValue) {
103 $logging = new CRM_Logging_Schema();
105 $logging->enableLogging();
108 $logging->disableLogging();
113 * Populate $this->tables and $this->logs with current db state.
115 public function __construct() {
116 $dao = new CRM_Contact_DAO_Contact();
117 $civiDBName = $dao->_database
;
119 $dao = CRM_Core_DAO
::executeQuery("
121 FROM INFORMATION_SCHEMA.TABLES
122 WHERE TABLE_SCHEMA = '{$civiDBName}'
123 AND TABLE_TYPE = 'BASE TABLE'
124 AND TABLE_NAME LIKE 'civicrm_%'
126 while ($dao->fetch()) {
127 $this->tables
[] = $dao->TABLE_NAME
;
130 // do not log temp import, cache, menu and log tables
131 $this->tables
= preg_grep('/^civicrm_import_job_/', $this->tables
, PREG_GREP_INVERT
);
132 $this->tables
= preg_grep('/_cache$/', $this->tables
, PREG_GREP_INVERT
);
133 $this->tables
= preg_grep('/_log/', $this->tables
, PREG_GREP_INVERT
);
134 $this->tables
= preg_grep('/^civicrm_queue_/', $this->tables
, PREG_GREP_INVERT
);
136 $this->tables
= preg_grep('/^civicrm_menu/', $this->tables
, PREG_GREP_INVERT
);
137 $this->tables
= preg_grep('/_temp_/', $this->tables
, PREG_GREP_INVERT
);
139 $this->tables
= preg_grep('/_bak$/', $this->tables
, PREG_GREP_INVERT
);
140 $this->tables
= preg_grep('/_backup$/', $this->tables
, PREG_GREP_INVERT
);
142 $this->tables
= preg_grep('/^civicrm_tmp_/', $this->tables
, PREG_GREP_INVERT
);
144 // do not log civicrm_mailing_event* tables, CRM-12300
145 $this->tables
= preg_grep('/^civicrm_mailing_event_/', $this->tables
, PREG_GREP_INVERT
);
147 // dev/core#1762 Don't log subscription_history
148 $this->tables
= preg_grep('/^civicrm_subscription_history/', $this->tables
, PREG_GREP_INVERT
);
150 // do not log civicrm_mailing_recipients table, CRM-16193
151 $this->tables
= array_diff($this->tables
, ['civicrm_mailing_recipients']);
152 $this->logTableSpec
= array_fill_keys($this->tables
, []);
153 foreach ($this->exceptions
as $tableName => $fields) {
154 $this->logTableSpec
[$tableName]['exceptions'] = $fields;
156 CRM_Utils_Hook
::alterLogTables($this->logTableSpec
);
157 $this->tables
= array_keys($this->logTableSpec
);
158 $nonStandardTableNameString = $this->getNonStandardTableNameFilterString();
160 if (defined('CIVICRM_LOGGING_DSN')) {
161 $dsn = CRM_Utils_SQL
::autoSwitchDSN(CIVICRM_LOGGING_DSN
);
162 $dsn = DB
::parseDSN($dsn);
163 $this->useDBPrefix
= (CIVICRM_LOGGING_DSN
!= CIVICRM_DSN
);
166 $dsn = CRM_Utils_SQL
::autoSwitchDSN(CIVICRM_DSN
);
167 $dsn = DB
::parseDSN($dsn);
168 $this->useDBPrefix
= FALSE;
170 $this->db
= $dsn['database'];
172 $dao = CRM_Core_DAO
::executeQuery("
174 FROM INFORMATION_SCHEMA.TABLES
175 WHERE TABLE_SCHEMA = '{$this->db}'
176 AND TABLE_TYPE = 'BASE TABLE'
177 AND (TABLE_NAME LIKE 'log_civicrm_%' $nonStandardTableNameString )
179 while ($dao->fetch()) {
180 $log = $dao->TABLE_NAME
;
181 $this->logs
[substr($log, 4)] = $log;
186 * Return logging custom data tables.
188 public function customDataLogTables() {
189 return preg_grep('/^log_civicrm_value_/', $this->logs
);
193 * Return custom data tables for specified entity / extends.
195 * @param string $extends
199 public function entityCustomDataLogTables($extends) {
200 $customGroupTables = [];
201 $customGroupDAO = CRM_Core_BAO_CustomGroup
::getAllCustomGroupsByBaseEntity($extends);
202 $customGroupDAO->find();
203 while ($customGroupDAO->fetch()) {
204 // logging is disabled for the table (e.g by hook) then $this->logs[$customGroupDAO->table_name]
206 if (!empty($this->logs
[$customGroupDAO->table_name
])) {
207 $customGroupTables[$customGroupDAO->table_name
] = $this->logs
[$customGroupDAO->table_name
];
210 return $customGroupTables;
214 * Disable logging by dropping the triggers (but keep the log tables intact).
216 public function disableLogging() {
217 $config = CRM_Core_Config
::singleton();
218 $config->logging
= FALSE;
220 $this->dropTriggers();
222 // invoke the meta trigger creation call
223 CRM_Core_DAO
::triggerRebuild();
225 $this->deleteReports();
229 * Drop triggers for all logged tables.
231 * @param string $tableName
233 public function dropTriggers($tableName = NULL) {
234 /** @var \Civi\Core\SqlTriggers $sqlTriggers */
235 $sqlTriggers = Civi
::service('sql_triggers');
236 $dao = new CRM_Core_DAO();
239 $tableNames = [$tableName];
242 $tableNames = $this->tables
;
245 // Sort the table names so the sql output is consistent for those sites
246 // loading it asynchronously (using the setting 'logging_no_trigger_permission')
248 foreach ($tableNames as $table) {
249 $validName = CRM_Core_DAO
::shortenSQLName($table, 48, TRUE);
252 $sqlTriggers->enqueueQuery("DROP TRIGGER IF EXISTS {$validName}_before_insert");
253 $sqlTriggers->enqueueQuery("DROP TRIGGER IF EXISTS {$validName}_before_update");
254 $sqlTriggers->enqueueQuery("DROP TRIGGER IF EXISTS {$validName}_before_delete");
257 $sqlTriggers->enqueueQuery("DROP TRIGGER IF EXISTS {$validName}_after_insert");
258 $sqlTriggers->enqueueQuery("DROP TRIGGER IF EXISTS {$validName}_after_update");
259 $sqlTriggers->enqueueQuery("DROP TRIGGER IF EXISTS {$validName}_after_delete");
262 // now lets also be safe and drop all triggers that start with
263 // civicrm_ if we are dropping all triggers
264 // we need to do this to capture all the leftover triggers since
265 // we did the shortening trigger name for CRM-11794
266 if ($tableName === NULL) {
267 $triggers = $dao->executeQuery("SHOW TRIGGERS LIKE 'civicrm_%'");
269 while ($triggers->fetch()) {
270 $sqlTriggers->enqueueQuery("DROP TRIGGER IF EXISTS {$triggers->Trigger}");
276 * Enable site-wide logging.
278 public function enableLogging() {
279 $this->fixSchemaDifferences(TRUE);
284 * Sync log tables and rebuild triggers.
286 * @param bool $enableLogging : Ensure logging is enabled
288 public function fixSchemaDifferences($enableLogging = FALSE) {
289 $config = CRM_Core_Config
::singleton();
290 if ($enableLogging) {
291 $config->logging
= TRUE;
293 if ($config->logging
) {
294 $this->fixSchemaDifferencesForAll();
296 // invoke the meta trigger creation call
297 CRM_Core_DAO
::triggerRebuild(NULL, TRUE);
301 * Update log tables structure.
303 * This function updates log tables to have the log_conn_id type of varchar
304 * and also implements the engine change defined by the hook (i.e. INNODB).
306 * Note changing engine & adding hook-defined indexes, but not changing back
307 * to INNODB if engine has not been deliberately set (by hook) and not
308 * dropping indexes. Sysadmin will need to manually intervene to revert to
311 * @param array $params
312 * 'updateChangedEngineConfig' - update if the engine config changes?
313 * 'forceEngineMigration' - force engine upgrade from ARCHIVE to InnoDB?
315 * @return int $updateTablesCount
316 * @throws \CiviCRM_API3_Exception
318 public function updateLogTableSchema($params) {
319 $updateLogConn = FALSE;
320 $updatedTablesCount = 0;
321 foreach ($this->logs
as $mainTable => $logTable) {
323 $tableSpec = $this->logTableSpec
[$mainTable];
324 $currentEngine = strtoupper($this->getEngineForLogTable($logTable));
325 if (!isset($tableSpec['engine']) && $currentEngine == 'ARCHIVE' && $params['forceEngineMigration']) {
326 // table uses ARCHIVE engine (the previous default) and no one set an
327 // alternative engine via hook_civicrm_alterLogTables => force change to
329 $tableSpec['engine'] = self
::ENGINE
;
331 $engineChanged = isset($tableSpec['engine']) && (strtoupper($tableSpec['engine']) != $currentEngine);
332 $engineConfigChanged = isset($tableSpec['engine_config']) && (strtoupper($tableSpec['engine_config']) != $this->getEngineConfigForLogTable($logTable));
333 if ($engineChanged ||
($engineConfigChanged && $params['updateChangedEngineConfig'])) {
334 $alterSql[] = "ENGINE=" . $tableSpec['engine'] . " " . CRM_Utils_Array
::value('engine_config', $tableSpec);
336 if (!empty($tableSpec['indexes'])) {
337 $indexes = $this->getIndexesForTable($logTable);
338 foreach ($tableSpec['indexes'] as $indexName => $indexSpec) {
339 if (!in_array($indexName, $indexes)) {
340 if (is_array($indexSpec)) {
341 $indexSpec = implode(" , ", $indexSpec);
343 $alterSql[] = "ADD INDEX {$indexName}($indexSpec)";
347 $columns = $this->columnSpecsOf($logTable);
348 if (empty($columns['log_conn_id'])) {
349 throw new Exception($logTable . print_r($columns, TRUE));
351 if ($columns['log_conn_id']['DATA_TYPE'] != 'varchar' ||
$columns['log_conn_id']['LENGTH'] != 17) {
352 $alterSql[] = "MODIFY log_conn_id VARCHAR(17)";
353 $updateLogConn = TRUE;
355 if (!empty($alterSql)) {
356 CRM_Core_DAO
::executeQuery("ALTER TABLE {$this->db}.{$logTable} " . implode(', ', $alterSql), [], TRUE, NULL, FALSE, FALSE);
357 $updatedTablesCount++
;
360 if ($updateLogConn) {
361 civicrm_api3('Setting', 'create', ['logging_uniqueid_date' => date('Y-m-d H:i:s')]);
363 return $updatedTablesCount;
367 * Get the engine for the given table.
369 * @param string $table
373 public function getEngineForLogTable($table) {
374 return strtoupper(CRM_Core_DAO
::singleValueQuery("
375 SELECT ENGINE FROM information_schema.tables WHERE TABLE_NAME = %1
376 AND table_schema = %2
377 ", [1 => [$table, 'String'], 2 => [$this->db
, 'String']]));
381 * Get the engine config for the given table.
383 * @param string $table
387 public function getEngineConfigForLogTable($table) {
388 return strtoupper(CRM_Core_DAO
::singleValueQuery("
389 SELECT CREATE_OPTIONS FROM information_schema.tables WHERE TABLE_NAME = %1
390 AND table_schema = %2
391 ", [1 => [$table, 'String'], 2 => [$this->db
, 'String']]));
395 * Get all the indexes in the table.
397 * @param string $table
401 public function getIndexesForTable($table) {
403 $result = CRM_Core_DAO
::executeQuery("
404 SELECT constraint_name AS index_name
405 FROM information_schema.key_column_usage
406 WHERE table_schema = %2 AND table_name = %1
408 SELECT index_name AS index_name
409 FROM information_schema.statistics
410 WHERE table_schema = %2 AND table_name = %1
412 [1 => [$table, 'String'], 2 => [$this->db
, 'String']]
414 while ($result->fetch()) {
415 $indexes[] = $result->index_name
;
421 * Add missing (potentially specified) log table columns for the given table.
423 * @param string $table
424 * name of the relevant table.
426 * Mixed array of columns to add or null (to check for the missing columns).
430 public function fixSchemaDifferencesFor($table, $cols = []) {
434 if (empty($this->logs
[$table])) {
435 $this->createLogTableFor($table);
440 $cols = $this->columnsWithDiffSpecs($table, "log_$table");
443 // If a column that already exists on logging table is being added, we
444 // should treat it as a modification.
445 $this->resetSchemaCacheForTable("log_$table");
446 $logTableSchema = $this->columnSpecsOf("log_$table");
447 if (!empty($cols['ADD'])) {
448 foreach ($cols['ADD'] as $colKey => $col) {
449 if (array_key_exists($col, $logTableSchema)) {
450 $cols['MODIFY'][] = $col;
451 unset($cols['ADD'][$colKey]);
456 // use the relevant lines from CREATE TABLE to add colums to the log table
457 $create = $this->_getCreateQuery($table);
458 foreach ((['ADD', 'MODIFY']) as $alterType) {
459 if (!empty($cols[$alterType])) {
460 foreach ($cols[$alterType] as $col) {
461 $line = $this->_getColumnQuery($col, $create);
462 CRM_Core_DAO
::executeQuery("ALTER TABLE `{$this->db}`.log_$table {$alterType} {$line}", [], TRUE, NULL, FALSE, FALSE);
467 // for any obsolete columns (not null) we just make the column nullable.
468 if (!empty($cols['OBSOLETE'])) {
469 $create = $this->_getCreateQuery("`{$this->db}`.log_{$table}");
470 foreach ($cols['OBSOLETE'] as $col) {
471 $line = $this->_getColumnQuery($col, $create);
472 // This is just going to make a not null column to nullable
473 CRM_Core_DAO
::executeQuery("ALTER TABLE `{$this->db}`.log_$table MODIFY {$line}", [], TRUE, NULL, FALSE, FALSE);
477 $this->resetSchemaCacheForTable("log_$table");
483 * Resets schema cache for the given table.
485 * @param string $table
488 private function resetSchemaCacheForTable($table) {
489 unset(\Civi
::$statics[__CLASS__
]['columnSpecs'][$table]);
495 * @param string $table
499 private function _getCreateQuery($table) {
500 $dao = CRM_Core_DAO
::executeQuery("SHOW CREATE TABLE {$table}", [], TRUE, NULL, FALSE, FALSE);
502 $create = explode("\n", $dao->Create_Table
);
510 * @param bool $createQuery
512 * @return array|mixed|string
514 private function _getColumnQuery($col, $createQuery) {
515 $line = preg_grep("/^ `$col` /", $createQuery);
516 $line = rtrim(array_pop($line), ',');
518 $line = self
::fixTimeStampAndNotNullSQL($line);
523 * Fix schema differences.
525 public function fixSchemaDifferencesForAll(): void
{
527 $this->resetTableColumnsCache();
529 foreach ($this->tables
as $table) {
530 if (empty($this->logs
[$table])) {
531 $this->createLogTableFor($table);
534 $diffs[$table] = $this->columnsWithDiffSpecs($table, "log_$table");
538 foreach ($diffs as $table => $cols) {
539 $this->fixSchemaDifferencesFor($table, $cols);
544 * Resets columnSpecs.
546 * Resets columnSpecs static array in Civi's $statics to make sure we use the
547 * real state of the schema to perform sync operations between core and
550 private function resetTableColumnsCache() {
551 unset(\Civi
::$statics[__CLASS__
]['columnSpecs']);
557 * Log_civicrm_contact.modified_date for example would always be copied from civicrm_contact.modified_date,
558 * so there's no need for a default timestamp and therefore we remove such default timestamps
559 * also eliminate the NOT NULL constraint, since we always copy and schema can change down the road)
561 * @param string $query
565 public static function fixTimeStampAndNotNullSQL($query) {
566 $query = str_ireplace("TIMESTAMP() NOT NULL", "TIMESTAMP NULL", $query);
567 $query = str_ireplace("TIMESTAMP NOT NULL", "TIMESTAMP NULL", $query);
568 $query = str_ireplace("DEFAULT CURRENT_TIMESTAMP() ON UPDATE CURRENT_TIMESTAMP()", '', $query);
569 $query = str_ireplace("DEFAULT CURRENT_TIMESTAMP ON UPDATE CURRENT_TIMESTAMP", '', $query);
570 $query = str_ireplace("DEFAULT CURRENT_TIMESTAMP()", '', $query);
571 $query = str_ireplace("DEFAULT CURRENT_TIMESTAMP", '', $query);
572 $query = str_ireplace("NOT NULL", '', $query);
579 private function addReports() {
581 'logging/contact/detail' => ts('Logging Details'),
582 'logging/contact/summary' => ts('Contact Logging Report (Summary)'),
583 'logging/contribute/detail' => ts('Contribution Logging Report (Detail)'),
584 'logging/contribute/summary' => ts('Contribution Logging Report (Summary)'),
586 // enable logging templates
587 CRM_Core_DAO
::executeQuery("
588 UPDATE civicrm_option_value
590 WHERE value IN ('" . implode("', '", $this->reports
) . "')
593 // add report instances
594 $domain_id = CRM_Core_Config
::domainID();
595 foreach ($this->reports
as $report) {
596 $dao = new CRM_Report_DAO_ReportInstance();
597 $dao->domain_id
= $domain_id;
598 $dao->report_id
= $report;
599 $dao->title
= $titles[$report];
600 $dao->permission
= 'administer CiviCRM';
601 if ($report == 'logging/contact/summary') {
602 $dao->is_reserved
= 1;
609 * Get an array of column names of the given table.
611 * @param string $table
616 private function columnsOf($table, $force = FALSE) {
617 if ($force ||
!isset(\Civi
::$statics[__CLASS__
]['columnsOf'][$table])) {
618 $from = (substr($table, 0, 4) == 'log_') ?
"`{$this->db}`.$table" : $table;
619 $dao = CRM_Core_DAO
::executeQuery("SHOW COLUMNS FROM $from", [], TRUE, NULL, FALSE, FALSE);
620 if (is_a($dao, 'DB_Error')) {
623 \Civi
::$statics[__CLASS__
]['columnsOf'][$table] = [];
624 while ($dao->fetch()) {
625 \Civi
::$statics[__CLASS__
]['columnsOf'][$table][] = CRM_Utils_Type
::escape($dao->Field
, 'MysqlColumnNameOrAlias');
628 return \Civi
::$statics[__CLASS__
]['columnsOf'][$table];
632 * Get an array of columns and their details like DATA_TYPE, IS_NULLABLE, COLUMN_DEFAULT for the given table.
634 * @param string $table
638 private function columnSpecsOf($table) {
639 static $civiDB = NULL;
640 if (empty(\Civi
::$statics[__CLASS__
]['columnSpecs'])) {
641 \Civi
::$statics[__CLASS__
]['columnSpecs'] = [];
643 if (empty(\Civi
::$statics[__CLASS__
]['columnSpecs']) ||
!isset(\Civi
::$statics[__CLASS__
]['columnSpecs'][$table])) {
645 $dao = new CRM_Contact_DAO_Contact();
646 $civiDB = $dao->_database
;
649 // NOTE: W.r.t Performance using one query to find all details and storing in static array is much faster
650 // than firing query for every given table.
652 SELECT TABLE_SCHEMA, TABLE_NAME, COLUMN_NAME, DATA_TYPE, IS_NULLABLE, COLUMN_DEFAULT, COLUMN_TYPE, EXTRA
653 FROM INFORMATION_SCHEMA.COLUMNS
654 WHERE table_schema IN ('{$this->db}', '{$civiDB}')";
655 $dao = CRM_Core_DAO
::executeQuery($query);
656 if (is_a($dao, 'DB_Error')) {
659 while ($dao->fetch()) {
660 if (!array_key_exists($dao->TABLE_NAME
, \Civi
::$statics[__CLASS__
]['columnSpecs'])) {
661 \Civi
::$statics[__CLASS__
]['columnSpecs'][$dao->TABLE_NAME
] = [];
663 \Civi
::$statics[__CLASS__
]['columnSpecs'][$dao->TABLE_NAME
][$dao->COLUMN_NAME
] = [
664 'COLUMN_NAME' => $dao->COLUMN_NAME
,
665 'DATA_TYPE' => $dao->DATA_TYPE
,
666 'IS_NULLABLE' => $dao->IS_NULLABLE
,
667 'COLUMN_DEFAULT' => $dao->COLUMN_DEFAULT
,
668 'EXTRA' => $dao->EXTRA
,
670 if (($first = strpos($dao->COLUMN_TYPE
, '(')) != 0) {
671 // this extracts the value between parentheses after the column type.
672 // it could be the column length, i.e. "int(8)", "decimal(20,2)")
673 // or the permitted values of an enum (e.g. "enum('A','B')")
675 $dao->COLUMN_TYPE
, $first +
1, strpos($dao->COLUMN_TYPE
, ')') - $first - 1
677 if (strpos($parValue, "'") === FALSE) {
678 // no quote in value means column length
679 \Civi
::$statics[__CLASS__
]['columnSpecs'][$dao->TABLE_NAME
][$dao->COLUMN_NAME
]['LENGTH'] = $parValue;
682 // single quote means enum permitted values
683 \Civi
::$statics[__CLASS__
]['columnSpecs'][$dao->TABLE_NAME
][$dao->COLUMN_NAME
]['ENUM_VALUES'] = $parValue;
688 return \Civi
::$statics[__CLASS__
]['columnSpecs'][$table];
692 * Get columns that have changed.
694 * @param string $civiTable
695 * @param string $logTable
699 public function columnsWithDiffSpecs($civiTable, $logTable) {
700 $civiTableSpecs = $this->columnSpecsOf($civiTable);
701 $logTableSpecs = $this->columnSpecsOf($logTable);
703 $diff = ['ADD' => [], 'MODIFY' => [], 'OBSOLETE' => []];
705 // Columns to be added
706 $diff['ADD'] = array_diff(array_keys($civiTableSpecs), array_keys($logTableSpecs));
708 // Columns to be modified
709 // Only pick columns where there is a spec change and the column definition was not deliberately modified by
710 // fixTimeStampAndNotNullSQL() method, also accounting for differences in db version.
711 foreach ($civiTableSpecs as $col => $colSpecs) {
712 if (!isset($logTableSpecs[$col]) ||
!is_array($logTableSpecs[$col])) {
713 $logTableSpecs[$col] = [];
715 $specDiff = array_diff($civiTableSpecs[$col], $logTableSpecs[$col]);
716 if (!empty($specDiff) && $col !== 'id' && !in_array($col, $diff['ADD'])) {
717 if (empty($colSpecs['EXTRA']) ||
(!empty($colSpecs['EXTRA']) && $colSpecs['EXTRA'] !== 'auto_increment')) {
718 // ignore 'id' column for any spec changes, to avoid any auto-increment mysql errors
719 if ($civiTableSpecs[$col]['DATA_TYPE'] != CRM_Utils_Array
::value('DATA_TYPE', $logTableSpecs[$col])
720 // We won't alter the log if the length is decreased in case some of the existing data won't fit.
721 || CRM_Utils_Array
::value('LENGTH', $civiTableSpecs[$col]) > CRM_Utils_Array
::value('LENGTH', $logTableSpecs[$col])
723 // if data-type is different, surely consider the column
724 $diff['MODIFY'][] = $col;
726 elseif ($civiTableSpecs[$col]['DATA_TYPE'] === 'enum' &&
727 CRM_Utils_Array
::value('ENUM_VALUES', $civiTableSpecs[$col]) != CRM_Utils_Array
::value('ENUM_VALUES', $logTableSpecs[$col])
729 // column is enum and the permitted values have changed
730 $diff['MODIFY'][] = $col;
732 elseif ($civiTableSpecs[$col]['IS_NULLABLE'] != CRM_Utils_Array
::value('IS_NULLABLE', $logTableSpecs[$col]) &&
733 $logTableSpecs[$col]['IS_NULLABLE'] === 'NO'
735 // if is-null property is different, and log table's column is NOT-NULL, surely consider the column
736 $diff['MODIFY'][] = $col;
739 $civiTableSpecs[$col]['COLUMN_DEFAULT'] != ($logTableSpecs[$col]['COLUMN_DEFAULT'] ??
NULL)
740 && !stristr($civiTableSpecs[$col]['COLUMN_DEFAULT'], 'timestamp')
741 && !($civiTableSpecs[$col]['COLUMN_DEFAULT'] === NULL && ($logTableSpecs[$col]['COLUMN_DEFAULT'] ??
NULL) === 'NULL')
743 // if default property is different, and its not about a timestamp column, consider it
744 $diff['MODIFY'][] = $col;
750 // columns to made obsolete by turning into not-null
751 $oldCols = array_diff(array_keys($logTableSpecs), array_keys($civiTableSpecs));
752 foreach ($oldCols as $col) {
753 if (!in_array($col, ['log_date', 'log_conn_id', 'log_user_id', 'log_action']) &&
754 $logTableSpecs[$col]['IS_NULLABLE'] === 'NO'
755 // This could be to support replication - https://lab.civicrm.org/dev/core/-/issues/2120
756 && $logTableSpecs[$col]['EXTRA'] !== 'auto_increment'
758 // if its a column present only in log table, not among those used by log tables for special purpose, and not-null
759 $diff['OBSOLETE'][] = $col;
767 * Getter for logTableSpec.
771 public function getLogTableSpec() {
772 return $this->logTableSpec
;
776 * Create a log table with schema mirroring the given table’s structure and seeding it with the given table’s contents.
778 * @param string $table
780 private function createLogTableFor($table) {
781 $dao = CRM_Core_DAO
::executeQuery("SHOW CREATE TABLE $table", [], TRUE, NULL, FALSE, FALSE);
783 $query = $dao->Create_Table
;
785 // rewrite the queries into CREATE TABLE queries for log tables:
788 log_date TIMESTAMP NOT NULL DEFAULT CURRENT_TIMESTAMP,
789 log_conn_id VARCHAR(17),
791 log_action ENUM('Initialization', 'Insert', 'Update', 'Delete')
794 if (!empty($this->logTableSpec
[$table]['indexes'])) {
795 foreach ($this->logTableSpec
[$table]['indexes'] as $indexName => $indexSpec) {
796 if (is_array($indexSpec)) {
797 $indexSpec = implode(" , ", $indexSpec);
799 $cols .= ", INDEX {$indexName}($indexSpec)";
803 // - prepend the name with log_
804 // - drop AUTO_INCREMENT columns
805 // - drop non-column rows of the query (keys, constraints, etc.)
806 // - set the ENGINE to the specified engine (default is INNODB)
807 // - add log-specific columns (at the end of the table)
808 $query = preg_replace("/^CREATE TABLE `$table`/i", "CREATE TABLE `{$this->db}`.log_$table", $query);
809 $query = preg_replace("/ AUTO_INCREMENT/i", '', $query);
810 $query = preg_replace("/^ [^`].*$/m", '', $query);
811 $engine = strtoupper(empty($this->logTableSpec
[$table]['engine']) ? self
::ENGINE
: $this->logTableSpec
[$table]['engine']);
812 $engine .= " " . ($this->logTableSpec
[$table]['engine_config'] ??
'');
813 if (strpos($engine, 'ROW_FORMAT') !== FALSE) {
814 $query = preg_replace("/ROW_FORMAT=\w+/m", '', $query);
816 $query = preg_replace("/^\) ENGINE=[^ ]+ /im", ') ENGINE=' . $engine . ' ', $query);
818 // log_civicrm_contact.modified_date for example would always be copied from civicrm_contact.modified_date,
819 // so there's no need for a default timestamp and therefore we remove such default timestamps
820 // also eliminate the NOT NULL constraint, since we always copy and schema can change down the road)
821 $query = self
::fixTimeStampAndNotNullSQL($query);
822 $query = preg_replace("/(,*\n*\) )ENGINE/m", "$cols\n) ENGINE", $query);
824 CRM_Core_DAO
::executeQuery($query, [], TRUE, NULL, FALSE, FALSE);
826 $columns = implode(', ', $this->columnsOf($table));
827 CRM_Core_DAO
::executeQuery("INSERT INTO `{$this->db}`.log_$table ($columns, log_conn_id, log_user_id, log_action) SELECT $columns, @uniqueID, @civicrm_user_id, 'Initialization' FROM {$table}", [], TRUE, NULL, FALSE, FALSE);
829 $this->tables
[] = $table;
830 if (empty($this->logs
)) {
831 civicrm_api3('Setting', 'create', ['logging_uniqueid_date' => date('Y-m-d H:i:s')]);
832 civicrm_api3('Setting', 'create', ['logging_all_tables_uniquid' => 1]);
834 $this->logs
[$table] = "log_$table";
840 private function deleteReports() {
841 // disable logging templates
842 CRM_Core_DAO
::executeQuery("
843 UPDATE civicrm_option_value
845 WHERE value IN ('" . implode("', '", $this->reports
) . "')
848 // delete report instances
849 $domain_id = CRM_Core_Config
::domainID();
850 foreach ($this->reports
as $report) {
851 $dao = new CRM_Report_DAO_ReportInstance();
852 $dao->domain_id
= $domain_id;
853 $dao->report_id
= $report;
859 * Predicate whether logging is enabled.
861 public function isEnabled() {
862 if (\Civi
::settings()->get('logging')) {
863 return ($this->tablesExist() && (\Civi
::settings()->get('logging_no_trigger_permission') ||
$this->triggersExist()));
869 * Predicate whether any log tables exist.
871 private function tablesExist() {
872 return !empty($this->logs
);
876 * Drop all log tables.
878 * This does not currently have a usage outside the tests.
880 public function dropAllLogTables() {
881 if ($this->tablesExist()) {
882 foreach ($this->logs
as $log_table) {
883 CRM_Core_DAO
::executeQuery("DROP TABLE $log_table");
889 * Get an sql clause to find the names of any log tables that do not match the normal pattern.
891 * Most tables are civicrm_xxx with the log table being log_civicrm_xxx
892 * However, they don't have to match this pattern (e.g when defined by hook) so find the
893 * anomalies and return a filter string to include them.
897 public function getNonStandardTableNameFilterString() {
898 $nonStandardTableNames = preg_grep('/^civicrm_/', $this->tables
, PREG_GREP_INVERT
);
899 if (empty($nonStandardTableNames)) {
902 $nonStandardTableLogs = [];
903 foreach ($nonStandardTableNames as $nonStandardTableName) {
904 $nonStandardTableLogs[] = "'log_{$nonStandardTableName}'";
906 return " OR TABLE_NAME IN (" . implode(',', $nonStandardTableLogs) . ")";
910 * Predicate whether the logging triggers are in place.
912 private function triggersExist() {
913 // FIXME: probably should be a bit more thorough…
914 // note that the LIKE parameter is TABLE NAME
915 return (bool) CRM_Core_DAO
::singleValueQuery("SHOW TRIGGERS LIKE 'civicrm_contact'");
922 * @param null $tableName
925 public function triggerInfo(&$info, $tableName = NULL, $force = FALSE) {
926 if (!CRM_Core_Config
::singleton()->logging
) {
930 $insert = ['INSERT'];
931 $update = ['UPDATE'];
932 $delete = ['DELETE'];
935 $tableNames = [$tableName];
938 $tableNames = $this->tables
;
941 // logging is enabled, so now lets create the trigger info tables
942 foreach ($tableNames as $table) {
943 if (!isset($this->logTableSpec
[$table])) {
944 // Per testIgnoreCustomTableByHook this would be unset if a hook had
945 // intervened to prevent logging / triggers on this table.
946 // This could go to the extent of blocking the updates to 'modified_date'
947 // which makes sense, in particular, for calculated fields.
950 $columns = $this->columnsOf($table, $force);
952 // only do the change if any data has changed
954 foreach ($columns as $column) {
955 $tableExceptions = array_key_exists('exceptions', $this->logTableSpec
[$table]) ?
$this->logTableSpec
[$table]['exceptions'] : [];
956 // ignore modified_date changes
957 $tableExceptions[] = 'modified_date';
958 // exceptions may be provided with or without backticks
959 $excludeColumn = in_array($column, $tableExceptions) ||
960 in_array(str_replace('`', '', $column), $tableExceptions);
961 if (!$excludeColumn) {
962 $cond[] = "IFNULL(OLD.$column,'') <> IFNULL(NEW.$column,'')";
965 $suppressLoggingCond = "@civicrm_disable_logging IS NULL OR @civicrm_disable_logging = 0";
966 $updateSQL = "IF ( (" . implode(' OR ', $cond) . ") AND ( $suppressLoggingCond ) ) THEN ";
968 if ($this->useDBPrefix
) {
969 $sqlStmt = "INSERT INTO `{$this->db}`.log_{tableName} (";
972 $sqlStmt = "INSERT INTO log_{tableName} (";
974 foreach ($columns as $column) {
975 $sqlStmt .= "$column, ";
977 $sqlStmt .= "log_conn_id, log_user_id, log_action) VALUES (";
979 $insertSQL = $deleteSQL = "IF ( $suppressLoggingCond ) THEN $sqlStmt ";
980 $updateSQL .= $sqlStmt;
983 foreach ($columns as $column) {
984 $sqlStmt .= "NEW.$column, ";
985 $deleteSQL .= "OLD.$column, ";
987 if (civicrm_api3('Setting', 'getvalue', ['name' => 'logging_uniqueid_date'])) {
988 // Note that when connecting directly via mysql @uniqueID may not be set so a fallback is
989 // 'c_' to identify a non-CRM connection + timestamp to the hour + connection_id
990 // If the connection_id is longer than 6 chars it will be truncated.
991 // We tried setting the @uniqueID in the trigger but it was unreliable.
992 // An external interaction could split over 2 connections & it seems worth blocking the revert on
993 // these reports & adding extra permissioning to the api for this.
994 $connectionSQLString = "COALESCE(@uniqueID, LEFT(CONCAT('c_', unix_timestamp()/3600, CONNECTION_ID()), 17))";
997 // The log tables have not yet been converted to have varchar(17) fields for log_conn_id.
998 // Continue to use the less reliable connection_id for al tables for now.
999 $connectionSQLString = "CONNECTION_ID()";
1001 $sqlStmt .= $connectionSQLString . ", @civicrm_user_id, '{eventName}'); END IF;";
1002 $deleteSQL .= $connectionSQLString . ", @civicrm_user_id, '{eventName}'); END IF;";
1004 $insertSQL .= $sqlStmt;
1005 $updateSQL .= $sqlStmt;
1008 'table' => [$table],
1011 'sql' => $insertSQL,
1015 'table' => [$table],
1018 'sql' => $updateSQL,
1022 'table' => [$table],
1025 'sql' => $deleteSQL,
1031 * Disable logging temporarily.
1033 * This allow logging to be temporarily disabled for certain cases
1034 * where we want to do a mass cleanup but do not want to bother with
1037 public static function disableLoggingForThisConnection() {
1038 if (CRM_Core_Config
::singleton()->logging
) {
1039 CRM_Core_DAO
::executeQuery('SET @civicrm_disable_logging = 1');
1044 * Get all the log tables that reference civicrm_contact.
1046 * Note that it might make sense to wrap this in a getLogTablesForEntity
1047 * but this is the only entity currently available...
1049 public function getLogTablesForContact() {
1050 $tables = array_keys(CRM_Core_DAO
::getReferencesToContactTable());
1051 // This additional hardcoding has been moved from getReferencesToContactTable
1052 // to here as it is not needed in the other place where the function is called.
1053 // It may not be needed here either...
1054 $tables[] = 'civicrm_entity_tag';
1055 return array_intersect($tables, $this->tables
);
1059 * Retrieve missing log tables.
1063 public function getMissingLogTables() {
1064 if ($this->tablesExist()) {
1065 return array_diff($this->tables
, array_keys($this->logs
));