Пожалуйста поделитесь опытом отправки e-mail'ов с помощью сокетов из PHP

[tigerSL]

Здравствуйте.
Проблема в отправке почты через сокеты. Это нигде не логируется и не найти кто спамит. 25й порт закрыть не могу.
В php можно отключить fsockopen, как в перле не знаю. Хотелось бы контролировать сокеты (ограничивать пользователей или логировать соединения), в какую сторону копать ?

Здравствуйте !
Пожалуйста поделитесь опытом отправки e-mail'ов с помощью сокетов из PHP.
почему то функция приведенная ниже у меня не работает
возможно не правильно к ней обращаюсь, как задать пароль и логин для почтового сервера smtp.ya.ru,
при обращении к такой функции ?
Благодарю!


socketmail( "smtp.ya.ru", "example@yandex.ru", "example@yandex.ru", 'example', 'smtp test');

function socketmail($server, $to, $from, $subject, $message) {
$connect = fsockopen ($server, 25, $errno, $errstr, 30);
fputs($connect, "HELO localhost\r\n");
fputs($connect, "MAIL FROM: $from\n");
fputs($connect, "RCPT TO: $to\n");
fputs($connect, "DATA\r\n");
fputs($connect, "Content-Type: text/plain; charset=iso-8859-1\n");
fputs($connect, "To: $to\n");
fputs($connect, "Subject: $subject\n");
fputs($connect, "\n\n");
fputs($connect, stripslashes($message)." \r\n");
fputs($connect, ".\r\n");
fputs($connect, "RSET\r\n");
}