168 lines
4.0 KiB
PHP
168 lines
4.0 KiB
PHP
<?php
|
|
/**
|
|
* @class socketMail
|
|
* @brief Send email through socket
|
|
*
|
|
* @package Clearbricks
|
|
* @subpackage Mail
|
|
*
|
|
* @copyright Olivier Meunier & Association Dotclear
|
|
* @copyright GPL-2.0-only
|
|
*/
|
|
|
|
class socketMail
|
|
{
|
|
public static $fp;
|
|
public static $timeout = 10; ///< integer: Socket timeout
|
|
public static $smtp_relay = null; ///< string: SMTP Relay to user
|
|
|
|
/**
|
|
* Send email through socket
|
|
*
|
|
* This static method sends an email through a simple socket connection.
|
|
* If {@link $smtp_relay} is set, it will be used as a relay to send the
|
|
* email. Instead, email is sent directly to MX host of domain.
|
|
*
|
|
* @param string $to Email destination
|
|
* @param string $subject Email subject
|
|
* @param string $message Email message
|
|
* @param string|array $headers Email headers
|
|
* @throws Exception
|
|
*/
|
|
public static function mail($to, $subject, $message, $headers = null)
|
|
{
|
|
$from = self::getFrom($headers);
|
|
|
|
$H = 'Return-Path: <' . $from . ">\r\n";
|
|
|
|
$from_host = explode('@', $from);
|
|
$from_host = $from_host[1];
|
|
|
|
$to_host = explode('@', $to);
|
|
$to_host = $to_host[1];
|
|
|
|
if (self::$smtp_relay != null) {
|
|
$mx = [gethostbyname(self::$smtp_relay) => 1];
|
|
} else {
|
|
$mx = mail::getMX($to_host);
|
|
}
|
|
|
|
foreach ($mx as $h => $w) {
|
|
self::$fp = @fsockopen($h, 25, $errno, $errstr, self::$timeout);
|
|
|
|
if (self::$fp !== false) {
|
|
break;
|
|
}
|
|
}
|
|
|
|
if (!is_resource(self::$fp)) {
|
|
self::$fp = null;
|
|
throw new Exception('Unable to open socket');
|
|
}
|
|
|
|
# We need to read the first line
|
|
fgets(self::$fp);
|
|
|
|
$data = '';
|
|
# HELO cmd
|
|
if (!self::cmd('HELO ' . $from_host, $data)) {
|
|
self::quit();
|
|
throw new Exception($data);
|
|
}
|
|
|
|
# MAIL FROM: <...>
|
|
if (!self::cmd('MAIL FROM: <' . $from . '>', $data)) {
|
|
self::quit();
|
|
throw new Exception($data);
|
|
}
|
|
|
|
# RCPT TO: <...>
|
|
if (!self::cmd('RCPT TO: <' . $to . '>', $data)) {
|
|
self::quit();
|
|
throw new Exception($data);
|
|
}
|
|
|
|
# Compose mail and send it with DATA
|
|
$H = 'Return-Path: <' . $from . ">\r\n";
|
|
$H .= 'To: <' . $to . ">\r\n";
|
|
$H .= 'Subject: ' . $subject . "\r\n";
|
|
$H .= $headers . "\r\n";
|
|
|
|
$message = $H . "\r\n\r\n" . $message;
|
|
|
|
if (!self::sendMessage($message, $data)) {
|
|
self::quit();
|
|
throw new Exception($data);
|
|
}
|
|
|
|
self::quit();
|
|
}
|
|
|
|
private static function getFrom($headers)
|
|
{
|
|
$f = '';
|
|
|
|
if (preg_match('/^from: (.+?)$/msi', $headers, $m)) {
|
|
$f = trim($m[1]);
|
|
}
|
|
|
|
if (preg_match('/(?:<)(.+?)(?:$|>)/si', $f, $m)) {
|
|
$f = trim($m[1]);
|
|
} elseif (preg_match('/^(.+?)\(/si', $f, $m)) {
|
|
$f = trim($m[1]);
|
|
} elseif (!text::isEmail($f)) {
|
|
$f = trim(ini_get('sendmail_from'));
|
|
}
|
|
|
|
if (!$f) {
|
|
throw new Exception('No valid from e-mail address');
|
|
}
|
|
|
|
return $f;
|
|
}
|
|
|
|
private static function cmd($out, &$data = '')
|
|
{
|
|
fwrite(self::$fp, $out . "\r\n");
|
|
$data = self::data();
|
|
|
|
if (substr($data, 0, 3) != '250') {
|
|
return false;
|
|
}
|
|
|
|
return true;
|
|
}
|
|
|
|
private static function data()
|
|
{
|
|
$s = '';
|
|
stream_set_timeout(self::$fp, 2);
|
|
|
|
for ($i = 0; $i < 2; $i++) {
|
|
$s .= fgets(self::$fp, 1024);
|
|
}
|
|
|
|
return $s;
|
|
}
|
|
|
|
private static function sendMessage($msg, &$data)
|
|
{
|
|
$msg .= "\r\n.";
|
|
|
|
self::cmd('DATA', $data);
|
|
|
|
if (substr($data, 0, 3) != '354') {
|
|
return false;
|
|
}
|
|
|
|
return self::cmd($msg, $data);
|
|
}
|
|
|
|
private static function quit()
|
|
{
|
|
self::cmd('QUIT');
|
|
fclose(self::$fp);
|
|
self::$fp = null;
|
|
}
|
|
}
|