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é !
  Répondre
#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.
  Répondre
#3
(30/10/2020, 18:46)cestlemien a écrit : 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é !
  Répondre
#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
  Répondre
#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é !
  Répondre
#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
  Répondre
#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é !
  Répondre
#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"
     }
  }
}


  Répondre
#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é !
  Répondre


Sujets apparemment similaires...
Sujet Auteur Réponses Affichages Dernier message
  Modifier le script du trivia pour défiler les questions dans l'ordre Mimisth 2 2,683 05/12/2015, 19:45
Dernier message: MisterS
  [Demande] Opé Sur Host et Non sur Nick BaGrift 16 8,040 26/06/2014, 13:48
Dernier message: BaGrift
  Déclarer $nick dans msgcat. aliasangelius 5 4,012 04/09/2012, 16:27
Dernier message: CrazyCat
  Badnick webcam nispOr 5 3,749 04/07/2012, 23:20
Dernier message: nispOr
  Petit souci de tcl !news modifier en !absent snip74 1 4,873 12/04/2012, 13:39
Dernier message: snip74
  nick non register msg cestlemien 11 5,455 20/12/2010, 23:20
Dernier message: alanfollow
  nick list T4tou 5 3,887 04/11/2010, 15:45
Dernier message: CrazyCat
  Aide pour modifier un script de quote t1bz 12 6,650 05/06/2010, 12:16
Dernier message: t1bz
  [Topic vide] Badip/Badhost/Badnick IluZi0n 1 2,824 10/01/2010, 16:57
Dernier message: IluZi0n
  !badnick Problème MorDenX 7 4,165 16/04/2009, 10:57
Dernier message: MorDenX

Atteindre :


Utilisateur(s) parcourant ce sujet : 1 visiteur(s)