Радар своими руками

[maxilam]

в клиенте ГоД в некоторые функции добавили параметры. к примеру:
было

OnUserInfo(struct User *, class FVector, int, int, int, char, char)

стало

OnUserInfo(struct User *, class FVector, int, int, int, char, char, __int64 const &)

Как правильно передавать последний параметр (__int64 const &) из функции-ловушки в функцию-обработчик и потом в оригинальную функцию?

Старый кусок кода:

procedure OnUserInfo_Call(user: pointer; x,y,z: single; u1,u2,u3: single; s1,s2: integer); stdcall;
asm
  push s2;
  push s1;
  push u3;
  push u2;
  push u1;
  push z;
  push y;
  push x;
  push user;
  mov ecx, geh;
  mov esp, ebp;
  pop ebp;
  jmp [OnUserInfo_Original];
end;

procedure OnUserInfo_New(h: integer; user: pointer; x,y,z: single; u1,u2,u3: single; s1,s2: integer); stdcall;
begin
  ...
  //делаем свои делишки
  ...
  OnUserInfo_Call(user, x,y,z, u1,u2,u3, s1,s2);
end;

procedure OnUserInfo_Hook(user: pointer; x,y,z: single; u1,u2,u3: single; s1,s2: integer); stdcall;
asm
  push s2;
  push s1;
  push u3;
  push u2;
  push u1;
  push z;
  push y;
  push x;
  push user;
  push ecx;
  call OnUserInfo_New;
end;

Как теперь передавать этот последний параметр? Я просто не пойму синтаксис Си, что означает этот параметр? Если бы был простой int, char или pointer то вопросов не было бы. А вот с этим, яхз...

[xkor]

maxilam, а в чем проблема то int - 32битное целое, __int64 - 64битное. следовательно новое значение либо как два int передаёшь либо собсно сразу как int64, в дельфи int64 есть, правда не помню с какой версии начиная

[maxilam]

ассемблер дельфийский не понимает int64 (Дельфи2010). при
push u; где u: int64 ругается Invalid combination of opcode and operands. Двумя интами пробовал передавать, клиент критует при вызове оригинальной функции.
Меня напрягает знак "&". Если не ошибаюсь, в Си это ссылка? Альтернативой в дельфи вижу pointer, но однако с поинтером тоже критует при вызове оригинальной функции.
Вот уже третий день ломаю голову. может просто кто нибудь уже сталкивался с int64 в хуках функций, ведь в клиенте она не одна такая функция.

[Aries]

Сообщение от maxilam

Меня напрягает знак "&". Если не ошибаюсь, в Си это ссылка?

Да.Это ссылка)
Попробуй к примеру это значение принять и передать как DWORD (нам похрену сколько разрядов, передаем то только адрес значения)...

[supernewbie]

вот так робит , но это явно какое-то извращение

procedure Test(const i:Int64); stdcall;
begin
  ShowMessage(inttostr(i));
end;

var
  i:Int64;
  a:array [0..1] of integer;
  i1,i2:integer;
begin
  i:=874987897987;
  Move(i,a,8);
  i1:=a[0];
  i2:=a[1];
  asm
  push i2
  push i1
  call test
  end;
end.

[Yegor]

Вот не понятно только зачем по ссылке передавать константу

[Aries]

Сообщение от Yegor

Вот не понятно только зачем по ссылке передавать константу

Ну чтобы случайно не изменить значение внутри функции... Это не означает, что само значение является константой

[Yegor]

Не эт понятно, зачем тогда передавать по ссылке а не копию значения.

[Aries]

Сообщение от Yegor

Не эт понятно, зачем тогда передавать по ссылке а не копию значения.

Ну сам же понимаешь, если адрес занимает меньше памяти, чем значение, то лучше передать адрес)))
хотя насчет данной ситуации - другой вопрос)

[Yegor]

Сообщение от Aries

Ну сам же понимаешь, если адрес занимает меньше памяти, чем значение, то лучше передать адрес)))
хотя насчет данной ситуации - другой вопрос)

Тут тогда возникает вопрос почему не использовали обычный указатель.