Scanner ip , port , iplookup

Soyez le premier à donner votre avis sur cette source.

Snippet vu 18 305 fois - Téléchargée 25 fois

Commenter

Contenu du snippet

Tout est dans le titre et l'aide est dans la source.

Source / Exemple : 


;------------------------------------------------------------
;---------scanner mrud---------------------------------------
;-utilisation :
;-trouver une ip à partir d'un dns/url..  -> /iplookup www.skyblog.com
;-scanner un port sur 254 ip              -> /scip  212.129.63.0 80
;->si le port se trouve être le 80 (http), vous aurez le serveur qui tourne dessus.
;-scanner les ports de 1 à 1024           -> /scpo  212.129.63.216
;-scanner des ports précis                -> /scpa  212.129.63.216 21,23,25,80,110,139,445
;------------------------------------------------------------
alias iplookup { sockopen lkip $1 80 | echo -at [9iplookup] - - $1 }
on *:sockopen:lkip:{ echo -at [9iplookup] - 9ip : $sock($sockname).ip - 9table : $puttok($sock($sockname).ip,0,4,46) | sockclose lkip }
;------------------------------------------------------------
alias scip { sockclose scip*
  var %i 1
  while (%i <= 254) {
    sockopen $+(scip,%i) $calc($longip($1) + %i) $2
    inc %i
  }
  echo -at [9scip] - - 9table : $1 - 9port : $2
}
on *:sockopen:scip*:{
  if ((!$sockerr) && ($sock($sockname).port != 80)) { echo -at [9scip] [3+] 9ip : $longip($sock($sockname).ip) 9port : $sock($sockname).port 3open | sockclose $sockname }
  if ((!$sockerr) && ($sock($sockname).port = 80)) { sockwrite $sockname get / /// $+ $str($crlf,4) }
  ;if ($sockerr) { echo -at [9scip] [4+] 9ip : $longip($sock($sockname).ip) 9port : $sock($sockname).port 4close | sockclose $sockname }
}
on *:sockread:scip*:{
  sockread %a
  if (server isin %a) { echo -at [9scip] [0+] 9ip: $longip($sock($sockname).ip) - %a | sockclose $sockname }
}
;------------------------------------------------------------
alias scpo { sockclose scpo*
  var %i 1
  while (%i <= 1024) {
    sockopen $+(scpo,%i) $1 %i
    inc %i
  }
  echo -a $timestamp [9scpo] - - 9ip : $1
}
on *:sockopen:scpo*:{
  if ((!$sockerr) && ($sockname)) { echo -at [9scpo] [3+] 9ip : $sock($sockname).ip 9port : $sock($sockname).port 3open | sockclose $sockname }
  if ($sockerr) { sockclose $sockname }
}
;------------------------------------------------------------
alias scpa {
  var %i 1, %nbport $numtok($2-,44)
  while (%i <= %nbport) {
    sockopen $+(scpa,%i) $1 $gettok($2-,%i,44)
    inc %i
  }
  echo -a $timestamp [9scpa] - - 9ip : $1
}
on *:sockopen:scpa*:{
  if (!$sockerr) { echo -at [9scpa] - 9ip : $sock($sockname).ip 9port : $sock($sockname).port 3open | sockclose $sockname }
  if ($sockerr) { echo -at [9scpa] - 9ip : $sock($sockname).ip 9port : $sock($sockname).port 4close | sockclose $sockname }
}
;------------------------------------------------------------
;------------------------------------------------------------

Conclusion :


j'ai,
- laisser ma décoration elle n'est pas vilaine.
- limitation à 254 ip dans le scip car mirc risquerait de planté si plus.
- mis en commentaire les ip ne repondant pas au port scanné dans scip. (car ça flood assez comme ça)
- ajouter pour le port 80 la visualisation du serveur si serveur http il y a biensur. (et si ça merde pas aussi)
je pens que c'est tout ce qu'il y avait a dire, voir source au cas où.

A voir également

Ajouter un commentaire

Commentaires

Signaler
skotmarud
Messages postés
119
Date d'inscription
samedi 5 avril 2003
Statut
Membre
Dernière intervention
26 janvier 2008
 -
Ma source aussi etait là pour montrer comment trouver une ip a partir d'un dns, scanner des ports distants, scanner des ip distantes. et apres tout si vous voulez en faire une utilisation intensive modifiez le, d'ailleurs c'est pour ça qu'on post des sources pour que d'autres puissent prendre dedans ce qu'ils souhaitent. a+
Signaler
abdoulax
Messages postés
875
Date d'inscription
samedi 17 mai 2003
Statut
Membre
Dernière intervention
22 juin 2012
 -
C'est sûr j'aurai pu faire l'interface graphique. Mais dans ce code le but était de montrer comment utiliser les threads pour réaliser ce fameux scanner multithread et en rajoutant l'interface graphique cela aurait été difficile de comprendre pour certain.
Si tu utilise les timers le scanner que tu feras avec mIRC marchera très bien et c'est pas de la bidouille!!! Ce qu'il faut comprendre c'est que mIRC execute les instructions les une après les autres. Si tu lance une boucle while mIRC ne pourra pas faire autre chose que d'executer les commandes de cette boucle (et cela peu prendre bcp de tps). Als que si tu réalise une boucle avec un timer (ça marche comme en C, je suppose que ça crée un nouveau thread) mIRC ne freeze pas. Enfin bon, c'est pas évident à expliker, c'est pas de la bidouille, c'est juste de la logique et si qlq1 est capable de lui expliker le pourkoi du comment de la raison.

Ya un exemple tou bete :
boucle avec timer
//timertest 1000 .1 echo -s test
boucle avec while
alias test {
var %i 1
while ( %i <= 1000 ) {
echo -s test
inc %i
}
}

Tpourras te rendre compte que la premiere solution ne plante poa als que la 2eme fait freeser mIRC...

Have fun
Signaler
skotmarud
Messages postés
119
Date d'inscription
samedi 5 avril 2003
Statut
Membre
Dernière intervention
26 janvier 2008
 -
le probleme c'est les capacités restrintes de mirc pas du code en lui même. Au pire en bidouillant tu peux reussir (ça restera mediocre) mais tu ne pouras plus utiliser mirc pour autre chose..
Et en parlant d'interface graphique t'aurai pu en faire une pour ton scan multi thread sur cpp :D (j'en ai rajouter une)
Signaler
abdoulax
Messages postés
875
Date d'inscription
samedi 17 mai 2003
Statut
Membre
Dernière intervention
22 juin 2012
 -
C vrai j'aurai pi etre du mettre 4 :p Bon c sûr que ta comme fourni du code mais je trouve que ton travail n'est pas assez abouti... Déjà tu t rendu compte que mIRC freesé lorsque tu lui en demandé tro. A ta place j'aurai essayé de comprendre et de pallier le problem.
Après l'interface graphique c sur que ce n'est qu'1 plus ms au lieu que je te mette 4 j'aurai mis 6 ;) meme voir plus ...
Enfin t on *:sockopen font presque tous la même chose pk ne pas les avoir réuni ??

Donc en résumé y a de l'ID ms un résultat décevant c'est pk je t mis cette note...

Have fun
Signaler
skotmarud
Messages postés
119
Date d'inscription
samedi 5 avril 2003
Statut
Membre
Dernière intervention
26 janvier 2008
 -
oui mais la source elle meme remplie parfaitement la fonction pour laquelle elle a ete creer donc le 3/10 c'est de l'abus.. non?
Afficher les 13 commentaires
S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (skotmarud)