#include <string.h>
#include <stdlib.h>
#include <errno.h>
+#include <unistd.h>
#define __USE_XOPEN
#include <time.h>
#include <libxml/parser.h>
#include <libxml/tree.h>
+#ifdef XSLT
+#include <libxslt/transform.h>
+#endif
#include "dive.h"
#include "uemis.h"
* technically the SI unit for pressure is Pascal, but
* we default to bar (10^5 pascal), which people
* actually use. Similarly, C instead of Kelvin.
+ * And kg instead of g.
*/
const struct units SI_units = {
.length = METERS,
const char *name;
} event;
static struct tm tm;
-static int cylinder_index;
+static int cylinder_index, ws_index;
static enum import_source {
UNKNOWN,
LIBDIVECOMPUTER,
- SUUNTO,
UEMIS,
DIVINGLOG,
UDDF,
free(buffer);
}
+static void weight(char *buffer, void *_weight)
+{
+ weight_t *weight = _weight;
+ union int_or_float val;
+
+ switch (integer_or_float(buffer, &val)) {
+ case FLOAT:
+ switch (input_units.weight) {
+ case KG:
+ weight->grams = val.fp * 1000 + 0.5;
+ break;
+ case LBS:
+ weight->grams = val.fp * 453.6 + 0.5;
+ break;
+ }
+ break;
+ default:
+ printf("Strange depth reading %s\n", buffer);
+ }
+}
+
static void temperature(char *buffer, void *_temperature)
{
temperature_t *temperature = _temperature;
nonmatch("sample", name, buf);
}
-/*
- * Crazy suunto xml. Look at how those o2/he things match up.
- */
-static int suunto_dive_match(struct dive **divep, const char *name, int len, char *buf)
-{
- struct dive *dive = *divep;
-
- return MATCH(".o2pct", percent, &dive->cylinder[0].gasmix.o2) ||
- MATCH(".hepct_0", percent, &dive->cylinder[0].gasmix.he) ||
- MATCH(".o2pct_2", percent, &dive->cylinder[1].gasmix.o2) ||
- MATCH(".hepct_1", percent, &dive->cylinder[1].gasmix.he) ||
- MATCH(".o2pct_3", percent, &dive->cylinder[2].gasmix.o2) ||
- MATCH(".hepct_2", percent, &dive->cylinder[2].gasmix.he) ||
- MATCH(".o2pct_4", percent, &dive->cylinder[3].gasmix.o2) ||
- MATCH(".hepct_3", percent, &dive->cylinder[3].gasmix.he) ||
- MATCH(".cylindersize", cylindersize, &dive->cylinder[0].type.size) ||
- MATCH(".cylinderworkpressure", pressure, &dive->cylinder[0].type.workingpressure) ||
- 0;
-}
-
static const char *country, *city;
static void divinglog_place(char *place, void *_location)
start_match("dive", name, buf);
switch (import_source) {
- case SUUNTO:
- if (suunto_dive_match(divep, name, len, buf))
- return;
- break;
-
case UEMIS:
if (uemis_dive_match(divep, name, len, buf))
return;
return;
if (MATCH(".buddy", utf8_string, &dive->buddy))
return;
-
+ if (MATCH(".rating", get_index, &dive->rating))
+ return;
if (MATCH(".cylinder.size", cylindersize, &dive->cylinder[cylinder_index].type.size))
return;
if (MATCH(".cylinder.workpressure", pressure, &dive->cylinder[cylinder_index].type.workingpressure))
return;
if (MATCH(".cylinder.end", pressure, &dive->cylinder[cylinder_index].end))
return;
-
+ if (MATCH(".weightsystem.description", utf8_string, &dive->weightsystem[ws_index].description))
+ return;
+ if (MATCH(".weightsystem.weight", weight, &dive->weightsystem[ws_index].weight))
+ return;
+ if (MATCH("weight", weight, &dive->weightsystem[ws_index].weight))
+ return;
if (MATCH(".o2", gasmix, &dive->cylinder[cylinder_index].gasmix.o2))
return;
if (MATCH(".n2", gasmix_nitrogen, &dive->cylinder[cylinder_index].gasmix))
if (!type->size.mliter)
return;
- if (input_units.volume == CUFT || import_source == SUUNTO) {
+ if (input_units.volume == CUFT) {
/* confusing - we don't really start from ml but millicuft !*/
volume_of_air = cuft_to_l(type->size.mliter);
atm = to_ATM(type->workingpressure); /* working pressure in atm */
record_dive(dive);
dive = NULL;
cylinder_index = 0;
+ ws_index = 0;
}
static void event_start(void)
cylinder_index++;
}
+static void ws_start(void)
+{
+}
+
+static void ws_end(void)
+{
+ ws_index++;
+}
+
static void sample_start(void)
{
sample = prepare_sample(&dive);
traverse(n->children);
}
-static void suunto_importer(void)
-{
- import_source = SUUNTO;
- input_units = SI_units;
-}
-
static void uemis_importer(void)
{
import_source = UEMIS;
{ "event", event_start, event_end },
{ "gasmix", cylinder_start, cylinder_end },
{ "cylinder", cylinder_start, cylinder_end },
+ { "weightsystem", ws_start, ws_end },
{ "P", sample_start, sample_end },
/* Import type recognition */
- { "SUUNTO", suunto_importer },
{ "Divinglog", DivingLog_importer },
{ "pre_dive", uemis_importer },
{ "dives", uemis_importer },
set_filename(filename);
reset_all();
dive_start();
+#ifdef XSLT
+ doc = test_xslt_transforms(doc);
+#endif
traverse(xmlDocGetRootElement(doc));
dive_end();
xmlFreeDoc(doc);
{
LIBXML_TEST_VERSION
}
+
+#ifdef XSLT
+
+/* Maybe we'll want a environment variable that can override this.. */
+static const char *xslt_path = XSLT ":xslt:.";
+
+static xsltStylesheetPtr try_get_stylesheet(const char *path, int len, const char *name)
+{
+ xsltStylesheetPtr ret;
+ int namelen = strlen(name);
+ char *filename = malloc(len+1+namelen+1);
+
+ if (!filename)
+ return NULL;
+
+ memcpy(filename, path, len);
+ filename[len] = G_DIR_SEPARATOR;
+ memcpy(filename + len + 1, name, namelen+1);
+
+ ret = NULL;
+ if (!access(filename, R_OK))
+ ret = xsltParseStylesheetFile(filename);
+ free(filename);
+
+ return ret;
+}
+
+static xsltStylesheetPtr get_stylesheet(const char *name)
+{
+ const char *path = xslt_path, *next;
+
+ do {
+ int len;
+ xsltStylesheetPtr ret;
+
+ next = strchr(path, ':');
+ len = strlen(path);
+ if (next) {
+ len = next - path;
+ next++;
+ }
+ ret = try_get_stylesheet(path, len, name);
+ if (ret)
+ return ret;
+ } while ((path = next) != NULL);
+
+ return NULL;
+}
+
+static struct xslt_files {
+ const char *root;
+ const char *file;
+} xslt_files[] = {
+ { "SUUNTO", "SuuntoSDM.xslt" },
+ { "JDiveLog", "jdivelog2subsurface.xslt" },
+ { NULL, }
+};
+
+xmlDoc *test_xslt_transforms(xmlDoc *doc)
+{
+ struct xslt_files *info = xslt_files;
+ xmlDoc *transformed;
+ xsltStylesheetPtr xslt = NULL;
+ xmlNode *root_element = xmlDocGetRootElement(doc);
+
+ while ((info->root) && (strcasecmp(root_element->name, info->root) != 0)) {
+ info++;
+ }
+
+ if (info->root) {
+ xmlSubstituteEntitiesDefault(1);
+ xslt = get_stylesheet(info->file);
+ if (xslt == NULL)
+ return doc;
+ transformed = xsltApplyStylesheet(xslt, doc, NULL);
+ xmlFreeDoc(doc);
+ xsltFreeStylesheet(xslt);
+ return transformed;
+ }
+ return doc;
+}
+#endif