public static function scan_and_replace(&$msg, $mailing_id, $queue_id, $onlyHrefs = false)
{
if (!$mailing_id) {
return;
}
$protos = '(https?|ftp)';
$letters = '\\w';
$gunk = '/#~:.?+=&%@!\\-';
$punc = '.:?\\-';
$any = "{$letters}{$gunk}{$punc}";
if ($onlyHrefs) {
$pattern = "{\\b(href=([\"'])?({$protos}:[{$any}]+?(?=[{$punc}]*[^{$any}]|\$))([\"'])?)}im";
} else {
$pattern = "{\\b({$protos}:[{$any}]+?(?=[{$punc}]*[^{$any}]|\$))}eim";
}
$trackURL = CRM_Mailing_BAO_TrackableURL::getTrackerURL('\\1', $mailing_id, $queue_id);
$replacement = $onlyHrefs ? "href=\"{$trackURL}\"" : "\"{$trackURL}\"";
$msg = preg_replace($pattern, $replacement, $msg);
}
/**
*
* getTokenData receives a token from an email
* and returns the appropriate data for the token
*/
private function getTokenData(&$token_a, $html = FALSE, &$contact, &$verp, &$urls, $event_queue_id)
{
$type = $token_a['type'];
$token = $token_a['token'];
$data = $token;
$useSmarty = defined('CIVICRM_MAIL_SMARTY') && CIVICRM_MAIL_SMARTY ? TRUE : FALSE;
if ($type == 'embedded_url') {
$embed_data = array();
foreach ($token as $t) {
$embed_data[] = $this->getTokenData($t, $html = FALSE, $contact, $verp, $urls, $event_queue_id);
}
$numSlices = count($embed_data);
$url = '';
for ($i = 0; $i < $numSlices; $i++) {
$url .= "{$token_a['embed_parts'][$i]}{$embed_data[$i]}";
}
if (isset($token_a['embed_parts'][$numSlices])) {
$url .= $token_a['embed_parts'][$numSlices];
}
// add trailing quote since we've gobbled it up in a previous regex
// function getPatterns, line 431
if (preg_match('/^href[ ]*=[ ]*\'/', $url)) {
$url .= "'";
} elseif (preg_match('/^href[ ]*=[ ]*\\"/', $url)) {
$url .= '"';
}
$data = $url;
} elseif ($type == 'url') {
if ($this->url_tracking) {
$data = CRM_Mailing_BAO_TrackableURL::getTrackerURL($token, $this->id, $event_queue_id);
if (!empty($html)) {
$data = htmlentities($data, ENT_NOQUOTES);
}
} else {
$data = $token;
}
} elseif ($type == 'contact') {
$data = CRM_Utils_Token::getContactTokenReplacement($token, $contact, FALSE, FALSE, $useSmarty);
} elseif ($type == 'action') {
$data = CRM_Utils_Token::getActionTokenReplacement($token, $verp, $urls, $html);
} elseif ($type == 'domain') {
$domain = CRM_Core_BAO_Domain::getDomain();
$data = CRM_Utils_Token::getDomainTokenReplacement($token, $domain, $html);
} elseif ($type == 'mailing') {
if ($token == 'name') {
$data = $this->name;
} elseif ($token == 'group') {
$groups = $this->getGroupNames();
$data = implode(', ', $groups);
}
} else {
$data = CRM_Utils_Array::value("{$type}.{$token}", $contact);
}
return $data;
}
/**
*
* getTokenData receives a token from an email
* and returns the appropriate data for the token
*
*/
private function getTokenData(&$token_a, $html = false, &$contact, &$verp, &$urls, $event_queue_id)
{
$type = $token_a['type'];
$token = $token_a['token'];
$data = $token;
$escapeSmarty = defined('CIVICRM_MAIL_SMARTY') ? true : false;
if ($type == 'embedded_url') {
$embed_data = array();
foreach ($token as $t) {
$embed_data[] = $this->getTokenData($t, $html = false, $contact, $verp, $urls, $event_queue_id);
}
$numSlices = count($embed_data);
$url = '';
for ($i = 0; $i < $numSlices; $i++) {
$url .= "{$token_a['embed_parts'][$i]}{$embed_data[$i]}";
}
if (isset($token_a['embed_parts'][$numSlices])) {
$url .= $token_a['embed_parts'][$numSlices];
}
// add trailing quote since we've gobbled it up in a previous regex
// function getPatterns, line 431
if (preg_match('/^href[ ]*=[ ]*\'/', $url)) {
$url .= "'";
} else {
if (preg_match('/^href[ ]*=[ ]*\\"/', $url)) {
$url .= '"';
}
}
$data = $url;
} else {
if ($type == 'url') {
if ($this->url_tracking) {
$data = CRM_Mailing_BAO_TrackableURL::getTrackerURL($token, $this->id, $event_queue_id);
} else {
$data = $token;
}
} else {
if ($type == 'contact') {
$data = CRM_Utils_Token::getContactTokenReplacement($token, $contact, false, false, $escapeSmarty);
} else {
if ($type == 'action') {
$data = CRM_Utils_Token::getActionTokenReplacement($token, $verp, $urls, $html);
} else {
if ($type == 'domain') {
require_once 'CRM/Core/BAO/Domain.php';
$domain =& CRM_Core_BAO_Domain::getDomain();
$data = CRM_Utils_Token::getDomainTokenReplacement($token, $domain, $html);
} else {
if ($type == 'mailing') {
require_once 'CRM/Mailing/BAO/Mailing.php';
$mailing = new CRM_Mailing_BAO_Mailing();
$mailing->find(true);
if ($token == 'name') {
$data = $mailing->name;
} else {
if ($token == 'group') {
$groups = $mailing->getGroupNames();
$data = implode(', ', $groups);
}
}
} else {
$data = CRM_Utils_Array::value("{$type}.{$token}", $contact);
}
}
}
}
}
}
return $data;
}
