Привет, вот у какая у меня проблемма: Мне нужно на Delphi зашифровать заголовок PE файла. Я прочитал много инфы про PE формат, но практических примеров на Delphi очень мало, тоесть мне надо обычным XOR'ом зашифровать заголовок EXEшника, напишите пожалуйста пример как писать в PE_Header и именно что писать! Тоесть сам код криптовки XOR'ом, только пожалуйста отвечайте по теме, мне очень надо увидеть именно сам принцып, как и что. Вот нашел код Code (Text): function Encrypt(Str : PChar): PChar; var X, Y : Integer; A : Byte; Key: PChar; begin Key := 'KEY'; //Key for encrypting. Y := 1; for X := 1 to length(Str) do begin A := (ord(Str[X]) and $0f) xor (ord(Key[Y]) and $0f); Str[X] := char((ord(Str[X]) and $f0) + A); inc(Y); if Y > length(Key) then Y := 1; end; Key := ''; Result := Str; end; шифрования, но незнаю как его вписать в EXE , и потом расшифровать =((
практических примеров на Delphi достачно скажи, что ты нашёл (из этого "мало") и что тебе не подошло? смотрел исходники GHF Protector или AHPacker?
GHF Protector или AHPacker к сожалению невидел...поделишся? ) Мне подойдет и полная зашифровка файла, вот как я должен сделать: Мне надо зашифровать exe шник Xor ом, и вбить в начало кода рассшифровщик. Так помоему крипторы делают. Но я незнаю как правильно вписать в exe процедуры шифровки и рассшифровки...(( Надеюсь на вашу помощь!
Native 1. Заголовок нужен системе(но с ним можно извращаться, тут лучше в "упаковщики" глянуть) 2. Когда прога запущена, заголовок можешь бить, стирать и че хошь, теоретически(Эксперементировать) 3. Шифровать можно код, Данные, к ресурсам нужно по нежнее, но тоже можно! 4. Ты говоришь На Дельфи, не зацикливайся, подобные задачи давно решены с применением многих средств разработки ПО 5. Лучше тебе вооружиться статьями : "Про упаковщики в последний раз", цикл от Bill_Priosener (так вроде), и только после них по ковырять какой нить upx , а во время них ковырять, чтобы понять о чем речь!
Етот код просто глупый, он никогда не заработает. А строка - Code (Text): Key := 'KEY'; //Key for encrypting. просто нелогичная, такими присваванями, для типа PChar можна вызвать только Access Volation. Тебе действительно лучше почитать такие доки: [W A S M _ R U] СТАТЬИ Вирусология От зеленого к красному Глава 2 Формат исполняемого файла ОС Windows_ PE32 и PE64_ Способы заражения исполняемых файлов.htm (ту ее часть где описан формат PE-файла). Если хорошо знаешь английский можеш почитать документ з аттача
при желании сам найдёшь в открытых источниках. избавляйся от лени и учись. сам ищи и находи. Morphine найти не проблема. было бы желание двигаться самому.
