From 74f5842f0c324fdd2d0217e90c11da6c70319f6e Mon Sep 17 00:00:00 2001
From: Dirk Hohndel <dirk@hohndel.org>
Date: Sun, 21 Dec 2014 17:53:18 -0800
Subject: [PATCH] Add second CSV export with dive details

This is intended to export all the details that someone might copy from a
paper logbook. We need a matching import template to make this simple.

This hasn't been well tested, I'm sure it will break when elements and
attributes are missing.

Signed-off-by: Dirk Hohndel <dirk@hohndel.org>
---
 qt-ui/divelogexportdialog.cpp |   4 ++
 qt-ui/divelogexportdialog.ui  |  16 ++++-
 save-xml.c                    |   3 +
 subsurface.qrc                |   1 +
 xslt/xml2manualcsv.xslt       | 114 ++++++++++++++++++++++++++++++++++
 5 files changed, 135 insertions(+), 3 deletions(-)
 create mode 100644 xslt/xml2manualcsv.xslt

diff --git a/qt-ui/divelogexportdialog.cpp b/qt-ui/divelogexportdialog.cpp
index 965af494f..a237c9941 100644
--- a/qt-ui/divelogexportdialog.cpp
+++ b/qt-ui/divelogexportdialog.cpp
@@ -272,6 +272,10 @@ void DiveLogExportDialog::on_buttonBox_accepted()
 			stylesheet = "xml2csv.xslt";
 			filename = QFileDialog::getSaveFileName(this, tr("Export CSV file as"), lastDir,
 								tr("CSV files (*.csv *.CSV)"));
+		} else if (ui->exportCSVDetails->isChecked()) {
+			stylesheet = "xml2manualcsv.xslt";
+			filename = QFileDialog::getSaveFileName(this, tr("Export CSV file as"), lastDir,
+								tr("CSV files (*.csv *.CSV)"));
 		} else if (ui->exportDivelogs->isChecked()) {
 			DivelogsDeWebServices::instance()->prepareDivesForUpload(ui->exportSelected->isChecked());
 		} else if (ui->exportDiveshare->isChecked()) {
diff --git a/qt-ui/divelogexportdialog.ui b/qt-ui/divelogexportdialog.ui
index aaa485eb3..62e984294 100644
--- a/qt-ui/divelogexportdialog.ui
+++ b/qt-ui/divelogexportdialog.ui
@@ -7,7 +7,7 @@
     <x>0</x>
     <y>0</y>
     <width>507</width>
-    <height>413</height>
+    <height>423</height>
    </rect>
   </property>
   <property name="windowTitle">
@@ -166,7 +166,17 @@
           <item>
            <widget class="QRadioButton" name="exportCSV">
             <property name="text">
-             <string>CSV</string>
+             <string>CSV samples</string>
+            </property>
+            <attribute name="buttonGroup">
+             <string notr="true">exportGroup</string>
+            </attribute>
+           </widget>
+          </item>
+          <item>
+           <widget class="QRadioButton" name="exportCSVDetails">
+            <property name="text">
+             <string>CSV dive details</string>
             </property>
             <attribute name="buttonGroup">
              <string notr="true">exportGroup</string>
@@ -440,7 +450,7 @@
   </connection>
  </connections>
  <buttongroups>
-  <buttongroup name="buttonGroup"/>
   <buttongroup name="exportGroup"/>
+  <buttongroup name="buttonGroup"/>
  </buttongroups>
 </ui>
diff --git a/save-xml.c b/save-xml.c
index e4871fbb1..9172032ee 100644
--- a/save-xml.c
+++ b/save-xml.c
@@ -647,6 +647,9 @@ int export_dives_xslt(const char *filename, const bool selected, const char *exp
 	xmlDoc *transformed;
 	int res = 0;
 
+	if (verbose)
+		fprintf(stderr, "export_dives_xslt with stylesheet %s\n", export_xslt);
+
 	if (!filename)
 		return report_error("No filename for export");
 
diff --git a/subsurface.qrc b/subsurface.qrc
index 76875a716..e1103bb92 100644
--- a/subsurface.qrc
+++ b/subsurface.qrc
@@ -42,6 +42,7 @@
         <file>xslt/udcf.xslt</file>
         <file>xslt/uddf-export.xslt</file>
         <file>xslt/xml2csv.xslt</file>
+        <file>xslt/xml2manualcsv.xslt</file>
         <file>xslt/uddf.xslt</file>
         <file>xslt/sensuscsv.xslt</file>
         <file>xslt/manualcsv2xml.xslt</file>
diff --git a/xslt/xml2manualcsv.xslt b/xslt/xml2manualcsv.xslt
new file mode 100644
index 000000000..fa3868cf8
--- /dev/null
+++ b/xslt/xml2manualcsv.xslt
@@ -0,0 +1,114 @@
+<?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="text" encoding="UTF-8"/>
+
+  <xsl:variable name="fs">,</xsl:variable>
+
+  <xsl:template match="/divelog/dives">
+    <xsl:value-of select="concat('&quot;dive number&quot;', $fs, '&quot;date&quot;', $fs, '&quot;time&quot;', $fs, '&quot;duration&quot;', $fs, '&quot;maxdepth&quot;', $fs, '&quot;avgdepth&quot;', $fs, '&quot;airtemp&quot;', $fs, '&quot;watertemp&quot;', $fs, '&quot;startpressure&quot;', $fs, '&quot;endpressure&quot;', $fs, '&quot;location&quot;', $fs, '&quot;gps&quot;', $fs, '&quot;divemaster&quot;', $fs, '&quot;buddy&quot;', $fs, '&quot;suit&quot;', $fs, '&quot;rating&quot;', $fs, '&quot;visibility&quot;', $fs, '&quot;notes&quot;')"/>
+    <xsl:text>
+</xsl:text>
+    <xsl:apply-templates select="dive|trip/dive"/>
+  </xsl:template>
+
+  <xsl:template match="dive">
+    <xsl:text>&quot;</xsl:text>
+    <xsl:value-of select="@number"/>
+    <xsl:text>&quot;</xsl:text>
+    <xsl:value-of select="$fs"/>
+    <xsl:text>&quot;</xsl:text>
+    <xsl:value-of select="@date"/>
+    <xsl:text>&quot;</xsl:text>
+    <xsl:value-of select="$fs"/>
+    <xsl:text>&quot;</xsl:text>
+    <xsl:value-of select="@time"/>
+    <xsl:text>&quot;</xsl:text>
+    <xsl:value-of select="$fs"/>
+    <xsl:text>&quot;</xsl:text>
+    <xsl:value-of select="@duration"/>
+    <xsl:text>&quot;</xsl:text>
+    <xsl:apply-templates select="divecomputer/depth"/>
+    <xsl:apply-templates select="divetemperature"/>
+    <xsl:apply-templates select="cylinder"/>
+    <xsl:apply-templates select="location"/>
+    <xsl:apply-templates select="divemaster"/>
+    <xsl:apply-templates select="buddy"/>
+    <xsl:apply-templates select="suit"/>
+    <xsl:value-of select="$fs"/>
+    <xsl:text>&quot;</xsl:text>
+    <xsl:value-of select="@rating"/>
+    <xsl:text>&quot;</xsl:text>
+    <xsl:value-of select="$fs"/>
+    <xsl:text>&quot;</xsl:text>
+    <xsl:value-of select="@visibility"/>
+    <xsl:text>&quot;</xsl:text>
+    <xsl:apply-templates select="notes"/>
+    <xsl:text>
+</xsl:text>
+  </xsl:template>
+  <xsl:template match="divecomputer/depth">
+    <xsl:value-of select="$fs"/>
+    <xsl:text>&quot;</xsl:text>
+    <xsl:value-of select="@max"/>
+    <xsl:text>&quot;</xsl:text>
+    <xsl:value-of select="$fs"/>
+    <xsl:text>&quot;</xsl:text>
+    <xsl:value-of select="@mean"/>
+    <xsl:text>&quot;</xsl:text>
+  </xsl:template>
+  <xsl:template match="divetemperature">
+    <xsl:value-of select="$fs"/>
+    <xsl:text>&quot;</xsl:text>
+    <xsl:value-of select="@air"/>
+    <xsl:text>&quot;</xsl:text>
+    <xsl:value-of select="$fs"/>
+    <xsl:text>&quot;</xsl:text>
+    <xsl:value-of select="@water"/>
+    <xsl:text>&quot;</xsl:text>
+  </xsl:template>
+  <xsl:template match="cylinder">
+    <xsl:value-of select="$fs"/>
+    <xsl:text>&quot;</xsl:text>
+    <xsl:value-of select="@start"/>
+    <xsl:text>&quot;</xsl:text>
+    <xsl:value-of select="$fs"/>
+    <xsl:text>&quot;</xsl:text>
+    <xsl:value-of select="@end"/>
+    <xsl:text>&quot;</xsl:text>
+  </xsl:template>
+  <xsl:template match="location">
+    <xsl:value-of select="$fs"/>
+    <xsl:text>&quot;</xsl:text>
+    <xsl:value-of select="."/>
+    <xsl:text>&quot;</xsl:text>
+    <xsl:value-of select="$fs"/>
+    <xsl:text>&quot;</xsl:text>
+    <xsl:value-of select="@gps"/>
+    <xsl:text>&quot;</xsl:text>
+  </xsl:template>
+  <xsl:template match="divemaster">
+    <xsl:value-of select="$fs"/>
+    <xsl:text>&quot;</xsl:text>
+    <xsl:value-of select="."/>
+    <xsl:text>&quot;</xsl:text>
+  </xsl:template>
+  <xsl:template match="buddy">
+    <xsl:value-of select="$fs"/>
+    <xsl:text>&quot;</xsl:text>
+    <xsl:value-of select="."/>
+    <xsl:text>&quot;</xsl:text>
+  </xsl:template>
+  <xsl:template match="suit">
+    <xsl:value-of select="$fs"/>
+    <xsl:text>&quot;</xsl:text>
+    <xsl:value-of select="."/>
+    <xsl:text>&quot;</xsl:text>
+  </xsl:template>
+  <xsl:template match="notes">
+    <xsl:value-of select="$fs"/>
+    <xsl:text>&quot;</xsl:text>
+    <xsl:value-of select="."/>
+    <xsl:text>&quot;</xsl:text>
+  </xsl:template>
+</xsl:stylesheet>