<?php
 
$sock = socket_create(AF_INET, SOCK_STREAM, SOL_TCP);
 
$pid = pcntl_fork();
if ($pid == -1) {
     die('could not fork');
} else if ($pid) {
     echo 'parent started', PHP_EOL;
     for ($i=0; $i != 10; ++$i) {
        usleep(10);
        echo '-';
     }
     pcntl_wait($status);
     echo 'all done', PHP_EOL;
} else {
     echo 'child started', PHP_EOL;
 
     foreach ([21, 25, 80] as $port) {
        echo "port($port) is ";
        echo @socket_connect ($sock, '127.0.0.1', $port) ? 'open' : 'closed';
        $error = socket_last_error ($sock);
        if ($error) echo ' (', socket_strerror($error), ')';
        echo PHP_EOL;
     }
 
     echo 'child exiting', PHP_EOL;
}
 

PD9waHAKCiRzb2NrID0gc29ja2V0X2NyZWF0ZShBRl9JTkVULCBTT0NLX1NUUkVBTSwgU09MX1RDUCk7CgokcGlkID0gcGNudGxfZm9yaygpOwppZiAoJHBpZCA9PSAtMSkgewogICAgIGRpZSgnY291bGQgbm90IGZvcmsnKTsKfSBlbHNlIGlmICgkcGlkKSB7CiAgICAgZWNobyAncGFyZW50IHN0YXJ0ZWQnLCBQSFBfRU9MOwogICAgIGZvciAoJGk9MDsgJGkgIT0gMTA7ICsrJGkpIHsKICAgICAgICB1c2xlZXAoMTApOwogICAgICAgIGVjaG8gJy0nOwogICAgIH0KICAgICBwY250bF93YWl0KCRzdGF0dXMpOwogICAgIGVjaG8gJ2FsbCBkb25lJywgUEhQX0VPTDsKfSBlbHNlIHsKICAgICBlY2hvICdjaGlsZCBzdGFydGVkJywgUEhQX0VPTDsKCiAgICAgZm9yZWFjaCAoWzIxLCAyNSwgODBdIGFzICRwb3J0KSB7CiAgICAgICAgZWNobyAicG9ydCgkcG9ydCkgaXMgIjsKICAgICAgICBlY2hvIEBzb2NrZXRfY29ubmVjdCAoJHNvY2ssICcxMjcuMC4wLjEnLCAkcG9ydCkgPyAnb3BlbicgOiAnY2xvc2VkJzsKICAgICAgICAkZXJyb3IgPSBzb2NrZXRfbGFzdF9lcnJvciAoJHNvY2spOwogICAgICAgIGlmICgkZXJyb3IpIGVjaG8gJyAoJywgc29ja2V0X3N0cmVycm9yKCRlcnJvciksICcpJzsKICAgICAgICBlY2hvIFBIUF9FT0w7CiAgICAgfQoKICAgICBlY2hvICdjaGlsZCBleGl0aW5nJywgUEhQX0VPTDsKfQo=