Разработка генератора паролей
Обзор основных используемых языков программирования (С++, Java, Pascal). Анализ существующих методов шифрования паролей. Основные понятия объектно-ориентированного программирования. Реализация приложения для генерирования паролей на языке Object Pascal.
| Рубрика | Программирование, компьютеры и кибернетика |
| Вид | курсовая работа |
| Язык | русский |
| Дата добавления | 07.07.2012 |
| Размер файла | 822,4 K |
Отправить свою хорошую работу в базу знаний просто. Используйте форму, расположенную ниже
Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.
f: file of shortstring;
function TGenerate.password (symbolpassword,ratepassword: Integer):String;
begin
names:= ExtractFilePath( ParamStr(0) ) + 'settings.stgg';
AssignFile(f,names);
reset(f);
seek(f,2);
read(f,nabor1);
read(f,nabor2);
read(f,nabor3);
case symbolpassword of
0:nabor:=nabor1;
1:nabor:=nabor2;
2:nabor:=nabor3;
3:nabor:=nabor1+nabor2;
4:nabor:=nabor1+nabor3;
5:nabor:=nabor2+nabor3;
6:nabor:=nabor1+nabor2+nabor3;
end;
gener:='';
for schet:=0 TO ratepassword DO
gener:=gener+nabor[random(length(nabor))+1];
password:=gener;
seek(f,25);
TRUNCATE(F);
closefile(f);
end;
end.
Модуль кодирования:
unit coder;
interface
uses classes,Sysutils,StrUtils;
type
TCode=class(TObject)
private
public
function cipher(password:string;lang:integer):string;
end;
implementation
function TCode.cipher(password: string; lang: Integer):string;
var i:integer;
mask:string;
tabl:array[1..20] of integer;
f:file of shortstring;
names,j,str,nabor:shortstring;
begin
nabor:='qwertyuiopasdfghjklzxcvbnmQWERTYUIOPASDFGHJKLZXCVBNM0123456789';
names:= ExtractFilePath( ParamStr(0) ) + 'settings.stgg';
AssignFile(f,names);
reset(f);
seek(f,5);
for i:=1 to 20 do
begin
read(f,j);
tabl[i]:=strtoint(j);
mask:=mask+j;
end;
mask:='';
for i:=1 to 100 do
mask:=mask+nabor[random(length(nabor))+1];
for i:=1 to 20 do
if i<lang+1 then
mask:=stuffString(mask,tabl[i],1,copy(password,i,1));
if lang<>0 then cipher:=mask
else cipher:='';
closefile(f);
end;
end.
Модуль декодирования:
unit decoder;
interface
uses classes,Sysutils,strutils;
type
TDecode=class(TObject)
private
public
function cipher(mask:string;lang:integer):string;
end;
implementation
function TDecode.cipher(mask: string; lang: Integer):string;
var i,n:integer;
password:string;
tabl:array[1..20] of integer;
f:file of shortstring;
names,j:shortstring;
begin
names:= ExtractFilePath( ParamStr(0) ) + 'settings.stgg';
AssignFile(F,names);
reset(F);
seek(f,5);
password:='';
for i:=1 to 20 do
begin
read(f,j);
tabl[i]:=strtoint(j);
end;
for i:=1 to 20 do
if i<lang+1 then
password:=stuffString(password,i+0,1,copy(mask,tabl[i],1));
if lang<> 0 then cipher:=password
else cipher:='';
closefile(f);
end;
end.
Приложение 5
Пример работы программы
Размещено на Allbest.ru
Подобные документы
Понятие объектно-ориентированного программирования, характеристика используемых языков. Практическая разработка средств объектно-ориентированного программирования в задачах защиты информации: программная реализация на языке С++, а также Turbo Pascal.
курсовая работа [275,9 K], добавлен 22.12.2011Методы грамматического разбора. Разработка структуры учебного транслятора на базовом языке программирования Object Pascal в среде объектно-ориентированного визуального программирования Borland DELPHI 6.0 с использованием операционной системы Windows XP.
курсовая работа [493,8 K], добавлен 12.05.2013Основные понятия и структура обработчика на языке Pascal. Элективные курсы по информатике в системе профильного обучения. Элективный курс "Программирование в среде Delphi". Методические материалы по изучению программирования на языке Object Pascal.
методичка [55,4 K], добавлен 08.12.2010Концепция объектно-ориентированного программирования. Объектно-ориентированные языки программирования: Smalltalk, Object Pascal, CLOS и C++. Понятие "Объект" и "Класс". Управление доступом к элементам данных классов. Определение функций-членов класса.
реферат [24,5 K], добавлен 28.10.2011Изучение объектно-ориентированного языка программирования Java, его функциональные возможности. Создание программного кода. Описание классов и методов, использованных в программе. Руководство пользователя, запуск сервера и клиентского приложения.
курсовая работа [1,8 M], добавлен 16.09.2015Определение и анализ сущности брутфорса – одного из популярных методов взлома паролей на серверах и в различных программах. Характеристика клавиатурного шпиона на базе драйвера. Рассмотрение основных программ для поиска и удаления клавиатурных шпионов.
курсовая работа [100,9 K], добавлен 03.08.2017Характеристика вычислительной системы и инструментов разработки. Программирование на языке Pascal в среде Turbo Pascal и на языке Object Pascal в среде Delphi. Использование процедур, функций, массивов, бинарного поиска. Создание базы данных в виде файла.
отчет по практике [2,1 M], добавлен 02.05.2014Характеристики и свойства языков программирования. Исследование эволюции объектно-ориентированных языков программирования. Построение эволюционной карты механизмов ООП. Разработка концептуальной модели функционирования пользовательского интерфейса.
курсовая работа [2,6 M], добавлен 17.11.2014Векторная компьютерная графика. Графические примитивы. Графические возможности языка программирования Pascal. Методические рекомендации к изучению графики в языке программирования Pascal. Построение графиков функций.
курсовая работа [28,3 K], добавлен 13.06.2007Реализация алгоритма Гомори на языке программирования Object Pascal при использовании среды разработки Borland Delphi 7. Рассмотрение основных способов компьютерного осуществления решения задач целочисленного программирования симплексным методом.
курсовая работа [1,8 M], добавлен 28.03.2013
