#include <stdio.h>
#include <windows.h>
#include <tlhelp32.h>
 
struct PARAMETROS{
	DWORD MessageBoxInj;
	char text[4];
	char caption[4];
	int buttons;
};
 
typedef struct PARAMETROS PARAMETROS;
int obtenerPID(char*);
int privilegios();
typedef int (WINAPI* MessageBoxParam)(HWND,LPCSTR,LPCSTR,UINT);
DWORD FuncionInyectar(PARAMETROS* myparam);
DWORD Useless();
 
 
/****************************COMIENZO MAIN!*******************************/
 
int main(int argc,char **argv)
{
HANDLE procesoHandle,hilo=NULL;
PARAMETROS data;
char *mytext="Hola";
char *mycaption="Hola";
HMODULE user32=NULL;
DWORD size_FuncionInyectar;
LPVOID MyFuncAddress,parametrosAddress=NULL;
int privilegio;
 
 
//Obtengo PID
int pid=obtenerPID("sublime_textSinASLR.exe");
printf("PID:%d\n",pid);
 
//Privilegios
privilegio=privilegios();
printf("Privilegios%d\n",privilegio);
 
//Obtengo handle del proceso Remoto
if((procesoHandle=OpenProcess(PROCESS_ALL_ACCESS,0,pid))==NULL)
{
	printf("%s\n","Error al abrir proceso remoto");
	return 0;
}
 
//Inicializo estructura
user32=LoadLibrary("User32.dll");
data.MessageBoxInj=(DWORD)GetProcAddress(user32,"MessageBoxA");
strcpy(data.text,"Hola");
strcpy(data.caption,"Hola");
data.buttons=MB_OKCANCEL|MB_ICONQUESTION;
 
//Tamano de la funcion en bytes
 
size_FuncionInyectar=(PBYTE)Useless - (PBYTE)FuncionInyectar;
 
//Reservo espacio en proceso remoto para la funcion
 
MyFuncAddress=VirtualAllocEx(procesoHandle,NULL,size_FuncionInyectar,MEM_RESERVE|MEM_COMMIT,PAGE_EXECUTE_READWRITE);
if(MyFuncAddress==NULL)
{
	printf("%s\n","Error al reservar memoria para la funcion en el proceso remoto");
	return 0;
}
 
printf("Direccion Funcion:%p \n %d Bytes reservados \n",MyFuncAddress,sizeof(PARAMETROS));
 
 
//Reservo espacio en proceso remoto para los parametros de la funcion
 
parametrosAddress=VirtualAllocEx(procesoHandle,NULL,sizeof(PARAMETROS),MEM_RESERVE|MEM_COMMIT,PAGE_READWRITE);
if(parametrosAddress==NULL)
{
	printf("%s\n","Error al reservar memoria para los parametros de la funcion en el proceso remoto");
	return 0;
}
printf("Direccion Parametros:%p \n %d Bytes reservados \n",parametrosAddress,sizeof(PARAMETROS));
 
//Escribo en los espacios reservados
//1.Funcion
if(WriteProcessMemory(procesoHandle,MyFuncAddress,(void*)FuncionInyectar,size_FuncionInyectar,NULL)!=0)
{
	printf("%s\n","Error al escribir la funcion en el proceso remoto");
	printf("%d\n",GetLastError());
	return 0;
}
//2.Parametros
if(WriteProcessMemory(procesoHandle,parametrosAddress,&data,sizeof(PARAMETROS),NULL)!=0)
{
	printf("%s\n","Error al escribir los parametros en el proceso remoto");
	return 0;
}
 
//OK!Perfecto!Reservamos y Escribimos en el proceso remoto!Ahora a ejecutar un hilo!
 
if((hilo=CreateRemoteThread(procesoHandle,NULL,0,(LPTHREAD_START_ROUTINE)MyFuncAddress,parametrosAddress,0,NULL))==NULL)
{
	printf("%s\n","Error al crear hilo remoto!");
	return 0;
}
printf("%s\n","Se inyecto el codigo");
 
return 0;
}
 
/****************************Funciones*************************/
int obtenerPID(char *nombreArchivo)
{
HANDLE snapshotProcesos=NULL;	
PROCESSENTRY32 estructuraProceso;
 
estructuraProceso.dwSize=sizeof(PROCESSENTRY32);
if(snapshotProcesos=CreateToolhelp32Snapshot(TH32CS_SNAPPROCESS,0))
	{
		do
		{
			if(Process32Next(snapshotProcesos,&estructuraProceso))
			{}
			else
			{
				CloseHandle(snapshotProcesos);
				return -1;
			}
		}
		while(strcmp(estructuraProceso.szExeFile,nombreArchivo)!=0);
		CloseHandle(snapshotProcesos);
		return (int)estructuraProceso.th32ProcessID;
	}
}
 
DWORD FuncionInyectar(PARAMETROS* myparam)
{
	MessageBoxParam MsgBox = (MessageBoxParam)myparam->MessageBoxInj;
 
	int result = MsgBox(0,myparam->text,myparam->caption,myparam->buttons);
 
	switch(result)
	{
		case IDOK:
			break;
		case IDCANCEL:
			break;
	}
	return 0;
 
}
 
DWORD Useless()
{
	return 0;
}
 
int privilegios(){
HANDLE Token;
TOKEN_PRIVILEGES tp;
if(OpenProcessToken(GetCurrentProcess(), TOKEN_ADJUST_PRIVILEGES | TOKEN_QUERY,&Token))
{
    LookupPrivilegeValue(NULL, SE_DEBUG_NAME, &tp.Privileges[0].Luid);
    tp.PrivilegeCount = 1;
    tp.Privileges[0].Attributes = SE_PRIVILEGE_ENABLED;
    if (AdjustTokenPrivileges(Token, 0, &tp, sizeof(tp), NULL, NULL)==0){
    return 1; 
    }else{
    return 0;
   }
}     
return 1;
}