begin process at 2010 03 20 01:08:54
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

AddOns

 > SCANNER DE CLONES

SCANNER DE CLONES


 Information sur la source

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

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
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 900

Auteur : MaX_62

Ecrire un message privé
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)

 Sources du même auteur

SOLVEUR DE SUDOKU
Source avec une capture DERNIERS CODES SUR CODES-SOURCES
PETIT EFFET DE TEXTE
BARRE DE TEXTE DEFILANT
Source avec Zip Source avec une capture FKEYS (F1-12, CONTROL + F1-12, SHIFT + F1-12)

 Sources de la même categorie

TCL - AJOUT SUPPRESSION DE LOGS par Atok
BLACKLIST PSEUDOS/MASKS par usurpateur
Source avec une capture [XCHAT] ANTI KICK / AWAY C++ par GeroXXXX
JEU DU CODE par alanpersonproject
SERVEUR FTP par hisoka2501

 Sources en rapport avec celle ci

Source avec une capture CLONE KICKER ON JOIN par hackman_teta_
ANTI CLONE / MASS JOIN par NeeToX
SCANNER IP , PORT , IPLOOKUP par skotmarud
Source avec Zip Source avec une capture SCANNER MULTIFONCTIONS par PaDa
Source avec Zip Source avec une capture 3 SCANNEURS DIFFÉRENTS par AgoRa_ScripT

Commentaires et avis

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 :))

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 ^^

Commentaire de KiNdErMaXi le 27/02/2005 21:48:52

il manque un truc pour l'evenement on join

Commentaire de TooLoW le 27/02/2005 22:11:56

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

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

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.

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 =]

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 ;)

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 ;(

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

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

Commentaire de Ewok_ le 08/03/2006 13:42:03

Je trouve ce scanner de clone BIEN !

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.

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...

Comparez les prix

CalendriCode

Mars 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728
293031    

Consulter la suite du CalendriCode

Photothèque

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), 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

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 1,435 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales