altos: Make sure the packet format is set reasonably for radio test
[fw/altos] / src / drivers / ao_cc115l.c
1 /*
2  * Copyright © 2013 Keith Packard <keithp@keithp.com>
3  *
4  * This program is free software; you can redistribute it and/or modify
5  * it under the terms of the GNU General Public License as published by
6  * the Free Software Foundation; version 2 of the License.
7  *
8  * This program is distributed in the hope that it will be useful, but
9  * WITHOUT ANY WARRANTY; without even the implied warranty of
10  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
11  * General Public License for more details.
12  *
13  * You should have received a copy of the GNU General Public License along
14  * with this program; if not, write to the Free Software Foundation, Inc.,
15  * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
16  */
17
18 #include <ao.h>
19 #include <ao_cc115l.h>
20 #include <ao_exti.h>
21 #include <ao_telemetry.h>
22 #include <ao_fec.h>
23
24 #define AO_RADIO_MAX_SEND       sizeof (struct ao_telemetry_generic)
25
26 uint8_t ao_radio_mutex;
27
28 static uint8_t ao_radio_fifo;           /* fifo drained interrupt received */
29 static uint8_t ao_radio_done;           /* tx done interrupt received */
30 static uint8_t ao_radio_wake;           /* sleep address for radio interrupts */
31 static uint8_t ao_radio_abort;          /* radio operation should abort */
32 static uint8_t ao_radio_mcu_wake;       /* MARC status change */
33 static uint8_t ao_radio_marcstate;      /* Last read MARC state value */
34
35 /* Debugging commands */
36 #define CC115L_DEBUG    0
37
38 /* Runtime tracing */
39 #define CC115L_TRACE    0
40
41 #define FOSC    26000000
42
43 #define ao_radio_select()       ao_spi_get_mask(AO_CC115L_SPI_CS_PORT,(1 << AO_CC115L_SPI_CS_PIN),AO_CC115L_SPI_BUS,AO_SPI_SPEED_1MHz)
44 #define ao_radio_deselect()     ao_spi_put_mask(AO_CC115L_SPI_CS_PORT,(1 << AO_CC115L_SPI_CS_PIN),AO_CC115L_SPI_BUS)
45 #define ao_radio_spi_send(d,l)  ao_spi_send((d), (l), AO_CC115L_SPI_BUS)
46 #define ao_radio_spi_send_fixed(d,l) ao_spi_send_fixed((d), (l), AO_CC115L_SPI_BUS)
47 #define ao_radio_spi_recv(d,l)  ao_spi_recv((d), (l), AO_CC115L_SPI_BUS)
48 #define ao_radio_duplex(o,i,l)  ao_spi_duplex((o), (i), (l), AO_CC115L_SPI_BUS)
49
50 struct ao_cc115l_reg {
51         uint16_t        addr;
52         char            *name;
53 };
54
55 #if CC115L_TRACE
56
57 const static struct ao_cc115l_reg ao_cc115l_reg[];
58 const static char *cc115l_state_name[];
59
60 enum ao_cc115l_trace_type {
61         trace_strobe,
62         trace_read,
63         trace_write,
64         trace_dma,
65         trace_line,
66 };
67
68 struct ao_cc115l_trace {
69         enum ao_cc115l_trace_type       type;
70         int16_t                         addr;
71         int16_t                         value;
72         const char                      *comment;
73 };
74
75 #define NUM_TRACE       256
76
77 static struct ao_cc115l_trace   trace[NUM_TRACE];
78 static int                      trace_i;
79 static int                      trace_disable;
80
81 static void trace_add(enum ao_cc115l_trace_type type, int16_t addr, int16_t value, const char *comment)
82 {
83         if (trace_disable)
84                 return;
85         switch (type) {
86         case trace_read:
87         case trace_write:
88                 comment = ao_cc115l_reg[addr].name;
89                 break;
90         case trace_strobe:
91                 comment = cc115l_state_name[(value >> 4) & 0x7];
92                 break;
93         }
94         trace[trace_i].type = type;
95         trace[trace_i].addr = addr;
96         trace[trace_i].value = value;
97         trace[trace_i].comment = comment;
98         if (++trace_i == NUM_TRACE)
99                 trace_i = 0;
100 }
101 #else
102 #define trace_add(t,a,v,c)
103 #endif
104
105 static uint8_t
106 ao_radio_reg_read(uint8_t addr)
107 {
108         uint8_t data[1];
109         uint8_t d;
110
111         data[0] = ((1 << CC115L_READ)  |
112                    (0 << CC115L_BURST) |
113                    addr);
114         ao_radio_select();
115         ao_radio_spi_send(data, 1);
116         ao_radio_spi_recv(data, 1);
117         ao_radio_deselect();
118         trace_add(trace_read, addr, data[0], NULL);
119         return data[0];
120 }
121
122 static void
123 ao_radio_reg_write(uint8_t addr, uint8_t value)
124 {
125         uint8_t data[2];
126         uint8_t d;
127
128         trace_add(trace_write, addr, value, NULL);
129         data[0] = ((0 << CC115L_READ)  |
130                    (0 << CC115L_BURST) |
131                    addr);
132         data[1] = value;
133         ao_radio_select();
134         ao_radio_spi_send(data, 2);
135         ao_radio_deselect();
136 }
137
138 static void
139 ao_radio_burst_read_start (uint16_t addr)
140 {
141         uint8_t data[1];
142         uint8_t d;
143
144         data[0] = ((1 << CC115L_READ)  |
145                    (1 << CC115L_BURST) |
146                    addr);
147         ao_radio_select();
148         ao_radio_spi_send(data, 1);
149 }
150
151 static void
152 ao_radio_burst_read_stop (void)
153 {
154         ao_radio_deselect();
155 }
156
157
158 static uint8_t
159 ao_radio_strobe(uint8_t addr)
160 {
161         uint8_t in;
162
163         ao_radio_select();
164         ao_radio_duplex(&addr, &in, 1);
165         ao_radio_deselect();
166         trace_add(trace_strobe, addr, in, NULL);
167         return in;
168 }
169
170 static uint8_t
171 ao_radio_fifo_write_start(void)
172 {
173         uint8_t addr = ((0 << CC115L_READ)  |
174                         (1 << CC115L_BURST) |
175                         CC115L_FIFO);
176         uint8_t status;
177
178         ao_radio_select();
179         ao_radio_duplex(&addr, &status, 1);
180         return status;
181 }
182
183 static inline uint8_t ao_radio_fifo_write_stop(uint8_t status) {
184         ao_radio_deselect();
185         return status;
186 }
187
188 static uint8_t
189 ao_radio_fifo_write(uint8_t *data, uint8_t len)
190 {
191         uint8_t status = ao_radio_fifo_write_start();
192         trace_add(trace_dma, CC115L_FIFO, len, NULL);
193         ao_radio_spi_send(data, len);
194         return ao_radio_fifo_write_stop(status);
195 }
196
197 static uint8_t
198 ao_radio_tx_fifo_space(void)
199 {
200         return CC115L_FIFO_SIZE - (ao_radio_reg_read(CC115L_TXBYTES) & CC115L_TXBYTES_NUM_TX_BYTES_MASK);
201 }
202
203 static uint8_t
204 ao_radio_status(void)
205 {
206         return ao_radio_strobe (CC115L_SNOP);
207 }
208
209 #define ao_radio_rdf_value 0x55
210
211 static uint8_t
212 ao_radio_get_marcstate(void)
213 {
214         return ao_radio_reg_read(CC115L_MARCSTATE) & CC115L_MARCSTATE_MASK;
215 }
216           
217 static void
218 ao_radio_done_isr(void)
219 {
220         ao_exti_disable(AO_CC115L_DONE_INT_PORT, AO_CC115L_DONE_INT_PIN);
221         trace_add(trace_line, __LINE__, 0, "done_isr");
222         ao_radio_done = 1;
223         ao_wakeup(&ao_radio_wake);
224 }
225
226 static void
227 ao_radio_fifo_isr(void)
228 {
229         ao_exti_disable(AO_CC115L_FIFO_INT_PORT, AO_CC115L_FIFO_INT_PIN);
230         trace_add(trace_line, __LINE__, 0, "fifo_isr");
231         ao_radio_fifo = 1;
232         ao_wakeup(&ao_radio_wake);
233 }
234
235 static void
236 ao_radio_start_tx(void)
237 {
238 }
239
240 static void
241 ao_radio_idle(void)
242 {
243         ao_radio_pa_off();
244         for (;;) {
245                 uint8_t state = ao_radio_strobe(CC115L_SIDLE);
246                 if ((state >> CC115L_STATUS_STATE) == CC115L_STATUS_STATE_IDLE)
247                         break;
248         }
249         /* Flush any pending TX bytes */
250         ao_radio_strobe(CC115L_SFTX);
251 }
252
253 /*
254  * Packet deviation is 20.5kHz
255  *
256  *      fdev = fosc >> 17 * (8 + dev_m) << dev_e
257  *
258  *      26e6 / (2 ** 17) * (8 + 5) * (2 ** 3) = 20630Hz
259  */
260
261 #define PACKET_DEV_E    3
262 #define PACKET_DEV_M    5
263
264 /*
265  * For our packet data, set the symbol rate to 38400 Baud
266  *
267  *              (256 + DATARATE_M) * 2 ** DATARATE_E
268  *      Rdata = -------------------------------------- * fosc
269  *                           2 ** 28
270  *
271  *              (256 + 131) * (2 ** 10) / (2**28) * 26e6 = 38383
272  *
273  *      DATARATE_M = 131
274  *      DATARATE_E = 10
275  */
276 #define PACKET_DRATE_E  10
277 #define PACKET_DRATE_M  131
278
279 static const uint16_t packet_setup[] = {
280         CC115L_DEVIATN,         ((PACKET_DEV_E << CC115L_DEVIATN_DEVIATION_E) |
281                                  (PACKET_DEV_M << CC115L_DEVIATN_DEVIATION_M)),
282         CC115L_MDMCFG4,         ((0xf << 4) |
283                                  (PACKET_DRATE_E << CC115L_MDMCFG4_DRATE_E)),
284         CC115L_MDMCFG3,         (PACKET_DRATE_M),
285         CC115L_MDMCFG2,         (0x00 |
286                                  (CC115L_MDMCFG2_MOD_FORMAT_GFSK << CC115L_MDMCFG2_MOD_FORMAT) |
287                                  (0 << CC115L_MDMCFG2_MANCHESTER_EN) |
288                                  (CC115L_MDMCFG2_SYNC_MODE_16BITS << CC115L_MDMCFG2_SYNC_MODE)),
289 };
290
291
292 /*
293  * RDF deviation is 5kHz
294  *
295  *      fdev = fosc >> 17 * (8 + dev_m) << dev_e
296  *
297  *      26e6 / (2 ** 17) * (8 + 4) * (2 ** 1) = 4761Hz
298  */
299
300 #define RDF_DEV_E       1
301 #define RDF_DEV_M       4
302
303 /*
304  * For our RDF beacon, set the symbol rate to 2kBaud (for a 1kHz tone)
305  *
306  *              (256 + DATARATE_M) * 2 ** DATARATE_E
307  *      Rdata = -------------------------------------- * fosc
308  *                           2 ** 28
309  *
310  *              (256 + 67) * (2 ** 6) / (2**28) * 26e6 = 2002
311  *
312  *      DATARATE_M = 67
313  *      DATARATE_E = 6
314  */
315 #define RDF_DRATE_E     6
316 #define RDF_DRATE_M     67
317
318 static const uint16_t rdf_setup[] = {
319         CC115L_DEVIATN,         ((RDF_DEV_E << CC115L_DEVIATN_DEVIATION_E) |
320                                  (RDF_DEV_M << CC115L_DEVIATN_DEVIATION_M)),
321         CC115L_MDMCFG4,         ((0xf << 4) |
322                                  (RDF_DRATE_E << CC115L_MDMCFG4_DRATE_E)),
323         CC115L_MDMCFG3,         (RDF_DRATE_M),
324         CC115L_MDMCFG2,         (0x00 |
325                                  (CC115L_MDMCFG2_MOD_FORMAT_GFSK << CC115L_MDMCFG2_MOD_FORMAT) |
326                                  (0 << CC115L_MDMCFG2_MANCHESTER_EN) |
327                                  (CC115L_MDMCFG2_SYNC_MODE_NONE << CC115L_MDMCFG2_SYNC_MODE)),
328 };
329
330 /*
331  * APRS deviation is the same as RDF
332  */
333
334 #define APRS_DEV_E      RDF_DEV_E
335 #define APRS_DEV_M      RDF_DEV_M
336
337 /*
338  * For our APRS beacon, set the symbol rate to 9.6kBaud (8x oversampling for 1200 baud data rate)
339  *
340  *              (256 + DATARATE_M) * 2 ** DATARATE_E
341  *      Rdata = -------------------------------------- * fosc
342  *                           2 ** 28
343  *
344  *              (256 + 131) * (2 ** 8) / (2**28) * 26e6 = 9596
345  *
346  *      DATARATE_M = 131
347  *      DATARATE_E = 8
348  *
349  */
350 #define APRS_DRATE_E    8
351 #define APRS_DRATE_M    131
352
353 static const uint16_t aprs_setup[] = {
354         CC115L_DEVIATN,         ((APRS_DEV_E << CC115L_DEVIATN_DEVIATION_E) |
355                                  (APRS_DEV_M << CC115L_DEVIATN_DEVIATION_M)),
356         CC115L_MDMCFG4,         ((0xf << 4) |
357                                  (APRS_DRATE_E << CC115L_MDMCFG4_DRATE_E)),
358         CC115L_MDMCFG3,         (APRS_DRATE_M),
359         CC115L_MDMCFG2,         (0x00 |
360                                  (CC115L_MDMCFG2_MOD_FORMAT_GFSK << CC115L_MDMCFG2_MOD_FORMAT) |
361                                  (0 << CC115L_MDMCFG2_MANCHESTER_EN) |
362                                  (CC115L_MDMCFG2_SYNC_MODE_NONE << CC115L_MDMCFG2_SYNC_MODE)),
363 };
364
365 #define AO_PKTCTRL0_INFINITE    ((CC115L_PKTCTRL0_PKT_FORMAT_NORMAL << CC115L_PKTCTRL0_PKT_FORMAT) | \
366                                  (0 << CC115L_PKTCTRL0_PKT_CRC_EN) |                                    \
367                                  (CC115L_PKTCTRL0_PKT_LENGTH_CONFIG_INFINITE << CC115L_PKTCTRL0_PKT_LENGTH_CONFIG))
368 #define AO_PKTCTRL0_FIXED       ((CC115L_PKTCTRL0_PKT_FORMAT_NORMAL << CC115L_PKTCTRL0_PKT_FORMAT) | \
369                                  (0 << CC115L_PKTCTRL0_PKT_CRC_EN) |                                    \
370                                  (CC115L_PKTCTRL0_PKT_LENGTH_CONFIG_FIXED << CC115L_PKTCTRL0_PKT_LENGTH_CONFIG))
371
372 static uint16_t ao_radio_mode;
373
374
375 /*
376  * These set the data rate and modulation parameters
377  */
378 #define AO_RADIO_MODE_BITS_PACKET_TX    1
379 #define AO_RADIO_MODE_BITS_RDF          2
380 #define AO_RADIO_MODE_BITS_APRS         4
381
382 /*
383  * Flips between infinite packet mode and fixed packet mode;
384  * we use infinite mode until the sender gives us the
385  * last chunk of data
386  */
387 #define AO_RADIO_MODE_BITS_INFINITE     40
388 #define AO_RADIO_MODE_BITS_FIXED        80
389
390 #define AO_RADIO_MODE_NONE              0
391
392 #define AO_RADIO_MODE_RDF               AO_RADIO_MODE_BITS_RDF
393 #define AO_RADIO_MODE_PACKET_TX         AO_RADIO_MODE_BITS_PACKET_TX
394 #define AO_RADIO_MODE_APRS              AO_RADIO_MODE_BITS_APRS
395
396 static void
397 ao_radio_set_mode(uint16_t new_mode)
398 {
399         uint16_t changes;
400         int i;
401
402         if (new_mode == ao_radio_mode)
403                 return;
404
405         changes = new_mode & (~ao_radio_mode);
406         if (changes & AO_RADIO_MODE_BITS_PACKET_TX)
407                 for (i = 0; i < sizeof (packet_setup) / sizeof (packet_setup[0]); i += 2)
408                         ao_radio_reg_write(packet_setup[i], packet_setup[i+1]);
409
410         if (changes & AO_RADIO_MODE_BITS_RDF)
411                 for (i = 0; i < sizeof (rdf_setup) / sizeof (rdf_setup[0]); i += 2)
412                         ao_radio_reg_write(rdf_setup[i], rdf_setup[i+1]);
413
414         if (changes & AO_RADIO_MODE_BITS_APRS)
415                 for (i = 0; i < sizeof (aprs_setup) / sizeof (aprs_setup[0]); i += 2)
416                         ao_radio_reg_write(aprs_setup[i], aprs_setup[i+1]);
417
418         if (changes & AO_RADIO_MODE_BITS_INFINITE)
419                 ao_radio_reg_write(CC115L_PKTCTRL0, AO_PKTCTRL0_INFINITE);
420
421         if (changes & AO_RADIO_MODE_BITS_FIXED)
422                 ao_radio_reg_write(CC115L_PKTCTRL0, AO_PKTCTRL0_FIXED);
423
424         ao_radio_mode = new_mode;
425 }
426
427 /***************************************************************
428  *  SmartRF Studio(tm) Export
429  *
430  *  Radio register settings specifed with address, value
431  *
432  *  RF device: CC115L
433  *
434  ***************************************************************/
435
436 static const uint16_t radio_setup[] = {
437
438         /* High when FIFO is above threshold, low when fifo is below threshold */
439         AO_CC115L_FIFO_INT_GPIO_IOCFG,      CC115L_IOCFG_GPIO_CFG_TXFIFO_THR,
440
441         /* High when transmitter is running, low when off */
442         AO_CC115L_DONE_INT_GPIO_IOCFG,      CC115L_IOCFG_GPIO_CFG_PA_PD | (1 << CC115L_IOCFG_GPIO_INV),
443
444         CC115L_FIFOTHR,                     0x47,       /* TX FIFO Thresholds */
445         CC115L_MDMCFG1,                     (0x00 |
446                                              (CC115L_MDMCFG1_NUM_PREAMBLE_4 << CC115L_MDMCFG1_NUM_PREAMBLE) |
447                                              (1 << CC115L_MDMCFG1_CHANSPC_E)),
448         CC115L_MDMCFG0,                     248,        /* Channel spacing M value (100kHz channels) */
449         CC115L_MCSM0,                       0x38,       /* Main Radio Control State Machine Configuration */
450         CC115L_RESERVED_0X20,               0xfb,       /* Use setting from SmartRF Studio */
451         CC115L_FSCAL3,                      0xe9,       /* Frequency Synthesizer Calibration */
452         CC115L_FSCAL2,                      0x2a,       /* Frequency Synthesizer Calibration */
453         CC115L_FSCAL1,                      0x00,       /* Frequency Synthesizer Calibration */
454         CC115L_FSCAL0,                      0x1f,       /* Frequency Synthesizer Calibration */
455         CC115L_TEST2,                       0x81,       /* Various Test Settings */
456         CC115L_TEST1,                       0x35,       /* Various Test Settings */
457         CC115L_TEST0,                       0x09,       /* Various Test Settings */
458 };
459
460 static uint8_t  ao_radio_configured = 0;
461
462 static void
463 ao_radio_setup(void)
464 {
465         int     i;
466
467         ao_radio_strobe(CC115L_SRES);
468         ao_delay(AO_MS_TO_TICKS(10));
469
470         for (i = 0; i < sizeof (radio_setup) / sizeof (radio_setup[0]); i += 2)
471                 ao_radio_reg_write(radio_setup[i], radio_setup[i+1]);
472
473         ao_radio_mode = 0;
474
475         ao_config_get();
476
477         ao_radio_configured = 1;
478 }
479
480 static void
481 ao_radio_set_len(uint8_t len)
482 {
483         static uint8_t  last_len;
484
485         if (len != last_len) {
486                 ao_radio_reg_write(CC115L_PKTLEN, len);
487                 last_len = len;
488         }
489 }
490
491 static void
492 ao_radio_get(void)
493 {
494         static uint32_t last_radio_setting;
495         static uint8_t  last_power_setting;
496
497         ao_mutex_get(&ao_radio_mutex);
498         if (!ao_radio_configured)
499                 ao_radio_setup();
500         if (ao_config.radio_setting != last_radio_setting) {
501                 ao_radio_reg_write(CC115L_FREQ2, ao_config.radio_setting >> 16);
502                 ao_radio_reg_write(CC115L_FREQ1, ao_config.radio_setting >> 8);
503                 ao_radio_reg_write(CC115L_FREQ0, ao_config.radio_setting);
504                 last_radio_setting = ao_config.radio_setting;
505         }
506         if (ao_config.radio_power != last_power_setting) {
507                 ao_radio_reg_write(CC115L_PA, ao_config.radio_power);
508                 last_power_setting = ao_config.radio_power;
509         }
510 }
511
512 static void
513 _ao_radio_send_lots(ao_radio_fill_func fill, uint8_t mode);
514
515 #define ao_radio_put()  ao_mutex_put(&ao_radio_mutex)
516
517 struct ao_radio_tone {
518         uint8_t value;
519         uint8_t len;
520 };
521
522 struct ao_radio_tone *ao_radio_tone;
523 uint8_t ao_radio_tone_count;
524 uint8_t ao_radio_tone_current;
525 uint8_t ao_radio_tone_offset;
526
527 int16_t
528 ao_radio_tone_fill(uint8_t *buf, int16_t len)
529 {
530         int16_t ret = 0;
531
532         while (len) {
533                 int16_t                 this_time;
534                 struct ao_radio_tone    *t;
535
536                 /* Figure out how many to send of the current value */
537                 t = &ao_radio_tone[ao_radio_tone_current];
538                 this_time = t->len - ao_radio_tone_offset;
539                 if (this_time > len)
540                         this_time = len;
541
542                 /* queue the data */
543                 memset(buf, t->value, this_time);
544
545                 /* mark as sent */
546                 len -= this_time;
547                 ao_radio_tone_offset += this_time;
548                 ret += this_time;
549
550                 if (ao_radio_tone_offset >= t->len) {
551                         ao_radio_tone_offset = 0;
552                         ao_radio_tone_current++;
553                         if (ao_radio_tone_current >= ao_radio_tone_count) {
554                                 trace_add(trace_line, __LINE__, ret, "done with tone");
555                                 return -ret;
556                         }
557                 }
558         }
559         trace_add(trace_line, __LINE__, ret, "got some tone");
560         return ret;
561 }
562
563 static void
564 ao_radio_tone_run(struct ao_radio_tone *tones, int ntones)
565 {
566         ao_radio_get();
567         ao_radio_tone = tones;
568         ao_radio_tone_current = 0;
569         ao_radio_tone_offset = 0;
570         _ao_radio_send_lots(ao_radio_tone_fill, AO_RADIO_MODE_RDF);
571         ao_radio_put();
572 }
573
574 void
575 ao_radio_rdf(void)
576 {
577         struct ao_radio_tone    tone;
578
579         tone.value = ao_radio_rdf_value;
580         tone.len = AO_RADIO_RDF_LEN;
581         ao_radio_tone_run(&tone, 1);
582 }
583
584 void
585 ao_radio_continuity(uint8_t c)
586 {
587         struct ao_radio_tone    tones[7];
588         uint8_t count = 0;
589         uint8_t i;
590
591         for (i = 0; i < 3; i++) {
592                 tones[count].value = 0x00;
593                 tones[count].len = AO_RADIO_CONT_PAUSE_LEN;
594                 count++;
595                 if (i < c)
596                         tones[count].value = ao_radio_rdf_value;
597                 else
598                         tones[count].value = 0x00;
599                 tones[count].len = AO_RADIO_CONT_TONE_LEN;
600                 count++;
601         }
602         tones[count].value = 0x00;
603         tones[count].len = AO_RADIO_CONT_PAUSE_LEN;
604         count++;
605         ao_radio_tone_run(tones, count);
606 }
607
608 void
609 ao_radio_rdf_abort(void)
610 {
611         ao_radio_abort = 1;
612         ao_wakeup(&ao_radio_wake);
613 }
614
615 static void
616 ao_radio_test_cmd(void)
617 {
618         uint8_t mode = 2;
619         static uint8_t radio_on;
620         ao_cmd_white();
621         if (ao_cmd_lex_c != '\n') {
622                 ao_cmd_decimal();
623                 mode = (uint8_t) ao_cmd_lex_u32;
624         }
625         mode++;
626         if ((mode & 2) && !radio_on) {
627 #if HAS_MONITOR
628                 ao_monitor_disable();
629 #endif
630 #if PACKET_HAS_SLAVE
631                 ao_packet_slave_stop();
632 #endif
633                 ao_radio_get();
634                 ao_radio_set_len(0xff);
635                 ao_radio_set_mode(AO_RADIO_MODE_RDF|AO_RADIO_MODE_BITS_FIXED);
636                 ao_radio_strobe(CC115L_SFTX);
637                 ao_radio_pa_on();
638                 ao_radio_strobe(CC115L_STX);
639                 radio_on = 1;
640         }
641         if (mode == 3) {
642                 printf ("Hit a character to stop..."); flush();
643                 getchar();
644                 putchar('\n');
645         }
646         if ((mode & 1) && radio_on) {
647                 ao_radio_idle();
648                 ao_radio_put();
649                 radio_on = 0;
650 #if HAS_MONITOR
651                 ao_monitor_enable();
652 #endif
653         }
654 }
655
656 static inline int16_t
657 ao_radio_gpio_bits(void)
658 {
659         return AO_CC115L_DONE_INT_PORT->idr & ((1 << AO_CC115L_FIFO_INT_PIN) |
660                                                (1 << AO_CC115L_DONE_INT_PIN));
661 }
662
663 static void
664 ao_radio_wait_fifo(void)
665 {
666         ao_arch_block_interrupts();
667         while (!ao_radio_fifo && !ao_radio_done && !ao_radio_abort) {
668                 trace_add(trace_line, __LINE__, ao_radio_gpio_bits(), "wait_fifo");
669                 ao_sleep(&ao_radio_wake);
670         }
671         ao_arch_release_interrupts();
672         trace_add(trace_line, __LINE__, ao_radio_gpio_bits(), "wake bits");
673         trace_add(trace_line, __LINE__, ao_radio_fifo, "wake fifo");
674         trace_add(trace_line, __LINE__, ao_radio_done, "wake done");
675         trace_add(trace_line, __LINE__, ao_radio_abort, "wake abort");
676 }
677
678 static void
679 ao_radio_wait_done(void)
680 {
681         ao_arch_block_interrupts();
682         while (!ao_radio_done && !ao_radio_abort) {
683                 trace_add(trace_line, __LINE__, ao_radio_gpio_bits(), "wait_done");
684                 ao_sleep(&ao_radio_wake);
685         }
686         ao_arch_release_interrupts();
687         trace_add(trace_line, __LINE__, ao_radio_gpio_bits(), "wake bits");
688         trace_add(trace_line, __LINE__, ao_radio_fifo, "wake fifo");
689         trace_add(trace_line, __LINE__, ao_radio_done, "wake done");
690         trace_add(trace_line, __LINE__, ao_radio_abort, "wake abort");
691 }
692
693 static uint8_t  tx_data[(AO_RADIO_MAX_SEND + 4) * 2];
694
695 static uint8_t  *ao_radio_send_buf;
696 static int16_t  ao_radio_send_len;
697
698 static int16_t
699 ao_radio_send_fill(uint8_t *buf, int16_t len)
700 {
701         int16_t this_time;
702
703         this_time = ao_radio_send_len;
704         if (this_time > len)
705                 this_time = len;
706         memcpy(buf, ao_radio_send_buf, this_time);
707         ao_radio_send_buf += this_time;
708         ao_radio_send_len -= this_time;
709         if (ao_radio_send_len == 0)
710                 return -this_time;
711         return this_time;
712 }
713
714 void
715 ao_radio_send(const void *d, uint8_t size)
716 {
717         int i;
718
719         ao_radio_get();
720         ao_radio_send_len = ao_fec_encode(d, size, tx_data);
721         ao_radio_send_buf = tx_data;
722         _ao_radio_send_lots(ao_radio_send_fill, AO_RADIO_MODE_PACKET_TX);
723         ao_radio_put();
724 }
725
726 #define AO_RADIO_LOTS   64
727
728 static void
729 _ao_radio_send_lots(ao_radio_fill_func fill, uint8_t mode)
730 {
731         uint8_t buf[AO_RADIO_LOTS], *b;
732         int     cnt;
733         int     total = 0;
734         uint8_t done = 0;
735         uint8_t started = 0;
736         uint8_t fifo_space;
737
738         fifo_space = CC115L_FIFO_SIZE;
739         ao_radio_done = 0;
740         ao_radio_fifo = 0;
741         while (!done) {
742                 cnt = (*fill)(buf, sizeof(buf));
743                 trace_add(trace_line, __LINE__, cnt, "send data count");
744                 if (cnt < 0) {
745                         done = 1;
746                         cnt = -cnt;
747                 }
748                 total += cnt;
749
750                 /* At the last buffer, set the total length */
751                 if (done) {
752                         ao_radio_set_len(total & 0xff);
753                         ao_radio_set_mode(mode | AO_RADIO_MODE_BITS_FIXED);
754                 } else {
755                         ao_radio_set_len(0xff);
756                         ao_radio_set_mode(mode | AO_RADIO_MODE_BITS_INFINITE);
757                 }
758
759                 b = buf;
760                 while (cnt) {
761                         uint8_t this_len = cnt;
762
763                         /* Wait for some space in the fifo */
764                         while (!ao_radio_abort && (fifo_space = ao_radio_tx_fifo_space()) == 0) {
765                                 trace_add(trace_line, __LINE__, this_len, "wait for space");
766                                 ao_radio_wait_fifo();
767                         }
768                         if (ao_radio_abort || ao_radio_done)
769                                 break;
770                         trace_add(trace_line, __LINE__, fifo_space, "got space");
771                         if (this_len > fifo_space)
772                                 this_len = fifo_space;
773
774                         cnt -= this_len;
775
776                         ao_radio_done = 0;
777                         ao_radio_fifo = 0;
778                         ao_radio_fifo_write(b, this_len);
779                         b += this_len;
780
781                         ao_exti_enable(AO_CC115L_FIFO_INT_PORT, AO_CC115L_FIFO_INT_PIN);
782                         ao_exti_enable(AO_CC115L_DONE_INT_PORT, AO_CC115L_DONE_INT_PIN);
783
784                         if (!started) {
785                                 ao_radio_pa_on();
786                                 ao_radio_strobe(CC115L_STX);
787                                 started = 1;
788                         }
789                 }
790                 if (ao_radio_abort || ao_radio_done)
791                         break;
792         }
793         if (ao_radio_abort)
794                 ao_radio_idle();
795         ao_radio_wait_done();
796         ao_radio_pa_off();
797 }
798
799 void
800 ao_radio_send_aprs(ao_radio_fill_func fill)
801 {
802         ao_radio_get();
803         _ao_radio_send_lots(fill, AO_RADIO_MODE_APRS);
804         ao_radio_put();
805 }
806
807 #if CC115L_DEBUG
808 const static char *cc115l_state_name[] = {
809         [CC115L_STATUS_STATE_IDLE] = "IDLE",
810         [CC115L_STATUS_STATE_TX] = "TX",
811         [CC115L_STATUS_STATE_FSTXON] = "FSTXON",
812         [CC115L_STATUS_STATE_CALIBRATE] = "CALIBRATE",
813         [CC115L_STATUS_STATE_SETTLING] = "SETTLING",
814         [CC115L_STATUS_STATE_TX_FIFO_UNDERFLOW] = "TX_FIFO_UNDERFLOW",
815 };
816
817 const static struct ao_cc115l_reg ao_cc115l_reg[] = {
818         { .addr = CC115L_IOCFG2, .name = "IOCFG2" },
819         { .addr = CC115L_IOCFG1, .name = "IOCFG1" },
820         { .addr = CC115L_IOCFG0, .name = "IOCFG0" },
821         { .addr = CC115L_FIFOTHR, .name = "FIFOTHR" },
822         { .addr = CC115L_SYNC1, .name = "SYNC1" },
823         { .addr = CC115L_SYNC0, .name = "SYNC0" },
824         { .addr = CC115L_PKTLEN, .name = "PKTLEN" },
825         { .addr = CC115L_PKTCTRL0, .name = "PKTCTRL0" },
826         { .addr = CC115L_CHANNR, .name = "CHANNR" },
827         { .addr = CC115L_FSCTRL0, .name = "FSCTRL0" },
828         { .addr = CC115L_FREQ2, .name = "FREQ2" },
829         { .addr = CC115L_FREQ1, .name = "FREQ1" },
830         { .addr = CC115L_FREQ0, .name = "FREQ0" },
831         { .addr = CC115L_MDMCFG4, .name = "MDMCFG4" },
832         { .addr = CC115L_MDMCFG3, .name = "MDMCFG3" },
833         { .addr = CC115L_MDMCFG2, .name = "MDMCFG2" },
834         { .addr = CC115L_MDMCFG1, .name = "MDMCFG1" },
835         { .addr = CC115L_MDMCFG0, .name = "MDMCFG0" },
836         { .addr = CC115L_DEVIATN, .name = "DEVIATN" },
837         { .addr = CC115L_MCSM1, .name = "MCSM1" },
838         { .addr = CC115L_MCSM0, .name = "MCSM0" },
839         { .addr = CC115L_RESERVED_0X20, .name = "RESERVED_0X20" },
840         { .addr = CC115L_FREND0, .name = "FREND0" },
841         { .addr = CC115L_FSCAL3, .name = "FSCAL3" },
842         { .addr = CC115L_FSCAL2, .name = "FSCAL2" },
843         { .addr = CC115L_FSCAL1, .name = "FSCAL1" },
844         { .addr = CC115L_FSCAL0, .name = "FSCAL0" },
845         { .addr = CC115L_RESERVED_0X29, .name = "RESERVED_0X29" },
846         { .addr = CC115L_RESERVED_0X2A, .name = "RESERVED_0X2A" },
847         { .addr = CC115L_RESERVED_0X2B, .name = "RESERVED_0X2B" },
848         { .addr = CC115L_TEST2, .name = "TEST2" },
849         { .addr = CC115L_TEST1, .name = "TEST1" },
850         { .addr = CC115L_TEST0, .name = "TEST0" },
851         { .addr = CC115L_PARTNUM, .name = "PARTNUM" },
852         { .addr = CC115L_VERSION, .name = "VERSION" },
853         { .addr = CC115L_MARCSTATE, .name = "MARCSTATE" },
854         { .addr = CC115L_PKTSTATUS, .name = "PKTSTATUS" },
855         { .addr = CC115L_TXBYTES, .name = "TXBYTES" },
856         { .addr = CC115L_PA, .name = "PA" },
857 };
858
859 #define AO_NUM_CC115L_REG       (sizeof ao_cc115l_reg / sizeof ao_cc115l_reg[0])
860
861 static void ao_radio_show(void) {
862         uint8_t status = ao_radio_status();
863         int     i;
864
865         ao_radio_get();
866         status = ao_radio_status();
867         printf ("Status:   %02x\n", status);
868         printf ("CHIP_RDY: %d\n", (status >> CC115L_STATUS_CHIP_RDY) & 1);
869         printf ("STATE:    %s\n", cc115l_state_name[(status >> CC115L_STATUS_STATE) & CC115L_STATUS_STATE_MASK]);
870         printf ("MARC:     %02x\n", ao_radio_get_marcstate());
871
872         for (i = 0; i < AO_NUM_CC115L_REG; i++)
873                 printf ("\t%02x %-20.20s\n", ao_radio_reg_read(ao_cc115l_reg[i].addr), ao_cc115l_reg[i].name);
874         ao_radio_put();
875 }
876
877 static void ao_radio_beep(void) {
878         ao_radio_rdf();
879 }
880
881 static void ao_radio_packet(void) {
882         static const uint8_t packet[] = {
883 #if 1
884                 0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07,
885                 0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07,
886                 0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07,
887                 0x00, 0x01, 0x02, 0x03, 0x04, 0x05, 0x06, 0x07,
888 #else
889                 3, 1, 2, 3
890 #endif
891         };
892
893         ao_radio_send(packet, sizeof (packet));
894 }
895
896 #endif /* CC115L_DEBUG */
897
898 #if HAS_APRS
899 #include <ao_aprs.h>
900
901 static void
902 ao_radio_aprs()
903 {
904 #if PACKET_HAS_SLAVE
905         ao_packet_slave_stop();
906 #endif
907         ao_aprs_send();
908 }
909 #endif
910
911 static const struct ao_cmds ao_radio_cmds[] = {
912         { ao_radio_test_cmd,    "C <1 start, 0 stop, none both>\0Radio carrier test" },
913 #if CC115L_DEBUG
914 #if HAS_APRS
915         { ao_radio_aprs,        "G\0Send APRS packet" },
916 #endif
917         { ao_radio_show,        "R\0Show CC115L status" },
918         { ao_radio_beep,        "b\0Emit an RDF beacon" },
919         { ao_radio_packet,      "p\0Send a test packet" },
920 #endif
921         { 0, NULL }
922 };
923
924 void
925 ao_radio_init(void)
926 {
927         int     i;
928
929         ao_radio_configured = 0;
930         ao_spi_init_cs (AO_CC115L_SPI_CS_PORT, (1 << AO_CC115L_SPI_CS_PIN));
931
932 #if 0
933         AO_CC115L_SPI_CS_PORT->bsrr = ((uint32_t) (1 << AO_CC115L_SPI_CS_PIN));
934         for (i = 0; i < 10000; i++) {
935                 if ((SPI_2_PORT->idr & (1 << SPI_2_MISO_PIN)) == 0)
936                         break;
937         }
938         AO_CC115L_SPI_CS_PORT->bsrr = (1 << AO_CC115L_SPI_CS_PIN);
939         if (i == 10000)
940                 ao_panic(AO_PANIC_SELF_TEST_CC115L);
941 #endif
942
943         /* Enable the fifo threhold interrupt pin */
944         ao_enable_port(AO_CC115L_FIFO_INT_PORT);
945         ao_exti_setup(AO_CC115L_FIFO_INT_PORT, AO_CC115L_FIFO_INT_PIN,
946                       AO_EXTI_MODE_FALLING|AO_EXTI_PRIORITY_HIGH,
947                       ao_radio_fifo_isr);
948
949         /* Enable the tx done interrupt pin */
950         ao_enable_port(AO_CC115L_DONE_INT_PORT);
951         ao_exti_setup(AO_CC115L_DONE_INT_PORT, AO_CC115L_DONE_INT_PIN,
952                       AO_EXTI_MODE_FALLING|AO_EXTI_PRIORITY_MED,
953                       ao_radio_done_isr);
954
955         ao_radio_pa_init();
956
957         ao_cmd_register(&ao_radio_cmds[0]);
958 }