2 * This file is part of the libsigrok project.
4 * Copyright (C) 2016 George Hopkins <george-hopkins@null.net>
5 * Copyright (C) 2016 Matthieu Guillaumin <matthieu@guillaum.in>
7 * This program is free software: you can redistribute it and/or modify
8 * it under the terms of the GNU General Public License as published by
9 * the Free Software Foundation, either version 3 of the License, or
10 * (at your option) any later version.
12 * This program is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 * GNU General Public License for more details.
17 * You should have received a copy of the GNU General Public License
18 * along with this program. If not, see <http://www.gnu.org/licenses/>.
24 static int send_command(const struct sr_dev_inst *sdi, uint16_t command)
26 struct sr_serial_dev_inst *serial;
29 buffer[0] = command >> 8;
32 if (!(serial = sdi->conn))
35 if (serial_write_nonblocking(serial, (const void *)buffer, 2) != 2)
41 static int send_long_command(const struct sr_dev_inst *sdi, uint32_t command)
43 struct sr_serial_dev_inst *serial;
46 buffer[0] = command >> 24;
47 buffer[1] = command >> 16;
48 buffer[2] = command >> 8;
51 if (!(serial = sdi->conn))
54 if (serial_write_nonblocking(serial, (const void *)buffer, 4) != 4)
60 static void send_data(const struct sr_dev_inst *sdi, float sample)
62 struct dev_context *devc;
63 struct sr_datafeed_packet packet;
64 struct sr_datafeed_analog analog;
65 struct sr_analog_encoding encoding;
66 struct sr_analog_meaning meaning;
67 struct sr_analog_spec spec;
71 sr_analog_init(&analog, &encoding, &meaning, &spec, 1);
72 meaning.mq = SR_MQ_SOUND_PRESSURE_LEVEL;
73 meaning.mqflags = devc->cur_mqflags;
74 meaning.unit = SR_UNIT_DECIBEL_SPL;
75 meaning.channels = sdi->channels;
76 analog.num_samples = 1;
77 analog.data = &sample;
78 packet.type = SR_DF_ANALOG;
79 packet.payload = &analog;
80 sr_session_send(sdi, &packet);
83 /* Limiting number of samples is only supported for live data. */
84 if (devc->cur_data_source == DATA_SOURCE_LIVE && devc->limit_samples && devc->num_samples >= devc->limit_samples)
85 sdi->driver->dev_acquisition_stop((struct sr_dev_inst *)sdi);
88 static void process_measurement(const struct sr_dev_inst *sdi)
90 struct dev_context *devc;
95 if (devc->buffer[3] & (1 << 0)) {
96 devc->cur_mqflags |= SR_MQFLAG_SPL_FREQ_WEIGHT_C;
97 devc->cur_mqflags &= ~SR_MQFLAG_SPL_FREQ_WEIGHT_A;
99 devc->cur_mqflags |= SR_MQFLAG_SPL_FREQ_WEIGHT_A;
100 devc->cur_mqflags &= ~SR_MQFLAG_SPL_FREQ_WEIGHT_C;
103 if (devc->buffer[3] & (1 << 1)) {
104 devc->cur_mqflags |= SR_MQFLAG_SPL_TIME_WEIGHT_S;
105 devc->cur_mqflags &= ~SR_MQFLAG_SPL_TIME_WEIGHT_F;
107 devc->cur_mqflags |= SR_MQFLAG_SPL_TIME_WEIGHT_F;
108 devc->cur_mqflags &= ~SR_MQFLAG_SPL_TIME_WEIGHT_S;
111 devc->cur_meas_range = devc->buffer[4] & 3;
113 if (devc->buffer[4] & (1 << 2)) {
114 devc->cur_mqflags |= SR_MQFLAG_MAX;
115 devc->cur_mqflags &= ~SR_MQFLAG_MIN;
116 } else if (devc->buffer[4] & (1 << 3)) {
117 devc->cur_mqflags |= SR_MQFLAG_MIN;
118 devc->cur_mqflags &= ~SR_MQFLAG_MAX;
120 devc->cur_mqflags &= ~SR_MQFLAG_MIN;
121 devc->cur_mqflags &= ~SR_MQFLAG_MAX;
124 value = devc->buffer[1] << 8 | devc->buffer[2];
125 send_data(sdi, value / 10.0);
128 static void process_memory_measurement(const struct sr_dev_inst *sdi)
130 struct dev_context *devc;
134 value = devc->buffer[devc->buffer_len - 1] << 8;
135 value |= devc->buffer[devc->buffer_len - 2];
137 send_data(sdi, value / 10.0);
140 static void process_byte(const struct sr_dev_inst *sdi, const unsigned char c)
142 struct dev_context *devc;
147 if (devc->buffer_len < BUFFER_SIZE) {
148 devc->buffer[devc->buffer_len++] = c;
150 for (i = 1; i < BUFFER_SIZE; i++)
151 devc->buffer[i - 1] = devc->buffer[i];
152 devc->buffer[BUFFER_SIZE - 1] = c;
155 if (devc->buffer_len == BUFFER_SIZE && devc->buffer[0] == 0x7f
156 && devc->buffer[BUFFER_SIZE - 1] == 0x00) {
157 process_measurement(sdi);
158 devc->buffer_len = 0;
162 static void process_usage_byte(const struct sr_dev_inst *sdi, uint8_t c)
164 struct dev_context *devc;
169 if (devc->buffer_len < MEM_USAGE_BUFFER_SIZE) {
170 devc->buffer[devc->buffer_len++] = c;
172 for (i = 1; i < MEM_USAGE_BUFFER_SIZE; i++)
173 devc->buffer[i - 1] = devc->buffer[i];
174 devc->buffer[MEM_USAGE_BUFFER_SIZE - 1] = c;
177 if (devc->buffer_len == MEM_USAGE_BUFFER_SIZE && devc->buffer[0] == 0xd1
178 && devc->buffer[1] == 0x05 && devc->buffer[2] == 0x00
179 && devc->buffer[3] == 0x01 && devc->buffer[4] == 0xd2
180 && devc->buffer[MEM_USAGE_BUFFER_SIZE - 1] == 0x20) {
181 devc->memory_block_usage = devc->buffer[5] << 8 | devc->buffer[6];
182 devc->memory_last_block_usage = devc->buffer[7];
183 sr_warn("Memory usage: %d blocks of 256 bytes, 1 block of %d bytes",
184 devc->memory_block_usage - 1, devc->memory_last_block_usage);
185 devc->buffer_len = 0;
186 devc->buffer_skip = 1;
187 devc->memory_state = MEM_STATE_REQUEST_MEMORY_BLOCK;
188 devc->memory_block_cursor = 0;
189 devc->memory_block_counter = 0;
193 static void process_memory_byte(const struct sr_dev_inst *sdi, uint8_t c)
195 struct dev_context *devc;
200 if (devc->buffer_len < MEM_DATA_BUFFER_SIZE) {
201 devc->buffer[devc->buffer_len++] = c;
203 for (i = 1; i < MEM_DATA_BUFFER_SIZE; i++)
204 devc->buffer[i - 1] = devc->buffer[i];
205 devc->buffer[MEM_DATA_BUFFER_SIZE - 1] = c;
208 if (devc->buffer_skip == 0 \
209 && (devc->buffer[devc->buffer_len-2] & 0x7f) == 0x7f
210 && (devc->buffer[devc->buffer_len-1] & 0xf7) == 0xf7) {
211 /* Recording session header bytes found, load next 7 bytes. */
212 devc->buffer_skip = MEM_DATA_BUFFER_SIZE - 2;
215 if (devc->buffer_skip == 0 && devc->buffer_len == MEM_DATA_BUFFER_SIZE
216 && (devc->buffer[0] & 0x7f) == 0x7f && (devc->buffer[1] & 0xf7) == 0xf7
217 && devc->buffer[2] == 0x01 && devc->buffer[3] == 0x00) {
218 /* Print information about recording. */
219 sr_err("Recording dB(%X) %02x/%02x/%02x %02x:%02x:%02x ",
220 devc->buffer[4], devc->buffer[5], devc->buffer[6], devc->buffer[7],
221 devc->buffer[8] & 0x3f, devc->buffer[9], devc->buffer[10]);
222 /* Set dBA/dBC flag for recording. */
223 if (devc->buffer[4] == 0x0c) {
224 devc->cur_mqflags |= SR_MQFLAG_SPL_FREQ_WEIGHT_C;
225 devc->cur_mqflags &= ~SR_MQFLAG_SPL_FREQ_WEIGHT_A;
227 devc->cur_mqflags |= SR_MQFLAG_SPL_FREQ_WEIGHT_A;
228 devc->cur_mqflags &= ~SR_MQFLAG_SPL_FREQ_WEIGHT_C;
230 send_data(sdi, -1.0); /* Signal switch of recording. */
231 devc->buffer_skip = 2;
234 if (devc->buffer_skip == 0) {
235 process_memory_measurement(sdi);
236 devc->buffer_skip = 1;
238 devc->buffer_skip -= 1;
241 devc->memory_block_cursor++; /* uint8_t goes back to 0 after 255. */
242 if (devc->memory_block_cursor == 0) {
243 /* Current block is completed. */
244 devc->memory_block_counter++;
245 devc->memory_state = MEM_STATE_REQUEST_MEMORY_BLOCK;
249 SR_PRIV int pce_322a_receive_data(int fd, int revents, void *cb_data)
251 const struct sr_dev_inst *sdi;
252 struct dev_context *devc;
253 struct sr_serial_dev_inst *serial;
258 if (!(sdi = cb_data))
261 if (!(devc = sdi->priv))
264 if (!(serial = sdi->conn))
267 if (devc->cur_data_source == DATA_SOURCE_MEMORY) {
268 switch (devc->memory_state) {
269 case MEM_STATE_REQUEST_MEMORY_USAGE:
270 /* At init, disconnect and request the memory status. */
271 sr_warn("Requesting memory usage.");
272 pce_322a_disconnect(sdi);
273 devc->memory_state = MEM_STATE_GET_MEMORY_USAGE;
274 devc->memory_block_usage = 0;
275 devc->memory_last_block_usage = 0;
276 devc->memory_block_counter = 0;
277 devc->memory_block_cursor = 0;
278 pce_322a_memory_status(sdi);
280 case MEM_STATE_GET_MEMORY_USAGE:
281 /* Listen for memory usage answer. */
282 if (revents == G_IO_IN) {
283 if (serial_read_nonblocking(serial, &c, 1) != 1)
285 process_usage_byte(sdi, c);
288 case MEM_STATE_REQUEST_MEMORY_BLOCK:
289 /* When cursor is 0, request next memory block. */
290 if (devc->memory_block_counter <= devc->memory_block_usage) {
291 sr_warn("Requesting memory block %d.", devc->memory_block_counter);
292 pce_322a_memory_block(sdi, devc->memory_block_counter);
293 devc->memory_state = MEM_STATE_GET_MEMORY_BLOCK;
295 sr_warn("Exhausted memory blocks.");
299 case MEM_STATE_GET_MEMORY_BLOCK:
300 /* Stop after reading last byte of last block. */
301 if (devc->memory_block_counter >= devc->memory_block_usage
302 && devc->memory_block_cursor >= devc->memory_last_block_usage) {
303 sr_warn("Done reading memory (%d bytes).",
304 256 * (devc->memory_block_counter - 1)
305 + devc->memory_block_cursor);
308 /* Listen for memory data. */
309 if (revents == G_IO_IN) {
310 if (serial_read_nonblocking(serial, &c, 1) != 1)
312 process_memory_byte(sdi, c);
317 /* Listen for live data. */
318 if (revents == G_IO_IN) {
319 if (serial_read_nonblocking(serial, &c, 1) != 1)
321 process_byte(sdi, c);
328 SR_PRIV int pce_322a_connect(const struct sr_dev_inst *sdi)
330 return send_command(sdi, CMD_CONNECT);
333 SR_PRIV int pce_322a_disconnect(const struct sr_dev_inst *sdi)
335 return send_command(sdi, CMD_DISCONNECT);
338 SR_PRIV int pce_322a_memory_status(const struct sr_dev_inst *sdi)
340 return send_command(sdi, CMD_MEMORY_STATUS);
343 SR_PRIV int pce_322a_memory_clear(const struct sr_dev_inst *sdi)
345 return send_command(sdi, CMD_MEMORY_CLEAR);
348 SR_PRIV int pce_322a_memory_block(const struct sr_dev_inst *sdi, uint16_t memblk)
350 uint8_t buf0 = memblk;
351 uint8_t buf1 = memblk >> 8;
352 uint32_t command = CMD_MEMORY_TRANSFER << 16 | buf0 << 8 | buf1;
353 return send_long_command(sdi, command);
356 SR_PRIV uint64_t pce_322a_weight_freq_get(const struct sr_dev_inst *sdi)
358 struct dev_context *devc;
362 return devc->cur_mqflags & (SR_MQFLAG_SPL_FREQ_WEIGHT_A | SR_MQFLAG_SPL_FREQ_WEIGHT_C);
365 SR_PRIV int pce_322a_weight_freq_set(const struct sr_dev_inst *sdi, uint64_t freqw)
367 struct dev_context *devc;
371 if (devc->cur_mqflags & freqw)
374 return send_command(sdi, CMD_TOGGLE_WEIGHT_FREQ);
377 SR_PRIV uint64_t pce_322a_weight_time_get(const struct sr_dev_inst *sdi)
379 struct dev_context *devc;
383 return devc->cur_mqflags & (SR_MQFLAG_SPL_TIME_WEIGHT_F | SR_MQFLAG_SPL_TIME_WEIGHT_S);
386 SR_PRIV int pce_322a_weight_time_set(const struct sr_dev_inst *sdi, uint64_t timew)
388 struct dev_context *devc;
392 if (devc->cur_mqflags & timew)
395 return send_command(sdi, CMD_TOGGLE_WEIGHT_TIME);
398 SR_PRIV int pce_322a_meas_range_get(const struct sr_dev_inst *sdi,
399 uint64_t *low, uint64_t *high)
401 struct dev_context *devc;
405 switch (devc->cur_meas_range) {
406 case MEAS_RANGE_30_130:
410 case MEAS_RANGE_30_80:
414 case MEAS_RANGE_50_100:
418 case MEAS_RANGE_80_130:
429 SR_PRIV int pce_322a_meas_range_set(const struct sr_dev_inst *sdi,
430 uint64_t low, uint64_t high)
432 struct dev_context *devc;
438 if (low == 30 && high == 130)
439 range = MEAS_RANGE_30_130;
440 else if (low == 30 && high == 80)
441 range = MEAS_RANGE_30_80;
442 else if (low == 50 && high == 100)
443 range = MEAS_RANGE_50_100;
444 else if (low == 80 && high == 130)
445 range = MEAS_RANGE_80_130;
449 while (range != devc->cur_meas_range) {
450 ret = send_command(sdi, CMD_TOGGLE_MEAS_RANGE);
453 range = (range - 1) & 3;
459 SR_PRIV int pce_322a_power_off(const struct sr_dev_inst *sdi)
461 return send_command(sdi, CMD_POWER_OFF);