Начну с простого, как принять пакет от MODBUS TCP устройства:
arr = {}
srv = net.createServer(net.TCP)
srv:listen(502, function(conn)
conn:on("receive", function(sck, payload)
payload:gsub(".", function(c)
table.insert(arr, string.byte(c))
end)
print (table.concat(arr, " "))
end)
end)
Вывод в терминал будет таким:
0 1 0 0 0 6 1 3 0 0 0 1
.
.
0 30 0 0 0 6 1 3 0 0 0 1
0 31 0 0 0 6 1 3 0 0 0 1
0 32 0 0 0 6 1 3 0 0 0 1
В моем случае OPC сервер, который запрашивает информацию у устройства по протоколу TCP, шлет на указанный в нем IP адрес на 502 порт.
Код, который выше принимает его, записывает в массив и потом выводит в терминал. С массивом можно делать все что угодно.
Как передать пакет в MODBUS TCP устройство? Очень просто:
arr = {0,1,0,0,0,6,1,3,0,0,0,1}
srv = net.createServer(net.TCP)
srv:listen(502, function(conn)
conn:on("receive", function(sck, payload)
buff = ""
for i=1, #arr do
line = string.char(arr[i])
buff = buff .. line
end
sck:send(buff)
end)
end)
В данном случае передаётся массив в ответ на запрос от MODBUS TCP устройства. Зная протокол MODBUS можно формировать массив из нужных переменных в зависимости от запроса.
И на последок код, который принятый пакет записывает в массив отсылает его обратно:
arr = {}
srv = net.createServer(net.TCP)
srv:listen(502, function(conn)
conn:on("receive", function(sck, payload)
payload:gsub(".", function(c)
table.insert(arr, string.byte(c))
end)
local buff = ""
for i=1, #arr do
line = string.char(arr[i])
buff = buff .. line
end
sck:send(buff)
buff = ""
end)
end)
Это конечно не правильно, MODBUS TCP устройство будет ругаться на неправильный ответ, но в промежутке между приемом и передачей можно модифицировать массив и дать правильный ответ, я думаю что те, кто знает протокол MODBUS сможет понять как правильно ответить.
Я всего лишь отладил прием и передачу, базовый алгоритм, который работает, дальше уже каждый переделает его под свои нужды.
Есть еще один момент на который обращу ваше внимание. Бывает такое, что MODBUS TCP устройство может послать очень длинный пакет состоящий из нескольких не дожидаясь ответа на них и тогда массив моментально станет очень большим и естественно ответ будет таким-же и неправильным. Я решил это очень просто, я проверяю размер принятого пакета, если он равен нужному количеству байт, то после приема выполняется код, если нет, то все пропускается и устройство ждет следующего запроса:
if string.len(payload) == 12 then
.
.
end
Эту проверку я делаю сразу после приема пакета и если пакет равен 12 байтам, то код выполняется, если нет, то пропускается и ждет следующий запрос от MODBUS TCP устройства.
Данный код можно переделать под MODBUS RS485, контрольную сумму можно рассчитывать модулем из прошивки MODEMCU.
Здесь можно скомпилировать прошивку с нужными модулями.