Function _hx_std_socket_select

src/hx/libs/std/Socket.cpp:719–751

socket_select : read : 'socket array -> write : 'socket array -> others : 'socket array -> timeout:number? -> 'socket array array Perform the [select] operation. Timeout is in seconds or [null] if infinite **/

   <doc>Perform the [select] operation. Timeout is in seconds or [null] if infinite</doc>
**/
Array<Dynamic> _hx_std_socket_select( Array<Dynamic> rs, Array<Dynamic> ws, Array<Dynamic> es, Dynamic timeout )
{
   SOCKET n = 0;
   fd_set rx, wx, ex;
   fd_set *ra, *wa, *ea;

   POSIX_LABEL(select_again);
   ra = make_socket_array(rs,&rx,&n);
   wa = make_socket_array(ws,&wx,&n);
   ea = make_socket_array(es,&ex,&n);
   if( ra == &INVALID || wa == &INVALID || ea == &INVALID )
      hx::Throw( HX_CSTRING("No valid sockets") );

   struct timeval tval;
   struct timeval *tt = 0;
   if( timeout.mPtr )
      tt = init_timeval(timeout,&tval);

   hx::EnterGCFreeZone();
   if( select((int)(n+1),ra,wa,ea,tt) == SOCKET_ERROR )
   {
      hx::ExitGCFreeZone();
      HANDLE_EINTR(select_again);
      hx::Throw( HX_CSTRING("Select error ") + String((int)errno) );
   }
   hx::ExitGCFreeZone();

   Array<Dynamic> r = Array_obj<Dynamic>::__new(3,3);
   r[0] = make_array_result(rs,ra);
   r[1] = make_array_result(ws,wa);
   r[2] = make_array_result(es,ea);
   return r;
}

/**
   socket_select : read : 'socket array -> write : 'socket array -> others : 'socket array -> timeout:number?