iab-Oil 0.1.2

data/lib/VPMSSchemaInterpreter.rb

@@ -0,0 +1,175 @@
+require File.join(File.dirname(__FILE__),'DSLContext')
+require File.join(File.dirname(__FILE__),'VPMSComponentSchemaInterpreter')
+require 'yaml'
+
+#create class that fills in for the RAILS class when rails is not around, e.g. when testing
+#when RAILS is around this will have no effect
+class HashWithIndifferentAccess < Hash
+end
+
+class VPMSSchemaInterpreter < DslContext
+
+  bubble :than, :is, :list, :the, :to, :at, :it, :end
+
+  def getResult
+      getResult = ""
+      getResult << startSchema
+      @erbAry.each do |a|
+        b = a.to_s
+        getResult << "\t"
+        getResult << processXPath(a, b)
+      end
+      getResult << endSchema
+  end
+  
+  def processXPath(*args)
+    processXpath = ""
+    xpath = args[0]
+    boolEndOfPath = (args[0].length == 1)
+      processXpath << "\t"
+      processXpath << startElement(args[0].first, args[1], boolEndOfPath)
+      xpath.delete_at(0)
+      if xpath.length > 0
+        processXpath << startComplexType
+        processXpath << processXPath(xpath, args[1])
+        processXpath << endComplexType
+      end
+      processXpath << endElement
+    processXpath
+  end
+
+  def startSchema
+    #ToDo: Make this a widget - a schema open widget for example
+    openSchema = ""
+    openSchema << "<?xml version=\"1.0\" encoding=\"ISO-8859-1\"?>\n"
+    openSchema << "<xs:schema xmlns:xs=\"http://www.w3.org/2001/XMLSchema\">\n"
+    openSchema
+  end
+
+  def endSchema
+    endSchema = ""
+    endSchema << "</xs:schema>\n"
+    endSchema
+  end
+
+  def startElement(*args)
+    #ToDo: Make this a widget - an element open widget for example
+    openElement = ""
+    openElement << "<xs:element name=\"#{args[0]}\""
+    #ToDo: do something better to get type info - 
+    #if this is the ultimate point in the xpath, this pushes in a data type of string - thats all
+    if (args[2] == true) then
+      openElement << " type=\"xs:string\">\n"
+    else
+      openElement << ">\n"
+    end
+    #ToDo: Read the element type and other atts off the MD hash metadata.
+    #args 1 is the full xpath of the element used potentially to key into the md hash 
+    #Potentially do this if args 2 is true (it's the last xpath step) and use args 1 for the key
+    #args 2 represents a key into a hash
+    #the @metaProps hash for example - see 'coverage'
+    #If there is an entry in that hash for this element's xpath, then a type attribute can be
+    #determined for it and gets used from the md hash - When the element is nesting a ct, there's no type attribute
+    #This key would be used to read off values in that hash, if it is a hash of hashes - 
+    #i.e. if the buildingsCoverSumInsuredAmount key in the metaProps referenced a hash of metadata:
+    #It would also be possible to reference entries for this element in the existing 
+    #xml dictionary, which is keyed on this element's xpath
+    openElement
+  end
+
+  def endElement
+    endElement = ""
+    endElement << "</xs:element>\n"
+    endElement
+  end
+
+  def startComplexType
+    #ToDo: Make this a widget - a schema open widget for example
+    openElement = ""
+    openElement << "<xs:complexType>\n"
+    openElement << startSequence
+    openElement
+  end
+
+  def endComplexType
+    endElement = ""
+    endElement << endSequence
+    endElement << "</xs:complexType>\n"
+    endElement
+  end
+
+  def startSequence
+    #ToDo: Make this a widget - a schema open widget for example
+    openElement = ""
+    openElement << "<xs:sequence>\n"
+    openElement
+  end
+
+  def endSequence
+    endElement = ""
+    endElement << "</xs:sequence>\n"
+    endElement
+  end
+  
+  def coverage(*args)
+    @erbAry = []
+    @metaProps = {}
+    @erb = ""
+    @metaprop = ""
+    @argName = "#{args[0]}"
+    io = open(File.join(COVERAGE_DEF_ROOT,"/#{@argName}PropertyHash"),'r' )
+    @prdhash = YAML::load(io)
+  end
+
+  def endcoverage(*args)
+  end
+
+  def use(*args)
+    
+    h = ""
+    lasth = ""
+    lasta = "" 
+    args.each do |a|
+      unless a.class == Hash
+      lasth = String.new(h)
+      h << "#{a}"
+      lasta = a
+      end
+    end
+    hashname = @argName + h
+    
+    #now figure out whether the last arg above leads to an empty hash
+    #i.e. it is really a single value field
+    #if so backup a level and read the property whose name = the last arg value passed in
+    
+    specificProperty = false    
+    myHash = @prdhash["#{hashname}"].clone
+    if (myHash.length == 1)
+      hashname = @argName + lasth
+      specificProperty = true
+      myHash = @prdhash["#{hashname}"].clone
+    end
+    
+    @erb << myHash["#{'xpath'}"]
+
+     myHash.each do |property, value|
+       if (property != 'xpath' and (property =~ /MD$/) == nil) then
+         if (value == "" && (!specificProperty || (specificProperty && property == "#{lasta}"))) then
+           @erb << "/"
+           @erb << property
+           #In progress
+           #@metaprop = @erb.sub('/', '') stands as an xpath key to the metadata in the 'element properties' hash
+           
+         end
+       end
+     end
+     
+     erbTemp = @erb.split('/')
+     @erbAry.push(erbTemp)
+     @erb = ""
+     
+     #xpaths each now in erbArray
+
+  end
+end
+

data/lib/xslt/VPMSPackageSchemaInterpreter.xsl

@@ -0,0 +1,15 @@
+<?xml version="1.0" encoding="ISO-8859-1"?>
+<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
+	xmlns:xs="http://www.w3.org/2001/XMLSchema" version="1.0">
+	
+	<xsl:output method="xml" encoding="ISO-8859-1" indent="yes" omit-xml-declaration="yes"/>
+
+	<xsl:template match="/">
+		<xsl:apply-templates select="xs:schema"/>
+	</xsl:template>
+
+	<xsl:template match="xs:schema">
+		<xsl:copy-of select="node()"/>
+	</xsl:template>
+	
+</xsl:stylesheet>

data/lib/xslt/VPMSSchemaInterpreter.xsl

@@ -0,0 +1,90 @@
+<?xml version="1.0" encoding="ISO-8859-1"?>
+<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform"
+	xmlns:xs="http://www.w3.org/2001/XMLSchema" version="1.0">
+	<xsl:output method="xml" encoding="ISO-8859-1" indent="yes" omit-xml-declaration="yes"/>
+	
+	<xsl:key match="xs:element" name="allElements" use="@name"/>
+	<xsl:key match="xs:element" name="prevElements" use="concat(../../../../../../../../../@name,../../../../../../@name,../../../@name,@name)"/>
+	
+	<xsl:template match="/">
+		<xsl:call-template name="differentiateSchemaNodes">
+			<xsl:with-param name="ns" select="xs:schema"/>
+		</xsl:call-template>
+	</xsl:template>
+	
+	<xsl:template name="differentiateSchemaNodes">
+		<xsl:param name="ns"/>
+		<xsl:for-each select="$ns/xs:element[count(. | key('allElements', @name)[1]) = 1]">
+			<xsl:apply-templates select="." mode="organiseSchemaNode">
+				<xsl:with-param name="ns" select="$ns"/>
+			</xsl:apply-templates>
+		</xsl:for-each>
+	</xsl:template>
+
+	<xsl:template match="*" mode="organiseSchemaNode">
+		<xsl:param name="ns"/>
+		<xsl:copy>
+			<xsl:apply-templates select="@*"/>
+			<xsl:if test="count(xs:complexType/xs:sequence)">
+				<xs:complexType>
+					<xs:sequence>
+					<xsl:call-template name="differentiateNodes">
+						<xsl:with-param name="ns" select="$ns/xs:element/xs:complexType/xs:sequence"/>
+					</xsl:call-template>
+				</xs:sequence>
+					</xs:complexType>
+			</xsl:if>
+		</xsl:copy>
+	</xsl:template>	
+	
+	<xsl:template name="differentiateNodes">
+		<xsl:param name="ns"/>
+<!--
+		nodes in differentiate nodes is: <xsl:value-of select="count($ns/xs:element)"/>
+		nodeset in differentiate nodes is:
+		<xsl:copy-of select="$ns"/>
+		end nodeset
+-->
+		<xsl:for-each select="$ns/xs:element[count(. | key('allElements', @name)[1]) = 1]">
+			<xsl:apply-templates select="." mode="organiseNode">
+				<xsl:with-param name="ns" select="$ns"/>
+				<xsl:with-param name="nn" select="@name"/>
+			</xsl:apply-templates>
+		</xsl:for-each>
+	</xsl:template>
+
+	<xsl:template match="*" mode="organiseNode">
+		<xsl:param name="ns"/>
+		<xsl:param name="nn"/>
+		<xsl:copy>
+			<xsl:apply-templates select="@*"/>
+			<xsl:if test="count(xs:complexType/xs:sequence)">
+				<xs:complexType>
+				<xs:sequence>
+				<!-- each unique child do 
+				<xsl:value-of select="count($ns/xs:element[@name=$nn])"/>
+				<xsl:value-of select="count($ns/xs:element[@name=$nn]/xs:complexType/xs:sequence/xs:element[count(. | key('prevElements', concat(../../../../../../@name,../../../@name,@name))[1]) = 1])"/>
+				-->
+					
+					<xsl:for-each select="$ns/xs:element[@name=$nn]/xs:complexType/xs:sequence/xs:element[count(. | key('prevElements', concat(../../../../../../../../../@name,../../../../../../@name,../../../@name,@name))[1]) = 1]">
+					<xsl:apply-templates select="." mode="organiseNode">
+						<xsl:with-param name="ns" select="$ns/xs:element[@name=$nn]/xs:complexType/xs:sequence"/>
+						<xsl:with-param name="nn" select="@name"/>
+						</xsl:apply-templates>
+				</xsl:for-each>
+
+					</xs:sequence>
+				</xs:complexType>
+			</xsl:if>
+		</xsl:copy>
+	</xsl:template>	
+
+	<xsl:template match="xs:element" mode="trackPath"><xsl:value-of select="@name"/></xsl:template>
+
+	<xsl:template match="@*|node()">
+		<xsl:copy>
+			<xsl:apply-templates select="@*|node()"/>
+		</xsl:copy>
+	</xsl:template>
+	
+</xsl:stylesheet>

metadata

@@ -0,0 +1,89 @@
+--- !ruby/object:Gem::Specification 
+name: iab-Oil
+version: !ruby/object:Gem::Version 
+  version: 0.1.2
+platform: ruby
+authors: 
+- Gary Mawdsley
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-03-31 00:00:00 -07:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: mime-types
+  type: :runtime
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "1.15"
+    version: 
+- !ruby/object:Gem::Dependency 
+  name: diff-lcs
+  type: :runtime
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 1.1.2
+    version: 
+description: Oil is a RAILS based mini language for Financial Applications
+email: garymawdsley@gmail.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- lib/CollesceProductInterpreter.rb
+- lib/RailsProcessInterpreter.rb
+- lib/CoverageInterpreter2.rb
+- lib/RatingEngineResolver.rb
+- lib/CoverageInterpreter.rb
+- lib/SiteProcessInterpreter.rb
+- lib/DataModelInterpreter.rb
+- lib/VPMSComponentSchemaInterpreter.rb
+- lib/DSLContext.rb
+- lib/VPMSPackageSchemaInterpreter.rb
+- lib/Element.rb
+- lib/VPMSProductSchemaInterpreter.rb
+- lib/LayoutInterpreter.rb
+- lib/VPMSSchemaInterpreter.rb
+- lib/ProductInterpreter2.rb
+- lib/xslt/VPMSPackageSchemaInterpreter.xsl
+- lib/xslt/VPMSSchemaInterpreter.xsl
+has_rdoc: true
+homepage: http://github.com/iab/Oil
+post_install_message: 
+rdoc_options: 
+- --inline-source
+- --charset=UTF-8
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: Oil
+rubygems_version: 1.2.0
+signing_key: 
+specification_version: 2
+summary: Oil is a RAILS based mini language for Financial Applications
+test_files: []
+