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

ready for version 0.1.0

Browse Source
This commit is contained in:
Marko Oldenburg
2017-02-16 23:45:40 +01:00
parent 97ea204abc
commit 5ab6a6d180
1 changed files with 10 additions and 11 deletions
Download Patch File Download Diff File Expand all files Collapse all files

21
82_LGTV_WebOS.pm
View File

@@ -51,7 +51,7 @@ use Encode qw(encode_utf8);
my $version = "0.0.78"; my $version = "0.1.0";
@@ -118,7 +118,7 @@ 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", "channelId"], "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"],
@@ -336,7 +336,7 @@ sub LGTV_WebOS_TimerStatusRequest($) {
readingsBulkUpdate($hash, 'presence', 'absent'); readingsBulkUpdate($hash, 'presence', 'absent');
readingsBulkUpdate($hash,'channel','-'); readingsBulkUpdate($hash,'channel','-');
readingsBulkUpdate($hash,'channelId','-'); readingsBulkUpdate($hash,'channelName','-');
readingsBulkUpdate($hash,'channelMedia','-'); readingsBulkUpdate($hash,'channelMedia','-');
readingsBulkUpdate($hash,'channelCurrentTitle','-'); readingsBulkUpdate($hash,'channelCurrentTitle','-');
readingsBulkUpdate($hash,'channelCurrentStartTime','-'); readingsBulkUpdate($hash,'channelCurrentStartTime','-');
@@ -633,19 +633,19 @@ sub LGTV_WebOS_Read($) {
$buf =~ /({"type":".+}}$)/; $buf =~ /({"type":".+}}$)/;
$buf = $1; $buf = $1;
Log3 $name, 5, "LGTV_WebOS ($name) - received correct JSON string, start response processing: $buf"; Log3 $name, 4, "LGTV_WebOS ($name) - received correct JSON string, start response processing: $buf";
LGTV_WebOS_ResponseProcessing($hash,$buf); LGTV_WebOS_ResponseProcessing($hash,$buf);
#return; #return;
} elsif( $buf =~ /HTTP\/1.1 101 Switching Protocols/ ) { } elsif( $buf =~ /HTTP\/1.1 101 Switching Protocols/ ) {
Log3 $name, 5, "LGTV_WebOS ($name) - received HTTP data string, start response processing: $buf"; Log3 $name, 4, "LGTV_WebOS ($name) - received HTTP data string, start response processing: $buf";
LGTV_WebOS_ResponseProcessing($hash,$buf); LGTV_WebOS_ResponseProcessing($hash,$buf);
#return; #return;
} else { } else {
Log3 $name, 5, "LGTV_WebOS ($name) - coruppted data found, run LGTV_WebOS_ProcessRead: $buf"; Log3 $name, 4, "LGTV_WebOS ($name) - coruppted data found, run LGTV_WebOS_ProcessRead: $buf";
LGTV_WebOS_ProcessRead($hash,$buf); LGTV_WebOS_ProcessRead($hash,$buf);
} }
} }
@@ -696,7 +696,7 @@ sub LGTV_WebOS_ProcessRead($$) {
delete $hash->{PARTIAL} delete $hash->{PARTIAL}
if(length($tail) > 30000); if(length($tail) > 30000);
$hash->{PARTIAL} = $tail; $hash->{PARTIAL} = $tail;
Log3 $name, 4, "LGTV_WebOS ($name) - PARTIAL lenght: " . length($tail);
Log3 $name, 5, "LGTV_WebOS ($name) - Tail: " . $tail; Log3 $name, 5, "LGTV_WebOS ($name) - Tail: " . $tail;
Log3 $name, 5, "LGTV_WebOS ($name) - PARTIAL: " . $hash->{PARTIAL}; Log3 $name, 5, "LGTV_WebOS ($name) - PARTIAL: " . $hash->{PARTIAL};
@@ -942,14 +942,13 @@ sub LGTV_WebOS_WriteReadings($$) {
if( ReadingsVal($name,'launchApp','none') eq 'TV') { if( ReadingsVal($name,'launchApp','none') eq 'TV') {
readingsBulkUpdate($hash,'channelId',$decode_json->{payload}{'channelNumber'}); readingsBulkUpdate($hash,'channel',$decode_json->{payload}{'channelNumber'});
readingsBulkUpdate($hash,'channel',$decode_json->{payload}{'channelName'}); readingsBulkUpdate($hash,'channelName',$decode_json->{payload}{'channelName'});
#readingsBulkUpdate($hash,'.openChannel',$decode_json->{payload}{'channelName'});
readingsBulkUpdate($hash,'channelMedia',$decode_json->{payload}{'channelTypeName'}); readingsBulkUpdate($hash,'channelMedia',$decode_json->{payload}{'channelTypeName'});
} else { } else {
readingsBulkUpdate($hash,'channelId','-'); readingsBulkUpdate($hash,'channelName','-');
readingsBulkUpdate($hash,'channel','-'); readingsBulkUpdate($hash,'channel','-');
readingsBulkUpdate($hash,'channelMedia','-'); readingsBulkUpdate($hash,'channelMedia','-');
readingsBulkUpdate($hash,'channelCurrentTitle','-'); readingsBulkUpdate($hash,'channelCurrentTitle','-');