From 3285dcb4a7ee194d04e84fc7bd794653509a1e76 Mon Sep 17 00:00:00 2001
From: Sage Weil <sage@redhat.com>
Date: Wed, 31 Aug 2016 11:19:29 -0400
Subject: [PATCH] script/bdev_grep: update to use hex

Signed-off-by: Sage Weil <sage@redhat.com>
---
 src/script/bdev_grep.pl | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/src/script/bdev_grep.pl b/src/script/bdev_grep.pl
index 42df2a66f01..f5a316b4f97 100755
--- a/src/script/bdev_grep.pl
+++ b/src/script/bdev_grep.pl
@@ -6,13 +6,13 @@ while (<>) {
     #    next unless / \d\d bdev /;
     my $rest = $_;
     my @hit;
-    while ($rest =~ /(\d+)~(\d+)/) {
-	my ($o, $l) = $rest =~ /(\d+)~(\d+)/;
+    while ($rest =~ /([\da-f]+)~([\da-f]+)/) {
+	my ($o, $l) = $rest =~ /([\da-f]+)~([\da-f]+)/;
 	$rest = $';
-	if ($offset >= $o &&
-	    $offset < $o + $l) {
-	    my $rel = $offset - $o;
-	    push(@hit, $rel);
+	if (hex($offset) >= hex($o) &&
+	    hex($offset) < hex($o) + hex($l)) {
+	    my $rel = hex($offset) - hex($o);
+	    push(@hit, sprintf("%x",$rel));
 	}
     }
     print join(',',@hit) . "\t$_" if @hit;
-- 
2.47.3