edit manual conflict
This commit is contained in:
Marko Oldenburg
commit
a7484690db
@ -35,7 +35,8 @@ use POSIX;
|
||||
use JSON;
|
||||
use Blocking;
|
||||
|
||||
my $version = "0.6.8";
|
||||
|
||||
my $version = "1.0.0";
|
||||
|
||||
|
||||
|
||||
@ -69,15 +70,22 @@ sub XiaomiFlowerSens_Initialize($) {
|
||||
$hash->{AttrFn} = "XiaomiFlowerSens_Attr";
|
||||
$hash->{AttrList} = "interval ".
|
||||
"disable:1 ".
|
||||
"hciDevice:hci0,hci1,hci2 ".
|
||||
"disabledForIntervals ".
|
||||
"hciDevice:hci0,hci1,hci2 ".
|
||||
"minFertility ".
|
||||
"maxFertility ".
|
||||
"minTemp ".
|
||||
"maxTemp ".
|
||||
"minMoisture ".
|
||||
"maxMoisture ".
|
||||
"sshHost ".
|
||||
$readingFnAttributes;
|
||||
|
||||
|
||||
|
||||
foreach my $d(sort keys %{$modules{XiaomiFlowerSens}{defptr}}) {
|
||||
my $hash = $modules{XiaomiFlowerSens}{defptr}{$d};
|
||||
$hash->{VERSION} = $version;
|
||||
my $hash = $modules{XiaomiFlowerSens}{defptr}{$d};
|
||||
$hash->{VERSION} = $version;
|
||||
}
|
||||
}
|
||||
|
||||
@ -208,8 +216,6 @@ sub XiaomiFlowerSens_stateRequestTimer($) {
|
||||
my $name = $hash->{NAME};
|
||||
|
||||
|
||||
RemoveInternalTimer($hash);
|
||||
|
||||
if( !IsDisabled($name) ) {
|
||||
|
||||
readingsSingleUpdate ( $hash, "state", "active", 1 ) if( (ReadingsVal($name, "state", 0) eq "initialized" or ReadingsVal($name, "state", 0) eq "unreachable" or ReadingsVal($name, "state", 0) eq "corrupted data" or ReadingsVal($name, "state", 0) eq "disabled" or ReadingsVal($name, "state", 0) eq "Unknown" or ReadingsVal($name, "state", 0) eq "charWrite faild") );
|
||||
@ -349,15 +355,29 @@ sub XiaomiFlowerSens_callGatttool($@) {
|
||||
|
||||
my $loop;
|
||||
my $wresp;
|
||||
my $sshHost = AttrVal($name,"sshHost","none");
|
||||
my @readSensData;
|
||||
my @readBatFwData;
|
||||
|
||||
|
||||
$loop = 0;
|
||||
while ( (qx(ps ax | grep -v grep | grep "gatttool -b $mac") and $loop = 0) or (qx(ps ax | grep -v grep | grep "gatttool -b $mac") and $loop < 5) ) {
|
||||
Log3 $name, 4, "Sub XiaomiFlowerSens ($name) - check gattool is running. loop: $loop";
|
||||
sleep 0.5;
|
||||
$loop++;
|
||||
|
||||
if( $sshHost ne 'none') {
|
||||
|
||||
while ( (qx(ssh $sshHost 'ps ax | grep -v grep | grep "gatttool -b $mac"') and $loop = 0) or (qx(ssh $sshHost 'ps ax | grep -v grep | grep "gatttool -b $mac"') and $loop < 5) ) {
|
||||
|
||||
Log3 $name, 4, "Sub XiaomiFlowerSens ($name) - check gattool is running at host $sshHost. loop: $loop";
|
||||
sleep 0.5;
|
||||
$loop++;
|
||||
}
|
||||
} else {
|
||||
|
||||
while ( (qx(ps ax | grep -v grep | grep "gatttool -b $mac") and $loop = 0) or (qx(ps ax | grep -v grep | grep "gatttool -b $mac") and $loop < 5) ) {
|
||||
|
||||
Log3 $name, 4, "Sub XiaomiFlowerSens ($name) - check gattool is running at local host. loop: $loop";
|
||||
sleep 0.5;
|
||||
$loop++;
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
@ -370,8 +390,18 @@ sub XiaomiFlowerSens_callGatttool($@) {
|
||||
|
||||
$loop = 0;
|
||||
do {
|
||||
|
||||
$wresp = qx(gatttool -i $hci -b $mac --char-write-req -a 0x33 -n A01F 2>&1 /dev/null);
|
||||
|
||||
if( $sshHost ne 'none' ) {
|
||||
|
||||
$wresp = qx(ssh $sshHost 'gatttool -i $hci -b $mac --char-write-req -a 0x33 -n A01F 2>&1 /dev/null');
|
||||
Log3 $name, 4, "Sub XiaomiFlowerSens_callGatttool ($name) - write data to host $sshHost";
|
||||
|
||||
} else {
|
||||
|
||||
$wresp = qx(gatttool -i $hci -b $mac --char-write-req -a 0x33 -n A01F 2>&1 /dev/null);
|
||||
Log3 $name, 4, "Sub XiaomiFlowerSens_callGatttool ($name) - write data to local host";
|
||||
}
|
||||
|
||||
$loop++;
|
||||
Log3 $name, 4, "Sub XiaomiFlowerSens_callGatttool ($name) - call gatttool charWrite loop $loop";
|
||||
Log3 $name, 4, "Sub XiaomiFlowerSens_callGatttool ($name) - charWrite wresp: $wresp" if(defined($wresp) and ($wresp) );
|
||||
@ -383,8 +413,18 @@ sub XiaomiFlowerSens_callGatttool($@) {
|
||||
|
||||
$loop = 0;
|
||||
do {
|
||||
|
||||
@readSensData = split(": ",qx(gatttool -i $hci -b $mac --char-read -a 0x35 2>&1 /dev/null));
|
||||
|
||||
if( $sshHost ne 'none' ) {
|
||||
|
||||
@readSensData = split(": ",qx(ssh $sshHost 'gatttool -i $hci -b $mac --char-read -a 0x35 2>&1 /dev/null'));
|
||||
Log3 $name, 4, "Sub XiaomiFlowerSens_callGatttool ($name) - call data from host $sshHost";
|
||||
|
||||
} else {
|
||||
|
||||
@readSensData = split(": ",qx(gatttool -i $hci -b $mac --char-read -a 0x35 2>&1 /dev/null));
|
||||
Log3 $name, 4, "Sub XiaomiFlowerSens_callGatttool ($name) - call data from local host";
|
||||
}
|
||||
|
||||
$loop++;
|
||||
Log3 $name, 4, "Sub XiaomiFlowerSens_callGatttool ($name) - call gatttool charRead loop $loop";
|
||||
|
||||
@ -400,8 +440,18 @@ sub XiaomiFlowerSens_callGatttool($@) {
|
||||
### Read Firmware and Battery Data
|
||||
$loop = 0;
|
||||
do {
|
||||
|
||||
@readBatFwData = split(": ",qx(gatttool -i $hci -b $mac --char-read -a 0x38 2>&1 /dev/null));
|
||||
|
||||
if( $sshHost ne 'none' ) {
|
||||
|
||||
@readBatFwData = split(": ",qx(ssh $sshHost 'gatttool -i $hci -b $mac --char-read -a 0x38 2>&1 /dev/null'));
|
||||
Log3 $name, 4, "Sub XiaomiFlowerSens_callGatttool ($name) - call firm/batt data from host $sshHost";
|
||||
|
||||
} else {
|
||||
|
||||
@readBatFwData = split(": ",qx(gatttool -i $hci -b $mac --char-read -a 0x38 2>&1 /dev/null));
|
||||
Log3 $name, 4, "Sub XiaomiFlowerSens_callGatttool ($name) - call firm/batt data from host local host";
|
||||
}
|
||||
|
||||
$loop++;
|
||||
Log3 $name, 4, "Sub XiaomiFlowerSens ($name) - call gatttool readBatFw loop $loop";
|
||||
|
||||
@ -497,10 +547,20 @@ sub XiaomiFlowerSens_BlockingDone($) {
|
||||
readingsBulkUpdate($hash, "fertility", $response_json->{fertility});
|
||||
readingsBulkUpdate($hash, "firmware", $response_json->{firmware});
|
||||
readingsBulkUpdate($hash, "state", "active") if( ReadingsVal($name,"state", 0) eq "call data" or ReadingsVal($name,"state", 0) eq "unreachable" or ReadingsVal($name,"state", 0) eq "corrupted data" );
|
||||
|
||||
|
||||
readingsEndUpdate($hash,1);
|
||||
|
||||
|
||||
DoTrigger($name, 'minFertility ' . ($response_json->{fertility}<AttrVal($name,'minFertility',0)?'low':'ok')) if( AttrVal($name,'minFertility','none') ne 'none' );
|
||||
DoTrigger($name, 'maxFertility ' . ($response_json->{fertility}>AttrVal($name,'maxFertility',0)?'high':'ok')) if( AttrVal($name,'maxFertility','none') ne 'none' );
|
||||
|
||||
DoTrigger($name, 'minTemp ' . ($response_json->{temp}/10<AttrVal($name,'minTemp',0)?'low':'ok')) if( AttrVal($name,'minTemp','none') ne 'none' );
|
||||
DoTrigger($name, 'maxTemp ' . ($response_json->{temp}/10>AttrVal($name,'maxTemp',0)?'high':'ok')) if( AttrVal($name,'maxTemp','none') ne 'none' );
|
||||
|
||||
DoTrigger($name, 'minMoisture ' . ($response_json->{moisture}<AttrVal($name,'minMoisture',0)?'low':'ok')) if( AttrVal($name,'minMoisture','none') ne 'none' );
|
||||
DoTrigger($name, 'maxMoisture ' . ($response_json->{moisture}>AttrVal($name,'maxMoisture',0)?'high':'ok')) if( AttrVal($name,'maxMoisture','none') ne 'none' );
|
||||
|
||||
|
||||
Log3 $name, 4, "Sub XiaomiFlowerSens_BlockingDone ($name) - Abschluss!";
|
||||
}
|
||||
|
||||
@ -583,17 +643,28 @@ sub XiaomiFlowerSens_BlockingAborted($) {
|
||||
<br>
|
||||
</ul>
|
||||
<br><br>
|
||||
<a name="NUKIDeviceattribut"></a>
|
||||
<a name="XiaomiFlowerSensattribut"></a>
|
||||
<b>Attributes</b>
|
||||
<ul>
|
||||
<li>disable - disables the Nuki device</li>
|
||||
<li>interval - interval in seconds for statusRequest</li>
|
||||
<li>minFertility - min fertility value befor low warn event</li>
|
||||
<li>maxFertility - max fertility value befor High warn event</li>
|
||||
<li>minMoisture - min moisture value befor low warn event</li>
|
||||
<li>maxMoisture - max moisture value befor High warn event</li>
|
||||
<li>minTemp - min temperature value befor low warn event</li>
|
||||
<li>maxTemp - max temperature value befor high warn event
|
||||
<br>
|
||||
Event Example for min/max Value's: 2017-03-16 11:08:05 XiaomiFlowerSens Dracaena minMoisture low<br>
|
||||
Event Example for min/max Value's: 2017-03-16 11:08:06 XiaomiFlowerSens Dracaena maxTemp high</li>
|
||||
<li>sshHost - FQD-Name or IP of ssh remote system / you must configure your ssh system for certificate authentication. For better handling you can config ssh Client wirh .ssh/config file</li>
|
||||
</ul>
|
||||
</ul>
|
||||
|
||||
=end html
|
||||
|
||||
=begin html_DE
|
||||
|
||||
=end html_DE
|
||||
|
||||
=cut
|
||||
|
||||
Loading…
Reference in New Issue
Block a user