subsurface/xslt/uddf-export.xslt
Martin Long b462a8da35 Separate out buddies into individual entities when exporting to UDDF.
Part of a series bringing UDDF export closer to the UDDF standard, as
per www.uddf.org.

Currently when exporting to UDDF buddy entities are created
one-per-unique-combination. This means that a group of buddies on a dive
are exported as a single buddy, with the names comma separated.

This patch identifies all unique buddies, whether used independently or
along with other buddies on a dive. They are then linked independently
on each profile.

It also uses the UDDF standard <link ref=""> instead of
<buddy_ref ref="">

Signed-off-by: Marton Long <martin@longhome.co.uk>
Signed-off-by: Dirk Hohndel <dirk@hohndel.org>
2014-12-10 08:13:54 -07:00

564 lines
21 KiB
HTML

<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" xmlns:xt="http://www.jclark.com/xt"
extension-element-prefixes="xt" version="1.0">
<xsl:include href="commonTemplates.xsl"/>
<xsl:strip-space elements="*"/>
<xsl:output method="xml" encoding="utf-8" indent="yes"/>
<xsl:key name="gases" match="cylinder" use="concat(substring-before(@o2, '.'), '/', substring-before(@he, '.'))" />
<xsl:key name="images" match="picture" use="concat(../../dive/@number|../dive/@number, ':', @filename, '@', @offset)" />
<xsl:template match="/divelog/dives">
<uddf version="3.2.0">
<generator>
<manufacturer id="subsurface">
<name>Subsurface Team</name>
<contact>http://subsurface-divelog.org/</contact>
</manufacturer>
<version>
<xsl:value-of select="/divelog/@version"/>
</version>
<xsl:if test="/divelog/generator/@date != ''">
<datetime>
<xsl:value-of select="concat(/divelog/generator/@date, 'T', /divelog/generator/@time)"/>
</datetime>
</xsl:if>
</generator>
<mediadata>
<xsl:for-each select="//picture[generate-id() = generate-id(key('images', concat(../../dive/@number|../dive/@number, ':', @filename, '@', @offset))[1])]">
<image id="{concat(../../dive/@number|../dive/@number, ':', @filename, '@', @offset)}">
<objectname>
<xsl:value-of select="@filename"/>
</objectname>
</image>
</xsl:for-each>
</mediadata>
<diver>
<owner id="1">
<equipment>
<xsl:for-each select="/divelog/settings/divecomputerid">
<divecomputer id="{./@deviceid}">
<name>
<xsl:choose>
<xsl:when test="./@nickname != ''">
<xsl:value-of select="./@nickname"/>
</xsl:when>
<xsl:otherwise>
<xsl:value-of select="./@model"/>
</xsl:otherwise>
</xsl:choose>
</name>
<model>
<xsl:value-of select="./@model"/>
</model>
</divecomputer>
</xsl:for-each>
</equipment>
</owner>
<xsl:variable name="buddylist">
<xsl:for-each select="//buddy">
<xsl:call-template name="tokenize">
<xsl:with-param name="string" select="." />
<xsl:with-param name="delim" select="', '" />
</xsl:call-template>
</xsl:for-each>
</xsl:variable>
<xsl:for-each select="xt:node-set($buddylist)/token[generate-id() = generate-id(key('tokenkey', .)[1])]">
<xsl:sort select="." />
<buddy>
<xsl:attribute name="id">
<xsl:value-of select="."/>
</xsl:attribute>
<personal>
<first_name>
<xsl:value-of select="."/>
</first_name>
</personal>
</buddy>
</xsl:for-each>
</diver>
<xsl:apply-templates select="//location"/>
<!-- Define all the unique gases found in the dive log -->
<gasdefinitions>
<!-- Get unique gas mixes from all the recorded dives -->
<xsl:for-each select="dive/cylinder[generate-id() = generate-id(key('gases', concat(substring-before(@o2, '.'), '/', substring-before(@he, '.')))[1])]">
<xsl:variable name="o2">
<xsl:choose>
<xsl:when test="@o2 != ''">
<xsl:value-of select="substring-before(@o2, '.')"/>
</xsl:when>
<xsl:otherwise>
<xsl:value-of select="'21'"/>
</xsl:otherwise>
</xsl:choose>
</xsl:variable>
<xsl:variable name="he">
<xsl:choose>
<xsl:when test="@he != ''">
<xsl:value-of select="substring-before(@he, '.')"/>
</xsl:when>
<xsl:otherwise>
<xsl:value-of select="'0'"/>
</xsl:otherwise>
</xsl:choose>
</xsl:variable>
<!-- The gas definitions will have the o2 percentage as mix ID
to ease up the reference on switchmix events. Thus we can
just use the same references used internally on
Subsurface.
-->
<mix id="{$o2}">
<name>
<xsl:value-of select="concat($o2, '/', $he)"/>
</name>
<o2>
<xsl:value-of select="$o2"/>
</o2>
<he>
<xsl:value-of select="$he"/>
</he>
</mix>
</xsl:for-each>
</gasdefinitions>
<profiledata>
<xsl:for-each select="trip">
<repetitiongroup id="{generate-id(.)}">
<xsl:apply-templates select="dive"/>
</repetitiongroup>
</xsl:for-each>
<xsl:for-each select="dive">
<repetitiongroup id="{generate-id(.)}">
<xsl:apply-templates select="."/>
</repetitiongroup>
</xsl:for-each>
</profiledata>
</uddf>
</xsl:template>
<xsl:key name="tokenkey" match="token" use="." />
<xsl:template name="tokenize">
<xsl:param name="string" />
<xsl:param name="delim" />
<xsl:choose>
<xsl:when test="contains($string, $delim)">
<token><xsl:value-of select="substring-before($string, $delim)" /></token>
<xsl:call-template name="tokenize">
<xsl:with-param name="string" select="substring-after($string,$delim)" />
<xsl:with-param name="delim" select="$delim" />
</xsl:call-template>
</xsl:when>
<xsl:otherwise>
<token><xsl:value-of select="$string" /></token>
</xsl:otherwise>
</xsl:choose>
</xsl:template>
<xsl:key name="location" match="location" use="."/>
<xsl:template match="location">
<xsl:if test="generate-id() = generate-id(key('location', normalize-space(.)))">
<dive_site>
<xsl:attribute name="id">
<xsl:value-of select="."/>
</xsl:attribute>
<name>
<xsl:value-of select="."/>
</name>
<geography>
<location>
<xsl:value-of select="."/>
</location>
<gps>
<latitude>
<xsl:value-of select="substring-before(@gps, ' ')"/>
</latitude>
<longitude>
<xsl:value-of select="substring-after(@gps, ' ')"/>
</longitude>
</gps>
</geography>
</dive_site>
</xsl:if>
</xsl:template>
<xsl:template match="dive">
<dive id="{generate-id(.)}">
<informationbeforedive>
<xsl:if test="temperature/@air|divetemperature/@air != ''">
<airtemperature>
<xsl:value-of select="format-number(substring-before(temperature/@air|divetemperature/@air, ' ') + 273.15, '0.00')"/>
</airtemperature>
</xsl:if>
<datetime>
<xsl:value-of select="concat(./@date, 'T', ./@time)"/>
</datetime>
<divenumber>
<xsl:value-of select="./@number"/>
</divenumber>
<xsl:variable name="buddylist">
<xsl:for-each select="buddy">
<xsl:call-template name="tokenize">
<xsl:with-param name="string" select="." />
<xsl:with-param name="delim" select="', '" />
</xsl:call-template>
</xsl:for-each>
</xsl:variable>
<xsl:for-each select="xt:node-set($buddylist)/token[generate-id() = generate-id(key('tokenkey', .)[1])]">
<xsl:sort select="." />
<link>
<xsl:attribute name="ref">
<xsl:value-of select="."/>
</xsl:attribute>
</link>
</xsl:for-each>
<xsl:if test="location != ''">
<dive_site_ref>
<xsl:attribute name="ref">
<xsl:value-of select="location"/>
</xsl:attribute>
</dive_site_ref>
</xsl:if>
</informationbeforedive>
<samples>
<xsl:for-each select="divecomputer[1]/event | divecomputer[1]/sample">
<xsl:sort select="substring-before(@time, ':') * 60 + substring-before(substring-after(@time, ':'), ' ')" data-type="number" order="ascending"/>
<xsl:variable name="events">
<xsl:value-of select="count(preceding-sibling::event)"/>
</xsl:variable>
<xsl:choose>
<xsl:when test="name() = 'event'">
<xsl:variable name="position">
<xsl:value-of select="position()"/>
</xsl:variable>
<!-- Times of surrounding waypoints -->
<xsl:variable name="timefirst">
<xsl:choose>
<xsl:when test="../sample[position() = $position - 1 - $events]/@time != ''">
<xsl:call-template name="time2sec">
<xsl:with-param name="time">
<xsl:value-of select="../sample[position() = $position - 1 - $events]/@time"/>
</xsl:with-param>
</xsl:call-template>
</xsl:when>
<xsl:otherwise>
<xsl:value-of select="0"/>
</xsl:otherwise>
</xsl:choose>
</xsl:variable>
<xsl:variable name="timesecond">
<xsl:choose>
<xsl:when test="../sample[position() = $position - $events]/@time != ''">
<xsl:call-template name="time2sec">
<xsl:with-param name="time">
<xsl:value-of select="../sample[position() = $position - $events]/@time"/>
</xsl:with-param>
</xsl:call-template>
</xsl:when>
<xsl:otherwise>
<xsl:value-of select="0"/>
</xsl:otherwise>
</xsl:choose>
</xsl:variable>
<!-- Depths of surrounding waypoints -->
<xsl:variable name="depthfirst">
<xsl:choose>
<xsl:when test="../sample[position() = $position - 1 - $events]/@depth != ''">
<xsl:call-template name="depth2mm">
<xsl:with-param name="depth">
<xsl:value-of select="../sample[position() = $position - 1 - $events]/@depth"/>
</xsl:with-param>
</xsl:call-template>
</xsl:when>
<xsl:otherwise>
<xsl:value-of select="0"/>
</xsl:otherwise>
</xsl:choose>
</xsl:variable>
<xsl:variable name="depthsecond">
<xsl:choose>
<xsl:when test="../sample[position() = $position - $events]/@depth != ''">
<xsl:call-template name="depth2mm">
<xsl:with-param name="depth">
<xsl:value-of select="../sample[position() = $position - $events]/@depth"/>
</xsl:with-param>
</xsl:call-template>
</xsl:when>
<xsl:otherwise>
<xsl:value-of select="0"/>
</xsl:otherwise>
</xsl:choose>
</xsl:variable>
<xsl:variable name="time">
<xsl:value-of select="substring-before(@time, ':') * 60 + substring-before(substring-after(@time, ':'), ' ')"/>
</xsl:variable>
<xsl:if test="$timesecond != $time">
<waypoint>
<depth>
<xsl:call-template name="approximatedepth">
<xsl:with-param name="timefirst">
<xsl:value-of select="$timefirst"/>
</xsl:with-param>
<xsl:with-param name="timesecond">
<xsl:value-of select="$timesecond"/>
</xsl:with-param>
<xsl:with-param name="depthfirst">
<xsl:value-of select="$depthfirst"/>
</xsl:with-param>
<xsl:with-param name="depthsecond">
<xsl:value-of select="$depthsecond"/>
</xsl:with-param>
<xsl:with-param name="timeevent">
<xsl:call-template name="time2sec">
<xsl:with-param name="time">
<xsl:value-of select="@time"/>
</xsl:with-param>
</xsl:call-template>
</xsl:with-param>
</xsl:call-template>
</depth>
<divetime><xsl:value-of select="$time"/></divetime>
<xsl:if test="@name = 'gaschange'">
<switchmix>
<xsl:attribute name="ref">
<xsl:value-of select="@value"/>
</xsl:attribute>
</switchmix>
</xsl:if>
<xsl:if test="@name = 'heading'">
<heading>
<xsl:value-of select="@value"/>
</heading>
</xsl:if>
<xsl:if test="not(@name = 'heading') and not(@name = 'gaschange')">
<alarm>
<xsl:value-of select="@name"/>
</alarm>
</xsl:if>
</waypoint>
</xsl:if>
</xsl:when>
<xsl:otherwise>
<!-- Recorded waypoints and events occurring at the exact same time -->
<waypoint>
<depth>
<xsl:value-of select="substring-before(./@depth, ' ')"/>
</depth>
<divetime>
<xsl:call-template name="time2sec">
<xsl:with-param name="time">
<xsl:value-of select="./@time"/>
</xsl:with-param>
</xsl:call-template>
</divetime>
<xsl:if test="./@pressure != ''">
<tankpressure>
<xsl:value-of select="substring-before(./@pressure, ' ') * 100000"/>
</tankpressure>
</xsl:if>
<xsl:if test="./@temp != ''">
<temperature>
<xsl:value-of select="format-number(substring-before(./@temp, ' ') + 273.15, '0.00')"/>
</temperature>
</xsl:if>
<xsl:variable name="time">
<xsl:value-of select="@time"/>
</xsl:variable>
<xsl:for-each select="preceding-sibling::event[@time = $time and @name='gaschange']/@value">
<switchmix>
<xsl:attribute name="ref">
<xsl:value-of select="."/>
</xsl:attribute>
</switchmix>
</xsl:for-each>
<xsl:for-each select="preceding-sibling::event[@time = $time and @name='heading']/@value">
<heading>
<xsl:value-of select="."/>
</heading>
</xsl:for-each>
<xsl:for-each select="preceding-sibling::event[@time = $time and not(@name='heading' or @name='gaschange')]/@name">
<alarm>
<xsl:value-of select="."/>
</alarm>
</xsl:for-each>
<!-- Recorded waypoints -->
</waypoint>
</xsl:otherwise>
</xsl:choose>
</xsl:for-each>
</samples>
<xsl:for-each select="cylinder">
<tankdata>
<link>
<xsl:attribute name="ref">
<xsl:choose>
<xsl:when test="@o2 != ''">
<xsl:value-of select="substring-before(@o2, '.')"/>
</xsl:when>
<xsl:otherwise>
<xsl:value-of select="'21'"/>
</xsl:otherwise>
</xsl:choose>
</xsl:attribute>
</link>
<xsl:if test="@size">
<tankvolume>
<xsl:value-of select="substring-before(@size, ' ')"/>
</tankvolume>
</xsl:if>
<xsl:choose>
<xsl:when test="divecomputer[1]/sample/@pressure != ''">
<tankpressurebegin>
<xsl:value-of select="substring-before(divecomputer[1]/sample/@pressure[1], ' ') * 100000"/>
</tankpressurebegin>
</xsl:when>
<xsl:otherwise>
<xsl:if test="@start">
<tankpressurebegin>
<xsl:value-of select="substring-before(@start, ' ') * 100000"/>
</tankpressurebegin>
</xsl:if>
</xsl:otherwise>
</xsl:choose>
<xsl:choose>
<xsl:when test="count(divecomputer[1]/sample[@pressure]) &gt; 0">
<tankpressureend>
<xsl:value-of select="substring-before(divecomputer[1]/sample[@pressure][last()]/@pressure, ' ') * 100000"/>
</tankpressureend>
</xsl:when>
<xsl:otherwise>
<xsl:if test="@end">
<tankpressureend>
<xsl:value-of select="substring-before(@end, ' ') * 100000"/>
</tankpressureend>
</xsl:if>
</xsl:otherwise>
</xsl:choose>
</tankdata>
</xsl:for-each>
<informationafterdive>
<xsl:if test="node()/depth/@max != ''">
<greatestdepth>
<xsl:value-of select="substring-before(node()/depth/@max, ' ')"/>
</greatestdepth>
</xsl:if>
<xsl:if test="node()/depth/@mean != ''">
<averagedepth>
<xsl:value-of select="substring-before(node()/depth/@mean, ' ')"/>
</averagedepth>
</xsl:if>
<xsl:if test="./@duration != ''">
<diveduration>
<xsl:call-template name="time2sec">
<xsl:with-param name="time">
<xsl:value-of select="./@duration"/>
</xsl:with-param>
</xsl:call-template>
</diveduration>
</xsl:if>
<xsl:if test="temperature/@water|divetemperature/@water != ''">
<lowesttemperature>
<xsl:value-of select="format-number(substring-before(temperature/@water|divetemperature/@water, ' ') + 273.15, '0.00')"/>
</lowesttemperature>
</xsl:if>
<notes>
<para>
<xsl:value-of select="notes"/>
</para>
<xsl:for-each select="picture">
<link ref="{concat(../@number, ':', @filename, '@', @offset)}"/>
</xsl:for-each>
</notes>
<rating>
<ratingvalue>
<xsl:choose>
<xsl:when test="./@rating = 0">
<xsl:value-of select="'1'"/>
</xsl:when>
<xsl:when test="./@rating != ''">
<xsl:value-of select="./@rating * 2"/>
</xsl:when>
</xsl:choose>
</ratingvalue>
</rating>
<visibility>
<xsl:choose>
<xsl:when test="./@visibility = 1">
<xsl:value-of select="1"/>
</xsl:when>
<xsl:when test="./@visibility = 2">
<xsl:value-of select="3"/>
</xsl:when>
<xsl:when test="./@visibility = 3">
<xsl:value-of select="5"/>
</xsl:when>
<xsl:when test="./@visibility = 4">
<xsl:value-of select="10"/>
</xsl:when>
<xsl:when test="./@visibility = 5">
<xsl:value-of select="15"/>
</xsl:when>
</xsl:choose>
</visibility>
</informationafterdive>
</dive>
</xsl:template>
<!-- Approximate waypoint depth.
Parameters:
timefirst Time of the previous waypoint in seconds
timesecond Time of the current waypoint in seconds
depthfirst Depth of the first waypoint in mm
depthsecond Depth of the second waypoint in mm
timeevent Time of the event
Returns: Depth approximation of event in m
-->
<xsl:template name="approximatedepth">
<xsl:param name="timefirst"/>
<xsl:param name="timesecond"/>
<xsl:param name="depthfirst"/>
<xsl:param name="depthsecond"/>
<xsl:param name="timeevent"/>
<xsl:value-of select="format-number((($timeevent - $timefirst) div ($timesecond - $timefirst) * ($depthsecond - $depthfirst) + $depthfirst) div 1000, '#.##')"/>
</xsl:template>
</xsl:stylesheet>