Линтер методичка

• прописать пути для директивы #include в директорию intlib

дистрибутива

ЛИНТЕР;

•

для Unix, подайте команду make;

•

для Windows, подайте команду nmake /f makefile.vc

(предполагается

использование Microsoft Visual C++).

П

Убедитесь в том, что запущена СУБД ЛИНТЕР на демонстрационной БД,

содержащейра

таблицу PERSON.

кт

Запустите исполняемый файл примера step и просмотрите результаты.

ич

9.2. Разработка собственного примера

ес

Задание: Используя демонстрационный пример из состава

СУБД

ЛИ

ко

CALL

-

необходимо разработать и отладить собственную программу, использующую

интерфейс для выборки данных.

за

Все задачи связаны с таблицами PERSON, AUTO или FINANCE демонстрационной

БД ЛИНТЕР.

ня

Задача 1. Разработать программу, которая запрашивает начальные буквы имени

ти

человека (поле PERSON.NAME), и выводит данные обо всех людях, имя которых

е 8

начинается с этих букв и о марке (MAKE), модели (MODEL) и серийном номере (SERIALNO)

П

автомобилей (таблица AUTO), принадлежащих каждому человеку (таблицы PERSON и

AUTOри

связаны по полю PERSONID). При этом данные о человеке должны выводиться

одной строкой, затем несколько строк о его автомобилях, затем данные о следующем

ме

человеке и т.д.

р

Задача 2. Разработать программу, которая запрашивает начальные буквы марки

со

должна запросить порядок вывода имен, после чего выводит их (возможно, уже в другом

но

порядке) и так далее, пока пользователь не введет команду выхода.

й

Задача 4. Разработать программу, которая запрашивает уникальный идентификатор

ба

человека (PERSON.PERSONID). После ввода идентификатора программа выводит имя

человеказы

(PERSON.NAME) и выдает список всех автомобилей, которыми владеет данный

человек

(произвольный набор колонок из таблицы AUTO по желанию разработчика,

да

таблицы AUTO и PERSON связаны по полю PERSONID). Далее программа запрашивает

нн

новый идентификатор и т.д., пока пользователь не введет –1.

ы

Задача 5. Разработать программу, которая запрашивает величину жалованья

х

человека (поле SALARY таблицы PERSON). После этого программа должна выдать

memcpy(pCBL->Command,"GETE",4);

/* Get error text */

П

realLen = (pCBL->LnBufRow < realLen - 1) ? pCBL->LnBufRow

ра

: realLen;

кт

printf("Сообщение: %s\n", szErrorText);

ич

}

ес

ко

Для получения текстового сообщения заполняется поле RowId номером ошибки

ЛИНТЕР, LnBufRow длиной буфера под сообщение. Адрес буфера передается как

е

последний параметр функции inter.

за

При успешном завершении функции в буфере находится текстовое сообщение об

ня

ошибке, которое в примере выводится на экран.

ти

Для демонстрации примера необходимо, чтобы существовала таблица ERRORS с

описаниямие

ошибок. Если данная таблица отсутствует, то сообщение об ошибках будет

10.

выглядеть так: Linter return code: 2202.

Уг

10.2. Работа с BLOB-столбцами

лу

Алгоритм работы примера prac10_e2.c таков:

бл

1.

Открывается канал.

ен

2. Делается попытка создания таблицы TFILE.

но

3.

Предлагается меню, в котором:

е

•

в таблицу добавляется запись, в BLOB -поле которой загружается указанный

из

пользователем файл;

уч

•

делается выборка из таблицы, и выгружаются данные BLOB -поля в файл из

ен

строки, указанной пользователем.

ие

18. Закрывается канал.

C

A

Следует обратить внимание, на то, что при занесении BLOB-данных можно указать

типL(целое число), передаваемое в параметре RowId.

L-

memcpy(pCbl->Command,"AOBJ",4);

ин

те

pCbl->RowId = 0;

рф

pCbl->LnBufRow = realLen;

ей

inter(pCbl,NULL,NULL,NULL,buf);

са

П

Задача 2. Модифицировать данный пример, добавив возможность очистки

содержимого BLOB-ячейки и добавления данных в конец существующей BLOB-ячейки.

ра

Задача 3. Модифицировать данный пример, добавив в таблицу поле FSOURCE, в

кт

котором будет располагаться исходный текст данного исполняемого файла (если он

существуетич

в директории данного файла). Например, пользователь указывает имя файла /

home/linter/prac10/prac10_e2, тогда добавляется новая запись; в столбец FCONTENT

ес

загружается этот файл, а в столбец FSOURCE добавляется файл /home/linter/prac10/

ко

prac10_e2.c.

е

Задача 4. Модифицировать данный пример, следующим образом: если для

за

указанного имени файла существует файл *.c (с расширением ‘c’), то он добавляется

следующейня

строкой и ему присваивается тип 1. Если существует файл *.h , то он также

П

inter(Cursor + i,NULL,NULL,NULL,NULL);

ра

Необходимо иметь в виду, что управляющий блок Cursor[I] перед этим должен быть

очищен, чтобы другие поля не содержали неправильной информации (например, если в

кт

поле Node окажется «мусор», то результатом операции будет 1001). Другой вариант –

ич

просто скопировать содержимое управляющего блока основного соединения в

управляющийес

блок курсора перед установкой специфических полей.

ко

Для самостоятельного решения предлагается одна из задач:

е

Задача 5. Модифицировать данный пример, добавив возможность ввода

пользователем режимов обработки транзакций. Внимательно посмотреть отличия в работе

за

примера в оптимистичном и пессимистичном режимах.

ня

Задача 6. Модифицировать данный пример, добавив возможность отката и фиксации

ти

е

1.

Открывается канал.

из

2.

Пользователь вводит SELECT-запрос.

уч

3.

Запрос исполняется.

ен

4.

Выбирается количество столбцов в ответе.

ие

5.

Выбирается описание столбцов.

C

6.

Закрывается канал.

A

L

Сборка примера должна осуществляться с указанием используемой версии СУБД

ЛИНТЕР:

L-

ин

gcc prac10_e4.c -I /export/home/lindesk/linter5923/linter/

те

intlib/ /export/home/lindesk/linter5923/linter/intlib/

рф

ей

intlib.o -o prac10_e4 -lsocket -D_VER_MAX=590

са

В данном примере описание столбцов выбирается по одному, хотя более

эффективно было бы выбирать группами по N элементов. N = <максимальный размер

ответа> /

<размер дескриптора столбца, или sizeof(GETA_OUT). Максимальный размер

ответа равен 4 Кб.

Алгоритм работы примера prac10_e5 таков:

1.

Открывается канал и подчиненный курсор.

2.

Делается попытка создать таблицу PRAC10_T1.

3.

Создается событие на добавление строки в таблицу.

4.

По курсору выполняется команда ожидания события, которая будет

обрабатываться асинхронно.

E-

5.

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

mai

6.

Происходит событие, завершается обработка запроса по курсору, и управление

l:

передается в процедуру асинхронной обработки.

ра

Асинхронный обработчик, как видно из вывода примера, срабатывает до окончания

кт

синхронной операции вставки данных в таблицу.

ич

Вставка по каналу 4... – синхронная команда на вставку

ес

ко

стартовала

е

Вставка выполнена – сработал асинхронный обработчик

за

ня

ожидания события

ти

Очистка события...готово – произошла очистка события

е

10.

(удаление из очереди)

Уг

Вставка выполнена. – завершилась синхронная команда вставки

лу

записи.

бл

ен

Заметим, что событие инициируется в момент любой вставки, и остается актуально

до тех пор, пока его не очистить. Поэтому если сначала выполнить вставку, а затем

но

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

е

выставлено предыдущей вставкой).

из

В коде примера следует обратить внимание на то, как передается адрес процедуры

иучуказывается флаг асинхронности:

ен

memcpy(Cbl->Command,"

",4);

ие

C

Cbl->LnBufRow = 0;

A

Cbl->PrzExe = Cbl->PrzExe | Q_ASYNC;

L

L-

inter(Cbl,NULL,"clear event INS_T1;", onEventCleared,

ин

NULL);

те

рф

Задача 8. Модифицировать данный пример, чтобы при удалении данных в

#include "linapi.h"

#if defined(VXWORKS)

/* 05.03.02 */

#include "vxstart.h"

#endif

#ifdef _BCPP_

extern unsigned _stklen = 16383;

#endif

E-mail: market@relex.ru

ЗАО НПП «РЕЛЭКС»

http://www.relex.ru

WORD cur_id,

П

WORD stmt_id,

ра

char * message)

кт

{

ич

ес

LONG lRet;

ко

за

ня

ти

if ( ret_cod == LINAPI_ERROR )

е

{

11.

Ос

/* getting error codes for required object */

но

вн

if (lRet = LINTER_Error(con_id, cur_id, stmt_id,

ые

&apierr, &error, &syserr, NULL, NULL))

пр

ие

printf("diagnostic error %ld\n",lRet);

м

else

ы

ис

{

по

ль

printf("ApiErr = %ld, LinErr = %ld, SysErr = %ld\n%s

зо

\n",

ва

apierr, error, syserr, message);

ни

я

if ( (apierr == eLinterError) && error > 2000 && error

Li

n

< 3000)

A

{

PI

/* getting string and position if syntax error is */

!59

printf("Syntax error : line %d, position %d\n",

(short)syserr, *(short*)((char*)&syserr +2));

}

}

LINTER_CloseAPI(); /* Free library resource */

exit(1);

}

E-

else

mai

printf("Return code = %ld\n",ret_cod);

l:

ma

rke

t@

rele

x.r

u