Mise en forme de code: pensez à utiliser les balises [ tcl ] et [ /tcl ] (sans les espaces bien sûr) autour de vos codes tcl afin d'avoir un meilleur rendu et une coloration syntaxique. x


Modifier un nick par badnick
#1
Bonjour a tous

Je profite d'un peu de confinement ... pour faise des majs chez moi :)

Je pensais avoir ça en réserve, mais en fait je m'aperçois que non.

J'ai cherché un peu partout (ou presque) un tcl qui permettrait de modifier le nick d'un user se connectant par exemple :

[ Connexion ] jesucedesbites (java.user@lfbn-mon****) {users} Le 30/10/2020

Le bot réagirait a une base de données de "badnicks" et transformerait le dit pseudo :

jesucedesbites is now badnick120


Quelqu'un a ça en réserve, ou pourrait m'aiguiller sur une piste ?

Protégez vous
Quand on a la connaissance, ne pas la partager ne peux faire avancer la communauté !
#2
salut,
un eggdrop " ircop" bof, y a il me semble la possibilité d'ajouter directement dans la DB du server une liste de pseudo refusés ( cf comandes ircops/admin ou /stats q ou encore /stats n )

Cordialement.
#3
(30/10/2020, 18:46)cestlemien Wrote: salut,  
un   eggdrop   " ircop" bof,  y a   il me semble la possibilité  d'ajouter directement  dans la  DB  du server une liste de pseudo refusés ( cf  comandes ircops/admin  ou /stats q  ou encore  /stats n  )

Cordialement.

Salut
Perso chez moi non d'où ma demande.

Protégez vous !
Quand on a la connaissance, ne pas la partager ne peux faire avancer la communauté !
#4
Bonsoir,

Je pense qu'il faudrait regardez au niveau des système de blacklist par traitement de fichiers.

Et juste modifié quelques point.
à la rigueur, voir une Eva avec un truc sur l'event "NICK", qui recherche dans la db, et si ya dedans il rename, sinon il fait rien.

Tu vois le délire ?
Vous interdisez les erreurs, vous empêchez ainsi la victoire.

Ma super kikoo-page loll
#5
Oui je vois bien le délire ...

Ceci dit fut un temps lointain dans la galaxie Agrume and Co, un personnage avait codé ce type de chose (remplacer un badnick par un nick aléatoire).
Je pensais l'avoir en réserve mais j'ai fouiné dans les derniers recoins de mes sauvegardes galactiques mais j'ai po trouvé.

Bon dimanche
Quand on a la connaissance, ne pas la partager ne peux faire avancer la communauté !
#6
Ce genre d'event :

tcl
proc controling_server {idx arg} {
    variable eva
    set arg1 [lindex [split $arg " "] 0]
    set arg2 [lindex [split $arg " "] 1]
    set arg3 [lindex [split $arg " "] 2]
    set arg4 [lindex [split $arg " "] 3]
    set arg5 [lindex [split $arg " "] 4]
    set arg6 [lindex [split $arg " "] 5]
    set arg7 [lindex [split $arg " "] 6]
    set arg8 [lindex [split $arg " "] 7]
    set arg10 [string trim [lrange [split $arg " "] 3 end] :]
    if {$arg2=="PING"} {
        putdcc $eva(idx) ":$eva(serv) PONG $eva(ip) :$eva(serv)"
    }
    if {$arg2=="NICK} {
        set pseudo [string trim [lindex $arg 1] :]
        set identd [lindex $arg 4]
        set host [lindex $arg 5]
        set host2 [lindex $arg 5]
        set serv [lindex $arg 6]
        set name [string trim [lrange $arg 10 end] :]
        putdcc $eva(idx) ":$eva(lognick) PRIVMSG $eva(log) :\[\0034Connect\003\] \0037$pseudo\003 \[User@Host\] \002$identd@$host\002 (Realname : \0036$name\0031) - Sur \0034$serv\0034"
        # ici tu met ta recherche de la db pour scan les pseudo à la connexion etc.
    }
}

Vous interdisez les erreurs, vous empêchez ainsi la victoire.

Ma super kikoo-page loll
#7
Oué je vais essayer de voir ça ;)

merci a toi, mais je sais qu'il y a un code qui traine je vais faire mon yoda chercheur..

En passant aliasangelius,
tu n'aurais pas une idée pour mon post sur le VDM : https://forum.eggdrop.fr/Script-VDM-fetc...834-3.html
Au cas ou, ou il faut que je fasse un new post et new sujet du coups...
Quand on a la connaissance, ne pas la partager ne peux faire avancer la communauté !
#8
Il faut un peu arrêter de ressortir Eva à chaque demande...

Un bind sur le notice serveur "client connecting", on récupère le pseudo et on vérifie s'il est dans la liste (avec potentiellement une regexp).
Et si le nick est considéré comme indésirable, on lance un /msg operserv svsnick pour assigner un nick random.

Voici une version simple (non testée, faite directement ici) pour les pseudos exacts, je ferai une version qui fonctionne avec des regexp dès que j'aurai un peu plus de temps.


tcl
bind raw - NOTICE checknick
 
set badnicks {toto machin hips}
 
proc checknick { from key arg } {
  if {[string match *!*@* $from] || ![string match -nocase "*client connecting*" $arg]} { return }
  if {[scan $arg %\[^\:\]\:%\[^(\](%\[^@\]@%\[^\)\] _ nick ident host] == 4} {
     if {[lsearch -nocase ::badnicks $nick]!=-1} {
        set newnick "badguy[rand 999]"
        putserv "PRIVMSG OperServ :SVSNICK $nick $newnick"
     }
  }
}

zeolia: tchat gratuit, sans inscription ni publicité
Merci de ne pas demander d'aide en MP
Away
#9
Merci pour l'idée ..
Quand tu auras le temps yes, y a pas le feu non plus :)
Quand on a la connaissance, ne pas la partager ne peux faire avancer la communauté !


Possibly Related Threads…
Thread Author Replies Views Last Post
  Modifier le script du trivia pour défiler les questions dans l'ordre Mimisth 2 3,604 05/12/2015, 19:45
Last Post: MisterS
  [Demande] Opé Sur Host et Non sur Nick BaGrift 16 10,267 26/06/2014, 13:48
Last Post: BaGrift
  Déclarer $nick dans msgcat. aliasangelius 5 5,008 04/09/2012, 16:27
Last Post: CrazyCat
  Badnick webcam nispOr 5 4,704 04/07/2012, 23:20
Last Post: nispOr
  Petit souci de tcl !news modifier en !absent snip74 1 5,622 12/04/2012, 13:39
Last Post: snip74
  nick list dans fichier html loulou7593 20 11,901 04/02/2012, 18:43
Last Post: djkenny
  nick non register msg cestlemien 11 6,976 20/12/2010, 23:20
Last Post: alanfollow
  nick list T4tou 5 4,885 04/11/2010, 15:45
Last Post: CrazyCat
  Aide pour modifier un script de quote t1bz 12 8,060 05/06/2010, 12:16
Last Post: t1bz
  [Topic vide] Badip/Badhost/Badnick IluZi0n 1 3,545 10/01/2010, 16:57
Last Post: IluZi0n

Forum Jump:


Users browsing this thread: 1 Guest(s)