Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

SCANNER DE CLONES


Information sur la source

Catégorie :AddOns Classé sous : scanner, clone Niveau : Débutant Date de création : 27/02/2005 Date de mise à jour : 23/04/2005 12:11:01 Vu : 4 470

Note :
6 / 10 - par 6 personnes
6,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10

Commentaire sur cette source (14)
Ajouter un commentaire et/ou une note

Description

Voici un scanner de clones sans aucune prétention, plutôt axé Snippet.
 

Source

  • alias clonescan {
  • if ($hget(clonescan)) { hfree clonescan }
  • if (!$1) {
  • if ($chan == $active) { .enable #clonescan | .ial on | raw -q who $active }
  • else { echo $color(info) */clonescan : Vous n'êtes pas sur un channel. }
  • }
  • else { echo -a $color(info) */clonescan : Trop de paramètres. }
  • }
  • #clonescan off
  • raw 352:*:{ hadd -m clonescan $4 $addtok($hget(clonescan,$4),$+(12,$6,),32) | halt }
  • raw 315:*:{
  • haltdef
  • echo $2 [Clones] Scanner en cours sur $2 ...
  • var %i 1
  • while ($hfind(clonescan,$+(*,$chr(32),*),%i,w).data) {
  • echo $2 [4Clones] Clones détectés sur $2 : $replace($hget(clonescan,$ifmatch),$chr(32),$+($chr(32),&,$chr(32))) $+($chr(40),07,$ifmatch,,$chr(41))
  • inc %i
  • }
  • echo $2 [Clones] $iif($hfind(clonescan,$+(*,$chr(32),*),0,w).data,Fin du scanner,Aucun clone détecté) sur $2
  • hfree clonescan
  • .disable #clonescan
  • }
  • #clonescan end
  • menu channel {
  • Scanner de clones:clonescan
  • }
alias clonescan {
  if ($hget(clonescan)) { hfree clonescan }
  if (!$1) { 
    if ($chan == $active) { .enable #clonescan | .ial on | raw -q who $active }
    else { echo $color(info) */clonescan : Vous n'êtes pas sur un channel. }
  }
  else { echo -a $color(info) */clonescan : Trop de paramètres. }
}
#clonescan off
raw 352:*:{ hadd -m clonescan $4 $addtok($hget(clonescan,$4),$+(12,$6,),32) | halt }
raw 315:*:{ 
  haltdef 
  echo $2 [Clones] Scanner en cours sur $2 ...
  var %i 1
  while ($hfind(clonescan,$+(*,$chr(32),*),%i,w).data) {
    echo $2 [4Clones] Clones détectés sur $2 : $replace($hget(clonescan,$ifmatch),$chr(32),$+($chr(32),&,$chr(32))) $+($chr(40),07,$ifmatch,,$chr(41)) 
    inc %i
  }
  echo $2 [Clones] $iif($hfind(clonescan,$+(*,$chr(32),*),0,w).data,Fin du scanner,Aucun clone détecté) sur $2
  hfree clonescan
  .disable #clonescan 
}
#clonescan end
menu channel { 
  Scanner de clones:clonescan 
}

Conclusion

Pour le lancer tapez /clonescan sur le channel concerné, ou lancez le depuis le menu Channel ;)
 

Historique

27 février 2005 21:33:01 :
Alias en local, suppression de la hash table.
28 février 2005 17:26:51 :
Désormais, l'adresse est récupérée des que la raw 352 est reçue : gain de temps ;) Suppression de la while qui recherche dans la hash table, remplacée par une while avec $hfind, plus rapide : re-gain de temps ;) En gros, merci PaDa :P
28 février 2005 17:29:02 :
Petit oubli.
03 mars 2005 18:10:39 :
- Suppression de l'alis 'clonescan2' , celui ci est désormais traité des que le /who est terminé (raw 315)
23 avril 2005 12:11:01 :
- Remplacement de la couleur par $color(info)

Commentaires et avis

signaler à un administrateur
Commentaire de PaDa le 27/02/2005 21:42:03

erf comment précédent non passé
en gros, c'est bien, mm si c'est classique !
idées d'optimisations :
- tester $chan($active).ial au lieu de /who systématiquement
- $hfind plutot que parcourir toute la table dans la 2e boucle :)
très bien de pas t'être servi de $ialchan, et pi vala :))

signaler à un administrateur
Commentaire de PaDa le 27/02/2005 21:47:23

AH!
Je viens de penser a quelque chose, il serait peut être (j'suis pas sur du tout, jamais essayé...) avantageux de pas utiliser $address mais plutot de remplir la hashtable au fur et a mesure que tu recois des raw 352. et dans le 315 t'as plus qu'a trier la hash. Faudra faire attention dans ce cas si tu décides de considérer $chan($active).ial comme je t'ai dit plus haut, faut deux trucs bien séparés... mais probable que dans le cas ou tu /who ca irait plus vite de remplir au fur et a mesure ;)
faut scan mp3passion@undernet ou 5on5@quakenet pour se faire une idée je pense, sur des ti salons ca changera rien ^^

signaler à un administrateur
Commentaire de KiNdErMaXi le 27/02/2005 21:48:52

il manque un truc pour l'evenement on join

signaler à un administrateur
Commentaire de TooLoW le 27/02/2005 22:11:56

#revolution sur rizon.net, la tu la verra la différence :)

signaler à un administrateur
Commentaire de PaDa le 28/02/2005 00:16:53

extreme-moviez est pas mal sur ce serv non plus... quelle horreur :) plus de 2000 pseudos sur un chan, alors qu'a 20 j'ai déja le tourni...
apparemment ca monte a 3700 en record sur certains serv lol ... j'imagine mm pas la geule de la nicklist qui freeze a l'entrée
http://irc.netsplit.de/channels/summary.var

signaler à un administrateur
Commentaire de MaX_62 le 28/02/2005 07:08:49

PaDa : merci, je vais améliorer ça.
KiNdErMaXi : pour l'évènement on join tu n'as qu'a mettre on *:JOIN:#:clonescan mais perso je ne le mettrai pas dans ce code.

signaler à un administrateur
Commentaire de PaDa le 28/02/2005 08:11:19

lol, je ferais pas ca non plus.
Ce qu'il faut voir aussi, c'est qu'un scanner de clones et un notifieur de clones on join sont deux systèmes totalement différents, et indépendants tant que l'ial est activée... utiliser une telle méthode sans $ialchan on join c'est du suicide, on parle même pas du /who on join =]

signaler à un administrateur
Commentaire de MaX_62 le 28/02/2005 16:35:12

Sur un channel de 3000 personnes c'est interminable ce scanner de clones, je vais mettre a jour ;)

signaler à un administrateur
Commentaire de MaX_62 le 28/02/2005 17:30:18

Voila, c'est mis a jour, mais si tu veux scanner un chan de 3000 personnes, laisses tomber quand meme ;(

signaler à un administrateur
Commentaire de GiUsTiNo le 28/02/2005 21:16:22

Ca me fait penser au réseau quakenet, tu tapes /list et tu attends 45 minutes avant que ca soit terminé :p
Le pire, tu vas sur la première salle (ou il y a le plus de monde) => moi j'ai planté :)
Petit moment d'humour offert par Giustino ^^
Bonne continuation à tous !

Giustino, Admin VegaGames

signaler à un administrateur
Commentaire de MaX_62 le 28/02/2005 21:20:20

Oui, c'est sur que tu vas planter si le channel est trop important, mais bon c'est pas le but de scanner des chans de 3000 personnes a part si t'es op, ce qui m'étonnerait :P

signaler à un administrateur
Commentaire de Ewok_ le 08/03/2006 13:42:03

Je trouve ce scanner de clone BIEN !

signaler à un administrateur
Commentaire de griffondorr le 13/07/2008 23:36:40

bonjour , j'ai tester ce scan, sa scan bien parfais , mais je croyais que sa kickban les clones après , mais sa fais pas kickban les clones, alors je suis un peu dégouter :s , yaurais pas un moyen pour que une fois les clones détecter que sa kick ban les clones détecter, merci de me répondre s'il vous plais.

signaler à un administrateur
Commentaire de runinho le 19/07/2008 12:32:54

griffondorr la remote n'est pas faites pour kickban les clones

Ajouter un commentaire

Discussions en rapport avec ce code source dans le forum

Bot Anti-clone [ par shadowsexpect ] Bonjour a tous, je construit mon bot depuis maintenant une semaine, et je voudrais qu'il serve aussi pour la sécurtié du server, pour ce faire j'aimer Je cherche un clone control pour.. [ par Seriakz ] alors voila, je cherche un clone control (un systeme de control de clones avec masskick, massdeop, massjoin, masspart..) pour controlé mes bnc & bots [?] scane clone visible pour bot [?] [ par Xrf ] slt je cherche depui 2 mois un scane clone pour mon bot, de plus je suis novice ... donc je ne peu meme pas le fair tout seul, si vous en avais un je socket [ par KiNdErMaXi ] bonjour,j'aurai voulus savoir comment connecter un socket dans une fenetre (un clone) et pouvoir lui faire faire des actions ( msg, etc ... )j'ai lus 1 anti-clone plizz [ par reva94 ] Bonjours , depuis X temp je cherche 1 bon anti-clone, je n'en trouve point :'(Est ce que quelqu'un aurai 1 remote pour ban-kick 15 min <== La meme Recherche detecteur de clone on join [ par DeViL66 ] Salut,Je recherche un scanner de clone On Join spécial, que quand le clone d'une personne rentre sur un chan, cela nous avertisse. Aussi pou Clone Xdcc [ par titeuf28310 ] Bonjour je cherche pour mon server, comment connecter une vingtaine de clone ki join et part tous a intervalle irregulier... (script tcl...) anti clone [ par sylveur ] bon ba le blème c'est que sur mon server un pett coqu'un joue au clone. je cherche un bn anti-cone en mirc mai je trouve as.. et je voulai savoir $nick(#,N) [ par oowaka ] bonjour dans le code suivant, mirc me retourne ça : * Invalid format: $nick (line 93, commandes.oow) (89) alias scan-clones { (90)   var %j modification de mon scanner.. [ par CaMeLiRiS ] Bonjour a tous, Voila je voudrais modifier mon scanner de clone.Je m'explique, je suis Ircop sur un server, et j'aurais aimé que mon scann lise l'ip d


Nos sponsors

Sondage...

CalendriCode

Janvier 2009
LMMJVSD
   1234
567891011
12131415161718
19202122232425
262728293031 

Consulter la suite du CalendriCode

Téléchargements



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel BAÏSE, Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 2,184 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.