File:  [ELWIX - Embedded LightWeight unIX -] / embedaddon / php / ext / standard / tests / mail / mail_skipif.inc
Revision 1.1.1.2 (vendor branch): download - view: text, annotated - select for diffs - revision graph
Mon Jul 22 01:32:08 2013 UTC (11 years ago) by misho
Branches: php, MAIN
CVS tags: v5_4_29p0, v5_4_29, v5_4_20p0, v5_4_20, v5_4_17, HEAD
5.4.17

<?php
extension_loaded('imap') or die('skip imap extension not available in this build');

if( substr(PHP_OS, 0, 3) == 'WIN' && extension_loaded('sockets')) {
	// be sure mail server is accessible... on PHP 5.3.13 release build, using test-pack PHP-5.3-r1af8b3f,
	// the code below didn't skip test even though there was no mail server
	//     test then failed (no mail server to test against)
	$socket  = socket_create(AF_INET, SOCK_RAW, 1);
	socket_set_option($socket, SOL_SOCKET, SO_RCVTIMEO, array('sec' => 10, 'usec' => 10));
	// imap uses tcp port 143
	socket_connect($socket, "localhost", 143) or die ("skip can't socket to mail server");
}
 
// Change these to make tests run successfully
$mailbox  = '{localhost}';
$username = 'webmaster@example.com';
$password = 'p4ssw0rd';
$options = OP_HALFOPEN; // this should be enough to verify server present
$retries = 0; // dont retry connect on failure

$mbox = imap_open($mailbox, $username, $password, $options, $retries);
if (!$mbox) {
	die("skip could not connect to mailbox $mailbox");
}
imap_close($mbox);
?>

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>