pp 이벤트 확장 io 재 활용 테스트 예제 사용

pecl install event

//    
//         
$context=stream_context_create([
  'socket'=>[
    'backlog'=>2000
  ]]);
stream_context_set_option($context,'socket','so_reuseaddr',1); //      
//sock_set_option($this->server, SOL_SOCKET, SO_REUSEADDR, 1); //      TIME_WAIT
$socket = stream_socket_server("tcp://0.0.0.0:8070", $errno, $errstr,STREAM_SERVER_BIND | STREAM_SERVER_LISTEN,$context);
stream_set_blocking($socket,false);//   
//    
$base=new EventBase();
//      socket
$event=new Event($base,$socket,Event::PERSIST |Event::READ | Event::WRITE,function ($socket)use(&$base){

  $client = stream_socket_accept($socket);
  //stream_set_blocking($client,false);//   
//    var_dump($client);
//    $content='21335435';
//    $string="HTTP/1.1 200 OK\r
";
//    $string.="Content-Type: text/html;charset=utf-8\r
";
//    $string.="Content-Length: ".strlen($content)."\r
\r
";
//    fwrite($client,$string.$content);
//    fclose($client);

  //global $base;

  //var_dump($socket,$client);

  $base=new EventBase();
  //     socket
  $event=new Event($base,$client,Event::PERSIST |Event::READ | Event::WRITE,function ($client){
    $msg=fread($client,65535);
//
//     if($msg){ //        keep-alive
//
//     }

    $content='hello world';
    $string="HTTP/1.1 200 OK\r
";
    $string.="Content-Type: text/html;charset=utf-8\r
";
    $string.="Connection: keep-alive\r
";
    $string.="Content-Length: ".strlen($content)."\r
\r
";
    fwrite($client,$string.$content);

    fclose($client);

 
    // socket    ，    

    $event->del();//    


  });
  $event->add(); //      
  $base->loop();

  //     
  //$event->del();//    
});
$event->add(); //      
var_dump($base->loop()); //