This predicate waits for at most TimeOut seconds. TimeOut may be specified as a floating point number to specify fractions of a second. If TimeOut equals infinite, wait_for_input/3 waits indefinitely. If Timeout is 0 or 0.0 this predicate returns without waiting.^{100Prior to 7.3.23, the integer value‘0' was the same as infinite.}

This predicate can be used to implement timeout while reading and to handle input from multiple sources and is typically used to wait for multiple (network) sockets. On Unix systems it may be used on any stream that is associated with a system file descriptor. On Windows it can only be used on sockets. If ListOfStreams contains a stream that is not associated with a supported device, a domain_error(waitable_stream, Stream) is raised.

The example below waits for input from the user and an explicitly opened secondary terminal stream. On return, Inputs may hold user_input or P4 or both.

?- open('/dev/ttyp4', read, P4),
   wait_for_input([user_input, P4], Inputs, 0).

When available, the implementation is based on the poll() system call. The poll() puts no additional restriction on the number of open files the process may have. It does limit the time to 2^31-1 milliseconds (a bit less than 25 days). Specifying a too large timeout raises a representation_error(timeout) exception. If poll() is not supported by the OS, select() is used. The select() call can only handle file descriptors up to FD_SETSIZE. If the set contains a descriptor that exceeds this limit a representation_error(’FD_SETSIZE') is raised.

Note that wait_for_input/3 returns streams that have data waiting. This does not mean you can, for example, call read/2 on the stream without blocking as the stream might hold an incomplete term. The predicate set_stream/2 using the option timeout(Seconds) can be used to make the stream generate an exception if no new data arrives within the timeout period. Suppose two processes communicate by exchanging Prolog terms. The following code makes the server immune for clients that write an incomplete term:

    ...,
    tcp_accept(Server, Socket, _Peer),
    tcp_open(Socket, In, Out),
    set_stream(In, timeout(10)),
    catch(read(In, Term), _, (close(Out), close(In), fail)),
    ...,