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