[Консультация] дипломный проект

[Igorek9494]

Доброе утро!
Дали тему дипломного проекта "Создание автоматизированной системы анализа информационной безопасности"
которую нужно написать в среде программирования delphi.(дипломная средне-технического колледжа)
У самого,к сожалению, идей что-то мало на данную тему. Может у кого-нибудь есть идеи что можно реализовать?
буду искренне благодарен.

[blackstrip]

Информационная безопасность — это процесс обеспечения конфиденциальности, целостности и доступности информации. (источник http://ru.wikipedia.org/wiki/Информа...я_безопасность )

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

[Igorek9494]

литературы тоже много почитал, но мало чего придумал, а есть что нибудь в примере программирования делфи (сразу скажу дипломный проект не требует особого функционирования(потому что проект с средне-технического учреждения))
(p.s спасибо за направление идеи)

[Человек_Борща]

Создание автоматизированной системы анализа информационной безопасности

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

Я бы взял ядро интерпретатора Inno Setup или любой, другой скрипт. движок для Delphi(FastScript, PaxCompiler и т.д. и т.п.). И использовал его.

И теперь уже вопрос в том, что предоставить разработчикам тестов?
Ответ на вопрос, вопросом: А что будем тестировать?
Конечно же, надо дать польный доступ к ОС, просто закрыть оооочень длинные коды и выдать их короткими, ввиде классов-оберток.

На пример: тестирование открытых портов, надо в Delphi реализовать класс, который перечислит все процессы, все открытые процессом соедирения, IP и порты, состояния, типы и т.д.. что надо будет в рамках безопасности открытых портов в системе, с возможностью закрытия порта/соединения/процесса(если это надо).

А скрипт будет таким:

var
 PI:TPortInfo;
begin
...
  
 if PortIsOpen(8080,PI) then
 begin
   SecurityWarning('8080 port is opened by process "'+PI.ownerProcess.FileName+'".');
   if ClosePort(bAgressive) then //bAgressive подразумевает закрытие порта любым способом
   begin
     InfoMessage('8080 port closed in agressive mode.');
     //Передача закрытия порта в правила фаервола для TCP, UDP протоколов, все вх. исх. соединения, все источники, без исключений.
     AddFirewallRule('TCP,UDP',8080,InOut,DenyAllSources+NoExecludes);
   end
   else
     SecurityError('8080 port still opened & cant be closed!');
 end;

Фактически, это натуральное Unit-тестирвание системы.

Чтоб оно было автоматическим, просто по таймеру запускаются скрипты.

[raxp]

Cистема учета (чего угодно, книг в библиотеке, пропусков, товара, ...) на RFID метках. Актуально, на злобу дня и по безопасности.