wwmd 0.2.20.3

data/lib/wwmd/viewstate/vs_stubs/vs_hashtable.rb

@@ -0,0 +1,42 @@
+module WWMD
+  class VSStubs::VSHashtable
+    include VSStubHelpers
+
+    attr_accessor :value
+
+    def initialize()
+      @value = []
+    end
+
+    def add(obj1,obj2)
+      @value << [obj1,obj2]
+    end
+
+    def serialize
+      stack = super
+      stack << self.write_7bit_encoded_int(self.size)
+      self.value.each do |k,v|
+        stack << k.serialize
+        stack << v.serialize
+      end 
+      return stack
+    end
+
+    def to_xml
+      xml = super
+      xml.add_attribute("size",self.value.size.to_s)
+      self.value.each do |k,v|
+        pair = REXML::Element.new("Pair")
+        key = REXML::Element.new("Key")
+        key.add_element(k.to_xml)
+        val = REXML::Element.new("Value")
+        val.add_element(v.to_xml)
+        pair.add_element(key)
+        pair.add_element(val)
+        xml.add_element(pair)
+      end
+      xml
+    end
+
+  end
+end

data/lib/wwmd/viewstate/vs_stubs/vs_hybrid_dict.rb

@@ -0,0 +1,42 @@
+module WWMD
+  class VSStubs::VSHybridDict
+    include VSStubHelpers
+
+    attr_accessor :value
+
+    def initialize()
+      @value = []
+    end
+
+    def add(obj1,obj2)
+      @value << [obj1,obj2]
+    end
+
+    def serialize
+      stack = super
+      stack << self.write_7bit_encoded_int(self.size)
+      self.value.each do |k,v|
+        stack << k.serialize
+        stack << v.serialize
+      end
+      return stack
+    end
+
+    def to_xml
+      xml = super
+      xml.add_attribute("size",self.value.size.to_s)
+      self.value.each do |k,v|
+        pair = REXML::Element.new("Pair")
+        key = REXML::Element.new("Key")
+        key.add_element(k.to_xml)
+        val = REXML::Element.new("Value")
+        val.add_element(v.to_xml)
+        pair.add_element(key)
+        pair.add_element(val)
+        xml.add_element(pair)
+      end
+      xml
+    end
+
+  end
+end

data/lib/wwmd/viewstate/vs_stubs/vs_indexed_string.rb

@@ -0,0 +1,6 @@
+module WWMD
+  class VSStubs::VSIndexedString < VSStubs::VSString
+    def serialize; super; end
+    def to_xml; super; end
+  end
+end

data/lib/wwmd/viewstate/vs_stubs/vs_indexed_string_ref.rb

@@ -0,0 +1,24 @@
+module WWMD
+  class VSStubs::VSIndexedStringRef
+    include VSStubHelpers
+
+    attr_reader :value
+
+    def initialize(ref)
+      @value = ref
+    end
+
+    def serialize
+      stack = super
+      stack << self.write_int(@value)
+      return stack
+    end
+
+    def to_xml
+      xml = super
+      xml.add_text(self.value.to_s)
+      xml
+    end
+
+  end
+end

data/lib/wwmd/viewstate/vs_stubs/vs_int_enum.rb

@@ -0,0 +1,27 @@
+module WWMD
+  class VSStubs::VSIntEnum
+    include VSStubHelpers
+
+    attr_accessor :value
+    attr_reader   :typeref
+    attr_reader   :typeval
+
+    def initialize(typeref,typeval,index)
+      @typeref = typeref
+      @typeval = typeval
+      @value = index
+    end
+
+    def serialize
+      stack = super
+      stack << self.write_7bit_encoded_int(self.value)
+    end
+
+    def to_xml
+      xml = super
+      xml.add_text(self.value.to_s)
+      xml
+    end
+
+  end
+end

data/lib/wwmd/viewstate/vs_stubs/vs_list.rb

@@ -0,0 +1,34 @@
+module WWMD
+  class VSStubs::VSList
+    include VSStubHelpers
+
+    attr_accessor :value
+
+    def initialize()
+      @value = []
+    end
+
+    def add(obj)
+      @value << obj
+    end
+
+    def serialize
+      stack = super
+      stack << self.write_7bit_encoded_int(self.size)
+      self.value.each do |v|
+        stack << v.serialize
+      end
+      return stack
+    end
+
+    def to_xml
+      xml = super
+      xml.add_attribute("size",self.value.size.to_s)
+      self.value.each do |v|
+        xml.add_element(v.to_xml)
+      end
+      xml
+    end
+
+  end
+end

data/lib/wwmd/viewstate/vs_stubs/vs_pair.rb

@@ -0,0 +1,29 @@
+module WWMD
+  class VSStubs::VSPair
+    include VSStubHelpers
+
+    attr_accessor :value
+
+    def initialize(obj1,obj2)
+      @value = []
+      @value << obj1
+      @value << obj2
+    end
+
+    def serialize
+      stack = super
+      self.value.each do |v|
+        stack << v.serialize
+      end
+      return stack
+    end
+
+    def to_xml
+      xml = super
+      self.value.each do |v|
+        xml.add_element(v.to_xml)
+      end
+      xml
+    end
+  end
+end

data/lib/wwmd/viewstate/vs_stubs/vs_read_types.rb

@@ -0,0 +1,11 @@
+module WWMD
+  class VSStubs::VSInt16      < VSStubs::VSReadValue; end
+  class VSStubs::VSInt32      < VSStubs::VSReadValue; end
+  class VSStubs::VSByte       < VSStubs::VSReadValue; end
+  class VSStubs::VSChar       < VSStubs::VSReadValue; end
+  class VSStubs::VSDateTime   < VSStubs::VSReadValue; end
+  class VSStubs::VSDouble     < VSStubs::VSReadValue; end
+  class VSStubs::VSSingle     < VSStubs::VSReadValue; end
+  class VSStubs::VSColor      < VSStubs::VSReadValue; end
+  class VSStubs::VSKnownColor < VSStubs::VSReadValue; end
+end

data/lib/wwmd/viewstate/vs_stubs/vs_read_value.rb

@@ -0,0 +1,35 @@
+module WWMD
+  class VSStubs::VSReadValue
+    include VSStubHelpers
+
+    attr_accessor :value
+
+    def initialize(val)
+      @value = val
+    end
+
+    def serialize
+      stack = super
+      case self.to_sym
+        when :int16;       stack << self.write_short(self.value)
+        when :int32;       stack << self.write_7bit_encoded_int(self.value)
+        when :byte;        stack << self.write_byte(self.value)
+        when :char;        stack << self.write_byte(self.value)
+        when :date_time;   stack << self.write_double(self.value)
+        when :double;      stack << self.write_double(self.value)
+        when :single;      stack << self.write_single(self.value)
+        when :color;       stack << self.write_int32(self.value)
+        when :known_color; stack << self.write_7bit_encoded_int(self.value)
+        else; raise "unimplemented #{self.to_sym}"
+      end
+      return stack
+    end
+
+    def to_xml
+      xml = super
+      xml.add_text(self.value.to_s)
+      xml
+    end
+
+  end
+end

data/lib/wwmd/viewstate/vs_stubs/vs_sparse_array.rb

@@ -0,0 +1,58 @@
+module WWMD
+  class VSStubs::VSSparseArray
+    include VSStubHelpers
+
+    attr_accessor :value
+    attr_reader   :typeref
+    attr_reader   :typeval
+    attr_reader   :size
+    attr_reader   :elems
+
+    def initialize(typeref,typeval,size,elems)
+      @typeref = typeref
+      @typeval = typeval
+      @size = size
+      @elems = elems
+      @value = []
+    end
+
+    def add(idx,obj)
+      @value[idx] = obj
+    end
+
+    def serialize
+      stack = super
+      stack << self.write_7bit_encoded_int(self.size)
+      stack << self.write_7bit_encoded_int(self.elems)                             
+      self.value.each_index do |i|
+        next if self.value[i].nil?
+        stack << self.write_7bit_encoded_int(i)
+        stack << self.value[i].serialize
+      end
+      return stack
+    end
+
+    def to_xml
+      xml = super
+      siz = REXML::Element.new("Size")
+      siz.add_text(self.size.to_s)
+      ele = REXML::Element.new("Elements")
+      ele.add_text(self.elems.to_s)
+      xml.add_element(siz)
+      xml.add_element(ele)
+      self.value.each_index do |i|
+        next if self.value[i].nil?
+        pair = REXML::Element.new("Pair")
+        idx = REXML::Element.new("Index")
+        idx.add_text(i.to_s)
+        val = REXML::Element.new("Value")
+        val.add_element(value[i].to_xml)
+        pair.add_element(idx)
+        pair.add_element(val)
+        xml.add_element(pair)
+      end
+      xml
+    end
+
+  end
+end

data/lib/wwmd/viewstate/vs_stubs/vs_string.rb

@@ -0,0 +1,33 @@
+module WWMD
+  class VSStubs::VSString
+    include VSStubHelpers
+
+    attr_accessor :value
+
+    def initialize(val)
+      @value = val
+    end
+
+    def serialize
+      stack = super
+      stack << self.write_7bit_encoded_int(self.size)
+      stack << self.value
+      return stack
+    end
+
+    def to_xml
+      xml = super
+      # emit quoted-printable if we need to
+      if self.value =~ /[^\x20-\x7e]/
+#        xml.add_attribute("encoding","quoted-printable")
+#        xml.add_text(self.value.to_qp)
+        xml.add_attribute("encoding","urlencoded")
+        xml.add_text(self.value.escape(/[^\x20-\x7e]/))
+      else
+        xml.add_text(self.value)
+      end
+      xml
+    end
+
+  end
+end

data/lib/wwmd/viewstate/vs_stubs/vs_string_array.rb

@@ -0,0 +1,39 @@
+module WWMD
+  class VSStubs::VSStringArray
+    include VSStubHelpers
+
+    attr_accessor :value
+
+    def initialize()
+      @value = []
+    end
+
+    def add(obj)
+      @value << obj
+    end
+
+    def serialize
+      stack = super
+      stack << self.write_7bit_encoded_int(self.size)
+      self.value.each do |v|
+        stack << self.write_7bit_encoded_int(v.size)
+        stack << v
+      end
+      return stack
+    end
+
+    def to_xml
+      xml = super
+      xml.add_attribute("size",self.value.size.to_s)
+      self.value.each do |v|
+        xml.add_element(VSStubs::VSString.new(v).to_xml)
+      end
+      xml
+    end
+
+    def from_xml
+# serliazed with VSString (for convenience)
+# make sure not to deserialize the opcode when you write this out
+    end
+  end
+end

data/lib/wwmd/viewstate/vs_stubs/vs_string_formatted.rb

@@ -0,0 +1,32 @@
+module WWMD
+  class VSStubs::VSStringFormatted
+    include VSStubHelpers
+
+    attr_accessor :value
+    attr_reader   :typeref
+    attr_reader   :typeval
+
+    def initialize(typeref,typeval,str)
+      @typeref = typeref
+      @typeval = typeval
+      @value = str
+    end
+
+    def serialize
+      stack = super
+      stack << self.write_7bit_encoded_int(self.size)
+      stack << self.value
+    end
+
+    def to_xml
+      xml = super
+      xml.add_element(VSStubs::VSString.new(self.value).to_xml)
+      xml
+    end
+
+    def from_xml
+# deserialize convenience VSString properly
+    end
+
+  end
+end

data/lib/wwmd/viewstate/vs_stubs/vs_stub_helpers.rb

@@ -0,0 +1,37 @@
+module WWMD
+  module VSStubHelpers
+    include ViewStateUtils
+
+    def to_sym
+      self.class.to_s.split(":").last.gsub(/[A-Z]+/,'\1_\0').downcase[1..-1].gsub(/\Avs/,"").to_sym
+    end
+
+    def opcode
+      return VIEWSTATE_TYPES.index(self.to_sym)
+    end
+
+    def size
+      return @value.size
+    end
+
+    def serialize
+      stack = ""
+      stack << self.write_byte(self.opcode)
+      if self.respond_to?(:typeref)
+        stack << self.serialize_type(self.typeref,self.typeval)
+      end
+      return stack
+    end
+
+    def to_xml
+      xml = REXML::Element.new(self.class.to_s.split(":").last)
+      if self.respond_to?(:typeref)
+        xml.add_attribute("typeref",self.typeref)
+        xml.add_attribute("typeval",self.typeval)
+      end
+#      xml.add_attribute("size",self.size)
+      xml
+    end
+ 
+  end
+end