Автоматизований топологічний синтез тороїдально-решітчастих комунікаційних мереж

Основним напрямком подальших досліджень може бути розроблення та формалізація методів автоматизованого синтезу більш складних тороїдально-решітчастих ТС (наприклад, структур підвищеної зв'язності з додатковими зв'язками діагонального типу).



СПИСОК ВИКОРИСТАНИХ ДЖЕРЕЛ

1. Артамонов, Г. Т. Топология регулярных вычислительных сетей и сред [Текст]/ Г. Т. Артамонов. - М.: Радио и связь, 1985. - 192 с.

2. Артамонов, Г. Т. Топология сетей ЭВМ и микропроцессорных систем [Текст] / Г. Т. Артамонов, В. Д. Тюрин. - М.: Радио и связь, 1991. - 248 с.

3. Дистель, Р. Теория графов [Текст] : пер с англ. / Р. Дистель. - Новосибирск: Изд-во Ин-та математики, 2002. - 336 с.

4. Евреинов, Э. В. Однородные вычислительные системы, структуры и среды [Текст] / Э. В. Евреинов. - М.: Радио и связь, 1981. - 207 с.

5. Каган, Б. М. Электронные вычислительные машины и системы [Текст]/ Б. М. Каган - М.: Энергоатомиздат, 1991. - 484 с.

6. Корнеев, В. В. Параллельные вычислительные системы [Текст] / В.В. Корнеев. - М.: Нолидж, 1999. - 320 с.

7. Мелехин, В. Ф. Вычислительные машины, системы и сети [Текст] : учебник для студ. высш. учеб. заведений / В. Ф. Мелехин, Е. Г. Павловский. - М.: Издательский центр «Академия», 2007. - 560 с.

8. Мельник, А. О. Архітектура комп'ютера [Текст] : Наукове видання: підручник / А. О. Мельник.- Луцьк: Волинська обласна друкарня, 2008. - 470 с.

9. Монахова, Э.А. Структурные и коммуникативные свойства циркулянтных сетей [Текст] / Э. А. Монахова // Прикладная дискретная математика. - 2011.- № 3.- С. 92-115.

10. Орлов, С. А. Организация ЭВМ и систем [Текст] : учебник для вузов / С. А. Орлов, Б. Я. Цилькер. - СПб.: Питер, 2011. - 688 с.

11. Пинчук, В. П. Базовые графы для построения топологии многопроцессорных систем [Текст] / В. П. Пинчук // Искусственный интеллект. - 2004. - № 4 - С. 46-58.

12. Столингс, У. Структурная организация и архитектура компьютерных систем [Текст] : пер с англ. / У. Столингс. - М.: Изд. дом Вильямс, 2002. - 896 с.

13. Таненбаум, Э. Архитектура компьютера [Текст] : пер с англ. / Э. Таненбаум., Т. Остин. - СПб.: Питер, 2013. - 816 с.

14. Тиртишніков, О. І. Оцінювання ступеню асиметричності та топологічної вартості статичних комунікаційних мереж [Текст] / О. І. Тиртишніков, О. О. Ботвін, В. В. Сенько // Системи обробки інформації: зб. наук. пр. / ХУПС - Х., 2015. - Вип. 1 (126). - С. 162-165.

15. Тиртишніков, О. І. Властивості статичних комунікаційних мереж тороїдально-кубічних топологій [Текст] / О. І. Тиртишніков, І. В. Додух // Системи управління, навігації та зв'язку: зб. наук. пр. / ПолтНТУ - Полтава,, 2014. - Вип. 2 (30). - С. 60-63.

16. Тиртишніков, О. І. Класифікація комунікаційних мереж багатопроцесорних комп'ютерних систем на основі уточненого поняття розмірності [Текст] / О. І. Тиртишніков, Ю. М. Корж, О. О. Ботвін // Системи обробки інформації: зб. наук. пр. / ХУПС - Х., 2016. - Вип. 2 (139). - С. 126-136.

17. Харари, Ф. Теория графов [Текст] / Ф. Харари; пер с англ. В. П. Козырева. - М.: Едиториал УРСС, 2003. - 296 с.

18. Cameron Patterson, J. Managing a real-time massively-parallel neural architecture [Text] / J. Cameron Patterson. - School of Computer Science, 2012 - 232 p.

19. Dally, W. J. Principles and practices of interconnection networks [Text] / W. J. Dally, B. Towles. - Elsevier, 2004. - 550 p.

20. Kotsis, G. Interconnection topologies and routing for parallel processing systems [Text] / G. Kotsis. - Wien: ACPC, Technical Report Series, ACPC / TR 92-19, 1992. - 95 p.

21. Тиртишніков О.І., Ярміш М.І. Метод визначення максимально компактної топологічної структури тороїдальної комунікаційної мережі \ Сучасні напрями розвитку інформаційно-комунікаційних технологій та засобів управління: Матеріали сьомої міжнародної науково-технічної конференції. - Полтава: ПНТУ; Баку: ВА ЗС АР; Кіровоград: КЛА НАУ; Харків: ДП "ХНДІ ТМ", 2017, с. 46. (Електронний ресурс, режим доступу: https://drive.

22. google.com/file/d/0B0fERKLsAo5jZjgtT2xmdExMMlE/view).



ДОДАТОК А

Апробація результатів дослідження

В додатку приводяться матеріали, що підтверджують апробацію результатів дослідження, а саме:

Тези доповіді на сьомій міжнародної науково-технічної конференції «Сучасні напрями розвитку інформаційно-комунікаційних технологій та засобів управління». [21].



ДОДАТОК Б

Код програми

Файл Unit1.h

//---------------------------------------------------------------------------

#ifndef Unit1H

#define Unit1H

//---------------------------------------------------------------------------

#include <Classes.hpp>

#include <Controls.hpp>

#include <StdCtrls.hpp>

#include <Forms.hpp>

#include <Menus.hpp>

//---------------------------------------------------------------------------

class TForm1 : public TForm

{

__published: // IDE-managed Components

TLabel *Label1;

TLabel *Label2;

TButton *Button1;

TMainMenu *MainMenu1;

TMenuItem *N1;

TMenuItem *N2;

TMenuItem *N3;

TMenuItem *N4;

void __fastcall N4Click(TObject *Sender);

void __fastcall Button1Click(TObject *Sender);

private: // User declarations

public: // User declarations

__fastcall TForm1(TComponent* Owner);

};

//---------------------------------------------------------------------------

extern PACKAGE TForm1 *Form1;

//---------------------------------------------------------------------------#endif

Файл Unit1.cpp

//---------------------------------------------------------------------------

#include <vcl.h>

#pragma hdrstop

#include "Unit1.h"

#include "Unit2.h"

//---------------------------------------------------------------------------

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm1 *Form1;

//---------------------------------------------------------------------------

__fastcall TForm1::TForm1(TComponent* Owner)

: TForm(Owner)

{

}

//---------------------------------------------------------------------------

void __fastcall TForm1::N4Click(TObject *Sender)

{

Form1->Close();

}

//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)

{

Form1->Visible = false;

Form2->Visible = true;

}

//---------------------------------------------------------------------------

Файл Unit2.h

//---------------------------------------------------------------------------

#ifndef Unit2H

#define Unit2H

//---------------------------------------------------------------------------

#include <Classes.hpp>

#include <Controls.hpp>

#include <StdCtrls.hpp>

#include <Forms.hpp>

#include <Menus.hpp>

//---------------------------------------------------------------------------

class TForm2 : public TForm

{

__published: // IDE-managed Components

TMainMenu *MainMenu1;

TMenuItem *N1;

TMenuItem *N2;

TMenuItem *N3;

TMenuItem *N4;

TMemo *Memo1;

TLabel *Label1;

TLabel *Label2;

TEdit *Edit1;

TEdit *Edit2;

TGroupBox *GroupBox1;

TCheckBox *CheckBox1;

TCheckBox *CheckBox2;

TButton *Button1;

TGroupBox *GroupBox2;

TCheckBox *CheckBox3;

TCheckBox *CheckBox4;

TButton *Button2;

void __fastcall N4Click(TObject *Sender);

void __fastcall Button1Click(TObject *Sender);

void __fastcall CheckBox1Click(TObject *Sender);

void __fastcall CheckBox2Click(TObject *Sender);

void __fastcall CheckBox3Click(TObject *Sender);

void __fastcall CheckBox4Click(TObject *Sender);

void __fastcall Button2Click(TObject *Sender);

void __fastcall Edit1Click(TObject *Sender);

void __fastcall Edit2Click(TObject *Sender);

private: // User declarations

public: // User declarations

__fastcall TForm2(TComponent* Owner);

long int number_nodes, d_max, number[10];

float a;

int node_order, r;

double max, min;

AnsiString str;

};

//---------------------------------------------------------------------------

extern PACKAGE TForm2 *Form2;

//---------------------------------------------------------------------------

#endif

Файл Unit2.cpp

//---------------------------------------------------------------------------

#include <vcl.h>

#pragma hdrstop

#include "Unit2.h"

#include "Unit1.h"

#include "math.h"

using namespace std;

//---------------------------------------------------------------------------

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm2 *Form2;

//---------------------------------------------------------------------------

__fastcall TForm2::TForm2(TComponent* Owner)

: TForm(Owner)

{

this->max = 2;

}

//---------------------------------------------------------------------------

void __fastcall TForm2::N4Click(TObject *Sender)

{

Form1->Close();

}

//---------------------------------------------------------------------------

void __fastcall TForm2::Button1Click(TObject *Sender)

{

number_nodes = StrToInt(Form2->Edit1->Text);

node_order = StrToInt(Form2->Edit2->Text);

if(number_nodes>pow(2,20) || node_order<4 || node_order>20)

{

ShowMessage("Введені вами значення знаходяться поза діапазоном дозволених чисел. Переконайтесь, що введені вами числа виконують дані умови: кількість вузлів не більше числа 2^20, порядок вузла не перевищуе число 20 та не нижче числа 4");

return;

}

a = number_nodes;

for(;a>=2;)

a = a/2;

if(a != 1)

{

for(;max<number_nodes;)

{

min = max;

max = max*2;

}

Form2->GroupBox1->Visible = true;

Form2->CheckBox1->Caption = min;

Form2->CheckBox2->Caption = max;

ShowMessage("Введене число не належить до ряду чисел 2^N! Виберіть одне із двох запропонованних чисел найближчих до заданої умови.");

return;

}

a = (float)node_order/2;

if(a != (int)a)

{

Form2->GroupBox2->Visible = true;

Form2->CheckBox3->Caption = node_order-1;

Form2->CheckBox4->Caption = node_order+1;

ShowMessage("Введене число не належить до ряду чисел 2*N! Виберіть одне із двох запропонованних чисел найближчих до заданої умови.");

return;

}

if(number_nodes <= pow(4,(node_order/2)))

{

ShowMessage("При заданих розмірностях системи вона не має сенсу! Вам потрібно збільшити кількість вузлів або зменшити їх порядок.");

return;

}

r = node_order/2;

a = pow(number_nodes,(float)1/r);

d_max = a;

a = a-d_max;

if(a == 0)

for(int i=0; i<r; i++)

number[i] = d_max;

else

{

a = number_nodes;

for(int i=0, b=number_nodes; i<r; i++)

{

a = pow(b,(float)1/(r-i));

max = 2;

for(;max<a;)

{

min = max;

max = max*2;

}

number[i] = min;

number[i+1] = max;

min = a-min;

max = max-a;

if(min>max)

number[i] = number[i+1];

b = b/number[i];

number[i+1] = b;

}

}

str = IntToStr(number[0]);

for(int i=1; i<r; i++)

str = str + "*" + IntToStr(number[i]);

Form2->Memo1->Lines->Add("Програма пропонує такий оптимальний варіант вимірів майбутньої системи - " + str);

Form2->Button2->Enabled = true;

}

//---------------------------------------------------------------------------

void __fastcall TForm2::CheckBox1Click(TObject *Sender)

{

if(Form2->CheckBox1->Checked == true)

{

Form2->CheckBox2->Enabled = false;

Form2->Edit1->Text = Form2->CheckBox1->Caption;

}

else

Form2->CheckBox2->Enabled = true;

}

//---------------------------------------------------------------------------

void __fastcall TForm2::CheckBox2Click(TObject *Sender)

{

if(Form2->CheckBox2->Checked == true)

{

Form2->CheckBox1->Enabled = false;

Form2->Edit1->Text = Form2->CheckBox2->Caption;

}

else

Form2->CheckBox1->Enabled = true;

}

//---------------------------------------------------------------------------

void __fastcall TForm2::CheckBox3Click(TObject *Sender)

{

if(Form2->CheckBox3->Checked == true)

{

Form2->CheckBox4->Enabled = false;

Form2->Edit2->Text = Form2->CheckBox3->Caption;

}

else

Form2->CheckBox4->Enabled = true;

}

//---------------------------------------------------------------------------

void __fastcall TForm2::CheckBox4Click(TObject *Sender)

{

if(Form2->CheckBox4->Checked == true)

{

Form2->CheckBox3->Enabled = false;

Form2->Edit2->Text = Form2->CheckBox4->Caption;

}

else

Form2->CheckBox3->Enabled = true;

}

//---------------------------------------------------------------------------

void __fastcall TForm2::Button2Click(TObject *Sender)

{

d_max = number_nodes*r;

Form2->Memo1->Lines->Add("I = " + IntToStr(d_max));

d_max = 0;

for(int i=0; i<r; i++)

d_max = d_max+number[i]/2;

d_max = d_max*r;

Form2->Memo1->Lines->Add("D = " + IntToStr(d_max));

a = number[0];

for(int i=1; i<r; i++)

if(number[i]>a)

a = number[i];

d_max = 2*number_nodes/a;

Form2->Memo1->Lines->Add("B = " + IntToStr(d_max));

}

//---------------------------------------------------------------------------

void __fastcall TForm2::Edit1Click(TObject *Sender)

{

Form2->Edit1->Text = "";

}

//---------------------------------------------------------------------------

void __fastcall TForm2::Edit2Click(TObject *Sender)

{

Form2->Edit2->Text = "";

}

//---------------------------------------------------------------------------

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