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

more debug information

Browse Source
This commit is contained in:
Marko Oldenburg 2018-05-24 13:49:54 +02:00
parent 2a6b0901fe
commit 256a899093
1 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
42_AptToDate.pm
View File

@ -366,7 +366,7 @@ sub AptToDate_AsynchronousExecuteAptGetCommand($) {
my $subprocess = SubProcess->new({ onRun => \&AptToDate_OnRun }); my $subprocess = SubProcess->new({ onRun => \&AptToDate_OnRun });
$subprocess->{aptget} = $hash->{".fhem"}{aptget}; $subprocess->{aptget} = $hash->{".fhem"}{aptget};
$subprocess->{aptget}{host} = $hash->{HOST}; $subprocess->{aptget}{host} = $hash->{HOST};
$subprocess->{aptget}{debug} = 1 if( AttrVal($name,'verbose',0) > 3 ); $subprocess->{aptget}{debug} = ( AttrVal($name,'verbose',0) > 3 ? 1 : 0 );
my $pid = $subprocess->run(); my $pid = $subprocess->run();
readingsSingleUpdate($hash,'state',$hash->{".fhem"}{aptget}{cmd}.' in progress', 1); readingsSingleUpdate($hash,'state',$hash->{".fhem"}{aptget}{cmd}.' in progress', 1);
@ -483,7 +483,7 @@ sub AptToDate_GetDistribution($) {
while (my $line = <DISTRI>) { while (my $line = <DISTRI>) {
chomp($line); chomp($line);
print qq($line\n) if( $apt->{debug} ); print qq($line\n) if( $apt->{debug} == 1 );
if($line =~ m#^(.*)="?(.*)"$#i or $line =~ m#^(.*)=([a-z]+)$#i) { if($line =~ m#^(.*)="?(.*)"$#i or $line =~ m#^(.*)=([a-z]+)$#i) {
$update->{'os-release'}{'os-release_'.$1} = $2; $update->{'os-release'}{'os-release_'.$1} = $2;
Log3 'Update', 4, "Distribution Daten erhalten" Log3 'Update', 4, "Distribution Daten erhalten"
@ -500,7 +500,7 @@ sub AptToDate_GetDistribution($) {
while(my $line = <LOCALE>) { while(my $line = <LOCALE>) {
chomp($line); chomp($line);
print qq($line\n) if( $apt->{debug} ); print qq($line\n) if( $apt->{debug} == 1 );
if($line =~ m#^LANG=([a-z]+).*$#) { if($line =~ m#^LANG=([a-z]+).*$#) {
$update->{'os-release'}{'os-release_language'} = $1; $update->{'os-release'}{'os-release_language'} = $1;
Log3 'Update', 4, "Language Daten erhalten" Log3 'Update', 4, "Language Daten erhalten"
@ -527,7 +527,7 @@ sub AptToDate_AptUpdate($) {
if(open(APT, "$apt->{aptgetupdate} 2>&1 | ")) { if(open(APT, "$apt->{aptgetupdate} 2>&1 | ")) {
while (my $line = <APT>) { while (my $line = <APT>) {
chomp($line); chomp($line);
print qq($line\n) if( $apt->{debug} ); print qq($line\n) if( $apt->{debug} == 1 );
if($line =~ m#$regex{$apt->{lang}}{update}#i) { if($line =~ m#$regex{$apt->{lang}}{update}#i) {
$update->{'state'} = 'done'; $update->{'state'} = 'done';
Log3 'Update', 4, "Daten erhalten"; Log3 'Update', 4, "Daten erhalten";
@ -567,7 +567,7 @@ sub AptToDate_AptUpgradeList($) {
if(open(APT, "$apt->{aptgetupgrade} 2>&1 |")) { if(open(APT, "$apt->{aptgetupgrade} 2>&1 |")) {
while(my $line = <APT>) { while(my $line = <APT>) {
chomp($line); chomp($line);
print qq($line\n) if( $apt->{debug} ); print qq($line\n) if( $apt->{debug} == 1 );
if($line =~ m#^\s+(\S+)\s+\((\S+)\s+=>\s+(\S+)\)#) { if($line =~ m#^\s+(\S+)\s+\((\S+)\s+=>\s+(\S+)\)#) {
my $update = {}; my $update = {};
@ -607,7 +607,7 @@ sub AptToDate_AptToUpgrade($) {
if(open(APT, "$apt->{aptgettoupgrade} 2>&1 |")) { if(open(APT, "$apt->{aptgettoupgrade} 2>&1 |")) {
while(my $line = <APT>) { while(my $line = <APT>) {
chomp($line); chomp($line);
print qq($line\n) if( $apt->{debug} ); print qq($line\n) if( $apt->{debug} == 1 );
if($line =~ m#$regex{$apt->{lang}}{upgrade}#) { if($line =~ m#$regex{$apt->{lang}}{upgrade}#) {
my $update = {}; my $update = {};