File:
[ELWIX - Embedded LightWeight unIX -] /
embedaddon /
php /
ext /
standard /
tests /
mail /
mail_variation_alt2-win32.phpt
Revision
1.1.1.1 (vendor branch):
download - view:
text,
annotated -
select for diffs -
revision graph
Tue Feb 21 23:48:04 2012 UTC (12 years, 8 months ago) by
misho
Branches:
php,
MAIN
CVS tags:
v5_4_3elwix,
v5_4_29p0,
v5_4_29,
v5_4_20p0,
v5_4_20,
v5_4_17p0,
v5_4_17,
v5_3_10,
HEAD
php
--TEST--
Test mail() function : basic functionality
--SKIPIF--
<?php
if( substr(PHP_OS, 0, 3) != 'WIN' ) {
die('skip...Windows only test');
}
require_once(dirname(__FILE__).'/mail_skipif.inc');
?>
--INI--
max_execution_time = 120
--FILE--
<?php
/* Prototype : int mail(string to, string subject, string message [, string additional_headers [, string additional_parameters]])
* Description: Send an email message
* Source code: ext/standard/mail.c
* Alias to functions:
*/
error_reporting(E_ALL & ~E_STRICT);
ini_set("SMTP", "localplace");
ini_set("smtp_port", 25);
ini_set("sendmail_from", "user@company.com");
echo "*** Testing mail() : basic functionality ***\n";
require_once(dirname(__FILE__).'/mail_include.inc');
$subject_prefix = "!**PHPT**!";
$to = "$username";
$subject = "$subject_prefix: Basic PHPT test for mail() function";
$message = <<<HERE
Description
bool mail ( string \$to , string \$subject , string \$message [, string \$additional_headers [, string \$additional_parameters]] )
Send an email message
HERE;
$res = mail($to, $subject, $message);
if ($res !== true) {
exit("TEST COMPLETED : Unable to send test email\n");
} else {
echo "Msg sent OK\n";
}
// Search for email message on the mail server using imap.
$imap_stream = imap_open($default_mailbox, $username, $password);
if ($imap_stream === false) {
echo "Cannot connect to IMAP server $server: " . imap_last_error() . "\n";
return false;
}
$found = false;
$repeat_count = 20; // we will repeat a max of 20 times
while (!$found && $repeat_count > 0) {
// sleep for a while to allow msg to be delivered
sleep(1);
$current_msg_count = imap_check($imap_stream)->Nmsgs;
// Iterate over recent msgs to find the one we sent above
for ($i = 1; $i <= $current_msg_count; $i++) {
// get hdr details
$hdr = imap_headerinfo($imap_stream, $i);
if (substr($hdr->Subject, 0 , strlen($subject_prefix)) == $subject_prefix) {
echo "Id of msg just sent is $i\n";
echo ".. delete it\n";
imap_delete($imap_stream, $i);
$found = true;
break;
}
}
$repeat_count -= 1;
}
if (!$found) {
echo "TEST FAILED: email not delivered\n";
} else {
echo "TEST PASSED: Msgs sent and deleted OK\n";
}
imap_close($imap_stream, CL_EXPUNGE);
?>
===Done===
--EXPECTF--
*** Testing mail() : basic functionality ***
Warning: mail(): Failed to connect to mailserver at "localplace" port 25, verify your "SMTP" and "smtp_port" setting in php.ini or use ini_set() in %s on line %d
TEST COMPLETED : Unable to send test email
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>