Scanner ip , port , iplookup

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

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)