Всем привет.
Для одного шареварного проекта возник вопрос регистрации. После непродолжительного изучения вопросов защиты программ, выбрал решение генерации ключа. Поскольку готовых компонентов ассиметричного шифрования для кол-а не было, пришлось подгонять чужой код (второй раз уже, первый раз не поделился с народом а исходники потерялись, поэтому исправляюсь). Результат здесь http://getmysources.com/kol_rsa.zip.
В кратце смысл использования ассиметричного шифра в том, что
для шифрования и расшифрования нужны два разных ключа.   Теоретически это не позволит сделать взломщикам кейген, поскольку ключ шифрования есть только у программиста.
Другой вопрос правильно ли защищён сам код проверки ключа, но для этого тоже есть куча способов(vmprotect.ru) и рекомендаций.

Надеюсь, кому то код будет полезен.

Да. Действительно порта RSA под KOL нет. Только, пару замечаний:
1. Зачем оставили модуль Math? Во-первых есть KOLMath.pas, а во-вторых (как оказалось) он ваааще не нужен. И скомпиленный ЕХЕшник с 71кБ уменьшается до 46кБ ;)
2. В файле KOLRSA.pas используются try...finnaly(except)...end;, а файл ERR.pas не подключен... Будут косяки при эксепшинах ;)
А вообще Спасибо.

Подправленная версия: http://slil.ru/25901476 Потом залью на http://www.kolnmck.ru

Для организации RSA и других ассиметричных алгоритмов можно воспользоваться библиотекой "больших" целых чисел FGInt. Взять исходную библиотеку и примеры реализации алгоритмов для FreePascal можно здесь http://www.submanifold.be/triade/GInt/gint.html
Для KOL адаптируется в 1 минтуту (замена пары strtoint).

Извиняюсь, исходник не глянул сперва... Код как раз на основе этой библиотеки...

Кстати, на www.kolnmck.ru его ещё нет... MTsv DN, не выложите?

К сожалению по ссылке (http://slil.ru/25901476) файл недоступен.
Перезалейте плиз.

Спасибо!

Небольшие исправления, ключи и зашифрованный текст в формате base64.

http://www.getmysources.com/kolrsa.zip

Заметил ошибку в коде
Base10StringToFGInt('65537', e); // just an odd starting point
е - это часть публичного ключа. Несколько байт это очень мало...

Привет.Есть  у кого-нибудь программа RSA на делфи???
Скиньте пожалуйста на мыло.Заранее спасибо

есть компоненты http://dy.cdrrhq.ru/misc/KOLCryptoLIB.rar

I also have ms cryptolib working for some years. Should be somewhere, otherwise I still have it.

Вот надежная реализация RSA:
http://code.google.com/p/delphi-free-forum/downloads/detail?name=Forum.28.05.2011.rar&can=2&q=#makechanges
здесь же еще куча другого всего криптографического