src/dmm/ut372.c

   1 /*
   2  * This file is part of the libsigrok project.
   3  *
   4  * Copyright (C) 2015 Martin Ling <martin-sigrok@earth.li>
   5  *
   6  * This program is free software; you can redistribute it and/or modify
   7  * it under the terms of the GNU General Public License as published by
   8  * the Free Software Foundation; either version 2 of the License, or
   9  * (at your option) any later version.
  10  *
  11  * This program is distributed in the hope that it will be useful,
  12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  * GNU General Public License for more details.
  15  *
  16  * You should have received a copy of the GNU General Public License
  17  * along with this program; if not, write to the Free Software
  18  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301 USA
  19  */
  20
  21 /*
  22  * UNI-T UT372 protocol parser.
  23  */
  24
  25 #include <config.h>
  26 #include <stdlib.h>
  27 #include <stdint.h>
  28 #include <math.h>
  29 #include <libsigrok/libsigrok.h>
  30 #include "libsigrok-internal.h"
  31
  32 #define LOG_PREFIX "ut372"
  33
  34 static const uint8_t lookup[] = {
  35         0x7B,
  36         0x60,
  37         0x5E,
  38         0x7C,
  39         0x65,
  40         0x3D,
  41         0x3F,
  42         0x70,
  43         0x7F,
  44         0x7D,
  45 };
  46
  47 #define DECIMAL_POINT_MASK 0x80
  48
  49 #define FLAGS1_HOLD_MASK (1 << 2)
  50
  51 #define FLAGS2_RPM_MASK (1 << 0)
  52 #define FLAGS2_COUNT_MASK (1 << 1)
  53 #define FLAGS2_MAX_MASK (1 << 4)
  54 #define FLAGS2_MIN_MASK (1 << 5)
  55 #define FLAGS2_AVG_MASK (1 << 6)
  56
  57 /* Decode a pair of characters into a byte. */
  58 static uint8_t decode_pair(const uint8_t *buf)
  59 {
  60         unsigned int i;
  61         char hex[3];
  62
  63         hex[2] = '\0';
  64
  65         for (i = 0; i < 2; i++) {
  66                 hex[i] = buf[i];
  67                 if (hex[i] > 0x39)
  68                         hex[i] += 7;
  69         }
  70
  71         return strtol(hex, NULL, 16);
  72 }
  73
  74 SR_PRIV gboolean sr_ut372_packet_valid(const uint8_t *buf)
  75 {
  76         uint8_t flags2;
  77
  78         if (!(buf[25] == '\r' && buf[26] == '\n'))
  79                 return FALSE;
  80
  81         flags2 = decode_pair(buf + 23);
  82
  83         if (!(flags2 & (FLAGS2_RPM_MASK | FLAGS2_COUNT_MASK)))
  84                 /* Device is in the setup menu - no valid data shown. */
  85                 return FALSE;
  86
  87         return TRUE;
  88 }
  89
  90 SR_PRIV int sr_ut372_parse(const uint8_t *buf, float *floatval,
  91                 struct sr_datafeed_analog_old *analog, void *info)
  92 {
  93         unsigned int i, j, value, divisor;
  94         uint8_t segments, flags1, flags2;
  95
  96         (void) info;
  97
  98         flags1 = decode_pair(buf + 21);
  99         flags2 = decode_pair(buf + 23);
 100
 101         if (flags2 & FLAGS2_RPM_MASK) {
 102                 analog->mq = SR_MQ_FREQUENCY;
 103                 analog->unit = SR_UNIT_REVOLUTIONS_PER_MINUTE;
 104         } else if (flags2 & FLAGS2_COUNT_MASK) {
 105                 analog->mq = SR_MQ_COUNT;
 106                 analog->unit = SR_UNIT_UNITLESS;
 107         }
 108
 109         if (flags1 & FLAGS1_HOLD_MASK)
 110                 analog->mqflags |= SR_MQFLAG_HOLD;
 111         if (flags2 & FLAGS2_MIN_MASK)
 112                 analog->mqflags |= SR_MQFLAG_MIN;
 113         if (flags2 & FLAGS2_MAX_MASK)
 114                 analog->mqflags |= SR_MQFLAG_MAX;
 115         if (flags2 & FLAGS2_AVG_MASK)
 116                 analog->mqflags |= SR_MQFLAG_AVG;
 117
 118         value = 0;
 119         divisor = 1;
 120
 121         for (i = 0; i < 5; i++) {
 122                 segments = decode_pair(buf + 1 + (2 * i));
 123                 for (j = 0; j < ARRAY_SIZE(lookup); j++) {
 124                         if (lookup[j] == (segments & ~DECIMAL_POINT_MASK)) {
 125                                 value += j * pow(10, i);
 126                                 break;
 127                         }
 128                 }
 129                 if (segments & DECIMAL_POINT_MASK)
 130                         divisor = pow(10, i);
 131         }
 132
 133         *floatval = (float) value / divisor;
 134
 135         return SR_OK;
 136 }