IEEE 802.15.4 subsystem
Sign in or create your account | Project List | Help
IEEE 802.15.4 subsystem Git Source Tree
Root/
Source at commit bb6acf15bc6a498449d3ea3113ce1cf82cfacee1 created 10 years 9 months ago. By Werner Almesberger, tools/atrf-txrx/atrf-txrx.c (usage): separate all sections by blank line | |
---|---|
1 | /* |
2 | * atrf-txrx/atrf-txrx.c - ben-wpan AT86RF230 TX/RX |
3 | * |
4 | * Written 2010-2011, 2013 by Werner Almesberger |
5 | * Copyright 2010-2011, 2013 Werner Almesberger |
6 | * |
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 2 of the License, or |
10 | * (at your option) any later version. |
11 | */ |
12 | |
13 | |
14 | #include <stdint.h> |
15 | #include <stdlib.h> |
16 | #include <stdio.h> |
17 | #include <unistd.h> |
18 | #include <string.h> |
19 | #include <math.h> |
20 | #include <signal.h> |
21 | #include <sys/wait.h> |
22 | #include <sys/time.h> |
23 | |
24 | #include "at86rf230.h" |
25 | #include "atrf.h" |
26 | #include "misctxrx.h" |
27 | #include "cwtest.h" |
28 | |
29 | #include "pcap.h" |
30 | |
31 | |
32 | /* |
33 | * According to IEEE 802.15.4-2003 section E.2.6, channel 15 is the only |
34 | * channel that falls into the 802.11 guard bands in North America an Europe. |
35 | */ |
36 | |
37 | #define DEFAULT_CHANNEL 15 /* channel 15, 2425 MHz */ |
38 | |
39 | #define DEFAULT_TRIM 8 /* trim range is 0-15, see also ECN0002 */ |
40 | |
41 | |
42 | /* |
43 | * Transmit power, dBm. IEEE 802.15.4-2003 section E.3.1.3 specifies a transmit |
44 | * power of 0 dBm for IEEE 802.15.4. We assume an antenna gain of 3 dB or |
45 | * better. |
46 | */ |
47 | |
48 | #define DEFAULT_POWER -3.2 /* transmit power, dBm */ |
49 | |
50 | |
51 | struct ping { |
52 | uint32_t seq; /* sequence number from originator, > 0 */ |
53 | uint32_t ack; /* last sequence number received, 0 if none */ |
54 | uint8_t pad[117]; /* pad to 127 bytes */ |
55 | uint16_t crc; |
56 | } __attribute__((__packed__)); |
57 | |
58 | enum rx_res { |
59 | rx_exit, |
60 | rx_good, |
61 | rx_bad, |
62 | rx_timeout, |
63 | }; |
64 | |
65 | enum mode { |
66 | mode_msg, |
67 | mode_hmac, |
68 | mode_per, |
69 | mode_ping, |
70 | mode_rtt, |
71 | mode_rtt_hmac, |
72 | mode_cont_tx, |
73 | }; |
74 | |
75 | |
76 | static volatile int run = 1; |
77 | |
78 | |
79 | /* ----- Helper functions -------------------------------------------------- */ |
80 | |
81 | |
82 | /* |
83 | * mhz: 0 disable CLKM |
84 | * >0 output specified clock |
85 | */ |
86 | |
87 | static struct atrf_dsc *init_txrx(const char *driver, int trim, unsigned mhz) |
88 | { |
89 | struct atrf_dsc *dsc; |
90 | |
91 | dsc = atrf_open(driver); |
92 | if (!dsc) |
93 | exit(1); |
94 | |
95 | atrf_reset_rf(dsc); |
96 | atrf_reg_write(dsc, REG_TRX_STATE, TRX_CMD_TRX_OFF); |
97 | |
98 | #if 1 // def HAVE_USB /* @@@ yeah, ugly */ |
99 | atrf_reg_write(dsc, REG_XOSC_CTRL, |
100 | (XTAL_MODE_INT << XTAL_MODE_SHIFT) | trim); |
101 | #else |
102 | atrf_reg_write(dsc, REG_XOSC_CTRL, XTAL_MODE_EXT << XTAL_MODE_SHIFT); |
103 | #endif |
104 | |
105 | if (!atrf_set_clkm(dsc, mhz)) |
106 | if (mhz) { |
107 | atrf_close(dsc); |
108 | exit(1); |
109 | } |
110 | |
111 | /* We want to see all interrupts, not only the ones we're expecting. */ |
112 | atrf_reg_write(dsc, REG_IRQ_MASK, 0xff); |
113 | |
114 | flush_interrupts(dsc); |
115 | if (atrf_identify(dsc) == atrf_at86rf231) |
116 | wait_for_interrupt(dsc, IRQ_CCA_ED_DONE, IRQ_CCA_ED_DONE, 1); |
117 | /* according to table 7-1, 37 us max */ |
118 | |
119 | return dsc; |
120 | } |
121 | |
122 | |
123 | static void set_channel(struct atrf_dsc *dsc, int channel) |
124 | { |
125 | atrf_reg_write(dsc, REG_PHY_CC_CCA, (1 << CCA_MODE_SHIFT) | channel); |
126 | } |
127 | |
128 | |
129 | static void set_rate(struct atrf_dsc *dsc, uint8_t rate) |
130 | { |
131 | if (!rate) |
132 | return; |
133 | switch (atrf_identify(dsc)) { |
134 | case atrf_at86rf230: |
135 | fprintf(stderr, "AT86RF230 only supports 250 kbps\n"); |
136 | break; |
137 | case atrf_at86rf231: |
138 | atrf_reg_write(dsc, REG_TRX_CTRL_2, rate); |
139 | break; |
140 | default: |
141 | abort(); |
142 | } |
143 | } |
144 | |
145 | |
146 | /* ----- Message transmit/receive ------------------------------------------ */ |
147 | |
148 | |
149 | static void receive_message(struct atrf_dsc *dsc) |
150 | { |
151 | uint8_t buf[MAX_PSDU+1]; /* PSDU+LQI */ |
152 | int n, ok, i; |
153 | uint8_t ed, lqi; |
154 | |
155 | fprintf(stderr, "Ready.\n"); |
156 | wait_for_interrupt(dsc, IRQ_TRX_END, |
157 | IRQ_TRX_END | IRQ_RX_START | IRQ_AMI, 0); |
158 | if (!run) |
159 | return; |
160 | |
161 | n = atrf_buf_read(dsc, buf, sizeof(buf)); |
162 | if (n < 0) |
163 | exit(1); |
164 | if (n < 3) { |
165 | fprintf(stderr, "%d bytes received\n", n); |
166 | exit(1); |
167 | } |
168 | ed = atrf_reg_read(dsc, REG_PHY_ED_LEVEL); |
169 | ok = !!(atrf_reg_read(dsc, REG_PHY_RSSI) & RX_CRC_VALID); |
170 | lqi = buf[n-1]; |
171 | fprintf(stderr, "%d bytes payload, CRC %s, LQI %u, ED %d dBm\n", |
172 | n-3, ok ? "OK" : "BAD", lqi, -91+ed); |
173 | for (i = 0; i != n-3; i++) |
174 | putchar(buf[i] < ' ' || buf[i] > '~' ? '?' : buf[i]); |
175 | putchar('\n'); |
176 | } |
177 | |
178 | |
179 | static void write_pcap_hdr(FILE *file) |
180 | { |
181 | struct pcap_file_header hdr = { |
182 | .magic = PCAP_FILE_MAGIC, |
183 | .version_major = 2, |
184 | .version_minor = 4, |
185 | .thiszone = 0, |
186 | .sigfigs = 0, |
187 | .snaplen = MAX_PSDU, |
188 | .linktype = DLT_IEEE802_15_4 |
189 | }; |
190 | |
191 | if (fwrite(&hdr, sizeof(hdr), 1, file) != 1) { |
192 | perror("fwrite"); |
193 | exit(1); |
194 | } |
195 | } |
196 | |
197 | |
198 | static void write_pcap_rec(FILE *file, const struct timeval *tv, |
199 | const void *buf, int n) |
200 | { |
201 | struct pcap_pkthdr hdr = { |
202 | .ts_sec = tv->tv_sec, |
203 | .ts_usec = tv->tv_usec, |
204 | .caplen = n, |
205 | .len = n |
206 | }; |
207 | |
208 | if (fwrite(&hdr, sizeof(hdr), 1, file) != 1) { |
209 | perror("fwrite"); |
210 | exit(1); |
211 | } |
212 | if (fwrite(buf, n, 1, file) != 1) { |
213 | perror("fwrite"); |
214 | exit(1); |
215 | } |
216 | } |
217 | |
218 | |
219 | static void receive_pcap(struct atrf_dsc *dsc, const char *name) |
220 | { |
221 | FILE *file; |
222 | uint8_t buf[MAX_PSDU+1]; /* PSDU+LQI */ |
223 | struct timeval now; |
224 | int n; |
225 | int count = 0; |
226 | |
227 | file = fopen(name, "w"); |
228 | if (!file) { |
229 | perror(name); |
230 | exit(1); |
231 | } |
232 | write_pcap_hdr(file); |
233 | while (run) { |
234 | wait_for_interrupt(dsc, |
235 | IRQ_TRX_END, IRQ_TRX_END | IRQ_RX_START | IRQ_AMI, 0); |
236 | if (!run) |
237 | break; |
238 | gettimeofday(&now, NULL); |
239 | n = atrf_buf_read(dsc, buf, sizeof(buf)); |
240 | if (n < 0) |
241 | exit(1); |
242 | if (n < 2) { |
243 | fprintf(stderr, "%d bytes received\n", n); |
244 | continue; |
245 | } |
246 | write_pcap_rec(file, &now, buf, n-1); |
247 | (void) write(2, ".", 1); |
248 | count++; |
249 | } |
250 | if (fclose(file) == EOF) { |
251 | perror(name); |
252 | exit(1); |
253 | } |
254 | fprintf(stderr, "%sreceived %d message%s\n", count ? "\n" : "", |
255 | count, count == 1 ? "" : "s"); |
256 | } |
257 | |
258 | |
259 | static void receive(struct atrf_dsc *dsc, const char *name) |
260 | { |
261 | atrf_reg_write(dsc, REG_TRX_STATE, TRX_CMD_RX_ON); |
262 | /* |
263 | * 180 us, according to AVR2001 section 4.2. We time out after |
264 | * nominally 200 us. |
265 | */ |
266 | wait_for_interrupt(dsc, IRQ_PLL_LOCK, IRQ_PLL_LOCK, 1); |
267 | |
268 | if (name) |
269 | receive_pcap(dsc, name); |
270 | else |
271 | receive_message(dsc); |
272 | } |
273 | |
274 | |
275 | static void transmit(struct atrf_dsc *dsc, const char *msg, int times) |
276 | { |
277 | uint8_t buf[MAX_PSDU]; |
278 | |
279 | atrf_reg_write(dsc, REG_TRX_STATE, TRX_CMD_PLL_ON); |
280 | /* |
281 | * 180 us, according to AVR2001 section 4.3. We time out after |
282 | * nominally 200 us. |
283 | */ |
284 | wait_for_interrupt(dsc, IRQ_PLL_LOCK, IRQ_PLL_LOCK, 1); |
285 | |
286 | /* |
287 | * We need to copy the message to append the CRC placeholders. |
288 | */ |
289 | strcpy((void *) buf, msg); |
290 | atrf_buf_write(dsc, buf, strlen(msg)+2); |
291 | |
292 | while (run && times--) { |
293 | /* @@@ should wait for clear channel */ |
294 | atrf_reg_write(dsc, REG_TRX_STATE, TRX_CMD_TX_START); |
295 | |
296 | /* wait up to 10 ms (nominally) */ |
297 | wait_for_interrupt(dsc, IRQ_TRX_END, |
298 | IRQ_TRX_END | IRQ_PLL_LOCK, 10); |
299 | } |
300 | } |
301 | |
302 | |
303 | static void receive_hmac(struct atrf_dsc *dsc) |
304 | { |
305 | uint8_t buf[MAX_PSDU]; |
306 | uint8_t lqi; |
307 | int n, i; |
308 | |
309 | atrf_rx_mode(dsc, 1); |
310 | n = atrf_rx(dsc, buf, sizeof(buf), 0, &lqi); |
311 | atrf_rx_mode(dsc, 0); |
312 | |
313 | if (n < 2) { |
314 | fprintf(stderr, "%d bytes received\n", n); |
315 | exit(1); |
316 | } |
317 | for (i = 0; i != n-2; i++) |
318 | putchar(buf[i] < ' ' || buf[i] > '~' ? '?' : buf[i]); |
319 | putchar('\n'); |
320 | } |
321 | |
322 | |
323 | static void transmit_hmac(struct atrf_dsc *dsc, const char *msg) |
324 | { |
325 | atrf_rx_mode(dsc, 1); |
326 | atrf_tx(dsc, msg, strlen(msg)); |
327 | atrf_rx_mode(dsc, 0); |
328 | } |
329 | |
330 | |
331 | /* ----- PER test ---------------------------------------------------------- */ |
332 | |
333 | |
334 | static void transmit_pattern(struct atrf_dsc *dsc, double pause_s, int times) |
335 | { |
336 | uint8_t buf[MAX_PSDU]; |
337 | uint8_t n = 0; |
338 | int us = fmod(pause_s, 1)*1000000; |
339 | |
340 | atrf_reg_write(dsc, REG_TRX_STATE, TRX_CMD_PLL_ON); |
341 | /* |
342 | * 180 us, according to AVR2001 section 4.3. We time out after |
343 | * nominally 200 us. |
344 | */ |
345 | wait_for_interrupt(dsc, IRQ_PLL_LOCK, IRQ_PLL_LOCK, 1); |
346 | |
347 | while (run) { |
348 | memset(buf, n, sizeof(buf)); |
349 | atrf_buf_write(dsc, buf, sizeof(buf)); |
350 | |
351 | atrf_reg_write(dsc, REG_TRX_STATE, TRX_CMD_TX_START); |
352 | |
353 | /* wait up to 10 ms (nominally) */ |
354 | wait_for_interrupt(dsc, IRQ_TRX_END, |
355 | IRQ_TRX_END | IRQ_PLL_LOCK, 10); |
356 | |
357 | if (pause_s >= 1) |
358 | sleep(pause_s); |
359 | if (us) |
360 | usleep(us); |
361 | |
362 | if (times && !--times) |
363 | break; |
364 | n++; |
365 | } |
366 | } |
367 | |
368 | |
369 | /* ----- Ping -------------------------------------------------------------- */ |
370 | |
371 | |
372 | static void ping_tx(struct atrf_dsc *dsc, const struct ping *pck) |
373 | { |
374 | atrf_reg_write(dsc, REG_TRX_STATE, TRX_CMD_PLL_ON); |
375 | /* |
376 | * 180 us, according to AVR2001 section 4.3. We time out after |
377 | * nominally 200 us. |
378 | */ |
379 | wait_for_interrupt(dsc, IRQ_PLL_LOCK, IRQ_PLL_LOCK, 1); |
380 | |
381 | atrf_buf_write(dsc, pck, sizeof(*pck)); |
382 | atrf_reg_write(dsc, REG_TRX_STATE, TRX_CMD_TX_START); |
383 | |
384 | /* wait up to 10 ms (nominally) */ |
385 | wait_for_interrupt(dsc, IRQ_TRX_END, |
386 | IRQ_TRX_END | IRQ_PLL_LOCK, 10); |
387 | } |
388 | |
389 | |
390 | static enum rx_res ping_rx(struct atrf_dsc *dsc, struct ping *pck, int wait_ms) |
391 | { |
392 | uint8_t irq; |
393 | int n; |
394 | |
395 | atrf_reg_write(dsc, REG_TRX_STATE, TRX_CMD_RX_ON); |
396 | irq = wait_for_interrupt(dsc, IRQ_TRX_END, |
397 | IRQ_TRX_END | IRQ_RX_START | IRQ_PLL_LOCK, wait_ms); |
398 | if (!run) |
399 | return rx_exit; |
400 | if (!irq) |
401 | return rx_timeout; |
402 | |
403 | n = atrf_buf_read(dsc, pck, sizeof(*pck)); |
404 | if (n < 0) |
405 | exit(1); |
406 | if (n != sizeof(*pck)) { |
407 | fprintf(stderr, "%d bytes received\n", n); |
408 | return rx_bad; |
409 | } |
410 | return atrf_reg_read(dsc, REG_PHY_RSSI) & RX_CRC_VALID ? |
411 | rx_good : rx_bad; |
412 | } |
413 | |
414 | |
415 | static void ping(struct atrf_dsc *dsc, double max_wait_s, int master) |
416 | { |
417 | static int first = 1; |
418 | struct ping tx_pck = { |
419 | .seq = 0, |
420 | .ack = 0, |
421 | }; |
422 | struct ping rx_pck; |
423 | enum rx_res res; |
424 | |
425 | while (run) { |
426 | tx_pck.seq++; |
427 | if (master || !first) { |
428 | ping_tx(dsc, &tx_pck); |
429 | if (!run) |
430 | break; |
431 | } |
432 | first = 0; |
433 | res = ping_rx(dsc, &rx_pck, master ? max_wait_s*1000 : 0); |
434 | switch (res) { |
435 | case rx_good: |
436 | tx_pck.ack = rx_pck.seq; |
437 | if (tx_pck.seq == rx_pck.ack) |
438 | write(2, ".", 1); |
439 | else |
440 | write(2, "*", 1); |
441 | break; |
442 | case rx_bad: |
443 | write(2, "-", 1); |
444 | break; |
445 | case rx_timeout: |
446 | write(2, "+", 1); |
447 | break; |
448 | case rx_exit: |
449 | return; |
450 | default: |
451 | abort(); |
452 | } |
453 | } |
454 | } |
455 | |
456 | |
457 | /* ----- Round-trip time --------------------------------------------------- */ |
458 | |
459 | |
460 | static void rtt_slave(struct atrf_dsc *dsc) |
461 | { |
462 | uint8_t buf[MAX_PSDU]; |
463 | int n; |
464 | |
465 | while (run) { |
466 | atrf_reg_write(dsc, REG_TRX_STATE, TRX_CMD_RX_ON); |
467 | wait_for_interrupt(dsc, IRQ_TRX_END, |
468 | IRQ_TRX_END | IRQ_RX_START | IRQ_PLL_LOCK | IRQ_AMI, 0); |
469 | if (!run) |
470 | break; |
471 | n = atrf_buf_read(dsc, buf, sizeof(buf)); |
472 | if (n < 0) |
473 | exit(1); |
474 | if (n < 2) { |
475 | fprintf(stderr, "%d bytes received\n", n); |
476 | continue; |
477 | } |
478 | atrf_reg_write(dsc, REG_TRX_STATE, TRX_CMD_PLL_ON); |
479 | atrf_buf_write(dsc, buf, n); |
480 | atrf_reg_write(dsc, REG_TRX_STATE, TRX_CMD_TX_START); |
481 | wait_for_interrupt(dsc, IRQ_TRX_END, |
482 | IRQ_TRX_END | IRQ_PLL_LOCK, 10); |
483 | } |
484 | } |
485 | |
486 | |
487 | static void rtt_slave_hmac(struct atrf_dsc *dsc) |
488 | { |
489 | uint8_t buf[MAX_PSDU]; |
490 | int n; |
491 | |
492 | atrf_rx_mode(dsc, 1); |
493 | while (run) { |
494 | n = atrf_rx(dsc, buf, sizeof(buf), 0, NULL); |
495 | if (n < 0) |
496 | exit(1); |
497 | atrf_tx(dsc, buf, n-2); |
498 | } |
499 | atrf_rx_mode(dsc, 0); |
500 | } |
501 | |
502 | |
503 | static void rtt_master(struct atrf_dsc *dsc, int packets, int size) |
504 | { |
505 | uint8_t buf[size+2]; /* +CRC */ |
506 | struct timeval t0, t1; |
507 | uint8_t irq; |
508 | int first = 1; |
509 | double min = 0, max = 0, sum = 0, sum2 = 0, d; |
510 | int lost = 0, n; |
511 | int i; |
512 | |
513 | memset(buf, 0, size+2); |
514 | for (i = 0; i != packets; i++) { |
515 | atrf_reg_write(dsc, REG_TRX_STATE, TRX_CMD_PLL_ON); |
516 | atrf_buf_write(dsc, buf, size+2); |
517 | gettimeofday(&t0, NULL); |
518 | atrf_reg_write(dsc, REG_TRX_STATE, TRX_CMD_TX_START); |
519 | |
520 | /* prepare transition to RX_ON while still sending */ |
521 | while ((atrf_reg_read(dsc, REG_TRX_STATUS) & TRX_STATUS_MASK) |
522 | == TRX_STATUS_TRANSITION); |
523 | atrf_reg_write(dsc, REG_TRX_STATE, TRX_CMD_RX_ON); |
524 | |
525 | /* wait for transmission to end */ |
526 | wait_for_interrupt(dsc, IRQ_TRX_END, |
527 | IRQ_TRX_END | IRQ_RX_START | IRQ_PLL_LOCK | IRQ_AMI, 1); |
528 | |
529 | /* wait for reception */ |
530 | irq = wait_for_interrupt(dsc, IRQ_TRX_END, |
531 | IRQ_TRX_END | IRQ_RX_START | IRQ_PLL_LOCK | IRQ_AMI, 1000); |
532 | if (irq) { |
533 | gettimeofday(&t1, NULL); |
534 | d = t1.tv_sec-t0.tv_sec+(t1.tv_usec-t0.tv_usec)*1e-6; |
535 | sum += d; |
536 | sum2 += d*d; |
537 | if (first || d < min) |
538 | min = d; |
539 | if (first || d > max) |
540 | max = d; |
541 | first = 0; |
542 | n = atrf_buf_read(dsc, buf, size); |
543 | if (n != size) |
544 | fprintf(stderr, "%d bytes received\n", n); |
545 | } else { |
546 | lost++; |
547 | } |
548 | } |
549 | n = packets-lost; |
550 | printf("%d sent, %d received, %d lost (%g%%)\n", |
551 | packets, n, lost, lost*100.0/packets); |
552 | if (n) |
553 | printf("rtt min/avg/max = %.3f/%.3f/%.3f ms, mdev = %.3f ms\n", |
554 | min*1000.0, sum*1000.0/n, max*1000.0, |
555 | sqrt((sum2-sum*sum/n)/n)*1000.0); |
556 | } |
557 | |
558 | |
559 | /* ----- Continuous wave test ---------------------------------------------- */ |
560 | |
561 | |
562 | static int test_mode(struct atrf_dsc *dsc, uint8_t cont_tx, const char *cmd) |
563 | { |
564 | int status = 0; |
565 | |
566 | cw_test_begin(dsc, cont_tx); |
567 | |
568 | if (cmd) |
569 | status = system(cmd); |
570 | else { |
571 | while (run) |
572 | sleep(1); |
573 | } |
574 | |
575 | cw_test_end(dsc); |
576 | |
577 | return status; |
578 | } |
579 | |
580 | |
581 | /* ----- Command-line processing ------------------------------------------- */ |
582 | |
583 | |
584 | static void die(int sig) |
585 | { |
586 | run = 0; |
587 | } |
588 | |
589 | |
590 | static void usage(const char *name) |
591 | { |
592 | fprintf(stderr, |
593 | "usage: %s [common_options] [message [repetitions]]\n" |
594 | " %s [common_options] -H [message]\n" |
595 | " %s [common_options] -E pause_s [repetitions]\n" |
596 | " %s [common_options] -P [max_wait_s]\n" |
597 | " %s [common_options] -R [-H|packets size]\n" |
598 | " %s [common_options] -T offset [command]\n\n" |
599 | " text message mode:\n" |
600 | " message message string to send (if absent, receive)\n" |
601 | " repetitions number of times the message is sent (default 1)\n\n" |
602 | " text message mode (hard MAC):\n" |
603 | " -H use hard MAC mode\n" |
604 | " message message string to send (if absent, receive)\n\n" |
605 | " PER test mode (transmit only):\n" |
606 | " -E pause_s seconds to pause between frames (floating-point)\n" |
607 | " repetitions number of messages to send (default: infinite)\n\n" |
608 | " Ping-pong mode:\n" |
609 | " -P exchange packets between two stations\n" |
610 | " max_wait_s generate a new packet if no response is received (master)\n\n" |
611 | " Round-trip time measurement:\n" |
612 | " -R send/receive RTT measurement packets\n" |
613 | " packets number of packets to send (master)\n" |
614 | " size size of packets in bytes\n\n" |
615 | " constant wave test mode (transmit only):\n" |
616 | " -T offset test mode. offset is the frequency offset of the constant\n" |
617 | " wave in MHz: -2, -0.5, or +0.5\n" |
618 | " command shell command to run while transmitting (default: wait for\n" |
619 | " SIGINT instead)\n\n" |
620 | " common options: [-c channel|-f freq] [-C mhz] [-d driver[:arg]] [-o file]\n" |
621 | " [-p power] [-r rate] [-t trim]\n" |
622 | " -c channel channel number, 11 to 26 (default %d)\n" |
623 | " -C mhz output clock at 1, 2, 4, 8, or 16 MHz (default: off)\n" |
624 | " -d driver[:arg]\n" |
625 | " use the specified driver (default: %s)\n" |
626 | " -f freq frequency in MHz, 2405 to 2480 (default %d)\n" |
627 | " -o file write received data to a file in pcap format\n" |
628 | " -p power transmit power, -17.2 to 3.0 dBm (default %.1f)\n" |
629 | " -r rate data rate, 250k, 500k, 1M, or 2M (default: 250k)\n" |
630 | " -t trim trim capacitor, 0 to 15 (default %d)\n" |
631 | , name, name, name, name, name, name, |
632 | DEFAULT_CHANNEL, atrf_default_driver_name(), |
633 | 2405+5*(DEFAULT_CHANNEL-11), DEFAULT_POWER, |
634 | DEFAULT_TRIM); |
635 | exit(1); |
636 | } |
637 | |
638 | |
639 | static void set_mode(enum mode *mode, enum mode new) |
640 | { |
641 | if (*mode == mode_msg) { |
642 | *mode = new; |
643 | return; |
644 | } |
645 | if ((*mode == mode_hmac && new == mode_rtt) || |
646 | (*mode == mode_rtt && new == mode_hmac)) { |
647 | *mode = mode_rtt_hmac; |
648 | return; |
649 | } |
650 | fprintf(stderr, "multiple mode selections\n"); |
651 | exit(1); |
652 | } |
653 | |
654 | |
655 | int main(int argc, char *const *argv) |
656 | { |
657 | enum mode mode = mode_msg; |
658 | const char *driver = NULL; |
659 | int channel = DEFAULT_CHANNEL; |
660 | double power = DEFAULT_POWER; |
661 | uint8_t rate = OQPSK_DATA_RATE_250; |
662 | int trim = DEFAULT_TRIM, times = 1, bytes; |
663 | uint8_t cont_tx = 0; |
664 | double pause_s = 0; |
665 | char *end; |
666 | int c, freq; |
667 | unsigned clkm = 0; |
668 | int status = 0; |
669 | const char *pcap_file = NULL; |
670 | struct atrf_dsc *dsc; |
671 | |
672 | while ((c = getopt(argc, argv, "c:C:d:E:f:Ho:p:Pr:Rt:T:")) != EOF) |
673 | switch (c) { |
674 | case 'c': |
675 | channel = strtoul(optarg, &end, 0); |
676 | if (*end) |
677 | usage(*argv); |
678 | if (channel < 11 || channel > 26) |
679 | usage(*argv); |
680 | break; |
681 | case 'C': |
682 | clkm = strtol(optarg, &end, 0); |
683 | if (*end) |
684 | usage(*argv); |
685 | if (!clkm) |
686 | usage(*argv); |
687 | break; |
688 | case 'd': |
689 | driver = optarg; |
690 | break; |
691 | case 'E': |
692 | set_mode(&mode, mode_per); |
693 | pause_s = strtof(optarg, &end); |
694 | if (*end) |
695 | usage(*argv); |
696 | break; |
697 | case 'f': |
698 | freq = strtoul(optarg, &end, 0); |
699 | if (*end) |
700 | usage(*argv); |
701 | if (freq % 5) |
702 | usage(*argv); |
703 | channel = (freq-2405)/5+11; |
704 | if (channel < 11 || channel > 26) |
705 | usage(*argv); |
706 | break; |
707 | case 'H': |
708 | set_mode(&mode, mode_hmac); |
709 | break; |
710 | case 'o': |
711 | pcap_file = optarg; |
712 | break; |
713 | case 'p': |
714 | power = strtod(optarg, &end); |
715 | if (*end) |
716 | usage(*argv); |
717 | break; |
718 | case 'P': |
719 | set_mode(&mode, mode_ping); |
720 | break; |
721 | case 'r': |
722 | if (!strcmp(optarg, "250k")) |
723 | rate = OQPSK_DATA_RATE_250; |
724 | else if (!strcmp(optarg, "500k")) |
725 | rate = OQPSK_DATA_RATE_500; |
726 | else if (!strcmp(optarg, "1M")) |
727 | rate = OQPSK_DATA_RATE_1000; |
728 | else if (!strcmp(optarg, "2M")) |
729 | rate = OQPSK_DATA_RATE_2000; |
730 | else |
731 | usage(*argv); |
732 | break; |
733 | case 'R': |
734 | set_mode(&mode, mode_rtt); |
735 | break; |
736 | case 't': |
737 | trim = strtoul(optarg, &end, 0); |
738 | if (*end) |
739 | usage(*argv); |
740 | if (trim > 15) |
741 | usage(*argv); |
742 | break; |
743 | case 'T': |
744 | set_mode(&mode, mode_cont_tx); |
745 | if (!strcmp(optarg, "-2")) |
746 | cont_tx = CONT_TX_M2M; |
747 | else if (!strcmp(optarg, "-0.5")) |
748 | cont_tx = CONT_TX_M500K; |
749 | else if (!strcmp(optarg, "+0.5")) |
750 | cont_tx = CONT_TX_P500K; |
751 | else |
752 | usage(*argv); |
753 | break; |
754 | default: |
755 | usage(*argv); |
756 | } |
757 | |
758 | signal(SIGINT, die); |
759 | |
760 | switch (argc-optind) { |
761 | case 0: |
762 | dsc = init_txrx(driver, trim, clkm); |
763 | set_channel(dsc, channel); |
764 | set_rate(dsc, rate); |
765 | switch (mode) { |
766 | case mode_msg: |
767 | receive(dsc, pcap_file); |
768 | break; |
769 | case mode_hmac: |
770 | receive_hmac(dsc); |
771 | break; |
772 | case mode_per: |
773 | set_power_dBm(dsc, power, 0); |
774 | transmit_pattern(dsc, pause_s, 0); |
775 | break; |
776 | case mode_ping: |
777 | set_power_dBm(dsc, power, 1); |
778 | ping(dsc, pause_s, 0); |
779 | break; |
780 | case mode_rtt: |
781 | set_power_dBm(dsc, power, 1); |
782 | rtt_slave(dsc); |
783 | break; |
784 | case mode_rtt_hmac: |
785 | set_power_dBm(dsc, power, 1); |
786 | rtt_slave_hmac(dsc); |
787 | break; |
788 | case mode_cont_tx: |
789 | set_power_dBm(dsc, power, 0); |
790 | status = test_mode(dsc, cont_tx, NULL); |
791 | break; |
792 | default: |
793 | abort(); |
794 | } |
795 | break; |
796 | case 2: |
797 | switch (mode) { |
798 | case mode_msg: |
799 | case mode_hmac: |
800 | break; |
801 | case mode_per: |
802 | case mode_ping: |
803 | case mode_rtt_hmac: |
804 | case mode_cont_tx: |
805 | usage(*argv); |
806 | case mode_rtt: |
807 | times = strtoul(argv[optind], &end, 0); |
808 | if (*end) |
809 | usage(*argv); |
810 | bytes = strtoul(argv[optind+1], &end, 0); |
811 | if (*end) |
812 | usage(*argv); |
813 | dsc = init_txrx(driver, trim, clkm); |
814 | set_channel(dsc, channel); |
815 | set_rate(dsc, rate); |
816 | set_power_dBm(dsc, power, 1); |
817 | rtt_master(dsc, times, bytes); |
818 | goto done; |
819 | default: |
820 | abort(); |
821 | } |
822 | times = strtoul(argv[optind+1], &end, 0); |
823 | if (*end) |
824 | usage(*argv); |
825 | /* fall through */ |
826 | case 1: |
827 | dsc = init_txrx(driver, trim, clkm); |
828 | set_channel(dsc, channel); |
829 | set_rate(dsc, rate); |
830 | switch (mode) { |
831 | case mode_msg: |
832 | set_power_dBm(dsc, power, 1); |
833 | transmit(dsc, argv[optind], times); |
834 | break; |
835 | case mode_hmac: |
836 | set_power_dBm(dsc, power, 1); |
837 | transmit_hmac(dsc, argv[optind]); |
838 | break; |
839 | case mode_per: |
840 | times = strtoul(argv[optind], &end, 0); |
841 | if (*end) |
842 | usage(*argv); |
843 | set_power_dBm(dsc, power, 0); |
844 | transmit_pattern(dsc, pause_s, times); |
845 | break; |
846 | case mode_ping: |
847 | pause_s = strtof(argv[optind], &end); |
848 | if (*end) |
849 | usage(*argv); |
850 | set_power_dBm(dsc, power, 1); |
851 | ping(dsc, pause_s, 1); |
852 | break; |
853 | case mode_rtt: |
854 | case mode_rtt_hmac: |
855 | usage(*argv); |
856 | break; |
857 | case mode_cont_tx: |
858 | set_power_dBm(dsc, power, 0); |
859 | status = test_mode(dsc, cont_tx, argv[optind]); |
860 | break; |
861 | default: |
862 | abort(); |
863 | |
864 | } |
865 | break; |
866 | default: |
867 | usage(*argv); |
868 | } |
869 | done: |
870 | |
871 | atrf_close(dsc); |
872 | |
873 | if (status) { |
874 | if (WIFEXITED(status)) |
875 | return WEXITSTATUS(status); |
876 | if (WIFSIGNALED(status)) |
877 | raise(WTERMSIG(status)); |
878 | fprintf(stderr, "unexpected exit status %d\n", status); |
879 | abort(); |
880 | } |
881 | return 0; |
882 | } |
883 |