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