Модераторы: Poseidon, Snowy, bems, MetalFan

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Шифрование... 
:(
    Опции темы
kostik_16
  Дата 4.2.2004, 23:56 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 196
Регистрация: 23.7.2003

Репутация: -4
Всего: 1



Я делаю защиту программ и прикрепляю в конец проги свою процедурку. Мне надо ее зашифровать, так как видны в открытом виде все значения переменных и т.д.

Как зашифровать ?

Мой вариант:
1) Создаем процедуру и шифруем прибовляя к каждому значению симмола ACII число.
2) При запуске моей проц. запускается небольшая прогга, которая отнимает в операт. от каждого символа число.
3) Передаем управление самой процедуре.

Ну как, возможн оєто сделать или есть что-то лучшеconfused.gif?

PM MAIL   Вверх
December
Дата 5.2.2004, 02:48 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Antitheorist
****


Профиль
Группа: Участник
Сообщений: 4423
Регистрация: 14.8.2002
Где: Харьков

Репутация: 8
Всего: 57



В первом пункте overflow очень вероятен
Ксор - надёжнее, хоть и ломается быстрее.


--------------------
Для друзей с винграда - скидки на разработку сайтов
PM MAIL WWW ICQ   Вверх
Monty
  Дата 5.2.2004, 05:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Advanced Lamer
****


Профиль
Группа: Участник Клуба
Сообщений: 3511
Регистрация: 3.4.2003
Где: Гваделупа

Репутация: нет
Всего: 27



Цитата(December @ 5.2.2004, 00:48)
В первом пункте overflow очень вероятен
Ксор - надёжнее, хоть и ломается быстрее.

а как насчет Random'a? ;) ... он так же легко ломается? smile.gif ..... хотя, да ... если знать X из Random(x) smile.gif

вот например:
Код
var
 x: integer = 32645;

procedure TForm1.Button1Click(Sender: TObject);
begin
 x := x - Random(413); // вот такое пупер шифрование переменных :)
 ShowMessage(IntToStr(x));
end;

procedure TForm1.FormShow(Sender: TObject);
begin
 RandSeed := 7834;
end;


ну а если надо зашифровать всю процеДуру, то надо использовать протектор smile.gif ....... например, аспротект 1.23rc4 smile.gif ..... и делаем так:
Код
asm DB $EB,04,$EB,05,$89,$01 end;

а тут пиши сво процедуру :) ... этот "промежуток" будет зашифрован протектором, да и вродебы он все "шифрует" %)

asm DB $EB,04,$EB,05,$99,$01 end;


PS а AsProtect'у поставляются Examples и для Delphi ;)
PPS хотя я юзаю Armadillo =)

Это сообщение отредактировал(а) Monty - 5.2.2004, 05:34


--------------------
...
О, вещая моя печаль,
О, тихая моя свобода
И неживого небосвода
Всегда смеющийся хрусталь!
PM MAIL ICQ   Вверх
p0s0l
Дата 5.2.2004, 11:46 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Г-н Посол
****


Профиль
Группа: Экс. модератор
Сообщений: 3668
Регистрация: 13.7.2003
Где: 58°38' с.ш. 4 9°41' в.д.

Репутация: 58
Всего: 112



Цитата
В первом пункте overflow очень вероятен

Пусть будет переполнение, при обратном вычитании всё нормально восстановится...

Костик, ты лучше скажи, на чем основана у тебя защита ? Я вроде помню, что ты смотрел серийный номер винта ? Если типа прогу перетащить на другой винт, то она не запустится ? Тогда однозначно лучше при шифровании/дешифровании надо использовать сер. номер винта (и вообще те параметры, по которым ты контоллируешь защиту), а не какими-то заранее заданными константами...



--------------------
С уважением, г-н Посол.
PM   Вверх
Полудненко Олег
Дата 5.2.2004, 13:35 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Українець
**


Профиль
Группа: Участник...
Сообщений: 556
Регистрация: 13.8.2003

Репутация: 1
Всего: -11



Помоему оптимально сделать так: сначала к серийному номеру напихать жофига левых символов (естественно по какому-нибудь заранее определённому алгоритму), а после уже отнимать или прибавлять.
Цитата
ты смотрел серийный номер винта
по ходу вопрос: как его определять?
PM MAIL   Вверх
Monty
Дата 5.2.2004, 14:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Advanced Lamer
****


Профиль
Группа: Участник Клуба
Сообщений: 3511
Регистрация: 3.4.2003
Где: Гваделупа

Репутация: нет
Всего: 27



Все что вы тут выдумывается, убирается легко smile.gif .......... в шифровании лучше юзай пакер и сделай неявную защиту wink.gif

PS черт, wasm.ru пропал, а то там была статья про неявную защиту sad.gif ......


--------------------
...
О, вещая моя печаль,
О, тихая моя свобода
И неживого небосвода
Всегда смеющийся хрусталь!
PM MAIL ICQ   Вверх
kostik_16
Дата 6.2.2004, 00:35 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 196
Регистрация: 23.7.2003

Репутация: -4
Всего: 1



Цитата

Костик, ты лучше скажи, на чем основана у тебя защита ? Я вроде помню, что ты смотрел серийный номер винта ? Если типа прогу перетащить на другой винт, то она не запустится ? Тогда однозначно лучше при шифровании/дешифровании надо использовать сер. номер винта (и вообще те параметры, по которым ты контоллируешь защиту), а не какими-то заранее заданными константами...


Я шифрую данные только для того, если помнишь, что-бы убрать видимые названия вызываемые мною имена апишек, ну и что-бы ломать не так было и просто!!!

Моя програ привязывается к серийнику винта. При переносе на другой комп она или выдает сообщение или сообщение с вводом пароля и триалом или просто удаляется!!

Так что с защитой, как мне лучше сам код зашифроватьconfused.gif?
PM MAIL   Вверх
oleg1973
Дата 6.2.2004, 01:29 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


asm fanat
****


Профиль
Группа: Экс. модератор
Сообщений: 3283
Регистрация: 16.7.2003
Где: Italy

Репутация: 1
Всего: 34



господа а про ProcDump32 слыхали?
запускаем все это супер пупер зашишеное ксорками
и дампим
получаем рабочий файл



--------------------
SST 465555
icq 200-512-712
PM MAIL WWW ICQ   Вверх
p0s0l
Дата 6.2.2004, 19:45 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Г-н Посол
****


Профиль
Группа: Экс. модератор
Сообщений: 3668
Регистрация: 13.7.2003
Где: 58°38' с.ш. 4 9°41' в.д.

Репутация: 58
Всего: 112



kostik_16б Если ты это ради скрытия названий API-функций, то ведь ты мне кидал пример, где названия функций не написаны ?
Вместо названий API-шных функций использовались их хэши. Если у тебя функций больше 10, это даже уменьшит размер проги...
oleg1973, крутую защиту не сделать, а простую - кто хочет, тот сломает...



--------------------
С уважением, г-н Посол.
PM   Вверх
oleg1973
Дата 6.2.2004, 21:08 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


asm fanat
****


Профиль
Группа: Экс. модератор
Сообщений: 3283
Регистрация: 16.7.2003
Где: Italy

Репутация: 1
Всего: 34



яб не так сделал
на мой взгляд лучше грузить все через LoadLibrary (которой ручками найдем адрес)
получаем прогу без импорт табле
некий процент кул крякеров уже испугается
ну а если сделать чтоб еше и сосулька на бряках не вываливалась тоды ваще 80 процентов крякеров отпадут (насчет сосульки есть у меня рабочий вариант мессаджбоха который сосулька не видит )


--------------------
SST 465555
icq 200-512-712
PM MAIL WWW ICQ   Вверх
kostik_16
Дата 7.2.2004, 00:05 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 196
Регистрация: 23.7.2003

Репутация: -4
Всего: 1



Что за сосулькаconfused.gif?

У меня не только апишки, н ои переменные разные текстовые, которые подлежат скрытию!!


Я предлогаю так:
1). При приклеивании кода с определенного участка памяти каждому байту строки прибовляем например 2h.
2). При запуске моей проц. с определенного участка отнимается по 2h, с помощью вспомогательной проц.
3) При выполнении передаем управление главной проц.

Ну какconfused.gif
PM MAIL   Вверх
<Spawn>
Дата 7.2.2004, 07:13 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Око кары:)
****


Профиль
Группа: Экс. модератор
Сообщений: 2776
Регистрация: 29.1.2003
Где: Екатеринбург

Репутация: 44
Всего: 64



Цитата(kostik_16 @ 6.2.2004, 16:05)
Что за сосулькаconfused.gif?

SoftICE наверное))


--------------------
"Для некоторых людей программирование является такой же внутренней потребностью, подобно тому, как коровы дают молоко, или писатели стремятся писать" - Николай Безруков.
PM MAIL ICQ   Вверх
p0s0l
Дата 7.2.2004, 11:28 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Г-н Посол
****


Профиль
Группа: Экс. модератор
Сообщений: 3668
Регистрация: 13.7.2003
Где: 58°38' с.ш. 4 9°41' в.д.

Репутация: 58
Всего: 112



oleg1973, у него и так без Import Table, как вирус короче - ищется kernel32.dll, в нем LoadLibrary и GetProcAddress - а дальше поехали...
Только название функций открытым текстом...
Можешь мне кинуть тот пример мессажд бокса ?


--------------------
С уважением, г-н Посол.
PM   Вверх
December
Дата 7.2.2004, 19:14 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Antitheorist
****


Профиль
Группа: Участник
Сообщений: 4423
Регистрация: 14.8.2002
Где: Харьков

Репутация: 8
Всего: 57



И мне, плз



--------------------
Для друзей с винграда - скидки на разработку сайтов
PM MAIL WWW ICQ   Вверх
oleg1973
Дата 7.2.2004, 21:27 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


asm fanat
****


Профиль
Группа: Экс. модератор
Сообщений: 3283
Регистрация: 16.7.2003
Где: Italy

Репутация: 1
Всего: 34



файл в топике о пректах


--------------------
SST 465555
icq 200-512-712
PM MAIL WWW ICQ   Вверх
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема »


 




[ Время генерации скрипта: 0.0631 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.