CRM/Mailing/Event/BAO/Confirm.php

   1 <?php
   2 /*
   3  +--------------------------------------------------------------------+
   4  | CiviCRM version 4.6                                                |
   5  +--------------------------------------------------------------------+
   6  | Copyright CiviCRM LLC (c) 2004-2014                                |
   7  +--------------------------------------------------------------------+
   8  | This file is a part of CiviCRM.                                    |
   9  |                                                                    |
  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.   |
  13  |                                                                    |
  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.        |
  18  |                                                                    |
  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  +--------------------------------------------------------------------+
  26 */
  27
  28 /**
  29  *
  30  * @package CRM
  31  * @copyright CiviCRM LLC (c) 2004-2014
  32  * $Id$
  33  *
  34  */
  35
  36 require_once 'Mail/mime.php';
  37
  38 /**
  39  * Class CRM_Mailing_Event_BAO_Confirm
  40  */
  41 class CRM_Mailing_Event_BAO_Confirm extends CRM_Mailing_Event_DAO_Confirm {
  42
  43   /**
  44    * Class constructor
  45    */
  46   function __construct() {
  47     parent::__construct();
  48   }
  49
  50   /**
  51    * Confirm a pending subscription
  52    *
  53    * @param int $contact_id       The id of the contact
  54    * @param int $subscribe_id     The id of the subscription event
  55    * @param string $hash          The hash
  56    *
  57    * @return boolean              True on success
  58    * @access public
  59    * @static
  60    */
  61   public static function confirm($contact_id, $subscribe_id, $hash) {
  62     $se = &CRM_Mailing_Event_BAO_Subscribe::verify(
  63       $contact_id,
  64       $subscribe_id,
  65       $hash
  66     );
  67
  68     if (!$se) {
  69       return FALSE;
  70     }
  71
  72     // before we proceed lets just check if this contact is already 'Added'
  73     // if so, we should ignore this request and hence avoid sending multiple
  74     // emails - CRM-11157
  75     $details = CRM_Contact_BAO_GroupContact::getMembershipDetail($contact_id, $se->group_id);
  76     if ($details && $details->status == 'Added') {
  77       // This contact is already subscribed
  78       // lets return the group title
  79       return CRM_Core_DAO::getFieldValue(
  80         'CRM_Contact_DAO_Group',
  81         $se->group_id,
  82         'title'
  83       );
  84     }
  85
  86     $transaction = new CRM_Core_Transaction();
  87
  88     $ce = new CRM_Mailing_Event_BAO_Confirm();
  89     $ce->event_subscribe_id = $se->id;
  90     $ce->time_stamp = date('YmdHis');
  91     $ce->save();
  92
  93     CRM_Contact_BAO_GroupContact::addContactsToGroup(
  94       array($contact_id),
  95       $se->group_id,
  96       'Email',
  97       'Added',
  98       $ce->id
  99     );
 100
 101     $transaction->commit();
 102
 103     $config = CRM_Core_Config::singleton();
 104
 105     $domain = CRM_Core_BAO_Domain::getDomain();
 106     list($domainEmailName, $_) = CRM_Core_BAO_Domain::getNameAndEmail();
 107
 108     list($display_name, $email) = CRM_Contact_BAO_Contact_Location::getEmailDetails($se->contact_id);
 109
 110     $group = new CRM_Contact_DAO_Group();
 111     $group->id = $se->group_id;
 112     $group->find(TRUE);
 113
 114     $component = new CRM_Mailing_BAO_Component();
 115     $component->is_default = 1;
 116     $component->is_active = 1;
 117     $component->component_type = 'Welcome';
 118
 119     $component->find(TRUE);
 120
 121     $emailDomain = CRM_Core_BAO_MailSettings::defaultDomain();
 122
 123     $html = $component->body_html;
 124
 125     if ($component->body_text) {
 126       $text = $component->body_text;
 127     }
 128     else {
 129       $text = CRM_Utils_String::htmlToText($component->body_html);
 130     }
 131
 132     $bao            = new CRM_Mailing_BAO_Mailing();
 133     $bao->body_text = $text;
 134     $bao->body_html = $html;
 135     $tokens         = $bao->getTokens();
 136
 137     $html = CRM_Utils_Token::replaceDomainTokens($html, $domain, TRUE, $tokens['html']);
 138     $html = CRM_Utils_Token::replaceWelcomeTokens($html, $group->title, TRUE);
 139
 140     $text = CRM_Utils_Token::replaceDomainTokens($text, $domain, FALSE, $tokens['text']);
 141     $text = CRM_Utils_Token::replaceWelcomeTokens($text, $group->title, FALSE);
 142
 143     $mailParams = array(
 144       'groupName' => 'Mailing Event ' . $component->component_type, 'subject' => $component->subject,
 145       'from' => "\"$domainEmailName\" <do-not-reply@$emailDomain>",
 146       'toEmail' => $email,
 147       'toName' => $display_name,
 148       'replyTo' => "do-not-reply@$emailDomain",
 149       'returnPath' => "do-not-reply@$emailDomain",
 150       'html' => $html,
 151       'text' => $text,
 152     );
 153     // send - ignore errors because the desired status change has already been successful
 154     $unused_result = CRM_Utils_Mail::send($mailParams);
 155
 156     return $group->title;
 157   }
 158 }
 159