Сейчас на форуме: _MBK_, user99, ManHunter (+8 невидимых)

 eXeL@B —› Основной форум —› Вопрос о hardlock.
Посл.ответ Сообщение

Ранг: 36.1 (посетитель)
Активность: 0.010
Статус: Участник

Создано: 18 ноября 2005 11:27
· Личное сообщение · #1

Можно как то найти в программе точку входа в API Hardlock, если можно то как?



Ранг: 77.1 (постоянный)
Активность: 0.040
Статус: Участник

Создано: 18 ноября 2005 12:15
· Личное сообщение · #2

Есть только старая инфа, сейчас вряд ли актуальна.

----
ищи в файле что-то типа
**CPG_HK_AK_HV_MAZ_GBS_TS*09-Feb-1997*V3.65**
это типа версия хардлока после неё call это и будет типа точка входа в апи... При вызове в EBX смещение на сруктуру...

type
API_STRUCTURE = record
VERS_MAJOR : byte; { Major version number of API }
VERS_MINOR : byte; { Minor version number of API }
FLAGS_1 : word; { Option flag one }
FLAGS_2 : word; { Option flag two }
HARD_ID : word; { Dongle Code (only EYE supported)}
EYE_MODUL : word; { Moduleadresse (EYE) }
EYE_ADR : word; { Register for Read and Write (EYE)}
EYE_VALUE : word; { Read and Write value (EYE) }
RESERVE1 : Longint; { Reserved }
DATA_PTR : Pointer; { Pointer on data for encryption }
DATA_BLOCKS : word; { Number of 8 Byte Blocks to encrypt }
FUNKTION : word; { Function number }
STATUS : word; { Return status }
REMOTE : word; { Accessmode (remote and/or local) }
PORT : word; { Portaddress }
SPEED : word; { Value for speed calibration }
NET_USERS : word; { Current Login Count }
ID_REF : Array [1..8] of char;
ID_VERIFY : Array [1..8] of char;
TASK_ID : LongInt; { task ID for Login }
MAX_USERS : word; { Maximum Logins (HL-Server) }
TIMEOUT : LongInt; { Login Timeout in minutes }
SHORTLIFE : word; { (multiple use) }
APPLICATION : word; { Application Number }
PROTOCOL : word; { Protocol Flags, Bitmap }
PM_HOST : word; { Number of DOS Extender used }
OSSPECIFIC : LongInt; { Ptr to OS specific data }
PORTMASK : word; { Default local search (in) }
PORTFLAGS : word; { Default local search (out) }
ENVMASK : word; { Use env string search (in) }
ENVFLAGS : word; { Use env string search (out) }
RESERVE2 : Array [1..2] of word;
SLOT_ID : word; { License slot number }
RESERVE3 : Array [1..168] of char;
end;



Ранг: 36.1 (посетитель)
Активность: 0.010
Статус: Участник

Создано: 18 ноября 2005 21:14
· Личное сообщение · #3

Большое спасибо у моей проги версия дров оказалась 9-Feb-1997 V.3.68 и структура оказалась там где надо, реально меняются всего пять байт, так что вполне можно поменять все эти байты прямо в программе. Я только с параметрами не разобрался которые передаются Api или структура изменилась или я чего то не так считаю.



Ранг: 36.1 (посетитель)
Активность: 0.010
Статус: Участник

Создано: 19 ноября 2005 21:41
· Личное сообщение · #4

Никак не могу разобраться спараметрами функций, как найти номера вызываемых функций, структура конечно хорошо, но ее эмулировать если, то неплохо бы знать как передаются параметры, а с эим проблема, ничего не нахожу чего то.


 eXeL@B —› Основной форум —› Вопрос о hardlock.
:: Ваш ответ
Жирный  Курсив  Подчеркнутый  Перечеркнутый  {mpf5}  Код  Вставить ссылку 
:s1: :s2: :s3: :s4: :s5: :s6: :s7: :s8: :s9: :s10: :s11: :s12: :s13: :s14: :s15: :s16:


Максимальный размер аттача: 500KB.
Ваш логин: german1505 » Выход » ЛС
   Для печати Для печати