I thought MSG_DONTWAIT is actually the flag to switch to nonblocking mode, isn't it? As a matter of fact, the fprecv() above would get a result of -1 and a sockterror of "Try Again", which is exactly the behavior of nonblocking read.
2013/4/17 Rainer Stratmann <rainerstratm...@t-online.de> > On Wednesday 17 April 2013 09:17:09 you wrote: > > Will this be a CPU hog: > > > > t := Now; > > while fprecv(s, @buf, buf_len, MSG_DONTWAIT) < 0 do begin > > if Now - t > 0.00001 * timeout then Break; // approx. <timeout> > seconds > > end; > > > > Thanks > > I did not read the whole thread, but that you favorite blocking mode > (which I > don't use). > > For MSG_DONTWAIT as far I know you have to change to the nonblocking mode. > > > > > > > 2013/4/16 Luca Olivetti <l...@ventoso.org> > > > > > Al 16/04/13 12:20, En/na Michael Schnell ha escrit: > > > > On 04/16/2013 11:26 AM, Xiangrong Fang wrote: > > > >> How can I set the connection and read/write timeout when using > socket > > > >> in free pascal? > > > > > > > > I seem to remember that synapse can do this. > > > > > > Only in svn and it does it this way > > > > > > if FConnectionTimeout > 0 then > > > begin > > > > > > // connect in non-blocking mode > > > b := NonBlockMode; > > > NonBlockMode := true; > > > SockCheck(synsock.Connect(FSocket, Sin)); > > > if (FLastError = WSAEINPROGRESS) OR (FLastError = WSAEWOULDBLOCK) > then > > > > > > if not CanWrite(FConnectionTimeout) then > > > > > > FLastError := WSAETIMEDOUT; > > > > > > NonBlockMode := b; > > > > > > end > > > else > > > > > > SockCheck(synsock.Connect(FSocket, Sin)); > > > > > > NonBlockMode in turn uses fpIoCtl with the FIONBIO parameter, > > > WSAEINPROGRESS=EsysEINPROGRESS, WSAEWOULDBLOCK=EsysEWOULDBLOCK and > > > CanWrite does an fpSelect > > > > > > Bye > > > -- > > > Luca > > > > > > _______________________________________________ > > > fpc-pascal maillist - fpc-pascal@lists.freepascal.org > > > http://lists.freepascal.org/mailman/listinfo/fpc-pascal > _______________________________________________ > fpc-pascal maillist - fpc-pascal@lists.freepascal.org > http://lists.freepascal.org/mailman/listinfo/fpc-pascal >
_______________________________________________ fpc-pascal maillist - fpc-pascal@lists.freepascal.org http://lists.freepascal.org/mailman/listinfo/fpc-pascal
