<xsl:stylesheet version="1.0" xmlns:xsl="http://www.w3.org/1999/XSL/Transform" xmlns:saxon="http://icl.com/saxon" extension-element-prefixes="saxon" xmlns:gml="http://www.opengis.net/gml" xmlns="http://www.canri.nsw.gov.au/schema">
	<!--
   arcimsWMSResponseTranslator.xsl

    Last Updated   - 15-Sep-2006
    Updated By     - Trem Stamp
    
    An update to the previous stylesheet written by Andrew Hallam (WMSGetFeatureInfoAXL_to_GML.xsl).
    Converts ArcXML from ArcInfo V.9 feature information into a generic GML GetFeatureInfo response.

    Replaces the file $TOMCAT/webapps/wmsconnector/WEB-INF/classes/wms/stylesheets/wms_featureinfo_xml.xsl
-->
	<xsl:output method="xml" indent="yes"/>
	<xsl:variable name="featureIdColumnName1">_ID_</xsl:variable>
	<xsl:variable name="featureIdColumnName2">_LAYERID_</xsl:variable>
	<xsl:template match="/">
		<xsl:element name="gml:featureCollection" namespace="http://www.opengis.net/gml">
			<xsl:apply-templates select="//FIELDS"/>
		</xsl:element>
	</xsl:template>
	<!-- For each FIELDS element in the ArcXML response use the @attributes name as the element name.  -->
	<xsl:template match="FIELDS">
		<!-- Use the  xsl:when elements to identify database columns that must 
        never be displayed in the output XML document. The database column 
        name is stored as the FIELDS/@attribute.
        -->
		<xsl:element name="gml:featureMember">
			<!-- Create a generic feature type element with an fid attribute.  For now this assumes it uses the _ID_ attribute value -->
			<xsl:variable name="fieldName">
				<xsl:value-of select="@_ID_"/>
			</xsl:variable>
			<xsl:attribute name="fid"><xsl:value-of select="$fieldName"/></xsl:attribute>
			<xsl:element name="feature" namespace="http://www.canri.nsw.gov.au/schema">
				<xsl:apply-templates select="attribute::*" mode="processFields"/>
			</xsl:element>
		</xsl:element>
	</xsl:template>
	<!-- Processes all of the attributes belonging to a FIELDS -->
	<xsl:template match="attribute::*" mode="processFields">
		<xsl:variable name="attrName">
			<xsl:value-of select="local-name(.)"/>
		</xsl:variable>
		<xsl:choose>
			<xsl:when test="contains($attrName, $featureIdColumnName1)"/>
			<xsl:when test="contains($attrName, $featureIdColumnName2)"/>
			<xsl:when test="contains($attrName, '#SHAPE#') "/>
			<xsl:when test="contains($attrName, '_SHAPE_') "/>
			<xsl:otherwise>
				<xsl:variable name="shortFieldName">
					<xsl:call-template name="extractShortFieldName">
						<xsl:with-param name="longFieldName" select="$attrName"/>
					</xsl:call-template>
				</xsl:variable>
				<xsl:element name="{$shortFieldName}">
					<xsl:value-of select="."/>
				</xsl:element>
			</xsl:otherwise>
		</xsl:choose>
	</xsl:template>
	<!--  Named template that accepts a parameter containing a fully qualified
    database column name remove all leading database schema and table
    names. e.g. "NSWGEN.SP_IBRA.STATE" becomes "STATE".
    -->
	<xsl:template name="extractShortFieldName">
		<xsl:param name="longFieldName"/>
		<xsl:choose>
			<xsl:when test="contains($longFieldName, '.')">
				<xsl:variable name="processedFieldName">
					<xsl:value-of select="substring-after($longFieldName, '.')"/>
				</xsl:variable>
				<!-- If there is still a dot separator in the processed field name 
                recursively call this template. -->
				<xsl:if test="contains($processedFieldName, '.')">
					<xsl:call-template name="extractShortFieldName">
						<xsl:with-param name="longFieldName" select="$processedFieldName"/>
					</xsl:call-template>
				</xsl:if>
				<!-- Return the value after the first period in the field name. -->
				<xsl:value-of select="substring-after($processedFieldName, '.')"/>
			</xsl:when>
			<xsl:otherwise>
				<xsl:value-of select="$longFieldName"/>
			</xsl:otherwise>
		</xsl:choose>
	</xsl:template>
</xsl:stylesheet>