egghelp/eggheads community

Sockets question

2003-12-09T14:44:38-04:00

10x

Statistics: Posted by Jag — Tue Dec 09, 2003 2:44 pm

Re: Sockets question

2003-12-05T20:08:41-04:00

This script is working very well when it's a proxy/socks.
but, if it's not a proxy/socks, the eggdrop get into a big lag for a few minutes, and don't send me the message "No".
Somebody knows why? :\

This is because tcl is waiting for the tcp layer in your os to let the connection time out. The reason it takes so long is probably because the host you're trying to connect to is dropping your syn packet, so you don't get an explicit "connection refused" even though the port is not open. (or the host might be dead)

Try using -async when creating the socket. Then 'socket' will return immediately and you'll be able to set up a callback using 'fileevent' (writable) to have a second proc called when the connection succeeds/fails. This won't speed up the timeout, but allow your bot to do other things while waiting.

Statistics: Posted by user — Fri Dec 05, 2003 8:08 pm

Sockets question

2003-12-05T19:14:51-04:00

I'm not sure, but try to use "else" and close $sport before sending no.

Statistics: Posted by Sir_Fz — Fri Dec 05, 2003 7:14 pm

Sockets question

2003-12-05T15:36:44-04:00

Hi,
I have a little question about this script:

Code:

proc socks_monitor {nick ip} {  global hst prt sport  set hst "$ip"  set prt "1080"  catch {socket $hst $prt} sport  if {([string range $sport 0 3] == "sock") && ([lindex $sport 1] == "")} {    close $sport    putserv "privmsg Jag Yes"    return 0  }  putserv "privmsg Jag No"  close $sport  return 0}

This script is working very well when it's a proxy/socks.
but, if it's not a proxy/socks, the eggdrop get into a big lag for a few minutes, and don't send me the message "No".
Somebody knows why? :\

Statistics: Posted by Jag — Fri Dec 05, 2003 3:36 pm