Генератор паролей

Размещено на http://www.allbest.ru/

Размещено на http://www.allbest.ru/

ВВЕДЕНИЕ

Тема курсового проекта создание программы «Генератор паролей» с использованием различных инструментальных средств.

Цель курсового проекта создание программного продукта «Генератор паролей».

Для достижения поставленной цели были выявлены следующие задачи:

§ изучить соответствующую литературу

§ разработать алгоритм программного продукта

§ разработать программный продукт на основе построенного алгоритма

§ разработать справочную систему программного продукта

§ разработать сопроводительную документацию программного продукта

В качестве среды разработки был выбран язык программирования Borland Delphi 7.0

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

Данный проект, считаем актуальным в связи с тем, что с его помощью можно получить пароли.

Программный продукт имеет практическую направленность, так как его использование позволяет обезопасить хранение информации на рабочих станциях.

Курсовой проект состоит из: пояснительной записки и программного продукта. Все перечисленные документы содержаться на прилагаемом СD диске.

1. 0БЩАЯ ЧАСТЬ

генератор пароль программа

Для создания программного продукта по индивидуальному заданию было выделено шесть этапов:

Первый этап - определение цели разработки программного продукта. Составление требований к его функциям и подбор способов реализации этих функций.

Второй этап - составление требований. В процессе этого этапа проводился анализ требований к программному продукту (необходимые функции, удобные интерфейсы, ограничения). На этом этапе были определены требования к программному продукту, для ликвидации неопределённости требований.

Третий этап - создание общего вида программного продукта. На этом этапе определяются с компонентами и методами, применяемыми при работе с ними. Также предстояло изучить дополнительную информацию по работе методов в Delphi.

Четвёртый этап - проектирование программного продукта, на этом этапе определилась структура программного продукта и алгоритм его реализации. Также был определен интерфейс. Всё это необходимо для следующего этапа реализации. Этот этап проектирования представлен совокупностью компонентов проектирования, для каждого из которых был определён набор свойств и связь с другими компонентами. Процесс проектирования проводился в соответствии с теми методами и технологией разработки, которые установлены в плане проекта

Пятый этап - разработка программного продукта. В процессе выполнения данного этапа преобразовались результаты этапа проектирования в коды программ на используемом языке программирования в соответствии со стандартами кодирования. На этом этапе велась работа по планированию программного продукта.

Шестой этап - сопровождение программного продукта. На этом этапе создается документ поддержки пользователя в работе с программой.

2. Специальная часть

Для запуска программы, нужно зайти в папку Generator и запустить файл Generator.exe

Работа в программе: Вводим слово или фразу необходимые зашифровать в верхнее поле (в производстве в основном используют фамилии сотрудников). После нажатия на кнопку «Генерировать» программа выводит полученный пароль в нижнее поле.



При утрате или смене пароля для сотрудников чьи фамилии были использованы ранее, можно сменить тип шифровки на «Вид 2»

Алгоритм

Программа анализирует введенное слово и преобразует буквы этого слова в две или три буквы латинского алфавита на один из двух возможных вариантов шифровки.

Код программы

unit Unit1;

interface

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, StdCtrls, jpeg, ExtCtrls;

type

TForm1 = class(TForm)

Button1: TButton;

Label1: TLabel;

Label2: TLabel;

Panel1: TPanel;

Memo1: TMemo;

Panel2: TPanel;

Memo2: TMemo;

Panel3: TPanel;

RadioButton2: TRadioButton;

RadioButton1: TRadioButton;

procedure Button1Click(Sender: TObject);

procedure FormShow(Sender: TObject);

procedure RadioButton2Click(Sender: TObject);

procedure RadioButton1Click(Sender: TObject);

private

{ Private declarations }

public

{ Public declarations }

end;

var s,s1,pas:String;

n,i,l,j:Integer;

Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);

begin

n:=Memo1.Lines.Count;

Memo2.Clear;

For i:=0 to (n-1) do begin

s:=Memo1.Lines.Strings[i];

l:=Length(s);

//Показать сообщение(ия);

pas:='';

If RadioButton1.Checked=True Then begin

for j:=0 to l do begin

s1:=s[j];

If (s1='a')or (s1='а') Then pas:=pas+'ka';

If (s1='b')or (s1='б') Then pas:=pas+'zu';

If (s1='c')or (s1='ц') Then pas:=pas+'mi';

If (s1='d') or (s1='д') Then pas:=pas+'te';

If (s1='e')or (s1='е') Then pas:=pas+'ku';

If (s1='f') or (s1='ф')Then pas:=pas+'lu';

If (s1='g') or (s1='г') Then pas:=pas+'ji';

If (s1='h') or (s1='ч') Then pas:=pas+'ri';

If (s1='i') or (s1='и') Then pas:=pas+'ki';

If (s1='j') or (s1='ж') Then pas:=pas+'zu';

If (s1='k') or (s1='к')Then pas:=pas+'me';

If (s1='l') or (s1='л') Then pas:=pas+'ta';

If (s1='m') or (s1='м') Then pas:=pas+'rin';

If (s1='n') or (s1='н') Then pas:=pas+'to';

If (s1='o') or (s1='о') Then pas:=pas+'mo';

If (s1='p') or (s1='п')Then pas:=pas+'no';

If s1='q' Then pas:=pas+'ke';

If (s1='r') or (s1='р') Then pas:=pas+'shi';

If (s1='s') or (s1='с') Then pas:=pas+'ari';

If (s1='t') or (s1='т') Then pas:=pas+'chi';

If (s1='u') or (s1='у') Then pas:=pas+'do';

If (s1='v') or (s1='в') Then pas:=pas+'ru';

If (s1='w') or (s1='ш') Then pas:=pas+'mei';

If (s1='x') or (s1='х') Then pas:=pas+'na';

If (s1='y') or (s1='ю') Then pas:=pas+'fu';

If (s1='z') or (s1='з') Then pas:=pas+'z';

If s1='я' Then pas:=pas+'ko';

If s1=' ' Then pas:=pas+' ';

end;

end;

If RadioButton2.Checked=True Then begin

for j:=0 to l do begin

s1:=s[j];

If (s1='a')or (s1='а') Then pas:=pas+'tu';

If (s1='b')or (s1='б') Then pas:=pas+'th';

If (s1='c')or (s1='ц') Then pas:=pas+'uh';

If (s1='d') or (s1='д') Then pas:=pas+'pi';

If (s1='e')or (s1='е') Then pas:=pas+'eb';

If (s1='f') or (s1='ф')Then pas:=pas+'lu';

If (s1='g') or (s1='г') Then pas:=pas+'gu';

If (s1='h') or (s1='ч') Then pas:=pas+'eh';

If (s1='i') or (s1='и') Then pas:=pas+'an';

If (s1='j') or (s1='ж') Then pas:=pas+'gi';

If (s1='k') or (s1='к')Then pas:=pas+'sa';

If (s1='l') or (s1='л') Then pas:=pas+'lo';

If (s1='m') or (s1='м') Then pas:=pas+'em';

If (s1='n') or (s1='н') Then pas:=pas+'gi';

If (s1='o') or (s1='о') Then pas:=pas+'bu';

If (s1='p') or (s1='п')Then pas:=pas+'po';

If s1='q' Then pas:=pas+'hu';

If (s1='r') or (s1='р') Then pas:=pas+'pi';

If (s1='s') or (s1='с') Then pas:=pas+'sv';

If (s1='t') or (s1='т') Then pas:=pas+'ho';

If (s1='u') or (s1='у') Then pas:=pas+'uh';

If (s1='v') or (s1='в') Then pas:=pas+'va';

If (s1='w') or (s1='ш') Then pas:=pas+'fi';

If (s1='x') or (s1='х') Then pas:=pas+'an';

If (s1='y') or (s1='ю') Then pas:=pas+'am';

If (s1='z') or (s1='з') Then pas:=pas+'ari';

If s1='я' Then pas:=pas+'tu';

If s1=' ' Then pas:=pas+' ';

end;

end;

Memo2.Lines.Add(pas);

end;

end;

procedure TForm1.FormShow(Sender: TObject);

begin

RadioButton1.Checked:=true;

end;

procedure TForm1.RadioButton2Click(Sender: TObject);

begin

Button1.Caption:='Генерировать';

Memo1.Color:=clCream;

Memo2.Color:=clCream;

Memo1.Font.Color:=clNavy;

Memo2.Font.Color:=clNavy;

Label1.Font.Color:=clNavy;

Label2.Font.Color:=clNavy;

end;

procedure TForm1.RadioButton1Click(Sender: TObject);

begin

Button1.Caption:='Генерировать';

Memo1.Color:=clCream;

Memo2.Color:=clCream;

Memo1.Font.Color:=clNavy;

Memo2.Font.Color:=clNavy;

Label1.Font.Color:=clNavy;

Label2.Font.Color:=clNavy;

end;

end.

Документация, сопровождающая разработанное программное средство

Она необходима как средство передачи информации между разработчиками ПП, как средство управления разработкой ПП и как средство передачи пользователям информации, необходимой для применения и сопровождения ПП.

Эту документацию можно разбить на две группы:

§ Документы управления разработкой ПП

§ Документы, входящие в состав ПП

Документы управления разработкой ПП, протоколируют процессы разработки и сопровождения ПП, обеспечивая связи внутри коллектива разработчиков. Эти документы могут быть следующие типов:

§ Планы, расписания. Эти документы создаются для прогнозирования и управления процессами разработки и сопровождения.

§ Каждая часть курсового проекта была выполнена в срок.

Документы, входящие в состав ПП описывают программы ПП как с точки зрения их применения пользователями, так и с точки зрения их разработчиков и сопроводителей (в соответствии с назначением ПП). Здесь следует отметить, что эти документы будут использоваться не только на стадии эксплуатации ПП (в ее фазах применения и сопровождения), но и на стадии разработки для управления

Процессом разработки (вместе с рабочими документами). Эта документация рассмотрена в Специальной части.

ЗАКЛЮЧЕНИЕ

Во время роботы над курсовым проектом были выполнены все поставленные задачи:

§ Проведены испытания полученных программных продуктов соответствии с заданными требованиями.

§ Разработаны рекомендации по применению программных продуктов

Исходя из спроектированного плана, разработана программа «Генератор паролей», которая была реализована средствам программирования «Borland Delphi 7.0», которая и позволяет наглядно демонстрировать данные задания, и создает необходимые удобства работы в среде ОС Windows XP.

Данный пакет может быть использован во многих областях компьютерной безопасности.

Размещено на Allbest.ru