FHEM/mod-LGTV_WebOS
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Merge pull request 'dev' (#14) from dev into main

Browse Source 
Reviewed-on: #14
This commit is contained in:
Marko Oldenburg 2023-05-16 04:28:06 +02:00
commit 38c47bd0ef
3 changed files with 18 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
FHEM/82_LGTV_WebOS.pm
View File

@ -2,7 +2,7 @@
# #
# Developed with VSCodium and richterger perl plugin. # Developed with VSCodium and richterger perl plugin.
# #
# (c) 2017-2022 Copyright: Marko Oldenburg (fhemdevelopment at cooltux dot net) # (c) 2017-2023 Copyright: Marko Oldenburg (fhemdevelopment at cooltux dot net)
# All rights reserved # All rights reserved
# #
# Special thanks goes to comitters: # Special thanks goes to comitters:
@ -368,7 +368,7 @@ __END__
], ],
"release_status": "stable", "release_status": "stable",
"license": "GPL_2", "license": "GPL_2",
"version": "v3.6.5", "version": "v3.6.9",
"author": [ "author": [
"Marko Oldenburg <fhemdevelopment@cooltux.net>" "Marko Oldenburg <fhemdevelopment@cooltux.net>"
], ],

4
controls_LGTV_WebOS.txt
View File

@ -1,2 +1,2 @@
UPD 2022-03-31_06:48:33 18968 FHEM/82_LGTV_WebOS.pm UPD 2023-05-16_04:16:05 18968 FHEM/82_LGTV_WebOS.pm
UPD 2022-03-31_14:55:57 55129 lib/FHEM/Devices/LGTV/LGTVWebOS.pm UPD 2023-05-16_04:14:37 55512 lib/FHEM/Devices/LGTV/LGTVWebOS.pm

23
lib/FHEM/Devices/LGTV/LGTVWebOS.pm
View File

@ -2,7 +2,7 @@
# #
# Developed with VSCodium and richterger perl plugin. # Developed with VSCodium and richterger perl plugin.
# #
# (c) 2017-2022 Copyright: Marko Oldenburg (fhemdevelopment at cooltux dot net) # (c) 2017-2023 Copyright: Marko Oldenburg (fhemdevelopment at cooltux dot net)
# All rights reserved # All rights reserved
# #
# Special thanks goes to comitters: # Special thanks goes to comitters:
@ -53,7 +53,7 @@ BEGIN {
init_done init_done
selectlist selectlist
defs defs
) )
); );
} }
@ -133,7 +133,7 @@ my %lgCommands = (
"getAudioStatus" => ["ssap://audio/getStatus"], "getAudioStatus" => ["ssap://audio/getStatus"],
"getCurrentChannel" => ["ssap://tv/getCurrentChannel"], "getCurrentChannel" => ["ssap://tv/getCurrentChannel"],
"getChannelProgramInfo" => ["ssap://tv/getChannelProgramInfo"], "getChannelProgramInfo" => ["ssap://tv/getChannelProgramInfo"],
"getForegroundAppInfo" => "getForegroundAppInfo" =>
["ssap://com.webos.applicationManager/getForegroundAppInfo"], ["ssap://com.webos.applicationManager/getForegroundAppInfo"],
"getAppList" => ["ssap://com.webos.applicationManager/listApps"], "getAppList" => ["ssap://com.webos.applicationManager/listApps"],
"getAppStatus" => ["ssap://com.webos.service.appstatus/getAppStatus"], "getAppStatus" => ["ssap://com.webos.service.appstatus/getAppStatus"],
@ -156,12 +156,12 @@ my %lgCommands = (
"closeApp" => ["ssap://system.launcher/close"], "closeApp" => ["ssap://system.launcher/close"],
"openApp" => ["ssap://system.launcher/open"], "openApp" => ["ssap://system.launcher/open"],
"closeWebApp" => ["ssap://webapp/closeWebApp"], "closeWebApp" => ["ssap://webapp/closeWebApp"],
"openChannel" => [ "ssap://tv/openChannel", "channelNumber" ], "openChannel" => [ "ssap://tv/openChannel", "channelNumber" ],
"launchApp" => [ "ssap://system.launcher/launch", "id" ], "launchApp" => [ "ssap://system.launcher/launch", "id" ],
"screenMsg" => [ "ssap://system.notifications/createToast", "message" ], "screenMsg" => [ "ssap://system.notifications/createToast", "message" ],
"mute" => [ "ssap://audio/setMute", "mute" ], "mute" => [ "ssap://audio/setMute", "mute" ],
"volume" => [ "ssap://audio/setVolume", "volume" ], "volume" => [ "ssap://audio/setVolume", "volume" ],
"switchInput" => [ "ssap://tv/switchInput", "input" ], "switchInput" => [ "ssap://tv/switchInput", "input" ],
); );
my %openApps = ( my %openApps = (
@ -363,6 +363,8 @@ sub TimerStatusRequest {
else { else {
::readingsBulkUpdateIfChanged( $hash, 'state', 'off' ) ::readingsBulkUpdateIfChanged( $hash, 'state', 'off' )
if ( ::ReadingsVal( $name, 'state', 'off' ) ne 'off' ); if ( ::ReadingsVal( $name, 'state', 'off' ) ne 'off' );
::readingsBulkUpdateIfChanged( $hash, 'power', 'off' )
if ( ::ReadingsVal( $name, 'power', 'off' ) ne 'off' );
Presence($hash) Presence($hash)
if ( ::AttrVal( $name, 'pingPresence', 0 ) == 1 ); if ( ::AttrVal( $name, 'pingPresence', 0 ) == 1 );
@ -686,6 +688,7 @@ sub Close {
delete( $hash->{FD} ); delete( $hash->{FD} );
::readingsSingleUpdate( $hash, 'state', 'off', 1 ); ::readingsSingleUpdate( $hash, 'state', 'off', 1 );
::readingsSingleUpdate( $hash, 'power', 'off', 1 );
::Log3( $name, 4, "LGTV_WebOS ($name) - Socket Disconnected" ); ::Log3( $name, 4, "LGTV_WebOS ($name) - Socket Disconnected" );
@ -962,6 +965,7 @@ sub ResponseProcessing {
"LGTV_WebOS ($name) - Sucessfull WS connection to $hash->{HOST}" "LGTV_WebOS ($name) - Sucessfull WS connection to $hash->{HOST}"
); );
::readingsSingleUpdate( $hash, 'state', 'on', 1 ); ::readingsSingleUpdate( $hash, 'state', 'on', 1 );
::readingsSingleUpdate( $hash, 'power', 'on', 1 );
} }
else { else {
@ -1342,6 +1346,7 @@ sub WriteReadings {
} }
::readingsBulkUpdateIfChanged( $hash, 'state', 'on' ); ::readingsBulkUpdateIfChanged( $hash, 'state', 'on' );
::readingsBulkUpdateIfChanged( $hash, 'power', 'on' );
::readingsEndUpdate( $hash, 1 ); ::readingsEndUpdate( $hash, 1 );
@ -1409,7 +1414,7 @@ sub Pairing {
"signatures" => [ "signatures" => [
{ {
"signatureVersion" => 1, "signatureVersion" => 1,
"signature" => "signature" =>
"eyJhbGdvcml0aG0iOiJSU0EtU0hBMjU2Iiwia2V5SWQiOiJ0ZXN0LXNpZ25pbmctY2VydCIsInNpZ25hdHVyZVZlcnNpb24iOjF9.hrVRgjCwXVvE2OOSpDZ58hR+59aFNwYDyjQgKk3auukd7pcegmE2CzPCa0bJ0ZsRAcKkCTJrWo5iDzNhMBWRyaMOv5zWSrthlf7G128qvIlpMT0YNY+n/FaOHE73uLrS/g7swl3/qH/BGFG2Hu4RlL48eb3lLKqTt2xKHdCs6Cd4RMfJPYnzgvI4BNrFUKsjkcu+WD4OO2A27Pq1n50cMchmcaXadJhGrOqH5YmHdOCj5NSHzJYrsW0HPlpuAx/ECMeIZYDh6RMqaFM2DXzdKX9NmmyqzJ3o/0lkk/N97gfVRLW5hA29yeAwaCViZNCP8iC9aO0q9fQojoa7NQnAtw==" "eyJhbGdvcml0aG0iOiJSU0EtU0hBMjU2Iiwia2V5SWQiOiJ0ZXN0LXNpZ25pbmctY2VydCIsInNpZ25hdHVyZVZlcnNpb24iOjF9.hrVRgjCwXVvE2OOSpDZ58hR+59aFNwYDyjQgKk3auukd7pcegmE2CzPCa0bJ0ZsRAcKkCTJrWo5iDzNhMBWRyaMOv5zWSrthlf7G128qvIlpMT0YNY+n/FaOHE73uLrS/g7swl3/qH/BGFG2Hu4RlL48eb3lLKqTt2xKHdCs6Cd4RMfJPYnzgvI4BNrFUKsjkcu+WD4OO2A27Pq1n50cMchmcaXadJhGrOqH5YmHdOCj5NSHzJYrsW0HPlpuAx/ECMeIZYDh6RMqaFM2DXzdKX9NmmyqzJ3o/0lkk/N97gfVRLW5hA29yeAwaCViZNCP8iC9aO0q9fQojoa7NQnAtw=="
} }
] ]
@ -1440,7 +1445,7 @@ sub CreateSendCommand {
if ( $type ne 'register' ); if ( $type ne 'register' );
$command->{id} = $type . "_" . ::gettimeofday(); $command->{id} = $type . "_" . ::gettimeofday();
$command->{type} = $type; $command->{type} = $type;
$command->{uri} = $uri if ($uri); $command->{uri} = $uri if ($uri);
$command->{payload} = $payload if ( defined($payload) ); $command->{payload} = $payload if ( defined($payload) );
#::Log3( $name, 5, "LGTV_WebOS ($name) - Payload Message: $command->{payload}{message}" ); #::Log3( $name, 5, "LGTV_WebOS ($name) - Payload Message: $command->{payload}{message}" );