interval(1));
}
#0013076: different content when forwarding 'to a friend'
if (FORWARD_ALTERNATIVE_CONTENT) {
$forwardContent = count($forwardedby) > 0;
} else {
$forwardContent = 0;
}
if (empty($cached[$messageid])) {
if (!precacheMessage($messageid, $forwardContent)) {
unset($cached[$messageid]);
logEvent('Error loading message ' . $messageid . ' in cache');
return 0;
}
} else {
# dbg("Using cached {$cached[$messageid]["fromemail"]}");
if (VERBOSE) {
output('Using cached message');
}
}
if (VERBOSE) {
output(s('Sending message %d with subject %s to %s', $messageid, $cached[$messageid]['subject'], $email));
}
## at this stage we don't know whether the content is HTML or text, it's just content
$content = $cached[$messageid]['content'];
if (VERBOSE && $getspeedstats) {
output('Load user start');
}
$userdata = array();
$user_att_values = array();
#0011857: forward to friend, retain attributes
if ($hash == 'forwarded' && defined('KEEPFORWARDERATTRIBUTES') && KEEPFORWARDERATTRIBUTES) {
$user_att_values = getUserAttributeValues($forwardedby['email']);
} elseif ($hash != 'forwarded') {
$user_att_values = getUserAttributeValues($email);
}
if (!is_array($user_att_values)) {
$user_att_values = array();
}
foreach ($user_att_values as $key => $val) {
$newkey = cleanAttributeName($key);
## in the help, we only list attributes with "strlen <= 30"
unset($user_att_values[$key]);
if (strlen($key) <= 30) {
$user_att_values[$newkey] = $val;
}
}
# print '';var_dump($user_att_values);print '
';exit;
$query = sprintf('select * from %s where email = "%s"', $GLOBALS['tables']['user'], sql_escape($email));
$userdata = Sql_Fetch_Assoc_Query($query);
if (empty($userdata['id'])) {
$userdata = array();
}
#var_dump($userdata);
if (stripos($content, '[LISTS]') !== false) {
$listsarr = array();
$req = Sql_Query(sprintf('select list.name,list.active from %s as list,%s as listuser where list.id = listuser.listid and listuser.userid = %d',
$GLOBALS['tables']['list'], $GLOBALS['tables']['listuser'], $userdata['id']));
while ($row = Sql_Fetch_Assoc($req)) {
if ($row['active'] || PREFERENCEPAGE_SHOW_PRIVATE_LISTS) {
array_push($listsarr, stripslashes($row['name']));
}
}
if (!empty($listsarr)) {
$html['lists'] = implode('
', $listsarr);
$text['lists'] = implode("\n", $listsarr);
} else {
$html['lists'] = $GLOBALS['strNoListsFound'];
$text['lists'] = $GLOBALS['strNoListsFound'];
}
unset($listsarr);
}
if (VERBOSE && $getspeedstats) {
output('Load user end');
}
if ($cached[$messageid]['userspecific_url']) {
if (VERBOSE && $getspeedstats) {
output('fetch personal URL start');
}
## Fetch external content, only if the URL has placeholders
if ($GLOBALS['can_fetchUrl'] && preg_match("/\[URL:([^\s]+)\]/i", $content, $regs)) {
while (isset($regs[1]) && strlen($regs[1])) {
$url = $regs[1];
if (!preg_match('/^http/i', $url)) {
$url = 'http://' . $url;
}
$remote_content = fetchUrl($url, $userdata);
# @@ don't use this
# $remote_content = includeStyles($remote_content);
if ($remote_content) {
## @TODO, work out a nice way to do this: ##17197
## collecting different remote URLS only works if they do not have html and body tags.
## but if we strip them here, that might affect specially crafted ones, eg
if (0) {
$remote_content = preg_replace('/]*>/', '', $remote_content);
$remote_content = preg_replace('/]*>/', '', $remote_content);
$remote_content = preg_replace('/<\/html[^>]*>/', '', $remote_content);
$remote_content = preg_replace('/<\/body[^>]*>/', '', $remote_content);
}
$content = str_replace($regs[0], '' . $remote_content, $content);
$cached[$messageid]['htmlformatted'] = strip_tags($content) != $content;
} else {
logEvent("Error fetching URL: $regs[1] to send to $email");
return 0;
}
preg_match("/\[URL:([^\s]+)\]/i", $content, $regs);
}
}
if (VERBOSE && $getspeedstats) {
output('fetch personal URL end');
}
}
if (VERBOSE && $getspeedstats) {
output('define placeholders start');
}
$url = getConfig('unsubscribeurl');
## https://mantis.phplist.com/view.php?id=16680 -> the "sep" should be & for the text links
$sep = strpos($url, '?') === false ? '?' : '&';
$html['unsubscribe'] = sprintf('%s', $url, htmlspecialchars($sep), $hash, $strUnsubscribe);
$text['unsubscribe'] = sprintf('%s%suid=%s', $url, $sep, $hash);
$text['jumpoff'] = sprintf('%s%suid=%s&jo=1', $url, $sep, $hash);
$html['unsubscribeurl'] = sprintf('%s%suid=%s', $url, htmlspecialchars($sep), $hash);
$text['unsubscribeurl'] = sprintf('%s%suid=%s', $url, $sep, $hash);
$text['jumpoffurl'] = sprintf('%s%suid=%s&jo=1', $url, $sep, $hash);
#0013076: Blacklisting posibility for unknown users
$url = getConfig('blacklisturl');
$sep = strpos($url, '?') === false ? '?' : '&';
$html['blacklist'] = sprintf('%s', $url, htmlspecialchars($sep), $email,
$strUnsubscribe);
$text['blacklist'] = sprintf('%s%semail=%s', $url, $sep, $email);
$html['blacklisturl'] = sprintf('%s%semail=%s', $url, htmlspecialchars($sep), $email);
$text['blacklisturl'] = sprintf('%s%semail=%s', $url, $sep, $email);
#0013076: Problem found during testing: message part must be parsed correctly as well.
if (count($forwardedby) && isset($forwardedby['email'])) {
$html['unsubscribe'] = $html['blacklist'];
$text['unsubscribe'] = $text['blacklist'];
$html['forwardedby'] = $forwardedby['email'];
$text['forwardedby'] = $forwardedby['email'];
}
$url = getConfig('subscribeurl');
$sep = strpos($url, '?') === false ? '?' : '&';
$html['subscribe'] = sprintf('%s', $url, $strThisLink);
$text['subscribe'] = sprintf('%s', $url);
$html['subscribeurl'] = sprintf('%s', $url);
$text['subscribeurl'] = sprintf('%s', $url);
$url = getConfig('forwardurl');
$sep = strpos($url, '?') === false ? '?' : '&';
$html['forward'] = sprintf('%s', $url, htmlspecialchars($sep), $hash,
$messageid, $strThisLink);
$text['forward'] = sprintf('%s%suid=%s&mid=%d', $url, $sep, $hash, $messageid);
$html['forwardurl'] = sprintf('%s%suid=%s&mid=%d', $url, htmlspecialchars($sep), $hash, $messageid);
$text['forwardurl'] = $text['forward'];
$html['messageid'] = sprintf('%d', $messageid);
$text['messageid'] = sprintf('%d', $messageid);
$url = getConfig('forwardurl');
# make sure there are no newlines, otherwise they get turned into
s
$html['forwardform'] = '';#sprintf('',$url,$hash,$messageid,$GLOBALS['strForward']);
$text['signature'] = "\n\n-- powered by phpList, www.phplist.com --\n\n";
$url = getConfig('preferencesurl');
$sep = strpos($url, '?') === false ? '?' : '&';
$html['preferences'] = sprintf('%s', $url, htmlspecialchars($sep), $hash, $strThisLink);
$text['preferences'] = sprintf('%s%suid=%s', $url, $sep, $hash);
$html['preferencesurl'] = sprintf('%s%suid=%s', $url, htmlspecialchars($sep), $hash);
$text['preferencesurl'] = sprintf('%s%suid=%s', $url, $sep, $hash);
$url = getConfig('confirmationurl');
$sep = strpos($url, '?') === false ? '?' : '&';
$html['confirmationurl'] = sprintf('%s%suid=%s', $url, htmlspecialchars($sep), $hash);
$text['confirmationurl'] = sprintf('%s%suid=%s', $url, $sep, $hash);
#historical, not sure it's still used
$html['userid'] = $hash;
$text['userid'] = $hash;
$html['website'] = $GLOBALS['website']; # Your website's address, e.g. www.yourdomain.com
$text['website'] = $GLOBALS['website'];
$html['domain'] = $GLOBALS['domain']; # Your domain, e.g. yourdomain.com
$text['domain'] = $GLOBALS['domain'];
if ($hash != 'forwarded') {
$text['footer'] = $cached[$messageid]['textfooter'];
$html['footer'] = $cached[$messageid]['htmlfooter'];
} else {
#0013076: different content when forwarding 'to a friend'
if (FORWARD_ALTERNATIVE_CONTENT) {
$text['footer'] = stripslashes($messagedata['forwardfooter']);
} else {
$text['footer'] = getConfig('forwardfooter');
}
$html['footer'] = $text['footer'];
}
/*
We request you retain the signature below in your emails including the links.
This not only gives respect to the large amount of time given freely
by the developers but also helps build interest, traffic and use of
phpList, which is beneficial to it's future development.
You can configure how the credits are added to your pages and emails in your
config file.
Michiel Dethmers, phpList Ltd 2003 - 2013
*/
if (!EMAILTEXTCREDITS) {
$html['signature'] = $PoweredByImage;#'';
# oops, accidentally became spyware, never intended that, so take it out again :-)
$html['signature'] = preg_replace('/src=".*power-phplist.png"/', 'src="powerphplist.png"', $html['signature']);
} else {
$html['signature'] = $PoweredByText;
}
# $content = $cached[$messageid]["htmlcontent"];
if (VERBOSE && $getspeedstats) {
output('define placeholders end');
}
## Fill text and html versions depending on given versions.
if (VERBOSE && $getspeedstats) {
output('parse text to html or html to text start');
}
if ($cached[$messageid]['htmlformatted']) {
if (empty($cached[$messageid]['textcontent'])) {
$textcontent = HTML2Text($content);
} else {
$textcontent = $cached[$messageid]['textcontent'];
}
$htmlcontent = $content;
} else {
if (empty($cached[$messageid]['textcontent'])) {
$textcontent = $content;
} else {
$textcontent = $cached[$messageid]['textcontent'];
}
$htmlcontent = parseText($content);
}
if (VERBOSE && $getspeedstats) {
output('parse text to html or html to text end');
}
$defaultstyle = getConfig('html_email_style');
$adddefaultstyle = 0;
if (VERBOSE && $getspeedstats) {
output('merge into template start');
}
if ($cached[$messageid]['template']) {
# template used
$htmlmessage = str_replace('[CONTENT]', $htmlcontent, $cached[$messageid]['template']);
} else {
# no template used
$htmlmessage = $htmlcontent;
$adddefaultstyle = 1;
}
$textmessage = $textcontent;
if (VERBOSE && $getspeedstats) {
output('merge into template end');
}
## Parse placeholders
if (VERBOSE && $getspeedstats) {
output('parse placeholders start');
}
/*
var_dump($html);
var_dump($userdata);
var_dump($user_att_values);
exit;
*/
# print htmlspecialchars($htmlmessage);exit;
### @@@TODO don't use forward and forward form in a forwarded message as it'll fail
if (strpos($htmlmessage, '[FOOTER]') !== false) {
$htmlmessage = str_ireplace('[FOOTER]', $html['footer'], $htmlmessage);
} elseif ($html['footer']) {
$htmlmessage = addHTMLFooter($htmlmessage, '
' . $html['footer']);
}
if (strpos($htmlmessage, '[SIGNATURE]') !== false) {
$htmlmessage = str_ireplace('[SIGNATURE]', $html['signature'], $htmlmessage);
} else {
# BUGFIX 0015303, 2/2
// $htmlmessage .= '
'.$html["signature"];
$htmlmessage = addHTMLFooter($htmlmessage, '
' . $html['signature']);
}
# END BUGFIX 0015303, 2/2
if (strpos($textmessage, '[FOOTER]')) {
$textmessage = str_ireplace('[FOOTER]', $text['footer'], $textmessage);
} else {
$textmessage .= "\n\n" . $text['footer'];
}
if (strpos($textmessage, '[SIGNATURE]')) {
$textmessage = str_ireplace('[SIGNATURE]', $text['signature'], $textmessage);
} else {
$textmessage .= "\n" . $text['signature'];
}
### addition to handle [FORWARDURL:Message ID:Link Text] (link text optional)
while (preg_match('/\[FORWARD:([^\]]+)\]/Uxm', $htmlmessage, $regs)) {
$newforward = $regs[1];
$matchtext = $regs[0];
if (strpos($newforward, ':')) {
## using FORWARDURL:messageid:linktext
list($forwardmessage, $forwardtext) = explode(':', $newforward);
} else {
$forwardmessage = sprintf('%d', $newforward);
$forwardtext = 'this link';
}
if (!empty($forwardmessage)) {
$url = getConfig('forwardurl');
$sep = strpos($url, '?') === false ? '?' : '&';
$forwardurl = sprintf('%s%suid=%s&mid=%d', $url, $sep, $hash, $forwardmessage);
$htmlmessage = str_replace($matchtext,
'' . $forwardtext . '', $htmlmessage);
} else {
## make sure to remove the match, otherwise, it'll be an eternal loop
$htmlmessage = str_replace($matchtext, '', $htmlmessage);
}
}
## the text message has to be parsed seperately, because the line might wrap if the text for the link is long, so the match text is different
while (preg_match('/\[FORWARD:([^\]]+)\]/Uxm', $textmessage, $regs)) {
$newforward = $regs[1];
$matchtext = $regs[0];
if (strpos($newforward, ':')) {
## using FORWARDURL:messageid:linktext
list($forwardmessage, $forwardtext) = explode(':', $newforward);
} else {
$forwardmessage = sprintf('%d', $newforward);
$forwardtext = 'this link';
}
if (!empty($forwardmessage)) {
$url = getConfig('forwardurl');
$sep = strpos($url, '?') === false ? '?' : '&';
$forwardurl = sprintf('%s%suid=%s&mid=%d', $url, $sep, $hash, $forwardmessage);
$textmessage = str_replace($matchtext, $forwardtext . ' ' . $forwardurl, $textmessage);
} else {
## make sure to remove the match, otherwise, it'll be an eternal loop
$textmessage = str_replace($matchtext, '', $textmessage);
}
}
# $req = Sql_Query(sprintf('select filename,data from %s where template = %d',
# $GLOBALS["tables"]["templateimage"],$cached[$messageid]["templateid"]));
if (ALWAYS_ADD_USERTRACK) {
if (stripos($htmlmessage, '')) {
$htmlmessage = str_replace('',
'