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