Changeset 117

Timestamp:

12/16/06 22:31:00 (2 years ago)

Author:

kindlund

Message:

Minor edits.

Files:

• honeyclient/branches/bug/42/lib/HoneyClient/Agent/Integrity/Registry/Parser.pm (modified) (3 diffs)
• honeyclient/branches/bug/42/lib/HoneyClient/Agent/Integrity/Registry/Parser.yp (modified) (1 diff)
• honeyclient/branches/bug/42/t/test_registry/after.reg (modified) (1 prop)
• honeyclient/branches/bug/42/t/test_registry/before.reg (modified) (1 prop)
• honeyclient/branches/bug/42/t/test_registry/dump.reg (modified) (1 prop)

honeyclient/branches/bug/42/lib/HoneyClient/Agent/Integrity/Registry/Parser.pm

@@ -692 +692 @@
-# see the Search::Binary POD documentation.
-#
-arrayref
+parser
-# Outputs: comparison, last_valid_array_index
-sub _search {
@@ -1365 +1365 @@
-    $Data::Dumper::Terse = 1;
-    $Data::Dumper::Indent = 0;
-    # TODO: change this to debug.
-    $LOG->debug(Dumper(\%args));
-    # TODO: delete these.
-    $LOG->debug(Dumper($self->YYData->{'group_index_offsets'}));
-    $LOG->debug(Dumper($self->YYData->{'group_index_linenums'}));
-
-    # Sanity check, don't continue, unless absolute_offset or absolute_linennum
@@ -1462 +1458 @@
-        return $found_linenum;
-    } else {
-        # TODO: Change this to debug, eventually.
-        $LOG->debug("Seeking parser to nearest earlier group offset (" . $found_offset . ").");
-        return $found_offset;

honeyclient/branches/bug/42/lib/HoneyClient/Agent/Integrity/Registry/Parser.yp

@@ -537 +537 @@
-# see the Search::Binary POD documentation.
-#
-arrayref
+parser
-# Outputs: comparison, last_valid_array_index
-sub _search {