ctdo
/
crashtest-r0ket
16
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

mesh/dbg.pl: parse new release no from time packet

This commit is contained in:
Stefan `Sec` Zehl 2012-01-27 00:04:41 +01:00
parent b53f11bf7e
commit 2e27a60d19
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
tools/mesh/dbg.pl
View File

@ -137,8 +137,9 @@ if($cmd =~ /^r/){
print "t="; print "t=";
# print unpack("N",substr($str,2,4))," "; # print unpack("N",substr($str,2,4))," ";
print strftime("%Y-%m-%d %H:%M:%S",gmtime unpack("N",substr($str,2,4))); print strftime("%Y-%m-%d %H:%M:%S",gmtime unpack("N",substr($str,2,4)));
printf " (%+3d) ",unpack("N",substr($str,2,4))-(time+3600); printf " (%+3d)",unpack("N",substr($str,2,4))-(time+3600);
print "beacon=",resolvebeacon(unpack("H*",substr($str,26,4)))," "; print " rel=",unpack("H*",substr($str,24,2));
print " beacon=",resolvebeacon(unpack("H*",substr($str,26,4)))," ";
}elsif($i eq "i"){ }elsif($i eq "i"){
print "score=",unpack("N",substr($str,2,4))," "; print "score=",unpack("N",substr($str,2,4))," ";
print "nick=",unpack("Z*",substr($str,6,length($str)-8))," "; print "nick=",unpack("Z*",substr($str,6,length($str)-8))," ";