From ea6a8d49863c4f7633e9dabb2ea018be90c3ea4c Mon Sep 17 00:00:00 2001 From: hapege <> Date: Tue, 1 Feb 2022 21:57:12 +0000 Subject: [PATCH] 70_ESCVP21net.pm: bugfix perl warning git-svn-id: https://svn.fhem.de/fhem/trunk@25610 2b470e98-0d58-463d-a4d8-8e2adae1ed80 --- fhem/FHEM/70_ESCVP21net.pm | 11 ++++++----- fhem/fhem.cfg | 16 ++++++++++++++-- 2 files changed, 20 insertions(+), 7 deletions(-) diff --git a/fhem/FHEM/70_ESCVP21net.pm b/fhem/FHEM/70_ESCVP21net.pm index 04b4abdfa..aa43966bc 100755 --- a/fhem/FHEM/70_ESCVP21net.pm +++ b/fhem/FHEM/70_ESCVP21net.pm @@ -15,6 +15,7 @@ # 1.01.02 supporting multiple devices (store set and result in device hash) # adding debug attr # 1.01.03 rename to 70_ESCVP21net, clean up and prepare for fhem trunk +# 1.01.04 small bug fix, DevIo log messages moved to loglevel 5 # # ######################################################################################## @@ -845,7 +846,7 @@ sub ESCVP21net_setValueDone { ( $name, $cmd, $result ) = split( "\\|", $resultarr[$count] ); if ($result =~ "ERROR"){ $getcmds .=$cmd." (error),"; - #$rv = $result; + $rv = $result; } else{ $rv = readingsBulkUpdate($hash, $cmd, $result, 1); @@ -1005,14 +1006,14 @@ sub ESCVP21net_checkConnection ($) { # no internal timer needed delete $hash->{helper}{nextConnectionCheck} if ( defined( $hash->{helper}{nextConnectionCheck} ) ); - main::Log3 $name, 3, "[$name]: DevIo_Open has no FD, NEXT_OPEN is $hash->{NEXT_OPEN}, no timer set"; + main::Log3 $name, 5, "[$name]: DevIo_Open has no FD, NEXT_OPEN is $hash->{NEXT_OPEN}, no timer set"; } elsif (!($hash->{FD}) && !$hash->{NEXT_OPEN}){ # not connected, DevIo not active, so device won't open again automatically # should never happen, since we called DevIo_Open above! # no internal timer needed, but should we ask DevIo again for opening the connection? #DevIo_OpenDev($hash, 1, "ESCVP21net_Init", "ESCVP21net_Callback"); - main::Log3 $name, 3, "[$name]: DevIo_Open has no FD, no NEXT_OPEN, should not happen!"; + main::Log3 $name, 5, "[$name]: DevIo_Open has no FD, no NEXT_OPEN, should not happen!"; } elsif ($hash->{FD} && $hash->{NEXT_OPEN}){ # not connected - device was connected, but is not reachable currently @@ -1023,7 +1024,7 @@ sub ESCVP21net_checkConnection ($) { #DevIo_OpenDev($hash, 1, "ESCVP21net_Init", "ESCVP21net_Callback"); delete $hash->{helper}{nextConnectionCheck} if ( defined( $hash->{helper}{nextConnectionCheck} ) ); - main::Log3 $name, 3, "[$name]: DevIo_Open has FD and NEXT_OPEN, try to reconnect periodically"; + main::Log3 $name, 5, "[$name]: DevIo_Open has FD and NEXT_OPEN, try to reconnect periodically"; } elsif ($hash->{FD} && !$hash->{NEXT_OPEN}){ # device is connectd, or seems to be (since broken connection is not detected by DevIo!) @@ -1033,7 +1034,7 @@ sub ESCVP21net_checkConnection ($) { my $next = gettimeofday() + $checkInterval; # if checkInterval is off, we won't reach this line $hash->{helper}{nextConnectionCheck} = $next; InternalTimer( $next, "ESCVP21net_checkConnection", $hash); - main::Log3 $name, 3, "[$name]: DevIo_Open has FD but no NEXT_OPEN, next timer set"; + main::Log3 $name, 5, "[$name]: DevIo_Open has FD but no NEXT_OPEN, next timer set"; } } diff --git a/fhem/fhem.cfg b/fhem/fhem.cfg index b009df62a..e5b7dac6d 100644 --- a/fhem/fhem.cfg +++ b/fhem/fhem.cfg @@ -1,17 +1,29 @@ +attr global userattr cmdIcon devStateIcon:textField-long devStateStyle icon sortby webCmd webCmdLabel:textField-long widgetOverride +attr global autoload_undefined_devices 1 attr global logfile ./log/fhem-%Y-%m.log attr global modpath . -attr global verbose 3 attr global statefile ./log/fhem.save +attr global verbose 3 define WEB FHEMWEB 8083 global +setuuid WEB 61f6c735-f33f-4fb8-9882-c21ddaec2c924d6a +attr WEB stylesheetPrefix f11 # Fake FileLog entry, to access the fhem log from FHEMWEB define Logfile FileLog ./log/fhem-%Y-%m.log Logfile +setuuid Logfile 61f6c735-f33f-4fb8-0e86-b03c8252a274fd78 define autocreate autocreate +setuuid autocreate 61f6c735-f33f-4fb8-f905-8d60f2e4c2e9b9a0 attr autocreate filelog ./log/%NAME-%Y.log define eventTypes eventTypes ./log/eventTypes.txt +setuuid eventTypes 61f6c735-f33f-4fb8-56d4-92b2c9fa10c71b04 # Disable this to avoid looking for new USB devices on startup -define initialUsbCheck notify global:INITIALIZED usb create +define initialUsbCheck notify global:INITIALIZED usb create +setuuid initialUsbCheck 61f6c735-f33f-4fb8-6eaf-3b76af76fe97b731 +define Epson2 ESCVP21net 192.168.81.141 3629 TW5650 +setuuid Epson2 61f6ed63-f33f-4fb8-73f7-d8986839543a77cf +attr Epson2 room Beamer +attr Epson2 stateFormat PWR