диплом (1094861), страница 6
Текст из файла (страница 6)
long res_answ;
long dwReplySize;
HANDLE icmphandle=NULL;
struct sockaddr_in sAddr;
DWORD ResultIP=0;
UINT nTTL;
char cResultString[2048];
char *pcIp;
int i;
int nTimeOut[3];//
BOOL bHostReply=FALSE;
BOOL bSeriousError=FALSE;
//Буфер для пакета
char acPingBuffer[64];
//Указатель на структуру ответа
PICMP_ECHO_REPLY icmp_echo_repl;
IP_OPTION_INFORMATION ipInfo;
//IP адрес
unsigned long ping_IP;
//Получаем адрес хоста
ping_IP=GetHostAddr(szHost);
if (!ping_IP)
{
EditAddText(hwLog,"Не удалось определить IP адрес хоста");
return 0;
}
hIcmp = LoadLibrary("ICMP.DLL");
if (!hIcmp)
{
EditAddText(hwLog,"Библиотека icmp.dll не найдена");
return 0;//Библиотека не найдена
}
// Получаем указатели на ф-ции ICMP
pIcmpCreateFile = (pfnHV)GetProcAddress(hIcmp,"IcmpCreateFile");
pIcmpCloseHandle = (pfnBH)GetProcAddress(hIcmp,"IcmpCloseHandle");
pIcmpSendEcho = (pfnDHDPWPipPDD)GetProcAddress(hIcmp,"IcmpSendEcho"); // Проверяем указатели
if (pIcmpCreateFile == NULL ||pIcmpCloseHandle == NULL||pIcmpSendEcho == NULL)
{
FreeLibrary(hIcmp);
return 0;
}
sAddr.sin_addr.s_addr=ping_IP;
//Пишем в log заголовок трассировки
pcIp=inet_ntoa(sAddr.sin_addr);
if (hwLog&&pcIp!=NULL)
{
if (lstrlen(pcIp) + 23 < sizeof(cResultString) - 1)//Во избежание переполнения буфера
{
wsprintf(cResultString,"Трассировка маршрута к: %s",pcIp);
EditAddText(hwLog,cResultString);
}
pcIp=NULL;
}
//Инициализируем Icmp
icmphandle = pIcmpCreateFile();
if (icmphandle == INVALID_HANDLE_VALUE) return 0;
//Выделяем память под структуру с буфером ответа
dwReplySize = sizeof(ICMP_ECHO_REPLY) + sizeof(acPingBuffer);
icmp_echo_repl = (PICMP_ECHO_REPLY)LocalAlloc(LPTR,dwReplySize);
nTTL=1;//Время жизни пакета - 1
//пока IP адреса не совпадут или кол-во прыжков достигнет максимального
//MAX_TTL
while ((ResultIP != ping_IP) && (nTTL < MAX_TTL ))
{
//Рассылка сообщений для диалога - родителя окна лога трассировки
if (hwLog) SendDlgMessages(GetParent(hwLog));
bHostReply=FALSE;//Ставим флаг "Хост не ответил"
for (i=0;i<3;i++)
{
//заполняем структуру запроса
ZeroMemory(&ipInfo,sizeof(IP_OPTION_INFORMATION));
ipInfo.Ttl = nTTL;
ipInfo.Tos = 0;
//заполняем структуру ответа
ZeroMemory(icmp_echo_repl,sizeof(ICMP_ECHO_REPLY));
FillMemory(acPingBuffer, sizeof(acPingBuffer), '\xAA');
icmp_echo_repl->Data = acPingBuffer;
icmp_echo_repl->DataSize = sizeof(acPingBuffer);
//шлём эхо - ответ в структуре типа ICMP_ECHO_REPLY
res_answ=pIcmpSendEcho(icmphandle,ping_IP,acPingBuffer,sizeof(acPingBuffer),&ipInfo,icmp_echo_repl,dwReplySize,5000);
if (res_answ)
{
//Если статус IP_DEST_HOST_UNREACHABLE
if (icmp_echo_repl->Status==IP_DEST_HOST_UNREACHABLE)
{
EditAddText(hwLog,"Данный узел не доступен");
bSeriousError=TRUE;
break;
}
else if (icmp_echo_repl->Status==IP_NO_RESOURCES)
{
EditAddText(hwLog,"Не хватает ресурсов");
bSeriousError=TRUE;
break;
}
else if (icmp_echo_repl->Status==IP_TTL_EXPIRED_TRANSIT||icmp_echo_repl->Status==IP_SUCCESS)
{
nTimeOut[i]=icmp_echo_repl->RoundTripTime;
ResultIP=icmp_echo_repl->Address;
bHostReply=TRUE;
}
else
{
EditAddText(hwLog,"Ошибка");
bSeriousError=TRUE;
break;
}
}
else nTimeOut[i]=-1;
}
if (bSeriousError) break;
if (bHostReply)
{
sAddr.sin_addr.s_addr=ResultIP;
pcIp=inet_ntoa(sAddr.sin_addr);
if (pcIp)
{
char cTmp0[20],cTmp1[20],cTmp2[20];
//Формируем строку тайм аута 0
if (nTimeOut[0]< 0) lstrcpy(cTmp0," * ");
else if (nTimeOut[0]< 1) lstrcpy(cTmp0," <1 ms");
else if (nTimeOut[0]> 10000) lstrcpy(cTmp0,">10 s");
else wsprintf(cTmp0," %ld ms",nTimeOut[0]);
//Формируем строку тайм аута 1
if (nTimeOut[1]< 0) lstrcpy(cTmp1," * ");
else if (nTimeOut[1]< 1) lstrcpy(cTmp1," <1 ms");
else if (nTimeOut[1]> 10000) lstrcpy(cTmp1,">10 s");
else wsprintf(cTmp1," %ld ms",nTimeOut[1]);
//Формируем строку тайм аута 2
if (nTimeOut[2]< 0) lstrcpy(cTmp2," * ");
else if (nTimeOut[2]< 1) lstrcpy(cTmp2," <1 ms");
else if (nTimeOut[2]> 10000) lstrcpy(cTmp2,">10 s");
else wsprintf(cTmp2," %ld ms",nTimeOut[2]);
//Результирующая строка
wsprintf(cResultString,"%ld %s %s %s IP %s",nTTL,cTmp0,cTmp1,cTmp2,pcIp);
}
pcIp=NULL;
}
else
{
if (hwLog) EditAddText(hwLog,"Хост не отвечает");
wsprintf(cResultString,"%ld * ",nTTL);
break;
}
nTTL++;//Увеличиваем TTL
if (hwLog)
EditAddText(hwLog,cResultString);
}
LocalFree(icmp_echo_repl);
icmp_echo_repl = NULL;
pIcmpCloseHandle(icmphandle);
FreeLibrary(hIcmp);
EditAddText(hwLog,"Трассировка завершена");
return 1;
}
Выводы по главе
Согласно требованиям, предъявляемым к разрабатываемому модулю был выбран язык программирования Visual C++, позволяющий осуществлять функции, необходимые для реализации проекта.
В данной главе были рассмотрены: форма реализации подключения БД через использование ODBC – драйвера, используя выбранный язык программирования; алгоритмы диагностики сетевых подключений, а также программная реализация функций проверки сетевого доступа.
ГЛАВА 4. ТЕХНИКО – ЭКОНОМИЧЕСКОЕ ОБОСНОВАНИЕ ПРОЕКТНЫХ РЕШЕНИЙ
4.1. Общая информация
Проект представляет собой модуль сопровождения автоматизированной информационной системы, который создан для диагностики и устранение ошибок соединения.
Предлагаемый к внедрению проект обеспечит ускоренный процесс обмена данными с банком, автоматизирует процесс проверки соединения и устранит необходимость выезда сотрудников технической поддержки для определения ошибки и настройки рабочих мест. Сопровождения БИС «клиент-банк» занимаются сотрудники отдела Внедрения и Сопровождения Автоматизированных Систем основной функционал которых: настройка серверного оборудования, работа с базой клиентов и информационной системой банка, а также выезды к клиентам, установка, обновление Автоматизированного Рабочего Места, и настройки соединения с сервером данных.
В результате внедрения разрабатываемого модуля для БИС «клиент-банк» существует возможность сократить количество выездов на клиентские рабочие места за счет «локального» решения проблемы соединения.
При внедрении любого нового проекта целесообразно рассматривать не только его новизну и влияние на технологические процессы, но и экономическую выгоду. Существуют экономические показатели, которые наглядно дают обобщенную оценку и позволяют анализировать экономические характеристики проекта.
В данном случае для БИС «клиент-банк» Чувашское Отделение Сберегательного Банка использует серверную систему компании Hewlett Packard стоимостью около 340 000 руб. Целью диплома является – разработать программный модуль, который позволит снизить нагрузку сервера.
4.2. Календарный план
Для определения трудоемкости выполнения над проектом, прежде всего, составляется перечень всех основных этапов. При этом особое внимание уделяется логическому упорядочению последовательности выполнения отдельных видов заданий. Типовой перечень этапов и видов работ, содержится в ГОСТ 34.601-90. «Информационная технология. Автоматизированные системы. Стадии создания». В зависимости от характера и сложности стандарт допускает исключение или дополнение этапов и отдельных видов работ, их разделение, совмещение, а также уточнение содержания.
Трудоемкость разработки программной продукции зависит от ряда факторов, основными из которых являются следующие:
1. Формирование требований к информационной системе.
2. Разработка концепции информационной системы.
3. Техническое задание.
4. Технический проект.
5. Ввод в действие.
Трудоёмкость измеряется в человеко-днях и носит вероятностный характер, т.к. зависит от множества трудно учитываемых факторов. Расчет оценки ожидаемого значения трудоемкости Ti приведена в формуле (4.1).
где – оценки минимально возможной трудоемкости выполнения отдельных видов работ;
– оценки максимально возможной трудоемкости;
– оценки наиболее вероятной трудоемкости.
Дисперсия Di характеризует степень неопределенности выполнения работы за время

Жизненным циклом считается весь цикл от принятия решения о проведении разработок до полного отказа конечного пользователя от применения данной системы:
Этап работы над модулем сопровождение БИС составил 3 месяца, что составляет в среднем 90 дней;
Этап сбора информации и обобщение полученного задания –15 дней;
Этап разработки ИС – 45 дней;
Этап ввода в действие ИС – 20 дней;
Установка оборудования – 10 дней;
Исходя из календарного графика работы над проектом, составим таблицу экспертных оценок и расчетные величины трудоемкости и дисперсии отдельных видов работ сгруппированных по стадиям работы над проектом.
Таблица 4.1.
Оценка трудоемкости отдельных видов работ
Общий показатель трудоемкости внедрения модуля сопровождения ИС удовлетворяет поставленному сроку в 90 дней.
4.3. Калькуляция затрат на разработку ИС
Затраты на разработку проекта по внедрению ИС могут быть представлены в виде сметы затрат, включающих в себя следующие статьи: материалы; специальное оборудование; основная заработная плата; дополнительная заработная плата; отчисления на социальные нужды; накладные расходы; контрагентские расходы.
Расчет сметной стоимости ИС произведен по каждой статье затрат и результаты сведены в таблицу 4.2.
Таблица 4.2.