#*
## ???? Add standard header
## 
## UML/SysML to OWL schema generator
## 
## 
## 
## 
## ???? generate one schema file per package, to properly support viewpoints
## $file.silentCreate(template, outputFileName, importObject)
##
*#<?xml version="1.0" encoding="ISO-8859-1" ?>

## XML shortcuts
<!DOCTYPE rdf:RDF [
    <!ENTITY owl "http://www.w3.org/2002/07/owl#" >
    <!ENTITY xsd "http://www.w3.org/2001/XMLSchema#" >
    <!ENTITY rdfs "http://www.w3.org/2000/01/rdf-schema#" >
    <!ENTITY rdf "http://www.w3.org/1999/02/22-rdf-syntax-ns#" >
    <!ENTITY amil "http://projects.baesystems.com/META/ontology/2011/6/amil#" >
]>

<rdf:RDF xmlns="http://projects.baesystems.com/META/ontology/2011/6/meta#"
     xml:base="http://projects.baesystems.com/META/ontology/2011/6/meta"
     xmlns:rdfs="http://www.w3.org/2000/01/rdf-schema#"
     xmlns:amil="http://projects.baesystems.com/META/ontology/2011/6/amil#"
     xmlns:owl="http://www.w3.org/2002/07/owl#"
     xmlns:xsd="http://www.w3.org/2001/XMLSchema#"
     xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#">

  <owl:Ontology rdf:about="systemOrPackageName">
##        <owl:versionInfo rdf:datatype="&rdf;PlainLiteral">http://projects.baesystems.com/META/ontology/2011/6/meta</owl:versionInfo>
  </owl:Ontology>
  
#foreach ($class in $Block)
  <owl:Class rdf:about="$class.name">
    <rdfs:label>$class.name</rdfs:label>
#set($baseClassifier = $class.baseClassifier)
#set($size = $baseClassifier.size())
#if($baseClassifier.size() > 0)
    <!-- supertypes -->
#foreach($super in $sorter.humanSort($baseClassifier))
    <rdfs:subClassOf rdf:resource="$super.name"/>
#end
#end## has supertypes
    <!-- association constraints -->
#foreach ($attr in $class.attribute)
#if($attr.association)
#set($association = $attribute.association)
#foreach($member in $attr.association.memberEnd)
##    <!-- etype=$attr.elementType ID=$member.type.ID name=$member.type.name multiplicity=[$member.multiplicity] -->
#end
##
## generate default role names - myClassName
##
#set($roleName = $attr.name)
#if ($attr.name == "")
#set($roleName = "my" + ${attr.type.name})
#end
    <rdfs:subClassOf>
      <owl:Restriction>
        <owl:onProperty rdf:resource="$roleName"/>
##	## 0..1 0..* 1 1..*
#if($attr.multiplicity == "0..1")
        <owl:minCardinality rdf:datatype="&xsd;#nonNegativeInteger">0</owl:minCardinality>
##????        <owl:maxCardinality rdf:datatype="&xsd;#nonNegativeInteger">1</owl:maxCardinality>
#elseif ($attr.multiplicity == "0..*" || $attr.multiplicity == "")
        <owl:minCardinality rdf:datatype="&xsd;#nonNegativeInteger">0</owl:minCardinality>
#elseif ($attr.multiplicity == "1")
        <owl:cardinality rdf:datatype="&xsd;#nonNegativeInteger">1</owl:cardinality>
#elseif ($attr.multiplicity == "1..*")
        <owl:minCardinality rdf:datatype="&xsd;#nonNegativeInteger">1</owl:minCardinality>
#end
      </owl:Restriction>
    </rdfs:subClassOf>
#end## if attr association
#end## foreach class attributes
  </owl:Class> <!-- $class.name -->
    <!-- $class.name attributes -->
## factor out ports - only want descriptive properties in the schema
#foreach ($attr in $class.attribute)
#if(!$attr.association && ($attr.elementType == "property" || $attr.elementType == "attribute" || $attr.elementType == "valueproperty"))
    <owl:DatatypeProperty rdf:about="${class.name}_$attr.name">
      <rdfs:domain rdf:resource="$class.name"/>
      <rdfs:range rdf:resource="#gen_type($attr.type)"/>
    </owl:DatatypeProperty>
#end
#end##attributes
    <!-- $class.name associations -->
#foreach ($attr in $class.attribute)
#if($attr.association)
#set($association = $attribute.association)
#foreach($member in $attr.association.memberEnd)
##    <!-- etype=$attr.elementType ID=$member.type.ID name=$member.type.name multiplicity=[$member.multiplicity] -->
#end
##
## generate default role names - myClassName
##
#set($roleName = $attr.name)
#if ($attr.name == "")
#set($roleName = "my" + ${attr.type.name})
#end
    <owl:ObjectProperty rdf:about = "$roleName">
      <rdfs:domain rdf:resource="$class.name"/>
      <rdfs:range rdf:resource="$attr.type.name"/>
    </owl:ObjectProperty>
#end
#end## end Block


#end

</rdf:RDF>

## generates the base OWL data type for the model type
## ???? enumerations, base data types, filter out Classes
## ???? May need Java support to support hash lookup to map
## SysML unit extensions to OWL data types
#macro (gen_type $type)
#set ($typeMap = $map.createHashMap())
#set ($tmp = $typeMap.put("Integer",  "http://www.w3.org/2001/XMLSchema#integer"))
#set ($tmp = $typeMap.put("integer",  "http://www.w3.org/2001/XMLSchema#integer"))
#set ($tmp = $typeMap.put("long",  "http://www.w3.org/2001/XMLSchema#integer"))
#set ($tmp = $typeMap.put("short",  "http://www.w3.org/2001/XMLSchema#integer"))
#set ($tmp = $typeMap.put("void",  "http://www.w3.org/2001/XMLSchema#integer"))
#set ($tmp = $typeMap.put("int",  "http://www.w3.org/2001/XMLSchema#integer"))
#set ($tmp = $typeMap.put("byte",  "http://www.w3.org/2001/XMLSchema#integer"))
#set ($tmp = $typeMap.put("char",  "http://www.w3.org/2001/XMLSchema#integer"))
#set ($tmp = $typeMap.put("Number",  "http://www.w3.org/2001/XMLSchema#integer"))
#set ($tmp = $typeMap.put("Complex",  "http://www.w3.org/2001/XMLSchema#string"))
#set ($tmp = $typeMap.put("String",  "http://www.w3.org/2001/XMLSchema#string"))
#set ($tmp = $typeMap.put("date",  "http://www.w3.org/2001/XMLSchema#string"))
#set ($tmp = $typeMap.put("Quantity",  "http://www.w3.org/2001/XMLSchema#doube"))
#set ($tmp = $typeMap.put("Rational",  "http://www.w3.org/2001/XMLSchema#double"))
#set ($tmp = $typeMap.put("Boolean",  "http://www.w3.org/2001/XMLSchema#boolean"))
#set ($tmp = $typeMap.put("boolean",  "http://www.w3.org/2001/XMLSchema#boolean"))
#set ($tmp = $typeMap.put("Real",  "http://www.w3.org/2001/XMLSchema#double"))
#set ($tmp = $typeMap.put("double",  "http://www.w3.org/2001/XMLSchema#double"))
#set ($tmp = $typeMap.put("float",  "http://www.w3.org/2001/XMLSchema#double"))
#set ($tmp = $typeMap.put("UnlimitedNatural",  "http://www.w3.org/2001/XMLSchema#integer"))
#set ($tmp = $typeMap.put("",      "http://www.w3.org/2001/XMLSchema#string"))
## Assume any type with a QuantityKind is a double
#if ($type.quantityKind)
#set ($otype = "http://www.w3.org/2001/XMLSchema#double")
#else
#if ($typeMap.containsKey($type.name))
#set ($otype = $typeMap.get($type.name))
#elseif ($type)
#set ($otype = $type.name)
debug2 <$otype>
#else
#set ($otype = "http://www.w3.org/2001/XMLSchema#string")
#end
#end
$otype#end

##<!-- 
##base types               OWL type
##string              http://www.w3.org/2001/XMLSchema#string
##integer            http://www.w3.org/2001/XMLSchema#integer
##double            http://www.w3.org/2001/XMLSchema#double
##boolean            http://www.w3.org/2001/XMLSchema#boolean
## -->