2 * Copyright © 2009 Keith Packard <keithp@keithp.com>
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.
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.
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.
20 /* Values from SmartRF® Studio for:
22 * Deviation: 20.507812 kHz
23 * Datarate: 38.360596 kBaud
25 * RF Freq: 434.549927 MHz
26 * Channel: 99.975586 kHz
28 * RX filter: 93.75 kHz
32 * For IF freq of 140.62kHz, the IF value is:
34 * 140.62e3 / (24e6 / 2**10) = 6
37 #define IF_FREQ_CONTROL 6
40 * For channel bandwidth of 93.75 kHz, the CHANBW_E and CHANBW_M values are
42 * BW = 24e6 / (8 * (4 + M) * 2 ** E)
51 * For a symbol rate of 38360kBaud, the DRATE_E and DRATE_M values are:
53 * R = (256 + M) * 2** E * 24e6 / 2**28
55 * So M is 163 and E is 10
62 * For a channel deviation of 20.5kHz, the DEVIATION_E and DEVIATION_M values are:
64 * F = 24e6/2**17 * (8 + DEVIATION_M) * 2**DEVIATION_E
66 * So M is 6 and E is 3
73 * For our RDF beacon, set the symbol rate to 2kBaud (for a 1kHz tone),
74 * so the DRATE_E and DRATE_M values are:
78 * To make the tone last for 200ms, we need 2000 * .2 = 400 bits or 50 bytes
82 #define RDF_DRATE_M 94
83 #define RDF_PACKET_LEN 50
86 * RDF deviation should match the normal NFM value of 5kHz
92 #define RDF_DEVIATION_M 6
93 #define RDF_DEVIATION_E 1
95 /* This are from the table for 433MHz */
97 #define RF_POWER_M30_DBM 0x12
98 #define RF_POWER_M20_DBM 0x0e
99 #define RF_POWER_M15_DBM 0x1d
100 #define RF_POWER_M10_DBM 0x34
101 #define RF_POWER_M5_DBM 0x2c
102 #define RF_POWER_0_DBM 0x60
103 #define RF_POWER_5_DBM 0x84
104 #define RF_POWER_7_DBM 0xc8
105 #define RF_POWER_10_DBM 0xc0
107 #define RF_POWER RF_POWER_10_DBM
109 static __code uint8_t radio_setup[] = {
110 RF_PA_TABLE7_OFF, RF_POWER,
111 RF_PA_TABLE6_OFF, RF_POWER,
112 RF_PA_TABLE5_OFF, RF_POWER,
113 RF_PA_TABLE4_OFF, RF_POWER,
114 RF_PA_TABLE3_OFF, RF_POWER,
115 RF_PA_TABLE2_OFF, RF_POWER,
116 RF_PA_TABLE1_OFF, RF_POWER,
117 RF_PA_TABLE0_OFF, RF_POWER,
119 RF_FSCTRL1_OFF, (IF_FREQ_CONTROL << RF_FSCTRL1_FREQ_IF_SHIFT),
120 RF_FSCTRL0_OFF, (0 << RF_FSCTRL0_FREQOFF_SHIFT),
122 RF_MDMCFG4_OFF, ((CHANBW_E << RF_MDMCFG4_CHANBW_E_SHIFT) |
123 (CHANBW_M << RF_MDMCFG4_CHANBW_M_SHIFT) |
124 (DRATE_E << RF_MDMCFG4_DRATE_E_SHIFT)),
125 RF_MDMCFG3_OFF, (DRATE_M << RF_MDMCFG3_DRATE_M_SHIFT),
126 RF_MDMCFG2_OFF, (RF_MDMCFG2_DEM_DCFILT_OFF |
127 RF_MDMCFG2_MOD_FORMAT_GFSK |
128 RF_MDMCFG2_SYNC_MODE_15_16_THRES),
129 RF_MDMCFG1_OFF, (RF_MDMCFG1_FEC_EN |
130 RF_MDMCFG1_NUM_PREAMBLE_4 |
131 (2 << RF_MDMCFG1_CHANSPC_E_SHIFT)),
132 RF_MDMCFG0_OFF, (17 << RF_MDMCFG0_CHANSPC_M_SHIFT),
136 RF_DEVIATN_OFF, ((DEVIATION_E << RF_DEVIATN_DEVIATION_E_SHIFT) |
137 (DEVIATION_M << RF_DEVIATN_DEVIATION_M_SHIFT)),
139 /* SmartRF says set LODIV_BUF_CURRENT_TX to 0
140 * And, we're not using power ramping, so use PA_POWER 0
142 RF_FREND0_OFF, ((1 << RF_FREND0_LODIV_BUF_CURRENT_TX_SHIFT) |
143 (0 << RF_FREND0_PA_POWER_SHIFT)),
145 RF_FREND1_OFF, ((1 << RF_FREND1_LNA_CURRENT_SHIFT) |
146 (1 << RF_FREND1_LNA2MIX_CURRENT_SHIFT) |
147 (1 << RF_FREND1_LODIV_BUF_CURRENT_RX_SHIFT) |
148 (2 << RF_FREND1_MIX_CURRENT_SHIFT)),
159 /* default sync values */
163 /* max packet length */
164 RF_PKTCTRL1_OFF, ((1 << PKTCTRL1_PQT_SHIFT)|
165 PKTCTRL1_APPEND_STATUS|
166 PKTCTRL1_ADR_CHK_NONE),
167 RF_PKTCTRL0_OFF, (RF_PKTCTRL0_WHITE_DATA|
168 RF_PKTCTRL0_PKT_FORMAT_NORMAL|
170 RF_PKTCTRL0_LENGTH_CONFIG_FIXED),
172 RF_MCSM2_OFF, (RF_MCSM2_RX_TIME_END_OF_PACKET),
173 RF_MCSM1_OFF, (RF_MCSM1_CCA_MODE_RSSI_BELOW_UNLESS_RECEIVING|
174 RF_MCSM1_RXOFF_MODE_IDLE|
175 RF_MCSM1_TXOFF_MODE_IDLE),
176 RF_MCSM0_OFF, (RF_MCSM0_FS_AUTOCAL_FROM_IDLE|
178 RF_MCSM0_CLOSE_IN_RX_0DB),
179 RF_FOCCFG_OFF, (RF_FOCCFG_FOC_PRE_K_3K,
180 RF_FOCCFG_FOC_POST_K_PRE_K,
181 RF_FOCCFG_FOC_LIMIT_BW_OVER_4),
182 RF_BSCFG_OFF, (RF_BSCFG_BS_PRE_K_2K|
183 RF_BSCFG_BS_PRE_KP_3KP|
184 RF_BSCFG_BS_POST_KI_PRE_KI|
185 RF_BSCFG_BS_POST_KP_PRE_KP|
186 RF_BSCFG_BS_LIMIT_0),
187 RF_AGCCTRL2_OFF, 0x43,
188 RF_AGCCTRL1_OFF, 0x40,
189 RF_AGCCTRL0_OFF, 0x91,
196 static __code uint8_t rdf_setup[] = {
197 RF_MDMCFG4_OFF, ((CHANBW_E << RF_MDMCFG4_CHANBW_E_SHIFT) |
198 (CHANBW_M << RF_MDMCFG4_CHANBW_M_SHIFT) |
199 (RDF_DRATE_E << RF_MDMCFG4_DRATE_E_SHIFT)),
200 RF_MDMCFG3_OFF, (RDF_DRATE_M << RF_MDMCFG3_DRATE_M_SHIFT),
201 RF_MDMCFG2_OFF, (RF_MDMCFG2_DEM_DCFILT_OFF |
202 RF_MDMCFG2_MOD_FORMAT_GFSK |
203 RF_MDMCFG2_SYNC_MODE_15_16_THRES),
204 RF_MDMCFG1_OFF, (RF_MDMCFG1_FEC_DIS |
205 RF_MDMCFG1_NUM_PREAMBLE_2 |
206 (2 << RF_MDMCFG1_CHANSPC_E_SHIFT)),
208 RF_DEVIATN_OFF, ((RDF_DEVIATION_E << RF_DEVIATN_DEVIATION_E_SHIFT) |
209 (RDF_DEVIATION_M << RF_DEVIATN_DEVIATION_M_SHIFT)),
211 /* packet length is set in-line */
212 RF_PKTCTRL1_OFF, ((1 << PKTCTRL1_PQT_SHIFT)|
213 PKTCTRL1_ADR_CHK_NONE),
214 RF_PKTCTRL0_OFF, (RF_PKTCTRL0_PKT_FORMAT_NORMAL|
215 RF_PKTCTRL0_LENGTH_CONFIG_FIXED),
218 static __code uint8_t fixed_pkt_setup[] = {
219 RF_MDMCFG4_OFF, ((CHANBW_E << RF_MDMCFG4_CHANBW_E_SHIFT) |
220 (CHANBW_M << RF_MDMCFG4_CHANBW_M_SHIFT) |
221 (DRATE_E << RF_MDMCFG4_DRATE_E_SHIFT)),
222 RF_MDMCFG3_OFF, (DRATE_M << RF_MDMCFG3_DRATE_M_SHIFT),
223 RF_MDMCFG2_OFF, (RF_MDMCFG2_DEM_DCFILT_OFF |
224 RF_MDMCFG2_MOD_FORMAT_GFSK |
225 RF_MDMCFG2_SYNC_MODE_15_16_THRES),
226 RF_MDMCFG1_OFF, (RF_MDMCFG1_FEC_EN |
227 RF_MDMCFG1_NUM_PREAMBLE_4 |
228 (2 << RF_MDMCFG1_CHANSPC_E_SHIFT)),
230 RF_DEVIATN_OFF, ((DEVIATION_E << RF_DEVIATN_DEVIATION_E_SHIFT) |
231 (DEVIATION_M << RF_DEVIATN_DEVIATION_M_SHIFT)),
233 /* max packet length -- now set inline */
234 RF_PKTCTRL1_OFF, ((1 << PKTCTRL1_PQT_SHIFT)|
235 PKTCTRL1_APPEND_STATUS|
236 PKTCTRL1_ADR_CHK_NONE),
237 RF_PKTCTRL0_OFF, (RF_PKTCTRL0_WHITE_DATA|
238 RF_PKTCTRL0_PKT_FORMAT_NORMAL|
240 RF_PKTCTRL0_LENGTH_CONFIG_FIXED),
243 __xdata uint8_t ao_radio_dma;
244 __xdata uint8_t ao_radio_dma_done;
245 __xdata uint8_t ao_radio_done;
246 __xdata uint8_t ao_radio_abort;
247 __xdata uint8_t ao_radio_mutex;
250 ao_radio_general_isr(void) __interrupt 16
253 if (RFIF & RFIF_IM_TIMEOUT) {
254 ao_radio_recv_abort();
255 RFIF &= ~ RFIF_IM_TIMEOUT;
256 } else if (RFIF & RFIF_IM_DONE) {
258 ao_wakeup(&ao_radio_done);
259 RFIF &= ~RFIF_IM_DONE;
264 ao_radio_set_packet(void)
267 for (i = 0; i < sizeof (fixed_pkt_setup); i += 2)
268 RF[fixed_pkt_setup[i]] = fixed_pkt_setup[i+1];
274 if (RF_MARCSTATE != RF_MARCSTATE_IDLE)
279 } while (RF_MARCSTATE != RF_MARCSTATE_IDLE);
284 ao_radio_get(uint8_t len)
287 ao_mutex_get(&ao_radio_mutex);
289 RF_CHANNR = ao_config.radio_channel;
290 RF_FREQ2 = (uint8_t) (ao_config.radio_setting >> 16);
291 RF_FREQ1 = (uint8_t) (ao_config.radio_setting >> 8);
292 RF_FREQ0 = (uint8_t) (ao_config.radio_setting);
298 ao_radio_send(__xdata void *packet, uint8_t size) __reentrant
302 ao_dma_set_transfer(ao_radio_dma,
306 DMA_CFG0_WORDSIZE_8 |
307 DMA_CFG0_TMODE_SINGLE |
308 DMA_CFG0_TRIGGER_RADIO,
311 DMA_CFG1_PRIORITY_HIGH);
312 ao_dma_start(ao_radio_dma);
314 __critical while (!ao_radio_done)
315 ao_sleep(&ao_radio_done);
320 ao_radio_recv(__xdata void *packet, uint8_t size) __reentrant
323 ao_radio_get(size - 2);
324 ao_dma_set_transfer(ao_radio_dma,
328 DMA_CFG0_WORDSIZE_8 |
329 DMA_CFG0_TMODE_SINGLE |
330 DMA_CFG0_TRIGGER_RADIO,
333 DMA_CFG1_PRIORITY_HIGH);
334 ao_dma_start(ao_radio_dma);
337 /* Wait for DMA to be done, for the radio receive process to
338 * get aborted or for a receive timeout to fire
340 __critical while (!ao_radio_dma_done && !ao_radio_abort)
341 if (ao_sleep(&ao_radio_dma_done))
344 /* If recv was aborted, clean up by stopping the DMA engine
345 * and idling the radio
347 if (!ao_radio_dma_done) {
348 ao_dma_abort(ao_radio_dma);
352 return ao_radio_dma_done;
356 * Wake up a task waiting to receive a radio packet
357 * and tell them to abort the transfer
361 ao_radio_recv_abort(void)
364 ao_wakeup(&ao_radio_dma_done);
367 __xdata ao_radio_rdf_value = 0x55;
376 * Compute the packet length as follows:
378 * 2000 bps (for a 1kHz tone)
379 * so, for 'ms' milliseconds, we need
380 * 2 * ms bits, or ms / 4 bytes
387 ao_radio_get(pkt_len);
389 for (i = 0; i < sizeof (rdf_setup); i += 2)
390 RF[rdf_setup[i]] = rdf_setup[i+1];
392 ao_dma_set_transfer(ao_radio_dma,
396 DMA_CFG0_WORDSIZE_8 |
397 DMA_CFG0_TMODE_SINGLE |
398 DMA_CFG0_TRIGGER_RADIO,
401 DMA_CFG1_PRIORITY_HIGH);
402 ao_dma_start(ao_radio_dma);
404 __critical while (!ao_radio_done && !ao_radio_abort)
405 ao_sleep(&ao_radio_done);
406 if (!ao_radio_done) {
407 ao_dma_abort(ao_radio_dma);
410 ao_radio_set_packet();
415 ao_radio_rdf_abort(void)
418 ao_wakeup(&ao_radio_done);
427 static __xdata radio_on;
429 if (ao_cmd_lex_c != '\n') {
431 mode = (uint8_t) ao_cmd_lex_u32;
434 if ((mode & 2) && !radio_on) {
439 ao_packet_slave_stop();
446 printf ("Hit a character to stop..."); flush();
450 if ((mode & 1) && radio_on) {
457 __code struct ao_cmds ao_radio_cmds[] = {
458 { ao_radio_test, "C <1 start, 0 stop, none both>\0Radio carrier test" },
466 for (i = 0; i < sizeof (radio_setup); i += 2)
467 RF[radio_setup[i]] = radio_setup[i+1];
468 ao_radio_set_packet();
469 ao_radio_dma_done = 1;
470 ao_radio_dma = ao_dma_alloc(&ao_radio_dma_done);
472 RFIM = RFIM_IM_TIMEOUT|RFIM_IM_DONE;
474 ao_cmd_register(&ao_radio_cmds[0]);