CODESYS V3.5. Вопросы и ответы

[fatlortroll]

Значит, у меня криво реализована синхронизация:

// Mt_GVL
VAR_GLOBAL
DataDefender_ : CAA.BOLT; //
END_VAR

// Журнал сообщений
FUNCTION_BLOCK FINAL LoggerActions
VAR CONSTANT
UnlockWaitTimeMax_ : TIME := T#20ms;
END_VAR
VAR
FileHandle_ : SysTypes.RTS_IEC_HANDLE := SysTypes.RTS_INVALID_HANDLE;
END_VAR

// Добавить в лог сообщение об ошибке.
METHOD MsgError : SysTypes.RTS_IEC_RESULT
VAR
CtValue : CAA.COUNT := 0;
UnlockWaitTime : TIME := T#0ms;
END_VAR

UnlockWaitTime := TIME();
WHILE ((UnlockWaitTime + UnlockWaitTimeMax_) > TIME()) AND_THEN
(Mt_GVL.DataDefender_.Reserve(CtValue) = TRUE)
DO
// Здесь работа с файлом, запись в него форматированной строки и flush по завершении записи.
CtValue := 0;
UnlockWaitTime := T#0ms;
Mt_GVL.DataDefender_.Free();
END_WHILE

Вот так сделано сейчас. Оставил только то, что относится к синхронизации. Если видны какие-либо ошибки -- покажите, пожалуйста.

[fatlortroll]

Похоже, весь код -- одна большая ошибка.

А как правильно сделать -- пока не пойму.

[Евгений Кислов]

Давайте лучше по нашему обычному сценарию?
Какую практическую задачу из вашей предметной области вы пытаетесь сейчас решить? (без попытки пригвоздить себя к конкретной реализации)

[fatlortroll]

> Какую практическую задачу из вашей предметной области вы пытаетесь сейчас решить?

Запись в один файл из нескольких потоков. Журнал действий пользователей, и системы.

[Евгений Кислов]

> Какую практическую задачу из вашей предметной области вы пытаетесь сейчас решить?

Запись в один файл из нескольких потоков. Журнал действий пользователей, и системы.

Ну ок, пойдём длинным путём.
C чем связано требование про потоки?

[fatlortroll]

> Ну ок, пойдём длинным путём.

:-D Ну не могу я выложить всё, не могу! :-D

В одном потоке читаются по modbus входы/выходы, во втором -- логика приложения.

[Cs-Cs]

> Какую практическую задачу из вашей предметной области вы пытаетесь сейчас решить?
Запись в один файл из нескольких потоков. Журнал действий пользователей, и системы.

А если сделать какой-то один объект (FB) с методом AddToLog()?
Пусть внутри FB файл всегда будет открыт, а AddToLog туда будет писать?

...и ещё можно извратиться и сделать через штатные Тревоги. Дёргать их, а на их обработчик (активацию) повесить свю функцию записи в свой файл.
Плюс этого решения ещё и в том, что все строки сообщений будут в одном месте находиться (в описании тревог), а не будут по коду раскиданы.

[fatlortroll]

Если чтение I/O сложить в один поток с логикой, получатся неприличные задержки.

А, там ещё вместе с I/O ещё обмен данными с шестью частотниками.

[fatlortroll]

> А если сделать какой-то один объект (FB) с методом AddToLog()

Так и сделано, но, похоже, там конкуренция среди них. И я криво реализовал синхронизацию.

[Cs-Cs]

> А если сделать какой-то один объект (FB) с методом AddToLog()
Так и сделано, но, похоже, там конкуренция среди них. И я криво реализовал синхронизацию.

А что ты называешь потоками? Разные задачи?

А если сделать очередь? =) Типа при вызове AddToLog всё пишется в очередь (массив структур с данными), а потом он спокойно скидывается на диск. В одном, своём потоке (задаче)