Alors j'ai contrôlé depuis un pc branché sur le même réseau pour savoir si le port 23 est bien ouvert et en mode écoute
C:\PortQryV2>portqry -n 172.22.22.26 -e 23
Querying target system called:
172.22.22.26
Attempting to resolve IP address to a name...
Failed to resolve IP address to name
querying...
TCP port 23 (telnet service): LISTENING
Tout semble ok, est-ce que je dois trouver une option dans mon ampli pour lui autoriser de recevoir des commandes par telnet?
J'ai également été voir sur le doc officiel de fibaro pour voir si la méthode employé dans le code ci-dessus est toujours d'actualité et la réponse c'est oui:
https://manuals.fibaro.com/home-center-3-quick-apps/
3
4
5
6
7
8
9
10
11
12
function QuickApp:onInit()
self.sock = net.TCPSocket()
self.sock:connect(self.ip, self.port, {
success = function()
self:debug("connected")
end,
error = function(message)
self:debug("connection error:", message)
end,
})
end
Tout semble être ok mais impossible de faire fonctionner.
Je remets le code entier :
--------------------------------------------------------------------------------------------------------------------------------------
-- QuickApp Amplificateur Audio-Vidéo DENON AVR-X3200W
-- Commutateur binaire
-- HISTORIQUE
-- Adapté de https://www.domotique-fibaro.fr/topic/3263-telecommande-pour-marantz-sr6008-et-similaires-5008-7008-etc/?tab=comments#comment-46332
-- V3.2 (10/01/2015) Remote Marantz de SebcBien
-- HC3 Version:
-- V1.0 (14/05/2020) Remote Denon pour Home center 3 par fredokl et Maxime pour le site www.domotique-fibaro.fr
-- Utilistaion :
-- La connexion à l'amplifivateur Audio-Vidéo se fait par TELNET (port:23 par défaut)
-- Créer les variables "ip" & "port"
-- Ajouter les commandes que vous souhaitez dans la partie "RÉGLAGES UTILISATEUR"
-- Toutes les modifications se font dans la partie "RÉGLAGES UTILISATEUR"
-- À l'excepter des noms des appareils que vous utilisez chez vous
-- ==> voir QuickApp:onDataReceived(data)
-- ==> VOS APPAREILS ICI
-- Vous pouvez le modifier et l'améliorer à votre guise.
--------------------------------------------------------------------------------------------------------------------------------------
--------------------------------------------------------------------------------------------------------------------------------------
-- PARAMÈTRES UTILISATEUR --
--------------------------------------------------------------------------------------------------------------------------------------
--------------------------------------------------------------------------------------------------------------------------------------
QuickApp._VERSION = "1.0"
function QuickApp:onInit()
__TAG = "QA_"..plugin.mainDeviceId.."DENON"
self:trace("DEBUT ========================================================")
self.ip = "172.22.22.26"
self.port = "23"
self:setVariable("mute", "0")
self.sock = net.TCPSocket() -- création d'une instance TCPSocket
self.isOn = false
self.isconnected = false
self:connect()
self.pollingTime = 1000*60 -- 1min
self:refresh()
end
--------------------------------------------------------------------------------------------------------------------------------------
-- ON & OFF
--------------------------------------------------------------------------------------------------------------------------------------
function QuickApp:turnOn() self:debug("Turn On") self:sendCommand("ZMON") self:getinfo() end
function QuickApp:uibtnonOnReleased(event) self:turnOn() end
function QuickApp:turnOff()self:debug("Turn off") self:sendCommand("ZMOFF") self:getinfo() end
function QuickApp:uibtnoffOnReleased(event) self:turnOff() end
--------------------------------------------------------------------------------------------------------------------------------------
-- Boutons de volume
--------------------------------------------------------------------------------------------------------------------------------------
function QuickApp:uibtnvol30OnReleased(event) self:SetVol(30) self:getinfo() end
function QuickApp:uibtnvol40OnReleased(event) self:SetVol(40) self:getinfo() end
function QuickApp:uibtnvol50OnReleased(event) self:SetVol(50) self:getinfo() end
function QuickApp:uibtnvol60OnReleased(event) self:SetVol(60) self:getinfo() end
function QuickApp:uibtnmuteOnOff(event)
if self:getVariable("mute") == "0" then
self:setVariable("mute","1")
self:sendCommand("MUON")
self:updateProperty("value", true)
self:getinfo()
elseif self:getVariable("mute") == "1" then
self:setVariable("mute", "0")
self:sendCommand("MUOFF")
self:updateProperty("value", false)
self:getinfo()
end
end
--------------------------------------------------------------------------------------------------------------------------------------
-- FORMATS SONORS
--------------------------------------------------------------------------------------------------------------------------------------
function QuickApp:uiddOnReleased(event) self:debug("Dolby Digital") self:sendCommand("MSDOLBY DIGITAL") self:getinfo() end
function QuickApp:uidtsOnReleased(event) self:debug("DTS") self:sendCommand("MSDTS SURROUND") self:getinfo() end
function QuickApp:ui7chstOnReleased(event) self:debug("7 Canaux Stereo") self:sendCommand("MSMCH STEREO") self:getinfo() end
--------------------------------------------------------------------------------------------------------------------------------------
--------------------------------------------------------------------------------------------------------------------------------------
-- NE RIEN TOUCHER À PARTIR D'ICI --
--------------------------------------------------------------------------------------------------------------------------------------
-- VOLUME & SLIDER
--------------------------------------------------------------------------------------------------------------------------------------
function QuickApp:SetVol(value)
if value < 10 then value = "0" ..value end
self:sendCommand("MV" ..tostring(value))
self:trace("Volume", value)
end
function QuickApp:uivolumeOnChanged(event)
local value = event.values[1]
self:SetVol(value)
self:getinfo()
end
--------------------------------------------------------------------------------------------------------------------------------------
-- REQUÊTE HTTP
--------------------------------------------------------------------------------------------------------------------------------------
function QuickApp:getinfo()
self:sendCommand("PW?") -- Power
self:sendCommand("SI?") -- source
self:sendCommand("MS?") -- format sono
self:sendCommand("MV?") -- volume
end
function QuickApp:uigetinfo()
self:getinfo()
end
function QuickApp:sendCommand(strToSend)
local command = strToSend .."\r"
self.sock:write(command, {
success = function() -- fonction qui sera déclenchée lorsque les données seront correctement envoyées
--self:trace("data sent" ..command)
end,
error = function(err) -- fonction qui sera déclenchée en cas d'erreur de transmission de données
self:trace("error while sending data")
end
})
end
-- méthode pour lire les données du socket
-- puisque la méthode elle-même a été bouclée, elle ne doit pas être appelée depuis un autre emplacement que QuickApp:connect()
function QuickApp:waitForResponseFunction()
self.sock:read({ -- lire un paquet de données depuis le socket
success = function(data)
self:onDataReceived(data) -- traitement des données reçues
self:waitForResponseFunction() -- lecture en boucle des données
end,
error = function() -- une fonction qui sera appelée en cas d'erreur lors de la tentative de réception de données, par ex. déconnexion d'un socket
self:trace("response error")
self.sock:close() -- socket fermé
fibaro.setTimeout(5000, function() self:connect() end) -- tentative de reconnexion (toutes les 5 secondes)
end
})
end
-- méthode pour ouvrir une connexion TCP.
-- si la connexion réussit, la boucle de lecture des données sera appelée QuickApp:waitForResponseFunction ()
function QuickApp:connect()
self.sock:connect(self.ip, self.port, { -- connexion à l'appareil avec l'adresse IP et le port spécifiés
success = function() -- la fonction sera déclenchée si la connexion est correcte
self:trace("connected")
self.isconnected = true
self:waitForResponseFunction() -- lancement d'une "boucle" de lecture de données
end,
error = function(err) -- une fonction qui sera déclenchée en cas de connexion incorrecte, par ex. timeout
self.sock:close() -- fermeture du socket
self:warning("connection error")
self:updateView("lblSource", "text", "Source: N/A")
self:updateView("lblSur", "text", "Format Sonor: N/A")
self:updateView("lblVolStat", "text", "Volume: N/A")
self:updateView("Slidervolume", "value", "0")
fibaro.setTimeout(5000, function() self:connect() end) -- tentative de reconnexion (toutes les 5 secondes)
end,
})
end
-- fonction de gestion des données lues
-- normalement c'est là que les données rapportées par l'appareil seront traitées
function QuickApp:onDataReceived(data)
--self:trace("onDataReceived", data)
power = string.find(data, "PW.")
volume = string.find(data, "MV%d")
formatsonor = string.find(data, "MS.")
source = string.find(data, "SI.")
if power then
if string.sub(data, 3, #data - 1) == "STANDBY" then
self.isOn = false
self:updateView("lblSource", "text", "Source: N/A")
self:updateView("lblSur", "text", "Format Sonor: N/A")
self:updateView("lblVolStat", "text", "Volume: N/A")
self:updateView("Slidervolume", "value", "0")
self:updateProperty("value", false)
else self.isOn = true self:updateProperty("value", true)
end
end
if self.isOn then
if volume then
local statSliderVol = string.sub(data, 3, #data-1)
if string.len(statSliderVol) == 3 then statSliderVol = string.sub(statSliderVol, 1, 2) end
self:updateView("lblVolStat", "text", "Volume: " ..statSliderVol .." %")
self:updateView("Slidervolume", "value", statSliderVol) -- updating the text for 'Slidervolume'.
end
if formatsonor then
self:updateView("lblSur", "text", "Mode Surround: " ..string.sub(data, formatsonor + 2))
self:trace("Mode Surround: " ..string.sub(data, formatsonor + 2))
end
end
end
--------------------------------------------------------------------------------------------------------------------------------------
-- REFRESH
--------------------------------------------------------------------------------------------------------------------------------------
-- fonction refresh du QA
function QuickApp:refresh()
if self.isconnected then
self:getinfo()
end
fibaro.setTimeout(self.pollingTime, function() self:refresh() end) -- looping part
end
--------------------------------------------------------------------------------------------------------------------------------------
-- FIN DU CODE --
--------------------------------------------------------------------------------------------------------------------------------------
Je vous remercie d'avance pour vos réponses
