МІНІСТЕРСТВО ОСВІТИ УКРАЇНИ
Національний університет “Львівська політехніка”
Звіт до лабораторної роботи №1
«Створення WIN32-програм з розділеними
паралельно в часі математичними обчисленнями»
З курсу
«Комп’ютерні методи дослідження систем керування»
Варіант №4
Мета роботи:
Отримати навики роботи в системі візуального об’єктно-орієнтованого програмування C++Builder та освоїти розроблення програм орієнтованих на виконання складних математичних розрахунків з розділенням їх виконання паралельно в часі.
№
п/п
Створення потоку засобами
Вивід результатів
Протабулювати функцію
(50 інтервалів)
4
інтерфейсу WIN32 API
у файл
Короткі теоретичні відомості:
В операційній системі Windows реалізовані два види багатозадачності – процесна та потокова. Процес (Process) – це статичний об’єкт (програма), який не виконується, а попросту «володіє» виділеним йому адресним простором, іншими словами, процес є структурою в пам’яті. Випадок, при якому програма може вирватися із рамок свого процесу та пошкодити чужі ресурси, є практично неможливим. В адресному просторі процесу знаходяться не тільки код та дані, але й потоки (Thread) – об’єкти, що виконується. Саме потокам операційна система виділяє кванти часу, а не процесам. При запуску процесу автоматично запускається потік (який називається головним). При зупинці головного потоку автоматично зупиняється і процес. А так як процес без потоку попросту займає ресурси, то система автоматично знищує його. Поряд із первинним потоком можуть у процесі існувати й додаткові потоки, яким система виділятиме окремі кванти часу. Такий багатопотоковий підхід дає можливість в межах однієї програми здійснювати різні задачі: робота з портами, файлами, математичні обчислення тощо. Наприклад, програма Microsoft Word може одночасно корегувати граматику та друкувати, при цьому здійснюючи ввід даних з клавіатури.
Зупинимося на одній деталі. На однопроцесорному комп’ютерові в кожний конкретний момент часу виконується одна задача. Якщо при запуску двох-трьох невеликих програм часова затримка суб’єктно не помітна, то при запуску декількох програм, що потребують колосальних ресурсів, затримка при виконанні програм стає достатньо помітною. На багатопроцесорних системах за кожним процесором може бути закріплений свій потік, і тому на таких системах виконання програм здійснюється дійсно в багатозадачному режимі.
На основі програмного пакету C++Builder потокова багатозадачність може бути реалізована:
з використанням компоненти типу TThread;
засобами інтерфейсу WIN32 API.
Список ідентифікаторів, констант, змінни, функцій, методів, використаних у програмі та їх пояснення:
#include <fstream.h> - бібліотека потокового вводу-виводу;
#include "math.h"- включення математичної бібліотеки;
HANDLE Thread1, Thread2 - оголошення дескрипторів потоків
DWORD ThreadFunc1(LPVOID lParam) - оголошення потокових функцій
exp() – обчислення експоненти;
sin() –синус;
Button1Click() – функція-обробник події кнопки 1;
Button2Click() – функція-обробник події кнопки 2;
Close() – функція завершення роботи програми;
x,y – змінні;
TForm1 *Form1 – глобальний показчик на форму;
Текст програми:
//---------------------------------------------------------------------------
#include <vcl.h>
#include <fstream.h>
#include <math.h>
#pragma hdrstop
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
HANDLE Thread1, Thread2;
DWORD ThreadFunc1(LPVOID IParam);
DWORD ThreadFunc2(LPVOID IParam);
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
DWORD ThreadFunc1(LPVOID lParam)
{
fstream file;
double y;
file.open("process1.txt",ios_base::out | ios_base::trunc);
Form1->Label1->Caption=" Процес1 запущено ";
for (double x=0;x<8;x=x+0.16)
{
y=sqrt(exp(x))*sin(x/3);
file<<" x="<<x<<" y="<<y<<y<<endl;
}
file.close();
Form1->Button1->Tag=0;
Form1->Label1->Caption="Процес1 завершено!";
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
DWORD count1,ThreadId;
if (Button1->Tag==0)
{
Thread1=CreateThread(NULL, 0, (LPTHREAD_START_ROUTINE)ThreadFunc1, &count1, 0, &ThreadId);
if (Thread1!=NULL )
{ Label2->Caption="Процес1 запущено"; Button1->Tag=1; }
}
else
{
TerminateThread(Thread1,1);
Label2->Caption="Процес1 примусово завершено";
Button1->Tag=0;
}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
if(Button2->Tag==0)
{
if (Button1->Tag!=0)
{
SuspendThread(Thread1);
Button2->Tag=1;
Form1->Label3->Caption="Процес призупинено!";
}
}
else
{
ResumeThread(Thread1);
Button2->Tag=0;
Form1->Label3->Caption="Процес продовжено!";
}
}
//---------------------------------------------------------------------------
Результати роботи програми:
x=0 y=00
x=0.16 y=0.05774790.0577479
x=0.32 y=0.1249370.124937
x=0.48 y=0.2025330.202533
x=0.64 y=0.2915640.291564
x=0.8 y=0.3931220.393122
x=0.96 y=0.5083630.508363
x=1.12 y=0.6385070.638507
x=1.28 y=0.7848370.784837
x=1.44 y=0.9486940.948694
x=1.6 y=1.131481.13148
x=1.76 y=1.334651.33465
x=1.92 y=1.559691.55969
x=2.08 y=1.808171.80817
x=2.24 y=2.081642.08164
x=2.4 y=2.381712.38171
x=2.56 y=2.709982.70998
x=2.72 y=3.068073.06807
x=2.88 y=3.457563.45756
x=3.04 y=3.879993.87999
x=3.2 y=4.336854.33685
x=3.36 y=4.829544.82954
x=3.52 y=5.359335.35933
x=3.68 y=5.927375.92737
x=3.84 y=6.534596.53459
x=4 y=7.18177.1817
x=4.16 y=7.869167.86916
x=4.32 y=8.597078.59707
x=4.48 y=9.365169.36516
x=4.64 y=10.172710.1727
x=4.8 y=11.018511.0185
x=4.96 y=11.900611.9006
x=5.12 y=12.816612.8166
x=5.28 y=13.763113.7631
x=5.44 y=14.73614.736
x=5.6 y=15.730115.7301
x=5.76 y=16.739116.7391
x=5.92 y=17.755517.7555
x=6.08 y=18.770418.7704
x=6.24 y=19.773319.7733
x=6.4 y=20.752220.7522
x=6.56 y=21.69321.693
x=6.72 y=22.579822.5798
x=6.88 y=23.394323.3943
x=7.04 y=24.115724.1157
x=7.2 y=24.720824.7208
x=7.36 y=25.183125.1831
x=7.52 y=25.473525.4735
x=7.68 y=25.55925.559
x=7.84 y=25.403425.4034