Наши любимые дети

//---------------------------------------------------------------------------
// демонстрация обхода "в лоб" невозможности передачи функции члена класса
// в качестве callback функции. (в том числе и protected и private).
// Пример взят из конкретного проэкта, только вырезаны не важные
// для нас участки кода.

#ifndef ChaiHolderH
#define ChaiHolderH
#include "classes.hpp"
#include "vcl.h"

typedef void __fastcall ( __closure *TChaiEvent )( char chan, int status );

//---------------------------------------------------------------------------
class CChaiHolder : TComponent
{
__published:
__property int Channel = { read = chan, write = WrChan };
__property TChaiEvent OnReceive = { read = FOnReceive, write = FOnReceive };
__property TChaiEvent OnTransmit = {read = FOnTransmit, write = FOnTransmit };
__property TChaiEvent OnError = { read = FOnError, write = FOnError };
public:
__fastcall virtual CChaiHolder(void* AOwner);
private:
void prepare_holders(...);
TChaiEvent FOnReceive;
TChaiEvent FOnTransmit;
TChaiEvent FOnError;
void __fastcall WrChan(int channel) { chan = channel;};
protected:
int chan;
};
//---------------------------------------------------------------------------
#endif

//---------------------------------------------------------------------------
#pragma hdrstop
#include "ChaiHolder.h"
#pragma package(smart_init)
//---------------------------------------------------------------------------
__fastcall CChaiHolder::CChaiHolder( void* AOwner) : TComponent((TComponent*)AOwner)
{
prepare_holders( Owner, &InternalRC, &InternalTR, &InternalER );
}
//---------------------------------------------------------------------------
void __fastcall CChaiHolder::InternalRC(unsigned short status)
{
if( OnReceive )
FOnReceive( chan, status );
}
//---------------------------------------------------------------------------
void __fastcall CChaiHolder::InternalTR(unsigned short status)
{
if( OnTransmit )
FOnTransmit( chan, status );
}
//---------------------------------------------------------------------------
void __fastcall CChaiHolder::InternalER(unsigned short status)
{
if( OnError )
FOnError( chan, status );
}
//---------------------------------------------------------------------------
void CChaiHolder::prepare_holders(...)
{
cb0 = new char[64];
memcpy(cb0,
"\x55\x89\xe5\xb8\x00\x00\x00\x00\x8b\x55\x08\xe8\xff\xff\xff\xff\x5d\xc3",
19);
memcpy((char*)(cb0)+19,
"\x55\x89\xe5\xb8\x00\x00\x00\x00\x8b\x55\x08\xe8\xff\xff\xff\xff\x5d\xc3",
19);
memcpy((char*)(cb0)+38,
"\x55\x89\xe5\xb8\x00\x00\x00\x00\x8b\x55\x08\xe8\xff\xff\xff\xff\x5d\xc3",
19);

unsigned long ha= (unsigned long)(cb0);

asm{
mov eax,[ebp+0x08]
mov ebx,[ebp+0x10]
mov ecx,[ebp+0x18]
mov edx,[ebp+0x20]
mov edi,ha
add edi,4
mov [edi],eax
add edi,8
sub ebx,edi
sub ebx,4
mov [edi],ebx
add edi,11
mov [edi],eax
add edi,8
sub ecx,edi
sub ecx,4
mov [edi],ecx
add edi,11
mov [edi],eax
add edi,8
sub edx,edi
sub edx,4
mov [edi],edx
}
};
//--------------------------------------------------

polonezzz? said...

точна!!! процессору абсолютно все равно данные это или код.

если вооружится таблицами из Интеловских мануалов то можна писать в машинных кодах. имхо конечно изврат но зато поймешь принцип составления ассемблерных команд

посмотрел в код - мало что понял.пойду еще раз гляну :-)

12:22 PM, Декабрь 04, 2006  

 

Eugene OS said...

вот еще пример(т.к. у некоторых не оказалось билдера )
следующим каментом выложу ссылку на исходник, мап-файл(чтобы убедился что в сегменте DATA и экзешник)
:

//-----------------------------------------------


#include "stdio.h"
#include "mem.h"


//-----------------------------------------------

typedef void (*tproc)(void);
char *proc = "123456789012345678901234567890123";

//-----------------------------------------------

void myprint(void)
{
printf("test from DATA segmet!\n");
}

//-----------------------------------------------

void tst( void )
{
_EAX = (unsigned long)&myprint;
asm{
call eax
}
}

//-----------------------------------------------

int main( int argc, char **argv)
{
printf("test from CODE segment!\n");
memcpy(proc, &tst, 32);
(tproc(proc))();
}

//-----------------------------------------------

9:10 PM, Декабрь 04, 2006  

 

Eugene OS said...

вот
ссылка для скачивания экзешника с исходником.

10:08 PM, Декабрь 04, 2006  

 

Stranger said...

polonezzz?, я кое-кому из этого блога час доказывал, что процессор не отличает код от данных :-)

12:30 AM, Декабрь 05, 2006  

 

.nornad said...

Насколь я помню суть дискусии, вы доказывали друг другу одно и то же. :)

12:52 AM, Декабрь 05, 2006  

 

Stranger said...

.nornad, кое-кто как раз таки доказывал, что процессор умеет отличать инструкции от кода, и приводил в пример дизассемблер IDA Pro :-)

2:02 AM, Декабрь 05, 2006  

 

.nornad said...

Если честно, то вы меня уже задолбали этим спором "в одни ворота". Встретьтесь уже в реале и разберитесь, кто, что и кому пытался доказать. В сети ваш спор себя уже изжил - вы сейчас даже разобраться уже точно не сможете, кто что пытался доказать. Имхо, имело место банальное непонимание, которое умудрились раздуть до интересных размеров. :)

2:14 AM, Декабрь 05, 2006  

 

.nornad said...

А насчёт собственно вопроса, умеет ли процессор различать инструкции и код могу сказать, что это зависит от точки зрения и используемых понятий. В одном из вариантов очень даже правильными оказываются мои слова, что он их различает интуитивно. ;)

2:17 AM, Декабрь 05, 2006  

polonezzz? said...

посмотрел утром камменты и обнаружил что я с кем то спорил и кому то что-то доказывал. наверно это был не Я а субъЯ или на край ОНО :-)

9:24 AM, Декабрь 05, 2006