From 9b4c251ebe348adced6166370bf11eabf22790fd Mon Sep 17 00:00:00 2001
From: Miika Turkia <miika.turkia@gmail.com>
Date: Wed, 20 Feb 2013 22:15:42 +0530
Subject: [PATCH] Import divelogs.de

This XSLT converts divelogs.de logs into Subsurface format. Data that is
discarded: weather, water visibility, boat name.

Signed-off-by: Miika Turkia <miika.turkia@gmail.com>
Signed-off-by: Dirk Hohndel <dirk@hohndel.org>
---
 parse-xml.c        |   1 +
 xslt/divelogs.xslt | 135 +++++++++++++++++++++++++++++++++++++++++++++
 2 files changed, 136 insertions(+)
 create mode 100644 xslt/divelogs.xslt

diff --git a/parse-xml.c b/parse-xml.c
index 5ae27c811..2f35a4fbe 100644
--- a/parse-xml.c
+++ b/parse-xml.c
@@ -1531,6 +1531,7 @@ static struct xslt_files {
 	{ "SUUNTO", "SuuntoSDM.xslt" },
 	{ "JDiveLog", "jdivelog2subsurface.xslt" },
 	{ "dives", "MacDive.xslt" },
+	{ "DIVELOGSDATA", "divelogs.xslt" },
 	{ NULL, }
 };
 
diff --git a/xslt/divelogs.xslt b/xslt/divelogs.xslt
new file mode 100644
index 000000000..f010c8485
--- /dev/null
+++ b/xslt/divelogs.xslt
@@ -0,0 +1,135 @@
+<?xml version="1.0"?>
+<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" version="1.0">
+  <xsl:strip-space elements="*"/>
+  <xsl:output method="xml" indent="yes"/>
+
+  <xsl:template match="/">
+    <divelog program='subsurface' version='2'>
+      <dives>
+        <xsl:apply-templates select="DIVELOGSDATA"/>
+      </dives>
+    </divelog>
+  </xsl:template>
+
+  <xsl:template match="*">
+    <xsl:variable name="delta">
+      <xsl:value-of select="SAMPLEINTERVAL"/>
+    </xsl:variable>
+    <dive>
+      <xsl:attribute name="number">
+        <xsl:value-of select="DIVELOGSDIVENUMBER"/>
+      </xsl:attribute>
+      <xsl:attribute name="date">
+        <xsl:value-of select="DATE"/>
+      </xsl:attribute>
+      <xsl:attribute name="time">
+        <xsl:value-of select="TIME"/>
+      </xsl:attribute>
+      <xsl:attribute name="duration">
+        <xsl:value-of select="concat(floor(number(DIVETIMESEC) div 60), ':', format-number(floor(number(DIVETIMESEC) mod 60), '00'), ' min')"/>
+      </xsl:attribute>
+
+      <depth>
+        <xsl:if test="MAXDEPTH != ''">
+          <xsl:attribute name="max">
+            <xsl:value-of select="concat(MAXDEPTH, ' m')"/>
+          </xsl:attribute>
+        </xsl:if>
+        <xsl:if test="MEANDEPTH != ''">
+          <xsl:attribute name="mean">
+            <xsl:value-of select="concat(MEANDEPTH, ' m')"/>
+          </xsl:attribute>
+        </xsl:if>
+      </depth>
+      <location>
+        <xsl:for-each select="LOCATION|SITE">
+          <xsl:choose>
+            <xsl:when test="following-sibling::SITE[1] != ''">
+              <xsl:value-of select="concat(., ' / ')"/>
+            </xsl:when>
+            <xsl:otherwise>
+              <xsl:value-of select="."/>
+            </xsl:otherwise>
+          </xsl:choose>
+        </xsl:for-each>
+      </location>
+
+      <!-- WEATHER, WATERVIZIBILITY, BOATNAME -->
+
+      <xsl:if test="LAT != ''">
+        <gps>
+          <xsl:value-of select="concat(LAT, ' ', LNG)"/>
+        </gps>
+      </xsl:if>
+
+      <temperature>
+        <xsl:if test="AIRTEMP != ''">
+          <xsl:attribute name="air">
+            <xsl:value-of select="AIRTEMP"/>
+          </xsl:attribute>
+        </xsl:if>
+        <xsl:if test="WATERTEMPMAXDEPTH != ''">
+          <xsl:attribute name="water">
+            <xsl:value-of select="WATERTEMPMAXDEPTH"/>
+          </xsl:attribute>
+        </xsl:if>
+      </temperature>
+
+      <buddy>
+        <xsl:value-of select="PARTNER"/>
+      </buddy>
+
+      <!-- Helium? -->
+      <cylinder>
+        <xsl:attribute name="o2">
+          <xsl:value-of select="O2PCT"/>
+        </xsl:attribute>
+        <xsl:attribute name="start">
+          <xsl:value-of select="CYLINDERSTARTPRESSURE"/>
+        </xsl:attribute>
+        <xsl:attribute name="end">
+          <xsl:value-of select="CYLINDERENDPRESSURE"/>
+        </xsl:attribute>
+        <xsl:if test="CYLINDERSIZE != ''">
+          <xsl:attribute name="size">
+            <xsl:value-of select="CYLINDERSIZE + CYLINDERSIZE * DBLTANK"/>
+          </xsl:attribute>
+        </xsl:if>
+        <xsl:if test="WORKINGPRESSURE &gt; 0">
+          <xsl:attribute name="workpressure">
+            <xsl:value-of select="WORKINGPRESSURE"/>
+          </xsl:attribute>
+        </xsl:if>
+        <xsl:attribute name="description">
+          <xsl:value-of select="CYLINDERDESCRIPTION"/>
+        </xsl:attribute>
+      </cylinder>
+
+      <weightsystem>
+        <xsl:attribute name="description">
+          <xsl:value-of select="'unknown'"/>
+        </xsl:attribute>
+        <xsl:attribute name="weight">
+          <xsl:value-of select="concat(WEIGHT, ' kg')"/>
+        </xsl:attribute>
+      </weightsystem>
+
+      <notes>
+        <xsl:value-of select="LOGNOTES"/>
+      </notes>
+
+      <xsl:for-each select="SAMPLE/DEPTH">
+        <sample>
+          <xsl:variable name="timeSec" select="(position() - 1) * $delta"/>
+          <xsl:attribute name="time">
+            <xsl:value-of select="concat(floor($timeSec div 60), ':',
+              format-number(floor($timeSec mod 60), '00'), ' min')"/>
+          </xsl:attribute>
+          <xsl:attribute name="depth">
+            <xsl:value-of select="concat(., ' m')"/>
+          </xsl:attribute>
+        </sample>
+      </xsl:for-each>
+    </dive>
+  </xsl:template>
+</xsl:stylesheet>