function testDeleteAllForSyncSettingsId()
{
$mailchimp_list_id = 'MailchimpListsTestListA';
$mailchimp_interest_groups = array('MailchimpTestInterestGroupingA_MailchimpTestInterestGroupA', 'MailchimpTestInterestGroupingA_MailchimpTestInterestGroupC');
$mailchimp_sync_setting = CRM_CiviMailchimp_BAO_SyncSettingsTest::createTestGroupAndSyncSettings('Test Group testDeleteAllForSyncSettingsId', $mailchimp_list_id, $mailchimp_interest_groups);
CRM_CiviMailchimp_BAO_InterestGroupsSyncSettings::deleteAllForSyncSettingsId($mailchimp_sync_setting->id);
$interest_groups = CRM_CiviMailchimp_BAO_InterestGroupsSyncSettings::findBySyncSettingsId($mailchimp_sync_setting->id);
$this->assertEmpty($interest_groups);
}
function testForceMailchimpToCiviSync()
{
$mailchimp_export_url = __DIR__ . '/../../../sample_mailchimp_export.txt';
$mailchimp_export_url = 'file:///' . realpath($mailchimp_export_url);
$mailchimp_sync_setting = CRM_CiviMailchimp_BAO_SyncSettingsTest::createTestGroupAndSyncSettings('Test Group testForceMailchimpToCiviSync');
$mailchimp_members = CRM_CiviMailchimp_Form_Sync::forceMailchimpToCiviSync($mailchimp_export_url, $mailchimp_sync_setting);
$contacts = CRM_Contact_BAO_Group::getGroupContacts($mailchimp_sync_setting->civicrm_group_id);
$this->assertCount(3, $mailchimp_members);
$this->assertCount(3, $contacts);
}
function test_civicrm_api3_civi_mailchimp_sync()
{
$action = 'subscribeContactToMailchimpList';
$mailchimp_list_id = 'MailchimpListsTestListA';
$mailchimp_interest_groups = array('MailchimpTestInterestGroupingA_MailchimpTestInterestGroupA', 'MailchimpTestInterestGroupingA_MailchimpTestInterestGroupC');
$mailchimp_sync_setting = CRM_CiviMailchimp_BAO_SyncSettingsTest::createTestGroupAndSyncSettings('Test Group test_civicrm_api3_civi_mailchimp_sync', $mailchimp_list_id, $mailchimp_interest_groups);
$merge_fields = CRM_CiviMailchimp_Utils::getMailchimpMergeFields();
$params = CRM_CiviMailchimp_UtilsTest::sampleContactParams();
$contact = CRM_Contact_BAO_Contact::create($params);
$merge_vars = CRM_CiviMailchimp_Utils::formatMailchimpMergeVars($merge_fields, $contact);
CRM_CiviMailchimp_Utils::addMailchimpSyncQueueItem($action, $mailchimp_list_id, $params['email'][0]['email'], $merge_vars);
$action = 'unsubscribeContactFromMailchimpList';
CRM_CiviMailchimp_Utils::addMailchimpSyncQueueItem($action, $mailchimp_list_id, $params['email'][0]['email'], $merge_vars);
$job_params['records_to_process_per_run'] = 100;
civicrm_api3_civi_mailchimp_sync($job_params);
$queue = CRM_Queue_Service::singleton()->create(array('type' => 'Sql', 'name' => 'mailchimp-sync', 'reset' => FALSE));
$this->assertEquals(0, $queue->numberOfItems());
}
function testSaveSettings()
{
$mailchimp_list_id = 'MailchimpListsTestListA';
$mailchimp_interest_groups = array('MailchimpTestInterestGroupingA_MailchimpTestInterestGroupA', 'MailchimpTestInterestGroupingA_MailchimpTestInterestGroupC');
$existing_mailchimp_sync_setting = CRM_CiviMailchimp_BAO_SyncSettingsTest::createTestGroupAndSyncSettings('Test Group testFindByContactIdNoSyncSettings', $mailchimp_list_id, $mailchimp_interest_groups);
$params = array('civicrm_group_id' => $existing_mailchimp_sync_setting->civicrm_group_id, 'mailchimp_list_id' => 'MailchimpListsTestListB', 'mailchimp_interest_groups' => NULL);
$mailchimp_sync_setting = CRM_CiviMailchimp_BAO_SyncSettings::saveSettings($params);
$this->assertEquals($existing_mailchimp_sync_setting->id, $mailchimp_sync_setting->id);
$this->assertEquals($existing_mailchimp_sync_setting->civicrm_group_id, $mailchimp_sync_setting->civicrm_group_id);
$this->assertEquals('MailchimpListsTestListB', $mailchimp_sync_setting->mailchimp_list_id);
$this->assertEmpty($mailchimp_sync_setting->mailchimp_interest_groups);
}
function testClearQueueItem()
{
$mailchimp_list_id = 'MailchimpListsTestListA';
$mailchimp_sync_setting = CRM_CiviMailchimp_BAO_SyncSettingsTest::createTestGroupAndSyncSettings('Test Group testClearQueueItem', $mailchimp_list_id);
$group = CRM_CiviMailchimp_Utils::getGroupById($mailchimp_sync_setting->civicrm_group_id);
$params = CRM_CiviMailchimp_UtilsTest::sampleContactParams();
$contact = CRM_Contact_BAO_Contact::create($params);
$queue = CRM_Queue_Service::singleton()->create(array('type' => 'Sql', 'name' => 'mailchimp-sync', 'reset' => TRUE));
civimailchimp_civicrm_contact_removed_from_group($group, $contact);
$item = $queue->claimItem($lease_time = 0);
$existing_mailchimp_sync_log = self::createTestLogMessage('This is a test error message', $details = NULL, $direction = 'civicrm_to_mailchimp', $type = 'error', $item->id);
CRM_CiviMailchimp_BAO_SyncLog::clearQueueItem($item->id);
$query = "\n SELECT\n *\n FROM\n civicrm_queue_item\n WHERE\n queue_name = 'mailchimp-sync'\n AND\n id = %1\n LIMIT 1\n ";
$params = array(1 => array($item->id, 'Integer'));
$new_item = CRM_Core_DAO::executeQuery($query, $params, TRUE, 'CRM_Queue_DAO_QueueItem');
$mailchimp_sync_log = CRM_CiviMailchimp_BAO_SyncLog::findById($existing_mailchimp_sync_log->id);
$this->assertFalse($new_item->fetch());
$this->assertNull($mailchimp_sync_log->civicrm_queue_item_id);
}
function testMailchimpWebhookCleaned()
{
$sample_data = self::sampleRequestSubscribeOrProfileUpdate();
$contact = CRM_CiviMailchimp_Utils::createContactFromMailchimpRequest($sample_data);
$sync_settings = CRM_CiviMailchimp_BAO_SyncSettingsTest::createTestGroupAndSyncSettings('test_group_mailchimp_webhook_cleaned');
CRM_Contact_BAO_GroupContact::addContactsToGroup(array($contact->id), $sync_settings->civicrm_group_id);
$email2 = new CRM_Core_BAO_Email();
$email2->contact_id = $contact->id;
$email2->email = 'civimailchimp_cleaned_test' . rand() . '@civimailchimp.org';
$email2->save();
$clean_request = self::getCleanRequestFromSampleProfileData($sample_data);
CRM_CiviMailchimp_Page_Webhook::mailchimpWebhookCleaned($clean_request);
$mailchimp_contact = CRM_CiviMailchimp_Utils::getContactById($contact->id);
$this->assertEquals($mailchimp_contact->email[0]->on_hold, 1);
$this->assertEquals($mailchimp_contact->email[1]->on_hold, 0);
}
