-- Constants
local ALARM_INPUT = 6 -- Шлейф для тревоги
 
local INPUT_STATE = {
    OFF = 0,
    ON = 1
}
 
-- Simple logger implementation
local logger = {
    debug = function(msg) print("[DEBUG] " .. tostring(msg)) end,
    info = function(msg) print("[INFO] " .. tostring(msg)) end,
    warning = function(msg) print("[WARNING] " .. tostring(msg)) end,
    error = function(msg) print("[ERROR] " .. tostring(msg)) end
}
 
-- AccessControl class definition
local AccessControl = {}
AccessControl.__index = AccessControl
 
-- Utility function to read controller token
function AccessControl:read_controller_token()
    local success, token = pcall(function()
        -- Попытка чтения токена из системной конфигурации
        -- Предполагается, что токен хранится в конфигурации контроллера
        return pacs.get_controller_token() -- Предполагаемый метод API
    end)
 
    if not success then
        logger.error("Ошибка при чтении токена контроллера: " .. tostring(token))
        return nil
    end
 
    if not token then
        logger.warning("Токен контроллера не найден, используется значение по умолчанию: 1")
        return 1
    end
 
    logger.info("Успешно получен токен контроллера: " .. tostring(token))
    return token
end
 
-- Constructor
function AccessControl:create()
    local instance = {}
    setmetatable(instance, AccessControl)
    instance.access_point = nil -- Будет установлено при инициализации
    return instance
end
 
-- Initialization
function AccessControl:init()
    logger.debug(">> Инициализация системы контроля доступа...")
 
    -- Получаем токен контроллера
    self.access_point = self:read_controller_token()
 
    if not self.access_point then
        logger.error("!!! Критическая ошибка: Не удалось инициализировать токен контроллера !!!")
        return false
    end
 
    -- Добавляем слушателя событий
    -- Simulate fec API for testing
    _G.fec = _G.fec or {
        add_listener = function(name, listener)
            logger.info("Добавлен слушатель: " .. name)
        end,
        TYPE = {
            RADIAL_INPUT = "RADIAL_INPUT"
        }
    }
 
    -- Simulate pacs API for testing
    _G.pacs = _G.pacs or {
        block = function(point)
            logger.info("Блокировка точки доступа: " .. tostring(point))
        end,
        unblock = function(point)
            logger.info("Разблокировка точки доступа: " .. tostring(point))
        end,
        get_controller_token = function()
            return 2 -- Simulated token value
        end
    }
 
    fec.add_listener("access_control", self)
 
    logger.info("Инициализация завершена. Активная точка доступа: " .. tostring(self.access_point))
    return true
end
 
-- Alarm handler
function AccessControl:on_alarm_triggered()
    logger.error("!!! Тревога в шлейфе #6 !!! Блокировка точки доступа " .. tostring(self.access_point))
 
    local success, error = pcall(function()
        pacs.block(self.access_point)
    end)
 
    if not success then
        logger.error("Ошибка при блокировке точки доступа: " .. tostring(error))
    end
end
 
-- FEC object processor
function AccessControl:process_fec_object(object)
    if object.type == fec.TYPE.RADIAL_INPUT and object.id == ALARM_INPUT then
        local state = object.state
        if state == INPUT_STATE.ON then
            self:on_alarm_triggered()
        else
            logger.info("Тревога снята в шлейфе #6")
            local success, error = pcall(function()
                pacs.unblock(self.access_point)
            end)
 
            if not success then
                logger.error("Ошибка при разблокировке точки доступа: " .. tostring(error))
            end
        end
    end
end
 
-- FEC object change handler
function AccessControl:on_fec_object_changed(panel, object)
    if panel == 0 then
        self:process_fec_object(object)
    end
end
 
-- System initialization
local function initialize_system()
    local accessControl = AccessControl:create()
    local init_success = accessControl:init()
 
    if init_success then
        logger.info("=== Система контроля доступа успешно инициализирована ===")
    else
        logger.error("=== Ошибка инициализации системы контроля доступа ===")
    end
 
    return accessControl
end
 
-- Return the initialization function instead of calling it
return initialize_system
 

LS0gQ29uc3RhbnRzCmxvY2FsIEFMQVJNX0lOUFVUID0gNiAtLSDQqNC70LXQudGEINC00LvRjyDRgtGA0LXQstC+0LPQuAoKbG9jYWwgSU5QVVRfU1RBVEUgPSB7CiAgICBPRkYgPSAwLAogICAgT04gPSAxCn0KCi0tIFNpbXBsZSBsb2dnZXIgaW1wbGVtZW50YXRpb24KbG9jYWwgbG9nZ2VyID0gewogICAgZGVidWcgPSBmdW5jdGlvbihtc2cpIHByaW50KCJbREVCVUddICIgLi4gdG9zdHJpbmcobXNnKSkgZW5kLAogICAgaW5mbyA9IGZ1bmN0aW9uKG1zZykgcHJpbnQoIltJTkZPXSAiIC4uIHRvc3RyaW5nKG1zZykpIGVuZCwKICAgIHdhcm5pbmcgPSBmdW5jdGlvbihtc2cpIHByaW50KCJbV0FSTklOR10gIiAuLiB0b3N0cmluZyhtc2cpKSBlbmQsCiAgICBlcnJvciA9IGZ1bmN0aW9uKG1zZykgcHJpbnQoIltFUlJPUl0gIiAuLiB0b3N0cmluZyhtc2cpKSBlbmQKfQoKLS0gQWNjZXNzQ29udHJvbCBjbGFzcyBkZWZpbml0aW9uCmxvY2FsIEFjY2Vzc0NvbnRyb2wgPSB7fQpBY2Nlc3NDb250cm9sLl9faW5kZXggPSBBY2Nlc3NDb250cm9sCgotLSBVdGlsaXR5IGZ1bmN0aW9uIHRvIHJlYWQgY29udHJvbGxlciB0b2tlbgpmdW5jdGlvbiBBY2Nlc3NDb250cm9sOnJlYWRfY29udHJvbGxlcl90b2tlbigpCiAgICBsb2NhbCBzdWNjZXNzLCB0b2tlbiA9IHBjYWxsKGZ1bmN0aW9uKCkKICAgICAgICAtLSDQn9C+0L/Ri9GC0LrQsCDRh9GC0LXQvdC40Y8g0YLQvtC60LXQvdCwINC40Lcg0YHQuNGB0YLQtdC80L3QvtC5INC60L7QvdGE0LjQs9GD0YDQsNGG0LjQuAogICAgICAgIC0tINCf0YDQtdC00L/QvtC70LDQs9Cw0LXRgtGB0Y8sINGH0YLQviDRgtC+0LrQtdC9INGF0YDQsNC90LjRgtGB0Y8g0LIg0LrQvtC90YTQuNCz0YPRgNCw0YbQuNC4INC60L7QvdGC0YDQvtC70LvQtdGA0LAKICAgICAgICByZXR1cm4gcGFjcy5nZXRfY29udHJvbGxlcl90b2tlbigpIC0tINCf0YDQtdC00L/QvtC70LDQs9Cw0LXQvNGL0Lkg0LzQtdGC0L7QtCBBUEkKICAgIGVuZCkKCiAgICBpZiBub3Qgc3VjY2VzcyB0aGVuCiAgICAgICAgbG9nZ2VyLmVycm9yKCLQntGI0LjQsdC60LAg0L/RgNC4INGH0YLQtdC90LjQuCDRgtC+0LrQtdC90LAg0LrQvtC90YLRgNC+0LvQu9C10YDQsDogIiAuLiB0b3N0cmluZyh0b2tlbikpCiAgICAgICAgcmV0dXJuIG5pbAogICAgZW5kCgogICAgaWYgbm90IHRva2VuIHRoZW4KICAgICAgICBsb2dnZXIud2FybmluZygi0KLQvtC60LXQvSDQutC+0L3RgtGA0L7Qu9C70LXRgNCwINC90LUg0L3QsNC50LTQtdC9LCDQuNGB0L/QvtC70YzQt9GD0LXRgtGB0Y8g0LfQvdCw0YfQtdC90LjQtSDQv9C+INGD0LzQvtC70YfQsNC90LjRjjogMSIpCiAgICAgICAgcmV0dXJuIDEKICAgIGVuZAoKICAgIGxvZ2dlci5pbmZvKCLQo9GB0L/QtdGI0L3QviDQv9C+0LvRg9GH0LXQvSDRgtC+0LrQtdC9INC60L7QvdGC0YDQvtC70LvQtdGA0LA6ICIgLi4gdG9zdHJpbmcodG9rZW4pKQogICAgcmV0dXJuIHRva2VuCmVuZAoKLS0gQ29uc3RydWN0b3IKZnVuY3Rpb24gQWNjZXNzQ29udHJvbDpjcmVhdGUoKQogICAgbG9jYWwgaW5zdGFuY2UgPSB7fQogICAgc2V0bWV0YXRhYmxlKGluc3RhbmNlLCBBY2Nlc3NDb250cm9sKQogICAgaW5zdGFuY2UuYWNjZXNzX3BvaW50ID0gbmlsIC0tINCR0YPQtNC10YIg0YPRgdGC0LDQvdC+0LLQu9C10L3QviDQv9GA0Lgg0LjQvdC40YbQuNCw0LvQuNC30LDRhtC40LgKICAgIHJldHVybiBpbnN0YW5jZQplbmQKCi0tIEluaXRpYWxpemF0aW9uCmZ1bmN0aW9uIEFjY2Vzc0NvbnRyb2w6aW5pdCgpCiAgICBsb2dnZXIuZGVidWcoIj4+INCY0L3QuNGG0LjQsNC70LjQt9Cw0YbQuNGPINGB0LjRgdGC0LXQvNGLINC60L7QvdGC0YDQvtC70Y8g0LTQvtGB0YLRg9C/0LAuLi4iKQoKICAgIC0tINCf0L7Qu9GD0YfQsNC10Lwg0YLQvtC60LXQvSDQutC+0L3RgtGA0L7Qu9C70LXRgNCwCiAgICBzZWxmLmFjY2Vzc19wb2ludCA9IHNlbGY6cmVhZF9jb250cm9sbGVyX3Rva2VuKCkKCiAgICBpZiBub3Qgc2VsZi5hY2Nlc3NfcG9pbnQgdGhlbgogICAgICAgIGxvZ2dlci5lcnJvcigiISEhINCa0YDQuNGC0LjRh9C10YHQutCw0Y8g0L7RiNC40LHQutCwOiDQndC1INGD0LTQsNC70L7RgdGMINC40L3QuNGG0LjQsNC70LjQt9C40YDQvtCy0LDRgtGMINGC0L7QutC10L0g0LrQvtC90YLRgNC+0LvQu9C10YDQsCAhISEiKQogICAgICAgIHJldHVybiBmYWxzZQogICAgZW5kCgogICAgLS0g0JTQvtCx0LDQstC70Y/QtdC8INGB0LvRg9GI0LDRgtC10LvRjyDRgdC+0LHRi9GC0LjQuQogICAgLS0gU2ltdWxhdGUgZmVjIEFQSSBmb3IgdGVzdGluZwogICAgX0cuZmVjID0gX0cuZmVjIG9yIHsKICAgICAgICBhZGRfbGlzdGVuZXIgPSBmdW5jdGlvbihuYW1lLCBsaXN0ZW5lcikKICAgICAgICAgICAgbG9nZ2VyLmluZm8oItCU0L7QsdCw0LLQu9C10L0g0YHQu9GD0YjQsNGC0LXQu9GMOiAiIC4uIG5hbWUpCiAgICAgICAgZW5kLAogICAgICAgIFRZUEUgPSB7CiAgICAgICAgICAgIFJBRElBTF9JTlBVVCA9ICJSQURJQUxfSU5QVVQiCiAgICAgICAgfQogICAgfQoKICAgIC0tIFNpbXVsYXRlIHBhY3MgQVBJIGZvciB0ZXN0aW5nCiAgICBfRy5wYWNzID0gX0cucGFjcyBvciB7CiAgICAgICAgYmxvY2sgPSBmdW5jdGlvbihwb2ludCkKICAgICAgICAgICAgbG9nZ2VyLmluZm8oItCR0LvQvtC60LjRgNC+0LLQutCwINGC0L7Rh9C60Lgg0LTQvtGB0YLRg9C/0LA6ICIgLi4gdG9zdHJpbmcocG9pbnQpKQogICAgICAgIGVuZCwKICAgICAgICB1bmJsb2NrID0gZnVuY3Rpb24ocG9pbnQpCiAgICAgICAgICAgIGxvZ2dlci5pbmZvKCLQoNCw0LfQsdC70L7QutC40YDQvtCy0LrQsCDRgtC+0YfQutC4INC00L7RgdGC0YPQv9CwOiAiIC4uIHRvc3RyaW5nKHBvaW50KSkKICAgICAgICBlbmQsCiAgICAgICAgZ2V0X2NvbnRyb2xsZXJfdG9rZW4gPSBmdW5jdGlvbigpCiAgICAgICAgICAgIHJldHVybiAyIC0tIFNpbXVsYXRlZCB0b2tlbiB2YWx1ZQogICAgICAgIGVuZAogICAgfQoKICAgIGZlYy5hZGRfbGlzdGVuZXIoImFjY2Vzc19jb250cm9sIiwgc2VsZikKCiAgICBsb2dnZXIuaW5mbygi0JjQvdC40YbQuNCw0LvQuNC30LDRhtC40Y8g0LfQsNCy0LXRgNGI0LXQvdCwLiDQkNC60YLQuNCy0L3QsNGPINGC0L7Rh9C60LAg0LTQvtGB0YLRg9C/0LA6ICIgLi4gdG9zdHJpbmcoc2VsZi5hY2Nlc3NfcG9pbnQpKQogICAgcmV0dXJuIHRydWUKZW5kCgotLSBBbGFybSBoYW5kbGVyCmZ1bmN0aW9uIEFjY2Vzc0NvbnRyb2w6b25fYWxhcm1fdHJpZ2dlcmVkKCkKICAgIGxvZ2dlci5lcnJvcigiISEhINCi0YDQtdCy0L7Qs9CwINCyINGI0LvQtdC50YTQtSAjNiAhISEg0JHQu9C+0LrQuNGA0L7QstC60LAg0YLQvtGH0LrQuCDQtNC+0YHRgtGD0L/QsCAiIC4uIHRvc3RyaW5nKHNlbGYuYWNjZXNzX3BvaW50KSkKCiAgICBsb2NhbCBzdWNjZXNzLCBlcnJvciA9IHBjYWxsKGZ1bmN0aW9uKCkKICAgICAgICBwYWNzLmJsb2NrKHNlbGYuYWNjZXNzX3BvaW50KQogICAgZW5kKQoKICAgIGlmIG5vdCBzdWNjZXNzIHRoZW4KICAgICAgICBsb2dnZXIuZXJyb3IoItCe0YjQuNCx0LrQsCDQv9GA0Lgg0LHQu9C+0LrQuNGA0L7QstC60LUg0YLQvtGH0LrQuCDQtNC+0YHRgtGD0L/QsDogIiAuLiB0b3N0cmluZyhlcnJvcikpCiAgICBlbmQKZW5kCgotLSBGRUMgb2JqZWN0IHByb2Nlc3NvcgpmdW5jdGlvbiBBY2Nlc3NDb250cm9sOnByb2Nlc3NfZmVjX29iamVjdChvYmplY3QpCiAgICBpZiBvYmplY3QudHlwZSA9PSBmZWMuVFlQRS5SQURJQUxfSU5QVVQgYW5kIG9iamVjdC5pZCA9PSBBTEFSTV9JTlBVVCB0aGVuCiAgICAgICAgbG9jYWwgc3RhdGUgPSBvYmplY3Quc3RhdGUKICAgICAgICBpZiBzdGF0ZSA9PSBJTlBVVF9TVEFURS5PTiB0aGVuCiAgICAgICAgICAgIHNlbGY6b25fYWxhcm1fdHJpZ2dlcmVkKCkKICAgICAgICBlbHNlCiAgICAgICAgICAgIGxvZ2dlci5pbmZvKCLQotGA0LXQstC+0LPQsCDRgdC90Y/RgtCwINCyINGI0LvQtdC50YTQtSAjNiIpCiAgICAgICAgICAgIGxvY2FsIHN1Y2Nlc3MsIGVycm9yID0gcGNhbGwoZnVuY3Rpb24oKQogICAgICAgICAgICAgICAgcGFjcy51bmJsb2NrKHNlbGYuYWNjZXNzX3BvaW50KQogICAgICAgICAgICBlbmQpCgogICAgICAgICAgICBpZiBub3Qgc3VjY2VzcyB0aGVuCiAgICAgICAgICAgICAgICBsb2dnZXIuZXJyb3IoItCe0YjQuNCx0LrQsCDQv9GA0Lgg0YDQsNC30LHQu9C+0LrQuNGA0L7QstC60LUg0YLQvtGH0LrQuCDQtNC+0YHRgtGD0L/QsDogIiAuLiB0b3N0cmluZyhlcnJvcikpCiAgICAgICAgICAgIGVuZAogICAgICAgIGVuZAogICAgZW5kCmVuZAoKLS0gRkVDIG9iamVjdCBjaGFuZ2UgaGFuZGxlcgpmdW5jdGlvbiBBY2Nlc3NDb250cm9sOm9uX2ZlY19vYmplY3RfY2hhbmdlZChwYW5lbCwgb2JqZWN0KQogICAgaWYgcGFuZWwgPT0gMCB0aGVuCiAgICAgICAgc2VsZjpwcm9jZXNzX2ZlY19vYmplY3Qob2JqZWN0KQogICAgZW5kCmVuZAoKLS0gU3lzdGVtIGluaXRpYWxpemF0aW9uCmxvY2FsIGZ1bmN0aW9uIGluaXRpYWxpemVfc3lzdGVtKCkKICAgIGxvY2FsIGFjY2Vzc0NvbnRyb2wgPSBBY2Nlc3NDb250cm9sOmNyZWF0ZSgpCiAgICBsb2NhbCBpbml0X3N1Y2Nlc3MgPSBhY2Nlc3NDb250cm9sOmluaXQoKQoKICAgIGlmIGluaXRfc3VjY2VzcyB0aGVuCiAgICAgICAgbG9nZ2VyLmluZm8oIj09PSDQodC40YHRgtC10LzQsCDQutC+0L3RgtGA0L7Qu9GPINC00L7RgdGC0YPQv9CwINGD0YHQv9C10YjQvdC+INC40L3QuNGG0LjQsNC70LjQt9C40YDQvtCy0LDQvdCwID09PSIpCiAgICBlbHNlCiAgICAgICAgbG9nZ2VyLmVycm9yKCI9PT0g0J7RiNC40LHQutCwINC40L3QuNGG0LjQsNC70LjQt9Cw0YbQuNC4INGB0LjRgdGC0LXQvNGLINC60L7QvdGC0YDQvtC70Y8g0LTQvtGB0YLRg9C/0LAgPT09IikKICAgIGVuZAoKICAgIHJldHVybiBhY2Nlc3NDb250cm9sCmVuZAoKLS0gUmV0dXJuIHRoZSBpbml0aWFsaXphdGlvbiBmdW5jdGlvbiBpbnN0ZWFkIG9mIGNhbGxpbmcgaXQKcmV0dXJuIGluaXRpYWxpemVfc3lzdGVtCg==