Код (Text): ;~~~~~~~~~~~~~~~hi from GERMANY~~~~~~~~~~~~~~ ;~~~~~~~~~~~~clean your cache girl~~~~~~~~~~~ ;~~~~~~~~~~~~~~~~~~and enjoy!~~~~~~~~~~~~~~~~ .386 .model flat,stdcall option casemap:none include \masm32\include\windows.inc include \masm32\include\kernel32.inc include \masm32\include\wininet.inc includelib \masm32\lib\kernel32.lib includelib \masm32\lib\wininet.lib CTEXT MACRO text:VARARG local TxtName .data TxtName BYTE text,0 .code EXITM <ADDR TxtName> ENDM .code CleanCacheEntry proc pEntryType: DWORD local hCache:HANDLE local dwBufferSize:DWORD local dwBufferSizeSaved:DWORD local hHeap:HANDLE local pHeap:LPVOID local CacheEntry[16]:INTERNET_CACHE_ENTRY_INFO and hCache,0 and pHeap,0 mov dwBufferSize,sizeof CacheEntry invoke GetProcessHeap mov hHeap,eax i_set_my_buffer: lea esi,dwBufferSize lea edi,dwBufferSizeSaved movsd invoke HeapAlloc,hHeap,HEAP_ZERO_MEMORY,dwBufferSize mov pHeap,eax i_find_first_entry: invoke FindFirstUrlCacheEntry,pEntryType,pHeap,addr dwBufferSize mov hCache,eax test eax,eax jne i_remove_entry invoke GetLastError cmp eax,ERROR_INSUFFICIENT_BUFFER jne i_remove_my_buffer invoke HeapFree,hHeap,0,pHeap jmp i_set_my_buffer i_remove_entry: mov esi,pHeap add esi,[esi] invoke DeleteUrlCacheEntry,esi lea esi,dwBufferSizeSaved lea edi,dwBufferSize movsd i_find_next_entry: invoke FindNextUrlCacheEntry,hCache,pHeap,addr dwBufferSize test eax,eax jne i_remove_entry invoke GetLastError cmp eax,ERROR_INSUFFICIENT_BUFFER jne i_remove_my_buffer i_enlarge_my_buffer: lea esi,dwBufferSize lea edi,dwBufferSizeSaved movsd invoke HeapFree,hHeap,0,pHeap invoke HeapAlloc,hHeap,HEAP_ZERO_MEMORY,dwBufferSize mov pHeap,eax jmp i_find_next_entry i_remove_my_buffer: invoke FindCloseUrlCache,hCache invoke HeapFree,hHeap,0,pHeap ret CleanCacheEntry endp start: invoke CleanCacheEntry,CTEXT("visited:") ; clean history invoke CleanCacheEntry,CTEXT("cookie:") ; clean cookies invoke CleanCacheEntry,0 ; clean the rest (Temporary Internet Files) invoke ExitProcess,0 end start
