1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
|
/*
* uemis.c
*
* UEMIS SDA file importer
* AUTHOR: Dirk Hohndel - Copyright 2011
*
* Licensed under the MIT license.
*/
#include <unistd.h>
#include <stdio.h>
#include <string.h>
#include <stdint.h>
#include <stdlib.h>
#define __USE_XOPEN
#include <time.h>
#include <regex.h>
#include "dive.h"
#include "uemis.h"
/*
* following code is based on code found in at base64.sourceforge.net/b64.c
* AUTHOR: Bob Trower 08/04/01
* COPYRIGHT: Copyright (c) Trantor Standard Systems Inc., 2001
* NOTE: This source code may be used as you wish, subject to
* the MIT license.
*/
/*
* Translation Table to decode (created by Bob Trower)
*/
static const char cd64[]="|$$$}rstuvwxyz{$$$$$$$>?@ABCDEFGHIJKLMNOPQRSTUVW$$$$$$XYZ[\\]^_`abcdefghijklmnopq";
/*
* decodeblock -- decode 4 '6-bit' characters into 3 8-bit binary bytes
*/
static void decodeblock( unsigned char in[4], unsigned char out[3] ) {
out[ 0 ] = (unsigned char ) (in[0] << 2 | in[1] >> 4);
out[ 1 ] = (unsigned char ) (in[1] << 4 | in[2] >> 2);
out[ 2 ] = (unsigned char ) (((in[2] << 6) & 0xc0) | in[3]);
}
/*
* decode a base64 encoded stream discarding padding, line breaks and noise
*/
static void decode( uint8_t *inbuf, uint8_t *outbuf, int inbuf_len ) {
uint8_t in[4], out[3], v;
int i,len,indx_in=0,indx_out=0;
while (indx_in < inbuf_len) {
for (len = 0, i = 0; i < 4 && (indx_in < inbuf_len); i++ ) {
v = 0;
while ((indx_in < inbuf_len) && v == 0) {
v = inbuf[indx_in++];
v = ((v < 43 || v > 122) ? 0 : cd64[ v - 43 ]);
if (v)
v = ((v == '$') ? 0 : v - 61);
}
if (indx_in < inbuf_len) {
len++;
if (v)
in[i] = (v - 1);
}
else
in[i] = 0;
}
if( len ) {
decodeblock( in, out );
for( i = 0; i < len - 1; i++ )
outbuf[indx_out++] = out[i];
}
}
}
/* end code from Bob Trower */
/*
* pressure_to_depth: In centibar. And when converting to
* depth, I'm just going to always use saltwater, because I
* think "true depth" is just stupid. From a diving standpoint,
* "true depth" is pretty much completely pointless, unless
* you're doing some kind of underwater surveying work.
*
* So I give water depths in "pressure depth", always assuming
* salt water. So one atmosphere per 10m.
*/
static int pressure_to_depth(uint16_t value)
{
double atm, cm;
atm = (value / 100.0) / 1.01325;
cm = 100 * atm + 0.5;
return( (cm > 0) ? 10 * (long)cm : 0);
}
/*
* convert the base64 data blog
*/
int uemis_convert_base64(char *base64, uint8_t **data) {
int len,datalen;
len = strlen(base64);
datalen = (len/4 + 1)*3;
if (datalen < 0x123+0x25) {
/* less than header + 1 sample??? */
fprintf(stderr,"suspiciously short data block\n");
}
*data = malloc(datalen);
if (! *data) {
datalen = 0;
fprintf(stderr,"Out of memory\n");
goto bail;
}
decode(base64, *data, len);
if (memcmp(*data,"Dive\01\00\00",7))
fprintf(stderr,"Missing Dive100 header\n");
bail:
return datalen;
}
/*
* parse uemis base64 data blob into struct dive
*/
void uemis_parse_divelog_binary(char *base64, void *datap) {
int datalen;
int i;
uint8_t *data;
struct sample *sample;
struct dive **divep = datap;
struct dive *dive = *divep;
int template, gasoffset;
datalen = uemis_convert_base64(base64, &data);
/* dive template in use:
0 = air
1 = nitrox (B)
2 = nitrox (B+D)
3 = nitrox (B+T+D)
uemis cylinder data is insane - it stores seven tank settings in a block
and the template tells us which of the four groups of tanks we need to look at
*/
gasoffset = template = *(uint8_t *)(data+115);
if (template == 3)
gasoffset = 4;
for (i = 0; i < template; i++) {
float volume = *(float *)(data+116+25*(gasoffset + i)) * 1000.0;
/* uemis always assumes a working pressure of 3000psi / 206bar - even though that's wrong */
/* I also think that the unit that it stores (cuft for me) might change with SDA settings */
// dive->cylinder[i].type.size.mliter = volume * 206.84 / 28.317;
dive->cylinder[i].type.size.mliter = volume * 200 / 28.317;
dive->cylinder[i].gasmix.o2.permille = *(uint8_t *)(data+120+25*(gasoffset + i)) * 10 + 0.5;
dive->cylinder[i].gasmix.he.permille = 0;
}
/* first byte of divelog data is at offset 0x123 */
i = 0x123;
while ((i < datalen) && (*(uint16_t *)(data+i))) {
/* it seems that a dive_time of 0 indicates the end of the valid readings */
/* the SDA usually records more samples after the end of the dive --
* we want to discard those, but not cut the dive short; sadly the dive
* duration in the header is a) in minutes and b) up to 3 minutes short */
if (*(uint16_t *)(data+i) > dive->duration.seconds + 180)
break;
sample = prepare_sample(divep);
dive = *divep; /* prepare_sample might realloc the dive */
sample->time.seconds = *(uint16_t *)(data+i);
sample->depth.mm = pressure_to_depth(*(uint16_t *)(data+i+2));
sample->temperature.mkelvin = (*(uint16_t *)(data+i+4) * 100) + 273150;
sample->cylinderpressure.mbar= *(uint16_t *)(data+i+23) * 10;
sample->cylinderindex = *(uint8_t *)(data+i+22);
finish_sample(dive, sample);
i += 0x25;
}
dive->duration.seconds = sample->time.seconds - 1;
return;
}
|
