iab-ActiveRecordBDBXml 0.1.1 → 0.1.2

data/lib/Marshaller.rb

@@ -0,0 +1,224 @@
+# Copyright (c) 2007-2008 Orangery Technology Limited 
+# You can redistribute it and/or modify it under the same terms as Ruby.
+#
+#add method to class that allows access to instantiate method
+#as per rails 1.2
+require 'activerecord'
+require 'cgi'
+class ActiveRecord::Base
+  def self.public_instantiate(myHash)
+    instantiate(myHash)
+  end
+end
+
+module Marshaller
+    def createXMLMessage(relation,params,nvp_format,&block)
+      @pqbNodes = Array.new
+      #dump the hash table rails builds for use in RTE message building test harness
+      #open('garyparams','w') { |f| YAML.dump(params, f) }
+      xml = buildXMLDocFromRailsParms(relation,params,nvp_format,Array.new,"",&block)
+      xml
+    end
+  
+    def buildXMLDocFromRailsParms(nodeName,params,nvp_format,myagg,info,&block)
+      if (myagg.length == 0)
+        xml =  createNode(nodeName.to_s,params,nvp_format,myagg,&block)
+      else
+        xml =  createNode(myagg.to_s,params,nvp_format,myagg,&block)
+      end
+      xml << expandRelationships(:has_one,nodeName,params,nvp_format,myagg,info,&block)
+      xml << expandRelationships(:has_many,nodeName,params,nvp_format,myagg,info,&block)
+
+      xml = "" if !(xml.length > 0)
+      xml = "<#{nodeName}>#{xml}</#{nodeName}>" if (xml.length > 0 and !nvp_format)
+      xml
+  end
+
+  def createNode(table,params,nvp_format,myagg,&block)
+    xml=""
+    values = params[table]
+    if ( values != nil) then
+      fullName = expandedName(myagg)
+      if (values.is_a?(String))
+          if (nvp_format)
+            xml << block.call("#{fullName}Value",values.strip)
+          else
+            xml << block.call("Value",values.strip)
+          end
+      else
+        values.each_key do |key|
+          if (values[key].length > 0)
+            if (nvp_format)
+              xml << block.call("#{fullName}#{key}",values[key])
+            else
+              xml << block.call(key,values[key])
+            end
+          end
+        end
+      end
+    end
+    xml 
+  end       
+   
+  def expandedName(myagg)
+      fullName = ""
+      myagg.each do |a|
+        fullName << "#{a.to_s.gsub(/[0-9]/,"")}_"
+      end
+      fullName
+  end
+
+  def expandRelationships(cardinality,nodeName,params,nvp_format,myagg,info,&block)
+    xml = ""
+    associations = {}
+    #strip out subscripts when accessing the generated data dictionary
+    if (myagg.length == 0)
+     entityName = nodeName.to_s.gsub(/[0-9]/,"")
+    else
+     entityName = myagg.to_s.gsub(/[0-9]/,"")
+    end
+    begin
+      associations = eval("#{entityName}.reflect_on_all_associations(:#{cardinality.id2name})")
+    rescue
+      raise "#{entityName} does not exist - please check the entity and coverage library definitions\nPerhaps you intended:#{info}"
+    end
+    
+    associations.each do |ass|
+      klass = eval(ass.name.id2name)
+      if (myagg.last.to_s.include?("PremiumQuoteBreakdown") and (klass.nodeName == "GrossAmount"))
+        @pqbNodes.push("#{expandedName(myagg)}#{klass.nodeName}")
+      end
+      if (myagg.to_s == "PremiumQuoteBreakdown" and
+            (klass.nodeName == "Amount" or klass.nodeName == "IPTAmount" or klass.nodeName == "IPTPercent" ) )
+        @pqbNodes.push("#{expandedName(myagg)}#{klass.nodeName}")
+      end
+      myagg.push(klass.nodeName)
+      #puts "THE NODENAME:#{nodeN}\n AND THE REAL HASHNAME: #{ass.name.id2name}\n OUR DERIVED EQUIVALENT:#{myagg}"
+      if (cardinality.id2name == "has_one")
+        xml << buildXMLDocFromRailsParms(klass.nodeName,params,nvp_format,myagg,ass.name.id2name,&block)
+      else
+        #make this call as many times as there are instances of this has_many type
+        #make sure we add in the subscript each time into the myagg string first though
+        #use findDimension to look inside the rails dispatcher generated hash table of the http paramaters
+        #to determine the number of entries for a given multiply occuring complex type
+        findDimension(params,myagg).times do |i|
+          myagg.push(myagg.pop.to_s.gsub(/[0-9]/,"")+"#{i}")
+          xml << buildXMLDocFromRailsParms(klass.nodeName,params,nvp_format,myagg,ass.name.id2name,&block)
+        end
+      end
+      myagg.pop
+    end
+    xml
+  end
+  
+  def findDimension(params,myagg)   
+    low = 0
+    high = 50
+
+    while (high-low) > 1
+      middle = (low + high) / 2
+      str = "#{myagg}#{middle}"
+      if hashEntryExists(params,str)
+        low = middle
+      else
+        high = middle
+      end
+    end
+    #indexing starts at 0 so need to add 1 to calculated dimension
+    low = low + 1
+    #puts "DIMENSION for #{myagg} is #{low}"
+    low
+  end
+  
+  def hashEntryExists(params,str)
+    params.each do |key, value|
+      if (key.match(str))
+        return true
+      end
+    end
+    return false
+  end
+
+  def prepareModels(product,xml)
+    #identify model parts for which we have data
+    #and instantiate classes for it
+    @pHashes = {}
+    doc = REXML::Document.new(xml)   
+    xml_node_to_hash([],doc.root_node,product)
+    @pHashes
+  end
+
+  def xml_node_to_hash(path, node,product, parent_namespaces={}) #:nodoc
+    this_node = {}
+    namespaces = parent_namespaces.dup
+    node.attributes.each do |name, value|
+      case name
+      when 'xmlns'
+        (namespaces['@xmlns'] ||= {})['$'] = value
+      when /^xmlns:(.*)/
+        (namespaces['@xmlns'] ||= {})[$1] = value
+      else
+        this_node["@#{name}"] = value
+      end
+    end
+    node.each_child do |child|
+      case child.node_type
+      when :element
+        key, value = child.expanded_name, xml_node_to_hash(path.clone.push(child.expanded_name),child, product, namespaces)
+      when :text
+        if unescape(child.to_s).strip.length > 0
+          pn,en = "#{path.pop}","#{path}".gsub(product,'')
+          #puts "VALUES are:#{en},#{pn}=#{unescape(child.to_s).strip}"
+          collectValue(child,en,pn)
+        end
+        key, value = '$', unescape(child.to_s).strip
+        next if value.empty?
+      end
+      current = this_node[key]
+      case current
+      when Array
+        this_node[key] << value
+      when nil
+        this_node[key] = value
+      else
+        this_node[key] = [current.dup, value]
+      end
+    end
+    return this_node.merge(namespaces)
+ end
+ 
+ def collectValue(child,en,pn)
+  #there are issues with this approach to multi-occ returns
+  #this will get the client stuff running
+  #will now switch to using the cardinalities in the model
+  #by stepping up one level in the tree and reviewing all cardinalties of
+  #contained relations which will include the current subject
+  if (!@pHashes.has_key?(en))
+    @pHashes[en] = HashWithIndifferentAccess.new
+    @pHashes[en][pn] = unescape(child.to_s).strip
+  else
+    if @pHashes[en].is_a?(Array)
+      if (!@pHashes[en][@pHashes[en].length-1].has_key?(pn))
+        @pHashes[en][@pHashes[en].length-1][pn] = unescape(child.to_s).strip
+      else
+        h = HashWithIndifferentAccess.new
+        h[pn] = unescape(child.to_s).strip
+        @pHashes[en].push(h)
+      end
+    elsif @pHashes[en][pn]
+      existingHash = @pHashes[en]
+      @pHashes[en] = Array.new
+      @pHashes[en].push(existingHash)
+      h = HashWithIndifferentAccess.new
+      h[pn] = unescape(child.to_s).strip
+      @pHashes[en].push(h)
+    else
+      @pHashes[en][pn] = unescape(child.to_s).strip
+    end
+  end
+ end
+ 
+ def unescape(str)
+  return CGI.unescapeHTML(str)
+ end
+end

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification 
 name: iab-ActiveRecordBDBXml
 version: !ruby/object:Gem::Version 
-  version: 0.1.1
+  version: 0.1.2
 platform: ruby
 authors: 
 - Gary Mawdsley
@@ -40,8 +40,8 @@ extensions: []
 
 extra_rdoc_files: []
 
-files: []
-
+files: 
+- lib/Marshaller.rb
 has_rdoc: true
 homepage: http://github.com/iab/ActiveRecordBDBXml
 post_install_message: