2 * This file is part of the libsigrok project.
4 * Copyright (C) 2013 Uwe Hermann <uwe@hermann-uwe.de>
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.
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.
16 * You should have received a copy of the GNU General Public License
17 * along with this program; if not, see <http://www.gnu.org/licenses/>.
23 #define NUM_CHANNELS 4
26 float temp[NUM_CHANNELS];
27 int digits[NUM_CHANNELS];
28 gboolean rec, std, max, min, maxmin, t1t2, rel, hold, lowbat, celsius;
29 gboolean memfull, autooff;
30 gboolean mode_std, mode_rel, mode_max, mode_min, mode_maxmin;
33 static int center_send(struct sr_serial_dev_inst *serial, const char *cmd)
37 if ((ret = serial_write_blocking(serial, cmd, strlen(cmd),
38 serial_timeout(serial, strlen(cmd)))) < 0) {
39 sr_err("Error sending '%s' command: %d.", cmd, ret);
46 SR_PRIV gboolean center_3xx_packet_valid(const uint8_t *buf)
48 return (buf[0] == 0x02 && buf[44] == 0x03);
51 static void log_packet(const uint8_t *buf, int idx)
56 s = g_string_sized_new(100);
57 g_string_printf(s, "Packet: ");
58 for (i = 0; i < center_devs[idx].packet_size; i++)
59 g_string_append_printf(s, "%02x ", buf[i]);
60 sr_spew("%s", s->str);
61 g_string_free(s, TRUE);
64 static int packet_parse(const uint8_t *buf, int idx, struct center_info *info)
71 /* Byte 0: Always 0x02. */
73 /* Byte 1: Various status bits. */
74 info->rec = (buf[1] & (1 << 0)) != 0;
75 info->mode_std = (((buf[1] >> 1) & 0x3) == 0);
76 info->mode_max = (((buf[1] >> 1) & 0x3) == 1);
77 info->mode_min = (((buf[1] >> 1) & 0x3) == 2);
78 info->mode_maxmin = (((buf[1] >> 1) & 0x3) == 3);
79 /* TODO: Rel. Not available on all models. */
80 info->t1t2 = (buf[1] & (1 << 3)) != 0;
81 info->rel = (buf[1] & (1 << 4)) != 0;
82 info->hold = (buf[1] & (1 << 5)) != 0;
83 info->lowbat = (buf[1] & (1 << 6)) != 0;
84 info->celsius = (buf[1] & (1 << 7)) != 0;
86 /* Byte 2: Further status bits. */
87 info->memfull = (buf[2] & (1 << 0)) != 0;
88 info->autooff = (buf[2] & (1 << 7)) != 0;
90 /* Byte 7+8/9+10/11+12/13+14: channel T1/T2/T3/T4 temperature. */
91 for (i = 0; i < NUM_CHANNELS; i++) {
92 temp_i16 = RB16S(&buf[7 + 2 * i]);
93 info->temp[i] = (float)temp_i16;
96 /* Byte 43: Specifies whether we need to divide the value(s) by 10. */
97 for (i = 0; i < NUM_CHANNELS; i++) {
98 /* Bit = 0: Divide by 10. Bit = 1: Don't divide by 10. */
99 if ((buf[43] & (1 << i)) == 0) {
107 /* Bytes 39-42: Overflow/overlimit bits, depending on mode. */
108 for (i = 0; i < NUM_CHANNELS; i++) {
109 if (info->mode_std && ((buf[39] & (1 << i)) != 0))
110 info->temp[i] = INFINITY;
111 /* TODO: Rel. Not available on all models. */
112 // if (info->mode_rel && ((buf[40] & (1 << i)) != 0))
113 // info->temp[i] = INFINITY;
114 if (info->mode_max && ((buf[41] & (1 << i)) != 0))
115 info->temp[i] = INFINITY;
116 if (info->mode_min && ((buf[42] & (1 << i)) != 0))
117 info->temp[i] = INFINITY;
121 /* Byte 44: Always 0x03. */
126 static int handle_packet(const uint8_t *buf, struct sr_dev_inst *sdi, int idx)
128 struct sr_datafeed_packet packet;
129 struct sr_datafeed_analog analog;
130 struct sr_analog_encoding encoding;
131 struct sr_analog_meaning meaning;
132 struct sr_analog_spec spec;
133 struct dev_context *devc;
134 struct center_info info;
140 /* Note: digits/spec_digits will be overridden later. */
141 sr_analog_init(&analog, &encoding, &meaning, &spec, 0);
142 memset(&info, 0, sizeof(struct center_info));
144 ret = packet_parse(buf, idx, &info);
146 sr_err("Failed to parse packet.");
150 /* Common values for all 4 channels. */
151 packet.type = SR_DF_ANALOG;
152 packet.payload = &analog;
153 analog.meaning->mq = SR_MQ_TEMPERATURE;
154 analog.meaning->unit = (info.celsius) ? SR_UNIT_CELSIUS : SR_UNIT_FAHRENHEIT;
155 analog.num_samples = 1;
157 /* Send the values for T1 - T4. */
158 for (i = 0; i < NUM_CHANNELS; i++) {
160 l = g_slist_append(l, g_slist_nth_data(sdi->channels, i));
161 analog.meaning->channels = l;
162 analog.encoding->digits = info.digits[i];
163 analog.spec->spec_digits = info.digits[i];
164 analog.data = &(info.temp[i]);
165 sr_session_send(sdi, &packet);
169 sr_sw_limits_update_samples_read(&devc->sw_limits, 1);
174 /* Return TRUE if a full packet was parsed, FALSE otherwise. */
175 static gboolean handle_new_data(struct sr_dev_inst *sdi, int idx)
177 struct dev_context *devc;
178 struct sr_serial_dev_inst *serial;
179 int len, offset, ret = FALSE;
184 /* Try to get as much data as the buffer can hold. */
185 len = SERIAL_BUFSIZE - devc->buflen;
186 len = serial_read_nonblocking(serial, devc->buf + devc->buflen, len);
188 sr_err("Serial port read error: %d.", len);
194 /* Now look for packets in that data. */
196 while ((devc->buflen - offset) >= center_devs[idx].packet_size) {
197 if (center_devs[idx].packet_valid(devc->buf + offset)) {
198 handle_packet(devc->buf + offset, sdi, idx);
199 offset += center_devs[idx].packet_size;
206 /* If we have any data left, move it to the beginning of our buffer. */
207 if (offset < devc->buflen)
208 memmove(devc->buf, devc->buf + offset, devc->buflen - offset);
209 devc->buflen -= offset;
214 static int receive_data(int fd, int revents, int idx, void *cb_data)
216 struct sr_dev_inst *sdi;
217 struct dev_context *devc;
218 static gboolean request_new_packet = TRUE;
219 struct sr_serial_dev_inst *serial;
223 if (!(sdi = cb_data))
226 if (!(devc = sdi->priv))
231 if (revents == G_IO_IN) {
232 /* New data arrived. */
233 request_new_packet = handle_new_data(sdi, idx);
236 * Timeout. Send "A" to request a packet, but then don't send
237 * further "A" commands until we received a full packet first.
239 if (request_new_packet) {
240 center_send(serial, "A");
241 request_new_packet = FALSE;
245 if (sr_sw_limits_check(&devc->sw_limits))
246 sr_dev_acquisition_stop(sdi);
251 #define RECEIVE_DATA(ID_UPPER) \
252 SR_PRIV int receive_data_##ID_UPPER(int fd, int revents, void *cb_data) { \
253 return receive_data(fd, revents, ID_UPPER, cb_data); }
255 /* Driver-specific receive_data() wrappers */
256 RECEIVE_DATA(CENTER_309)
257 RECEIVE_DATA(VOLTCRAFT_K204)