19/01/2013, 20:09
Ce n'est pas la première fois que l'on me demande comment mettre le nombre de connectés d'un canal dans une page html.
Voici un petit code fonctionnel (mais pas du tout optimum).
Il suffit d'avoir un template de la page de sortie dans lequel la chaîne NB_USERS sera remplacée par le nombre d'utilisateurs.
Voici un petit code fonctionnel (mais pas du tout optimum).
Il suffit d'avoir un template de la page de sortie dans lequel la chaîne NB_USERS sera remplacée par le nombre d'utilisateurs.
tcl
set schan "#canal"
set template "/home/user/template.html"
set sfile "/home/user/count.html"
bind join - "$schan *" statcount
bind part - "$schan *" statpart
proc statpart { nick uhost handle chan {msg ""} } {
statcount $nick $uhost $handle $chan
return 0;
}
proc statcount { nick uhost handle chan } {
set fi [open $::template r]
set lines [read -nonewline $fi]
close $fi
set tot [llength [chanlist $chan]]
regsub -all -- NB_USERS $lines $tot lines
set fo [open $::sfile w]
puts $fo $lines
close $fo
return 0
}