egghelp/eggheads community

add Bind time to bping.

2008-06-05T13:23:04-04:00

Simply put, ping_send is written to be used with dcc bindings, not time...
If you wish to use time bindings, you'll have to write a separate proc for it...

A more advanced explanation; dcc bindings call the command with the added arguments handle, idx, and text. Hence ping_send is written to expect three arguments, where the second one should be the idx of an active dcc connection, and the third one the name of the bot to be pinged. Time bindings however, calls the command with the added arguments minute, hour, day, month, year. This means that you try to call ping_send with two arguments too many, and the second argument obviously isn't an idx, but the current hour, and the third isn't a name of a bot, but the current day.

Statistics: Posted by nml375 — Thu Jun 05, 2008 1:23 pm

add Bind time to bping.

2008-06-05T13:13:42-04:00

and how fix this?

Statistics: Posted by Nor7on — Thu Jun 05, 2008 1:13 pm

add Bind time to bping.

2008-06-05T13:11:47-04:00

some1 ?

the junkyard perhaps?

Statistics: Posted by speechles — Thu Jun 05, 2008 1:11 pm

add Bind time to bping.

2008-06-05T12:42:05-04:00

some1 ?

Statistics: Posted by Nor7on — Thu Jun 05, 2008 12:42 pm

add Bind time to bping.

2008-06-04T05:40:56-04:00

Code:

proc ping_send {hand idx text} {  global pingidx tcl_version  set pingidx $idx  set bots [string tolower [bots]]  set pingbot [string tolower [lindex $text 0]]  if {$tcl_version >= 8.3} {    set time [clock clicks -milliseconds]  } else {    set time [unixtime]  }  if {$pingbot != ""} {    if {[lsearch $bots $pingbot] != "-1"} {      putbot $pingbot "BOTPING $time"      putdcc $idx "Pinging $pingbot."    } else {      putdcc $idx "That bot isn't on the botnet."      return 0    }  } else {    putallbots "BOTPING $time"    putdcc $idx "Pinging the entire botnet."  }  return 1}proc ping_echo {bot command text} {  global replied_ping  if {$command == "BOTPING" && ![info exists replied_ping]} {    set replied_ping yes    utimer 20 {unset replied_ping}    putbot $bot "BOTPING_RPLY $text"    putlog "Pinged by $bot"  }}proc ping_reply {bot command text} {  global pingidx tcl_version  if {$command == "BOTPING_RPLY"} {    if {$tcl_version >= 8.3} {      set replytime [expr [expr [clock clicks -milliseconds] - [split $text]] / 1000.0]    } else {      set replytime [expr [unixtime] - [split $text]]    }    putdcc $pingidx "Ping reply from $bot\: $replytime secs"  }}bind time - "?0 * * * *" ping_sendbind time - "?5 * * * *" ping_sendbind dcc m bping ping_sendbind bot - BOTPING ping_echobind bot - BOTPING_RPLY ping_reply

hi i add two bind times, but i get this error.

Code:

[09:35] Tcl error [ping_send]: wrong # args: should be "ping_send hand idx text" [09:35] #Nor7on# set errorInfoCurrently: wrong # args: should be "ping_send hand idx text"Currently:     while executingCurrently: "ping_send $_time1 $_time2 $_time3 $_time4 $_time5"

so, whats wrong?

Thanks

Statistics: Posted by Nor7on — Wed Jun 04, 2008 5:40 am