2
0
mirror of https://github.com/fhem/fhem-mirror.git synced 2025-03-03 16:56:54 +00:00

Merge branch 'owx_async_protothreads'

git-svn-id: https://svn.fhem.de/fhem/trunk@5863 2b470e98-0d58-463d-a4d8-8e2adae1ed80
This commit is contained in:
ntruchsess 2014-05-14 21:17:18 +00:00
parent 5e717b602c
commit eee034f149

View File

@ -160,19 +160,12 @@ sub pt_execute($$$$$$$) {
$self->reset() if ($reset);
$writedata = "" unless defined $writedata;
if (defined $writedata or $numread) {
my $select;
#-- has match ROM part
if( $dev ){# command => EXECUTE,
# context => $context,
# reset => $reset,
# address => $owx_dev,
# writedata => $data,
# numread => $numread,
# delay => $delay
if( $dev ) {
#-- ID of the device
my $owx_rnf = substr($dev,3,12);
@ -185,10 +178,13 @@ sub pt_execute($$$$$$$) {
for(my $i=0;$i<8;$i++){
$rom_id[$i]=hex(substr($dev,2*$i,2));
}
$select=sprintf("\x55%c%c%c%c%c%c%c%c",@rom_id).$writedata;
$select=sprintf("\x55%c%c%c%c%c%c%c%c",@rom_id);
#-- has no match ROM part, issue skip ROM command (0xCC:)
} else {
$select="\xCC".$writedata;
$select="\xCC";
}
if (defined $writedata) {
$select.=$writedata;
}
#-- has receive data part
if( $numread ) {
@ -203,6 +199,7 @@ sub pt_execute($$$$$$$) {
main::Log3($self->{name},3,"OWX_SER::Execute: Sending out ".unpack ("H*",$select));
}
$self->block($select);
}
PT_WAIT_UNTIL($self->response_ready());