3 +--------------------------------------------------------------------+
4 | CiviCRM version 4.7 |
5 +--------------------------------------------------------------------+
6 | Copyright CiviCRM LLC (c) 2004-2015 |
7 +--------------------------------------------------------------------+
8 | This file is a part of CiviCRM. |
10 | CiviCRM is free software; you can copy, modify, and distribute it |
11 | under the terms of the GNU Affero General Public License |
12 | Version 3, 19 November 2007 and the CiviCRM Licensing Exception. |
14 | CiviCRM is distributed in the hope that it will be useful, but |
15 | WITHOUT ANY WARRANTY; without even the implied warranty of |
16 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. |
17 | See the GNU Affero General Public License for more details. |
19 | You should have received a copy of the GNU Affero General Public |
20 | License and the CiviCRM Licensing Exception along |
21 | with this program; if not, contact CiviCRM LLC |
22 | at info[AT]civicrm[DOT]org. If you have questions about the |
23 | GNU Affero General Public License or the licensing of CiviCRM, |
24 | see the CiviCRM license FAQ at http://civicrm.org/licensing |
25 +--------------------------------------------------------------------+
31 * @copyright CiviCRM LLC (c) 2004-2015
36 require_once 'Mail/mime.php';
39 * Class CRM_Mailing_Event_BAO_Confirm
41 class CRM_Mailing_Event_BAO_Confirm
extends CRM_Mailing_Event_DAO_Confirm
{
46 public function __construct() {
47 parent
::__construct();
51 * Confirm a pending subscription.
53 * @param int $contact_id
54 * The id of the contact.
55 * @param int $subscribe_id
56 * The id of the subscription event.
63 public static function confirm($contact_id, $subscribe_id, $hash) {
64 $se = &CRM_Mailing_Event_BAO_Subscribe
::verify(
74 // before we proceed lets just check if this contact is already 'Added'
75 // if so, we should ignore this request and hence avoid sending multiple
77 $details = CRM_Contact_BAO_GroupContact
::getMembershipDetail($contact_id, $se->group_id
);
78 if ($details && $details->status
== 'Added') {
79 // This contact is already subscribed
80 // lets return the group title
81 return CRM_Core_DAO
::getFieldValue(
82 'CRM_Contact_DAO_Group',
88 $transaction = new CRM_Core_Transaction();
90 $ce = new CRM_Mailing_Event_BAO_Confirm();
91 $ce->event_subscribe_id
= $se->id
;
92 $ce->time_stamp
= date('YmdHis');
95 CRM_Contact_BAO_GroupContact
::addContactsToGroup(
103 $transaction->commit();
105 $config = CRM_Core_Config
::singleton();
107 $domain = CRM_Core_BAO_Domain
::getDomain();
108 list($domainEmailName, $_) = CRM_Core_BAO_Domain
::getNameAndEmail();
110 list($display_name, $email) = CRM_Contact_BAO_Contact_Location
::getEmailDetails($se->contact_id
);
112 $group = new CRM_Contact_DAO_Group();
113 $group->id
= $se->group_id
;
116 $component = new CRM_Mailing_BAO_Component();
117 $component->is_default
= 1;
118 $component->is_active
= 1;
119 $component->component_type
= 'Welcome';
121 $component->find(TRUE);
123 $emailDomain = CRM_Core_BAO_MailSettings
::defaultDomain();
125 $html = $component->body_html
;
127 if ($component->body_text
) {
128 $text = $component->body_text
;
131 $text = CRM_Utils_String
::htmlToText($component->body_html
);
134 $bao = new CRM_Mailing_BAO_Mailing();
135 $bao->body_text
= $text;
136 $bao->body_html
= $html;
137 $tokens = $bao->getTokens();
139 $html = CRM_Utils_Token
::replaceDomainTokens($html, $domain, TRUE, $tokens['html']);
140 $html = CRM_Utils_Token
::replaceWelcomeTokens($html, $group->title
, TRUE);
142 $text = CRM_Utils_Token
::replaceDomainTokens($text, $domain, FALSE, $tokens['text']);
143 $text = CRM_Utils_Token
::replaceWelcomeTokens($text, $group->title
, FALSE);
146 'groupName' => 'Mailing Event ' . $component->component_type
,
147 'subject' => $component->subject
,
148 'from' => "\"$domainEmailName\" <do-not-reply@$emailDomain>",
150 'toName' => $display_name,
151 'replyTo' => "do-not-reply@$emailDomain",
152 'returnPath' => "do-not-reply@$emailDomain",
156 // send - ignore errors because the desired status change has already been successful
157 $unused_result = CRM_Utils_Mail
::send($mailParams);
159 return $group->title
;