Merge pull request #22591 from civicrm/5.46
[civicrm-core.git] / CRM / Core / DAO.php
1 <?php
2 /*
3 +--------------------------------------------------------------------+
4 | Copyright CiviCRM LLC. All rights reserved. |
5 | |
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 +--------------------------------------------------------------------+
10 */
11
12 /**
13 * Base Database Access Object class.
14 *
15 * All DAO classes should inherit from this class.
16 *
17 * @package CRM
18 * @copyright CiviCRM LLC https://civicrm.org/licensing
19 */
20
21 if (!defined('DB_DSN_MODE')) {
22 define('DB_DSN_MODE', 'auto');
23 }
24
25 require_once 'PEAR.php';
26 require_once 'DB/DataObject.php';
27
28 require_once 'CRM/Core/I18n.php';
29
30 /**
31 * Class CRM_Core_DAO
32 */
33 class CRM_Core_DAO extends DB_DataObject {
34
35 /**
36 * Primary key field(s).
37 *
38 * @var string[]
39 */
40 public static $_primaryKey = ['id'];
41
42 /**
43 * How many times has this instance been cloned.
44 *
45 * @var int
46 */
47 protected $resultCopies = 0;
48
49 /**
50 * @var null
51 * @deprecated
52 */
53 public static $_nullObject = NULL;
54
55 /**
56 * Icon associated with this entity.
57 *
58 * @var string
59 */
60 public static $_icon = NULL;
61
62 /**
63 * Field to show when displaying a record.
64 *
65 * @var string
66 */
67 public static $_labelField = NULL;
68
69 /**
70 * @var array
71 * @deprecated
72 */
73 public static $_nullArray = [];
74
75 public static $_dbColumnValueCache = NULL;
76 const NOT_NULL = 1, IS_NULL = 2,
77 DB_DAO_NOTNULL = 128,
78 VALUE_SEPARATOR = "\ 1",
79 BULK_INSERT_COUNT = 200,
80 BULK_INSERT_HIGH_COUNT = 200,
81 QUERY_FORMAT_WILDCARD = 1,
82 QUERY_FORMAT_NO_QUOTES = 2,
83
84 /**
85 * Serialized string separated by and bookended with VALUE_SEPARATOR
86 */
87 SERIALIZE_SEPARATOR_BOOKEND = 1,
88 /**
89 * @deprecated format separated by VALUE_SEPARATOR
90 */
91 SERIALIZE_SEPARATOR_TRIMMED = 2,
92 /**
93 * Recommended serialization format
94 */
95 SERIALIZE_JSON = 3,
96 /**
97 * @deprecated format using php serialize()
98 */
99 SERIALIZE_PHP = 4,
100 /**
101 * Comma separated string, no quotes, no spaces
102 */
103 SERIALIZE_COMMA = 5;
104
105 /**
106 * Define entities that shouldn't be created or deleted when creating/ deleting
107 * test objects - this prevents world regions, countries etc from being added / deleted
108 * @var array
109 */
110 public static $_testEntitiesToSkip = [];
111 /**
112 * The factory class for this application.
113 * @var object
114 */
115 public static $_factory = NULL;
116
117 /**
118 * https://issues.civicrm.org/jira/browse/CRM-17748
119 * internal variable for DAO to hold per-query settings
120 * @var array
121 */
122 protected $_options = [];
123
124 /**
125 * Class constructor.
126 *
127 * @return static
128 */
129 public function __construct() {
130 $this->initialize();
131 $this->__table = $this->getTableName();
132 }
133
134 /**
135 * Returns localized title of this entity.
136 *
137 * @return string
138 */
139 public static function getEntityTitle() {
140 $className = static::class;
141 CRM_Core_Error::deprecatedWarning("$className needs to be regenerated. Missing getEntityTitle method.");
142 return CRM_Core_DAO_AllCoreTables::getBriefName($className);
143 }
144
145 /**
146 * Returns user-friendly description of this entity.
147 *
148 * @return string|null
149 */
150 public static function getEntityDescription() {
151 return NULL;
152 }
153
154 public function __clone() {
155 if (!empty($this->_DB_resultid)) {
156 $this->resultCopies++;
157 }
158 }
159
160 /**
161 * Class destructor.
162 */
163 public function __destruct() {
164 if ($this->resultCopies === 0) {
165 $this->free();
166 }
167 $this->resultCopies--;
168 }
169
170 /**
171 * Returns the name of this table
172 *
173 * @return string
174 */
175 public static function getTableName() {
176 return self::getLocaleTableName(static::$_tableName ?? NULL);
177 }
178
179 /**
180 * Returns if this table needs to be logged
181 *
182 * @return bool
183 */
184 public function getLog() {
185 return static::$_log ?? FALSE;
186 }
187
188 /**
189 * Initialize the DAO object.
190 *
191 * @param string $dsn
192 * The database connection string.
193 */
194 public static function init($dsn) {
195 Civi::$statics[__CLASS__]['init'] = 1;
196 $options = &PEAR::getStaticProperty('DB_DataObject', 'options');
197 $dsn = CRM_Utils_SQL::autoSwitchDSN($dsn);
198 $options['database'] = $dsn;
199 $options['quote_identifiers'] = TRUE;
200 if (CRM_Utils_SQL::isSSLDSN($dsn)) {
201 // There are two different options arrays.
202 $other_options = &PEAR::getStaticProperty('DB', 'options');
203 $other_options['ssl'] = TRUE;
204 }
205 if (defined('CIVICRM_DAO_DEBUG')) {
206 self::DebugLevel(CIVICRM_DAO_DEBUG);
207 }
208 $factory = new CRM_Contact_DAO_Factory();
209 CRM_Core_DAO::setFactory($factory);
210 CRM_Core_DAO::executeQuery('SET NAMES utf8mb4');
211 CRM_Core_DAO::executeQuery('SET @uniqueID = %1', [1 => [CRM_Utils_Request::id(), 'String']]);
212 }
213
214 /**
215 * @return DB_common
216 */
217 public static function getConnection() {
218 global $_DB_DATAOBJECT;
219 $dao = new CRM_Core_DAO();
220 return $_DB_DATAOBJECT['CONNECTIONS'][$dao->_database_dsn_md5];
221 }
222
223 /**
224 * Disables usage of the ONLY_FULL_GROUP_BY Mode if necessary
225 */
226 public static function disableFullGroupByMode() {
227 $currentModes = CRM_Utils_SQL::getSqlModes();
228 if (in_array('ONLY_FULL_GROUP_BY', $currentModes) && CRM_Utils_SQL::isGroupByModeInDefault()) {
229 $key = array_search('ONLY_FULL_GROUP_BY', $currentModes);
230 unset($currentModes[$key]);
231 CRM_Core_DAO::executeQuery("SET SESSION sql_mode = %1", [1 => [implode(',', $currentModes), 'String']]);
232 }
233 }
234
235 /**
236 * Re-enables ONLY_FULL_GROUP_BY sql_mode as necessary..
237 */
238 public static function reenableFullGroupByMode() {
239 $currentModes = CRM_Utils_SQL::getSqlModes();
240 if (!in_array('ONLY_FULL_GROUP_BY', $currentModes) && CRM_Utils_SQL::isGroupByModeInDefault()) {
241 $currentModes[] = 'ONLY_FULL_GROUP_BY';
242 CRM_Core_DAO::executeQuery("SET SESSION sql_mode = %1", [1 => [implode(',', $currentModes), 'String']]);
243 }
244 }
245
246 /**
247 * @param string $fieldName
248 * @param $fieldDef
249 * @param array $params
250 */
251 protected function assignTestFK($fieldName, $fieldDef, $params) {
252 $required = $fieldDef['required'] ?? NULL;
253 $FKClassName = $fieldDef['FKClassName'] ?? NULL;
254 $dbName = $fieldDef['name'];
255 $daoName = str_replace('_BAO_', '_DAO_', get_class($this));
256
257 // skip the FK if it is not required
258 // if it's contact id we should create even if not required
259 // we'll have a go @ fetching first though
260 // we WILL create campaigns though for so tests with a campaign pseudoconstant will complete
261 if ($FKClassName === 'CRM_Campaign_DAO_Campaign' && $daoName != $FKClassName) {
262 $required = TRUE;
263 }
264 if (!$required && $dbName != 'contact_id') {
265 $fkDAO = new $FKClassName();
266 if ($fkDAO->find(TRUE)) {
267 $this->$dbName = $fkDAO->id;
268 }
269 }
270
271 elseif (in_array($FKClassName, CRM_Core_DAO::$_testEntitiesToSkip)) {
272 $depObject = new $FKClassName();
273 $depObject->find(TRUE);
274 $this->$dbName = $depObject->id;
275 }
276 elseif ($daoName == 'CRM_Member_DAO_MembershipType' && $fieldName == 'member_of_contact_id') {
277 // FIXME: the fields() metadata is not specific enough
278 $depObject = CRM_Core_DAO::createTestObject($FKClassName, ['contact_type' => 'Organization']);
279 $this->$dbName = $depObject->id;
280 }
281 else {
282 //if it is required we need to generate the dependency object first
283 $depObject = CRM_Core_DAO::createTestObject($FKClassName, CRM_Utils_Array::value($dbName, $params, 1));
284 $this->$dbName = $depObject->id;
285 }
286 }
287
288 /**
289 * Generate and assign an arbitrary value to a field of a test object.
290 *
291 * @param string $fieldName
292 * @param array $fieldDef
293 * @param int $counter
294 * The globally-unique ID of the test object.
295 *
296 * @throws \CRM_Core_Exception
297 */
298 protected function assignTestValue($fieldName, &$fieldDef, $counter) {
299 $dbName = $fieldDef['name'];
300 $daoName = get_class($this);
301 $handled = FALSE;
302
303 if (in_array($dbName, ['contact_sub_type', 'email_greeting_id', 'postal_greeting_id', 'addressee_id'], TRUE)) {
304 //coming up with a rule to set these is too complex - skip
305 return;
306 }
307
308 // Pick an option value if needed
309 if (!$handled && $fieldDef['type'] !== CRM_Utils_Type::T_BOOLEAN) {
310 $options = $daoName::buildOptions($dbName, 'create');
311 if ($options) {
312 $this->$dbName = key($options);
313 $handled = TRUE;
314 }
315 }
316
317 if (!$handled) {
318 switch ($fieldDef['type']) {
319 case CRM_Utils_Type::T_INT:
320 case CRM_Utils_Type::T_FLOAT:
321 case CRM_Utils_Type::T_MONEY:
322 if (isset($fieldDef['precision'])) {
323 // $object->$dbName = CRM_Utils_Number::createRandomDecimal($value['precision']);
324 $this->$dbName = CRM_Utils_Number::createTruncatedDecimal($counter, $fieldDef['precision']);
325 }
326 else {
327 $this->$dbName = $counter;
328 }
329 break;
330
331 case CRM_Utils_Type::T_BOOLEAN:
332 if (isset($fieldDef['default'])) {
333 $this->$dbName = $fieldDef['default'];
334 }
335 elseif ($fieldDef['name'] == 'is_deleted' || $fieldDef['name'] == 'is_test') {
336 $this->$dbName = 0;
337 }
338 else {
339 $this->$dbName = 1;
340 }
341 break;
342
343 case CRM_Utils_Type::T_DATE:
344 case CRM_Utils_Type::T_DATE + CRM_Utils_Type::T_TIME:
345 $this->$dbName = '19700101';
346 if ($dbName == 'end_date') {
347 // put this in the future
348 $this->$dbName = '20200101';
349 }
350 break;
351
352 case CRM_Utils_Type::T_TIMESTAMP:
353 $this->$dbName = '19700201000000';
354 break;
355
356 case CRM_Utils_Type::T_TIME:
357 throw new CRM_Core_Exception('T_TIME shouldn\'t be used.');
358
359 case CRM_Utils_Type::T_CCNUM:
360 $this->$dbName = '4111 1111 1111 1111';
361 break;
362
363 case CRM_Utils_Type::T_URL:
364 $this->$dbName = 'http://www.civicrm.org';
365 break;
366
367 case CRM_Utils_Type::T_STRING:
368 case CRM_Utils_Type::T_BLOB:
369 case CRM_Utils_Type::T_MEDIUMBLOB:
370 case CRM_Utils_Type::T_TEXT:
371 case CRM_Utils_Type::T_LONGTEXT:
372 case CRM_Utils_Type::T_EMAIL:
373 default:
374 // WAS: if (isset($value['enumValues'])) {
375 // TODO: see if this works with all pseudoconstants
376 if (isset($fieldDef['pseudoconstant'], $fieldDef['pseudoconstant']['callback'])) {
377 if (isset($fieldDef['default'])) {
378 $this->$dbName = $fieldDef['default'];
379 }
380 else {
381 $options = CRM_Core_PseudoConstant::get($daoName, $fieldName);
382 if (is_array($options)) {
383 $this->$dbName = $options[0];
384 }
385 else {
386 $defaultValues = explode(',', $options);
387 $this->$dbName = $defaultValues[0];
388 }
389 }
390 }
391 else {
392 $this->$dbName = $dbName . '_' . $counter;
393 $maxlength = $fieldDef['maxlength'] ?? NULL;
394 if ($maxlength > 0 && strlen($this->$dbName) > $maxlength) {
395 $this->$dbName = substr($this->$dbName, 0, $fieldDef['maxlength']);
396 }
397 }
398 }
399 }
400 }
401
402 /**
403 * Reset the DAO object.
404 *
405 * DAO is kinda crappy in that there is an unwritten rule of one query per DAO.
406 *
407 * We attempt to get around this crappy restriction by resetting some of DAO's internal fields. Use this with caution
408 */
409 public function reset() {
410
411 foreach (array_keys($this->table()) as $field) {
412 unset($this->$field);
413 }
414
415 /**
416 * reset the various DB_DAO structures manually
417 */
418 $this->_query = [];
419 $this->whereAdd();
420 $this->selectAdd();
421 $this->joinAdd();
422 }
423
424 /**
425 * @param string $tableName
426 *
427 * @return string
428 */
429 public static function getLocaleTableName($tableName) {
430 global $dbLocale;
431 if ($dbLocale) {
432 $tables = CRM_Core_I18n_Schema::schemaStructureTables();
433 if (in_array($tableName, $tables)) {
434 return $tableName . $dbLocale;
435 }
436 }
437 return $tableName;
438 }
439
440 /**
441 * Execute a query by the current DAO, localizing it along the way (if needed).
442 *
443 * @param string $query
444 * The SQL query for execution.
445 * @param bool $i18nRewrite
446 * Whether to rewrite the query.
447 *
448 * @return object
449 * the current DAO object after the query execution
450 */
451 public function query($query, $i18nRewrite = TRUE) {
452 // rewrite queries that should use $dbLocale-based views for multi-language installs
453 global $dbLocale, $_DB_DATAOBJECT;
454
455 if (empty($_DB_DATAOBJECT['CONNECTIONS'][$this->_database_dsn_md5])) {
456 // Will force connection to be populated per CRM-20541.
457 new CRM_Core_DAO();
458 }
459
460 $conn = &$_DB_DATAOBJECT['CONNECTIONS'][$this->_database_dsn_md5];
461 $orig_options = $conn->options;
462 $this->_setDBOptions($this->_options);
463
464 if ($i18nRewrite and $dbLocale) {
465 $query = CRM_Core_I18n_Schema::rewriteQuery($query);
466 }
467
468 $ret = parent::query($query);
469
470 $this->_setDBOptions($orig_options);
471 return $ret;
472 }
473
474 /**
475 * Static function to set the factory instance for this class.
476 *
477 * @param object $factory
478 * The factory application object.
479 */
480 public static function setFactory(&$factory) {
481 self::$_factory = &$factory;
482 }
483
484 /**
485 * Factory method to instantiate a new object from a table name.
486 *
487 * @param string $table
488 * @return \DataObject|\PEAR_Error
489 */
490 public function factory($table = '') {
491 if (!isset(self::$_factory)) {
492 return parent::factory($table);
493 }
494
495 return self::$_factory->create($table);
496 }
497
498 /**
499 * Initialization for all DAO objects. Since we access DB_DO programatically
500 * we need to set the links manually.
501 */
502 public function initialize() {
503 $this->_connect();
504 if (empty(Civi::$statics[__CLASS__]['init'])) {
505 // CRM_Core_DAO::init() must be called before CRM_Core_DAO->initialize().
506 // This occurs very early in bootstrap - error handlers may not be wired up.
507 echo "Inconsistent system initialization sequence. Premature access of (" . get_class($this) . ")";
508 CRM_Utils_System::civiExit();
509 }
510 }
511
512 /**
513 * Defines the default key as 'id'.
514 *
515 * @return array
516 */
517 public function keys() {
518 static $keys;
519 if (!isset($keys)) {
520 $keys = ['id'];
521 }
522 return $keys;
523 }
524
525 /**
526 * Tells DB_DataObject which keys use autoincrement.
527 * 'id' is autoincrementing by default.
528 *
529 *
530 * @return array
531 */
532 public function sequenceKey() {
533 static $sequenceKeys;
534 if (!isset($sequenceKeys)) {
535 $sequenceKeys = ['id', TRUE];
536 }
537 return $sequenceKeys;
538 }
539
540 /**
541 * Returns list of FK relationships.
542 *
543 * @return CRM_Core_Reference_Basic[]
544 */
545 public static function getReferenceColumns() {
546 if (!isset(Civi::$statics[static::class]['links'])) {
547 Civi::$statics[static::class]['links'] = static::createReferenceColumns(static::class);
548 CRM_Core_DAO_AllCoreTables::invoke(static::class, 'links_callback', Civi::$statics[static::class]['links']);
549 }
550 return Civi::$statics[static::class]['links'];
551 }
552
553 /**
554 * Returns all the column names of this table.
555 *
556 *
557 * @return array
558 */
559 public static function &fields() {
560 $result = NULL;
561 return $result;
562 }
563
564 /**
565 * Returns all usable fields, indexed by name.
566 *
567 * This function differs from fields() in that it indexes by name rather than unique_name.
568 *
569 * It excludes fields not added yet by pending upgrades.
570 * This avoids problems with trying to SELECT a field that exists in code but has not yet been added to the db.
571 *
572 * @param bool $checkPermissions
573 * Filter by field permissions.
574 * @return array
575 */
576 public static function getSupportedFields($checkPermissions = FALSE) {
577 $fields = array_column((array) static::fields(), NULL, 'name');
578
579 // Exclude fields yet not added by pending upgrades
580 $dbVer = \CRM_Core_BAO_Domain::version();
581 $daoExt = defined(static::class . '::EXT') ? constant(static::class . '::EXT') : NULL;
582 if ($fields && $daoExt === 'civicrm' && version_compare($dbVer, \CRM_Utils_System::version()) < 0) {
583 $fields = array_filter($fields, function($field) use ($dbVer) {
584 $add = $field['add'] ?? '1.0.0';
585 if (substr_count($add, '.') < 2) {
586 $add .= '.alpha1';
587 }
588 return version_compare($dbVer, $add, '>=');
589 });
590 }
591
592 // Exclude fields the user does not have permission for
593 if ($checkPermissions) {
594 $fields = array_filter($fields, function($field) {
595 return empty($field['permission']) || CRM_Core_Permission::check($field['permission']);
596 });
597 }
598
599 return $fields;
600 }
601
602 /**
603 * Get/set an associative array of table columns
604 *
605 * @return array
606 * (associative)
607 */
608 public function table() {
609 $fields = $this->fields();
610
611 $table = [];
612 if ($fields) {
613 foreach ($fields as $name => $value) {
614 $table[$value['name']] = $value['type'];
615 if (!empty($value['required'])) {
616 $table[$value['name']] += self::DB_DAO_NOTNULL;
617 }
618 }
619 }
620
621 return $table;
622 }
623
624 /**
625 * Save DAO object.
626 *
627 * @param bool $hook
628 *
629 * @return CRM_Core_DAO
630 */
631 public function save($hook = TRUE) {
632 $eventID = uniqid();
633 if (!empty($this->id)) {
634 if ($hook) {
635 $preEvent = new \Civi\Core\DAO\Event\PreUpdate($this);
636 $preEvent->eventID = $eventID;
637 \Civi::dispatcher()->dispatch("civi.dao.preUpdate", $preEvent);
638 }
639
640 $result = $this->update();
641
642 if ($hook) {
643 $event = new \Civi\Core\DAO\Event\PostUpdate($this, $result);
644 $event->eventID = $eventID;
645 \Civi::dispatcher()->dispatch("civi.dao.postUpdate", $event);
646 }
647 $this->clearDbColumnValueCache();
648 }
649 else {
650 if ($hook) {
651 $preEvent = new \Civi\Core\DAO\Event\PreUpdate($this);
652 $preEvent->eventID = $eventID;
653 \Civi::dispatcher()->dispatch("civi.dao.preInsert", $preEvent);
654 }
655
656 $result = $this->insert();
657
658 if ($hook) {
659 $event = new \Civi\Core\DAO\Event\PostUpdate($this, $result);
660 $event->eventID = $eventID;
661 \Civi::dispatcher()->dispatch("civi.dao.postInsert", $event);
662 }
663 }
664 $this->free();
665
666 if ($hook) {
667 CRM_Utils_Hook::postSave($this);
668 }
669
670 return $this;
671 }
672
673 /**
674 * Deletes items from table which match current objects variables.
675 *
676 * Returns the true on success
677 *
678 * for example
679 *
680 * Designed to be extended
681 *
682 * $object = new mytable();
683 * $object->ID=123;
684 * echo $object->delete(); // builds a conditon
685 *
686 * $object = new mytable();
687 * $object->whereAdd('age > 12');
688 * $object->limit(1);
689 * $object->orderBy('age DESC');
690 * $object->delete(true); // dont use object vars, use the conditions, limit and order.
691 *
692 * @param bool $useWhere (optional) If DB_DATAOBJECT_WHEREADD_ONLY is passed in then
693 * we will build the condition only using the whereAdd's. Default is to
694 * build the condition only using the object parameters.
695 *
696 * @return int|false
697 * Int (No. of rows affected) on success, false on failure, 0 on no data affected
698 */
699 public function delete($useWhere = FALSE) {
700 $preEvent = new \Civi\Core\DAO\Event\PreDelete($this);
701 \Civi::dispatcher()->dispatch("civi.dao.preDelete", $preEvent);
702
703 $result = parent::delete($useWhere);
704
705 $event = new \Civi\Core\DAO\Event\PostDelete($this, $result);
706 \Civi::dispatcher()->dispatch("civi.dao.postDelete", $event);
707 $this->free();
708
709 $this->clearDbColumnValueCache();
710
711 return $result;
712 }
713
714 /**
715 * @param bool $created
716 */
717 public function log($created = FALSE) {
718 static $cid = NULL;
719
720 if (!$this->getLog()) {
721 return;
722 }
723
724 if (!$cid) {
725 $session = CRM_Core_Session::singleton();
726 $cid = $session->get('userID');
727 }
728
729 // return is we dont have handle to FK
730 if (!$cid) {
731 return;
732 }
733
734 $dao = new CRM_Core_DAO_Log();
735 $dao->entity_table = $this->getTableName();
736 $dao->entity_id = $this->id;
737 $dao->modified_id = $cid;
738 $dao->modified_date = date("YmdHis");
739 $dao->insert();
740 }
741
742 /**
743 * Given an associative array of name/value pairs, extract all the values
744 * that belong to this object and initialize the object with said values
745 *
746 * @param array $params
747 * Array of name/value pairs to save.
748 *
749 * @return bool
750 * Did we copy all null values into the object
751 */
752 public function copyValues($params) {
753 $allNull = TRUE;
754 foreach ($this->fields() as $uniqueName => $field) {
755 $dbName = $field['name'];
756 if (array_key_exists($dbName, $params)) {
757 $value = $params[$dbName];
758 $exists = TRUE;
759 }
760 elseif (array_key_exists($uniqueName, $params)) {
761 $value = $params[$uniqueName];
762 $exists = TRUE;
763 }
764 else {
765 $exists = FALSE;
766 }
767
768 // if there is no value then make the variable NULL
769 if ($exists) {
770 if ($value === '') {
771 $this->$dbName = 'null';
772 }
773 elseif (is_array($value) && !empty($field['serialize'])) {
774 $this->$dbName = CRM_Core_DAO::serializeField($value, $field['serialize']);
775 $allNull = FALSE;
776 }
777 else {
778 $maxLength = $field['maxlength'] ?? NULL;
779 if (!is_array($value) && $maxLength && mb_strlen($value) > $maxLength && empty($field['pseudoconstant'])) {
780 // No ts() since this is a sysadmin-y string not seen by general users.
781 Civi::log()->warning('A string for field {dbName} has been truncated. The original string was {value}.', ['dbName' => $dbName, 'value' => $value]);
782 // The string is too long - what to do what to do? Well losing data is generally bad so let's truncate
783 $value = CRM_Utils_String::ellipsify($value, $maxLength);
784 }
785 $this->$dbName = $value;
786 $allNull = FALSE;
787 }
788 }
789 }
790 return $allNull;
791 }
792
793 /**
794 * Store all the values from this object in an associative array
795 * this is a destructive store, calling function is responsible
796 * for keeping sanity of id's.
797 *
798 * @param object $object
799 * The object that we are extracting data from.
800 * @param array $values
801 * (reference ) associative array of name/value pairs.
802 */
803 public static function storeValues(&$object, &$values) {
804 $fields = $object->fields();
805 foreach ($fields as $name => $value) {
806 $dbName = $value['name'];
807 if (isset($object->$dbName) && $object->$dbName !== 'null') {
808 $values[$dbName] = $object->$dbName;
809 if ($name != $dbName) {
810 $values[$name] = $object->$dbName;
811 }
812 }
813 }
814 }
815
816 /**
817 * Create an attribute for this specific field. We only do this for strings and text
818 *
819 * @param array $field
820 * The field under task.
821 *
822 * @return array|null
823 * the attributes for the object
824 */
825 public static function makeAttribute($field) {
826 if ($field) {
827 if (CRM_Utils_Array::value('type', $field) == CRM_Utils_Type::T_STRING) {
828 $maxLength = $field['maxlength'] ?? NULL;
829 $size = $field['size'] ?? NULL;
830 if ($maxLength || $size) {
831 $attributes = [];
832 if ($maxLength) {
833 $attributes['maxlength'] = $maxLength;
834 }
835 if ($size) {
836 $attributes['size'] = $size;
837 }
838 return $attributes;
839 }
840 }
841 elseif (CRM_Utils_Array::value('type', $field) == CRM_Utils_Type::T_TEXT) {
842 $rows = $field['rows'] ?? NULL;
843 if (!isset($rows)) {
844 $rows = 2;
845 }
846 $cols = $field['cols'] ?? NULL;
847 if (!isset($cols)) {
848 $cols = 80;
849 }
850
851 $attributes = [];
852 $attributes['rows'] = $rows;
853 $attributes['cols'] = $cols;
854 return $attributes;
855 }
856 elseif (CRM_Utils_Array::value('type', $field) == CRM_Utils_Type::T_INT || CRM_Utils_Array::value('type', $field) == CRM_Utils_Type::T_FLOAT || CRM_Utils_Array::value('type', $field) == CRM_Utils_Type::T_MONEY) {
857 $attributes['size'] = 6;
858 $attributes['maxlength'] = 14;
859 return $attributes;
860 }
861 }
862 return NULL;
863 }
864
865 /**
866 * Get the size and maxLength attributes for this text field.
867 * (or for all text fields) in the DAO object.
868 *
869 * @param string $class
870 * Name of DAO class.
871 * @param string $fieldName
872 * Field that i'm interested in or null if.
873 * you want the attributes for all DAO text fields
874 *
875 * @return array
876 * assoc array of name => attribute pairs
877 */
878 public static function getAttribute($class, $fieldName = NULL) {
879 $object = new $class();
880 $fields = $object->fields();
881 if ($fieldName != NULL) {
882 $field = $fields[$fieldName] ?? NULL;
883 return self::makeAttribute($field);
884 }
885 else {
886 $attributes = [];
887 foreach ($fields as $name => $field) {
888 $attribute = self::makeAttribute($field);
889 if ($attribute) {
890 $attributes[$name] = $attribute;
891 }
892 }
893
894 if (!empty($attributes)) {
895 return $attributes;
896 }
897 }
898 return NULL;
899 }
900
901 /**
902 * Create or update a record from supplied params.
903 *
904 * If 'id' is supplied, an existing record will be updated
905 * Otherwise a new record will be created.
906 *
907 * @param array $record
908 *
909 * @return static
910 * @throws \CRM_Core_Exception
911 */
912 public static function writeRecord(array $record): CRM_Core_DAO {
913 $op = empty($record['id']) ? 'create' : 'edit';
914 $className = CRM_Core_DAO_AllCoreTables::getCanonicalClassName(static::class);
915 if ($className === 'CRM_Core_DAO') {
916 throw new CRM_Core_Exception('Function writeRecord must be called on a subclass of CRM_Core_DAO');
917 }
918 $entityName = CRM_Core_DAO_AllCoreTables::getBriefName($className);
919
920 \CRM_Utils_Hook::pre($op, $entityName, $record['id'] ?? NULL, $record);
921 $fields = static::getSupportedFields();
922 $instance = new static();
923 // Ensure fields exist before attempting to write to them
924 $values = array_intersect_key($record, $fields);
925 $instance->copyValues($values);
926 if (empty($values['id']) && array_key_exists('name', $fields) && empty($values['name']) && !empty($values['label'])) {
927 $instance->makeNameFromLabel();
928 }
929 $instance->save();
930
931 if (!empty($record['custom']) && is_array($record['custom'])) {
932 CRM_Core_BAO_CustomValueTable::store($record['custom'], static::$_tableName, $instance->id, $op);
933 }
934
935 \CRM_Utils_Hook::post($op, $entityName, $instance->id, $instance);
936
937 return $instance;
938 }
939
940 /**
941 * Bulk save multiple records
942 *
943 * @param array[] $records
944 * @return static[]
945 * @throws CRM_Core_Exception
946 */
947 public static function writeRecords(array $records): array {
948 $results = [];
949 foreach ($records as $record) {
950 $results[] = static::writeRecord($record);
951 }
952 return $results;
953 }
954
955 /**
956 * Delete a record from supplied params.
957 *
958 * @param array $record
959 * 'id' is required.
960 * @return static
961 * @throws CRM_Core_Exception
962 */
963 public static function deleteRecord(array $record) {
964 $className = CRM_Core_DAO_AllCoreTables::getCanonicalClassName(static::class);
965 if ($className === 'CRM_Core_DAO') {
966 throw new CRM_Core_Exception('Function deleteRecord must be called on a subclass of CRM_Core_DAO');
967 }
968 $entityName = CRM_Core_DAO_AllCoreTables::getBriefName($className);
969 if (empty($record['id'])) {
970 throw new CRM_Core_Exception("Cannot delete {$entityName} with no id.");
971 }
972 CRM_Utils_Type::validate($record['id'], 'Positive');
973
974 CRM_Utils_Hook::pre('delete', $entityName, $record['id'], $record);
975 $instance = new $className();
976 $instance->id = $record['id'];
977 // Load complete object for the sake of hook_civicrm_post, below
978 $instance->find(TRUE);
979 if (!$instance || !$instance->delete()) {
980 throw new CRM_Core_Exception("Could not delete {$entityName} id {$record['id']}");
981 }
982 // For other operations this hook is passed an incomplete object and hook listeners can load if needed.
983 // But that's not possible with delete because it's gone from the database by the time this hook is called.
984 // So in this case the object has been pre-loaded so hook listeners have access to the complete record.
985 CRM_Utils_Hook::post('delete', $entityName, $record['id'], $instance);
986
987 return $instance;
988 }
989
990 /**
991 * Bulk delete multiple records.
992 *
993 * @param array[] $records
994 * @return static[]
995 * @throws CRM_Core_Exception
996 */
997 public static function deleteRecords(array $records) {
998 $results = [];
999 foreach ($records as $record) {
1000 $results[] = static::deleteRecord($record);
1001 }
1002 return $results;
1003 }
1004
1005 /**
1006 * Check if there is a record with the same name in the db.
1007 *
1008 * @param string $value
1009 * The value of the field we are checking.
1010 * @param string $daoName
1011 * The dao object name.
1012 * @param string $daoID
1013 * The id of the object being updated. u can change your name.
1014 * as long as there is no conflict
1015 * @param string $fieldName
1016 * The name of the field in the DAO.
1017 *
1018 * @param string $domainID
1019 * The id of the domain. Object exists only for the given domain.
1020 *
1021 * @return bool
1022 * true if object exists
1023 */
1024 public static function objectExists($value, $daoName, $daoID, $fieldName = 'name', $domainID = NULL) {
1025 $object = new $daoName();
1026 $object->$fieldName = $value;
1027 if ($domainID) {
1028 $object->domain_id = $domainID;
1029 }
1030
1031 if ($object->find(TRUE)) {
1032 return $daoID && $object->id == $daoID;
1033 }
1034 else {
1035 return TRUE;
1036 }
1037 }
1038
1039 /**
1040 * Check if there is a given column in a specific table.
1041 *
1042 * @deprecated
1043 * @see CRM_Core_BAO_SchemaHandler::checkIfFieldExists
1044 *
1045 * @param string $tableName
1046 * @param string $columnName
1047 * @param bool $i18nRewrite
1048 * Whether to rewrite the query on multilingual setups.
1049 *
1050 * @return bool
1051 * true if exists, else false
1052 */
1053 public static function checkFieldExists($tableName, $columnName, $i18nRewrite = TRUE) {
1054 CRM_Core_Error::deprecatedFunctionWarning('CRM_Core_BAO_SchemaHandler::checkIfFieldExists');
1055 return CRM_Core_BAO_SchemaHandler::checkIfFieldExists($tableName, $columnName, $i18nRewrite);
1056 }
1057
1058 /**
1059 * Scans all the tables using a slow query and table name.
1060 *
1061 * @return array
1062 */
1063 public static function getTableNames() {
1064 $dao = CRM_Core_DAO::executeQuery(
1065 "SELECT TABLE_NAME
1066 FROM information_schema.TABLES
1067 WHERE TABLE_SCHEMA = '" . CRM_Core_DAO::getDatabaseName() . "'
1068 AND TABLE_NAME LIKE 'civicrm_%'
1069 AND TABLE_NAME NOT LIKE 'civicrm_import_job_%'
1070 AND TABLE_NAME NOT LIKE '%_temp%'
1071 ");
1072
1073 while ($dao->fetch()) {
1074 $values[] = $dao->TABLE_NAME;
1075 }
1076 return $values;
1077 }
1078
1079 /**
1080 * @param int $maxTablesToCheck
1081 *
1082 * @return bool
1083 */
1084 public static function isDBMyISAM($maxTablesToCheck = 10) {
1085 return CRM_Core_DAO::singleValueQuery(
1086 "SELECT count(*)
1087 FROM information_schema.TABLES
1088 WHERE ENGINE = 'MyISAM'
1089 AND TABLE_SCHEMA = '" . CRM_Core_DAO::getDatabaseName() . "'
1090 AND TABLE_NAME LIKE 'civicrm_%'
1091 AND TABLE_NAME NOT LIKE 'civicrm_import_job_%'
1092 AND TABLE_NAME NOT LIKE '%_temp%'
1093 AND TABLE_NAME NOT LIKE 'civicrm_tmp_%'
1094 ");
1095 }
1096
1097 /**
1098 * Get the name of the CiviCRM database.
1099 *
1100 * @return string
1101 */
1102 public static function getDatabaseName() {
1103 $daoObj = new CRM_Core_DAO();
1104 return $daoObj->database();
1105 }
1106
1107 /**
1108 * Checks if a constraint exists for a specified table.
1109 *
1110 * @param string $tableName
1111 * @param string $constraint
1112 *
1113 * @return bool
1114 * true if constraint exists, false otherwise
1115 *
1116 * @throws \CRM_Core_Exception
1117 */
1118 public static function checkConstraintExists($tableName, $constraint) {
1119 static $show = [];
1120
1121 if (!array_key_exists($tableName, $show)) {
1122 $query = "SHOW CREATE TABLE $tableName";
1123 $dao = CRM_Core_DAO::executeQuery($query, [], TRUE, NULL, FALSE, FALSE);
1124
1125 if (!$dao->fetch()) {
1126 throw new CRM_Core_Exception('query failed');
1127 }
1128
1129 $show[$tableName] = $dao->Create_Table;
1130 }
1131
1132 return (bool) preg_match("/\b$constraint\b/i", $show[$tableName]);
1133 }
1134
1135 /**
1136 * Checks if CONSTRAINT keyword exists for a specified table.
1137 *
1138 * @param array $tables
1139 *
1140 * @throws CRM_Core_Exception
1141 *
1142 * @return bool
1143 * true if CONSTRAINT keyword exists, false otherwise
1144 */
1145 public static function schemaRequiresRebuilding($tables = ["civicrm_contact"]) {
1146 $show = [];
1147 foreach ($tables as $tableName) {
1148 if (!array_key_exists($tableName, $show)) {
1149 $query = "SHOW CREATE TABLE $tableName";
1150 $dao = CRM_Core_DAO::executeQuery($query, [], TRUE, NULL, FALSE, FALSE);
1151
1152 if (!$dao->fetch()) {
1153 throw new CRM_Core_Exception('Show create table failed.');
1154 }
1155
1156 $show[$tableName] = $dao->Create_Table;
1157 }
1158
1159 $result = (bool) preg_match("/\bCONSTRAINT\b\s/i", $show[$tableName]);
1160 if ($result == TRUE) {
1161 continue;
1162 }
1163 else {
1164 return FALSE;
1165 }
1166 }
1167 return TRUE;
1168 }
1169
1170 /**
1171 * Checks if the FK constraint name is in the format 'FK_tableName_columnName'
1172 * for a specified column of a table.
1173 *
1174 * @param string $tableName
1175 * @param string $columnName
1176 *
1177 * @return bool
1178 * true if in format, false otherwise
1179 *
1180 * @throws \CRM_Core_Exception
1181 */
1182 public static function checkFKConstraintInFormat($tableName, $columnName) {
1183 static $show = [];
1184
1185 if (!array_key_exists($tableName, $show)) {
1186 $query = "SHOW CREATE TABLE $tableName";
1187 $dao = CRM_Core_DAO::executeQuery($query);
1188
1189 if (!$dao->fetch()) {
1190 throw new CRM_Core_Exception('query failed');
1191 }
1192
1193 $show[$tableName] = $dao->Create_Table;
1194 }
1195 $constraint = "`FK_{$tableName}_{$columnName}`";
1196 $pattern = "/\bCONSTRAINT\b\s+%s\s+\bFOREIGN\s+KEY\b\s/i";
1197 return (bool) preg_match(sprintf($pattern, $constraint), $show[$tableName]);
1198 }
1199
1200 /**
1201 * Check whether a specific column in a specific table has always the same value.
1202 *
1203 * @param string $tableName
1204 * @param string $columnName
1205 * @param string $columnValue
1206 *
1207 * @return bool
1208 * true if the value is always $columnValue, false otherwise
1209 */
1210 public static function checkFieldHasAlwaysValue($tableName, $columnName, $columnValue) {
1211 $query = "SELECT * FROM $tableName WHERE $columnName != '$columnValue'";
1212 $dao = CRM_Core_DAO::executeQuery($query);
1213 $result = $dao->fetch() ? FALSE : TRUE;
1214 return $result;
1215 }
1216
1217 /**
1218 * Check whether a specific column in a specific table is always NULL.
1219 *
1220 * @param string $tableName
1221 * @param string $columnName
1222 *
1223 * @return bool
1224 * true if if the value is always NULL, false otherwise
1225 */
1226 public static function checkFieldIsAlwaysNull($tableName, $columnName) {
1227 $query = "SELECT * FROM $tableName WHERE $columnName IS NOT NULL";
1228 $dao = CRM_Core_DAO::executeQuery($query);
1229 $result = $dao->fetch() ? FALSE : TRUE;
1230 return $result;
1231 }
1232
1233 /**
1234 * Checks if this DAO's table ought to exist.
1235 *
1236 * If there are pending DB updates, this function compares the CiviCRM version of the table to the current schema version.
1237 *
1238 * @return bool
1239 * @throws CRM_Core_Exception
1240 */
1241 public static function tableHasBeenAdded() {
1242 if (CRM_Utils_System::version() === CRM_Core_BAO_Domain::version()) {
1243 return TRUE;
1244 }
1245 $daoExt = defined(static::class . '::EXT') ? constant(static::class . '::EXT') : NULL;
1246 $daoVersion = defined(static::class . '::TABLE_ADDED') ? constant(static::class . '::TABLE_ADDED') : '1.0';
1247 return !($daoExt === 'civicrm' && version_compare(CRM_Core_BAO_Domain::version(), $daoVersion, '<'));
1248 }
1249
1250 /**
1251 * Check if there is a given table in the database.
1252 *
1253 * @param string $tableName
1254 *
1255 * @return bool
1256 * true if exists, else false
1257 */
1258 public static function checkTableExists($tableName) {
1259 $query = "
1260 SHOW TABLES
1261 LIKE %1
1262 ";
1263 $params = [1 => [$tableName, 'String']];
1264
1265 $dao = CRM_Core_DAO::executeQuery($query, $params);
1266 return (bool) $dao->fetch();
1267 }
1268
1269 /**
1270 * Check if a given table has data.
1271 *
1272 * @param string $tableName
1273 * @return bool
1274 * TRUE if $tableName has at least one record.
1275 */
1276 public static function checkTableHasData($tableName) {
1277 $c = CRM_Core_DAO::singleValueQuery(sprintf('SELECT count(*) c FROM `%s`', $tableName));
1278 return $c > 0;
1279 }
1280
1281 /**
1282 * @param $version
1283 * @deprecated
1284 * @return bool
1285 */
1286 public function checkVersion($version) {
1287 CRM_Core_Error::deprecatedFunctionWarning('CRM_Core_BAO_Domain::version');
1288 $dbVersion = CRM_Core_BAO_Domain::version();
1289 return trim($version) == trim($dbVersion);
1290 }
1291
1292 /**
1293 * Find a DAO object for the given ID and return it.
1294 *
1295 * @param int $id
1296 * Id of the DAO object being searched for.
1297 *
1298 * @return CRM_Core_DAO
1299 * Object of the type of the class that called this function.
1300 *
1301 * @throws Exception
1302 */
1303 public static function findById($id) {
1304 $object = new static();
1305 $object->id = $id;
1306 if (!$object->find(TRUE)) {
1307 throw new Exception("Unable to find a " . get_called_class() . " with id {$id}.");
1308 }
1309 return $object;
1310 }
1311
1312 /**
1313 * Returns all results as array-encoded records.
1314 *
1315 * @return array
1316 */
1317 public function fetchAll($k = FALSE, $v = FALSE, $method = FALSE) {
1318 $result = [];
1319 while ($this->fetch()) {
1320 $result[] = $this->toArray();
1321 }
1322 return $result;
1323 }
1324
1325 /**
1326 * Return the results as PHP generator.
1327 *
1328 * @param string $type
1329 * Whether the generator yields 'dao' objects or 'array's.
1330 */
1331 public function fetchGenerator($type = 'dao') {
1332 while ($this->fetch()) {
1333 switch ($type) {
1334 case 'dao':
1335 yield $this;
1336 break;
1337
1338 case 'array':
1339 yield $this->toArray();
1340 break;
1341
1342 default:
1343 throw new \RuntimeException("Invalid record type ($type)");
1344 }
1345 }
1346 }
1347
1348 /**
1349 * Returns a singular value.
1350 *
1351 * @return mixed|NULL
1352 */
1353 public function fetchValue() {
1354 $result = $this->getDatabaseResult();
1355 $row = $result->fetchRow();
1356 $ret = NULL;
1357 if ($row) {
1358 $ret = $row[0];
1359 }
1360 $this->free();
1361 return $ret;
1362 }
1363
1364 /**
1365 * Get all the result records as mapping between columns.
1366 *
1367 * @param string $keyColumn
1368 * Ex: "name"
1369 * @param string $valueColumn
1370 * Ex: "label"
1371 * @return array
1372 * Ex: ["foo" => "The Foo Bar", "baz" => "The Baz Qux"]
1373 */
1374 public function fetchMap($keyColumn, $valueColumn) {
1375 $result = [];
1376 while ($this->fetch()) {
1377 $result[$this->{$keyColumn}] = $this->{$valueColumn};
1378 }
1379 return $result;
1380 }
1381
1382 /**
1383 * Given a DAO name, a column name and a column value, find the record and GET the value of another column in that record
1384 *
1385 * @param string $daoName
1386 * Name of the DAO (Example: CRM_Contact_DAO_Contact to retrieve value from a contact).
1387 * @param int $searchValue
1388 * Value of the column you want to search by.
1389 * @param string $returnColumn
1390 * Name of the column you want to GET the value of.
1391 * @param string $searchColumn
1392 * Name of the column you want to search by.
1393 * @param bool $force
1394 * Skip use of the cache.
1395 *
1396 * @return string|int|null
1397 * Value of $returnColumn in the retrieved record
1398 *
1399 * @throws \CRM_Core_Exception
1400 */
1401 public static function getFieldValue($daoName, $searchValue, $returnColumn = 'name', $searchColumn = 'id', $force = FALSE) {
1402 if (
1403 empty($searchValue) ||
1404 trim(strtolower($searchValue)) == 'null'
1405 ) {
1406 // adding this here since developers forget to check for an id
1407 // or for the 'null' (which is a bad DAO kludge)
1408 // and hence we get the first value in the db
1409 throw new CRM_Core_Exception('getFieldValue failed');
1410 }
1411
1412 self::$_dbColumnValueCache = self::$_dbColumnValueCache ?? [];
1413
1414 while (strpos($daoName, '_BAO_') !== FALSE) {
1415 $daoName = get_parent_class($daoName);
1416 }
1417
1418 if ($force ||
1419 empty(self::$_dbColumnValueCache[$daoName][$searchColumn][$searchValue]) ||
1420 !array_key_exists($returnColumn, self::$_dbColumnValueCache[$daoName][$searchColumn][$searchValue])
1421 ) {
1422 $object = new $daoName();
1423 $object->$searchColumn = $searchValue;
1424 $object->selectAdd();
1425 $object->selectAdd($returnColumn);
1426
1427 $result = NULL;
1428 if ($object->find(TRUE)) {
1429 $result = $object->$returnColumn;
1430 }
1431
1432 self::$_dbColumnValueCache[$daoName][$searchColumn][$searchValue][$returnColumn] = $result;
1433 }
1434 return self::$_dbColumnValueCache[$daoName][$searchColumn][$searchValue][$returnColumn];
1435 }
1436
1437 /**
1438 * Given a DAO name, a column name and a column value, find the record and SET the value of another column in that record
1439 *
1440 * @param string $daoName
1441 * Name of the DAO (Example: CRM_Contact_DAO_Contact to retrieve value from a contact).
1442 * @param int $searchValue
1443 * Value of the column you want to search by.
1444 * @param string $setColumn
1445 * Name of the column you want to SET the value of.
1446 * @param string $setValue
1447 * SET the setColumn to this value.
1448 * @param string $searchColumn
1449 * Name of the column you want to search by.
1450 *
1451 * @return bool
1452 * true if we found and updated the object, else false
1453 */
1454 public static function setFieldValue($daoName, $searchValue, $setColumn, $setValue, $searchColumn = 'id') {
1455 $object = new $daoName();
1456 $object->selectAdd();
1457 $object->selectAdd("$searchColumn, $setColumn");
1458 $object->$searchColumn = $searchValue;
1459 $result = FALSE;
1460 if ($object->find(TRUE)) {
1461 $object->$setColumn = $setValue;
1462 if ($object->save()) {
1463 $result = TRUE;
1464 }
1465 }
1466 $object->free();
1467 return $result;
1468 }
1469
1470 /**
1471 * Get sort string.
1472 *
1473 * @param array|object $sort either array or CRM_Utils_Sort
1474 * @param string $default
1475 * Default sort value.
1476 *
1477 * @return string
1478 */
1479 public static function getSortString($sort, $default = NULL) {
1480 // check if sort is of type CRM_Utils_Sort
1481 if (is_a($sort, 'CRM_Utils_Sort')) {
1482 return $sort->orderBy();
1483 }
1484
1485 $sortString = '';
1486
1487 // is it an array specified as $field => $sortDirection ?
1488 if ($sort) {
1489 foreach ($sort as $k => $v) {
1490 $sortString .= "$k $v,";
1491 }
1492 return rtrim($sortString, ',');
1493 }
1494 return $default;
1495 }
1496
1497 /**
1498 * Fetch object based on array of properties.
1499 *
1500 * @param string $daoName
1501 * Name of the dao object.
1502 * @param array $params
1503 * (reference ) an assoc array of name/value pairs.
1504 * @param array $defaults
1505 * (reference ) an assoc array to hold the flattened values.
1506 * @param array $returnProperities
1507 * An assoc array of fields that need to be returned, eg array( 'first_name', 'last_name').
1508 *
1509 * @return object
1510 * an object of type referenced by daoName
1511 */
1512 public static function commonRetrieve($daoName, &$params, &$defaults, $returnProperities = NULL) {
1513 $object = new $daoName();
1514 $object->copyValues($params);
1515
1516 // return only specific fields if returnproperties are sent
1517 if (!empty($returnProperities)) {
1518 $object->selectAdd();
1519 $object->selectAdd(implode(',', $returnProperities));
1520 }
1521
1522 if ($object->find(TRUE)) {
1523 self::storeValues($object, $defaults);
1524 return $object;
1525 }
1526 return NULL;
1527 }
1528
1529 /**
1530 * Delete the object records that are associated with this contact.
1531 *
1532 * @param string $daoName
1533 * Name of the dao object.
1534 * @param int $contactId
1535 * Id of the contact to delete.
1536 */
1537 public static function deleteEntityContact($daoName, $contactId) {
1538 $object = new $daoName();
1539
1540 $object->entity_table = 'civicrm_contact';
1541 $object->entity_id = $contactId;
1542 $object->delete();
1543 }
1544
1545 /**
1546 * Execute an unbuffered query.
1547 *
1548 * This is a wrapper around new functionality exposed with CRM-17748.
1549 *
1550 * @param string $query query to be executed
1551 *
1552 * @param array $params
1553 * @param bool $abort
1554 * @param null $daoName
1555 * @param bool $freeDAO
1556 * @param bool $i18nRewrite
1557 * @param bool $trapException
1558 *
1559 * @return CRM_Core_DAO
1560 * Object that points to an unbuffered result set
1561 */
1562 public static function executeUnbufferedQuery(
1563 $query,
1564 $params = [],
1565 $abort = TRUE,
1566 $daoName = NULL,
1567 $freeDAO = FALSE,
1568 $i18nRewrite = TRUE,
1569 $trapException = FALSE
1570 ) {
1571
1572 return self::executeQuery(
1573 $query,
1574 $params,
1575 $abort,
1576 $daoName,
1577 $freeDAO,
1578 $i18nRewrite,
1579 $trapException,
1580 ['result_buffering' => 0]
1581 );
1582 }
1583
1584 /**
1585 * Execute a query.
1586 *
1587 * @param string $query
1588 * Query to be executed.
1589 *
1590 * @param array $params
1591 * @param bool $abort
1592 * @param null $daoName
1593 * @param bool $freeDAO
1594 * @param bool $i18nRewrite
1595 * @param bool $trapException
1596 * @param array $options
1597 *
1598 * @return CRM_Core_DAO|object
1599 * object that holds the results of the query
1600 * NB - if this is defined as just returning a DAO phpstorm keeps pointing
1601 * out all the properties that are not part of the DAO
1602 */
1603 public static function &executeQuery(
1604 $query,
1605 $params = [],
1606 $abort = TRUE,
1607 $daoName = NULL,
1608 $freeDAO = FALSE,
1609 $i18nRewrite = TRUE,
1610 $trapException = FALSE,
1611 $options = []
1612 ) {
1613 $queryStr = self::composeQuery($query, $params, $abort);
1614
1615 if (!$daoName) {
1616 $dao = new CRM_Core_DAO();
1617 }
1618 else {
1619 $dao = new $daoName();
1620 }
1621
1622 if ($trapException) {
1623 CRM_Core_Error::deprecatedFunctionWarning('calling functions should handle exceptions');
1624 $errorScope = CRM_Core_TemporaryErrorScope::ignoreException();
1625 }
1626
1627 if ($dao->isValidOption($options)) {
1628 $dao->setOptions($options);
1629 }
1630
1631 $result = $dao->query($queryStr, $i18nRewrite);
1632
1633 // since it is unbuffered, ($dao->N==0) is true. This blocks the standard fetch() mechanism.
1634 if (CRM_Utils_Array::value('result_buffering', $options) === 0) {
1635 $dao->N = TRUE;
1636 }
1637
1638 if (is_a($result, 'DB_Error')) {
1639 CRM_Core_Error::deprecatedFunctionWarning('calling functions should handle exceptions');
1640 return $result;
1641 }
1642
1643 return $dao;
1644 }
1645
1646 /**
1647 * Wrapper to validate internal DAO options before passing to DB_mysql/DB_Common level
1648 *
1649 * @param array $options
1650 *
1651 * @return bool
1652 * Provided options are valid
1653 */
1654 public function isValidOption($options) {
1655 $isValid = FALSE;
1656 $validOptions = [
1657 'result_buffering',
1658 'persistent',
1659 'ssl',
1660 'portability',
1661 ];
1662
1663 if (empty($options)) {
1664 return $isValid;
1665 }
1666
1667 foreach (array_keys($options) as $option) {
1668 if (!in_array($option, $validOptions)) {
1669 return FALSE;
1670 }
1671 $isValid = TRUE;
1672 }
1673
1674 return $isValid;
1675 }
1676
1677 /**
1678 * Execute a query and get the single result.
1679 *
1680 * @param string $query
1681 * Query to be executed.
1682 * @param array $params
1683 * @param bool $abort
1684 * @param bool $i18nRewrite
1685 * @return string|null
1686 * the result of the query if any
1687 *
1688 */
1689 public static function &singleValueQuery(
1690 $query,
1691 $params = [],
1692 $abort = TRUE,
1693 $i18nRewrite = TRUE
1694 ) {
1695 $queryStr = self::composeQuery($query, $params, $abort);
1696
1697 static $_dao = NULL;
1698
1699 if (!$_dao) {
1700 $_dao = new CRM_Core_DAO();
1701 }
1702
1703 $_dao->query($queryStr, $i18nRewrite);
1704
1705 $result = $_dao->getDatabaseResult();
1706 $ret = NULL;
1707 if ($result) {
1708 $row = $result->fetchRow();
1709 if ($row) {
1710 $ret = $row[0];
1711 }
1712 }
1713 $_dao->free();
1714 return $ret;
1715 }
1716
1717 /**
1718 * Compose the query by merging the parameters into it.
1719 *
1720 * @param string $query
1721 * @param array $params
1722 * @param bool $abort
1723 *
1724 * @return string
1725 * @throws CRM_Core_Exception
1726 */
1727 public static function composeQuery($query, $params = [], $abort = TRUE) {
1728 $tr = [];
1729 foreach ($params as $key => $item) {
1730 if (is_numeric($key)) {
1731 if (CRM_Utils_Type::validate($item[0], $item[1]) !== NULL) {
1732 $item[0] = self::escapeString($item[0]);
1733 if ($item[1] == 'String' ||
1734 $item[1] == 'Memo' ||
1735 $item[1] == 'Link'
1736 ) {
1737 // Support class constants stipulating wildcard characters and/or
1738 // non-quoting of strings. Also support legacy code which may be
1739 // passing in TRUE or 1 for $item[2], which used to indicate the
1740 // use of wildcard characters.
1741 if (!empty($item[2])) {
1742 if ($item[2] & CRM_Core_DAO::QUERY_FORMAT_WILDCARD || $item[2] === TRUE) {
1743 $item[0] = "'%{$item[0]}%'";
1744 }
1745 elseif (!($item[2] & CRM_Core_DAO::QUERY_FORMAT_NO_QUOTES)) {
1746 $item[0] = "'{$item[0]}'";
1747 }
1748 }
1749 else {
1750 $item[0] = "'{$item[0]}'";
1751 }
1752 }
1753
1754 if (($item[1] == 'Date' || $item[1] == 'Timestamp') &&
1755 strlen($item[0]) == 0
1756 ) {
1757 $item[0] = 'null';
1758 }
1759
1760 $tr['%' . $key] = $item[0];
1761 }
1762 elseif ($abort) {
1763 throw new CRM_Core_Exception("{$item[0]} is not of type {$item[1]}");
1764 }
1765 }
1766 }
1767
1768 return strtr($query, $tr);
1769 }
1770
1771 /**
1772 * @param null $ids
1773 */
1774 public static function freeResult($ids = NULL) {
1775 global $_DB_DATAOBJECT;
1776
1777 if (!$ids) {
1778 if (!$_DB_DATAOBJECT ||
1779 !isset($_DB_DATAOBJECT['RESULTS'])
1780 ) {
1781 return;
1782 }
1783 $ids = array_keys($_DB_DATAOBJECT['RESULTS']);
1784 }
1785
1786 foreach ($ids as $id) {
1787 if (isset($_DB_DATAOBJECT['RESULTS'][$id])) {
1788 $_DB_DATAOBJECT['RESULTS'][$id]->free();
1789 unset($_DB_DATAOBJECT['RESULTS'][$id]);
1790 }
1791
1792 if (isset($_DB_DATAOBJECT['RESULTFIELDS'][$id])) {
1793 unset($_DB_DATAOBJECT['RESULTFIELDS'][$id]);
1794 }
1795 }
1796 }
1797
1798 /**
1799 * Make a shallow copy of an object and all the fields in the object.
1800 *
1801 * @param string $daoName
1802 * Name of the dao.
1803 * @param array $criteria
1804 * Array of all the fields & values.
1805 * on which basis to copy
1806 * @param array $newData
1807 * Array of all the fields & values.
1808 * to be copied besides the other fields
1809 * @param string $fieldsFix
1810 * Array of fields that you want to prefix/suffix/replace.
1811 * @param string $blockCopyOfDependencies
1812 * Fields that you want to block from.
1813 * getting copied
1814 * @param bool $blockCopyofCustomValues
1815 * Case when you don't want to copy the custom values set in a
1816 * template as it will override/ignore the submitted custom values
1817 *
1818 * @return CRM_Core_DAO|bool
1819 * the newly created copy of the object. False if none created.
1820 */
1821 public static function copyGeneric($daoName, $criteria, $newData = NULL, $fieldsFix = NULL, $blockCopyOfDependencies = NULL, $blockCopyofCustomValues = FALSE) {
1822 $object = new $daoName();
1823 $newObject = FALSE;
1824 if (!$newData) {
1825 $object->id = $criteria['id'];
1826 }
1827 else {
1828 foreach ($criteria as $key => $value) {
1829 $object->$key = $value;
1830 }
1831 }
1832
1833 $object->find();
1834 while ($object->fetch()) {
1835
1836 // all the objects except with $blockCopyOfDependencies set
1837 // be copied - addresses #CRM-1962
1838
1839 if ($blockCopyOfDependencies && $object->$blockCopyOfDependencies) {
1840 break;
1841 }
1842
1843 $newObject = new $daoName();
1844
1845 $fields = $object->fields();
1846 $fieldsToPrefix = [];
1847 $fieldsToSuffix = [];
1848 $fieldsToReplace = [];
1849 if (!empty($fieldsFix['prefix'])) {
1850 $fieldsToPrefix = $fieldsFix['prefix'];
1851 }
1852 if (!empty($fieldsFix['suffix'])) {
1853 $fieldsToSuffix = $fieldsFix['suffix'];
1854 }
1855 if (!empty($fieldsFix['replace'])) {
1856 $fieldsToReplace = $fieldsFix['replace'];
1857 }
1858
1859 $localizableFields = FALSE;
1860 foreach ($fields as $name => $value) {
1861 if ($name == 'id' || $value['name'] == 'id') {
1862 // copy everything but the id!
1863 continue;
1864 }
1865
1866 $dbName = $value['name'];
1867 $type = CRM_Utils_Type::typeToString($value['type']);
1868 $newObject->$dbName = $object->$dbName;
1869 if (isset($fieldsToPrefix[$dbName])) {
1870 $newObject->$dbName = $fieldsToPrefix[$dbName] . $newObject->$dbName;
1871 }
1872 if (isset($fieldsToSuffix[$dbName])) {
1873 $newObject->$dbName .= $fieldsToSuffix[$dbName];
1874 }
1875 if (isset($fieldsToReplace[$dbName])) {
1876 $newObject->$dbName = $fieldsToReplace[$dbName];
1877 }
1878
1879 if ($type == 'Timestamp' || $type == 'Date') {
1880 $newObject->$dbName = CRM_Utils_Date::isoToMysql($newObject->$dbName);
1881 }
1882
1883 if (!empty($value['localizable'])) {
1884 $localizableFields = TRUE;
1885 }
1886
1887 if ($newData) {
1888 $newObject->copyValues($newData);
1889 }
1890 }
1891 $newObject->save();
1892
1893 // ensure we copy all localized fields as well
1894 if (CRM_Core_I18n::isMultilingual() && $localizableFields) {
1895 global $dbLocale;
1896 $locales = CRM_Core_I18n::getMultilingual();
1897 $curLocale = CRM_Core_I18n::getLocale();
1898 // loop on other locales
1899 foreach ($locales as $locale) {
1900 if ($locale != $curLocale) {
1901 // setLocale doesn't seems to be reliable to set dbLocale and we only need to change the db locale
1902 $dbLocale = '_' . $locale;
1903 $newObject->copyLocalizable($object->id, $newObject->id, $fieldsToPrefix, $fieldsToSuffix, $fieldsToReplace);
1904 }
1905 }
1906 // restore dbLocale to starting value
1907 $dbLocale = '_' . $curLocale;
1908 }
1909
1910 if (!$blockCopyofCustomValues) {
1911 $newObject->copyCustomFields($object->id, $newObject->id);
1912 }
1913 CRM_Utils_Hook::post('create', CRM_Core_DAO_AllCoreTables::getBriefName($daoName), $newObject->id, $newObject);
1914 }
1915
1916 return $newObject;
1917 }
1918
1919 /**
1920 * Method that copies localizable fields from an old entity to a new one.
1921 *
1922 * Fixes bug dev/core#2479,
1923 * where non current locale fields are copied from current locale losing translation when copying
1924 *
1925 * @param int $entityID
1926 * @param int $newEntityID
1927 * @param array $fieldsToPrefix
1928 * @param array $fieldsToSuffix
1929 * @param array $fieldsToReplace
1930 */
1931 protected function copyLocalizable($entityID, $newEntityID, $fieldsToPrefix, $fieldsToSuffix, $fieldsToReplace) {
1932 $entity = get_class($this);
1933 $object = new $entity();
1934 $object->id = $entityID;
1935 $object->find();
1936
1937 $newObject = new $entity();
1938 $newObject->id = $newEntityID;
1939
1940 $newObject->find();
1941
1942 if ($object->fetch() && $newObject->fetch()) {
1943
1944 $fields = $object->fields();
1945 foreach ($fields as $name => $value) {
1946
1947 if ($name == 'id' || $value['name'] == 'id') {
1948 // copy everything but the id!
1949 continue;
1950 }
1951
1952 // only copy localizable fields
1953 if (!$value['localizable']) {
1954 continue;
1955 }
1956
1957 $dbName = $value['name'];
1958 $type = CRM_Utils_Type::typeToString($value['type']);
1959 $newObject->$dbName = $object->$dbName;
1960 if (isset($fieldsToPrefix[$dbName])) {
1961 $newObject->$dbName = $fieldsToPrefix[$dbName] . $newObject->$dbName;
1962 }
1963 if (isset($fieldsToSuffix[$dbName])) {
1964 $newObject->$dbName .= $fieldsToSuffix[$dbName];
1965 }
1966 if (isset($fieldsToReplace[$dbName])) {
1967 $newObject->$dbName = $fieldsToReplace[$dbName];
1968 }
1969
1970 if ($type == 'Timestamp' || $type == 'Date') {
1971 $newObject->$dbName = CRM_Utils_Date::isoToMysql($newObject->$dbName);
1972 }
1973
1974 }
1975 $newObject->save();
1976
1977 }
1978 }
1979
1980 /**
1981 * Method that copies custom fields values from an old entity to a new one.
1982 *
1983 * Fixes bug CRM-19302,
1984 * where if a custom field of File type was present, left both events using the same file,
1985 * breaking download URL's for the old event.
1986 *
1987 * @todo the goal here is to clean this up so that it works for any entity. Copy Generic already DOES some custom field stuff
1988 * but it seems to be bypassed & perhaps less good than this (or this just duplicates it...)
1989 *
1990 * @param int $entityID
1991 * @param int $newEntityID
1992 * @param string $parentOperation
1993 */
1994 public function copyCustomFields($entityID, $newEntityID, $parentOperation = NULL) {
1995 $entity = CRM_Core_DAO_AllCoreTables::getBriefName(get_class($this));
1996 $tableName = CRM_Core_DAO_AllCoreTables::getTableForClass(get_class($this));
1997 // Obtain custom values for the old entity.
1998 $customParams = $htmlType = [];
1999 $customValues = CRM_Core_BAO_CustomValueTable::getEntityValues($entityID, $entity);
2000
2001 // If custom values present, we copy them
2002 if (!empty($customValues)) {
2003 // Get Field ID's and identify File type attributes, to handle file copying.
2004 $fieldIds = implode(', ', array_keys($customValues));
2005 $sql = "SELECT id FROM civicrm_custom_field WHERE html_type = 'File' AND id IN ( {$fieldIds} )";
2006 $result = CRM_Core_DAO::executeQuery($sql);
2007
2008 // Build array of File type fields
2009 while ($result->fetch()) {
2010 $htmlType[] = $result->id;
2011 }
2012
2013 // Build params array of custom values
2014 foreach ($customValues as $field => $value) {
2015 if ($value !== NULL) {
2016 // Handle File type attributes
2017 if (in_array($field, $htmlType)) {
2018 $fileValues = CRM_Core_BAO_File::path($value, $entityID);
2019 $customParams["custom_{$field}_-1"] = [
2020 'name' => CRM_Utils_File::duplicate($fileValues[0]),
2021 'type' => $fileValues[1],
2022 ];
2023 }
2024 // Handle other types
2025 else {
2026 $customParams["custom_{$field}_-1"] = $value;
2027 }
2028 }
2029 }
2030
2031 // Save Custom Fields for new Entity.
2032 CRM_Core_BAO_CustomValueTable::postProcess($customParams, $tableName, $newEntityID, $entity, $parentOperation ?? 'create');
2033 }
2034
2035 // copy activity attachments ( if any )
2036 CRM_Core_BAO_File::copyEntityFile($tableName, $entityID, $tableName, $newEntityID);
2037 }
2038
2039 /**
2040 * Cascade update through related entities.
2041 *
2042 * @param string $daoName
2043 * @param $fromId
2044 * @param $toId
2045 * @param array $newData
2046 *
2047 * @return CRM_Core_DAO|null
2048 */
2049 public static function cascadeUpdate($daoName, $fromId, $toId, $newData = []) {
2050 $object = new $daoName();
2051 $object->id = $fromId;
2052
2053 if ($object->find(TRUE)) {
2054 $newObject = new $daoName();
2055 $newObject->id = $toId;
2056
2057 if ($newObject->find(TRUE)) {
2058 $fields = $object->fields();
2059 foreach ($fields as $name => $value) {
2060 if ($name == 'id' || $value['name'] == 'id') {
2061 // copy everything but the id!
2062 continue;
2063 }
2064
2065 $colName = $value['name'];
2066 $newObject->$colName = $object->$colName;
2067
2068 if (substr($name, -5) == '_date' ||
2069 substr($name, -10) == '_date_time'
2070 ) {
2071 $newObject->$colName = CRM_Utils_Date::isoToMysql($newObject->$colName);
2072 }
2073 }
2074 foreach ($newData as $k => $v) {
2075 $newObject->$k = $v;
2076 }
2077 $newObject->save();
2078 return $newObject;
2079 }
2080 }
2081 return NULL;
2082 }
2083
2084 /**
2085 * Given the component id, compute the contact id
2086 * since its used for things like send email
2087 *
2088 * @param $componentIDs
2089 * @param string $tableName
2090 * @param string $idField
2091 *
2092 * @return array
2093 */
2094 public static function getContactIDsFromComponent($componentIDs, $tableName, $idField = 'id') {
2095 $contactIDs = [];
2096
2097 if (empty($componentIDs)) {
2098 return $contactIDs;
2099 }
2100
2101 $IDs = implode(',', $componentIDs);
2102 $query = "
2103 SELECT contact_id
2104 FROM $tableName
2105 WHERE $idField IN ( $IDs )
2106 ";
2107
2108 $dao = CRM_Core_DAO::executeQuery($query);
2109 while ($dao->fetch()) {
2110 $contactIDs[] = $dao->contact_id;
2111 }
2112 return $contactIDs;
2113 }
2114
2115 /**
2116 * Fetch object based on array of properties.
2117 *
2118 * @param string $daoName
2119 * Name of the dao object.
2120 * @param string $fieldIdName
2121 * @param int $fieldId
2122 * @param $details
2123 * @param array $returnProperities
2124 * An assoc array of fields that need to be returned, eg array( 'first_name', 'last_name').
2125 *
2126 * @return object
2127 * an object of type referenced by daoName
2128 */
2129 public static function commonRetrieveAll($daoName, $fieldIdName, $fieldId, &$details, $returnProperities = NULL) {
2130 require_once str_replace('_', DIRECTORY_SEPARATOR, $daoName) . ".php";
2131 $object = new $daoName();
2132 $object->$fieldIdName = $fieldId;
2133
2134 // return only specific fields if returnproperties are sent
2135 if (!empty($returnProperities)) {
2136 $object->selectAdd();
2137 $object->selectAdd('id');
2138 $object->selectAdd(implode(',', $returnProperities));
2139 }
2140
2141 $object->find();
2142 while ($object->fetch()) {
2143 $defaults = [];
2144 self::storeValues($object, $defaults);
2145 $details[$object->id] = $defaults;
2146 }
2147
2148 return $details;
2149 }
2150
2151 /**
2152 * Drop all CiviCRM tables.
2153 *
2154 * @throws \CRM_Core_Exception
2155 */
2156 public static function dropAllTables() {
2157
2158 // first drop all the custom tables we've created
2159 CRM_Core_BAO_CustomGroup::dropAllTables();
2160
2161 // drop all multilingual views
2162 CRM_Core_I18n_Schema::dropAllViews();
2163
2164 CRM_Utils_File::sourceSQLFile(CIVICRM_DSN,
2165 dirname(__FILE__) . DIRECTORY_SEPARATOR .
2166 '..' . DIRECTORY_SEPARATOR .
2167 '..' . DIRECTORY_SEPARATOR .
2168 'sql' . DIRECTORY_SEPARATOR .
2169 'civicrm_drop.mysql'
2170 );
2171 }
2172
2173 /**
2174 * @param $string
2175 *
2176 * @return string
2177 */
2178 public static function escapeString($string) {
2179 static $_dao = NULL;
2180 if (!$_dao) {
2181 // If this is an atypical case (e.g. preparing .sql file before CiviCRM
2182 // has been installed), then we fallback DB-less str_replace escaping, as
2183 // we can't use mysqli_real_escape_string, as there is no DB connection.
2184 // Note: In typical usage, escapeString() will only check one conditional
2185 // ("if !$_dao") rather than two conditionals ("if !defined(DSN)")
2186 if (!defined('CIVICRM_DSN')) {
2187 // See http://php.net/manual/en/mysqli.real-escape-string.php for the
2188 // list of characters mysqli_real_escape_string escapes.
2189 $search = ["\\", "\x00", "\n", "\r", "'", '"', "\x1a"];
2190 $replace = ["\\\\", "\\0", "\\n", "\\r", "\'", '\"', "\\Z"];
2191 return str_replace($search, $replace, $string);
2192 }
2193 $_dao = new CRM_Core_DAO();
2194 }
2195 return $_dao->escape($string);
2196 }
2197
2198 /**
2199 * Escape a list of strings for use with "WHERE X IN (...)" queries.
2200 *
2201 * @param array $strings
2202 * @param string $default
2203 * the value to use if $strings has no elements.
2204 * @return string
2205 * eg "abc","def","ghi"
2206 */
2207 public static function escapeStrings($strings, $default = NULL) {
2208 static $_dao = NULL;
2209 if (!$_dao) {
2210 $_dao = new CRM_Core_DAO();
2211 }
2212
2213 if (empty($strings)) {
2214 return $default;
2215 }
2216
2217 $escapes = array_map([$_dao, 'escape'], $strings);
2218 return '"' . implode('","', $escapes) . '"';
2219 }
2220
2221 /**
2222 * @param $string
2223 *
2224 * @return string
2225 */
2226 public static function escapeWildCardString($string) {
2227 // CRM-9155
2228 // ensure we escape the single characters % and _ which are mysql wild
2229 // card characters and could come in via sortByCharacter
2230 // note that mysql does not escape these characters
2231 if ($string && in_array($string,
2232 ['%', '_', '%%', '_%']
2233 )
2234 ) {
2235 return '\\' . $string;
2236 }
2237
2238 return self::escapeString($string);
2239 }
2240
2241 /**
2242 * Creates a test object, including any required objects it needs via recursion
2243 * createOnly: only create in database, do not store or return the objects (useful for perf testing)
2244 * ONLY USE FOR TESTING
2245 *
2246 * @param string $daoName
2247 * @param array $params
2248 * @param int $numObjects
2249 * @param bool $createOnly
2250 *
2251 * @return object|array|NULL
2252 * NULL if $createOnly. A single object if $numObjects==1. Otherwise, an array of multiple objects.
2253 */
2254 public static function createTestObject(
2255 $daoName,
2256 $params = [],
2257 $numObjects = 1,
2258 $createOnly = FALSE
2259 ) {
2260 //this is a test function also backtrace is set for the test suite it sometimes unsets itself
2261 // so we re-set here in case
2262 $config = CRM_Core_Config::singleton();
2263 $config->backtrace = TRUE;
2264
2265 static $counter = 0;
2266 CRM_Core_DAO::$_testEntitiesToSkip = [
2267 'CRM_Core_DAO_Worldregion',
2268 'CRM_Core_DAO_StateProvince',
2269 'CRM_Core_DAO_Country',
2270 'CRM_Core_DAO_Domain',
2271 'CRM_Financial_DAO_FinancialType',
2272 //because valid ones exist & we use pick them due to pseudoconstant can't reliably create & delete these
2273 ];
2274
2275 // Prefer to instantiate BAO's instead of DAO's (when possible)
2276 // so that assignTestValue()/assignTestFK() can be overloaded.
2277 $baoName = str_replace('_DAO_', '_BAO_', $daoName);
2278 if ($baoName === 'CRM_Financial_BAO_FinancialTrxn') {
2279 // OMG OMG OMG this is so incredibly bad. The BAO is insanely named.
2280 // @todo create a new class called what the BAO SHOULD be
2281 // that extends BAO-crazy-name.... migrate.
2282 $baoName = 'CRM_Core_BAO_FinancialTrxn';
2283 }
2284 if (class_exists($baoName)) {
2285 $daoName = $baoName;
2286 }
2287
2288 for ($i = 0; $i < $numObjects; ++$i) {
2289
2290 ++$counter;
2291 /** @var CRM_Core_DAO $object */
2292 $object = new $daoName();
2293
2294 $fields = $object->fields();
2295 foreach ($fields as $fieldName => $fieldDef) {
2296 $dbName = $fieldDef['name'];
2297 $FKClassName = $fieldDef['FKClassName'] ?? NULL;
2298
2299 if (isset($params[$dbName]) && !is_array($params[$dbName])) {
2300 $object->$dbName = $params[$dbName];
2301 }
2302
2303 elseif ($dbName != 'id') {
2304 if ($FKClassName != NULL) {
2305 $object->assignTestFK($fieldName, $fieldDef, $params);
2306 continue;
2307 }
2308 else {
2309 $object->assignTestValue($fieldName, $fieldDef, $counter);
2310 }
2311 }
2312 }
2313
2314 $object->save();
2315
2316 if (!$createOnly) {
2317 $objects[$i] = $object;
2318 }
2319 else {
2320 unset($object);
2321 }
2322 }
2323
2324 if ($createOnly) {
2325 return NULL;
2326 }
2327 elseif ($numObjects == 1) {
2328 return $objects[0];
2329 }
2330 else {
2331 return $objects;
2332 }
2333 }
2334
2335 /**
2336 * Deletes the this object plus any dependent objects that are associated with it.
2337 * ONLY USE FOR TESTING
2338 *
2339 * @param string $daoName
2340 * @param array $params
2341 */
2342 public static function deleteTestObjects($daoName, $params = []) {
2343 //this is a test function also backtrace is set for the test suite it sometimes unsets itself
2344 // so we re-set here in case
2345 $config = CRM_Core_Config::singleton();
2346 $config->backtrace = TRUE;
2347
2348 $object = new $daoName();
2349 $object->id = $params['id'] ?? NULL;
2350
2351 // array(array(0 => $daoName, 1 => $daoParams))
2352 $deletions = [];
2353 if ($object->find(TRUE)) {
2354
2355 $fields = $object->fields();
2356 foreach ($fields as $name => $value) {
2357
2358 $dbName = $value['name'];
2359
2360 $FKClassName = $value['FKClassName'] ?? NULL;
2361 $required = $value['required'] ?? NULL;
2362 if ($FKClassName != NULL
2363 && $object->$dbName
2364 && !in_array($FKClassName, CRM_Core_DAO::$_testEntitiesToSkip)
2365 && ($required || $dbName == 'contact_id')
2366 //I'm a bit stuck on this one - we might need to change the singleValueAlter so that the entities don't share a contact
2367 // to make this test process pass - line below makes pass for now
2368 && $dbName != 'member_of_contact_id'
2369 ) {
2370 // x
2371 $deletions[] = [$FKClassName, ['id' => $object->$dbName]];
2372 }
2373 }
2374 }
2375
2376 $object->delete();
2377
2378 foreach ($deletions as $deletion) {
2379 CRM_Core_DAO::deleteTestObjects($deletion[0], $deletion[1]);
2380 }
2381 }
2382
2383 /**
2384 * Set defaults when creating new entity.
2385 * (don't call this set defaults as already in use with different signature in some places)
2386 *
2387 * @param array $params
2388 * @param $defaults
2389 */
2390 public static function setCreateDefaults(&$params, $defaults) {
2391 if (!empty($params['id'])) {
2392 return;
2393 }
2394 foreach ($defaults as $key => $value) {
2395 if (!array_key_exists($key, $params) || $params[$key] === NULL) {
2396 $params[$key] = $value;
2397 }
2398 }
2399 }
2400
2401 /**
2402 * @param string $prefix
2403 * @param bool $addRandomString
2404 * @param null $string
2405 *
2406 * @return string
2407 * @deprecated
2408 * @see CRM_Utils_SQL_TempTable
2409 */
2410 public static function createTempTableName($prefix = 'civicrm', $addRandomString = TRUE, $string = NULL) {
2411 CRM_Core_Error::deprecatedFunctionWarning('Use CRM_Utils_SQL_TempTable interface to create temporary tables');
2412 $tableName = $prefix . "_temp";
2413
2414 if ($addRandomString) {
2415 if ($string) {
2416 $tableName .= "_" . $string;
2417 }
2418 else {
2419 $tableName .= "_" . md5(uniqid('', TRUE));
2420 }
2421 }
2422 return $tableName;
2423 }
2424
2425 /**
2426 * @param bool $view
2427 * @param bool $trigger
2428 *
2429 * @return bool
2430 */
2431 public static function checkTriggerViewPermission($view = TRUE, $trigger = TRUE) {
2432 if (\Civi::settings()->get('logging_no_trigger_permission')) {
2433 return TRUE;
2434 }
2435 // test for create view and trigger permissions and if allowed, add the option to go multilingual and logging
2436 $dao = new CRM_Core_DAO();
2437 try {
2438 if ($view) {
2439 $dao->query('CREATE OR REPLACE VIEW civicrm_domain_view AS SELECT * FROM civicrm_domain');
2440 $dao->query('DROP VIEW IF EXISTS civicrm_domain_view');
2441 }
2442
2443 if ($trigger) {
2444 $dao->query('CREATE TRIGGER civicrm_domain_trigger BEFORE INSERT ON civicrm_domain FOR EACH ROW BEGIN END');
2445 $dao->query('DROP TRIGGER IF EXISTS civicrm_domain_trigger');
2446 }
2447 }
2448 catch (Exception $e) {
2449 return FALSE;
2450 }
2451
2452 return TRUE;
2453 }
2454
2455 /**
2456 * @param null $message
2457 * @param bool $printDAO
2458 */
2459 public static function debugPrint($message = NULL, $printDAO = TRUE) {
2460 CRM_Utils_System::xMemory("{$message}: ");
2461
2462 if ($printDAO) {
2463 global $_DB_DATAOBJECT;
2464 $q = [];
2465 foreach (array_keys($_DB_DATAOBJECT['RESULTS']) as $id) {
2466 $q[] = $_DB_DATAOBJECT['RESULTS'][$id]->query;
2467 }
2468 CRM_Core_Error::debug('_DB_DATAOBJECT', $q);
2469 }
2470 }
2471
2472 /**
2473 * Build a list of triggers via hook and add them to (err, reconcile them
2474 * with) the database.
2475 *
2476 * @param string $tableName
2477 * the specific table requiring a rebuild; or NULL to rebuild all tables.
2478 * @param bool $force
2479 * @deprecated
2480 *
2481 * @see CRM-9716
2482 */
2483 public static function triggerRebuild($tableName = NULL, $force = FALSE) {
2484 Civi::service('sql_triggers')->rebuild($tableName, $force);
2485 }
2486
2487 /**
2488 * Wrapper function to drop triggers.
2489 *
2490 * @param string $tableName
2491 * the specific table requiring a rebuild; or NULL to rebuild all tables.
2492 * @deprecated
2493 */
2494 public static function dropTriggers($tableName = NULL) {
2495 Civi::service('sql_triggers')->dropTriggers($tableName);
2496 }
2497
2498 /**
2499 * @param array $info
2500 * per hook_civicrm_triggerInfo.
2501 * @param string $onlyTableName
2502 * the specific table requiring a rebuild; or NULL to rebuild all tables.
2503 * @deprecated
2504 */
2505 public static function createTriggers(&$info, $onlyTableName = NULL) {
2506 Civi::service('sql_triggers')->createTriggers($info, $onlyTableName);
2507 }
2508
2509 /**
2510 * Given a list of fields, create a list of references.
2511 *
2512 * @param string $className
2513 * BAO/DAO class name.
2514 * @return array<CRM_Core_Reference_Interface>
2515 */
2516 public static function createReferenceColumns($className) {
2517 $result = [];
2518 $fields = $className::fields();
2519 foreach ($fields as $field) {
2520 if (isset($field['pseudoconstant'], $field['pseudoconstant']['optionGroupName'])) {
2521 $result[] = new CRM_Core_Reference_OptionValue(
2522 $className::getTableName(),
2523 $field['name'],
2524 'civicrm_option_value',
2525 CRM_Utils_Array::value('keyColumn', $field['pseudoconstant'], 'value'),
2526 $field['pseudoconstant']['optionGroupName']
2527 );
2528 }
2529 }
2530 return $result;
2531 }
2532
2533 /**
2534 * Find all records which refer to this entity.
2535 *
2536 * @return CRM_Core_DAO[]
2537 */
2538 public function findReferences() {
2539 $links = self::getReferencesToTable(static::getTableName());
2540
2541 $occurrences = [];
2542 foreach ($links as $refSpec) {
2543 /** @var $refSpec CRM_Core_Reference_Interface */
2544 $daoName = CRM_Core_DAO_AllCoreTables::getClassForTable($refSpec->getReferenceTable());
2545 $result = $refSpec->findReferences($this);
2546 if ($result) {
2547 while ($result->fetch()) {
2548 $obj = new $daoName();
2549 $obj->id = $result->id;
2550 $occurrences[] = $obj;
2551 }
2552 }
2553 }
2554
2555 return $occurrences;
2556 }
2557
2558 /**
2559 * @return array{name: string, type: string, count: int, table: string|null, key: string|null}[]
2560 * each item has keys:
2561 * - name: string
2562 * - type: string
2563 * - count: int
2564 * - table: string|null SQL table name
2565 * - key: string|null SQL column name
2566 */
2567 public function getReferenceCounts() {
2568 $links = self::getReferencesToTable(static::getTableName());
2569
2570 $counts = [];
2571 foreach ($links as $refSpec) {
2572 /** @var $refSpec CRM_Core_Reference_Interface */
2573 $count = $refSpec->getReferenceCount($this);
2574 if (!empty($count['count'])) {
2575 $counts[] = $count;
2576 }
2577 }
2578
2579 foreach (CRM_Core_Component::getEnabledComponents() as $component) {
2580 /** @var $component CRM_Core_Component_Info */
2581 $counts = array_merge($counts, $component->getReferenceCounts($this));
2582 }
2583 CRM_Utils_Hook::referenceCounts($this, $counts);
2584
2585 return $counts;
2586 }
2587
2588 /**
2589 * List all tables which have hard foreign keys to this table.
2590 *
2591 * For now, this returns a description of every entity_id/entity_table
2592 * reference.
2593 * TODO: filter dynamic entity references on the $tableName, based on
2594 * schema metadata in dynamicForeignKey which enumerates a restricted
2595 * set of possible entity_table's.
2596 *
2597 * @param string $tableName
2598 * Table referred to.
2599 *
2600 * @return CRM_Core_Reference_Interface[]
2601 * structure of table and column, listing every table with a
2602 * foreign key reference to $tableName, and the column where the key appears.
2603 */
2604 public static function getReferencesToTable($tableName) {
2605 $refsFound = [];
2606 foreach (CRM_Core_DAO_AllCoreTables::getClasses() as $daoClassName) {
2607 $links = $daoClassName::getReferenceColumns();
2608
2609 foreach ($links as $refSpec) {
2610 /** @var $refSpec CRM_Core_Reference_Interface */
2611 if ($refSpec->matchesTargetTable($tableName)) {
2612 $refsFound[] = $refSpec;
2613 }
2614 }
2615 }
2616 return $refsFound;
2617 }
2618
2619 /**
2620 * Get all references to contact table.
2621 *
2622 * This includes core tables, custom group tables, tables added by the merge
2623 * hook and the entity_tag table.
2624 *
2625 * Refer to CRM-17454 for information on the danger of querying the information
2626 * schema to derive this.
2627 *
2628 * @throws \CiviCRM_API3_Exception
2629 */
2630 public static function getReferencesToContactTable() {
2631 if (isset(\Civi::$statics[__CLASS__]) && isset(\Civi::$statics[__CLASS__]['contact_references'])) {
2632 return \Civi::$statics[__CLASS__]['contact_references'];
2633 }
2634 $contactReferences = [];
2635 $coreReferences = CRM_Core_DAO::getReferencesToTable('civicrm_contact');
2636 foreach ($coreReferences as $coreReference) {
2637 if (
2638 // Exclude option values
2639 !is_a($coreReference, 'CRM_Core_Reference_Dynamic') &&
2640 // Exclude references to other columns
2641 $coreReference->getTargetKey() === 'id'
2642 ) {
2643 $contactReferences[$coreReference->getReferenceTable()][] = $coreReference->getReferenceKey();
2644 }
2645 }
2646 self::appendCustomTablesExtendingContacts($contactReferences);
2647 self::appendCustomContactReferenceFields($contactReferences);
2648 \Civi::$statics[__CLASS__]['contact_references'] = $contactReferences;
2649 return \Civi::$statics[__CLASS__]['contact_references'];
2650 }
2651
2652 /**
2653 * Get all dynamic references to the given table.
2654 *
2655 * @param string $tableName
2656 *
2657 * @return array
2658 */
2659 public static function getDynamicReferencesToTable($tableName) {
2660 if (!isset(\Civi::$statics[__CLASS__]['contact_references_dynamic'][$tableName])) {
2661 \Civi::$statics[__CLASS__]['contact_references_dynamic'][$tableName] = [];
2662 $coreReferences = CRM_Core_DAO::getReferencesToTable($tableName);
2663 foreach ($coreReferences as $coreReference) {
2664 if ($coreReference instanceof \CRM_Core_Reference_Dynamic) {
2665 \Civi::$statics[__CLASS__]['contact_references_dynamic'][$tableName][$coreReference->getReferenceTable()][] = [$coreReference->getReferenceKey(), $coreReference->getTypeColumn()];
2666 }
2667 }
2668 }
2669 return \Civi::$statics[__CLASS__]['contact_references_dynamic'][$tableName];
2670 }
2671
2672 /**
2673 * Add custom tables that extend contacts to the list of contact references.
2674 *
2675 * CRM_Core_BAO_CustomGroup::getAllCustomGroupsByBaseEntity seems like a safe-ish
2676 * function to be sure all are retrieved & we don't miss subtypes or inactive or multiples
2677 * - the down side is it is not cached.
2678 *
2679 * Further changes should be include tests in the CRM_Core_MergerTest class
2680 * to ensure that disabled, subtype, multiple etc groups are still captured.
2681 *
2682 * @param array $cidRefs
2683 */
2684 public static function appendCustomTablesExtendingContacts(&$cidRefs) {
2685 $customValueTables = CRM_Core_BAO_CustomGroup::getAllCustomGroupsByBaseEntity('Contact');
2686 $customValueTables->find();
2687 while ($customValueTables->fetch()) {
2688 $cidRefs[$customValueTables->table_name][] = 'entity_id';
2689 }
2690 }
2691
2692 /**
2693 * Add custom ContactReference fields to the list of contact references
2694 *
2695 * This includes active and inactive fields/groups
2696 *
2697 * @param array $cidRefs
2698 *
2699 * @throws \CiviCRM_API3_Exception
2700 */
2701 public static function appendCustomContactReferenceFields(&$cidRefs) {
2702 $fields = civicrm_api3('CustomField', 'get', [
2703 'return' => ['column_name', 'custom_group_id.table_name'],
2704 'data_type' => 'ContactReference',
2705 'options' => ['limit' => 0],
2706 ])['values'];
2707 foreach ($fields as $field) {
2708 $cidRefs[$field['custom_group_id.table_name']][] = $field['column_name'];
2709 }
2710 }
2711
2712 /**
2713 * Lookup the value of a MySQL global configuration variable.
2714 *
2715 * @param string $name
2716 * E.g. "thread_stack".
2717 * @param mixed $default
2718 * @return mixed
2719 */
2720 public static function getGlobalSetting($name, $default = NULL) {
2721 // Alternatively, SELECT @@GLOBAL.thread_stack, but
2722 // that has been reported to fail under MySQL 5.0 for OS X
2723 $escapedName = self::escapeString($name);
2724 $dao = CRM_Core_DAO::executeQuery("SHOW VARIABLES LIKE '$escapedName'");
2725 if ($dao->fetch()) {
2726 return $dao->Value;
2727 }
2728 else {
2729 return $default;
2730 }
2731 }
2732
2733 /**
2734 * Update the fields array to also hold keys for pseudoconstant fields that relate to contained fields.
2735 *
2736 * This is relevant where we want to offer both the ID field and the label field
2737 * as an option, e.g. search builder.
2738 *
2739 * It is currently limited for optionGroupName & id+ name+ FK combos for purposes keeping the scope of the
2740 * change small, but is appropriate for other sorts of pseudoconstants.
2741 *
2742 * @param array $fields
2743 */
2744 public static function appendPseudoConstantsToFields(&$fields) {
2745 foreach ($fields as $fieldUniqueName => $field) {
2746 if (!empty($field['pseudoconstant'])) {
2747 $pseudoConstant = $field['pseudoconstant'];
2748 if (!empty($pseudoConstant['optionGroupName'])) {
2749 $fields[$pseudoConstant['optionGroupName']] = [
2750 'title' => CRM_Core_BAO_OptionGroup::getTitleByName($pseudoConstant['optionGroupName']),
2751 'name' => $pseudoConstant['optionGroupName'],
2752 'data_type' => CRM_Utils_Type::T_STRING,
2753 'is_pseudofield_for' => $fieldUniqueName,
2754 ];
2755 }
2756 // We restrict to id + name + FK as we are extending this a bit, but cautiously.
2757 elseif (
2758 !empty($field['FKClassName'])
2759 && CRM_Utils_Array::value('keyColumn', $pseudoConstant) === 'id'
2760 && CRM_Utils_Array::value('labelColumn', $pseudoConstant) === 'name'
2761 ) {
2762 $pseudoFieldName = str_replace('_' . $pseudoConstant['keyColumn'], '', $field['name']);
2763 // This if is just an extra caution when adding change.
2764 if (!isset($fields[$pseudoFieldName])) {
2765 $daoName = $field['FKClassName'];
2766 $fkFields = $daoName::fields();
2767 foreach ($fkFields as $fkField) {
2768 if ($fkField['name'] === $pseudoConstant['labelColumn']) {
2769 $fields[$pseudoFieldName] = [
2770 'name' => $pseudoFieldName,
2771 'is_pseudofield_for' => $field['name'],
2772 'title' => $fkField['title'],
2773 'data_type' => $fkField['type'],
2774 'where' => $field['where'],
2775 ];
2776 }
2777 }
2778 }
2779 }
2780 }
2781 }
2782 }
2783
2784 /**
2785 * Get options for the called BAO object's field.
2786 *
2787 * This function can be overridden by each BAO to add more logic related to context.
2788 * The overriding function will generally call the lower-level CRM_Core_PseudoConstant::get
2789 *
2790 * @param string $fieldName
2791 * @param string $context
2792 * @see CRM_Core_DAO::buildOptionsContext
2793 * @param array $props
2794 * Raw field values; whatever is known about this bao object.
2795 *
2796 * Note: $props can contain unsanitized input and should not be passed directly to CRM_Core_PseudoConstant::get
2797 *
2798 * @return array|bool
2799 */
2800 public static function buildOptions($fieldName, $context = NULL, $props = []) {
2801 // If a given bao does not override this function
2802 $baoName = get_called_class();
2803 return CRM_Core_PseudoConstant::get($baoName, $fieldName, [], $context);
2804 }
2805
2806 /**
2807 * Populate option labels for this object's fields.
2808 *
2809 * @throws exception if called directly on the base class
2810 */
2811 public function getOptionLabels() {
2812 $fields = $this->fields();
2813 if ($fields === NULL) {
2814 throw new Exception('Cannot call getOptionLabels on CRM_Core_DAO');
2815 }
2816 foreach ($fields as $field) {
2817 $name = $field['name'] ?? NULL;
2818 if ($name && isset($this->$name)) {
2819 $label = CRM_Core_PseudoConstant::getLabel(get_class($this), $name, $this->$name);
2820 if ($label !== FALSE) {
2821 // Append 'label' onto the field name
2822 $labelName = $name . '_label';
2823 $this->$labelName = $label;
2824 }
2825 }
2826 }
2827 }
2828
2829 /**
2830 * Provides documentation and validation for the buildOptions $context param
2831 *
2832 * @param string $context
2833 *
2834 * @throws CRM_Core_Exception
2835 * @return array
2836 */
2837 public static function buildOptionsContext($context = NULL) {
2838 $contexts = [
2839 'get' => "get: all options are returned, even if they are disabled; labels are translated.",
2840 'create' => "create: options are filtered appropriately for the object being created/updated; labels are translated.",
2841 'search' => "search: searchable options are returned; labels are translated.",
2842 'validate' => "validate: all options are returned, even if they are disabled; machine names are used in place of labels.",
2843 'abbreviate' => "abbreviate: enabled options are returned; labels are replaced with abbreviations.",
2844 'match' => "match: enabled options are returned using machine names as keys; labels are translated.",
2845 ];
2846 // Validation: enforce uniformity of this param
2847 if ($context !== NULL && !isset($contexts[$context])) {
2848 throw new CRM_Core_Exception("'$context' is not a valid context for buildOptions.");
2849 }
2850 return $contexts;
2851 }
2852
2853 /**
2854 * @param string $fieldName
2855 * @return bool|array
2856 */
2857 public function getFieldSpec($fieldName) {
2858 $fields = $this->fields();
2859
2860 // Support "unique names" as well as sql names
2861 $fieldKey = $fieldName;
2862 if (empty($fields[$fieldKey])) {
2863 $fieldKeys = $this->fieldKeys();
2864 $fieldKey = $fieldKeys[$fieldName] ?? NULL;
2865 }
2866 // If neither worked then this field doesn't exist. Return false.
2867 if (empty($fields[$fieldKey])) {
2868 return FALSE;
2869 }
2870 return $fields[$fieldKey];
2871 }
2872
2873 /**
2874 * Get SQL where clause for SQL filter syntax input parameters.
2875 *
2876 * SQL version of api function to assign filters to the DAO based on the syntax
2877 * $field => array('IN' => array(4,6,9))
2878 * OR
2879 * $field => array('LIKE' => array('%me%))
2880 * etc
2881 *
2882 * @param string $fieldName
2883 * Name of fields.
2884 * @param array $filter
2885 * filter to be applied indexed by operator.
2886 * @param string $type
2887 * type of field (not actually used - nor in api @todo ).
2888 * @param string $alias
2889 * alternative field name ('as') @todo- not actually used.
2890 * @param bool $returnSanitisedArray
2891 * Return a sanitised array instead of a clause.
2892 * this is primarily so we can add filters @ the api level to the Query object based fields
2893 *
2894 * @throws Exception
2895 *
2896 * @return NULL|string|array
2897 * a string is returned if $returnSanitisedArray is not set, otherwise and Array or NULL
2898 * depending on whether it is supported as yet
2899 */
2900 public static function createSQLFilter($fieldName, $filter, $type = NULL, $alias = NULL, $returnSanitisedArray = FALSE) {
2901 foreach ($filter as $operator => $criteria) {
2902 $emojiFilter = CRM_Utils_SQL::handleEmojiInQuery($criteria);
2903 if ($emojiFilter === '0 = 1') {
2904 return $emojiFilter;
2905 }
2906
2907 if (in_array($operator, self::acceptedSQLOperators(), TRUE)) {
2908 switch ($operator) {
2909 // unary operators
2910 case 'IS NULL':
2911 case 'IS NOT NULL':
2912 if (!$returnSanitisedArray) {
2913 return (sprintf('%s %s', $fieldName, $operator));
2914 }
2915 else {
2916 return (sprintf('%s %s ', $fieldName, $operator));
2917 }
2918 break;
2919
2920 // ternary operators
2921 case 'BETWEEN':
2922 case 'NOT BETWEEN':
2923 if ((empty($criteria[0]) && !in_array($criteria[0], ['0', 0]))|| (empty($criteria[1]) && !in_array($criteria[1], ['0', 0]))) {
2924 throw new Exception("invalid criteria for $operator");
2925 }
2926 if (!$returnSanitisedArray) {
2927 return (sprintf('%s ' . $operator . ' "%s" AND "%s"', $fieldName, CRM_Core_DAO::escapeString($criteria[0]), CRM_Core_DAO::escapeString($criteria[1])));
2928 }
2929 else {
2930 // not yet implemented (tests required to implement)
2931 return NULL;
2932 }
2933 break;
2934
2935 // n-ary operators
2936 case 'IN':
2937 case 'NOT IN':
2938 if (empty($criteria)) {
2939 throw new Exception("invalid criteria for $operator");
2940 }
2941 $escapedCriteria = array_map([
2942 'CRM_Core_DAO',
2943 'escapeString',
2944 ], $criteria);
2945 if (!$returnSanitisedArray) {
2946 return (sprintf('%s %s ("%s")', $fieldName, $operator, implode('", "', $escapedCriteria)));
2947 }
2948 return $escapedCriteria;
2949
2950 // binary operators
2951
2952 default:
2953 if (!$returnSanitisedArray) {
2954 return (sprintf('%s %s "%s"', $fieldName, $operator, CRM_Core_DAO::escapeString($criteria)));
2955 }
2956 else {
2957 // not yet implemented (tests required to implement)
2958 return NULL;
2959 }
2960 }
2961 }
2962 }
2963 }
2964
2965 /**
2966 * @see http://issues.civicrm.org/jira/browse/CRM-9150
2967 * support for other syntaxes is discussed in ticket but being put off for now
2968 * @return string[]
2969 */
2970 public static function acceptedSQLOperators() {
2971 return [
2972 '=',
2973 '<=',
2974 '>=',
2975 '>',
2976 '<',
2977 'LIKE',
2978 "<>",
2979 "!=",
2980 "NOT LIKE",
2981 'IN',
2982 'NOT IN',
2983 'BETWEEN',
2984 'NOT BETWEEN',
2985 'IS NOT NULL',
2986 'IS NULL',
2987 ];
2988 }
2989
2990 /**
2991 * SQL has a limit of 64 characters on various names:
2992 * table name, trigger name, column name ...
2993 *
2994 * For custom groups and fields we generated names from user entered input
2995 * which can be longer than this length, this function helps with creating
2996 * strings that meet various criteria.
2997 *
2998 * @param string $string
2999 * The string to be shortened.
3000 * @param int $length
3001 * The max length of the string.
3002 *
3003 * @param bool $makeRandom
3004 *
3005 * @return string
3006 */
3007 public static function shortenSQLName($string, $length = 60, $makeRandom = FALSE) {
3008 // early return for strings that meet the requirements
3009 if (strlen($string) <= $length) {
3010 return $string;
3011 }
3012
3013 // easy return for calls that dont need a randomized uniq string
3014 if (!$makeRandom) {
3015 return substr($string, 0, $length);
3016 }
3017
3018 // the string is longer than the length and we need a uniq string
3019 // for the same tablename we need the same uniq string every time
3020 // hence we use md5 on the string, which is not random
3021 // we'll append 8 characters to the end of the tableName
3022 $md5string = substr(md5($string), 0, 8);
3023 return substr($string, 0, $length - 8) . "_{$md5string}";
3024 }
3025
3026 /**
3027 * https://issues.civicrm.org/jira/browse/CRM-17748
3028 * Sets the internal options to be used on a query
3029 *
3030 * @param array $options
3031 *
3032 */
3033 public function setOptions($options) {
3034 if (is_array($options)) {
3035 $this->_options = $options;
3036 }
3037 }
3038
3039 /**
3040 * https://issues.civicrm.org/jira/browse/CRM-17748
3041 * wrapper to pass internal DAO options down to DB_mysql/DB_Common level
3042 *
3043 * @param array $options
3044 *
3045 */
3046 protected function _setDBOptions($options) {
3047 global $_DB_DATAOBJECT;
3048
3049 if (is_array($options) && count($options)) {
3050 $conn = &$_DB_DATAOBJECT['CONNECTIONS'][$this->_database_dsn_md5];
3051 foreach ($options as $option_name => $option_value) {
3052 $conn->setOption($option_name, $option_value);
3053 }
3054 }
3055 }
3056
3057 /**
3058 * @deprecated
3059 * @param array $params
3060 */
3061 public function setApiFilter(&$params) {
3062 }
3063
3064 /**
3065 * Generates acl clauses suitable for adding to WHERE or ON when doing an api.get for this entity
3066 *
3067 * Return format is in the form of fieldname => clauses starting with an operator. e.g.:
3068 * ```
3069 * array(
3070 * 'location_type_id' => array('IS NOT NULL', 'IN (1,2,3)')
3071 * )
3072 * ```
3073 *
3074 * Note that all array keys must be actual field names in this entity. Use subqueries to filter on other tables e.g. custom values.
3075 *
3076 * @return array
3077 */
3078 public function addSelectWhereClause() {
3079 $clauses = [];
3080 $fields = $this->fields();
3081 foreach ($fields as $fieldName => $field) {
3082 // Clause for contact-related entities like Email, Relationship, etc.
3083 if (strpos($fieldName, 'contact_id') === 0 && CRM_Utils_Array::value('FKClassName', $field) == 'CRM_Contact_DAO_Contact') {
3084 $clauses[$fieldName] = CRM_Utils_SQL::mergeSubquery('Contact');
3085 }
3086 // Clause for an entity_table/entity_id combo
3087 if ($fieldName === 'entity_id' && isset($fields['entity_table'])) {
3088 $relatedClauses = [];
3089 $relatedEntities = $this->buildOptions('entity_table', 'get');
3090 foreach ((array) $relatedEntities as $table => $ent) {
3091 if (!empty($ent)) {
3092 $ent = CRM_Core_DAO_AllCoreTables::getEntityNameForTable($table);
3093 $subquery = CRM_Utils_SQL::mergeSubquery($ent);
3094 if ($subquery) {
3095 $relatedClauses[] = "(entity_table = '$table' AND entity_id " . implode(' AND entity_id ', $subquery) . ")";
3096 }
3097 else {
3098 $relatedClauses[] = "(entity_table = '$table')";
3099 }
3100 }
3101 }
3102 if ($relatedClauses) {
3103 $clauses['id'] = 'IN (SELECT id FROM `' . $this->tableName() . '` WHERE (' . implode(') OR (', $relatedClauses) . '))';
3104 }
3105 }
3106 }
3107 CRM_Utils_Hook::selectWhereClause($this, $clauses);
3108 return $clauses;
3109 }
3110
3111 /**
3112 * This returns the final permissioned query string for this entity
3113 *
3114 * With acls from related entities + additional clauses from hook_civicrm_selectWhereClause
3115 *
3116 * @param string $tableAlias
3117 * @return array
3118 */
3119 public static function getSelectWhereClause($tableAlias = NULL) {
3120 $bao = new static();
3121 if ($tableAlias === NULL) {
3122 $tableAlias = $bao->tableName();
3123 }
3124 $clauses = [];
3125 foreach ((array) $bao->addSelectWhereClause() as $field => $vals) {
3126 $clauses[$field] = NULL;
3127 if ($vals) {
3128 $clauses[$field] = "(`$tableAlias`.`$field` IS NULL OR (`$tableAlias`.`$field` " . implode(" AND `$tableAlias`.`$field` ", (array) $vals) . '))';
3129 }
3130 }
3131 return $clauses;
3132 }
3133
3134 /**
3135 * ensure database name is 'safe', i.e. only contains word characters (includes underscores)
3136 * and dashes, and contains at least one [a-z] case insensitive.
3137 *
3138 * @param $database
3139 *
3140 * @return bool
3141 */
3142 public static function requireSafeDBName($database) {
3143 $matches = [];
3144 preg_match(
3145 "/^[\w\-]*[a-z]+[\w\-]*$/i",
3146 $database,
3147 $matches
3148 );
3149 if (empty($matches)) {
3150 return FALSE;
3151 }
3152 return TRUE;
3153 }
3154
3155 /**
3156 * Transform an array to a serialized string for database storage.
3157 *
3158 * @param array|null $value
3159 * @param int $serializationType
3160 * @return string|null
3161 *
3162 * @throws \Exception
3163 */
3164 public static function serializeField($value, $serializationType) {
3165 if ($value === NULL) {
3166 return NULL;
3167 }
3168 switch ($serializationType) {
3169 case self::SERIALIZE_SEPARATOR_BOOKEND:
3170 return $value === [] ? '' : CRM_Utils_Array::implodePadded($value);
3171
3172 case self::SERIALIZE_SEPARATOR_TRIMMED:
3173 return is_array($value) ? implode(self::VALUE_SEPARATOR, $value) : $value;
3174
3175 case self::SERIALIZE_JSON:
3176 return is_array($value) ? json_encode($value) : $value;
3177
3178 case self::SERIALIZE_PHP:
3179 return is_array($value) ? serialize($value) : $value;
3180
3181 case self::SERIALIZE_COMMA:
3182 return is_array($value) ? implode(',', $value) : $value;
3183
3184 default:
3185 throw new Exception('Unknown serialization method for field.');
3186 }
3187 }
3188
3189 /**
3190 * Transform a serialized string from the database into an array.
3191 *
3192 * @param string|null $value
3193 * @param $serializationType
3194 *
3195 * @return array|null
3196 * @throws CRM_Core_Exception
3197 */
3198 public static function unSerializeField($value, $serializationType) {
3199 if ($value === NULL) {
3200 return NULL;
3201 }
3202 if ($value === '') {
3203 return [];
3204 }
3205 switch ($serializationType) {
3206 case self::SERIALIZE_SEPARATOR_BOOKEND:
3207 return (array) CRM_Utils_Array::explodePadded($value);
3208
3209 case self::SERIALIZE_SEPARATOR_TRIMMED:
3210 return explode(self::VALUE_SEPARATOR, trim($value));
3211
3212 case self::SERIALIZE_JSON:
3213 return strlen($value) ? json_decode($value, TRUE) : [];
3214
3215 case self::SERIALIZE_PHP:
3216 return strlen($value) ? CRM_Utils_String::unserialize($value) : [];
3217
3218 case self::SERIALIZE_COMMA:
3219 return explode(',', trim(str_replace(', ', '', $value)));
3220
3221 default:
3222 throw new CRM_Core_Exception('Unknown serialization method for field.');
3223 }
3224 }
3225
3226 /**
3227 * @return array
3228 */
3229 public static function getEntityRefFilters() {
3230 return [];
3231 }
3232
3233 /**
3234 * Get exportable fields with pseudoconstants rendered as an extra field.
3235 *
3236 * @param string $baoClass
3237 *
3238 * @return array
3239 */
3240 public static function getExportableFieldsWithPseudoConstants($baoClass) {
3241 if (method_exists($baoClass, 'exportableFields')) {
3242 $fields = $baoClass::exportableFields();
3243 }
3244 else {
3245 $fields = $baoClass::export();
3246 }
3247 CRM_Core_DAO::appendPseudoConstantsToFields($fields);
3248 return $fields;
3249 }
3250
3251 /**
3252 * Remove item from static cache during update/delete operations
3253 */
3254 private function clearDbColumnValueCache() {
3255 $daoName = get_class($this);
3256 while (strpos($daoName, '_BAO_') !== FALSE) {
3257 $daoName = get_parent_class($daoName);
3258 }
3259 if (isset($this->id)) {
3260 unset(self::$_dbColumnValueCache[$daoName]['id'][$this->id]);
3261 }
3262 if (isset($this->name)) {
3263 unset(self::$_dbColumnValueCache[$daoName]['name'][$this->name]);
3264 }
3265 }
3266
3267 /**
3268 * Return a mapping from field-name to the corresponding key (as used in fields()).
3269 *
3270 * @return array
3271 * Array(string $name => string $uniqueName).
3272 */
3273 public static function fieldKeys() {
3274 return array_flip(CRM_Utils_Array::collect('name', static::fields()));
3275 }
3276
3277 /**
3278 * Returns system paths related to this entity (as defined in the xml schema)
3279 *
3280 * @return array
3281 */
3282 public static function getEntityPaths() {
3283 return static::$_paths ?? [];
3284 }
3285
3286 /**
3287 * When creating a record without a supplied name,
3288 * create a unique, clean name derived from the label.
3289 *
3290 * Note: this function does nothing unless a unique index exists for "name" column.
3291 */
3292 private function makeNameFromLabel() {
3293 $indexNameWith = NULL;
3294 // Look for a unique index which includes the "name" field
3295 if (method_exists($this, 'indices')) {
3296 foreach ($this->indices(FALSE) as $index) {
3297 if (!empty($index['unique']) && in_array('name', $index['field'], TRUE)) {
3298 $indexNameWith = $index['field'];
3299 }
3300 }
3301 }
3302 if (!$indexNameWith) {
3303 // No unique index on "name", do nothing
3304 return;
3305 }
3306 $name = CRM_Utils_String::munge($this->label, '_', 252);
3307
3308 // Find existing records with the same name
3309 $sql = new CRM_Utils_SQL_Select($this::getTableName());
3310 $sql->select(['id', 'name']);
3311 $sql->where('name LIKE @name', ['@name' => $name . '%']);
3312 // Include all fields that are part of the index
3313 foreach (array_diff($indexNameWith, ['name']) as $field) {
3314 $sql->where("`$field` = @val", ['@val' => $this->$field]);
3315 }
3316 $query = $sql->toSQL();
3317 $existing = self::executeQuery($query)->fetchMap('id', 'name');
3318 $dupes = 0;
3319 $suffix = '';
3320 while (in_array($name . $suffix, $existing)) {
3321 $suffix = '_' . (++$dupes);
3322 }
3323 $this->name = $name . $suffix;
3324 }
3325
3326 }