#include <libxml/parser.h>
#include <libxml/tree.h>
-/*
- * Some silly typedefs to make our units very explicit.
- *
- * Also, the units are chosen so that values can be expressible as
- * integers, so that we never have FP rounding issues. And they
- * are small enough that converting to/from imperial units doesn't
- * really matter.
- *
- * We also strive to make '0' a meaningless number saying "not
- * initialized", since many values are things that may not have
- * been reported (eg tank pressure or temperature from dive
- * computers that don't support them). But sometimes -1 is an even
- * more explicit way of saying "not there".
- *
- * Thus "millibar" for pressure, for example, or "millikelvin" for
- * temperatures. Doing temperatures in celsius or fahrenheit would
- * make for loss of precision when converting from one to the other,
- * and using millikelvin is SI-like but also means that a temperature
- * of '0' is clearly just a missing temperature or tank pressure.
- *
- * Also strive to use units that can not possibly be mistaken for a
- * valid value in a "normal" system without conversion. If the max
- * depth of a dive is '20000', you probably didn't convert from mm on
- * output, or if the max depth gets reported as "0.2ft" it was either
- * a really boring dive, or there was some missing input conversion,
- * and a 60-ft dive got recorded as 60mm.
- *
- * Doing these as "structs containing value" means that we always
- * have to explicitly write out those units in order to get at the
- * actual value. So there is hopefully little fear of using a value
- * in millikelvin as Fahrenheit by mistake.
- *
- * We don't actually use these all yet, so maybe they'll change, but
- * I made a number of types as guidelines.
- */
-typedef struct {
- int seconds;
-} duration_t;
-
-typedef struct {
- int mm;
-} depth_t;
-
-typedef struct {
- int mbar;
-} pressure_t;
-
-typedef struct {
- int mkelvin;
-} temperature_t;
-
-typedef struct {
- int mliter;
-} volume_t;
-
-typedef struct {
- int permille;
-} fraction_t;
-
-typedef struct {
- int grams;
-} weight_t;
-
-typedef struct {
- fraction_t o2;
- fraction_t n2;
- fraction_t he2;
-} gasmix_t;
-
-typedef struct {
- volume_t size;
- pressure_t pressure;
-} tank_type_t;
-
-struct sample {
- duration_t time;
- depth_t depth;
- temperature_t temperature;
- pressure_t tankpressure;
- int tankindex;
-};
+#include "dive.h"
-struct dive {
- time_t when;
- depth_t maxdepth, meandepth;
- duration_t duration, surfacetime;
- depth_t visibility;
- temperature_t airtemp, watertemp;
- pressure_t beginning_pressure, end_pressure;
- int samples;
- struct sample sample[];
-};
+static int verbose;
+
+static struct dive **dive_table;
+static int nr_dives, nr_allocated;
static void record_dive(struct dive *dive)
{
- static int nr;
+ if (nr_dives >= nr_allocated) {
+ nr_allocated = (nr_dives + 32) * 3 / 2;
+ dive_table = realloc(dive_table, nr_allocated * sizeof(struct dive *));
+ if (!dive_table)
+ exit(1);
+ }
+ dive_table[nr_dives++] = dive;
+}
+
+static void show_dive(int nr, struct dive *dive)
+{
+ int i;
struct tm *tm;
tm = gmtime(&dive->when);
- printf("Dive %d with %d samples at %02d:%02d:%02d %04d-%02d-%02d\n",
- ++nr, dive->samples,
+ printf("At %02d:%02d:%02d %04d-%02d-%02d (%d ft max, %d minutes)\n",
tm->tm_hour, tm->tm_min, tm->tm_sec,
- tm->tm_year+1900, tm->tm_mon+1, tm->tm_mday);
+ tm->tm_year+1900, tm->tm_mon+1, tm->tm_mday,
+ to_feet(dive->maxdepth), dive->duration.seconds / 60);
+
+ if (!verbose)
+ return;
+
+ for (i = 0; i < dive->samples; i++) {
+ struct sample *s = dive->sample + i;
+
+ printf("%4d:%02d: %3d ft, %2d C, %4d PSI\n",
+ s->time.seconds / 60,
+ s->time.seconds % 60,
+ to_feet(s->depth),
+ to_C(s->temperature),
+ to_PSI(s->tankpressure));
+ }
+}
+
+static int sortfn(const void *_a, const void *_b)
+{
+ const struct dive *a = *(void **)_a;
+ const struct dive *b = *(void **)_b;
+
+ if (a->when < b->when)
+ return -1;
+ if (a->when > b->when)
+ return 1;
+ return 0;
+}
+
+static void report_dives(void)
+{
+ int i;
+ qsort(dive_table, nr_dives, sizeof(struct dive *), sortfn);
+
+ for (i = 0; i < nr_dives; i++)
+ show_dive(i+1, dive_table[i]);
}
static void nonmatch(const char *type, const char *fullname, const char *name, char *buffer)
{
- printf("Unable to match %s '(%.*s)%s' (%s)\n", type,
- (int) (name - fullname), fullname, name,
- buffer);
+ if (verbose > 1)
+ printf("Unable to match %s '(%.*s)%s' (%s)\n", type,
+ (int) (name - fullname), fullname, name,
+ buffer);
free(buffer);
}
int month = tm->tm_mon;
int day = tm->tm_mday;
+ /* First normalize relative to 1900 */
if (year < 70)
year += 100;
else if (year > 1900)
free(buffer);
}
+/* Libdivecomputer: "2011-03-20 10:22:38" */
+static void divedatetime(char *buffer, void *_when)
+{
+ int y,m,d;
+ int hr,min,sec;
+ time_t *when = _when;
+
+ if (sscanf(buffer, "%d-%d-%d %d:%d:%d",
+ &y, &m, &d, &hr, &min, &sec) == 6) {
+ tm.tm_year = y;
+ tm.tm_mon = m-1;
+ tm.tm_mday = d;
+ tm.tm_hour = hr;
+ tm.tm_min = min;
+ tm.tm_sec = sec;
+ *when = utc_mktime(&tm);
+ }
+ free(buffer);
+}
+
union int_or_float {
long i;
double fp;
static void sampletime(char *buffer, void *_time)
{
+ int i;
+ int min, sec;
duration_t *time = _time;
- union int_or_float val;
- switch (integer_or_float(buffer, &val)) {
- /* C or F? Who knows? Let's default to Celsius */
- case INTEGER:
- time->seconds = val.i * 1000;
+ i = sscanf(buffer, "%d:%d", &min, &sec);
+ switch (i) {
+ case 1:
+ sec = min;
+ min = 0;
+ /* fallthrough */
+ case 2:
+ time->seconds = sec + min*60;
break;
default:
printf("Strange sample time reading %s\n", buffer);
free(buffer);
}
+static void duration(char *buffer, void *_time)
+{
+ sampletime(buffer, _time);
+}
+
+static void ignore(char *buffer, void *_time)
+{
+}
+
/* We're in samples - try to convert the random xml value to something useful */
static void try_to_fill_sample(struct sample *sample, const char *name, char *buf)
{
return;
if (match("time", last, divetime, buf, &dive->when))
return;
+ if (match("datetime", last, divedatetime, buf, &dive->when))
+ return;
+ if (match("maxdepth", last, depth, buf, &dive->maxdepth))
+ return;
+ if (match("meandepth", last, depth, buf, &dive->meandepth))
+ return;
+ if (match("divetime", last, duration, buf, &dive->duration))
+ return;
+ if (match("divetimesec", last, duration, buf, &dive->duration))
+ return;
+ if (match("surfacetime", last, duration, buf, &dive->surfacetime))
+ return;
+ if (match("airtemp", last, temperature, buf, &dive->airtemp))
+ return;
+ if (match("watertemp", last, temperature, buf, &dive->watertemp))
+ return;
+ if (match("cylinderstartpressure", last, pressure, buf, &dive->beginning_pressure))
+ return;
+ if (match("cylinderendpressure", last, pressure, buf, &dive->end_pressure))
+ return;
+ if (match("divenumber", last, ignore, buf, NULL))
+ return;
+ if (match("diveseries", last, ignore, buf, NULL))
+ return;
+ if (match("number", last, ignore, buf, NULL))
+ return;
+ if (match("size", last, ignore, buf, NULL))
+ return;
+ if (match("fingerprint", last, ignore, buf, NULL))
+ return;
nonmatch("dive", name, last, buf);
}
static const char *nodename(xmlNode *node, char *buf, int len)
{
-
if (!node || !node->name)
return "root";
}
}
-static void parse(const char *filename)
+static void parse_xml_file(const char *filename)
{
xmlDoc *doc;
xmlCleanupParser();
}
+static void parse_argument(const char *arg)
+{
+ const char *p = arg+1;
+
+ do {
+ switch (*p) {
+ case 'v':
+ verbose++;
+ continue;
+ default:
+ fprintf(stderr, "Bad argument '%s'\n", arg);
+ exit(1);
+ }
+ } while (*++p);
+}
+
int main(int argc, char **argv)
{
int i;
LIBXML_TEST_VERSION
- for (i = 1; i < argc; i++)
- parse(argv[i]);
+ for (i = 1; i < argc; i++) {
+ const char *a = argv[i];
+
+ if (a[0] == '-') {
+ parse_argument(a);
+ continue;
+ }
+ parse_xml_file(a);
+ }
+ report_dives();
return 0;
}
projects / ext / subsurface.git / blobdiff