Am 28.06.2013 15:40, schrieb Thomas Parvais:
> Hello
>
> I tried on my Sheevaplug: (perl 5.10.0, owfs/libow 2.8p13), same problem
> than on my Pi:
>
The diff in OWNet.pm between 2.8p13/2.8p15 and latest CVS is
@@ -346,8 +346,8 @@
$self->{SOCK} = undef ;
return ;
} ;
- $self->{ADDR} = $self->{SOCK}->peeraddr ;
- $self->{PORT} = $self->{SOCK}->peerport ;
+ $self->{ADDR} = $self->{SOCK}->peeraddr || return ;
+ $self->{PORT} = $self->{SOCK}->peerport || return ;
return 1 ;
}
@@ -378,7 +378,7 @@
my $length_wanted = shift ;
return '' if $length_wanted == 0 ;
- my $fileno = $self->{SOCK}->fileno ;
+ my $fileno = $self->{SOCK}->fileno or return undef ;
my $selectreadbits = '' ;
vec($selectreadbits,$fileno,1) = 1 ;
@@ -615,6 +615,7 @@
# new MSG_DIRALL method -- single packet
_ToServer($self,$MSG_DIRALL,$DEFAULT_BLOCK_LENGTH,$NO_OFFSET,$path) ||
return ;
my @r = _FromServer($self) ;
+ return if !@r ;
if (@r) {
$self->{SOCK} = undef if $self->{PERSIST} == 0 ;
return $r[6] ;
So at least OWNet should not be the culprit. Could you try with latest
CVS on your PC? With --fake it will work without actual onewire hardware.
Kind regards
Jan
------------------------------------------------------------------------------
This SF.net email is sponsored by Windows:
Build for Windows Store.
http://p.sf.net/sfu/windows-dev2dev
_______________________________________________
Owfs-developers mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/owfs-developers
