Hi,
Plz check code below.
While running on 7.14 i always get:
Data sent, waiting for flush 389 bytes
when running on 7.1 i get
Data sent, waiting for flush 0 bytes
It seems that on 7.14 the sockets aren't flushing as fast as they did before.
Best regards
alias socket_test {
sockopen scans_p1 forums.mirc.com 80
}
on *:sockopen:scans_p*: {
if ($sockerr) { echo -a can't connect to server | return }
set %testvar $ticks
sockwrite -n $sockname GET /ubbthreads.php?ubb=postlist&Board=8 HTTP/1.0
sockwrite -n $sockname Host: forums.mirc.com
sockwrite -n $sockname Accept: text/html, application/xml;q=0.9, application/xhtml+xml, image/png, image/jpeg, image/gif, image/x-xbitmap, */*;q=0.1
sockwrite -n $sockname Accept-Language: pt-PT,pt;q=0.9,en;q=0.8
sockwrite -n $sockname Accept-Charset: iso-8859-1, utf-8, utf-16, *;q=0.1
sockwrite -n $sockname Accept-Encoding: deflate, gzip, x-gzip, identity, *;q=0
sockwrite -n $sockname Connection: close
sockwrite -n $sockname $crlf
echo Data sent, waiting for flush $sock($sockname).sq bytes
.timerwaits $+ $sockname -mo 0 1 waitToSend $sockname
}
alias -l waitToSend {
if ($timer(waits $+ $1)) {
if ($sock($1).sq > 0) {
return
}
echo Data finally sent in $calc($ticks - %testvar) for $version
sockclose $1
.timerwaits $+ $1 off
}
}
on *:sockread:scans_p*: {
}
on *:sockclose:scans_p*: {
echo socket closed in $calc($ticks - %testvar) for $version
}