iZsh-wwmd 0.2.19

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

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

@@ -0,0 +1,31 @@
+module WWMD
+  class VSStubs::VSTriplet
+    include VSStubHelpers
+
+    attr_accessor :value
+
+    def initialize(obj1,obj2,obj3)
+      @value = []
+      @value << obj1
+      @value << obj2
+      @value << obj3
+    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_type.rb

@@ -0,0 +1,23 @@
+module WWMD
+  class VSStubs::VSType
+    include VSStubHelpers
+
+    attr_accessor :value
+    attr_reader   :typeref
+    attr_reader   :typeval
+
+    def initialize(typeref,typeval)
+      @typeref = typeref
+      @typeval = typeval
+    end
+
+    def serialize
+      super # cheat opcode + typeref + typeval
+    end
+
+    def to_xml
+      super
+    end
+
+  end
+end

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

@@ -0,0 +1,30 @@
+module WWMD
+  class VSStubs::VSUnit
+    include VSStubHelpers
+
+    attr_reader :dword
+    attr_reader :word
+    attr_reader :value
+
+    def initialize(dword,word)
+      @dword = dword
+      @word = word
+      @value = ''
+    end
+
+    def serialize
+      stack = super
+      stack << write_double(self.dword)
+      stack << write_single(self.word)
+      return stack
+    end
+
+    def to_xml
+      xml = super
+      xml.add_attribute("dword",self.dword.to_s)
+      xml.add_attribute("word",self.word.to_s)
+      xml
+    end
+
+  end
+end

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

@@ -0,0 +1,35 @@
+module WWMD
+  class VSStubs::VSValue
+    include VSStubHelpers
+
+    attr_accessor :value
+
+    # gin up all the single byte values
+    def initialize(str)
+      @value = str
+    end
+
+    def to_s
+      @value.hexify
+    end
+
+    def to_sym
+      VIEWSTATE_TYPES[opcode].to_sym
+    end
+
+    def opcode
+      @value
+    end
+
+    def serialize
+      super # cheat... just return opcode
+    end
+
+    def to_xml
+      xml = super
+      xml.add_text(self.to_sym.to_s)
+      xml
+    end
+
+  end
+end