2 * visomat-data-downloader - download data from Visomat Double Comfort
4 * The Visomat Double Comfort is a blood pressure meter with a USB port.
6 * Copyright (C) 2013 Antonio Ospite <ospite@studenti.unina.it>
8 * This program is free software: you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License as published by
10 * the Free Software Foundation, either version 3 of the License, or
11 * (at your option) any later version.
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
18 * You should have received a copy of the GNU General Public License
19 * along with this program. If not, see <http://www.gnu.org/licenses/>.
30 #define debug(...) fprintf(stderr, __VA_ARGS__)
31 static void debug_dump_buffer(const char *filename, uint8_t *buffer, unsigned int len)
35 dump_file = fopen(filename, "wb");
36 if (dump_file == NULL) {
37 fprintf(stderr, "Failed to open %s: %s\n", filename, strerror(errno));
41 fwrite(buffer, 1, len, dump_file);
45 #define debug(...) do {} while(0)
46 static void debug_dump_buffer(const char *filename, uint8_t *buffer, unsigned int len)
54 #define VISOMAT_DEVICE_VID 0x1247
55 #define VISOMAT_DEVICE_PID 0x00f8
56 #define VISOMAT_CONFIGURATION 1
57 #define VISOMAT_INTERFACE 1
58 #define VISOMAT_EP_IN 0x82
59 #define VISOMAT_EP_OUT 0x03
64 #define BASE_YEAR 2000
67 VISOMAT_CMD_DUMP_EEPROM,
68 VISOMAT_CMD_UNKNOWN1, /* maybe the firmware revision */
69 VISOMAT_CMD_GET_DATETIME,
70 VISOMAT_CMD_START_MEASURE1,
71 VISOMAT_CMD_UNKNOWN2, /* XXX transmission hangs */
75 static char command_codes[][3] = {
76 [VISOMAT_CMD_DUMP_EEPROM] = "R00",
77 [VISOMAT_CMD_UNKNOWN1] = "R01",
78 [VISOMAT_CMD_GET_DATETIME] = "R02",
79 [VISOMAT_CMD_START_MEASURE1] = "R03",
80 [VISOMAT_CMD_UNKNOWN2] = "R04",
81 [VISOMAT_CMD_UNKNOWN3] = "R05",
93 unsigned int flag; /* XXX Maybe this means arrhythmia? */
94 unsigned int systolic;
95 unsigned int diastolic;
99 static inline int extract_datetime(uint8_t *buffer, struct datetime *d)
103 ret = sscanf((char *)buffer, "%02u%02u%02u%02u%02u",
112 d->year += BASE_YEAR;
118 * NOTE: the CSV output is meant to be compatible with one from the Windows
119 * program, which uses the %d/%m/%Y date format, so that's not my fault.
121 static void print_record_csv_compat(struct datetime *d, struct pressure *p)
123 unsigned int pulse_pressure;
125 printf("%02u/%02u/%04u;%02u.%02u;",
126 d->day, d->month, d->year, d->hour, d->minute);
128 printf("%u;%u;%u;", p->systolic, p->diastolic, p->pulses);
130 pulse_pressure = p->systolic - p->diastolic;
131 printf("%u;", pulse_pressure);
137 /* The original software does not seem to be doing that */
139 printf("tachycardia");
140 else if (p->pulses < 60)
141 printf("bradycardia");
147 /* TODO: it would be better to separate decoding data from printing it */
148 static int decode_eeprom(uint8_t *buffer,
150 unsigned int user_mask)
156 unsigned int user_id;
157 unsigned int num_records;
161 if (buffer[0] != STX || buffer[1] != 'M') {
162 fprintf(stderr, "Usupported data.\n");
166 if (buffer[len - 1] != ETX) {
167 fprintf(stderr, "Bad terminator in data. Buffer too small?\n");
171 /* skip the initial STX */
174 /* and the final ETX */
178 /* Each user record begins with 'M', maybe for "Memory" */
179 if (buffer[i] == 'M') {
180 /* i tracks the bytes consumed */
183 ret = sscanf((char *)(buffer + i), "%1u%02u",
184 &user_id, &num_records);
188 /* user_id and num_records take 3 bytes */
192 * when there are no records, there is a dummy byte
193 * which has to be consumed
195 if (num_records == 0)
198 for (j = 0; j < num_records; j++) {
199 ret = extract_datetime(buffer + i, &d);
203 /* datetime takes 10 bytes */
206 ret = sscanf((char *)(buffer + i),
215 /* pressure data is 10 bytes */
218 /* TODO: split out the printing part */
219 if (user_id & user_mask) {
221 printf("# User: %d\n", user_id);
222 print_record_csv_compat(&d, &p);
231 static int decode_datetime(uint8_t *buffer, unsigned int len)
234 uint8_t code[4] = { 0 };
236 uint8_t *pbuffer = buffer;
245 ret = extract_datetime(pbuffer + 4, &d);
249 printf("# (%s) Date: %04d/%02d/%02d %02d:%02d\n",
250 code, d.year, d.month, d.day, d.hour, d.minute);
255 static int send_command(libusb_device_handle *dev, visomat_command cmd)
262 request[1] = command_codes[cmd][0];
263 request[2] = command_codes[cmd][1];
264 request[3] = command_codes[cmd][2];
268 ret = libusb_bulk_transfer(dev, VISOMAT_EP_OUT, request, sizeof(request), &transferred, 0);
269 if (ret != 0 || transferred != sizeof(request)) {
270 fprintf(stderr, "Error: sending request: %d (%s)\ttransferred: %d (expected %zu)\n",
271 ret, libusb_error_name(ret), transferred, sizeof(request));
277 static int get_response(libusb_device_handle *dev,
283 uint8_t response[64] = { 0 };
291 ret = libusb_bulk_transfer(dev, VISOMAT_EP_IN, response, sizeof(response), &transferred, 5000);
293 fprintf(stderr, "Error getting response: %d (%s)\ttransferred: %d (expected %zu)\n",
294 ret, libusb_error_name(ret), transferred, sizeof(response));
298 for (j = 0; j < (unsigned int)transferred; j++) {
299 buffer[i] = response[j];
303 } while (buffer[i - 1] != ETX && i < len);
305 /* Check the buffer is a valid response packet */
306 if (buffer[0] != STX || buffer[i - 1] != ETX)
312 /* Candidates for a future public API, if a shared library will ever be made */
313 #define visomat_device libusb_device_handle
314 static int visomat_dump_eeprom(visomat_device *dev, unsigned int user_mask)
316 /* Assuming an EEPROM of 1 KiB */
317 uint8_t buffer[1024] = { 0 };
320 ret = send_command(dev, VISOMAT_CMD_DUMP_EEPROM);
324 ret = get_response(dev, buffer, sizeof(buffer));
328 debug("buffer len: %d\n", ret);
329 debug_dump_buffer("eeprom.bin", buffer, sizeof(buffer));
331 ret = decode_eeprom(buffer, ret, user_mask);
338 static int visomat_get_datetime(visomat_device *dev)
340 uint8_t buffer[255] = { 0 };
343 ret = send_command(dev, VISOMAT_CMD_GET_DATETIME);
347 ret = get_response(dev, buffer, sizeof(buffer));
351 ret = decode_datetime(buffer, ret);
361 libusb_device_handle *dev;
362 int current_configuration;
364 ret = libusb_init(NULL);
366 fprintf(stderr, "libusb_init failed: %s\n",
367 libusb_error_name(ret));
371 libusb_set_debug(NULL, LIBUSB_LOG_LEVEL_INFO);
373 dev = libusb_open_device_with_vid_pid(NULL,
377 fprintf(stderr, "libusb_open failed: %s\n", strerror(errno));
379 goto out_libusb_exit;
382 current_configuration = -1;
383 ret = libusb_get_configuration(dev, ¤t_configuration);
385 fprintf(stderr, "libusb_get_configuration failed: %s\n",
386 libusb_error_name(ret));
387 goto out_libusb_close;
390 if (current_configuration != VISOMAT_CONFIGURATION) {
391 ret = libusb_set_configuration(dev, VISOMAT_CONFIGURATION);
393 fprintf(stderr, "libusb_set_configuration failed: %s\n",
394 libusb_error_name(ret));
395 fprintf(stderr, "Cannot set configuration %d\n",
396 VISOMAT_CONFIGURATION);
397 goto out_libusb_close;
401 libusb_set_auto_detach_kernel_driver(dev, 1);
403 ret = libusb_claim_interface(dev, VISOMAT_INTERFACE);
405 fprintf(stderr, "libusb_claim_interface failed: %s\n",
406 libusb_error_name(ret));
407 fprintf(stderr, "Cannot claim interface %d\n",
409 goto out_libusb_close;
412 /* Checking that the configuration has not changed, as suggested in
413 * http://libusb.sourceforge.net/api-1.0/caveats.html
415 current_configuration = -1;
416 ret = libusb_get_configuration(dev, ¤t_configuration);
418 fprintf(stderr, "libusb_get_configuration after claim failed: %s\n",
419 libusb_error_name(ret));
420 goto out_libusb_release_interface;
423 if (current_configuration != VISOMAT_CONFIGURATION) {
424 fprintf(stderr, "libusb configuration changed (expected: %d, current: %d)\n",
425 VISOMAT_CONFIGURATION, current_configuration);
427 goto out_libusb_release_interface;
430 ret = visomat_get_datetime(dev);
432 goto out_libusb_release_interface;
434 ret = visomat_dump_eeprom(dev, 0x01 | 0x02);
436 goto out_libusb_release_interface;
438 out_libusb_release_interface:
439 libusb_release_interface(dev, VISOMAT_INTERFACE);