Arquivos
hhvm/hphp/test/slow/ext_socket/ext_socket.php
T
Paul Tarjan 53c7d78eea make socket test less flakey (hopefully)
I keep seeing problems with this test. Lets see if opening less sockets helps? The last few have failed on `socket_get_option($s, SOL_SOCKET, SO_TYPE)` which this does't fix though...
2013-07-22 11:34:06 -07:00

103 linhas
3.0 KiB
PHP

<?php
//////////////////////////////////////////////////////////////////////
// so we run on different range of ports every time
function get_random_port() {
static $base = -1;
if ($base == -1) {
$base = 12345 + (int)((int)(microtime(false) * 100) % 30000);
}
return ++$base;
}
function bind_random_port($socket, $address) {
for ($i = 0; $i < 20; $i++) {
$port = get_random_port();
if (socket_bind($socket, $address, $port)) return $port;
}
return 0;
}
function get_client_server() {
$server = socket_create(AF_INET, SOCK_STREAM, SOL_TCP);
$port = bind_random_port($server, "127.0.0.1");
var_dump($port != 0);
var_dump(socket_listen($server));
$client = socket_create(AF_INET, SOCK_STREAM, SOL_TCP);
var_dump(socket_connect($client, "127.0.0.1", $port));
$s = socket_accept($server);
return array($client, $s);
}
///////////////////////////////////////////////////////////////////////////////
$s = socket_create(AF_INET, SOCK_STREAM, SOL_TCP);
var_dump($s);
$port = get_random_port();
socket_create_listen($port);
var_dump(socket_create_pair(AF_UNIX, SOCK_STREAM, 0, $fds));
var_dump(count($fds));
var_dump(socket_get_option($s, SOL_SOCKET, SO_TYPE), SOCK_STREAM);
$s = socket_create(AF_INET, SOCK_STREAM, SOL_TCP);
var_dump(socket_connect($s, "facebook.com", 80));
var_dump(socket_getpeername($s, $address));
var_dump(!empty($address));
var_dump(socket_getsockname($s, $address));
var_dump(!empty($address));
var_dump(socket_set_block($s));
var_dump(socket_set_nonblock($s));
var_dump(socket_set_option($s, SOL_SOCKET, SO_RCVTIMEO,
array("sec" => 1, "usec" => 0)));
list($client, $s) = get_client_server();
var_dump(socket_write($client, "hello world"));
// this could fail with shorter returns, but it never does...
var_dump(socket_read($s, 100));
list($client, $s) = get_client_server();
$reads = array($s);
var_dump(socket_select($reads, $ignore1, $ignore2, 1, 0));
var_dump(socket_write($client, "next select will be 1"));
$reads = array($s);
var_dump(socket_select($reads, $ignore1, $ignore2, 1, 0));
list($client, $s) = get_client_server();
$text = "send/recv";
var_dump(socket_send($client, $text, 4, 0));
var_dump(socket_recv($s, $buffer, 100, 0));
var_dump($buffer);
list($client, $s) = get_client_server();
$text = "more specific";
var_dump(socket_sendto($client, $text, 4, 0, "127.0.0.1", $port));
var_dump(socket_recvfrom($s, $buffer, 100, 0, $name, $vport));
var_dump($buffer);
$s = socket_create(AF_INET, SOCK_STREAM, SOL_TCP);
$port = bind_random_port($s, "127.0.0.1");
var_dump($port != 0);
var_dump(socket_listen($s));
var_dump(socket_shutdown($s));
$s = socket_create(AF_INET, SOCK_STREAM, SOL_TCP);
$port = bind_random_port($s, "127.0.0.1");
var_dump($port != 0);
var_dump(socket_listen($s));
var_dump(socket_close($s));
$s = socket_create(AF_INET, SOCK_STREAM, SOL_TCP);
socket_bind($s, "127.0.0.1", 80);
if (socket_last_error($s) == 13) {
var_dump(socket_strerror(13) == "Permission denied");
socket_clear_error($s);
}
var_dump(socket_last_error($s));