{
$msg = new BananaMessage();
$msg->msg_headers = $headers;
- $msg->makeTextPart($body, 'text/plain', '8bits', 'UTF-8', 'fixed');
+ $msg->makeTextPart($body, 'text/plain', '8bits', 'UTF-8', 'flowed');
if (!is_null($file)) {
$msg->addAttachment($file);
}
return substr($res,0, -2);
case "from":
- return BananaMessage::formatFrom($text);
+ return BananaMessage::formatFrom($text, $this->headers['subject']);
case "references": case "in-reply-to":
$rsl = "";
return $rsl;
case "subject":
- $link = null;
$text = stripslashes($text);
- if (function_exists('hook_getSubject')) {
- $link = hook_getSubject($text);
- }
- return banana_catchFormats($text) . $link;
+ $text = banana_htmlentities($text);
+ return banana_catchFormats($text);
default:
return $text;
}
if ($hdr == 'date') {
return strtotime($this->headers['date']);
+ } else if ($hdr == 'references' || $hdr == 'reply-to') {
+ return str_replace('><', '> <', $this->headers[$hdr]);
} else {
return $this->headers[$hdr];
}
return array_merge($headers, parent::getHeaders());
}
- static public function formatFrom($text)
+ static public function formatFrom($text, $subject = '')
{
# From: mark@cbosgd.ATT.COM
# From: <mark@cbosgd.ATT.COM>
# From: mark@cbosgd.ATT.COM (Mark Horton)
# From: Mark Horton <mark@cbosgd.ATT.COM>
$mailto = '<a href="mailto:';
-
+
$result = banana_htmlentities($text);
- if (preg_match("/^([^ ]+@[^ ]+)$/", $text, $regs)) {
- $result = $mailto . $regs[1] . '">' . banana_htmlentities($regs[1]) . '</a>';
+ if ($subject) {
+ $subject = '?subject=' . banana_htmlentities(_b_('Re: ') . $subject, ENT_QUOTES);
}
- if (preg_match("/^<(.+@.+)>$/", $text, $regs)) {
- $result = $mailto . $regs[1] . '">' . banana_htmlentities($regs[1]) . '</a>';
+ if (preg_match("/^<?([^< ]+@[^> ]+)>?$/", $text, $regs)) {
+ $result = $mailto . $regs[1] . $subject . '">' . banana_htmlentities($regs[1]) . '</a>';
}
if (preg_match("/^([^ ]+@[^ ]+) \((.*)\)$/", $text, $regs)) {
- $result = $mailto . $regs[1] . '">' . banana_htmlentities($regs[2]) . '</a>';
+ $result = $mailto . $regs[1] . $subject . '">' . banana_htmlentities($regs[2]) . '</a>';
}
if (preg_match("/^\"?([^<>\"]+)\"? +<(.+@.+)>$/", $text, $regs)) {
$nom = preg_replace("/^'(.*)'$/", '\1', $regs[1]);
$nom = stripslashes($nom);
- $result = $mailto . $regs[2] . '">' . banana_htmlentities($nom) . '</a>';
+ $result = $mailto . $regs[2] . $subject . '">' . banana_htmlentities($nom) . '</a>';
}
return preg_replace("/\\\(\(|\))/","\\1",$result);
}
+ public function getAuthorName()
+ {
+ $text = $this->getHeaderValue('From');
+ $name = null;
+ if (preg_match("/^([^ ]+@[^ ]+) \((.*)\)$/", $text, $regs)) {
+ $name = $regs[2];
+ }
+ if (preg_match("/^\"?([^<>\"]+)\"? +<(.+@.+)>$/", $text, $regs)) {
+ $name = preg_replace("/^'(.*)'$/", '\1', $regs[1]);
+ $name = stripslashes($name);
+ }
+ if ($name) {
+ return preg_replace("/\\\(\(|\))/","\\1", $name);
+ }
+
+ if (function_exists('hook_getAuthorName') && $name = hook_getAuthorName($this)) {
+ return $name;
+ }
+
+ if (preg_match("/([^< ]+)@([^> ]+)/", $text, $regs)) {
+ return $regs[1];
+ }
+ return 'Anonymous';
+ }
+
static public function formatDate($text)
{
- return utf8_encode(strftime("%A %d %B %Y, %H:%M (fuseau serveur)", strtotime($text)));
+ return strftime("%A %d %B %Y, %H:%M (fuseau serveur)", strtotime($text));
}
public function translateHeaders()
static public function formatReferences(array &$refs)
{
if (isset($refs['references'])) {
- $text = str_replace('><', '> <', $refs['references']);
- return preg_split('/\s/', strtr($text, Banana::$spool->ids));
- } elseif (isset($refs['in-reply-to'])) {
+ $text = preg_split('/\s/', str_replace('><', '> <', $refs['references']));
+ $references = array();
+ foreach ($text as $id=>&$value) {
+ if (isset(Banana::$spool->ids[$value])) {
+ $references[] = Banana::$spool->ids[$value];
+ }
+ }
+ return $references;
+ } elseif (isset($refs['in-reply-to']) && isset(Banana::$spool->ids[$refs['in-reply-to']])) {
return array(Banana::$spool->ids[$refs['in-reply-to']]);
} else {
return array();
exit;
}
- public function getFormattedBody($type = null)
+ public function getFormattedBody(&$reqtype = null)
{
$types = Banana::$msgshow_mimeparts;
- if (!is_null($type)) {
- array_unshift($types, $type);
+ if (!is_null($reqtype)) {
+ array_unshift($types, $reqtype);
}
foreach ($types as $type) {
@list($type, $subtype) = explode('/', $type);
if (empty($parts)) {
continue;
}
+ $reqtype = implode('/', $parts[0]->getType());
return $parts[0]->toHtml();
}
return null;
if (function_exists('hook_checkcancel')) {
return hook_checkcancel($this->headers);
}
- return Banana::$profile['name'] == $this->headers['from'];
+ return Banana::$profile['headers']['From'] == $this->headers['from'];
}
public function canSend()
{
return Banana::$protocole->canSend();
}
+
+ public function getSignature()
+ {
+ $email = $this->getHeaderValue('from');
+ if (preg_match('/<?([^ <]+@[^ >]+)>?/', $email, $matches)) {
+ $email = $matches[1];
+ }
+ $signature = BananaMimePart::getSignature();
+ if (empty($signature)) {
+ return $signature;
+ } else {
+ foreach ($signature['identity'] as $ident) {
+ if (strpos($ident, "<$email>") !== false) {
+ return $signature;
+ }
+ }
+ $signature['certified'] = false;
+ $signature['certification_error'] = 'mauvaise identité';
+ }
+ return $signature;
+ }
}
// vim:set et sw=4 sts=4 ts=4 enc=utf-8: