[Question] Logger.tcl

[Utas]

Utas: a ma connaissance, c'est (heu) impossible. ou presque.
Tout simplement par ce qu'il n'y a pas "d'echo" lorsque l'on envoie un message sur IRC (le serveur ne renvoie pas le message à celui qui l'envoie)
Par conséquent, il faut détecter les messages a la sortie du bot.
C'est possible, bien sur, en modifiant les commandes putquick et autres, mais c'est vraiment du bricolage, et ne va pas marcher dans certains cas (messages envoyés par un module C.. etc)
Ce genre de bricolage peut faire l'affaire :

tclcopier

proc logger:traceOutgoing {command errorCode errorInfo step} {
if $errorCode return
logger:logOutgoing [lindex $command 1]
return }
proc logger:tracePutdccrawOutgoing {comand errorCode errorInfo step} {
if $errorCode return
if [lindex $command 1] return
logger:logOutgoing [lindex $command 3]
return }
proc logger:logOutgoing {rawLine} {
foreach line [split $rawLine "\n"] {
if {[lindex [set splitLine [split $line]] 0] ne "PRIVMSG"} continue
if ![validchan [set chan [lindex $splitLine 1] continue
if ![string first ":" [set text [lrange $line 2 end]]] { set text [string range $text 1 end] }
logger:save $chan "<$botnick> $text" }
return }
trace add execution putquick leave logger:traceOutgoing
trace add execution putserv leave logger:traceOutgoing
trace add execution puthelp leave logger:traceOutgoing
trace add execution putdccraw leave logger:tracePutdccrawOutgoing

non testé :°

ah, au passage, j'ai ptet raté quelque chose, mais pourquoi ne pas utiliser le système de log intégré à eggdrop >< ?

Coucou,

Merci pour la réponse je vais tester ça!
Sinon, parce que je n'arrive pas à configurer le log correctement afin de pouvoir l'exploiter sur Mircstats, et je n'ai rien trouvé de bien concluant sur le net, j'arrive à faire log le bot quotidiennement mais pas mensuellement :/