Разработка и реализация математической модели двухключевой криптосистемы
Разложение на простые сомножители. Понятия теории сравнений. Вычисление мультипликативного обратного. Существование конечного поля. Шифрование потока данных. Принцип работы RSA-криптосистемы. Криптографический анализ асимметричных систем шифрования.
| Рубрика | Программирование, компьютеры и кибернетика |
| Вид | дипломная работа |
| Язык | русский |
| Дата добавления | 14.08.2015 |
| Размер файла | 390,4 K |
Отправить свою хорошую работу в базу знаний просто. Используйте форму, расположенную ниже
Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.
WaitForm.ShowModal;
MainForm.GenKeys;
WaitForm.Close;
ChooseForm.Close;
end;
end.
Приложение 3
Текст модуля взлома шифра RSA
unit AntiRSA;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;
type
TAntiR = class(TForm)
Label1: TLabel;
Edit1: TEdit;
Button1: TButton;
Label2: TLabel;
Edit2: TEdit;
Button2: TButton;
Label3: TLabel;
Edit3: TEdit;
Button3: TButton;
Label4: TLabel;
Label5: TLabel;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure Edit1Change(Sender: TObject);
procedure Button3Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
AntiR: TAntiR;
d,e,n,m:string;
s,ss,sss:string;
j:integer;
implementation
uses MainProg;
{$R *.DFM}
procedure TAntiR.Button1Click(Sender: TObject);
{процедура шифрации сообщения}
var
code:integer;
begin
e:='16813'; {открытый ключ}
n:='47053'; {произведение p, q}
d:='19837'; {секретный ключ}
m:='46620'; {функция Эйлера}
if Edit1.Text=''
then begin
ShowMessage('Где сообщение?');
Edit1.SetFocus;
end
else if MainForm.Bol(Edit1.Text,n)=1
then begin
ShowMessage('Сообщение должно быть меньше 47053');
Edit1.SetFocus;
end
else begin
s:=MainForm.Der1(Edit1.Text,e,n);
code:=StrToInt(s);
MainForm.Deln(s);
Edit2.Text:=IntToStr(code);
Edit2.Refresh;
end;
end;
procedure TAntiR.Button2Click(Sender: TObject);
{процедура взлома шифра}
var
flag:boolean;
code:integer;
begin
flag:=false;
j:=1;
sss:=s;
repeat {зашифровываем шифр открытым ключом}
ss:=MainForm.Der1(s,e,n);
code:=StrToInt(ss);
ss:=IntToStr(code);
if Edit2.Text=ss {проверка зашифрованного результата i-той итерации на совпадение с шифром}
then begin
code:=StrToInt(s);
Edit3.Text:=IntToStr(code);
flag:=True;
end
else begin
s:='';
s:=ss;
code:=StrToInt(ss);
Edit3.Text:=IntToStr(code);
Edit3.Refresh;
end;
j:=j+1; {подсчет совершенных итераций}
Label5.Caption:=IntToStr(j);
Label5.Refresh;
until flag;
end;
procedure TAntiR.Edit1Change(Sender: TObject);
begin
Edit2.Text:='';
Edit3.text:='';
Label5.Caption:='';
end;
procedure TAntiR.Button3Click(Sender: TObject);
begin
Close;
end;
end.
Размещено на Allbest.ru
Подобные документы
Симметричные криптосистемы как способ шифрования, в котором для шифрования и расшифровывания применяется один и тот же криптографический ключ. Разбор и реализация шифрования алгоритма: простая и двойная перестановка, перестановка "магический квадрат".
курсовая работа [3,3 M], добавлен 11.03.2013Традиционные симметричные криптосистемы. Основные понятия и определения. Методы шифрования. Метод перестановок на основе маршрутов Гамильтона. Асимметричная криптосистема RSA. Расширенный алгоритм Евклида. Алгоритмы электронной цифровой подписи Гамаля.
курсовая работа [235,6 K], добавлен 06.01.2017Анализ криптографических методов шифрования данных. Разработка криптосистемы, основанной на схеме Эль-Гамаля. Определение функциональных и нефункциональных требований. Выбор языка программирования и среды разработки. Тестирование программного продукта.
дипломная работа [1,6 M], добавлен 17.07.2016Рассмотрение основных понятий криптографии: конфиденциальности, целостности, аутентификации и цифровой подписи. Описание криптографических средств защиты (криптосистемы, принципы работы криптосистемы, распространение ключей, алгоритмы шифрования).
дипломная работа [802,2 K], добавлен 08.06.2013Понятие информационной безопасности и классификация ее угроз. Анализ работы симметричных систем криптографической защиты данных и основы нелинейного шифрования потока. Функционирование линейных конгруэнтных генераторов псевдослучайных последовательностей.
дипломная работа [968,8 K], добавлен 01.07.2011Автоматизация процесса шифрования на базе современных информационных технологий. Криптографические средства защиты. Управление криптографическими ключами. Сравнение симметричных и асимметричных алгоритмов шифрования. Программы шифрования информации.
курсовая работа [795,7 K], добавлен 02.12.2014Сравнительный анализ роторной криптосистемы на основании криптографической машины "Энигма" времен второй мировой войны и усовершенствованной "Энигма". Ассиметричная система шифрования и дешифрования данных RSA, ее принципиальное отличие от симметричных.
курсовая работа [1,7 M], добавлен 14.12.2012Статистический анализ текстов, созданных программой симметричного шифрования. Реализация симметричного криптоалгоритма. Основные шаги в использовании криптосистемы PGP. Генерация ключей, шифрование и расшифровка сообщений. Защита от сетевых атак.
лабораторная работа [1,7 M], добавлен 06.07.2009Симметричные криптосистемы; алгоритмы шифрования и дешифрования данных, их применение в компьютерной технике в системах защиты конфиденциальной и коммерческой информации. Основные режимы работы алгоритма DES, разработка программной реализации ключа.
курсовая работа [129,6 K], добавлен 17.02.2011Формирование ключей для шифрования сообщения. Описание алгоритма RSA: шифрование и дешифрование. Понятие и история изобретения криптосистемы с открытым ключом. Свойства односторонней функции и сложность раскрытия шифра. Сущность цифровой подписи.
лабораторная работа [326,0 K], добавлен 04.11.2013
