CRM/Contact/Import/Parser.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  *
  14  * @package CRM
  15  * @copyright CiviCRM LLC https://civicrm.org/licensing
  16  */
  17 abstract class CRM_Contact_Import_Parser extends CRM_Import_Parser {
  18
  19   protected $_tableName;
  20
  21   /**
  22    * Total number of lines in file
  23    *
  24    * @var int
  25    */
  26   protected $_rowCount;
  27
  28   /**
  29    * Running total number of un-matched Contacts.
  30    *
  31    * @var int
  32    */
  33   protected $_unMatchCount;
  34
  35   /**
  36    * Array of unmatched lines.
  37    *
  38    * @var array
  39    */
  40   protected $_unMatch;
  41
  42   /**
  43    * Total number of contacts with unparsed addresses
  44    * @var int
  45    */
  46   protected $_unparsedAddressCount;
  47
  48   /**
  49    * Filename of mismatch data
  50    *
  51    * @var string
  52    */
  53   protected $_misMatchFilemName;
  54
  55   protected $_primaryKeyName;
  56   protected $_statusFieldName;
  57
  58   protected $fieldMetadata = [];
  59   /**
  60    * On duplicate
  61    *
  62    * @var int
  63    */
  64   public $_onDuplicate;
  65
  66   /**
  67    * Dedupe rule group id to use if set
  68    *
  69    * @var int
  70    */
  71   public $_dedupeRuleGroupID = NULL;
  72
  73   /**
  74    * Run import.
  75    *
  76    * @param string $tableName
  77    * @param array $mapper
  78    * @param int $mode
  79    * @param int $contactType
  80    * @param string $primaryKeyName
  81    * @param string $statusFieldName
  82    * @param int $onDuplicate
  83    * @param int $statusID
  84    * @param int $totalRowCount
  85    * @param bool $doGeocodeAddress
  86    * @param int $timeout
  87    * @param string $contactSubType
  88    * @param int $dedupeRuleGroupID
  89    *
  90    * @return mixed
  91    */
  92   public function run(
  93     $tableName,
  94     $mapper = [],
  95     $mode = self::MODE_PREVIEW,
  96     $contactType = self::CONTACT_INDIVIDUAL,
  97     $primaryKeyName = '_id',
  98     $statusFieldName = '_status',
  99     $onDuplicate = self::DUPLICATE_SKIP,
 100     $statusID = NULL,
 101     $totalRowCount = NULL,
 102     $doGeocodeAddress = FALSE,
 103     $timeout = CRM_Contact_Import_Parser::DEFAULT_TIMEOUT,
 104     $contactSubType = NULL,
 105     $dedupeRuleGroupID = NULL
 106   ) {
 107
 108     // TODO: Make the timeout actually work
 109     $this->_onDuplicate = $onDuplicate;
 110     $this->_dedupeRuleGroupID = $dedupeRuleGroupID;
 111
 112     switch ($contactType) {
 113       case CRM_Import_Parser::CONTACT_INDIVIDUAL:
 114         $this->_contactType = 'Individual';
 115         break;
 116
 117       case CRM_Import_Parser::CONTACT_HOUSEHOLD:
 118         $this->_contactType = 'Household';
 119         break;
 120
 121       case CRM_Import_Parser::CONTACT_ORGANIZATION:
 122         $this->_contactType = 'Organization';
 123     }
 124
 125     $this->_contactSubType = $contactSubType;
 126
 127     $this->init();
 128
 129     $this->_rowCount = $this->_warningCount = 0;
 130     $this->_invalidRowCount = $this->_validCount = 0;
 131     $this->_totalCount = $this->_conflictCount = 0;
 132
 133     $this->_errors = [];
 134     $this->_warnings = [];
 135     $this->_conflicts = [];
 136     $this->_unparsedAddresses = [];
 137
 138     $this->_tableName = $tableName;
 139     $this->_primaryKeyName = $primaryKeyName;
 140     $this->_statusFieldName = $statusFieldName;
 141
 142     if ($mode == self::MODE_MAPFIELD) {
 143       $this->_rows = [];
 144     }
 145     else {
 146       $this->_activeFieldCount = count($this->_activeFields);
 147     }
 148
 149     if ($mode == self::MODE_IMPORT) {
 150       //get the key of email field
 151       foreach ($mapper as $key => $value) {
 152         if (strtolower($value) == 'email') {
 153           $emailKey = $key;
 154           break;
 155         }
 156       }
 157     }
 158
 159     if ($statusID) {
 160       $this->progressImport($statusID);
 161       $startTimestamp = $currTimestamp = $prevTimestamp = time();
 162     }
 163     // get the contents of the temp. import table
 164     $query = "SELECT * FROM $tableName";
 165     if ($mode == self::MODE_IMPORT) {
 166       $query .= " WHERE $statusFieldName = 'NEW'";
 167     }
 168
 169     $result = CRM_Core_DAO::executeQuery($query);
 170
 171     while ($result->fetch()) {
 172       $values = array_values($result->toArray());
 173       $this->_rowCount++;
 174
 175       /* trim whitespace around the values */
 176       foreach ($values as $k => $v) {
 177         $values[$k] = trim($v, " \t\r\n");
 178       }
 179       if (CRM_Utils_System::isNull($values)) {
 180         continue;
 181       }
 182
 183       $this->_totalCount++;
 184
 185       if ($mode == self::MODE_MAPFIELD) {
 186         $returnCode = $this->mapField($values);
 187       }
 188       elseif ($mode == self::MODE_PREVIEW) {
 189         $returnCode = $this->preview($values);
 190       }
 191       elseif ($mode == self::MODE_SUMMARY) {
 192         $returnCode = $this->summary($values);
 193       }
 194       elseif ($mode == self::MODE_IMPORT) {
 195         //print "Running parser in import mode<br/>\n";
 196         $returnCode = $this->import($onDuplicate, $values, $doGeocodeAddress);
 197         if ($statusID && (($this->_rowCount % 50) == 0)) {
 198           $prevTimestamp = $this->progressImport($statusID, FALSE, $startTimestamp, $prevTimestamp, $totalRowCount);
 199         }
 200       }
 201       else {
 202         $returnCode = self::ERROR;
 203       }
 204
 205       // note that a line could be valid but still produce a warning
 206       if ($returnCode & self::VALID) {
 207         $this->_validCount++;
 208         if ($mode == self::MODE_MAPFIELD) {
 209           $this->_rows[] = $values;
 210           $this->_activeFieldCount = max($this->_activeFieldCount, count($values));
 211         }
 212       }
 213
 214       if ($returnCode & self::WARNING) {
 215         $this->_warningCount++;
 216         if ($this->_warningCount < $this->_maxWarningCount) {
 217           $this->_warningCount[] = $line;
 218         }
 219       }
 220
 221       if ($returnCode & self::ERROR) {
 222         $this->_invalidRowCount++;
 223         array_unshift($values, $this->_rowCount);
 224         $this->_errors[] = $values;
 225       }
 226
 227       if ($returnCode & self::CONFLICT) {
 228         $this->_conflictCount++;
 229         array_unshift($values, $this->_rowCount);
 230         $this->_conflicts[] = $values;
 231       }
 232
 233       if ($returnCode & self::NO_MATCH) {
 234         $this->_unMatchCount++;
 235         array_unshift($values, $this->_rowCount);
 236         $this->_unMatch[] = $values;
 237       }
 238
 239       if ($returnCode & self::DUPLICATE) {
 240         if ($returnCode & self::MULTIPLE_DUPE) {
 241           /* TODO: multi-dupes should be counted apart from singles
 242            * on non-skip action */
 243         }
 244         $this->_duplicateCount++;
 245         array_unshift($values, $this->_rowCount);
 246         $this->_duplicates[] = $values;
 247         if ($onDuplicate != self::DUPLICATE_SKIP) {
 248           $this->_validCount++;
 249         }
 250       }
 251
 252       if ($returnCode & self::UNPARSED_ADDRESS_WARNING) {
 253         $this->_unparsedAddressCount++;
 254         array_unshift($values, $this->_rowCount);
 255         $this->_unparsedAddresses[] = $values;
 256       }
 257       // we give the derived class a way of aborting the process
 258       // note that the return code could be multiple code or'ed together
 259       if ($returnCode & self::STOP) {
 260         break;
 261       }
 262
 263       // if we are done processing the maxNumber of lines, break
 264       if ($this->_maxLinesToProcess > 0 && $this->_validCount >= $this->_maxLinesToProcess) {
 265         break;
 266       }
 267
 268       // see if we've hit our timeout yet
 269       /* if ( $the_thing_with_the_stuff ) {
 270       do_something( );
 271       } */
 272     }
 273
 274     if ($mode == self::MODE_PREVIEW || $mode == self::MODE_IMPORT) {
 275       $customHeaders = $mapper;
 276
 277       $customfields = CRM_Core_BAO_CustomField::getFields($this->_contactType);
 278       foreach ($customHeaders as $key => $value) {
 279         if ($id = CRM_Core_BAO_CustomField::getKeyID($value)) {
 280           $customHeaders[$key] = $customfields[$id][0];
 281         }
 282       }
 283
 284       if ($this->_invalidRowCount) {
 285         // removed view url for invlaid contacts
 286         $headers = array_merge([
 287           ts('Line Number'),
 288           ts('Reason'),
 289         ], $customHeaders);
 290         $this->_errorFileName = self::errorFileName(self::ERROR);
 291         self::exportCSV($this->_errorFileName, $headers, $this->_errors);
 292       }
 293       if ($this->_conflictCount) {
 294         $headers = array_merge([
 295           ts('Line Number'),
 296           ts('Reason'),
 297         ], $customHeaders);
 298         $this->_conflictFileName = self::errorFileName(self::CONFLICT);
 299         self::exportCSV($this->_conflictFileName, $headers, $this->_conflicts);
 300       }
 301       if ($this->_duplicateCount) {
 302         $headers = array_merge([
 303           ts('Line Number'),
 304           ts('View Contact URL'),
 305         ], $customHeaders);
 306
 307         $this->_duplicateFileName = self::errorFileName(self::DUPLICATE);
 308         self::exportCSV($this->_duplicateFileName, $headers, $this->_duplicates);
 309       }
 310       if ($this->_unMatchCount) {
 311         $headers = array_merge([
 312           ts('Line Number'),
 313           ts('Reason'),
 314         ], $customHeaders);
 315
 316         $this->_misMatchFilemName = self::errorFileName(self::NO_MATCH);
 317         self::exportCSV($this->_misMatchFilemName, $headers, $this->_unMatch);
 318       }
 319       if ($this->_unparsedAddressCount) {
 320         $headers = array_merge([
 321           ts('Line Number'),
 322           ts('Contact Edit URL'),
 323         ], $customHeaders);
 324         $this->_errorFileName = self::errorFileName(self::UNPARSED_ADDRESS_WARNING);
 325         self::exportCSV($this->_errorFileName, $headers, $this->_unparsedAddresses);
 326       }
 327     }
 328     //echo "$this->_totalCount,$this->_invalidRowCount,$this->_conflictCount,$this->_duplicateCount";
 329     return $this->fini();
 330   }
 331
 332   /**
 333    * Given a list of the importable field keys that the user has selected.
 334    * set the active fields array to this list
 335    *
 336    * @param array $fieldKeys
 337    *   Mapped array of values.
 338    */
 339   public function setActiveFields($fieldKeys) {
 340     $this->_activeFieldCount = count($fieldKeys);
 341     foreach ($fieldKeys as $key) {
 342       if (empty($this->_fields[$key])) {
 343         $this->_activeFields[] = new CRM_Contact_Import_Field('', ts('- do not import -'));
 344       }
 345       else {
 346         $this->_activeFields[] = clone($this->_fields[$key]);
 347       }
 348     }
 349   }
 350
 351   /**
 352    * @param $elements
 353    */
 354   public function setActiveFieldLocationTypes($elements) {
 355     for ($i = 0; $i < count($elements); $i++) {
 356       $this->_activeFields[$i]->_hasLocationType = $elements[$i];
 357     }
 358   }
 359
 360   /**
 361    * @param $elements
 362    */
 363
 364   /**
 365    * @param $elements
 366    */
 367   public function setActiveFieldPhoneTypes($elements) {
 368     for ($i = 0; $i < count($elements); $i++) {
 369       $this->_activeFields[$i]->_phoneType = $elements[$i];
 370     }
 371   }
 372
 373   /**
 374    * @param $elements
 375    */
 376   public function setActiveFieldWebsiteTypes($elements) {
 377     for ($i = 0; $i < count($elements); $i++) {
 378       $this->_activeFields[$i]->_websiteType = $elements[$i];
 379     }
 380   }
 381
 382   /**
 383    * Set IM Service Provider type fields.
 384    *
 385    * @param array $elements
 386    *   IM service provider type ids.
 387    */
 388   public function setActiveFieldImProviders($elements) {
 389     for ($i = 0; $i < count($elements); $i++) {
 390       $this->_activeFields[$i]->_imProvider = $elements[$i];
 391     }
 392   }
 393
 394   /**
 395    * @param $elements
 396    */
 397   public function setActiveFieldRelated($elements) {
 398     for ($i = 0; $i < count($elements); $i++) {
 399       $this->_activeFields[$i]->_related = $elements[$i];
 400     }
 401   }
 402
 403   /**
 404    * @param $elements
 405    */
 406   public function setActiveFieldRelatedContactType($elements) {
 407     for ($i = 0; $i < count($elements); $i++) {
 408       $this->_activeFields[$i]->_relatedContactType = $elements[$i];
 409     }
 410   }
 411
 412   /**
 413    * @param $elements
 414    */
 415   public function setActiveFieldRelatedContactDetails($elements) {
 416     for ($i = 0; $i < count($elements); $i++) {
 417       $this->_activeFields[$i]->_relatedContactDetails = $elements[$i];
 418     }
 419   }
 420
 421   /**
 422    * @param $elements
 423    */
 424   public function setActiveFieldRelatedContactLocType($elements) {
 425     for ($i = 0; $i < count($elements); $i++) {
 426       $this->_activeFields[$i]->_relatedContactLocType = $elements[$i];
 427     }
 428   }
 429
 430   /**
 431    * Set active field for related contact's phone type.
 432    *
 433    * @param array $elements
 434    */
 435   public function setActiveFieldRelatedContactPhoneType($elements) {
 436     for ($i = 0; $i < count($elements); $i++) {
 437       $this->_activeFields[$i]->_relatedContactPhoneType = $elements[$i];
 438     }
 439   }
 440
 441   /**
 442    * @param $elements
 443    */
 444   public function setActiveFieldRelatedContactWebsiteType($elements) {
 445     for ($i = 0; $i < count($elements); $i++) {
 446       $this->_activeFields[$i]->_relatedContactWebsiteType = $elements[$i];
 447     }
 448   }
 449
 450   /**
 451    * Set IM Service Provider type fields for related contacts.
 452    *
 453    * @param array $elements
 454    *   IM service provider type ids of related contact.
 455    */
 456   public function setActiveFieldRelatedContactImProvider($elements) {
 457     for ($i = 0; $i < count($elements); $i++) {
 458       $this->_activeFields[$i]->_relatedContactImProvider = $elements[$i];
 459     }
 460   }
 461
 462   /**
 463    * Format the field values for input to the api.
 464    *
 465    * @return array
 466    *   (reference ) associative array of name/value pairs
 467    */
 468   public function &getActiveFieldParams() {
 469     $params = [];
 470
 471     for ($i = 0; $i < $this->_activeFieldCount; $i++) {
 472       if ($this->_activeFields[$i]->_name == 'do_not_import') {
 473         continue;
 474       }
 475
 476       if (isset($this->_activeFields[$i]->_value)) {
 477         if (isset($this->_activeFields[$i]->_hasLocationType)) {
 478           if (!isset($params[$this->_activeFields[$i]->_name])) {
 479             $params[$this->_activeFields[$i]->_name] = [];
 480           }
 481
 482           $value = [
 483             $this->_activeFields[$i]->_name => $this->_activeFields[$i]->_value,
 484             'location_type_id' => $this->_activeFields[$i]->_hasLocationType,
 485           ];
 486
 487           if (isset($this->_activeFields[$i]->_phoneType)) {
 488             $value['phone_type_id'] = $this->_activeFields[$i]->_phoneType;
 489           }
 490
 491           // get IM service Provider type id
 492           if (isset($this->_activeFields[$i]->_imProvider)) {
 493             $value['provider_id'] = $this->_activeFields[$i]->_imProvider;
 494           }
 495
 496           $params[$this->_activeFields[$i]->_name][] = $value;
 497         }
 498         elseif (isset($this->_activeFields[$i]->_websiteType)) {
 499           $value = [
 500             $this->_activeFields[$i]->_name => $this->_activeFields[$i]->_value,
 501             'website_type_id' => $this->_activeFields[$i]->_websiteType,
 502           ];
 503
 504           $params[$this->_activeFields[$i]->_name][] = $value;
 505         }
 506
 507         if (!isset($params[$this->_activeFields[$i]->_name])) {
 508           if (!isset($this->_activeFields[$i]->_related)) {
 509             $params[$this->_activeFields[$i]->_name] = $this->_activeFields[$i]->_value;
 510           }
 511         }
 512
 513         //minor fix for CRM-4062
 514         if (isset($this->_activeFields[$i]->_related)) {
 515           if (!isset($params[$this->_activeFields[$i]->_related])) {
 516             $params[$this->_activeFields[$i]->_related] = [];
 517           }
 518
 519           if (!isset($params[$this->_activeFields[$i]->_related]['contact_type']) && !empty($this->_activeFields[$i]->_relatedContactType)) {
 520             $params[$this->_activeFields[$i]->_related]['contact_type'] = $this->_activeFields[$i]->_relatedContactType;
 521           }
 522
 523           if (isset($this->_activeFields[$i]->_relatedContactLocType) && !empty($this->_activeFields[$i]->_value)) {
 524             if (!empty($params[$this->_activeFields[$i]->_related][$this->_activeFields[$i]->_relatedContactDetails]) &&
 525               !is_array($params[$this->_activeFields[$i]->_related][$this->_activeFields[$i]->_relatedContactDetails])
 526             ) {
 527               $params[$this->_activeFields[$i]->_related][$this->_activeFields[$i]->_relatedContactDetails] = [];
 528             }
 529             $value = [
 530               $this->_activeFields[$i]->_relatedContactDetails => $this->_activeFields[$i]->_value,
 531               'location_type_id' => $this->_activeFields[$i]->_relatedContactLocType,
 532             ];
 533
 534             if (isset($this->_activeFields[$i]->_relatedContactPhoneType)) {
 535               $value['phone_type_id'] = $this->_activeFields[$i]->_relatedContactPhoneType;
 536             }
 537
 538             // get IM service Provider type id for related contact
 539             if (isset($this->_activeFields[$i]->_relatedContactImProvider)) {
 540               $value['provider_id'] = $this->_activeFields[$i]->_relatedContactImProvider;
 541             }
 542
 543             $params[$this->_activeFields[$i]->_related][$this->_activeFields[$i]->_relatedContactDetails][] = $value;
 544           }
 545           elseif (isset($this->_activeFields[$i]->_relatedContactWebsiteType)) {
 546             $params[$this->_activeFields[$i]->_related][$this->_activeFields[$i]->_relatedContactDetails][] = [
 547               'url' => $this->_activeFields[$i]->_value,
 548               'website_type_id' => $this->_activeFields[$i]->_relatedContactWebsiteType,
 549             ];
 550           }
 551           else {
 552             $params[$this->_activeFields[$i]->_related][$this->_activeFields[$i]->_relatedContactDetails] = $this->_activeFields[$i]->_value;
 553           }
 554         }
 555       }
 556     }
 557
 558     return $params;
 559   }
 560
 561   /**
 562    * @return array
 563    */
 564   public function getColumnPatterns() {
 565     CRM_Core_Error::deprecatedFunctionWarning('no  longer used- use   CRM_Contact_Import_MetadataTrait');
 566     $values = [];
 567     foreach ($this->_fields as $name => $field) {
 568       $values[$name] = $field->_columnPattern;
 569     }
 570     return $values;
 571   }
 572
 573   /**
 574    * @param string $name
 575    * @param $title
 576    * @param int $type
 577    * @param string $headerPattern
 578    * @param string $dataPattern
 579    * @param bool $hasLocationType
 580    */
 581   public function addField(
 582     $name, $title, $type = CRM_Utils_Type::T_INT,
 583     $headerPattern = '//', $dataPattern = '//',
 584     $hasLocationType = FALSE
 585   ) {
 586     $this->_fields[$name] = new CRM_Contact_Import_Field($name, $title, $type, $headerPattern, $dataPattern, $hasLocationType);
 587     if (empty($name)) {
 588       $this->_fields['doNotImport'] = new CRM_Contact_Import_Field($name, $title, $type, $headerPattern, $dataPattern, $hasLocationType);
 589     }
 590   }
 591
 592   /**
 593    * Store parser values.
 594    *
 595    * @param CRM_Core_Session $store
 596    *
 597    * @param int $mode
 598    */
 599   public function set($store, $mode = self::MODE_SUMMARY) {
 600     $store->set('rowCount', $this->_rowCount);
 601     $store->set('fields', $this->getSelectValues());
 602     $store->set('fieldTypes', $this->getSelectTypes());
 603
 604     $store->set('columnCount', $this->_activeFieldCount);
 605
 606     $store->set('totalRowCount', $this->_totalCount);
 607     $store->set('validRowCount', $this->_validCount);
 608     $store->set('invalidRowCount', $this->_invalidRowCount);
 609     $store->set('conflictRowCount', $this->_conflictCount);
 610     $store->set('unMatchCount', $this->_unMatchCount);
 611
 612     switch ($this->_contactType) {
 613       case 'Individual':
 614         $store->set('contactType', CRM_Import_Parser::CONTACT_INDIVIDUAL);
 615         break;
 616
 617       case 'Household':
 618         $store->set('contactType', CRM_Import_Parser::CONTACT_HOUSEHOLD);
 619         break;
 620
 621       case 'Organization':
 622         $store->set('contactType', CRM_Import_Parser::CONTACT_ORGANIZATION);
 623     }
 624
 625     if ($this->_invalidRowCount) {
 626       $store->set('errorsFileName', $this->_errorFileName);
 627     }
 628     if ($this->_conflictCount) {
 629       $store->set('conflictsFileName', $this->_conflictFileName);
 630     }
 631     if (isset($this->_rows) && !empty($this->_rows)) {
 632       $store->set('dataValues', $this->_rows);
 633     }
 634
 635     if ($this->_unMatchCount) {
 636       $store->set('mismatchFileName', $this->_misMatchFilemName);
 637     }
 638
 639     if ($mode == self::MODE_IMPORT) {
 640       $store->set('duplicateRowCount', $this->_duplicateCount);
 641       $store->set('unparsedAddressCount', $this->_unparsedAddressCount);
 642       if ($this->_duplicateCount) {
 643         $store->set('duplicatesFileName', $this->_duplicateFileName);
 644       }
 645       if ($this->_unparsedAddressCount) {
 646         $store->set('errorsFileName', $this->_errorFileName);
 647       }
 648     }
 649     //echo "$this->_totalCount,$this->_invalidRowCount,$this->_conflictCount,$this->_duplicateCount";
 650   }
 651
 652   /**
 653    * Export data to a CSV file.
 654    *
 655    * @param string $fileName
 656    * @param array $header
 657    * @param array $data
 658    */
 659   public static function exportCSV($fileName, $header, $data) {
 660
 661     if (file_exists($fileName) && !is_writable($fileName)) {
 662       CRM_Core_Error::movedSiteError($fileName);
 663     }
 664     //hack to remove '_status', '_statusMsg' and '_id' from error file
 665     $errorValues = [];
 666     $dbRecordStatus = ['IMPORTED', 'ERROR', 'DUPLICATE', 'INVALID', 'NEW'];
 667     foreach ($data as $rowCount => $rowValues) {
 668       $count = 0;
 669       foreach ($rowValues as $key => $val) {
 670         if (in_array($val, $dbRecordStatus) && $count == (count($rowValues) - 3)) {
 671           break;
 672         }
 673         $errorValues[$rowCount][$key] = $val;
 674         $count++;
 675       }
 676     }
 677     $data = $errorValues;
 678
 679     $output = [];
 680     $fd = fopen($fileName, 'w');
 681
 682     foreach ($header as $key => $value) {
 683       $header[$key] = "\"$value\"";
 684     }
 685     $config = CRM_Core_Config::singleton();
 686     $output[] = implode($config->fieldSeparator, $header);
 687
 688     foreach ($data as $datum) {
 689       foreach ($datum as $key => $value) {
 690         $datum[$key] = "\"$value\"";
 691       }
 692       $output[] = implode($config->fieldSeparator, $datum);
 693     }
 694     fwrite($fd, implode("\n", $output));
 695     fclose($fd);
 696   }
 697
 698   /**
 699    * Update the record with PK $id in the import database table.
 700    *
 701    * @param int $id
 702    * @param array $params
 703    */
 704   public function updateImportRecord($id, &$params) {
 705     $statusFieldName = $this->_statusFieldName;
 706     $primaryKeyName = $this->_primaryKeyName;
 707
 708     if ($statusFieldName && $primaryKeyName) {
 709       $dao = new CRM_Core_DAO();
 710       $db = $dao->getDatabaseConnection();
 711
 712       $query = "UPDATE $this->_tableName
 713                       SET    $statusFieldName = ?,
 714                              ${statusFieldName}Msg = ?
 715                       WHERE  $primaryKeyName = ?";
 716       $args = [
 717         $params[$statusFieldName],
 718         CRM_Utils_Array::value("${statusFieldName}Msg", $params),
 719         $id,
 720       ];
 721
 722       //print "Running query: $query<br/>With arguments: ".$params[$statusFieldName].", ".$params["${statusFieldName}Msg"].", $id<br/>";
 723
 724       $db->query($query, $args);
 725     }
 726   }
 727
 728   /**
 729    * Format common params data to proper format to store.
 730    *
 731    * @param array $params
 732    *   Contain record values.
 733    * @param array $formatted
 734    *   Array of formatted data.
 735    * @param array $contactFields
 736    *   Contact DAO fields.
 737    */
 738   public function formatCommonData($params, &$formatted, &$contactFields) {
 739     $csType = [
 740       CRM_Utils_Array::value('contact_type', $formatted),
 741     ];
 742
 743     //CRM-5125
 744     //add custom fields for contact sub type
 745     if (!empty($this->_contactSubType)) {
 746       $csType = $this->_contactSubType;
 747     }
 748
 749     if ($relCsType = CRM_Utils_Array::value('contact_sub_type', $formatted)) {
 750       $csType = $relCsType;
 751     }
 752
 753     $customFields = CRM_Core_BAO_CustomField::getFields($formatted['contact_type'], FALSE, FALSE, $csType);
 754
 755     $addressCustomFields = CRM_Core_BAO_CustomField::getFields('Address');
 756     $customFields = $customFields + $addressCustomFields;
 757
 758     //if a Custom Email Greeting, Custom Postal Greeting or Custom Addressee is mapped, and no "Greeting / Addressee Type ID" is provided, then automatically set the type = Customized, CRM-4575
 759     $elements = [
 760       'email_greeting_custom' => 'email_greeting',
 761       'postal_greeting_custom' => 'postal_greeting',
 762       'addressee_custom' => 'addressee',
 763     ];
 764     foreach ($elements as $k => $v) {
 765       if (array_key_exists($k, $params) && !(array_key_exists($v, $params))) {
 766         $label = key(CRM_Core_OptionGroup::values($v, TRUE, NULL, NULL, 'AND v.name = "Customized"'));
 767         $params[$v] = $label;
 768       }
 769     }
 770
 771     //format date first
 772     $session = CRM_Core_Session::singleton();
 773     $dateType = $session->get("dateTypes");
 774     foreach ($params as $key => $val) {
 775       $customFieldID = CRM_Core_BAO_CustomField::getKeyID($key);
 776       if ($customFieldID &&
 777         !array_key_exists($customFieldID, $addressCustomFields)
 778       ) {
 779         //we should not update Date to null, CRM-4062
 780         if ($val && ($customFields[$customFieldID]['data_type'] == 'Date')) {
 781           //CRM-21267
 782           CRM_Contact_Import_Parser_Contact::formatCustomDate($params, $formatted, $dateType, $key);
 783         }
 784         elseif ($customFields[$customFieldID]['data_type'] == 'Boolean') {
 785           if (empty($val) && !is_numeric($val) && $this->_onDuplicate == CRM_Import_Parser::DUPLICATE_FILL) {
 786             //retain earlier value when Import mode is `Fill`
 787             unset($params[$key]);
 788           }
 789           else {
 790             $params[$key] = CRM_Utils_String::strtoboolstr($val);
 791           }
 792         }
 793       }
 794
 795       if ($key == 'birth_date' && $val) {
 796         CRM_Utils_Date::convertToDefaultDate($params, $dateType, $key);
 797       }
 798       elseif ($key == 'deceased_date' && $val) {
 799         CRM_Utils_Date::convertToDefaultDate($params, $dateType, $key);
 800         $params['is_deceased'] = 1;
 801       }
 802       elseif ($key == 'is_deceased' && $val) {
 803         $params[$key] = CRM_Utils_String::strtoboolstr($val);
 804       }
 805     }
 806
 807     //now format custom data.
 808     foreach ($params as $key => $field) {
 809       if (is_array($field)) {
 810         $isAddressCustomField = FALSE;
 811         foreach ($field as $value) {
 812           $break = FALSE;
 813           if (is_array($value)) {
 814             foreach ($value as $name => $testForEmpty) {
 815               if ($addressCustomFieldID = CRM_Core_BAO_CustomField::getKeyID($name)) {
 816                 $isAddressCustomField = TRUE;
 817                 break;
 818               }
 819               // check if $value does not contain IM provider or phoneType
 820               if (($name !== 'phone_type_id' || $name !== 'provider_id') && ($testForEmpty === '' || $testForEmpty == NULL)) {
 821                 $break = TRUE;
 822                 break;
 823               }
 824             }
 825           }
 826           else {
 827             $break = TRUE;
 828           }
 829
 830           if (!$break) {
 831             if (!empty($value['location_type_id'])) {
 832               $this->formatLocationBlock($value, $formatted);
 833             }
 834             else {
 835               CRM_Core_Error::deprecatedFunctionWarning('this is not expected to be reachable now');
 836               $this->formatContactParameters($value, $formatted);
 837             }
 838           }
 839         }
 840         if (!$isAddressCustomField) {
 841           continue;
 842         }
 843       }
 844
 845       $formatValues = [
 846         $key => $field,
 847       ];
 848
 849       if (($key !== 'preferred_communication_method') && (array_key_exists($key, $contactFields))) {
 850         // due to merging of individual table and
 851         // contact table, we need to avoid
 852         // preferred_communication_method forcefully
 853         $formatValues['contact_type'] = $formatted['contact_type'];
 854       }
 855
 856       if ($key == 'id' && isset($field)) {
 857         $formatted[$key] = $field;
 858       }
 859       $this->formatContactParameters($formatValues, $formatted);
 860
 861       //Handling Custom Data
 862       // note: Address custom fields will be handled separately inside formatContactParameters
 863       if (($customFieldID = CRM_Core_BAO_CustomField::getKeyID($key)) &&
 864         array_key_exists($customFieldID, $customFields) &&
 865         !array_key_exists($customFieldID, $addressCustomFields)
 866       ) {
 867
 868         $extends = $customFields[$customFieldID]['extends'] ?? NULL;
 869         $htmlType = $customFields[$customFieldID]['html_type'] ?? NULL;
 870         $dataType = $customFields[$customFieldID]['data_type'] ?? NULL;
 871         $serialized = CRM_Core_BAO_CustomField::isSerialized($customFields[$customFieldID]);
 872
 873         if (!$serialized && in_array($htmlType, ['Select', 'Radio', 'Autocomplete-Select']) && in_array($dataType, ['String', 'Int'])) {
 874           $customOption = CRM_Core_BAO_CustomOption::getCustomOption($customFieldID, TRUE);
 875           foreach ($customOption as $customValue) {
 876             $val = $customValue['value'] ?? NULL;
 877             $label = strtolower($customValue['label'] ?? '');
 878             $value = strtolower(trim($formatted[$key]));
 879             if (($value == $label) || ($value == strtolower($val))) {
 880               $params[$key] = $formatted[$key] = $val;
 881             }
 882           }
 883         }
 884         elseif ($serialized && !empty($formatted[$key]) && !empty($params[$key])) {
 885           $mulValues = explode(',', $formatted[$key]);
 886           $customOption = CRM_Core_BAO_CustomOption::getCustomOption($customFieldID, TRUE);
 887           $formatted[$key] = [];
 888           $params[$key] = [];
 889           foreach ($mulValues as $v1) {
 890             foreach ($customOption as $v2) {
 891               if ((strtolower($v2['label']) == strtolower(trim($v1))) ||
 892                 (strtolower($v2['value']) == strtolower(trim($v1)))
 893               ) {
 894                 if ($htmlType == 'CheckBox') {
 895                   $params[$key][$v2['value']] = $formatted[$key][$v2['value']] = 1;
 896                 }
 897                 else {
 898                   $params[$key][] = $formatted[$key][] = $v2['value'];
 899                 }
 900               }
 901             }
 902           }
 903         }
 904       }
 905     }
 906
 907     if (!empty($key) && ($customFieldID = CRM_Core_BAO_CustomField::getKeyID($key)) && array_key_exists($customFieldID, $customFields) &&
 908       !array_key_exists($customFieldID, $addressCustomFields)
 909     ) {
 910       // @todo calling api functions directly is not supported
 911       _civicrm_api3_custom_format_params($params, $formatted, $extends);
 912     }
 913
 914     // to check if not update mode and unset the fields with empty value.
 915     if (!$this->_updateWithId && array_key_exists('custom', $formatted)) {
 916       foreach ($formatted['custom'] as $customKey => $customvalue) {
 917         if (empty($formatted['custom'][$customKey][-1]['is_required'])) {
 918           $formatted['custom'][$customKey][-1]['is_required'] = $customFields[$customKey]['is_required'];
 919         }
 920         $emptyValue = $customvalue[-1]['value'] ?? NULL;
 921         if (!isset($emptyValue)) {
 922           unset($formatted['custom'][$customKey]);
 923         }
 924       }
 925     }
 926
 927     // parse street address, CRM-5450
 928     if ($this->_parseStreetAddress) {
 929       if (array_key_exists('address', $formatted) && is_array($formatted['address'])) {
 930         foreach ($formatted['address'] as $instance => & $address) {
 931           $streetAddress = $address['street_address'] ?? NULL;
 932           if (empty($streetAddress)) {
 933             continue;
 934           }
 935           // parse address field.
 936           $parsedFields = CRM_Core_BAO_Address::parseStreetAddress($streetAddress);
 937
 938           //street address consider to be parsed properly,
 939           //If we get street_name and street_number.
 940           if (empty($parsedFields['street_name']) || empty($parsedFields['street_number'])) {
 941             $parsedFields = array_fill_keys(array_keys($parsedFields), '');
 942           }
 943
 944           // merge parse address w/ main address block.
 945           $address = array_merge($address, $parsedFields);
 946         }
 947       }
 948     }
 949   }
 950
 951   /**
 952    * Format contact parameters.
 953    *
 954    * @todo this function needs re-writing & re-merging into the main function.
 955    *
 956    * Here be dragons.
 957    *
 958    * @param array $values
 959    * @param array $params
 960    *
 961    * @return bool
 962    */
 963   protected function formatContactParameters(&$values, &$params) {
 964     // Crawl through the possible classes:
 965     // Contact
 966     //      Individual
 967     //      Household
 968     //      Organization
 969     //          Location
 970     //              Address
 971     //              Email
 972     //              Phone
 973     //              IM
 974     //      Note
 975     //      Custom
 976
 977     // first add core contact values since for other Civi modules they are not added
 978     $contactFields = CRM_Contact_DAO_Contact::fields();
 979     _civicrm_api3_store_values($contactFields, $values, $params);
 980
 981     if (isset($values['contact_type'])) {
 982       // we're an individual/household/org property
 983
 984       $fields[$values['contact_type']] = CRM_Contact_DAO_Contact::fields();
 985
 986       _civicrm_api3_store_values($fields[$values['contact_type']], $values, $params);
 987       return TRUE;
 988     }
 989
 990     // Cache the various object fields
 991     // @todo - remove this after confirming this is just a compilation of other-wise-cached fields.
 992     static $fields = [];
 993
 994     if (isset($values['individual_prefix'])) {
 995       if (!empty($params['prefix_id'])) {
 996         $prefixes = CRM_Core_PseudoConstant::get('CRM_Contact_DAO_Contact', 'prefix_id');
 997         $params['prefix'] = $prefixes[$params['prefix_id']];
 998       }
 999       else {
1000         $params['prefix'] = $values['individual_prefix'];
1001       }
1002       return TRUE;
1003     }
1004
1005     if (isset($values['individual_suffix'])) {
1006       if (!empty($params['suffix_id'])) {
1007         $suffixes = CRM_Core_PseudoConstant::get('CRM_Contact_DAO_Contact', 'suffix_id');
1008         $params['suffix'] = $suffixes[$params['suffix_id']];
1009       }
1010       else {
1011         $params['suffix'] = $values['individual_suffix'];
1012       }
1013       return TRUE;
1014     }
1015
1016     // CRM-4575
1017     if (isset($values['email_greeting'])) {
1018       if (!empty($params['email_greeting_id'])) {
1019         $emailGreetingFilter = [
1020           'contact_type' => $params['contact_type'] ?? NULL,
1021           'greeting_type' => 'email_greeting',
1022         ];
1023         $emailGreetings = CRM_Core_PseudoConstant::greeting($emailGreetingFilter);
1024         $params['email_greeting'] = $emailGreetings[$params['email_greeting_id']];
1025       }
1026       else {
1027         $params['email_greeting'] = $values['email_greeting'];
1028       }
1029
1030       return TRUE;
1031     }
1032
1033     if (isset($values['postal_greeting'])) {
1034       if (!empty($params['postal_greeting_id'])) {
1035         $postalGreetingFilter = [
1036           'contact_type' => $params['contact_type'] ?? NULL,
1037           'greeting_type' => 'postal_greeting',
1038         ];
1039         $postalGreetings = CRM_Core_PseudoConstant::greeting($postalGreetingFilter);
1040         $params['postal_greeting'] = $postalGreetings[$params['postal_greeting_id']];
1041       }
1042       else {
1043         $params['postal_greeting'] = $values['postal_greeting'];
1044       }
1045       return TRUE;
1046     }
1047
1048     if (isset($values['addressee'])) {
1049       if (!empty($params['addressee_id'])) {
1050         $addresseeFilter = [
1051           'contact_type' => $params['contact_type'] ?? NULL,
1052           'greeting_type' => 'addressee',
1053         ];
1054         $addressee = CRM_Core_PseudoConstant::addressee($addresseeFilter);
1055         $params['addressee'] = $addressee[$params['addressee_id']];
1056       }
1057       else {
1058         $params['addressee'] = $values['addressee'];
1059       }
1060       return TRUE;
1061     }
1062
1063     if (isset($values['gender'])) {
1064       if (!empty($params['gender_id'])) {
1065         $genders = CRM_Core_PseudoConstant::get('CRM_Contact_DAO_Contact', 'gender_id');
1066         $params['gender'] = $genders[$params['gender_id']];
1067       }
1068       else {
1069         $params['gender'] = $values['gender'];
1070       }
1071       return TRUE;
1072     }
1073
1074     if (!empty($values['preferred_communication_method'])) {
1075       $comm = [];
1076       $pcm = array_change_key_case(array_flip(CRM_Core_PseudoConstant::get('CRM_Contact_DAO_Contact', 'preferred_communication_method')), CASE_LOWER);
1077
1078       $preffComm = explode(',', $values['preferred_communication_method']);
1079       foreach ($preffComm as $v) {
1080         $v = strtolower(trim($v));
1081         if (array_key_exists($v, $pcm)) {
1082           $comm[$pcm[$v]] = 1;
1083         }
1084       }
1085
1086       $params['preferred_communication_method'] = $comm;
1087       return TRUE;
1088     }
1089
1090     // format the website params.
1091     if (!empty($values['url'])) {
1092       static $websiteFields;
1093       if (!is_array($websiteFields)) {
1094         $websiteFields = CRM_Core_DAO_Website::fields();
1095       }
1096       if (!array_key_exists('website', $params) ||
1097         !is_array($params['website'])
1098       ) {
1099         $params['website'] = [];
1100       }
1101
1102       $websiteCount = count($params['website']);
1103       _civicrm_api3_store_values($websiteFields, $values,
1104         $params['website'][++$websiteCount]
1105       );
1106
1107       return TRUE;
1108     }
1109
1110     // get the formatted location blocks into params - w/ 3.0 format, CRM-4605
1111     if (!empty($values['location_type_id'])) {
1112       CRM_Core_Error::deprecatedFunctionWarning('this is not expected to be reachable now');
1113       return $this->formatLocationBlock($values, $params);
1114     }
1115
1116     if (isset($values['note'])) {
1117       // add a note field
1118       if (!isset($params['note'])) {
1119         $params['note'] = [];
1120       }
1121       $noteBlock = count($params['note']) + 1;
1122
1123       $params['note'][$noteBlock] = [];
1124       if (!isset($fields['Note'])) {
1125         $fields['Note'] = CRM_Core_DAO_Note::fields();
1126       }
1127
1128       // get the current logged in civicrm user
1129       $session = CRM_Core_Session::singleton();
1130       $userID = $session->get('userID');
1131
1132       if ($userID) {
1133         $values['contact_id'] = $userID;
1134       }
1135
1136       _civicrm_api3_store_values($fields['Note'], $values, $params['note'][$noteBlock]);
1137
1138       return TRUE;
1139     }
1140
1141     // Check for custom field values
1142     $customFields = CRM_Core_BAO_CustomField::getFields(CRM_Utils_Array::value('contact_type', $values),
1143       FALSE, FALSE, NULL, NULL, FALSE, FALSE, FALSE
1144     );
1145
1146     foreach ($values as $key => $value) {
1147       if ($customFieldID = CRM_Core_BAO_CustomField::getKeyID($key)) {
1148         // check if it's a valid custom field id
1149
1150         if (!array_key_exists($customFieldID, $customFields)) {
1151           return civicrm_api3_create_error('Invalid custom field ID');
1152         }
1153         else {
1154           $params[$key] = $value;
1155         }
1156       }
1157     }
1158     return TRUE;
1159   }
1160
1161   /**
1162    * Format location block ready for importing.
1163    *
1164    * There is some test coverage for this in CRM_Contact_Import_Parser_ContactTest
1165    * e.g. testImportPrimaryAddress.
1166    *
1167    * @param array $values
1168    * @param array $params
1169    *
1170    * @return bool
1171    */
1172   protected function formatLocationBlock(&$values, &$params) {
1173     $blockTypes = [
1174       'phone' => 'Phone',
1175       'email' => 'Email',
1176       'im' => 'IM',
1177       'openid' => 'OpenID',
1178       'phone_ext' => 'Phone',
1179     ];
1180     foreach ($blockTypes as $blockFieldName => $block) {
1181       if (!array_key_exists($blockFieldName, $values)) {
1182         continue;
1183       }
1184       $blockIndex = $values['location_type_id'] . (!empty($values['phone_type_id']) ? '_' . $values['phone_type_id'] : '');
1185
1186       // block present in value array.
1187       if (!array_key_exists($blockFieldName, $params) || !is_array($params[$blockFieldName])) {
1188         $params[$blockFieldName] = [];
1189       }
1190
1191       $fields[$block] = $this->getMetadataForEntity($block);
1192
1193       // copy value to dao field name.
1194       if ($blockFieldName == 'im') {
1195         $values['name'] = $values[$blockFieldName];
1196       }
1197
1198       _civicrm_api3_store_values($fields[$block], $values,
1199         $params[$blockFieldName][$blockIndex]
1200       );
1201
1202       $this->fillPrimary($params[$blockFieldName][$blockIndex], $values, $block, CRM_Utils_Array::value('id', $params));
1203
1204       if (empty($params['id']) && (count($params[$blockFieldName]) == 1)) {
1205         $params[$blockFieldName][$blockIndex]['is_primary'] = TRUE;
1206       }
1207
1208       // we only process single block at a time.
1209       return TRUE;
1210     }
1211
1212     // handle address fields.
1213     if (!array_key_exists('address', $params) || !is_array($params['address'])) {
1214       $params['address'] = [];
1215     }
1216
1217     // Note: we doing multiple value formatting here for address custom fields, plus putting into right format.
1218     // The actual formatting (like date, country ..etc) for address custom fields is taken care of while saving
1219     // the address in CRM_Core_BAO_Address::create method
1220     if (!empty($values['location_type_id'])) {
1221       static $customFields = [];
1222       if (empty($customFields)) {
1223         $customFields = CRM_Core_BAO_CustomField::getFields('Address');
1224       }
1225       // make a copy of values, as we going to make changes
1226       $newValues = $values;
1227       foreach ($values as $key => $val) {
1228         $customFieldID = CRM_Core_BAO_CustomField::getKeyID($key);
1229         if ($customFieldID && array_key_exists($customFieldID, $customFields)) {
1230
1231           $htmlType = $customFields[$customFieldID]['html_type'] ?? NULL;
1232           if (CRM_Core_BAO_CustomField::isSerialized($customFields[$customFieldID]) && $val) {
1233             $mulValues = explode(',', $val);
1234             $customOption = CRM_Core_BAO_CustomOption::getCustomOption($customFieldID, TRUE);
1235             $newValues[$key] = [];
1236             foreach ($mulValues as $v1) {
1237               foreach ($customOption as $v2) {
1238                 if ((strtolower($v2['label']) == strtolower(trim($v1))) ||
1239                   (strtolower($v2['value']) == strtolower(trim($v1)))
1240                 ) {
1241                   if ($htmlType == 'CheckBox') {
1242                     $newValues[$key][$v2['value']] = 1;
1243                   }
1244                   else {
1245                     $newValues[$key][] = $v2['value'];
1246                   }
1247                 }
1248               }
1249             }
1250           }
1251         }
1252       }
1253       // consider new values
1254       $values = $newValues;
1255     }
1256
1257     $fields['Address'] = $this->getMetadataForEntity('Address');
1258     // @todo this is kinda replicated below....
1259     _civicrm_api3_store_values($fields['Address'], $values, $params['address'][$values['location_type_id']]);
1260
1261     $addressFields = [
1262       'county',
1263       'country',
1264       'state_province',
1265       'supplemental_address_1',
1266       'supplemental_address_2',
1267       'supplemental_address_3',
1268       'StateProvince.name',
1269     ];
1270     foreach (array_keys($customFields) as $customFieldID) {
1271       $addressFields[] = 'custom_' . $customFieldID;
1272     }
1273
1274     foreach ($addressFields as $field) {
1275       if (array_key_exists($field, $values)) {
1276         if (!array_key_exists('address', $params)) {
1277           $params['address'] = [];
1278         }
1279         $params['address'][$values['location_type_id']][$field] = $values[$field];
1280       }
1281     }
1282
1283     $this->fillPrimary($params['address'][$values['location_type_id']], $values, 'address', CRM_Utils_Array::value('id', $params));
1284     return TRUE;
1285   }
1286
1287   /**
1288    * Get the field metadata for the relevant entity.
1289    *
1290    * @param string $entity
1291    *
1292    * @return array
1293    */
1294   protected function getMetadataForEntity($entity) {
1295     if (!isset($this->fieldMetadata[$entity])) {
1296       $className = "CRM_Core_DAO_$entity";
1297       $this->fieldMetadata[$entity] = $className::fields();
1298     }
1299     return $this->fieldMetadata[$entity];
1300   }
1301
1302   /**
1303    * Fill in the primary location.
1304    *
1305    * If the contact has a primary address we update it. Otherwise
1306    * we add an address of the default location type.
1307    *
1308    * @param array $params
1309    *   Address block parameters
1310    * @param array $values
1311    *   Input values
1312    * @param string $entity
1313    *  - address, email, phone
1314    * @param int|null $contactID
1315    *
1316    * @throws \CiviCRM_API3_Exception
1317    */
1318   protected function fillPrimary(&$params, $values, $entity, $contactID) {
1319     if ($values['location_type_id'] === 'Primary') {
1320       if ($contactID) {
1321         $primary = civicrm_api3($entity, 'get', [
1322           'return' => 'location_type_id',
1323           'contact_id' => $contactID,
1324           'is_primary' => 1,
1325           'sequential' => 1,
1326         ]);
1327       }
1328       $defaultLocationType = CRM_Core_BAO_LocationType::getDefault();
1329       $params['location_type_id'] = (int) (isset($primary) && $primary['count']) ? $primary['values'][0]['location_type_id'] : $defaultLocationType->id;
1330       $params['is_primary'] = 1;
1331     }
1332   }
1333
1334 }