Libguestfs - Dec 2011 - [hivex] [PATCH 7/8] ruby: Add unit test for new RLenValue type

Signed-off-by: Alex Nelson <ajnelson at cs.ucsc.edu>
---
 ruby/tests/tc_120_rlenvalue.rb |   46 ++++++++++++++++++++++++++++++++++++++++
 1 files changed, 46 insertions(+), 0 deletions(-)
 create mode 100644 ruby/tests/tc_120_rlenvalue.rb

diff --git a/ruby/tests/tc_120_rlenvalue.rb b/ruby/tests/tc_120_rlenvalue.rb
new file mode 100644
index 0000000..ff920af
--- /dev/null
+++ b/ruby/tests/tc_120_rlenvalue.rb
@@ -0,0 +1,46 @@
+# hivex Ruby bindings -*- ruby -*-
+# Copyright (C) 2009-2011 Red Hat Inc.
+#
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software
+# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
+
+# Demonstrate value_data_cell_offset by looking at the value data at
+# "\$$$PROTO.HIV\ModerateValueParent\33Bytes", verified to be at file
+# offset 8680 (0x21e8) of the hive rlenvalue_test_hive.  The returned
+# length and offset for this value cell should be 37 bytes, position
+# 8712.
+
+require 'test/unit'
+$:.unshift(File::join(File::dirname(__FILE__), "..",
"lib"))
+$:.unshift(File::join(File::dirname(__FILE__), "..", "ext",
"hivex"))
+require 'hivex'
+
+class TestRLenValue < Test::Unit::TestCase
+  def test_RLenValue
+    h = Hivex::open("../images/rlenvalue_test_hive", {})
+    assert_not_nil (h)
+
+    root = h.root ()
+    assert_not_nil (root)
+
+    moderate_value_node = h.node_get_child (root,
"ModerateValueParent")
+    assert_not_nil (moderate_value_node)
+
+    moderate_value_value = h.node_get_value (moderate_value_node,
"33Bytes")
+
+    r = h.value_data_cell_offset (moderate_value_value)
+    assert_equal (r[:len], 37)
+    assert_equal (r[:off], 8712)
+  end
+end
-- 
1.7.6.4