ST / stm-spirit1-rf-driver

Prototype RF driver for STM Sub-1 GHz RF expansion board based on the SPSGRF-868 module for STM32 Nucleo.

Prototype RF Driver for STM Sub-1 GHz RF Expansion Boards based on the SPSGRF-868 and SPSGRF-915 Modules for STM32 Nucleo

Currently supported boards:

Note, in order to use expansion board X-NUCLEO-IDS01A4 in mbed you need to perform the following HW modifications on the board:

  • Unmount resistor R4
  • Mount resistor R7

Furthermore, on some Nucleo development boards (e.g. the NUCLEO_F429ZI), in order to be able to use Ethernet together with these Sub-1 GHz RF expansion boards, you need to compile this driver with macro SPIRIT1_SPI_MOSI=PB_5 defined, while the development board typically requires some HW modification as e.g. described here!

This driver can be used together with the 6LoWPAN stack (a.k.a. Nanostack).

source/libs/spirit1/SPIRIT1_Library/Src/SPIRIT_Radio.c@67:93bec0baf1de, 2017-07-06 (annotated)

Committer:
Wolfgang Betz
Date:
Thu Jul 06 11:13:31 2017 +0200
Revision:
67:93bec0baf1de
Parent:
34:edda6a7238ec 
Clarify some comments

Who changed what in which revision?

UserRevisionLine numberNew contents of line
Wolfgang Betz 67:93bec0baf1de 1 /**
Wolfgang Betz 67:93bec0baf1de 2 ******************************************************************************
Wolfgang Betz 67:93bec0baf1de 3 * @file SPIRIT_Radio.c
Wolfgang Betz 67:93bec0baf1de 4 * @author VMA division - AMS
Wolfgang Betz 67:93bec0baf1de 5 * @version 3.2.2
Wolfgang Betz 67:93bec0baf1de 6 * @date 08-July-2015
Wolfgang Betz 67:93bec0baf1de 7 * @brief This file provides all the low level API to manage Analog and Digital
Wolfgang Betz 67:93bec0baf1de 8 * radio part of SPIRIT.
Wolfgang Betz 67:93bec0baf1de 9 * @details
Wolfgang Betz 67:93bec0baf1de 10 *
Wolfgang Betz 67:93bec0baf1de 11 * @attention
Wolfgang Betz 67:93bec0baf1de 12 *
Wolfgang Betz 67:93bec0baf1de 13 * <h2><center>&copy; COPYRIGHT(c) 2015 STMicroelectronics</center></h2>
Wolfgang Betz 67:93bec0baf1de 14 *
Wolfgang Betz 67:93bec0baf1de 15 * Redistribution and use in source and binary forms, with or without modification,
Wolfgang Betz 67:93bec0baf1de 16 * are permitted provided that the following conditions are met:
Wolfgang Betz 67:93bec0baf1de 17 * 1. Redistributions of source code must retain the above copyright notice,
Wolfgang Betz 67:93bec0baf1de 18 * this list of conditions and the following disclaimer.
Wolfgang Betz 67:93bec0baf1de 19 * 2. Redistributions in binary form must reproduce the above copyright notice,
Wolfgang Betz 67:93bec0baf1de 20 * this list of conditions and the following disclaimer in the documentation
Wolfgang Betz 67:93bec0baf1de 21 * and/or other materials provided with the distribution.
Wolfgang Betz 67:93bec0baf1de 22 * 3. Neither the name of STMicroelectronics nor the names of its contributors
Wolfgang Betz 67:93bec0baf1de 23 * may be used to endorse or promote products derived from this software
Wolfgang Betz 67:93bec0baf1de 24 * without specific prior written permission.
Wolfgang Betz 67:93bec0baf1de 25 *
Wolfgang Betz 67:93bec0baf1de 26 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
Wolfgang Betz 67:93bec0baf1de 27 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
Wolfgang Betz 67:93bec0baf1de 28 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
Wolfgang Betz 67:93bec0baf1de 29 * DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE
Wolfgang Betz 67:93bec0baf1de 30 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
Wolfgang Betz 67:93bec0baf1de 31 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
Wolfgang Betz 67:93bec0baf1de 32 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
Wolfgang Betz 67:93bec0baf1de 33 * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
Wolfgang Betz 67:93bec0baf1de 34 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
Wolfgang Betz 67:93bec0baf1de 35 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
Wolfgang Betz 67:93bec0baf1de 36 *
Wolfgang Betz 67:93bec0baf1de 37 ******************************************************************************
Wolfgang Betz 67:93bec0baf1de 38 */
Wolfgang Betz 67:93bec0baf1de 39
Wolfgang Betz 67:93bec0baf1de 40 /* Includes ------------------------------------------------------------------*/
Wolfgang Betz 67:93bec0baf1de 41 #include "SPIRIT_Radio.h"
Wolfgang Betz 67:93bec0baf1de 42 #include "MCU_Interface.h"
Wolfgang Betz 67:93bec0baf1de 43 #include <math.h>
Wolfgang Betz 67:93bec0baf1de 44
Wolfgang Betz 67:93bec0baf1de 45 /** @addtogroup SPIRIT_Libraries
Wolfgang Betz 67:93bec0baf1de 46 * @{
Wolfgang Betz 67:93bec0baf1de 47 */
Wolfgang Betz 67:93bec0baf1de 48
Wolfgang Betz 67:93bec0baf1de 49
Wolfgang Betz 67:93bec0baf1de 50 /** @addtogroup SPIRIT_Radio
Wolfgang Betz 67:93bec0baf1de 51 * @{
Wolfgang Betz 67:93bec0baf1de 52 */
Wolfgang Betz 67:93bec0baf1de 53
Wolfgang Betz 67:93bec0baf1de 54
Wolfgang Betz 67:93bec0baf1de 55 /** @defgroup Radio_Private_TypesDefinitions Radio Private Types Definitions
Wolfgang Betz 67:93bec0baf1de 56 * @{
Wolfgang Betz 67:93bec0baf1de 57 */
Wolfgang Betz 67:93bec0baf1de 58
Wolfgang Betz 67:93bec0baf1de 59
Wolfgang Betz 67:93bec0baf1de 60 /**
Wolfgang Betz 67:93bec0baf1de 61 * @}
Wolfgang Betz 67:93bec0baf1de 62 */
Wolfgang Betz 67:93bec0baf1de 63
Wolfgang Betz 67:93bec0baf1de 64
Wolfgang Betz 67:93bec0baf1de 65 /** @defgroup Radio_Private_Defines Radio Private Defines
Wolfgang Betz 67:93bec0baf1de 66 * @{
Wolfgang Betz 67:93bec0baf1de 67 */
Wolfgang Betz 67:93bec0baf1de 68
Wolfgang Betz 67:93bec0baf1de 69
Wolfgang Betz 67:93bec0baf1de 70
Wolfgang Betz 67:93bec0baf1de 71
Wolfgang Betz 67:93bec0baf1de 72 /**
Wolfgang Betz 67:93bec0baf1de 73 * @}
Wolfgang Betz 67:93bec0baf1de 74 */
Wolfgang Betz 67:93bec0baf1de 75
Wolfgang Betz 67:93bec0baf1de 76
Wolfgang Betz 67:93bec0baf1de 77 /** @defgroup Radio_Private_Macros Radio Private Macros
Wolfgang Betz 67:93bec0baf1de 78 * @{
Wolfgang Betz 67:93bec0baf1de 79 */
Wolfgang Betz 67:93bec0baf1de 80 #define XTAL_FLAG(xtalFrequency) (xtalFrequency>=25e6) ? XTAL_FLAG_26_MHz:XTAL_FLAG_24_MHz
Wolfgang Betz 67:93bec0baf1de 81
Wolfgang Betz 67:93bec0baf1de 82 #define ROUND(A) (((A-(uint32_t)A)> 0.5)? (uint32_t)A+1:(uint32_t)A)
Wolfgang Betz 67:93bec0baf1de 83 /**
Wolfgang Betz 67:93bec0baf1de 84 * @}
Wolfgang Betz 67:93bec0baf1de 85 */
Wolfgang Betz 67:93bec0baf1de 86
Wolfgang Betz 67:93bec0baf1de 87
Wolfgang Betz 67:93bec0baf1de 88 /** @defgroup Radio_Private_Variables Radio Private Variables
Wolfgang Betz 67:93bec0baf1de 89 * @{
Wolfgang Betz 67:93bec0baf1de 90 */
Wolfgang Betz 67:93bec0baf1de 91 /**
Wolfgang Betz 67:93bec0baf1de 92 * @brief The Xtal frequency. To be set by the user (see SetXtalFreq() function)
Wolfgang Betz 67:93bec0baf1de 93 */
Wolfgang Betz 67:93bec0baf1de 94 static uint32_t s_lXtalFrequency;
Wolfgang Betz 67:93bec0baf1de 95
Wolfgang Betz 67:93bec0baf1de 96 /**
Wolfgang Betz 67:93bec0baf1de 97 * @brief Factor is: B/2 used in the formula for SYNTH word calculation
Wolfgang Betz 67:93bec0baf1de 98 */
Wolfgang Betz 67:93bec0baf1de 99 static const uint8_t s_vectcBHalfFactor[4]={(HIGH_BAND_FACTOR/2), (MIDDLE_BAND_FACTOR/2), (LOW_BAND_FACTOR/2), (VERY_LOW_BAND_FACTOR/2)};
Wolfgang Betz 67:93bec0baf1de 100
Wolfgang Betz 67:93bec0baf1de 101 /**
Wolfgang Betz 67:93bec0baf1de 102 * @brief BS value to write in the SYNT0 register according to the selected band
Wolfgang Betz 67:93bec0baf1de 103 */
Wolfgang Betz 67:93bec0baf1de 104 static const uint8_t s_vectcBandRegValue[4]={SYNT0_BS_6, SYNT0_BS_12, SYNT0_BS_16, SYNT0_BS_32};
Wolfgang Betz 67:93bec0baf1de 105
Wolfgang Betz 67:93bec0baf1de 106
Wolfgang Betz 67:93bec0baf1de 107 /**
Wolfgang Betz 67:93bec0baf1de 108 * @brief It represents the available channel bandwidth times 10 for 26 Mhz xtal.
Wolfgang Betz 67:93bec0baf1de 109 * @note The channel bandwidth for others xtal frequencies can be computed since this table
Wolfgang Betz 67:93bec0baf1de 110 * multiplying the current table by a factor xtal_frequency/26e6.
Wolfgang Betz 67:93bec0baf1de 111 */
Wolfgang Betz 67:93bec0baf1de 112 static const uint16_t s_vectnBandwidth26M[90]=
Wolfgang Betz 67:93bec0baf1de 113 {
Wolfgang Betz 67:93bec0baf1de 114 8001, 7951, 7684, 7368, 7051, 6709, 6423, 5867, 5414, \
Wolfgang Betz 67:93bec0baf1de 115 4509, 4259, 4032, 3808, 3621, 3417, 3254, 2945, 2703, \
Wolfgang Betz 67:93bec0baf1de 116 2247, 2124, 2015, 1900, 1807, 1706, 1624, 1471, 1350, \
Wolfgang Betz 67:93bec0baf1de 117 1123, 1062, 1005, 950, 903, 853, 812, 735, 675, \
Wolfgang Betz 67:93bec0baf1de 118 561, 530, 502, 474, 451, 426, 406, 367, 337, \
Wolfgang Betz 67:93bec0baf1de 119 280, 265, 251, 237, 226, 213, 203, 184, 169, \
Wolfgang Betz 67:93bec0baf1de 120 140, 133, 126, 119, 113, 106, 101, 92, 84, \
Wolfgang Betz 67:93bec0baf1de 121 70, 66, 63, 59, 56, 53, 51, 46, 42, \
Wolfgang Betz 67:93bec0baf1de 122 35, 33, 31, 30, 28, 27, 25, 23, 21, \
Wolfgang Betz 67:93bec0baf1de 123 18, 17, 16, 15, 14, 13, 13, 12, 11
Wolfgang Betz 67:93bec0baf1de 124 };
Wolfgang Betz 67:93bec0baf1de 125
Wolfgang Betz 67:93bec0baf1de 126 /**
Wolfgang Betz 67:93bec0baf1de 127 * @brief It represents the available VCO frequencies
Wolfgang Betz 67:93bec0baf1de 128 */
Wolfgang Betz 67:93bec0baf1de 129 static const uint16_t s_vectnVCOFreq[16]=
Wolfgang Betz 67:93bec0baf1de 130 {
Wolfgang Betz 67:93bec0baf1de 131 4644, 4708, 4772, 4836, 4902, 4966, 5030, 5095, \
Wolfgang Betz 67:93bec0baf1de 132 5161, 5232, 5303, 5375, 5448, 5519, 5592, 5663
Wolfgang Betz 67:93bec0baf1de 133 };
Wolfgang Betz 67:93bec0baf1de 134
Wolfgang Betz 67:93bec0baf1de 135 /**
Wolfgang Betz 67:93bec0baf1de 136 * @brief This variable is used to enable or disable
Wolfgang Betz 67:93bec0baf1de 137 * the VCO calibration WA called at the end of the SpiritRadioSetFrequencyBase fcn.
Wolfgang Betz 67:93bec0baf1de 138 * Default is enabled.
Wolfgang Betz 67:93bec0baf1de 139 */
Wolfgang Betz 67:93bec0baf1de 140 static SpiritFunctionalState xDoVcoCalibrationWA=S_ENABLE;
Wolfgang Betz 67:93bec0baf1de 141
Wolfgang Betz 67:93bec0baf1de 142
Wolfgang Betz 67:93bec0baf1de 143 /**
Wolfgang Betz 67:93bec0baf1de 144 * @brief These values are used to interpolate the power curves.
Wolfgang Betz 67:93bec0baf1de 145 * Interpolation curves are linear in the following 3 regions:
Wolfgang Betz 67:93bec0baf1de 146 * - reg value: 1 to 13 (up region)
Wolfgang Betz 67:93bec0baf1de 147 * - reg value: 13 to 40 (mid region)
Wolfgang Betz 67:93bec0baf1de 148 * - reg value: 41 to 90 (low region)
Wolfgang Betz 67:93bec0baf1de 149 * power_reg = m*power_dBm + q
Wolfgang Betz 67:93bec0baf1de 150 * For each band the order is: {m-up, q-up, m-mid, q-mid, m-low, q-low}.
Wolfgang Betz 67:93bec0baf1de 151 * @note The power interpolation curves have been extracted
Wolfgang Betz 67:93bec0baf1de 152 * by measurements done on the divisional evaluation boards.
Wolfgang Betz 67:93bec0baf1de 153 */
Wolfgang Betz 67:93bec0baf1de 154 static const float fPowerFactors[5][6]={
Wolfgang Betz 67:93bec0baf1de 155 {-2.11,25.66,-2.11,25.66,-2.00,31.28}, /* 915 */
Wolfgang Betz 67:93bec0baf1de 156 {-2.04,23.45,-2.04,23.45,-1.95,27.66}, /* 868 */
Wolfgang Betz 67:93bec0baf1de 157 {-3.48,38.45,-1.89,27.66,-1.92,30.23}, /* 433 */
Wolfgang Betz 67:93bec0baf1de 158 {-3.27,35.43,-1.80,26.31,-1.89,29.61}, /* 315 */
Wolfgang Betz 67:93bec0baf1de 159 {-4.18,50.66,-1.80,30.04,-1.86,32.22}, /* 169 */
Wolfgang Betz 67:93bec0baf1de 160 };
Wolfgang Betz 67:93bec0baf1de 161
Wolfgang Betz 67:93bec0baf1de 162 /**
Wolfgang Betz 67:93bec0baf1de 163 * @}
Wolfgang Betz 67:93bec0baf1de 164 */
Wolfgang Betz 67:93bec0baf1de 165
Wolfgang Betz 67:93bec0baf1de 166
Wolfgang Betz 67:93bec0baf1de 167 /** @defgroup Radio_Private_FunctionPrototypes Radio Private Function Prototypes
Wolfgang Betz 67:93bec0baf1de 168 * @{
Wolfgang Betz 67:93bec0baf1de 169 */
Wolfgang Betz 67:93bec0baf1de 170
Wolfgang Betz 67:93bec0baf1de 171
Wolfgang Betz 67:93bec0baf1de 172 /**
Wolfgang Betz 67:93bec0baf1de 173 * @}
Wolfgang Betz 67:93bec0baf1de 174 */
Wolfgang Betz 67:93bec0baf1de 175
Wolfgang Betz 67:93bec0baf1de 176
Wolfgang Betz 67:93bec0baf1de 177 /** @defgroup Radio_Private_Functions Radio Private Functions
Wolfgang Betz 67:93bec0baf1de 178 * @{
Wolfgang Betz 67:93bec0baf1de 179 */
Wolfgang Betz 67:93bec0baf1de 180
Wolfgang Betz 67:93bec0baf1de 181 /**
Wolfgang Betz 67:93bec0baf1de 182 * @brief Initializes the SPIRIT analog and digital radio part according to the specified
Wolfgang Betz 67:93bec0baf1de 183 * parameters in the pxSRadioInitStruct.
Wolfgang Betz 67:93bec0baf1de 184 * @param pxSRadioInitStruct pointer to a SRadioInit structure that
Wolfgang Betz 67:93bec0baf1de 185 * contains the configuration information for the analog radio part of SPIRIT.
Wolfgang Betz 67:93bec0baf1de 186 * @retval Error code: 0=no error, 1=error during calibration of VCO.
Wolfgang Betz 67:93bec0baf1de 187 */
Wolfgang Betz 67:93bec0baf1de 188 uint8_t SpiritRadioInit(SRadioInit* pxSRadioInitStruct)
Wolfgang Betz 67:93bec0baf1de 189 {
Wolfgang Betz 67:93bec0baf1de 190 int32_t FOffsetTmp;
Wolfgang Betz 67:93bec0baf1de 191 uint8_t anaRadioRegArray[8], digRadioRegArray[4];
Wolfgang Betz 67:93bec0baf1de 192 int16_t xtalOffsetFactor;
Wolfgang Betz 67:93bec0baf1de 193 uint8_t drM, drE, FdevM, FdevE, bwM, bwE;
Wolfgang Betz 67:93bec0baf1de 194
Wolfgang Betz 67:93bec0baf1de 195 /* Workaround for Vtune */
Wolfgang Betz 67:93bec0baf1de 196 uint8_t value = 0xA0; SpiritSpiWriteRegisters(0x9F, 1, &value);
Wolfgang Betz 67:93bec0baf1de 197
Wolfgang Betz 67:93bec0baf1de 198 /* Calculates the offset respect to RF frequency and according to xtal_ppm parameter: (xtal_ppm*FBase)/10^6 */
Wolfgang Betz 67:93bec0baf1de 199 FOffsetTmp = (int32_t)(((float)pxSRadioInitStruct->nXtalOffsetPpm*pxSRadioInitStruct->lFrequencyBase)/PPM_FACTOR);
Wolfgang Betz 67:93bec0baf1de 200
Wolfgang Betz 67:93bec0baf1de 201 /* Check the parameters */
Wolfgang Betz 67:93bec0baf1de 202 s_assert_param(IS_FREQUENCY_BAND(pxSRadioInitStruct->lFrequencyBase));
Wolfgang Betz 67:93bec0baf1de 203 s_assert_param(IS_MODULATION_SELECTED(pxSRadioInitStruct->xModulationSelect));
Wolfgang Betz 67:93bec0baf1de 204 s_assert_param(IS_DATARATE(pxSRadioInitStruct->lDatarate));
Wolfgang Betz 67:93bec0baf1de 205 s_assert_param(IS_FREQUENCY_OFFSET(FOffsetTmp,s_lXtalFrequency));
Wolfgang Betz 67:93bec0baf1de 206 s_assert_param(IS_CHANNEL_SPACE(pxSRadioInitStruct->nChannelSpace,s_lXtalFrequency));
Wolfgang Betz 67:93bec0baf1de 207 s_assert_param(IS_F_DEV(pxSRadioInitStruct->lFreqDev,s_lXtalFrequency));
Wolfgang Betz 67:93bec0baf1de 208
Wolfgang Betz 67:93bec0baf1de 209 /* Disable the digital, ADC, SMPS reference clock divider if fXO>24MHz or fXO<26MHz */
Wolfgang Betz 67:93bec0baf1de 210 SpiritSpiCommandStrobes(COMMAND_STANDBY);
Wolfgang Betz 67:93bec0baf1de 211 do{
Wolfgang Betz 67:93bec0baf1de 212 /* Delay for state transition */
Wolfgang Betz 67:93bec0baf1de 213 for(volatile uint8_t i=0; i!=0xFF; i++);
Wolfgang Betz 67:93bec0baf1de 214
Wolfgang Betz 67:93bec0baf1de 215 /* Reads the MC_STATUS register */
Wolfgang Betz 67:93bec0baf1de 216 SpiritRefreshStatus();
Wolfgang Betz 67:93bec0baf1de 217 }while(g_xStatus.MC_STATE!=MC_STATE_STANDBY);
Wolfgang Betz 67:93bec0baf1de 218
Wolfgang Betz 67:93bec0baf1de 219 if(s_lXtalFrequency<DOUBLE_XTAL_THR)
Wolfgang Betz 67:93bec0baf1de 220 {
Wolfgang Betz 67:93bec0baf1de 221 SpiritRadioSetDigDiv(S_DISABLE);
Wolfgang Betz 67:93bec0baf1de 222 s_assert_param(IS_CH_BW(pxSRadioInitStruct->lBandwidth,s_lXtalFrequency));
Wolfgang Betz 67:93bec0baf1de 223 }
Wolfgang Betz 67:93bec0baf1de 224 else
Wolfgang Betz 67:93bec0baf1de 225 {
Wolfgang Betz 67:93bec0baf1de 226 SpiritRadioSetDigDiv(S_ENABLE);
Wolfgang Betz 67:93bec0baf1de 227 s_assert_param(IS_CH_BW(pxSRadioInitStruct->lBandwidth,(s_lXtalFrequency>>1)));
Wolfgang Betz 67:93bec0baf1de 228 }
Wolfgang Betz 67:93bec0baf1de 229
Wolfgang Betz 67:93bec0baf1de 230 /* Goes in READY state */
Wolfgang Betz 67:93bec0baf1de 231 SpiritSpiCommandStrobes(COMMAND_READY);
Wolfgang Betz 67:93bec0baf1de 232 do{
Wolfgang Betz 67:93bec0baf1de 233 /* Delay for state transition */
Wolfgang Betz 67:93bec0baf1de 234 for(volatile uint8_t i=0; i!=0xFF; i++);
Wolfgang Betz 67:93bec0baf1de 235
Wolfgang Betz 67:93bec0baf1de 236 /* Reads the MC_STATUS register */
Wolfgang Betz 67:93bec0baf1de 237 SpiritRefreshStatus();
Wolfgang Betz 67:93bec0baf1de 238 }while(g_xStatus.MC_STATE!=MC_STATE_READY);
Wolfgang Betz 67:93bec0baf1de 239
Wolfgang Betz 67:93bec0baf1de 240 /* Calculates the FC_OFFSET parameter and cast as signed int: FOffsetTmp = (Fxtal/2^18)*FC_OFFSET */
Wolfgang Betz 67:93bec0baf1de 241 xtalOffsetFactor = (int16_t)(((float)FOffsetTmp*FBASE_DIVIDER)/s_lXtalFrequency);
Wolfgang Betz 67:93bec0baf1de 242 anaRadioRegArray[2] = (uint8_t)((((uint16_t)xtalOffsetFactor)>>8)&0x0F);
Wolfgang Betz 67:93bec0baf1de 243 anaRadioRegArray[3] = (uint8_t)(xtalOffsetFactor);
Wolfgang Betz 67:93bec0baf1de 244
Wolfgang Betz 67:93bec0baf1de 245 /* Calculates the channel space factor */
Wolfgang Betz 67:93bec0baf1de 246 anaRadioRegArray[0] =((uint32_t)pxSRadioInitStruct->nChannelSpace<<9)/(s_lXtalFrequency>>6)+1;
Wolfgang Betz 67:93bec0baf1de 247
Wolfgang Betz 67:93bec0baf1de 248 SpiritManagementWaTRxFcMem(pxSRadioInitStruct->lFrequencyBase);
Wolfgang Betz 67:93bec0baf1de 249
Wolfgang Betz 67:93bec0baf1de 250 /* 2nd order DEM algorithm enabling */
Wolfgang Betz 67:93bec0baf1de 251 uint8_t tmpreg; SpiritSpiReadRegisters(0xA3, 1, &tmpreg);
Wolfgang Betz 67:93bec0baf1de 252 tmpreg &= ~0x02; SpiritSpiWriteRegisters(0xA3, 1, &tmpreg);
Wolfgang Betz 67:93bec0baf1de 253
Wolfgang Betz 67:93bec0baf1de 254 /* Check the channel center frequency is in one of the possible range */
Wolfgang Betz 67:93bec0baf1de 255 s_assert_param(IS_FREQUENCY_BAND((pxSRadioInitStruct->lFrequencyBase + ((xtalOffsetFactor*s_lXtalFrequency)/FBASE_DIVIDER) + pxSRadioInitStruct->nChannelSpace * pxSRadioInitStruct->cChannelNumber)));
Wolfgang Betz 67:93bec0baf1de 256
Wolfgang Betz 67:93bec0baf1de 257 /* Calculates the datarate mantissa and exponent */
Wolfgang Betz 67:93bec0baf1de 258 SpiritRadioSearchDatarateME(pxSRadioInitStruct->lDatarate, &drM, &drE);
Wolfgang Betz 67:93bec0baf1de 259 digRadioRegArray[0] = (uint8_t)(drM);
Wolfgang Betz 67:93bec0baf1de 260 digRadioRegArray[1] = (uint8_t)(0x00 | pxSRadioInitStruct->xModulationSelect |drE);
Wolfgang Betz 67:93bec0baf1de 261
Wolfgang Betz 67:93bec0baf1de 262 /* Read the fdev register to preserve the clock recovery algo bit */
Wolfgang Betz 67:93bec0baf1de 263 SpiritSpiReadRegisters(0x1C, 1, &tmpreg);
Wolfgang Betz 67:93bec0baf1de 264
Wolfgang Betz 67:93bec0baf1de 265 /* Calculates the frequency deviation mantissa and exponent */
Wolfgang Betz 67:93bec0baf1de 266 SpiritRadioSearchFreqDevME(pxSRadioInitStruct->lFreqDev, &FdevM, &FdevE);
Wolfgang Betz 67:93bec0baf1de 267 digRadioRegArray[2] = (uint8_t)((FdevE<<4) | (tmpreg&0x08) | FdevM);
Wolfgang Betz 67:93bec0baf1de 268
Wolfgang Betz 67:93bec0baf1de 269 /* Calculates the channel filter mantissa and exponent */
Wolfgang Betz 67:93bec0baf1de 270 SpiritRadioSearchChannelBwME(pxSRadioInitStruct->lBandwidth, &bwM, &bwE);
Wolfgang Betz 67:93bec0baf1de 271
Wolfgang Betz 67:93bec0baf1de 272 digRadioRegArray[3] = (uint8_t)((bwM<<4) | bwE);
Wolfgang Betz 67:93bec0baf1de 273
Wolfgang Betz 67:93bec0baf1de 274 float if_off=(3.0*480140)/(s_lXtalFrequency>>12)-64;
Wolfgang Betz 67:93bec0baf1de 275
Wolfgang Betz 67:93bec0baf1de 276 uint8_t ifOffsetAna = ROUND(if_off);
Wolfgang Betz 67:93bec0baf1de 277
Wolfgang Betz 67:93bec0baf1de 278 if(s_lXtalFrequency<DOUBLE_XTAL_THR)
Wolfgang Betz 67:93bec0baf1de 279 {
Wolfgang Betz 67:93bec0baf1de 280 /* if offset digital is the same in case of single xtal */
Wolfgang Betz 67:93bec0baf1de 281 anaRadioRegArray[1] = ifOffsetAna;
Wolfgang Betz 67:93bec0baf1de 282 }
Wolfgang Betz 67:93bec0baf1de 283 else
Wolfgang Betz 67:93bec0baf1de 284 {
Wolfgang Betz 67:93bec0baf1de 285 if_off=(3.0*480140)/(s_lXtalFrequency>>13)-64;
Wolfgang Betz 67:93bec0baf1de 286
Wolfgang Betz 67:93bec0baf1de 287 /* ... otherwise recompute it */
Wolfgang Betz 67:93bec0baf1de 288 anaRadioRegArray[1] = ROUND(if_off);
Wolfgang Betz 67:93bec0baf1de 289 }
Wolfgang Betz 67:93bec0baf1de 290 // if(s_lXtalFrequency==24000000) {
Wolfgang Betz 67:93bec0baf1de 291 // ifOffsetAna = 0xB6;
Wolfgang Betz 67:93bec0baf1de 292 // anaRadioRegArray[1] = 0xB6;
Wolfgang Betz 67:93bec0baf1de 293 // }
Wolfgang Betz 67:93bec0baf1de 294 // if(s_lXtalFrequency==25000000) {
Wolfgang Betz 67:93bec0baf1de 295 // ifOffsetAna = 0xAC;
Wolfgang Betz 67:93bec0baf1de 296 // anaRadioRegArray[1] = 0xAC;
Wolfgang Betz 67:93bec0baf1de 297 // }
Wolfgang Betz 67:93bec0baf1de 298 // if(s_lXtalFrequency==26000000) {
Wolfgang Betz 67:93bec0baf1de 299 // ifOffsetAna = 0xA3;
Wolfgang Betz 67:93bec0baf1de 300 // anaRadioRegArray[1] = 0xA3;
Wolfgang Betz 67:93bec0baf1de 301 // }
Wolfgang Betz 67:93bec0baf1de 302 // if(s_lXtalFrequency==48000000) {
Wolfgang Betz 67:93bec0baf1de 303 // ifOffsetAna = 0x3B;
Wolfgang Betz 67:93bec0baf1de 304 // anaRadioRegArray[1] = 0xB6;
Wolfgang Betz 67:93bec0baf1de 305 // }
Wolfgang Betz 67:93bec0baf1de 306 // if(s_lXtalFrequency==50000000) {
Wolfgang Betz 67:93bec0baf1de 307 // ifOffsetAna = 0x36;
Wolfgang Betz 67:93bec0baf1de 308 // anaRadioRegArray[1] = 0xAC;
Wolfgang Betz 67:93bec0baf1de 309 // }
Wolfgang Betz 67:93bec0baf1de 310 // if(s_lXtalFrequency==52000000) {
Wolfgang Betz 67:93bec0baf1de 311 // ifOffsetAna = 0x31;
Wolfgang Betz 67:93bec0baf1de 312 // anaRadioRegArray[1] = 0xA3;
Wolfgang Betz 67:93bec0baf1de 313 // }
Wolfgang Betz 67:93bec0baf1de 314
Wolfgang Betz 67:93bec0baf1de 315 g_xStatus = SpiritSpiWriteRegisters(IF_OFFSET_ANA_BASE, 1, &ifOffsetAna);
Wolfgang Betz 67:93bec0baf1de 316
Wolfgang Betz 67:93bec0baf1de 317
Wolfgang Betz 67:93bec0baf1de 318 /* Sets Xtal configuration */
Wolfgang Betz 67:93bec0baf1de 319 if(s_lXtalFrequency>DOUBLE_XTAL_THR)
Wolfgang Betz 67:93bec0baf1de 320 {
Wolfgang Betz 67:93bec0baf1de 321 SpiritRadioSetXtalFlag(XTAL_FLAG((s_lXtalFrequency/2)));
Wolfgang Betz 67:93bec0baf1de 322 }
Wolfgang Betz 67:93bec0baf1de 323 else
Wolfgang Betz 67:93bec0baf1de 324 {
Wolfgang Betz 67:93bec0baf1de 325 SpiritRadioSetXtalFlag(XTAL_FLAG(s_lXtalFrequency));
Wolfgang Betz 67:93bec0baf1de 326 }
Wolfgang Betz 67:93bec0baf1de 327
Wolfgang Betz 67:93bec0baf1de 328 /* Sets the channel number in the corresponding register */
Wolfgang Betz 67:93bec0baf1de 329 SpiritSpiWriteRegisters(CHNUM_BASE, 1, &pxSRadioInitStruct->cChannelNumber);
Wolfgang Betz 67:93bec0baf1de 330
Wolfgang Betz 67:93bec0baf1de 331 /* Configures the Analog Radio registers */
Wolfgang Betz 67:93bec0baf1de 332 SpiritSpiWriteRegisters(CHSPACE_BASE, 4, anaRadioRegArray);
Wolfgang Betz 67:93bec0baf1de 333
Wolfgang Betz 67:93bec0baf1de 334 /* Configures the Digital Radio registers */
Wolfgang Betz 67:93bec0baf1de 335 g_xStatus = SpiritSpiWriteRegisters(MOD1_BASE, 4, digRadioRegArray);
Wolfgang Betz 67:93bec0baf1de 336
Wolfgang Betz 67:93bec0baf1de 337 /* Enable the freeze option of the AFC on the SYNC word */
Wolfgang Betz 67:93bec0baf1de 338 SpiritRadioAFCFreezeOnSync(S_ENABLE);
Wolfgang Betz 67:93bec0baf1de 339
Wolfgang Betz 67:93bec0baf1de 340 /* Set the IQC correction optimal value */
Wolfgang Betz 67:93bec0baf1de 341 anaRadioRegArray[0]=0x80;
Wolfgang Betz 67:93bec0baf1de 342 anaRadioRegArray[1]=0xE3;
Wolfgang Betz 67:93bec0baf1de 343 g_xStatus = SpiritSpiWriteRegisters(0x99, 2, anaRadioRegArray);
Wolfgang Betz 67:93bec0baf1de 344
Wolfgang Betz 67:93bec0baf1de 345 return SpiritRadioSetFrequencyBase(pxSRadioInitStruct->lFrequencyBase);
Wolfgang Betz 67:93bec0baf1de 346
Wolfgang Betz 67:93bec0baf1de 347 }
Wolfgang Betz 67:93bec0baf1de 348
Wolfgang Betz 67:93bec0baf1de 349
Wolfgang Betz 67:93bec0baf1de 350 /**
Wolfgang Betz 67:93bec0baf1de 351 * @brief Returns the SPIRIT analog and digital radio structure according to the registers value.
Wolfgang Betz 67:93bec0baf1de 352 * @param pxSRadioInitStruct pointer to a SRadioInit structure that
Wolfgang Betz 67:93bec0baf1de 353 * contains the configuration information for the analog radio part of SPIRIT.
Wolfgang Betz 67:93bec0baf1de 354 * @retval None.
Wolfgang Betz 67:93bec0baf1de 355 */
Wolfgang Betz 67:93bec0baf1de 356 void SpiritRadioGetInfo(SRadioInit* pxSRadioInitStruct)
Wolfgang Betz 67:93bec0baf1de 357 {
Wolfgang Betz 67:93bec0baf1de 358 uint8_t anaRadioRegArray[8], digRadioRegArray[4];
Wolfgang Betz 67:93bec0baf1de 359 BandSelect band;
Wolfgang Betz 67:93bec0baf1de 360 int16_t xtalOffsetFactor;
Wolfgang Betz 67:93bec0baf1de 361
Wolfgang Betz 67:93bec0baf1de 362 /* Get the RF board version */
Wolfgang Betz 67:93bec0baf1de 363 //SpiritVersion xSpiritVersion = SpiritGeneralGetSpiritVersion();
Wolfgang Betz 67:93bec0baf1de 364
Wolfgang Betz 67:93bec0baf1de 365 /* Reads the Analog Radio registers */
Wolfgang Betz 67:93bec0baf1de 366 SpiritSpiReadRegisters(SYNT3_BASE, 8, anaRadioRegArray);
Wolfgang Betz 67:93bec0baf1de 367
Wolfgang Betz 67:93bec0baf1de 368 /* Reads the Digital Radio registers */
Wolfgang Betz 67:93bec0baf1de 369 g_xStatus = SpiritSpiReadRegisters(MOD1_BASE, 4, digRadioRegArray);
Wolfgang Betz 67:93bec0baf1de 370
Wolfgang Betz 67:93bec0baf1de 371 /* Reads the operating band masking the Band selected field */
Wolfgang Betz 67:93bec0baf1de 372 if((anaRadioRegArray[3] & 0x07) == SYNT0_BS_6)
Wolfgang Betz 67:93bec0baf1de 373 {
Wolfgang Betz 67:93bec0baf1de 374 band = HIGH_BAND;
Wolfgang Betz 67:93bec0baf1de 375 }
Wolfgang Betz 67:93bec0baf1de 376 else if ((anaRadioRegArray[3] & 0x07) == SYNT0_BS_12)
Wolfgang Betz 67:93bec0baf1de 377 {
Wolfgang Betz 67:93bec0baf1de 378 band = MIDDLE_BAND;
Wolfgang Betz 67:93bec0baf1de 379 }
Wolfgang Betz 67:93bec0baf1de 380 else if ((anaRadioRegArray[3] & 0x07) == SYNT0_BS_16)
Wolfgang Betz 67:93bec0baf1de 381 {
Wolfgang Betz 67:93bec0baf1de 382 band = LOW_BAND;
Wolfgang Betz 67:93bec0baf1de 383 }
Wolfgang Betz 67:93bec0baf1de 384 else if ((anaRadioRegArray[3] & 0x07) == SYNT0_BS_32)
Wolfgang Betz 67:93bec0baf1de 385 {
Wolfgang Betz 67:93bec0baf1de 386 band = VERY_LOW_BAND;
Wolfgang Betz 67:93bec0baf1de 387 }
Wolfgang Betz 67:93bec0baf1de 388 else
Wolfgang Betz 67:93bec0baf1de 389 {
Wolfgang Betz 67:93bec0baf1de 390 /* if it is another value, set it to a valid one in order to avoid access violation */
Wolfgang Betz 67:93bec0baf1de 391 uint8_t tmp=(anaRadioRegArray[3]&0xF8)|SYNT0_BS_6;
Wolfgang Betz 67:93bec0baf1de 392 SpiritSpiWriteRegisters(SYNT0_BASE,1,&tmp);
Wolfgang Betz 67:93bec0baf1de 393 band = HIGH_BAND;
Wolfgang Betz 67:93bec0baf1de 394 }
Wolfgang Betz 67:93bec0baf1de 395
Wolfgang Betz 67:93bec0baf1de 396 /* Computes the synth word */
Wolfgang Betz 67:93bec0baf1de 397 uint32_t synthWord = (uint32_t)((((uint32_t)(anaRadioRegArray[0]&0x1F))<<21)+(((uint32_t)(anaRadioRegArray[1]))<<13)+\
Wolfgang Betz 67:93bec0baf1de 398 (((uint32_t)(anaRadioRegArray[2]))<<5)+(((uint32_t)(anaRadioRegArray[3]))>>3));
Wolfgang Betz 67:93bec0baf1de 399
Wolfgang Betz 67:93bec0baf1de 400 /* Calculates the frequency base */
Wolfgang Betz 67:93bec0baf1de 401 uint8_t cRefDiv = (uint8_t)SpiritRadioGetRefDiv()+1;
Wolfgang Betz 67:93bec0baf1de 402 pxSRadioInitStruct->lFrequencyBase = (uint32_t)round(synthWord*(((double)s_lXtalFrequency)/(FBASE_DIVIDER*cRefDiv*s_vectcBHalfFactor[band])));
Wolfgang Betz 67:93bec0baf1de 403
Wolfgang Betz 67:93bec0baf1de 404 /* Calculates the Offset Factor */
Wolfgang Betz 67:93bec0baf1de 405 uint16_t xtalOffTemp = ((((uint16_t)anaRadioRegArray[6])<<8)+((uint16_t)anaRadioRegArray[7]));
Wolfgang Betz 67:93bec0baf1de 406
Wolfgang Betz 67:93bec0baf1de 407 /* If a negative number then convert the 12 bit 2-complement in a 16 bit number */
Wolfgang Betz 67:93bec0baf1de 408 if(xtalOffTemp & 0x0800)
Wolfgang Betz 67:93bec0baf1de 409 {
Wolfgang Betz 67:93bec0baf1de 410 xtalOffTemp = xtalOffTemp | 0xF000;
Wolfgang Betz 67:93bec0baf1de 411 }
Wolfgang Betz 67:93bec0baf1de 412 else
Wolfgang Betz 67:93bec0baf1de 413 {
Wolfgang Betz 67:93bec0baf1de 414 xtalOffTemp = xtalOffTemp & 0x0FFF;
Wolfgang Betz 67:93bec0baf1de 415 }
Wolfgang Betz 67:93bec0baf1de 416
Wolfgang Betz 67:93bec0baf1de 417 xtalOffsetFactor = *((int16_t*)(&xtalOffTemp));
Wolfgang Betz 67:93bec0baf1de 418
Wolfgang Betz 67:93bec0baf1de 419 /* Calculates the frequency offset in ppm */
Wolfgang Betz 67:93bec0baf1de 420 pxSRadioInitStruct->nXtalOffsetPpm =(int16_t)((uint32_t)xtalOffsetFactor*s_lXtalFrequency*PPM_FACTOR)/((uint32_t)FBASE_DIVIDER*pxSRadioInitStruct->lFrequencyBase);
Wolfgang Betz 67:93bec0baf1de 421
Wolfgang Betz 67:93bec0baf1de 422 /* Channel space */
Wolfgang Betz 67:93bec0baf1de 423 pxSRadioInitStruct->nChannelSpace = anaRadioRegArray[4]*(s_lXtalFrequency>>15);
Wolfgang Betz 67:93bec0baf1de 424
Wolfgang Betz 67:93bec0baf1de 425 /* Channel number */
Wolfgang Betz 67:93bec0baf1de 426 pxSRadioInitStruct->cChannelNumber = SpiritRadioGetChannel();
Wolfgang Betz 67:93bec0baf1de 427
Wolfgang Betz 67:93bec0baf1de 428 /* Modulation select */
Wolfgang Betz 67:93bec0baf1de 429 pxSRadioInitStruct->xModulationSelect = (ModulationSelect)(digRadioRegArray[1] & 0x70);
Wolfgang Betz 67:93bec0baf1de 430
Wolfgang Betz 67:93bec0baf1de 431 /* Reads the frequency deviation for mantissa and exponent */
Wolfgang Betz 67:93bec0baf1de 432 uint8_t FDevM = digRadioRegArray[2]&0x07;
Wolfgang Betz 67:93bec0baf1de 433 uint8_t FDevE = (digRadioRegArray[2]&0xF0)>>4;
Wolfgang Betz 67:93bec0baf1de 434
Wolfgang Betz 67:93bec0baf1de 435 /* Reads the channel filter register for mantissa and exponent */
Wolfgang Betz 67:93bec0baf1de 436 uint8_t bwM = (digRadioRegArray[3]&0xF0)>>4;
Wolfgang Betz 67:93bec0baf1de 437 uint8_t bwE = digRadioRegArray[3]&0x0F;
Wolfgang Betz 67:93bec0baf1de 438
Wolfgang Betz 67:93bec0baf1de 439 uint8_t cDivider = 0;
Wolfgang Betz 67:93bec0baf1de 440 cDivider = SpiritRadioGetDigDiv();
Wolfgang Betz 67:93bec0baf1de 441
Wolfgang Betz 67:93bec0baf1de 442 /* Calculates the datarate */
Wolfgang Betz 67:93bec0baf1de 443 pxSRadioInitStruct->lDatarate = ((s_lXtalFrequency>>(5+cDivider))*(256+digRadioRegArray[0]))>>(23-(digRadioRegArray[1]&0x0F));
Wolfgang Betz 67:93bec0baf1de 444
Wolfgang Betz 67:93bec0baf1de 445 /* Calculates the frequency deviation */
Wolfgang Betz 67:93bec0baf1de 446 // (((s_lXtalFrequency>>6)*(8+FDevM))>>(12-FDevE+cCorrection));
Wolfgang Betz 67:93bec0baf1de 447 pxSRadioInitStruct->lFreqDev =(uint32_t)((float)s_lXtalFrequency/(((uint32_t)1)<<18)*(uint32_t)((8.0+FDevM)/2*(1<<FDevE)));
Wolfgang Betz 67:93bec0baf1de 448
Wolfgang Betz 67:93bec0baf1de 449 /* Reads the channel filter bandwidth from the look-up table and return it */
Wolfgang Betz 67:93bec0baf1de 450 pxSRadioInitStruct->lBandwidth = (uint32_t)(100.0*s_vectnBandwidth26M[bwM+(bwE*9)]*((s_lXtalFrequency>>cDivider)/26e6));
Wolfgang Betz 67:93bec0baf1de 451
Wolfgang Betz 67:93bec0baf1de 452 }
Wolfgang Betz 67:93bec0baf1de 453
Wolfgang Betz 67:93bec0baf1de 454
Wolfgang Betz 67:93bec0baf1de 455 /**
Wolfgang Betz 67:93bec0baf1de 456 * @brief Sets the Xtal configuration in the ANA_FUNC_CONF0 register.
Wolfgang Betz 67:93bec0baf1de 457 * @param xXtal one of the possible value of the enum type XtalFrequency.
Wolfgang Betz 67:93bec0baf1de 458 * @arg XTAL_FLAG_24_MHz: in case of 24 MHz crystal
Wolfgang Betz 67:93bec0baf1de 459 * @arg XTAL_FLAG_26_MHz: in case of 26 MHz crystal
Wolfgang Betz 67:93bec0baf1de 460 * @retval None.
Wolfgang Betz 67:93bec0baf1de 461 */
Wolfgang Betz 67:93bec0baf1de 462 void SpiritRadioSetXtalFlag(XtalFlag xXtal)
Wolfgang Betz 67:93bec0baf1de 463 {
Wolfgang Betz 67:93bec0baf1de 464 uint8_t tempRegValue = 0x00;
Wolfgang Betz 67:93bec0baf1de 465
Wolfgang Betz 67:93bec0baf1de 466 /* Check the parameters */
Wolfgang Betz 67:93bec0baf1de 467 s_assert_param(IS_XTAL_FLAG(xXtal));
Wolfgang Betz 67:93bec0baf1de 468
Wolfgang Betz 67:93bec0baf1de 469 /* Reads the ANA_FUNC_CONF_0 register */
Wolfgang Betz 67:93bec0baf1de 470 g_xStatus = SpiritSpiReadRegisters(ANA_FUNC_CONF0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 471 if(xXtal == XTAL_FLAG_26_MHz)
Wolfgang Betz 67:93bec0baf1de 472 {
Wolfgang Betz 67:93bec0baf1de 473 tempRegValue|=SELECT_24_26_MHZ_MASK;
Wolfgang Betz 67:93bec0baf1de 474 }
Wolfgang Betz 67:93bec0baf1de 475 else
Wolfgang Betz 67:93bec0baf1de 476 {
Wolfgang Betz 67:93bec0baf1de 477 tempRegValue &= (~SELECT_24_26_MHZ_MASK);
Wolfgang Betz 67:93bec0baf1de 478 }
Wolfgang Betz 67:93bec0baf1de 479
Wolfgang Betz 67:93bec0baf1de 480 /* Sets the 24_26MHz_SELECT field in the ANA_FUNC_CONF_0 register */
Wolfgang Betz 67:93bec0baf1de 481 g_xStatus = SpiritSpiWriteRegisters(ANA_FUNC_CONF0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 482
Wolfgang Betz 67:93bec0baf1de 483 }
Wolfgang Betz 67:93bec0baf1de 484
Wolfgang Betz 67:93bec0baf1de 485
Wolfgang Betz 67:93bec0baf1de 486 /**
Wolfgang Betz 67:93bec0baf1de 487 * @brief Returns the Xtal configuration in the ANA_FUNC_CONF0 register.
Wolfgang Betz 67:93bec0baf1de 488 * @param None.
Wolfgang Betz 67:93bec0baf1de 489 * @retval XtalFrequency Settled Xtal configuration.
Wolfgang Betz 67:93bec0baf1de 490 */
Wolfgang Betz 67:93bec0baf1de 491 XtalFlag SpiritRadioGetXtalFlag(void)
Wolfgang Betz 67:93bec0baf1de 492 {
Wolfgang Betz 67:93bec0baf1de 493 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 494
Wolfgang Betz 67:93bec0baf1de 495 /* Reads the Xtal configuration in the ANA_FUNC_CONF_0 register and return the value */
Wolfgang Betz 67:93bec0baf1de 496 g_xStatus = SpiritSpiReadRegisters(ANA_FUNC_CONF0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 497
Wolfgang Betz 67:93bec0baf1de 498 return (XtalFlag)((tempRegValue & 0x40)>>6);
Wolfgang Betz 67:93bec0baf1de 499
Wolfgang Betz 67:93bec0baf1de 500 }
Wolfgang Betz 67:93bec0baf1de 501
Wolfgang Betz 67:93bec0baf1de 502
Wolfgang Betz 67:93bec0baf1de 503 /**
Wolfgang Betz 67:93bec0baf1de 504 * @brief Returns the charge pump word for a given VCO frequency.
Wolfgang Betz 67:93bec0baf1de 505 * @param lFc channel center frequency expressed in Hz.
Wolfgang Betz 67:93bec0baf1de 506 * This parameter can be a value in one of the following ranges:<ul>
Wolfgang Betz 67:93bec0baf1de 507 * <li> High_Band: from 779 MHz to 915 MHz </li>
Wolfgang Betz 67:93bec0baf1de 508 * <li> Middle Band: from 387 MHz to 470 MHz </li>
Wolfgang Betz 67:93bec0baf1de 509 * <li> Low Band: from 300 MHz to 348 MHz </li>
Wolfgang Betz 67:93bec0baf1de 510 * <li> Very low Band: from 150 MHz to 174 MHz </li> </ul>
Wolfgang Betz 67:93bec0baf1de 511 * @retval uint8_t Charge pump word.
Wolfgang Betz 67:93bec0baf1de 512 */
Wolfgang Betz 67:93bec0baf1de 513 uint8_t SpiritRadioSearchWCP(uint32_t lFc)
Wolfgang Betz 67:93bec0baf1de 514 {
Wolfgang Betz 67:93bec0baf1de 515 int8_t i;
Wolfgang Betz 67:93bec0baf1de 516 uint32_t vcofreq;
Wolfgang Betz 67:93bec0baf1de 517 uint8_t BFactor;
Wolfgang Betz 67:93bec0baf1de 518
Wolfgang Betz 67:93bec0baf1de 519 /* Check the channel center frequency is in one of the possible range */
Wolfgang Betz 67:93bec0baf1de 520 s_assert_param(IS_FREQUENCY_BAND(lFc));
Wolfgang Betz 67:93bec0baf1de 521
Wolfgang Betz 67:93bec0baf1de 522 /* Search the operating band */
Wolfgang Betz 67:93bec0baf1de 523 if(IS_FREQUENCY_BAND_HIGH(lFc))
Wolfgang Betz 67:93bec0baf1de 524 {
Wolfgang Betz 67:93bec0baf1de 525 BFactor = HIGH_BAND_FACTOR;
Wolfgang Betz 67:93bec0baf1de 526 }
Wolfgang Betz 67:93bec0baf1de 527 else if(IS_FREQUENCY_BAND_MIDDLE(lFc))
Wolfgang Betz 67:93bec0baf1de 528 {
Wolfgang Betz 67:93bec0baf1de 529 BFactor = MIDDLE_BAND_FACTOR;
Wolfgang Betz 67:93bec0baf1de 530 }
Wolfgang Betz 67:93bec0baf1de 531 else if(IS_FREQUENCY_BAND_LOW(lFc))
Wolfgang Betz 67:93bec0baf1de 532 {
Wolfgang Betz 67:93bec0baf1de 533 BFactor = LOW_BAND_FACTOR;
Wolfgang Betz 67:93bec0baf1de 534 }
Wolfgang Betz 67:93bec0baf1de 535 else
Wolfgang Betz 67:93bec0baf1de 536 {
Wolfgang Betz 67:93bec0baf1de 537 BFactor = VERY_LOW_BAND_FACTOR;
Wolfgang Betz 67:93bec0baf1de 538 }
Wolfgang Betz 67:93bec0baf1de 539
Wolfgang Betz 67:93bec0baf1de 540 /* Calculates the VCO frequency VCOFreq = lFc*B */
Wolfgang Betz 67:93bec0baf1de 541 vcofreq = (lFc/1000000)*BFactor;
Wolfgang Betz 67:93bec0baf1de 542
Wolfgang Betz 67:93bec0baf1de 543 /* Search in the vco frequency array the charge pump word */
Wolfgang Betz 67:93bec0baf1de 544 if(vcofreq>=s_vectnVCOFreq[15])
Wolfgang Betz 67:93bec0baf1de 545 {
Wolfgang Betz 67:93bec0baf1de 546 i=15;
Wolfgang Betz 67:93bec0baf1de 547 }
Wolfgang Betz 67:93bec0baf1de 548 else
Wolfgang Betz 67:93bec0baf1de 549 {
Wolfgang Betz 67:93bec0baf1de 550 /* Search the value */
Wolfgang Betz 67:93bec0baf1de 551 for(i=0 ; i<15 && vcofreq>s_vectnVCOFreq[i] ; i++);
Wolfgang Betz 67:93bec0baf1de 552
Wolfgang Betz 67:93bec0baf1de 553 /* Be sure that it is the best approssimation */
Wolfgang Betz 67:93bec0baf1de 554 if (i!=0 && s_vectnVCOFreq[i]-vcofreq>vcofreq-s_vectnVCOFreq[i-1])
Wolfgang Betz 67:93bec0baf1de 555 i--;
Wolfgang Betz 67:93bec0baf1de 556 }
Wolfgang Betz 67:93bec0baf1de 557
Wolfgang Betz 67:93bec0baf1de 558 /* Return index */
Wolfgang Betz 67:93bec0baf1de 559 return (i%8);
Wolfgang Betz 67:93bec0baf1de 560
Wolfgang Betz 67:93bec0baf1de 561 }
Wolfgang Betz 67:93bec0baf1de 562
Wolfgang Betz 67:93bec0baf1de 563 /**
Wolfgang Betz 67:93bec0baf1de 564 * @brief Returns the synth word.
Wolfgang Betz 67:93bec0baf1de 565 * @param None.
Wolfgang Betz 67:93bec0baf1de 566 * @retval uint32_t Synth word.
Wolfgang Betz 67:93bec0baf1de 567 */
Wolfgang Betz 67:93bec0baf1de 568 uint32_t SpiritRadioGetSynthWord(void)
Wolfgang Betz 67:93bec0baf1de 569 {
Wolfgang Betz 67:93bec0baf1de 570 uint8_t regArray[4];
Wolfgang Betz 67:93bec0baf1de 571
Wolfgang Betz 67:93bec0baf1de 572 /* Reads the SYNTH registers, build the synth word and return it */
Wolfgang Betz 67:93bec0baf1de 573 g_xStatus = SpiritSpiReadRegisters(SYNT3_BASE, 4, regArray);
Wolfgang Betz 67:93bec0baf1de 574 return ((((uint32_t)(regArray[0]&0x1F))<<21)+(((uint32_t)(regArray[1]))<<13)+\
Wolfgang Betz 67:93bec0baf1de 575 (((uint32_t)(regArray[2]))<<5)+(((uint32_t)(regArray[3]))>>3));
Wolfgang Betz 67:93bec0baf1de 576
Wolfgang Betz 67:93bec0baf1de 577 }
Wolfgang Betz 67:93bec0baf1de 578
Wolfgang Betz 67:93bec0baf1de 579
Wolfgang Betz 67:93bec0baf1de 580 /**
Wolfgang Betz 67:93bec0baf1de 581 * @brief Sets the SYNTH registers.
Wolfgang Betz 67:93bec0baf1de 582 * @param lSynthWord the synth word to write in the SYNTH[3:0] registers.
Wolfgang Betz 67:93bec0baf1de 583 * @retval None.
Wolfgang Betz 67:93bec0baf1de 584 */
Wolfgang Betz 67:93bec0baf1de 585 void SpiritRadioSetSynthWord(uint32_t lSynthWord)
Wolfgang Betz 67:93bec0baf1de 586 {
Wolfgang Betz 67:93bec0baf1de 587 uint8_t tempArray[4];
Wolfgang Betz 67:93bec0baf1de 588 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 589
Wolfgang Betz 67:93bec0baf1de 590 /* Reads the SYNT0 register */
Wolfgang Betz 67:93bec0baf1de 591 g_xStatus = SpiritSpiReadRegisters(SYNT0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 592
Wolfgang Betz 67:93bec0baf1de 593 /* Mask the Band selected field */
Wolfgang Betz 67:93bec0baf1de 594 tempRegValue &= 0x07;
Wolfgang Betz 67:93bec0baf1de 595
Wolfgang Betz 67:93bec0baf1de 596 /* Build the array for SYNTH registers */
Wolfgang Betz 67:93bec0baf1de 597 tempArray[0] = (uint8_t)((lSynthWord>>21)&(0x0000001F));
Wolfgang Betz 67:93bec0baf1de 598 tempArray[1] = (uint8_t)((lSynthWord>>13)&(0x000000FF));
Wolfgang Betz 67:93bec0baf1de 599 tempArray[2] = (uint8_t)((lSynthWord>>5)&(0x000000FF));
Wolfgang Betz 67:93bec0baf1de 600 tempArray[3] = (uint8_t)(((lSynthWord&0x0000001F)<<3)| tempRegValue);
Wolfgang Betz 67:93bec0baf1de 601
Wolfgang Betz 67:93bec0baf1de 602 /* Writes the synth word in the SYNTH registers */
Wolfgang Betz 67:93bec0baf1de 603 g_xStatus = SpiritSpiWriteRegisters(SYNT3_BASE, 4, tempArray);
Wolfgang Betz 67:93bec0baf1de 604
Wolfgang Betz 67:93bec0baf1de 605 }
Wolfgang Betz 67:93bec0baf1de 606
Wolfgang Betz 67:93bec0baf1de 607
Wolfgang Betz 67:93bec0baf1de 608 /**
Wolfgang Betz 67:93bec0baf1de 609 * @brief Sets the operating band.
Wolfgang Betz 67:93bec0baf1de 610 * @param xBand the band to set.
Wolfgang Betz 67:93bec0baf1de 611 * This parameter can be one of following parameters:
Wolfgang Betz 67:93bec0baf1de 612 * @arg HIGH_BAND High_Band selected: from 779 MHz to 915 MHz
Wolfgang Betz 67:93bec0baf1de 613 * @arg MIDDLE_BAND: Middle Band selected: from 387 MHz to 470 MHz
Wolfgang Betz 67:93bec0baf1de 614 * @arg LOW_BAND: Low Band selected: from 300 MHz to 348 MHz
Wolfgang Betz 67:93bec0baf1de 615 * @arg VERY_LOW_BAND: Very low Band selected: from 150 MHz to 174 MHz
Wolfgang Betz 67:93bec0baf1de 616 * @retval None.
Wolfgang Betz 67:93bec0baf1de 617 */
Wolfgang Betz 67:93bec0baf1de 618 void SpiritRadioSetBand(BandSelect xBand)
Wolfgang Betz 67:93bec0baf1de 619 {
Wolfgang Betz 67:93bec0baf1de 620 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 621
Wolfgang Betz 67:93bec0baf1de 622 /* Check the parameters */
Wolfgang Betz 67:93bec0baf1de 623 s_assert_param(IS_BAND_SELECTED(xBand));
Wolfgang Betz 67:93bec0baf1de 624
Wolfgang Betz 67:93bec0baf1de 625 /* Reads the SYNT0 register*/
Wolfgang Betz 67:93bec0baf1de 626 g_xStatus = SpiritSpiReadRegisters(SYNT0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 627
Wolfgang Betz 67:93bec0baf1de 628 /* Mask the SYNTH[4;0] field and write the BS value */
Wolfgang Betz 67:93bec0baf1de 629 tempRegValue &= 0xF8;
Wolfgang Betz 67:93bec0baf1de 630 tempRegValue |= s_vectcBandRegValue[xBand];
Wolfgang Betz 67:93bec0baf1de 631
Wolfgang Betz 67:93bec0baf1de 632 /* Configures the SYNT0 register setting the operating band */
Wolfgang Betz 67:93bec0baf1de 633 g_xStatus = SpiritSpiWriteRegisters(SYNT0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 634
Wolfgang Betz 67:93bec0baf1de 635 }
Wolfgang Betz 67:93bec0baf1de 636
Wolfgang Betz 67:93bec0baf1de 637
Wolfgang Betz 67:93bec0baf1de 638 /**
Wolfgang Betz 67:93bec0baf1de 639 * @brief Returns the operating band.
Wolfgang Betz 67:93bec0baf1de 640 * @param None.
Wolfgang Betz 67:93bec0baf1de 641 * @retval BandSelect Settled band.
Wolfgang Betz 67:93bec0baf1de 642 * This returned value can be one of the following parameters:
Wolfgang Betz 67:93bec0baf1de 643 * @arg HIGH_BAND High_Band selected: from 779 MHz to 915 MHz
Wolfgang Betz 67:93bec0baf1de 644 * @arg MIDDLE_BAND: Middle Band selected: from 387 MHz to 470 MHz
Wolfgang Betz 67:93bec0baf1de 645 * @arg LOW_BAND: Low Band selected: from 300 MHz to 348 MHz
Wolfgang Betz 67:93bec0baf1de 646 * @arg VERY_LOW_BAND: Very low Band selected: from 150 MHz to 174 MHz
Wolfgang Betz 67:93bec0baf1de 647 */
Wolfgang Betz 67:93bec0baf1de 648 BandSelect SpiritRadioGetBand(void)
Wolfgang Betz 67:93bec0baf1de 649 {
Wolfgang Betz 67:93bec0baf1de 650 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 651
Wolfgang Betz 67:93bec0baf1de 652 /* Reads the SYNT0 register */
Wolfgang Betz 67:93bec0baf1de 653 g_xStatus = SpiritSpiReadRegisters(SYNT0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 654
Wolfgang Betz 67:93bec0baf1de 655 /* Mask the Band selected field */
Wolfgang Betz 67:93bec0baf1de 656 if((tempRegValue & 0x07) == SYNT0_BS_6)
Wolfgang Betz 67:93bec0baf1de 657 {
Wolfgang Betz 67:93bec0baf1de 658 return HIGH_BAND;
Wolfgang Betz 67:93bec0baf1de 659 }
Wolfgang Betz 67:93bec0baf1de 660 else if ((tempRegValue & 0x07) == SYNT0_BS_12)
Wolfgang Betz 67:93bec0baf1de 661 {
Wolfgang Betz 67:93bec0baf1de 662 return MIDDLE_BAND;
Wolfgang Betz 67:93bec0baf1de 663 }
Wolfgang Betz 67:93bec0baf1de 664 else if ((tempRegValue & 0x07) == SYNT0_BS_16)
Wolfgang Betz 67:93bec0baf1de 665 {
Wolfgang Betz 67:93bec0baf1de 666 return LOW_BAND;
Wolfgang Betz 67:93bec0baf1de 667 }
Wolfgang Betz 67:93bec0baf1de 668 else
Wolfgang Betz 67:93bec0baf1de 669 {
Wolfgang Betz 67:93bec0baf1de 670 return VERY_LOW_BAND;
Wolfgang Betz 67:93bec0baf1de 671 }
Wolfgang Betz 67:93bec0baf1de 672
Wolfgang Betz 67:93bec0baf1de 673 }
Wolfgang Betz 67:93bec0baf1de 674
Wolfgang Betz 67:93bec0baf1de 675
Wolfgang Betz 67:93bec0baf1de 676 /**
Wolfgang Betz 67:93bec0baf1de 677 * @brief Sets the channel number.
Wolfgang Betz 67:93bec0baf1de 678 * @param cChannel the channel number.
Wolfgang Betz 67:93bec0baf1de 679 * @retval None.
Wolfgang Betz 67:93bec0baf1de 680 */
Wolfgang Betz 67:93bec0baf1de 681 void SpiritRadioSetChannel(uint8_t cChannel)
Wolfgang Betz 67:93bec0baf1de 682 {
Wolfgang Betz 67:93bec0baf1de 683 /* Writes the CHNUM register */
Wolfgang Betz 67:93bec0baf1de 684 g_xStatus = SpiritSpiWriteRegisters(CHNUM_BASE, 1, &cChannel);
Wolfgang Betz 67:93bec0baf1de 685
Wolfgang Betz 67:93bec0baf1de 686 }
Wolfgang Betz 67:93bec0baf1de 687
Wolfgang Betz 67:93bec0baf1de 688
Wolfgang Betz 67:93bec0baf1de 689 /**
Wolfgang Betz 67:93bec0baf1de 690 * @brief Returns the actual channel number.
Wolfgang Betz 67:93bec0baf1de 691 * @param None.
Wolfgang Betz 67:93bec0baf1de 692 * @retval uint8_t Actual channel number.
Wolfgang Betz 67:93bec0baf1de 693 */
Wolfgang Betz 67:93bec0baf1de 694 uint8_t SpiritRadioGetChannel(void)
Wolfgang Betz 67:93bec0baf1de 695 {
Wolfgang Betz 67:93bec0baf1de 696 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 697
Wolfgang Betz 67:93bec0baf1de 698 /* Reads the CHNUM register and return the value */
Wolfgang Betz 67:93bec0baf1de 699 g_xStatus = SpiritSpiReadRegisters(CHNUM_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 700
Wolfgang Betz 67:93bec0baf1de 701 return tempRegValue;
Wolfgang Betz 67:93bec0baf1de 702
Wolfgang Betz 67:93bec0baf1de 703 }
Wolfgang Betz 67:93bec0baf1de 704
Wolfgang Betz 67:93bec0baf1de 705
Wolfgang Betz 67:93bec0baf1de 706 /**
Wolfgang Betz 67:93bec0baf1de 707 * @brief Sets the channel space factor in channel space register.
Wolfgang Betz 67:93bec0baf1de 708 * The channel spacing step is computed as F_Xo/32768.
Wolfgang Betz 67:93bec0baf1de 709 * @param fChannelSpace the channel space expressed in Hz.
Wolfgang Betz 67:93bec0baf1de 710 * @retval None.
Wolfgang Betz 67:93bec0baf1de 711 */
Wolfgang Betz 67:93bec0baf1de 712 void SpiritRadioSetChannelSpace(uint32_t fChannelSpace)
Wolfgang Betz 67:93bec0baf1de 713 {
Wolfgang Betz 67:93bec0baf1de 714 uint8_t cChannelSpaceFactor;
Wolfgang Betz 67:93bec0baf1de 715
Wolfgang Betz 67:93bec0baf1de 716 /* Round to the nearest integer */
Wolfgang Betz 67:93bec0baf1de 717 cChannelSpaceFactor = ((uint32_t)fChannelSpace*CHSPACE_DIVIDER)/s_lXtalFrequency;
Wolfgang Betz 67:93bec0baf1de 718
Wolfgang Betz 67:93bec0baf1de 719 /* Write value into the register */
Wolfgang Betz 67:93bec0baf1de 720 g_xStatus = SpiritSpiWriteRegisters(CHSPACE_BASE, 1, &cChannelSpaceFactor);
Wolfgang Betz 67:93bec0baf1de 721
Wolfgang Betz 67:93bec0baf1de 722 }
Wolfgang Betz 67:93bec0baf1de 723
Wolfgang Betz 67:93bec0baf1de 724
Wolfgang Betz 67:93bec0baf1de 725 /**
Wolfgang Betz 67:93bec0baf1de 726 * @brief Returns the channel space register.
Wolfgang Betz 67:93bec0baf1de 727 * @param None.
Wolfgang Betz 67:93bec0baf1de 728 * @retval uint32_t Channel space. The channel space is: CS = channel_space_factor x XtalFrequency/2^15
Wolfgang Betz 67:93bec0baf1de 729 * where channel_space_factor is the CHSPACE register value.
Wolfgang Betz 67:93bec0baf1de 730 */
Wolfgang Betz 67:93bec0baf1de 731 uint32_t SpiritRadioGetChannelSpace(void)
Wolfgang Betz 67:93bec0baf1de 732 {
Wolfgang Betz 67:93bec0baf1de 733 uint8_t channelSpaceFactor;
Wolfgang Betz 67:93bec0baf1de 734
Wolfgang Betz 67:93bec0baf1de 735 /* Reads the CHSPACE register, calculate the channel space and return it */
Wolfgang Betz 67:93bec0baf1de 736 g_xStatus = SpiritSpiReadRegisters(CHSPACE_BASE, 1, &channelSpaceFactor);
Wolfgang Betz 67:93bec0baf1de 737
Wolfgang Betz 67:93bec0baf1de 738 /* Compute the Hertz value and return it */
Wolfgang Betz 67:93bec0baf1de 739 return ((channelSpaceFactor*s_lXtalFrequency)/CHSPACE_DIVIDER);
Wolfgang Betz 67:93bec0baf1de 740
Wolfgang Betz 67:93bec0baf1de 741 }
Wolfgang Betz 67:93bec0baf1de 742
Wolfgang Betz 67:93bec0baf1de 743
Wolfgang Betz 67:93bec0baf1de 744 /**
Wolfgang Betz 67:93bec0baf1de 745 * @brief Sets the FC OFFSET register starting from xtal ppm value.
Wolfgang Betz 67:93bec0baf1de 746 * @param nXtalPpm the xtal offset expressed in ppm.
Wolfgang Betz 67:93bec0baf1de 747 * @retval None.
Wolfgang Betz 67:93bec0baf1de 748 */
Wolfgang Betz 67:93bec0baf1de 749 void SpiritRadioSetFrequencyOffsetPpm(int16_t nXtalPpm)
Wolfgang Betz 67:93bec0baf1de 750 {
Wolfgang Betz 67:93bec0baf1de 751 uint8_t tempArray[2];
Wolfgang Betz 67:93bec0baf1de 752 int16_t xtalOffsetFactor;
Wolfgang Betz 67:93bec0baf1de 753 uint32_t synthWord, fBase;
Wolfgang Betz 67:93bec0baf1de 754 int32_t FOffsetTmp;
Wolfgang Betz 67:93bec0baf1de 755 BandSelect band;
Wolfgang Betz 67:93bec0baf1de 756
Wolfgang Betz 67:93bec0baf1de 757 /* Reads the synth word */
Wolfgang Betz 67:93bec0baf1de 758 synthWord = SpiritRadioGetSynthWord();
Wolfgang Betz 67:93bec0baf1de 759
Wolfgang Betz 67:93bec0baf1de 760 /* Reads the operating band */
Wolfgang Betz 67:93bec0baf1de 761 band = SpiritRadioGetBand();
Wolfgang Betz 67:93bec0baf1de 762
Wolfgang Betz 67:93bec0baf1de 763 /* Calculates the frequency base */
Wolfgang Betz 67:93bec0baf1de 764 uint8_t cRefDiv = (uint8_t)SpiritRadioGetRefDiv()+1;
Wolfgang Betz 67:93bec0baf1de 765 fBase = synthWord*(s_lXtalFrequency/(s_vectcBHalfFactor[band]*cRefDiv)/FBASE_DIVIDER);
Wolfgang Betz 67:93bec0baf1de 766
Wolfgang Betz 67:93bec0baf1de 767 /* Calculates the offset respect to RF frequency and according to xtal_ppm parameter */
Wolfgang Betz 67:93bec0baf1de 768 FOffsetTmp = (int32_t)(((float)nXtalPpm*fBase)/PPM_FACTOR);
Wolfgang Betz 67:93bec0baf1de 769
Wolfgang Betz 67:93bec0baf1de 770 /* Check the Offset is in the correct range */
Wolfgang Betz 67:93bec0baf1de 771 s_assert_param(IS_FREQUENCY_OFFSET(FOffsetTmp,s_lXtalFrequency));
Wolfgang Betz 67:93bec0baf1de 772
Wolfgang Betz 67:93bec0baf1de 773 /* Calculates the FC_OFFSET value to write in the corresponding register */
Wolfgang Betz 67:93bec0baf1de 774 xtalOffsetFactor = (int16_t)(((float)FOffsetTmp*FBASE_DIVIDER)/s_lXtalFrequency);
Wolfgang Betz 67:93bec0baf1de 775
Wolfgang Betz 67:93bec0baf1de 776 /* Build the array related to the FC_OFFSET_1 and FC_OFFSET_0 register */
Wolfgang Betz 67:93bec0baf1de 777 tempArray[0]=(uint8_t)((((uint16_t)xtalOffsetFactor)>>8)&0x0F);
Wolfgang Betz 67:93bec0baf1de 778 tempArray[1]=(uint8_t)(xtalOffsetFactor);
Wolfgang Betz 67:93bec0baf1de 779
Wolfgang Betz 67:93bec0baf1de 780 /* Writes the FC_OFFSET registers */
Wolfgang Betz 67:93bec0baf1de 781 g_xStatus = SpiritSpiWriteRegisters(FC_OFFSET1_BASE, 2, tempArray);
Wolfgang Betz 67:93bec0baf1de 782
Wolfgang Betz 67:93bec0baf1de 783 }
Wolfgang Betz 67:93bec0baf1de 784
Wolfgang Betz 67:93bec0baf1de 785
Wolfgang Betz 67:93bec0baf1de 786 /**
Wolfgang Betz 67:93bec0baf1de 787 * @brief Sets the FC OFFSET register starting from frequency offset expressed in Hz.
Wolfgang Betz 67:93bec0baf1de 788 * @param lFOffset frequency offset expressed in Hz as signed word.
Wolfgang Betz 67:93bec0baf1de 789 * @retval None.
Wolfgang Betz 67:93bec0baf1de 790 */
Wolfgang Betz 67:93bec0baf1de 791 void SpiritRadioSetFrequencyOffset(int32_t lFOffset)
Wolfgang Betz 67:93bec0baf1de 792 {
Wolfgang Betz 67:93bec0baf1de 793 uint8_t tempArray[2];
Wolfgang Betz 67:93bec0baf1de 794 int16_t offset;
Wolfgang Betz 67:93bec0baf1de 795
Wolfgang Betz 67:93bec0baf1de 796 /* Check that the Offset is in the correct range */
Wolfgang Betz 67:93bec0baf1de 797 s_assert_param(IS_FREQUENCY_OFFSET(lFOffset,s_lXtalFrequency));
Wolfgang Betz 67:93bec0baf1de 798
Wolfgang Betz 67:93bec0baf1de 799 /* Calculates the offset value to write in the FC_OFFSET register */
Wolfgang Betz 67:93bec0baf1de 800 offset = (int16_t)(((float)lFOffset*FBASE_DIVIDER)/s_lXtalFrequency);
Wolfgang Betz 67:93bec0baf1de 801
Wolfgang Betz 67:93bec0baf1de 802 /* Build the array related to the FC_OFFSET_1 and FC_OFFSET_0 register */
Wolfgang Betz 67:93bec0baf1de 803 tempArray[0]=(uint8_t)((((uint16_t)offset)>>8)&0x0F);
Wolfgang Betz 67:93bec0baf1de 804 tempArray[1]=(uint8_t)(offset);
Wolfgang Betz 67:93bec0baf1de 805
Wolfgang Betz 67:93bec0baf1de 806 /* Writes the FC_OFFSET registers */
Wolfgang Betz 67:93bec0baf1de 807 g_xStatus = SpiritSpiWriteRegisters(FC_OFFSET1_BASE, 2, tempArray);
Wolfgang Betz 67:93bec0baf1de 808
Wolfgang Betz 67:93bec0baf1de 809 }
Wolfgang Betz 67:93bec0baf1de 810
Wolfgang Betz 67:93bec0baf1de 811
Wolfgang Betz 67:93bec0baf1de 812 /**
Wolfgang Betz 67:93bec0baf1de 813 * @brief Returns the actual frequency offset.
Wolfgang Betz 67:93bec0baf1de 814 * @param None.
Wolfgang Betz 67:93bec0baf1de 815 * @retval int32_t Frequency offset expressed in Hz as signed word.
Wolfgang Betz 67:93bec0baf1de 816 */
Wolfgang Betz 67:93bec0baf1de 817 int32_t SpiritRadioGetFrequencyOffset(void)
Wolfgang Betz 67:93bec0baf1de 818 {
Wolfgang Betz 67:93bec0baf1de 819 uint8_t tempArray[2];
Wolfgang Betz 67:93bec0baf1de 820 int16_t xtalOffsetFactor;
Wolfgang Betz 67:93bec0baf1de 821
Wolfgang Betz 67:93bec0baf1de 822 /* Reads the FC_OFFSET registers */
Wolfgang Betz 67:93bec0baf1de 823 g_xStatus = SpiritSpiReadRegisters(FC_OFFSET1_BASE, 2, tempArray);
Wolfgang Betz 67:93bec0baf1de 824
Wolfgang Betz 67:93bec0baf1de 825 /* Calculates the Offset Factor */
Wolfgang Betz 67:93bec0baf1de 826 uint16_t xtalOffTemp = ((((uint16_t)tempArray[0])<<8)+((uint16_t)tempArray[1]));
Wolfgang Betz 67:93bec0baf1de 827
Wolfgang Betz 67:93bec0baf1de 828 if(xtalOffTemp & 0x0800)
Wolfgang Betz 67:93bec0baf1de 829 {
Wolfgang Betz 67:93bec0baf1de 830 xtalOffTemp = xtalOffTemp | 0xF000;
Wolfgang Betz 67:93bec0baf1de 831 }
Wolfgang Betz 67:93bec0baf1de 832 else
Wolfgang Betz 67:93bec0baf1de 833 {
Wolfgang Betz 67:93bec0baf1de 834 xtalOffTemp = xtalOffTemp & 0x0FFF;
Wolfgang Betz 67:93bec0baf1de 835 }
Wolfgang Betz 67:93bec0baf1de 836
Wolfgang Betz 67:93bec0baf1de 837 xtalOffsetFactor = *((int16_t*)(&xtalOffTemp));
Wolfgang Betz 67:93bec0baf1de 838
Wolfgang Betz 67:93bec0baf1de 839 /* Calculates the frequency offset and return it */
Wolfgang Betz 67:93bec0baf1de 840 return ((int32_t)(xtalOffsetFactor*s_lXtalFrequency)/FBASE_DIVIDER);
Wolfgang Betz 67:93bec0baf1de 841
Wolfgang Betz 67:93bec0baf1de 842 }
Wolfgang Betz 67:93bec0baf1de 843
Wolfgang Betz 67:93bec0baf1de 844
Wolfgang Betz 67:93bec0baf1de 845
Wolfgang Betz 67:93bec0baf1de 846 /**
Wolfgang Betz 67:93bec0baf1de 847 * @brief Sets the Synth word and the Band Select register according to desired base carrier frequency.
Wolfgang Betz 67:93bec0baf1de 848 * In this API the Xtal configuration is read out from
Wolfgang Betz 67:93bec0baf1de 849 * the corresponding register. The user shall fix it before call this API.
Wolfgang Betz 67:93bec0baf1de 850 * @param lFBase the base carrier frequency expressed in Hz as unsigned word.
Wolfgang Betz 67:93bec0baf1de 851 * @retval Error code: 0=no error, 1=error during calibration of VCO.
Wolfgang Betz 67:93bec0baf1de 852 */
Wolfgang Betz 67:93bec0baf1de 853 uint8_t SpiritRadioSetFrequencyBase(uint32_t lFBase)
Wolfgang Betz 67:93bec0baf1de 854 {
Wolfgang Betz 67:93bec0baf1de 855 uint32_t synthWord, Fc;
Wolfgang Betz 67:93bec0baf1de 856 uint8_t band, anaRadioRegArray[4], wcp;
Wolfgang Betz 67:93bec0baf1de 857
Wolfgang Betz 67:93bec0baf1de 858 /* Check the parameter */
Wolfgang Betz 67:93bec0baf1de 859 s_assert_param(IS_FREQUENCY_BAND(lFBase));
Wolfgang Betz 67:93bec0baf1de 860
Wolfgang Betz 67:93bec0baf1de 861 /* Search the operating band */
Wolfgang Betz 67:93bec0baf1de 862 if(IS_FREQUENCY_BAND_HIGH(lFBase))
Wolfgang Betz 67:93bec0baf1de 863 {
Wolfgang Betz 67:93bec0baf1de 864 band = HIGH_BAND;
Wolfgang Betz 67:93bec0baf1de 865 }
Wolfgang Betz 67:93bec0baf1de 866 else if(IS_FREQUENCY_BAND_MIDDLE(lFBase))
Wolfgang Betz 67:93bec0baf1de 867 {
Wolfgang Betz 67:93bec0baf1de 868 band = MIDDLE_BAND;
Wolfgang Betz 67:93bec0baf1de 869 }
Wolfgang Betz 67:93bec0baf1de 870 else if(IS_FREQUENCY_BAND_LOW(lFBase))
Wolfgang Betz 67:93bec0baf1de 871 {
Wolfgang Betz 67:93bec0baf1de 872 band = LOW_BAND;
Wolfgang Betz 67:93bec0baf1de 873 }
Wolfgang Betz 67:93bec0baf1de 874 else
Wolfgang Betz 67:93bec0baf1de 875 {
Wolfgang Betz 67:93bec0baf1de 876 band = VERY_LOW_BAND;
Wolfgang Betz 67:93bec0baf1de 877 }
Wolfgang Betz 67:93bec0baf1de 878
Wolfgang Betz 67:93bec0baf1de 879 int32_t FOffset = SpiritRadioGetFrequencyOffset();
Wolfgang Betz 67:93bec0baf1de 880 uint32_t lChannelSpace = SpiritRadioGetChannelSpace();
Wolfgang Betz 67:93bec0baf1de 881 uint8_t cChannelNum = SpiritRadioGetChannel();
Wolfgang Betz 67:93bec0baf1de 882
Wolfgang Betz 67:93bec0baf1de 883 /* Calculates the channel center frequency */
Wolfgang Betz 67:93bec0baf1de 884 Fc = lFBase + FOffset + lChannelSpace*cChannelNum;
Wolfgang Betz 67:93bec0baf1de 885
Wolfgang Betz 67:93bec0baf1de 886 /* Reads the reference divider */
Wolfgang Betz 67:93bec0baf1de 887 uint8_t cRefDiv = (uint8_t)SpiritRadioGetRefDiv()+1;
Wolfgang Betz 67:93bec0baf1de 888
Wolfgang Betz 67:93bec0baf1de 889 /* Selects the VCO */
Wolfgang Betz 67:93bec0baf1de 890 switch(band)
Wolfgang Betz 67:93bec0baf1de 891 {
Wolfgang Betz 67:93bec0baf1de 892 case VERY_LOW_BAND:
Wolfgang Betz 67:93bec0baf1de 893 if(Fc<161281250)
Wolfgang Betz 67:93bec0baf1de 894 {
Wolfgang Betz 67:93bec0baf1de 895 SpiritCalibrationSelectVco(VCO_L);
Wolfgang Betz 67:93bec0baf1de 896 }
Wolfgang Betz 67:93bec0baf1de 897 else
Wolfgang Betz 67:93bec0baf1de 898 {
Wolfgang Betz 67:93bec0baf1de 899 SpiritCalibrationSelectVco(VCO_H);
Wolfgang Betz 67:93bec0baf1de 900 }
Wolfgang Betz 67:93bec0baf1de 901 break;
Wolfgang Betz 67:93bec0baf1de 902
Wolfgang Betz 67:93bec0baf1de 903 case LOW_BAND:
Wolfgang Betz 67:93bec0baf1de 904 if(Fc<322562500)
Wolfgang Betz 67:93bec0baf1de 905 {
Wolfgang Betz 67:93bec0baf1de 906 SpiritCalibrationSelectVco(VCO_L);
Wolfgang Betz 67:93bec0baf1de 907 }
Wolfgang Betz 67:93bec0baf1de 908 else
Wolfgang Betz 67:93bec0baf1de 909 {
Wolfgang Betz 67:93bec0baf1de 910 SpiritCalibrationSelectVco(VCO_H);
Wolfgang Betz 67:93bec0baf1de 911 }
Wolfgang Betz 67:93bec0baf1de 912 break;
Wolfgang Betz 67:93bec0baf1de 913
Wolfgang Betz 67:93bec0baf1de 914 case MIDDLE_BAND:
Wolfgang Betz 67:93bec0baf1de 915 if(Fc<430083334)
Wolfgang Betz 67:93bec0baf1de 916 {
Wolfgang Betz 67:93bec0baf1de 917 SpiritCalibrationSelectVco(VCO_L);
Wolfgang Betz 67:93bec0baf1de 918 }
Wolfgang Betz 67:93bec0baf1de 919 else
Wolfgang Betz 67:93bec0baf1de 920 {
Wolfgang Betz 67:93bec0baf1de 921 SpiritCalibrationSelectVco(VCO_H);
Wolfgang Betz 67:93bec0baf1de 922 }
Wolfgang Betz 67:93bec0baf1de 923 break;
Wolfgang Betz 67:93bec0baf1de 924
Wolfgang Betz 67:93bec0baf1de 925 case HIGH_BAND:
Wolfgang Betz 67:93bec0baf1de 926 if(Fc<860166667)
Wolfgang Betz 67:93bec0baf1de 927 {
Wolfgang Betz 67:93bec0baf1de 928 SpiritCalibrationSelectVco(VCO_L);
Wolfgang Betz 67:93bec0baf1de 929 }
Wolfgang Betz 67:93bec0baf1de 930 else
Wolfgang Betz 67:93bec0baf1de 931 {
Wolfgang Betz 67:93bec0baf1de 932 SpiritCalibrationSelectVco(VCO_H);
Wolfgang Betz 67:93bec0baf1de 933 }
Wolfgang Betz 67:93bec0baf1de 934 }
Wolfgang Betz 67:93bec0baf1de 935
Wolfgang Betz 67:93bec0baf1de 936 /* Search the VCO charge pump word and set the corresponding register */
Wolfgang Betz 67:93bec0baf1de 937 wcp = SpiritRadioSearchWCP(Fc);
Wolfgang Betz 67:93bec0baf1de 938
Wolfgang Betz 67:93bec0baf1de 939 synthWord = (uint32_t)(lFBase*s_vectcBHalfFactor[band]*(((double)(FBASE_DIVIDER*cRefDiv))/s_lXtalFrequency));
Wolfgang Betz 67:93bec0baf1de 940
Wolfgang Betz 67:93bec0baf1de 941 /* Build the array of registers values for the analog part */
Wolfgang Betz 67:93bec0baf1de 942 anaRadioRegArray[0] = (uint8_t)(((synthWord>>21)&(0x0000001F))|(wcp<<5));
Wolfgang Betz 67:93bec0baf1de 943 anaRadioRegArray[1] = (uint8_t)((synthWord>>13)&(0x000000FF));
Wolfgang Betz 67:93bec0baf1de 944 anaRadioRegArray[2] = (uint8_t)((synthWord>>5)&(0x000000FF));
Wolfgang Betz 67:93bec0baf1de 945 anaRadioRegArray[3] = (uint8_t)(((synthWord&0x0000001F)<<3)| s_vectcBandRegValue[band]);
Wolfgang Betz 67:93bec0baf1de 946
Wolfgang Betz 67:93bec0baf1de 947 /* Configures the needed Analog Radio registers */
Wolfgang Betz 67:93bec0baf1de 948 g_xStatus = SpiritSpiWriteRegisters(SYNT3_BASE, 4, anaRadioRegArray);
Wolfgang Betz 67:93bec0baf1de 949
Wolfgang Betz 67:93bec0baf1de 950 if(xDoVcoCalibrationWA==S_ENABLE)
Wolfgang Betz 67:93bec0baf1de 951 return SpiritManagementWaVcoCalibration();
Wolfgang Betz 67:93bec0baf1de 952
Wolfgang Betz 67:93bec0baf1de 953 return 0;
Wolfgang Betz 67:93bec0baf1de 954 }
Wolfgang Betz 67:93bec0baf1de 955
Wolfgang Betz 67:93bec0baf1de 956 /**
Wolfgang Betz 67:93bec0baf1de 957 * @brief To say to the set frequency base if do or not the VCO calibration WA.
Wolfgang Betz 67:93bec0baf1de 958 * @param S_ENABLE or S_DISABLE the WA procedure.
Wolfgang Betz 67:93bec0baf1de 959 * @retval None.
Wolfgang Betz 67:93bec0baf1de 960 */
Wolfgang Betz 67:93bec0baf1de 961 void SpiritRadioVcoCalibrationWAFB(SpiritFunctionalState xNewstate)
Wolfgang Betz 67:93bec0baf1de 962 {
Wolfgang Betz 67:93bec0baf1de 963 xDoVcoCalibrationWA=xNewstate;
Wolfgang Betz 67:93bec0baf1de 964 }
Wolfgang Betz 67:93bec0baf1de 965
Wolfgang Betz 67:93bec0baf1de 966 /**
Wolfgang Betz 67:93bec0baf1de 967 * @brief Returns the base carrier frequency.
Wolfgang Betz 67:93bec0baf1de 968 * @param None.
Wolfgang Betz 67:93bec0baf1de 969 * @retval uint32_t Base carrier frequency expressed in Hz as unsigned word.
Wolfgang Betz 67:93bec0baf1de 970 */
Wolfgang Betz 67:93bec0baf1de 971 uint32_t SpiritRadioGetFrequencyBase(void)
Wolfgang Betz 67:93bec0baf1de 972 {
Wolfgang Betz 67:93bec0baf1de 973 uint32_t synthWord;
Wolfgang Betz 67:93bec0baf1de 974 BandSelect band;
Wolfgang Betz 67:93bec0baf1de 975
Wolfgang Betz 67:93bec0baf1de 976 /* Reads the synth word */
Wolfgang Betz 67:93bec0baf1de 977 synthWord = SpiritRadioGetSynthWord();
Wolfgang Betz 67:93bec0baf1de 978
Wolfgang Betz 67:93bec0baf1de 979 /* Reads the operating band */
Wolfgang Betz 67:93bec0baf1de 980 band = SpiritRadioGetBand();
Wolfgang Betz 67:93bec0baf1de 981
Wolfgang Betz 67:93bec0baf1de 982 uint8_t cRefDiv = (uint8_t)SpiritRadioGetRefDiv() + 1;
Wolfgang Betz 67:93bec0baf1de 983
Wolfgang Betz 67:93bec0baf1de 984 /* Calculates the frequency base and return it */
Wolfgang Betz 67:93bec0baf1de 985 return (uint32_t)round(synthWord*(((double)s_lXtalFrequency)/(FBASE_DIVIDER*cRefDiv*s_vectcBHalfFactor[band])));
Wolfgang Betz 67:93bec0baf1de 986 }
Wolfgang Betz 67:93bec0baf1de 987
Wolfgang Betz 67:93bec0baf1de 988
Wolfgang Betz 67:93bec0baf1de 989 /**
Wolfgang Betz 67:93bec0baf1de 990 * @brief Returns the actual channel center frequency.
Wolfgang Betz 67:93bec0baf1de 991 * @param None.
Wolfgang Betz 67:93bec0baf1de 992 * @retval uint32_t Actual channel center frequency expressed in Hz.
Wolfgang Betz 67:93bec0baf1de 993 */
Wolfgang Betz 67:93bec0baf1de 994 uint32_t SpiritRadioGetCenterFrequency(void)
Wolfgang Betz 67:93bec0baf1de 995 {
Wolfgang Betz 67:93bec0baf1de 996 int32_t offset;
Wolfgang Betz 67:93bec0baf1de 997 uint8_t channel;
Wolfgang Betz 67:93bec0baf1de 998 uint32_t fBase;
Wolfgang Betz 67:93bec0baf1de 999 uint32_t channelSpace;
Wolfgang Betz 67:93bec0baf1de 1000
Wolfgang Betz 67:93bec0baf1de 1001 /* Reads the frequency base */
Wolfgang Betz 67:93bec0baf1de 1002 fBase = SpiritRadioGetFrequencyBase();
Wolfgang Betz 67:93bec0baf1de 1003
Wolfgang Betz 67:93bec0baf1de 1004 /* Reads the frequency offset */
Wolfgang Betz 67:93bec0baf1de 1005 offset = SpiritRadioGetFrequencyOffset();
Wolfgang Betz 67:93bec0baf1de 1006
Wolfgang Betz 67:93bec0baf1de 1007 /* Reads the channel space */
Wolfgang Betz 67:93bec0baf1de 1008 channelSpace = SpiritRadioGetChannelSpace();
Wolfgang Betz 67:93bec0baf1de 1009
Wolfgang Betz 67:93bec0baf1de 1010 /* Reads the channel number */
Wolfgang Betz 67:93bec0baf1de 1011 channel = SpiritRadioGetChannel();
Wolfgang Betz 67:93bec0baf1de 1012
Wolfgang Betz 67:93bec0baf1de 1013 /* Calculates the channel center frequency and return it */
Wolfgang Betz 67:93bec0baf1de 1014 return (uint32_t)(fBase + offset + (uint32_t)(channelSpace*channel));
Wolfgang Betz 67:93bec0baf1de 1015
Wolfgang Betz 67:93bec0baf1de 1016 }
Wolfgang Betz 67:93bec0baf1de 1017
Wolfgang Betz 67:93bec0baf1de 1018
Wolfgang Betz 67:93bec0baf1de 1019 /**
Wolfgang Betz 67:93bec0baf1de 1020 * @brief Returns the mantissa and exponent, whose value used in the datarate formula
Wolfgang Betz 67:93bec0baf1de 1021 * will give the datarate value closer to the given datarate.
Wolfgang Betz 67:93bec0baf1de 1022 * @param fDatarate datarate expressed in bps. This parameter ranging between 100 and 500000.
Wolfgang Betz 67:93bec0baf1de 1023 * @param pcM pointer to the returned mantissa value.
Wolfgang Betz 67:93bec0baf1de 1024 * @param pcE pointer to the returned exponent value.
Wolfgang Betz 67:93bec0baf1de 1025 * @retval None.
Wolfgang Betz 67:93bec0baf1de 1026 */
Wolfgang Betz 67:93bec0baf1de 1027 void SpiritRadioSearchDatarateME(uint32_t lDatarate, uint8_t* pcM, uint8_t* pcE)
Wolfgang Betz 67:93bec0baf1de 1028 {
Wolfgang Betz 67:93bec0baf1de 1029 volatile SpiritBool find = S_FALSE;
Wolfgang Betz 67:93bec0baf1de 1030 int8_t i=15;
Wolfgang Betz 67:93bec0baf1de 1031 uint8_t cMantissaTmp;
Wolfgang Betz 67:93bec0baf1de 1032 uint8_t cDivider = 0;
Wolfgang Betz 67:93bec0baf1de 1033
Wolfgang Betz 67:93bec0baf1de 1034 /* Check the parameters */
Wolfgang Betz 67:93bec0baf1de 1035 s_assert_param(IS_DATARATE(lDatarate));
Wolfgang Betz 67:93bec0baf1de 1036
Wolfgang Betz 67:93bec0baf1de 1037 cDivider = (uint8_t)SpiritRadioGetDigDiv();
Wolfgang Betz 67:93bec0baf1de 1038
Wolfgang Betz 67:93bec0baf1de 1039 /* Search in the datarate array the exponent value */
Wolfgang Betz 67:93bec0baf1de 1040 while(!find && i>=0)
Wolfgang Betz 67:93bec0baf1de 1041 {
Wolfgang Betz 67:93bec0baf1de 1042 if(lDatarate>=(s_lXtalFrequency>>(20-i+cDivider)))
Wolfgang Betz 67:93bec0baf1de 1043 {
Wolfgang Betz 67:93bec0baf1de 1044 find = S_TRUE;
Wolfgang Betz 67:93bec0baf1de 1045 }
Wolfgang Betz 67:93bec0baf1de 1046 else
Wolfgang Betz 67:93bec0baf1de 1047 {
Wolfgang Betz 67:93bec0baf1de 1048 i--;
Wolfgang Betz 67:93bec0baf1de 1049 }
Wolfgang Betz 67:93bec0baf1de 1050 }
Wolfgang Betz 67:93bec0baf1de 1051 i<0 ? i=0 : i;
Wolfgang Betz 67:93bec0baf1de 1052 *pcE = i;
Wolfgang Betz 67:93bec0baf1de 1053
Wolfgang Betz 67:93bec0baf1de 1054 /* Calculates the mantissa value according to the datarate formula */
Wolfgang Betz 67:93bec0baf1de 1055 cMantissaTmp = (lDatarate*((uint32_t)1<<(23-i)))/(s_lXtalFrequency>>(5+cDivider))-256;
Wolfgang Betz 67:93bec0baf1de 1056
Wolfgang Betz 67:93bec0baf1de 1057 /* Finds the mantissa value with less approximation */
Wolfgang Betz 67:93bec0baf1de 1058 int16_t mantissaCalculation[3];
Wolfgang Betz 67:93bec0baf1de 1059 for(uint8_t j=0;j<3;j++)
Wolfgang Betz 67:93bec0baf1de 1060 {
Wolfgang Betz 67:93bec0baf1de 1061 if((cMantissaTmp+j-1))
Wolfgang Betz 67:93bec0baf1de 1062 {
Wolfgang Betz 67:93bec0baf1de 1063 mantissaCalculation[j]=lDatarate-(((256+cMantissaTmp+j-1)*(s_lXtalFrequency>>(5+cDivider)))>>(23-i));
Wolfgang Betz 67:93bec0baf1de 1064 }
Wolfgang Betz 67:93bec0baf1de 1065 else
Wolfgang Betz 67:93bec0baf1de 1066 {
Wolfgang Betz 67:93bec0baf1de 1067 mantissaCalculation[j]=0x7FFF;
Wolfgang Betz 67:93bec0baf1de 1068 }
Wolfgang Betz 67:93bec0baf1de 1069 }
Wolfgang Betz 67:93bec0baf1de 1070 uint16_t mantissaCalculationDelta = 0xFFFF;
Wolfgang Betz 67:93bec0baf1de 1071 for(uint8_t j=0;j<3;j++)
Wolfgang Betz 67:93bec0baf1de 1072 {
Wolfgang Betz 67:93bec0baf1de 1073 if(S_ABS(mantissaCalculation[j])<mantissaCalculationDelta)
Wolfgang Betz 67:93bec0baf1de 1074 {
Wolfgang Betz 67:93bec0baf1de 1075 mantissaCalculationDelta = S_ABS(mantissaCalculation[j]);
Wolfgang Betz 67:93bec0baf1de 1076 *pcM = cMantissaTmp+j-1;
Wolfgang Betz 67:93bec0baf1de 1077 }
Wolfgang Betz 67:93bec0baf1de 1078 }
Wolfgang Betz 67:93bec0baf1de 1079
Wolfgang Betz 67:93bec0baf1de 1080 }
Wolfgang Betz 67:93bec0baf1de 1081
Wolfgang Betz 67:93bec0baf1de 1082
Wolfgang Betz 67:93bec0baf1de 1083 /**
Wolfgang Betz 67:93bec0baf1de 1084 * @brief Returns the mantissa and exponent for a given bandwidth.
Wolfgang Betz 67:93bec0baf1de 1085 * Even if it is possible to pass as parameter any value in the below mentioned range,
Wolfgang Betz 67:93bec0baf1de 1086 * the API will search the closer value according to a fixed table of channel
Wolfgang Betz 67:93bec0baf1de 1087 * bandwidth values (@ref s_vectnBandwidth), as defined in the datasheet, returning the corresponding mantissa
Wolfgang Betz 67:93bec0baf1de 1088 * and exponent value.
Wolfgang Betz 67:93bec0baf1de 1089 * @param lBandwidth bandwidth expressed in Hz. This parameter ranging between 1100 and 800100.
Wolfgang Betz 67:93bec0baf1de 1090 * @param pcM pointer to the returned mantissa value.
Wolfgang Betz 67:93bec0baf1de 1091 * @param pcE pointer to the returned exponent value.
Wolfgang Betz 67:93bec0baf1de 1092 * @retval None.
Wolfgang Betz 67:93bec0baf1de 1093 */
Wolfgang Betz 67:93bec0baf1de 1094 void SpiritRadioSearchChannelBwME(uint32_t lBandwidth, uint8_t* pcM, uint8_t* pcE)
Wolfgang Betz 67:93bec0baf1de 1095 {
Wolfgang Betz 67:93bec0baf1de 1096 int8_t i, i_tmp;
Wolfgang Betz 67:93bec0baf1de 1097 uint8_t cDivider = 1;
Wolfgang Betz 67:93bec0baf1de 1098
Wolfgang Betz 67:93bec0baf1de 1099 /* Search in the channel filter bandwidth table the exponent value */
Wolfgang Betz 67:93bec0baf1de 1100 if(SpiritRadioGetDigDiv())
Wolfgang Betz 67:93bec0baf1de 1101 {
Wolfgang Betz 67:93bec0baf1de 1102 cDivider = 2;
Wolfgang Betz 67:93bec0baf1de 1103 }
Wolfgang Betz 67:93bec0baf1de 1104 else
Wolfgang Betz 67:93bec0baf1de 1105 {
Wolfgang Betz 67:93bec0baf1de 1106 cDivider = 1;
Wolfgang Betz 67:93bec0baf1de 1107 }
Wolfgang Betz 67:93bec0baf1de 1108
Wolfgang Betz 67:93bec0baf1de 1109 s_assert_param(IS_CH_BW(lBandwidth,s_lXtalFrequency/cDivider));
Wolfgang Betz 67:93bec0baf1de 1110
Wolfgang Betz 67:93bec0baf1de 1111 uint32_t lChfltFactor = (s_lXtalFrequency/cDivider)/100;
Wolfgang Betz 67:93bec0baf1de 1112
Wolfgang Betz 67:93bec0baf1de 1113 for(i=0;i<90 && (lBandwidth<(uint32_t)((s_vectnBandwidth26M[i]*lChfltFactor)/2600));i++);
Wolfgang Betz 67:93bec0baf1de 1114
Wolfgang Betz 67:93bec0baf1de 1115 if(i!=0)
Wolfgang Betz 67:93bec0baf1de 1116 {
Wolfgang Betz 67:93bec0baf1de 1117 /* Finds the mantissa value with less approximation */
Wolfgang Betz 67:93bec0baf1de 1118 i_tmp=i;
Wolfgang Betz 67:93bec0baf1de 1119 int16_t chfltCalculation[3];
Wolfgang Betz 67:93bec0baf1de 1120 for(uint8_t j=0;j<3;j++)
Wolfgang Betz 67:93bec0baf1de 1121 {
Wolfgang Betz 67:93bec0baf1de 1122 if(((i_tmp+j-1)>=0) || ((i_tmp+j-1)<=89))
Wolfgang Betz 67:93bec0baf1de 1123 {
Wolfgang Betz 67:93bec0baf1de 1124 chfltCalculation[j] = lBandwidth - (uint32_t)((s_vectnBandwidth26M[i_tmp+j-1]*lChfltFactor)/2600);
Wolfgang Betz 67:93bec0baf1de 1125 }
Wolfgang Betz 67:93bec0baf1de 1126 else
Wolfgang Betz 67:93bec0baf1de 1127 {
Wolfgang Betz 67:93bec0baf1de 1128 chfltCalculation[j] = 0x7FFF;
Wolfgang Betz 67:93bec0baf1de 1129 }
Wolfgang Betz 67:93bec0baf1de 1130 }
Wolfgang Betz 67:93bec0baf1de 1131 uint16_t chfltDelta = 0xFFFF;
Wolfgang Betz 67:93bec0baf1de 1132
Wolfgang Betz 67:93bec0baf1de 1133 for(uint8_t j=0;j<3;j++)
Wolfgang Betz 67:93bec0baf1de 1134 {
Wolfgang Betz 67:93bec0baf1de 1135 if(S_ABS(chfltCalculation[j])<chfltDelta)
Wolfgang Betz 67:93bec0baf1de 1136 {
Wolfgang Betz 67:93bec0baf1de 1137 chfltDelta = S_ABS(chfltCalculation[j]);
Wolfgang Betz 67:93bec0baf1de 1138 i=i_tmp+j-1;
Wolfgang Betz 67:93bec0baf1de 1139 }
Wolfgang Betz 67:93bec0baf1de 1140 }
Wolfgang Betz 67:93bec0baf1de 1141 }
Wolfgang Betz 67:93bec0baf1de 1142 (*pcE) = (uint8_t)(i/9);
Wolfgang Betz 67:93bec0baf1de 1143 (*pcM) = (uint8_t)(i%9);
Wolfgang Betz 67:93bec0baf1de 1144
Wolfgang Betz 67:93bec0baf1de 1145 }
Wolfgang Betz 67:93bec0baf1de 1146
Wolfgang Betz 67:93bec0baf1de 1147 /**
Wolfgang Betz 67:93bec0baf1de 1148 * @brief Returns the mantissa and exponent, whose value used in the frequency deviation formula
Wolfgang Betz 67:93bec0baf1de 1149 * will give a frequency deviation value most closer to the given frequency deviation.
Wolfgang Betz 67:93bec0baf1de 1150 * @param fFDev frequency deviation expressed in Hz. This parameter can be a value in the range [F_Xo*8/2^18, F_Xo*7680/2^18].
Wolfgang Betz 67:93bec0baf1de 1151 * @param pcM pointer to the returned mantissa value.
Wolfgang Betz 67:93bec0baf1de 1152 * @param pcE pointer to the returned exponent value.
Wolfgang Betz 67:93bec0baf1de 1153 * @retval None.
Wolfgang Betz 67:93bec0baf1de 1154 */
Wolfgang Betz 67:93bec0baf1de 1155 void SpiritRadioSearchFreqDevME(uint32_t lFDev, uint8_t* pcM, uint8_t* pcE)
Wolfgang Betz 67:93bec0baf1de 1156 {
Wolfgang Betz 67:93bec0baf1de 1157 uint8_t i;
Wolfgang Betz 67:93bec0baf1de 1158 uint32_t a,bp,b=0;
Wolfgang Betz 67:93bec0baf1de 1159 float xtalDivtmp=(float)s_lXtalFrequency/(((uint32_t)1)<<18);
Wolfgang Betz 67:93bec0baf1de 1160
Wolfgang Betz 67:93bec0baf1de 1161 /* Check the parameters */
Wolfgang Betz 67:93bec0baf1de 1162 s_assert_param(IS_F_DEV(lFDev,s_lXtalFrequency));
Wolfgang Betz 67:93bec0baf1de 1163
Wolfgang Betz 67:93bec0baf1de 1164 for(i=0;i<10;i++)
Wolfgang Betz 67:93bec0baf1de 1165 {
Wolfgang Betz 67:93bec0baf1de 1166 a=(uint32_t)(xtalDivtmp*(uint32_t)(7.5*(1<<i)));
Wolfgang Betz 67:93bec0baf1de 1167 if(lFDev<a)
Wolfgang Betz 67:93bec0baf1de 1168 break;
Wolfgang Betz 67:93bec0baf1de 1169 }
Wolfgang Betz 67:93bec0baf1de 1170 (*pcE) = i;
Wolfgang Betz 67:93bec0baf1de 1171
Wolfgang Betz 67:93bec0baf1de 1172 for(i=0;i<8;i++)
Wolfgang Betz 67:93bec0baf1de 1173 {
Wolfgang Betz 67:93bec0baf1de 1174 bp=b;
Wolfgang Betz 67:93bec0baf1de 1175 b=(uint32_t)(xtalDivtmp*(uint32_t)((8.0+i)/2*(1<<(*pcE))));
Wolfgang Betz 67:93bec0baf1de 1176 if(lFDev<b)
Wolfgang Betz 67:93bec0baf1de 1177 break;
Wolfgang Betz 67:93bec0baf1de 1178 }
Wolfgang Betz 67:93bec0baf1de 1179
Wolfgang Betz 67:93bec0baf1de 1180 (*pcM)=i;
Wolfgang Betz 67:93bec0baf1de 1181 if((lFDev-bp)<(b-lFDev))
Wolfgang Betz 67:93bec0baf1de 1182 (*pcM)--;
Wolfgang Betz 67:93bec0baf1de 1183
Wolfgang Betz 67:93bec0baf1de 1184 }
Wolfgang Betz 67:93bec0baf1de 1185
Wolfgang Betz 67:93bec0baf1de 1186
Wolfgang Betz 67:93bec0baf1de 1187 /**
Wolfgang Betz 67:93bec0baf1de 1188 * @brief Sets the datarate.
Wolfgang Betz 67:93bec0baf1de 1189 * @param fDatarate datarate expressed in bps. This value shall be in the range
Wolfgang Betz 67:93bec0baf1de 1190 * [100 500000].
Wolfgang Betz 67:93bec0baf1de 1191 * @retval None.
Wolfgang Betz 67:93bec0baf1de 1192 */
Wolfgang Betz 67:93bec0baf1de 1193 void SpiritRadioSetDatarate(uint32_t lDatarate)
Wolfgang Betz 67:93bec0baf1de 1194 {
Wolfgang Betz 67:93bec0baf1de 1195 uint8_t drE, tempRegValue[2];
Wolfgang Betz 67:93bec0baf1de 1196
Wolfgang Betz 67:93bec0baf1de 1197 /* Check the parameters */
Wolfgang Betz 67:93bec0baf1de 1198 s_assert_param(IS_DATARATE(lDatarate));
Wolfgang Betz 67:93bec0baf1de 1199
Wolfgang Betz 67:93bec0baf1de 1200 /* Calculates the datarate mantissa and exponent */
Wolfgang Betz 67:93bec0baf1de 1201 SpiritRadioSearchDatarateME(lDatarate, &tempRegValue[0], &drE);
Wolfgang Betz 67:93bec0baf1de 1202
Wolfgang Betz 67:93bec0baf1de 1203 /* Reads the MOD_O register*/
Wolfgang Betz 67:93bec0baf1de 1204 SpiritSpiReadRegisters(MOD0_BASE, 1, &tempRegValue[1]);
Wolfgang Betz 67:93bec0baf1de 1205
Wolfgang Betz 67:93bec0baf1de 1206 /* Mask the other fields and set the datarate exponent */
Wolfgang Betz 67:93bec0baf1de 1207 tempRegValue[1] &= 0xF0;
Wolfgang Betz 67:93bec0baf1de 1208 tempRegValue[1] |= drE;
Wolfgang Betz 67:93bec0baf1de 1209
Wolfgang Betz 67:93bec0baf1de 1210 /* Writes the Datarate registers */
Wolfgang Betz 67:93bec0baf1de 1211 g_xStatus = SpiritSpiWriteRegisters(MOD1_BASE, 2, tempRegValue);
Wolfgang Betz 67:93bec0baf1de 1212
Wolfgang Betz 67:93bec0baf1de 1213 }
Wolfgang Betz 67:93bec0baf1de 1214
Wolfgang Betz 67:93bec0baf1de 1215
Wolfgang Betz 67:93bec0baf1de 1216 /**
Wolfgang Betz 67:93bec0baf1de 1217 * @brief Returns the datarate.
Wolfgang Betz 67:93bec0baf1de 1218 * @param None.
Wolfgang Betz 67:93bec0baf1de 1219 * @retval uint32_t Settled datarate expressed in bps.
Wolfgang Betz 67:93bec0baf1de 1220 */
Wolfgang Betz 67:93bec0baf1de 1221 uint32_t SpiritRadioGetDatarate(void)
Wolfgang Betz 67:93bec0baf1de 1222 {
Wolfgang Betz 67:93bec0baf1de 1223 uint8_t tempRegValue[2];
Wolfgang Betz 67:93bec0baf1de 1224 uint8_t cDivider=0;
Wolfgang Betz 67:93bec0baf1de 1225
Wolfgang Betz 67:93bec0baf1de 1226 /* Reads the datarate registers for mantissa and exponent */
Wolfgang Betz 67:93bec0baf1de 1227 g_xStatus = SpiritSpiReadRegisters(MOD1_BASE, 2, tempRegValue);
Wolfgang Betz 67:93bec0baf1de 1228
Wolfgang Betz 67:93bec0baf1de 1229 /* Calculates the datarate */
Wolfgang Betz 67:93bec0baf1de 1230 cDivider = (uint8_t)SpiritRadioGetDigDiv();
Wolfgang Betz 67:93bec0baf1de 1231
Wolfgang Betz 67:93bec0baf1de 1232 return (((s_lXtalFrequency>>(5+cDivider))*(256+tempRegValue[0]))>>(23-(tempRegValue[1]&0x0F)));
Wolfgang Betz 67:93bec0baf1de 1233 }
Wolfgang Betz 67:93bec0baf1de 1234
Wolfgang Betz 67:93bec0baf1de 1235
Wolfgang Betz 67:93bec0baf1de 1236 /**
Wolfgang Betz 67:93bec0baf1de 1237 * @brief Sets the frequency deviation.
Wolfgang Betz 67:93bec0baf1de 1238 * @param fFDev frequency deviation expressed in Hz. Be sure that this value
Wolfgang Betz 67:93bec0baf1de 1239 * is in the correct range [F_Xo*8/2^18, F_Xo*7680/2^18] Hz.
Wolfgang Betz 67:93bec0baf1de 1240 * @retval None.
Wolfgang Betz 67:93bec0baf1de 1241 */
Wolfgang Betz 67:93bec0baf1de 1242 void SpiritRadioSetFrequencyDev(uint32_t lFDev)
Wolfgang Betz 67:93bec0baf1de 1243 {
Wolfgang Betz 67:93bec0baf1de 1244 uint8_t FDevM, FDevE, tempRegValue;
Wolfgang Betz 67:93bec0baf1de 1245
Wolfgang Betz 67:93bec0baf1de 1246 /* Check the parameters */
Wolfgang Betz 67:93bec0baf1de 1247 s_assert_param(IS_F_DEV(lFDev, s_lXtalFrequency));
Wolfgang Betz 67:93bec0baf1de 1248
Wolfgang Betz 67:93bec0baf1de 1249 /* Calculates the frequency deviation mantissa and exponent */
Wolfgang Betz 67:93bec0baf1de 1250 SpiritRadioSearchFreqDevME(lFDev, &FDevM, &FDevE);
Wolfgang Betz 67:93bec0baf1de 1251
Wolfgang Betz 67:93bec0baf1de 1252 /* Reads the FDEV0 register */
Wolfgang Betz 67:93bec0baf1de 1253 SpiritSpiReadRegisters(FDEV0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 1254
Wolfgang Betz 67:93bec0baf1de 1255 /* Mask the other fields and set the frequency deviation mantissa and exponent */
Wolfgang Betz 67:93bec0baf1de 1256 tempRegValue &= 0x08;
Wolfgang Betz 67:93bec0baf1de 1257 tempRegValue |= ((FDevE<<4)|(FDevM));
Wolfgang Betz 67:93bec0baf1de 1258
Wolfgang Betz 67:93bec0baf1de 1259 /* Writes the Frequency deviation register */
Wolfgang Betz 67:93bec0baf1de 1260 g_xStatus = SpiritSpiWriteRegisters(FDEV0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 1261
Wolfgang Betz 67:93bec0baf1de 1262 }
Wolfgang Betz 67:93bec0baf1de 1263
Wolfgang Betz 67:93bec0baf1de 1264
Wolfgang Betz 67:93bec0baf1de 1265 /**
Wolfgang Betz 67:93bec0baf1de 1266 * @brief Returns the frequency deviation.
Wolfgang Betz 67:93bec0baf1de 1267 * @param None.
Wolfgang Betz 67:93bec0baf1de 1268 * @retval uint32_t Frequency deviation value expressed in Hz.
Wolfgang Betz 67:93bec0baf1de 1269 * This value will be in the range [F_Xo*8/2^18, F_Xo*7680/2^18] Hz.
Wolfgang Betz 67:93bec0baf1de 1270 */
Wolfgang Betz 67:93bec0baf1de 1271 uint32_t SpiritRadioGetFrequencyDev(void)
Wolfgang Betz 67:93bec0baf1de 1272 {
Wolfgang Betz 67:93bec0baf1de 1273 uint8_t tempRegValue, FDevM, FDevE;
Wolfgang Betz 67:93bec0baf1de 1274
Wolfgang Betz 67:93bec0baf1de 1275
Wolfgang Betz 67:93bec0baf1de 1276 /* Reads the frequency deviation register for mantissa and exponent */
Wolfgang Betz 67:93bec0baf1de 1277 g_xStatus = SpiritSpiReadRegisters(FDEV0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 1278 FDevM = tempRegValue&0x07;
Wolfgang Betz 67:93bec0baf1de 1279 FDevE = (tempRegValue&0xF0)>>4;
Wolfgang Betz 67:93bec0baf1de 1280
Wolfgang Betz 67:93bec0baf1de 1281 /* Calculates the frequency deviation and return it */
Wolfgang Betz 67:93bec0baf1de 1282 //return (((s_lXtalFrequency>>6)*(8+FDevM))>>(13-FDevE));
Wolfgang Betz 67:93bec0baf1de 1283
Wolfgang Betz 67:93bec0baf1de 1284 return (uint32_t)((float)s_lXtalFrequency/(((uint32_t)1)<<18)*(uint32_t)((8.0+FDevM)/2*(1<<FDevE)));
Wolfgang Betz 67:93bec0baf1de 1285
Wolfgang Betz 67:93bec0baf1de 1286 }
Wolfgang Betz 67:93bec0baf1de 1287
Wolfgang Betz 67:93bec0baf1de 1288
Wolfgang Betz 67:93bec0baf1de 1289 /**
Wolfgang Betz 67:93bec0baf1de 1290 * @brief Sets the channel filter bandwidth.
Wolfgang Betz 67:93bec0baf1de 1291 * @param lBandwidth channel filter bandwidth expressed in Hz. This parameter shall be in the range [1100 800100]
Wolfgang Betz 67:93bec0baf1de 1292 * Even if it is possible to pass as parameter any value in the above mentioned range,
Wolfgang Betz 67:93bec0baf1de 1293 * the API will search the most closer value according to a fixed table of channel
Wolfgang Betz 67:93bec0baf1de 1294 * bandwidth values (@ref s_vectnBandwidth), as defined in the datasheet. To verify the settled channel bandwidth
Wolfgang Betz 67:93bec0baf1de 1295 * it is possible to use the SpiritRadioGetChannelBW() API.
Wolfgang Betz 67:93bec0baf1de 1296 * @retval None.
Wolfgang Betz 67:93bec0baf1de 1297 */
Wolfgang Betz 67:93bec0baf1de 1298 void SpiritRadioSetChannelBW(uint32_t lBandwidth)
Wolfgang Betz 67:93bec0baf1de 1299 {
Wolfgang Betz 67:93bec0baf1de 1300 uint8_t bwM, bwE, tempRegValue;
Wolfgang Betz 67:93bec0baf1de 1301
Wolfgang Betz 67:93bec0baf1de 1302 /* Search in the channel filter bandwidth table the exponent value */
Wolfgang Betz 67:93bec0baf1de 1303 if(SpiritRadioGetDigDiv())
Wolfgang Betz 67:93bec0baf1de 1304 {
Wolfgang Betz 67:93bec0baf1de 1305 s_assert_param(IS_CH_BW(lBandwidth,(s_lXtalFrequency/2)));
Wolfgang Betz 67:93bec0baf1de 1306 }
Wolfgang Betz 67:93bec0baf1de 1307 else
Wolfgang Betz 67:93bec0baf1de 1308 {
Wolfgang Betz 67:93bec0baf1de 1309 s_assert_param(IS_CH_BW(lBandwidth,(s_lXtalFrequency)));
Wolfgang Betz 67:93bec0baf1de 1310 }
Wolfgang Betz 67:93bec0baf1de 1311
Wolfgang Betz 67:93bec0baf1de 1312 /* Calculates the channel bandwidth mantissa and exponent */
Wolfgang Betz 67:93bec0baf1de 1313 SpiritRadioSearchChannelBwME(lBandwidth, &bwM, &bwE);
Wolfgang Betz 67:93bec0baf1de 1314 tempRegValue = (bwM<<4)|(bwE);
Wolfgang Betz 67:93bec0baf1de 1315
Wolfgang Betz 67:93bec0baf1de 1316 /* Writes the Channel filter register */
Wolfgang Betz 67:93bec0baf1de 1317 g_xStatus = SpiritSpiWriteRegisters(CHFLT_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 1318
Wolfgang Betz 67:93bec0baf1de 1319 }
Wolfgang Betz 67:93bec0baf1de 1320
Wolfgang Betz 67:93bec0baf1de 1321 /**
Wolfgang Betz 67:93bec0baf1de 1322 * @brief Returns the channel filter bandwidth.
Wolfgang Betz 67:93bec0baf1de 1323 * @param None.
Wolfgang Betz 67:93bec0baf1de 1324 * @retval uint32_t Channel filter bandwidth expressed in Hz.
Wolfgang Betz 67:93bec0baf1de 1325 */
Wolfgang Betz 67:93bec0baf1de 1326 uint32_t SpiritRadioGetChannelBW(void)
Wolfgang Betz 67:93bec0baf1de 1327 {
Wolfgang Betz 67:93bec0baf1de 1328 uint8_t tempRegValue, bwM, bwE;
Wolfgang Betz 67:93bec0baf1de 1329
Wolfgang Betz 67:93bec0baf1de 1330 /* Reads the channel filter register for mantissa and exponent */
Wolfgang Betz 67:93bec0baf1de 1331 g_xStatus = SpiritSpiReadRegisters(CHFLT_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 1332 bwM = (tempRegValue&0xF0)>>4;
Wolfgang Betz 67:93bec0baf1de 1333 bwE = tempRegValue&0x0F;
Wolfgang Betz 67:93bec0baf1de 1334
Wolfgang Betz 67:93bec0baf1de 1335 /* Reads the channel filter bandwidth from the look-up table and return it */
Wolfgang Betz 67:93bec0baf1de 1336 return (uint32_t)(100.0*s_vectnBandwidth26M[bwM+(bwE*9)]*s_lXtalFrequency/26e6);
Wolfgang Betz 67:93bec0baf1de 1337
Wolfgang Betz 67:93bec0baf1de 1338 }
Wolfgang Betz 67:93bec0baf1de 1339
Wolfgang Betz 67:93bec0baf1de 1340
Wolfgang Betz 67:93bec0baf1de 1341 /**
Wolfgang Betz 67:93bec0baf1de 1342 * @brief Sets the modulation type.
Wolfgang Betz 67:93bec0baf1de 1343 * @param xModulation modulation to set.
Wolfgang Betz 67:93bec0baf1de 1344 * This parameter shall be of type @ref ModulationSelect .
Wolfgang Betz 67:93bec0baf1de 1345 * @retval None.
Wolfgang Betz 67:93bec0baf1de 1346 */
Wolfgang Betz 67:93bec0baf1de 1347 void SpiritRadioSetModulation(ModulationSelect xModulation)
Wolfgang Betz 67:93bec0baf1de 1348 {
Wolfgang Betz 67:93bec0baf1de 1349 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 1350
Wolfgang Betz 67:93bec0baf1de 1351 /* Check the parameters */
Wolfgang Betz 67:93bec0baf1de 1352 s_assert_param(IS_MODULATION_SELECTED(xModulation));
Wolfgang Betz 67:93bec0baf1de 1353
Wolfgang Betz 67:93bec0baf1de 1354 /* Reads the modulation register */
Wolfgang Betz 67:93bec0baf1de 1355 SpiritSpiReadRegisters(MOD0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 1356
Wolfgang Betz 67:93bec0baf1de 1357 /* Mask the other fields and set the modulation type */
Wolfgang Betz 67:93bec0baf1de 1358 tempRegValue &=0x8F;
Wolfgang Betz 67:93bec0baf1de 1359 tempRegValue |= xModulation;
Wolfgang Betz 67:93bec0baf1de 1360
Wolfgang Betz 67:93bec0baf1de 1361 /* Writes the modulation register */
Wolfgang Betz 67:93bec0baf1de 1362 g_xStatus = SpiritSpiWriteRegisters(MOD0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 1363
Wolfgang Betz 67:93bec0baf1de 1364 }
Wolfgang Betz 67:93bec0baf1de 1365
Wolfgang Betz 67:93bec0baf1de 1366
Wolfgang Betz 67:93bec0baf1de 1367 /**
Wolfgang Betz 67:93bec0baf1de 1368 * @brief Returns the modulation type used.
Wolfgang Betz 67:93bec0baf1de 1369 * @param None.
Wolfgang Betz 67:93bec0baf1de 1370 * @retval ModulationSelect Settled modulation type.
Wolfgang Betz 67:93bec0baf1de 1371 */
Wolfgang Betz 67:93bec0baf1de 1372 ModulationSelect SpiritRadioGetModulation(void)
Wolfgang Betz 67:93bec0baf1de 1373 {
Wolfgang Betz 67:93bec0baf1de 1374 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 1375
Wolfgang Betz 67:93bec0baf1de 1376 /* Reads the modulation register MOD0*/
Wolfgang Betz 67:93bec0baf1de 1377 g_xStatus = SpiritSpiReadRegisters(MOD0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 1378
Wolfgang Betz 67:93bec0baf1de 1379 /* Return the modulation type */
Wolfgang Betz 67:93bec0baf1de 1380 return (ModulationSelect)(tempRegValue&0x70);
Wolfgang Betz 67:93bec0baf1de 1381
Wolfgang Betz 67:93bec0baf1de 1382 }
Wolfgang Betz 67:93bec0baf1de 1383
Wolfgang Betz 67:93bec0baf1de 1384
Wolfgang Betz 67:93bec0baf1de 1385 /**
Wolfgang Betz 67:93bec0baf1de 1386 * @brief Enables or Disables the Continuous Wave transmit mode.
Wolfgang Betz 67:93bec0baf1de 1387 * @param xNewState new state for power ramping.
Wolfgang Betz 67:93bec0baf1de 1388 * This parameter can be: S_ENABLE or S_DISABLE .
Wolfgang Betz 67:93bec0baf1de 1389 * @retval None.
Wolfgang Betz 67:93bec0baf1de 1390 */
Wolfgang Betz 67:93bec0baf1de 1391 void SpiritRadioCWTransmitMode(SpiritFunctionalState xNewState)
Wolfgang Betz 67:93bec0baf1de 1392 {
Wolfgang Betz 67:93bec0baf1de 1393 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 1394
Wolfgang Betz 67:93bec0baf1de 1395 /* Check the parameters */
Wolfgang Betz 67:93bec0baf1de 1396 s_assert_param(IS_SPIRIT_FUNCTIONAL_STATE(xNewState));
Wolfgang Betz 67:93bec0baf1de 1397
Wolfgang Betz 67:93bec0baf1de 1398 /* Reads the modulation register MOD0 and mask the CW field */
Wolfgang Betz 67:93bec0baf1de 1399 SpiritSpiReadRegisters(MOD0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 1400 if(xNewState == S_ENABLE)
Wolfgang Betz 67:93bec0baf1de 1401 {
Wolfgang Betz 67:93bec0baf1de 1402 tempRegValue |=MOD0_CW;
Wolfgang Betz 67:93bec0baf1de 1403 }
Wolfgang Betz 67:93bec0baf1de 1404 else
Wolfgang Betz 67:93bec0baf1de 1405 {
Wolfgang Betz 67:93bec0baf1de 1406 tempRegValue &= (~MOD0_CW);
Wolfgang Betz 67:93bec0baf1de 1407 }
Wolfgang Betz 67:93bec0baf1de 1408
Wolfgang Betz 67:93bec0baf1de 1409 /* Writes the new value in the MOD0 register */
Wolfgang Betz 67:93bec0baf1de 1410 g_xStatus = SpiritSpiWriteRegisters(MOD0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 1411
Wolfgang Betz 67:93bec0baf1de 1412 }
Wolfgang Betz 67:93bec0baf1de 1413
Wolfgang Betz 67:93bec0baf1de 1414
Wolfgang Betz 67:93bec0baf1de 1415 /**
Wolfgang Betz 67:93bec0baf1de 1416 * @brief Sets the OOK Peak Decay.
Wolfgang Betz 67:93bec0baf1de 1417 * @param xOokDecay Peak decay control for OOK.
Wolfgang Betz 67:93bec0baf1de 1418 * This parameter shall be of type @ref OokPeakDecay .
Wolfgang Betz 67:93bec0baf1de 1419 * @retval None.
Wolfgang Betz 67:93bec0baf1de 1420 */
Wolfgang Betz 67:93bec0baf1de 1421 void SpiritRadioSetOokPeakDecay(OokPeakDecay xOokDecay)
Wolfgang Betz 67:93bec0baf1de 1422 {
Wolfgang Betz 67:93bec0baf1de 1423 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 1424
Wolfgang Betz 67:93bec0baf1de 1425 /* Check the parameters */
Wolfgang Betz 67:93bec0baf1de 1426 s_assert_param(IS_OOK_PEAK_DECAY(xOokDecay));
Wolfgang Betz 67:93bec0baf1de 1427
Wolfgang Betz 67:93bec0baf1de 1428 /* Reads the RSSI_FLT register */
Wolfgang Betz 67:93bec0baf1de 1429 SpiritSpiReadRegisters(RSSI_FLT_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 1430
Wolfgang Betz 67:93bec0baf1de 1431 /* Mask the other fields and set OOK Peak Decay */
Wolfgang Betz 67:93bec0baf1de 1432 tempRegValue &= 0xFC;
Wolfgang Betz 67:93bec0baf1de 1433 tempRegValue |= xOokDecay;
Wolfgang Betz 67:93bec0baf1de 1434
Wolfgang Betz 67:93bec0baf1de 1435 /* Writes the RSSI_FLT register to set the new OOK peak dacay value */
Wolfgang Betz 67:93bec0baf1de 1436 g_xStatus = SpiritSpiWriteRegisters(RSSI_FLT_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 1437
Wolfgang Betz 67:93bec0baf1de 1438 }
Wolfgang Betz 67:93bec0baf1de 1439
Wolfgang Betz 67:93bec0baf1de 1440
Wolfgang Betz 67:93bec0baf1de 1441 /**
Wolfgang Betz 67:93bec0baf1de 1442 * @brief Returns the OOK Peak Decay.
Wolfgang Betz 67:93bec0baf1de 1443 * @param None
Wolfgang Betz 67:93bec0baf1de 1444 * @retval OokPeakDecay Ook peak decay value.
Wolfgang Betz 67:93bec0baf1de 1445 */
Wolfgang Betz 67:93bec0baf1de 1446 OokPeakDecay SpiritRadioGetOokPeakDecay(void)
Wolfgang Betz 67:93bec0baf1de 1447 {
Wolfgang Betz 67:93bec0baf1de 1448 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 1449
Wolfgang Betz 67:93bec0baf1de 1450 /* Reads the OOK peak decay register RSSI_FLT_BASE*/
Wolfgang Betz 67:93bec0baf1de 1451 g_xStatus = SpiritSpiReadRegisters(RSSI_FLT_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 1452
Wolfgang Betz 67:93bec0baf1de 1453 /* Returns the OOK peak decay */
Wolfgang Betz 67:93bec0baf1de 1454 return (OokPeakDecay) (tempRegValue & 0x03);
Wolfgang Betz 67:93bec0baf1de 1455
Wolfgang Betz 67:93bec0baf1de 1456 }
Wolfgang Betz 67:93bec0baf1de 1457
Wolfgang Betz 67:93bec0baf1de 1458 /**
Wolfgang Betz 67:93bec0baf1de 1459 * @brief Returns the PA register value that corresponds to the passed dBm power.
Wolfgang Betz 67:93bec0baf1de 1460 * @param lFbase Frequency base expressed in Hz.
Wolfgang Betz 67:93bec0baf1de 1461 * @param fPowerdBm Desired power in dBm.
Wolfgang Betz 67:93bec0baf1de 1462 * @retval Register value as byte.
Wolfgang Betz 67:93bec0baf1de 1463 * @note The power interpolation curves used by this function have been extracted
Wolfgang Betz 67:93bec0baf1de 1464 * by measurements done on the divisional evaluation boards.
Wolfgang Betz 67:93bec0baf1de 1465 */
Wolfgang Betz 67:93bec0baf1de 1466 uint8_t SpiritRadioGetdBm2Reg(uint32_t lFBase, float fPowerdBm)
Wolfgang Betz 67:93bec0baf1de 1467 {
Wolfgang Betz 67:93bec0baf1de 1468 uint8_t i=0;
Wolfgang Betz 67:93bec0baf1de 1469 uint8_t j=0;
Wolfgang Betz 67:93bec0baf1de 1470 float fReg;
Wolfgang Betz 67:93bec0baf1de 1471
Wolfgang Betz 67:93bec0baf1de 1472 if(IS_FREQUENCY_BAND_HIGH(lFBase))
Wolfgang Betz 67:93bec0baf1de 1473 {
Wolfgang Betz 67:93bec0baf1de 1474 i=0;
Wolfgang Betz 67:93bec0baf1de 1475 if(lFBase<900000000) i=1;// 868
Wolfgang Betz 67:93bec0baf1de 1476 }
Wolfgang Betz 67:93bec0baf1de 1477 else if(IS_FREQUENCY_BAND_MIDDLE(lFBase))
Wolfgang Betz 67:93bec0baf1de 1478 {
Wolfgang Betz 67:93bec0baf1de 1479 i=2;
Wolfgang Betz 67:93bec0baf1de 1480 }
Wolfgang Betz 67:93bec0baf1de 1481 else if(IS_FREQUENCY_BAND_LOW(lFBase))
Wolfgang Betz 67:93bec0baf1de 1482 {
Wolfgang Betz 67:93bec0baf1de 1483 i=3;
Wolfgang Betz 67:93bec0baf1de 1484 }
Wolfgang Betz 67:93bec0baf1de 1485 else if(IS_FREQUENCY_BAND_VERY_LOW(lFBase))
Wolfgang Betz 67:93bec0baf1de 1486 {
Wolfgang Betz 67:93bec0baf1de 1487 i=4;
Wolfgang Betz 67:93bec0baf1de 1488 }
Wolfgang Betz 67:93bec0baf1de 1489
Wolfgang Betz 67:93bec0baf1de 1490 j=1;
Wolfgang Betz 67:93bec0baf1de 1491 if(fPowerdBm>0 && 13.0/fPowerFactors[i][2]-fPowerFactors[i][3]/fPowerFactors[i][2]<fPowerdBm)
Wolfgang Betz 67:93bec0baf1de 1492 j=0;
Wolfgang Betz 67:93bec0baf1de 1493 else if(fPowerdBm<=0 && 40.0/fPowerFactors[i][2]-fPowerFactors[i][3]/fPowerFactors[i][2]>fPowerdBm)
Wolfgang Betz 67:93bec0baf1de 1494 j=2;
Wolfgang Betz 67:93bec0baf1de 1495
Wolfgang Betz 67:93bec0baf1de 1496 fReg=fPowerFactors[i][2*j]*fPowerdBm+fPowerFactors[i][2*j+1];
Wolfgang Betz 67:93bec0baf1de 1497
Wolfgang Betz 67:93bec0baf1de 1498 if(fReg<1)
Wolfgang Betz 67:93bec0baf1de 1499 fReg=1;
Wolfgang Betz 67:93bec0baf1de 1500 else if(fReg>90)
Wolfgang Betz 67:93bec0baf1de 1501 fReg=90;
Wolfgang Betz 67:93bec0baf1de 1502
Wolfgang Betz 67:93bec0baf1de 1503 return ((uint8_t)fReg);
Wolfgang Betz 67:93bec0baf1de 1504 }
Wolfgang Betz 67:93bec0baf1de 1505
Wolfgang Betz 67:93bec0baf1de 1506
Wolfgang Betz 67:93bec0baf1de 1507 /**
Wolfgang Betz 67:93bec0baf1de 1508 * @brief Returns the dBm power that corresponds to the value of PA register.
Wolfgang Betz 67:93bec0baf1de 1509 * @param lFbase Frequency base expressed in Hz.
Wolfgang Betz 67:93bec0baf1de 1510 * @param cPowerReg Register value of the PA.
Wolfgang Betz 67:93bec0baf1de 1511 * @retval Power in dBm as float.
Wolfgang Betz 67:93bec0baf1de 1512 * @note The power interpolation curves used by this function have been extracted
Wolfgang Betz 67:93bec0baf1de 1513 * by measurements done on the divisional evaluation boards.
Wolfgang Betz 67:93bec0baf1de 1514 */
Wolfgang Betz 67:93bec0baf1de 1515 float SpiritRadioGetReg2dBm(uint32_t lFBase, uint8_t cPowerReg)
Wolfgang Betz 67:93bec0baf1de 1516 {
Wolfgang Betz 67:93bec0baf1de 1517 uint8_t i=0;
Wolfgang Betz 67:93bec0baf1de 1518 uint8_t j=0;
Wolfgang Betz 67:93bec0baf1de 1519 float fPower;
Wolfgang Betz 67:93bec0baf1de 1520
Wolfgang Betz 67:93bec0baf1de 1521 if(cPowerReg==0 || cPowerReg>90)
Wolfgang Betz 67:93bec0baf1de 1522 return (-130.0);
Wolfgang Betz 67:93bec0baf1de 1523
Wolfgang Betz 67:93bec0baf1de 1524 if(IS_FREQUENCY_BAND_HIGH(lFBase))
Wolfgang Betz 67:93bec0baf1de 1525 {
Wolfgang Betz 67:93bec0baf1de 1526 i=0;
Wolfgang Betz 67:93bec0baf1de 1527 if(lFBase<900000000) i=1;// 868
Wolfgang Betz 67:93bec0baf1de 1528 }
Wolfgang Betz 67:93bec0baf1de 1529 else if(IS_FREQUENCY_BAND_MIDDLE(lFBase))
Wolfgang Betz 67:93bec0baf1de 1530 {
Wolfgang Betz 67:93bec0baf1de 1531 i=2;
Wolfgang Betz 67:93bec0baf1de 1532 }
Wolfgang Betz 67:93bec0baf1de 1533 else if(IS_FREQUENCY_BAND_LOW(lFBase))
Wolfgang Betz 67:93bec0baf1de 1534 {
Wolfgang Betz 67:93bec0baf1de 1535 i=3;
Wolfgang Betz 67:93bec0baf1de 1536 }
Wolfgang Betz 67:93bec0baf1de 1537 else if(IS_FREQUENCY_BAND_VERY_LOW(lFBase))
Wolfgang Betz 67:93bec0baf1de 1538 {
Wolfgang Betz 67:93bec0baf1de 1539 i=4;
Wolfgang Betz 67:93bec0baf1de 1540 }
Wolfgang Betz 67:93bec0baf1de 1541
Wolfgang Betz 67:93bec0baf1de 1542 j=1;
Wolfgang Betz 67:93bec0baf1de 1543 if(cPowerReg<13) j=0;
Wolfgang Betz 67:93bec0baf1de 1544 else if(cPowerReg>40) j=2;
Wolfgang Betz 67:93bec0baf1de 1545
Wolfgang Betz 67:93bec0baf1de 1546 fPower=(((float)cPowerReg)/fPowerFactors[i][2*j]-fPowerFactors[i][2*j+1]/fPowerFactors[i][2*j]);
Wolfgang Betz 67:93bec0baf1de 1547
Wolfgang Betz 67:93bec0baf1de 1548 return fPower;
Wolfgang Betz 67:93bec0baf1de 1549 }
Wolfgang Betz 67:93bec0baf1de 1550
Wolfgang Betz 67:93bec0baf1de 1551 /**
Wolfgang Betz 67:93bec0baf1de 1552 * @brief Configures the Power Amplifier Table and registers with value expressed in dBm.
Wolfgang Betz 67:93bec0baf1de 1553 * @param cPALevelMaxIndex number of levels to set. This parameter shall be in the range [0:7].
Wolfgang Betz 67:93bec0baf1de 1554 * @param cWidth step width expressed in terms of bit period units Tb/8.
Wolfgang Betz 67:93bec0baf1de 1555 * This parameter shall be in the range [1:4].
Wolfgang Betz 67:93bec0baf1de 1556 * @param xCLoad one of the possible value of the enum type PALoadCapacitor.
Wolfgang Betz 67:93bec0baf1de 1557 * @arg LOAD_0_PF No additional PA load capacitor
Wolfgang Betz 67:93bec0baf1de 1558 * @arg LOAD_1_2_PF 1.2pF additional PA load capacitor
Wolfgang Betz 67:93bec0baf1de 1559 * @arg LOAD_2_4_PF 2.4pF additional PA load capacitor
Wolfgang Betz 67:93bec0baf1de 1560 * @arg LOAD_3_6_PF 3.6pF additional PA load capacitor
Wolfgang Betz 67:93bec0baf1de 1561 * @param pfPAtabledBm pointer to an array of PA values in dbm between [-PA_LOWER_LIMIT: PA_UPPER_LIMIT] dbm.
Wolfgang Betz 67:93bec0baf1de 1562 * The first element shall be the lower level (PA_LEVEL[0]) value and the last element
Wolfgang Betz 67:93bec0baf1de 1563 * the higher level one (PA_LEVEL[paLevelMaxIndex]).
Wolfgang Betz 67:93bec0baf1de 1564 * @retval None.
Wolfgang Betz 67:93bec0baf1de 1565 */
Wolfgang Betz 67:93bec0baf1de 1566 void SpiritRadioSetPATabledBm(uint8_t cPALevelMaxIndex, uint8_t cWidth, PALoadCapacitor xCLoad, float* pfPAtabledBm)
Wolfgang Betz 67:93bec0baf1de 1567 {
Wolfgang Betz 67:93bec0baf1de 1568 uint8_t palevel[9], address, paLevelValue;
Wolfgang Betz 67:93bec0baf1de 1569 uint32_t lFBase=SpiritRadioGetFrequencyBase();
Wolfgang Betz 67:93bec0baf1de 1570
Wolfgang Betz 67:93bec0baf1de 1571 /* Check the parameters */
Wolfgang Betz 67:93bec0baf1de 1572 s_assert_param(IS_PA_MAX_INDEX(cPALevelMaxIndex));
Wolfgang Betz 67:93bec0baf1de 1573 s_assert_param(IS_PA_STEP_WIDTH(cWidth));
Wolfgang Betz 67:93bec0baf1de 1574 s_assert_param(IS_PA_LOAD_CAP(xCLoad));
Wolfgang Betz 67:93bec0baf1de 1575
Wolfgang Betz 67:93bec0baf1de 1576 /* Check the PA level in dBm is in the range and calculate the PA_LEVEL value
Wolfgang Betz 67:93bec0baf1de 1577 to write in the corresponding register using the linearization formula */
Wolfgang Betz 67:93bec0baf1de 1578 for(int i=0; i<=cPALevelMaxIndex; i++)
Wolfgang Betz 67:93bec0baf1de 1579 {
Wolfgang Betz 67:93bec0baf1de 1580 s_assert_param(IS_PAPOWER_DBM(*pfPAtabledBm));
Wolfgang Betz 67:93bec0baf1de 1581 paLevelValue=SpiritRadioGetdBm2Reg(lFBase,(*pfPAtabledBm));
Wolfgang Betz 67:93bec0baf1de 1582 palevel[cPALevelMaxIndex-i]=paLevelValue;
Wolfgang Betz 67:93bec0baf1de 1583 pfPAtabledBm++;
Wolfgang Betz 67:93bec0baf1de 1584 }
Wolfgang Betz 67:93bec0baf1de 1585
Wolfgang Betz 67:93bec0baf1de 1586 /* Sets the PA_POWER[0] register */
Wolfgang Betz 67:93bec0baf1de 1587 palevel[cPALevelMaxIndex+1]=xCLoad|(cWidth-1)<<3|cPALevelMaxIndex;
Wolfgang Betz 67:93bec0baf1de 1588
Wolfgang Betz 67:93bec0baf1de 1589 /* Sets the base address */
Wolfgang Betz 67:93bec0baf1de 1590 address=PA_POWER8_BASE+7-cPALevelMaxIndex;
Wolfgang Betz 67:93bec0baf1de 1591
Wolfgang Betz 67:93bec0baf1de 1592 /* Configures the PA_POWER registers */
Wolfgang Betz 67:93bec0baf1de 1593 g_xStatus = SpiritSpiWriteRegisters(address, cPALevelMaxIndex+2, palevel);
Wolfgang Betz 67:93bec0baf1de 1594
Wolfgang Betz 67:93bec0baf1de 1595 }
Wolfgang Betz 67:93bec0baf1de 1596
Wolfgang Betz 67:93bec0baf1de 1597
Wolfgang Betz 67:93bec0baf1de 1598 /**
Wolfgang Betz 67:93bec0baf1de 1599 * @brief Returns the Power Amplifier Table and registers, returning values in dBm.
Wolfgang Betz 67:93bec0baf1de 1600 * @param pcPALevelMaxIndex pointer to the number of levels settled.
Wolfgang Betz 67:93bec0baf1de 1601 * This parameter will be in the range [0:7].
Wolfgang Betz 67:93bec0baf1de 1602 * @param pfPAtabledBm pointer to an array of 8 elements containing the PA value in dbm.
Wolfgang Betz 67:93bec0baf1de 1603 * The first element will be the PA_LEVEL_0 and the last element
Wolfgang Betz 67:93bec0baf1de 1604 * will be PA_LEVEL_7. Any value higher than PA_UPPER_LIMIT implies no output
Wolfgang Betz 67:93bec0baf1de 1605 * power (output stage is in high impedance).
Wolfgang Betz 67:93bec0baf1de 1606 * @retval None.
Wolfgang Betz 67:93bec0baf1de 1607 */
Wolfgang Betz 67:93bec0baf1de 1608 void SpiritRadioGetPATabledBm(uint8_t* pcPALevelMaxIndex, float* pfPAtabledBm)
Wolfgang Betz 67:93bec0baf1de 1609 {
Wolfgang Betz 67:93bec0baf1de 1610 uint8_t palevelvect[9];
Wolfgang Betz 67:93bec0baf1de 1611 uint32_t lFBase=SpiritRadioGetFrequencyBase();
Wolfgang Betz 67:93bec0baf1de 1612
Wolfgang Betz 67:93bec0baf1de 1613 /* Reads the PA_LEVEL_x registers and the PA_POWER_0 register */
Wolfgang Betz 67:93bec0baf1de 1614 g_xStatus = SpiritSpiReadRegisters(PA_POWER8_BASE, 9, palevelvect);
Wolfgang Betz 67:93bec0baf1de 1615
Wolfgang Betz 67:93bec0baf1de 1616 /* Fill the PAtable */
Wolfgang Betz 67:93bec0baf1de 1617 for(int i=7; i>=0; i--)
Wolfgang Betz 67:93bec0baf1de 1618 {
Wolfgang Betz 67:93bec0baf1de 1619 (*pfPAtabledBm)=SpiritRadioGetReg2dBm(lFBase,palevelvect[i]);
Wolfgang Betz 67:93bec0baf1de 1620 pfPAtabledBm++;
Wolfgang Betz 67:93bec0baf1de 1621 }
Wolfgang Betz 67:93bec0baf1de 1622
Wolfgang Betz 67:93bec0baf1de 1623 /* Return the settled index */
Wolfgang Betz 67:93bec0baf1de 1624 *pcPALevelMaxIndex = palevelvect[8]&0x07;
Wolfgang Betz 67:93bec0baf1de 1625
Wolfgang Betz 67:93bec0baf1de 1626 }
Wolfgang Betz 67:93bec0baf1de 1627
Wolfgang Betz 67:93bec0baf1de 1628
Wolfgang Betz 67:93bec0baf1de 1629
Wolfgang Betz 67:93bec0baf1de 1630
Wolfgang Betz 67:93bec0baf1de 1631
Wolfgang Betz 67:93bec0baf1de 1632
Wolfgang Betz 67:93bec0baf1de 1633 /**
Wolfgang Betz 67:93bec0baf1de 1634 * @brief Sets a specific PA_LEVEL register, with a value given in dBm.
Wolfgang Betz 67:93bec0baf1de 1635 * @param cIndex PA_LEVEL to set. This parameter shall be in the range [0:7].
Wolfgang Betz 67:93bec0baf1de 1636 * @param fPowerdBm PA value to write expressed in dBm . Be sure that this values is in the
Wolfgang Betz 67:93bec0baf1de 1637 * correct range [-PA_LOWER_LIMIT: PA_UPPER_LIMIT] dBm.
Wolfgang Betz 67:93bec0baf1de 1638 * @retval None.
Wolfgang Betz 67:93bec0baf1de 1639 * @note This function makes use of the @ref SpiritRadioGetdBm2Reg fcn to interpolate the
Wolfgang Betz 67:93bec0baf1de 1640 * power value.
Wolfgang Betz 67:93bec0baf1de 1641 */
Wolfgang Betz 67:93bec0baf1de 1642 void SpiritRadioSetPALeveldBm(uint8_t cIndex, float fPowerdBm)
Wolfgang Betz 67:93bec0baf1de 1643 {
Wolfgang Betz 67:93bec0baf1de 1644 uint8_t address, paLevelValue;
Wolfgang Betz 67:93bec0baf1de 1645
Wolfgang Betz 67:93bec0baf1de 1646 /* Check the parameters */
Wolfgang Betz 67:93bec0baf1de 1647 s_assert_param(IS_PA_MAX_INDEX(cIndex));
Wolfgang Betz 67:93bec0baf1de 1648 s_assert_param(IS_PAPOWER_DBM(fPowerdBm));
Wolfgang Betz 67:93bec0baf1de 1649
Wolfgang Betz 67:93bec0baf1de 1650 /* interpolate the power level */
Wolfgang Betz 67:93bec0baf1de 1651 paLevelValue=SpiritRadioGetdBm2Reg(SpiritRadioGetFrequencyBase(),fPowerdBm);
Wolfgang Betz 67:93bec0baf1de 1652
Wolfgang Betz 67:93bec0baf1de 1653 /* Sets the base address */
Wolfgang Betz 67:93bec0baf1de 1654 address=PA_POWER8_BASE+7-cIndex;
Wolfgang Betz 67:93bec0baf1de 1655
Wolfgang Betz 67:93bec0baf1de 1656 /* Configures the PA_LEVEL register */
Wolfgang Betz 67:93bec0baf1de 1657 g_xStatus = SpiritSpiWriteRegisters(address, 1, &paLevelValue);
Wolfgang Betz 67:93bec0baf1de 1658
Wolfgang Betz 67:93bec0baf1de 1659 }
Wolfgang Betz 67:93bec0baf1de 1660
Wolfgang Betz 67:93bec0baf1de 1661
Wolfgang Betz 67:93bec0baf1de 1662 /**
Wolfgang Betz 67:93bec0baf1de 1663 * @brief Returns a specific PA_LEVEL register, returning a value in dBm.
Wolfgang Betz 67:93bec0baf1de 1664 * @param cIndex PA_LEVEL to read. This parameter shall be in the range [0:7]
Wolfgang Betz 67:93bec0baf1de 1665 * @retval float Settled power level expressed in dBm. A value
Wolfgang Betz 67:93bec0baf1de 1666 * higher than PA_UPPER_LIMIT dBm implies no output power
Wolfgang Betz 67:93bec0baf1de 1667 * (output stage is in high impedance).
Wolfgang Betz 67:93bec0baf1de 1668 * @note This function makes use of the @ref SpiritRadioGetReg2dBm fcn to interpolate the
Wolfgang Betz 67:93bec0baf1de 1669 * power value.
Wolfgang Betz 67:93bec0baf1de 1670 */
Wolfgang Betz 67:93bec0baf1de 1671 float SpiritRadioGetPALeveldBm(uint8_t cIndex)
Wolfgang Betz 67:93bec0baf1de 1672 {
Wolfgang Betz 67:93bec0baf1de 1673 uint8_t address, paLevelValue;
Wolfgang Betz 67:93bec0baf1de 1674
Wolfgang Betz 67:93bec0baf1de 1675 /* Check the parameters */
Wolfgang Betz 67:93bec0baf1de 1676 s_assert_param(IS_PA_MAX_INDEX(cIndex));
Wolfgang Betz 67:93bec0baf1de 1677
Wolfgang Betz 67:93bec0baf1de 1678 /* Sets the base address */
Wolfgang Betz 67:93bec0baf1de 1679 address=PA_POWER8_BASE+7-cIndex;
Wolfgang Betz 67:93bec0baf1de 1680
Wolfgang Betz 67:93bec0baf1de 1681 /* Reads the PA_LEVEL[cIndex] register */
Wolfgang Betz 67:93bec0baf1de 1682 g_xStatus = SpiritSpiReadRegisters(address, 1, &paLevelValue);
Wolfgang Betz 67:93bec0baf1de 1683
Wolfgang Betz 67:93bec0baf1de 1684 return SpiritRadioGetReg2dBm(SpiritRadioGetFrequencyBase(),paLevelValue);
Wolfgang Betz 67:93bec0baf1de 1685 }
Wolfgang Betz 67:93bec0baf1de 1686
Wolfgang Betz 67:93bec0baf1de 1687
Wolfgang Betz 67:93bec0baf1de 1688 /**
Wolfgang Betz 67:93bec0baf1de 1689 * @brief Configures the Power Amplifier Table and registers.
Wolfgang Betz 67:93bec0baf1de 1690 * @param cPALevelMaxIndex number of levels to set. This parameter shall be in the range [0:7].
Wolfgang Betz 67:93bec0baf1de 1691 * @param cWidth step width expressed in terms of bit period units Tb/8.
Wolfgang Betz 67:93bec0baf1de 1692 * This parameter shall be in the range [1:4].
Wolfgang Betz 67:93bec0baf1de 1693 * @param xCLoad one of the possible value of the enum type PALoadCapacitor.
Wolfgang Betz 67:93bec0baf1de 1694 * @arg LOAD_0_PF No additional PA load capacitor
Wolfgang Betz 67:93bec0baf1de 1695 * @arg LOAD_1_2_PF 1.2pF additional PA load capacitor
Wolfgang Betz 67:93bec0baf1de 1696 * @arg LOAD_2_4_PF 2.4pF additional PA load capacitor
Wolfgang Betz 67:93bec0baf1de 1697 * @arg LOAD_3_6_PF 3.6pF additional PA load capacitor
Wolfgang Betz 67:93bec0baf1de 1698 * @param pcPAtable pointer to an array of PA values in the range [0: 90], where 0 implies no
Wolfgang Betz 67:93bec0baf1de 1699 * output power, 1 will be the maximum level and 90 the minimum one
Wolfgang Betz 67:93bec0baf1de 1700 * The first element shall be the lower level (PA_LEVEL[0]) value and the last element
Wolfgang Betz 67:93bec0baf1de 1701 * the higher level one (PA_LEVEL[paLevelMaxIndex]).
Wolfgang Betz 67:93bec0baf1de 1702 * @retval None.
Wolfgang Betz 67:93bec0baf1de 1703 */
Wolfgang Betz 67:93bec0baf1de 1704 void SpiritRadioSetPATable(uint8_t cPALevelMaxIndex, uint8_t cWidth, PALoadCapacitor xCLoad, uint8_t* pcPAtable)
Wolfgang Betz 67:93bec0baf1de 1705 {
Wolfgang Betz 67:93bec0baf1de 1706 uint8_t palevel[9], address;
Wolfgang Betz 67:93bec0baf1de 1707
Wolfgang Betz 67:93bec0baf1de 1708 /* Check the parameters */
Wolfgang Betz 67:93bec0baf1de 1709 s_assert_param(IS_PA_MAX_INDEX(cPALevelMaxIndex));
Wolfgang Betz 67:93bec0baf1de 1710 s_assert_param(IS_PA_STEP_WIDTH(cWidth));
Wolfgang Betz 67:93bec0baf1de 1711 s_assert_param(IS_PA_LOAD_CAP(xCLoad));
Wolfgang Betz 67:93bec0baf1de 1712
Wolfgang Betz 67:93bec0baf1de 1713 /* Check the PA levels are in the range */
Wolfgang Betz 67:93bec0baf1de 1714 for(int i=0; i<=cPALevelMaxIndex; i++)
Wolfgang Betz 67:93bec0baf1de 1715 {
Wolfgang Betz 67:93bec0baf1de 1716 s_assert_param(IS_PAPOWER(*pcPAtable));
Wolfgang Betz 67:93bec0baf1de 1717 palevel[cPALevelMaxIndex-i]=*pcPAtable;
Wolfgang Betz 67:93bec0baf1de 1718 pcPAtable++;
Wolfgang Betz 67:93bec0baf1de 1719 }
Wolfgang Betz 67:93bec0baf1de 1720
Wolfgang Betz 67:93bec0baf1de 1721 /* Sets the PA_POWER[0] register */
Wolfgang Betz 67:93bec0baf1de 1722 palevel[cPALevelMaxIndex+1]=xCLoad|((cWidth-1)<<3)|cPALevelMaxIndex;
Wolfgang Betz 67:93bec0baf1de 1723
Wolfgang Betz 67:93bec0baf1de 1724 /* Sets the base address */
Wolfgang Betz 67:93bec0baf1de 1725 address=PA_POWER8_BASE+7-cPALevelMaxIndex;
Wolfgang Betz 67:93bec0baf1de 1726
Wolfgang Betz 67:93bec0baf1de 1727 /* Configures the PA_POWER registers */
Wolfgang Betz 67:93bec0baf1de 1728 g_xStatus = SpiritSpiWriteRegisters(address, cPALevelMaxIndex+2, palevel);
Wolfgang Betz 67:93bec0baf1de 1729
Wolfgang Betz 67:93bec0baf1de 1730 }
Wolfgang Betz 67:93bec0baf1de 1731
Wolfgang Betz 67:93bec0baf1de 1732
Wolfgang Betz 67:93bec0baf1de 1733 /**
Wolfgang Betz 67:93bec0baf1de 1734 * @brief Returns the Power Amplifier Table and registers.
Wolfgang Betz 67:93bec0baf1de 1735 * @param pcPALevelMaxIndex pointer to the number of levels settled.
Wolfgang Betz 67:93bec0baf1de 1736 * This parameter shall be in the range [0:7].
Wolfgang Betz 67:93bec0baf1de 1737 * @param pcPAtable pointer to an array of 8 elements containing the PA value.
Wolfgang Betz 67:93bec0baf1de 1738 * The first element will be the PA_LEVEL_0 and the last element
Wolfgang Betz 67:93bec0baf1de 1739 * will be PA_LEVEL_7. Any value equals to 0 implies that level has
Wolfgang Betz 67:93bec0baf1de 1740 * no output power (output stage is in high impedance).
Wolfgang Betz 67:93bec0baf1de 1741 * @retval None
Wolfgang Betz 67:93bec0baf1de 1742 */
Wolfgang Betz 67:93bec0baf1de 1743 void SpiritRadioGetPATable(uint8_t* pcPALevelMaxIndex, uint8_t* pcPAtable)
Wolfgang Betz 67:93bec0baf1de 1744 {
Wolfgang Betz 67:93bec0baf1de 1745 uint8_t palevelvect[9];
Wolfgang Betz 67:93bec0baf1de 1746
Wolfgang Betz 67:93bec0baf1de 1747 /* Reads the PA_LEVEL_x registers and the PA_POWER_0 register */
Wolfgang Betz 67:93bec0baf1de 1748 g_xStatus = SpiritSpiReadRegisters(PA_POWER8_BASE, 9, palevelvect);
Wolfgang Betz 67:93bec0baf1de 1749
Wolfgang Betz 67:93bec0baf1de 1750 /* Fill the PAtable */
Wolfgang Betz 67:93bec0baf1de 1751 for(int i=7; i>=0; i--)
Wolfgang Betz 67:93bec0baf1de 1752 {
Wolfgang Betz 67:93bec0baf1de 1753 *pcPAtable = palevelvect[i];
Wolfgang Betz 67:93bec0baf1de 1754 pcPAtable++;
Wolfgang Betz 67:93bec0baf1de 1755 }
Wolfgang Betz 67:93bec0baf1de 1756
Wolfgang Betz 67:93bec0baf1de 1757 /* Return the settled index */
Wolfgang Betz 67:93bec0baf1de 1758 *pcPALevelMaxIndex = palevelvect[8]&0x07;
Wolfgang Betz 67:93bec0baf1de 1759
Wolfgang Betz 67:93bec0baf1de 1760 }
Wolfgang Betz 67:93bec0baf1de 1761
Wolfgang Betz 67:93bec0baf1de 1762
Wolfgang Betz 67:93bec0baf1de 1763 /**
Wolfgang Betz 67:93bec0baf1de 1764 * @brief Sets a specific PA_LEVEL register.
Wolfgang Betz 67:93bec0baf1de 1765 * @param cIndex PA_LEVEL to set. This parameter shall be in the range [0:7].
Wolfgang Betz 67:93bec0baf1de 1766 * @param cPower PA value to write in the register. Be sure that this values is in the
Wolfgang Betz 67:93bec0baf1de 1767 * correct range [0 : 90].
Wolfgang Betz 67:93bec0baf1de 1768 * @retval None.
Wolfgang Betz 67:93bec0baf1de 1769 */
Wolfgang Betz 67:93bec0baf1de 1770 void SpiritRadioSetPALevel(uint8_t cIndex, uint8_t cPower)
Wolfgang Betz 67:93bec0baf1de 1771 {
Wolfgang Betz 67:93bec0baf1de 1772 uint8_t address;
Wolfgang Betz 67:93bec0baf1de 1773
Wolfgang Betz 67:93bec0baf1de 1774 /* Check the parameters */
Wolfgang Betz 67:93bec0baf1de 1775 s_assert_param(IS_PA_MAX_INDEX(cIndex));
Wolfgang Betz 67:93bec0baf1de 1776 s_assert_param(IS_PAPOWER(cPower));
Wolfgang Betz 67:93bec0baf1de 1777
Wolfgang Betz 67:93bec0baf1de 1778 /* Sets the base address */
Wolfgang Betz 67:93bec0baf1de 1779 address=PA_POWER8_BASE+7-cIndex;
Wolfgang Betz 67:93bec0baf1de 1780
Wolfgang Betz 67:93bec0baf1de 1781 /* Configures the PA_LEVEL register */
Wolfgang Betz 67:93bec0baf1de 1782 g_xStatus = SpiritSpiWriteRegisters(address, 1, &cPower);
Wolfgang Betz 67:93bec0baf1de 1783
Wolfgang Betz 67:93bec0baf1de 1784 }
Wolfgang Betz 67:93bec0baf1de 1785
Wolfgang Betz 67:93bec0baf1de 1786
Wolfgang Betz 67:93bec0baf1de 1787 /**
Wolfgang Betz 67:93bec0baf1de 1788 * @brief Returns a specific PA_LEVEL register.
Wolfgang Betz 67:93bec0baf1de 1789 * @param cIndex PA_LEVEL to read. This parameter shall be in the range [0:7].
Wolfgang Betz 67:93bec0baf1de 1790 * @retval uint8_t PA_LEVEL value. A value equal to zero
Wolfgang Betz 67:93bec0baf1de 1791 * implies no output power (output stage is in high impedance).
Wolfgang Betz 67:93bec0baf1de 1792 */
Wolfgang Betz 67:93bec0baf1de 1793 uint8_t SpiritRadioGetPALevel(uint8_t cIndex)
Wolfgang Betz 67:93bec0baf1de 1794 {
Wolfgang Betz 67:93bec0baf1de 1795 uint8_t address, tempRegValue;
Wolfgang Betz 67:93bec0baf1de 1796
Wolfgang Betz 67:93bec0baf1de 1797 /* Check the parameters */
Wolfgang Betz 67:93bec0baf1de 1798 s_assert_param(IS_PA_MAX_INDEX(cIndex));
Wolfgang Betz 67:93bec0baf1de 1799
Wolfgang Betz 67:93bec0baf1de 1800 /* Sets the base address */
Wolfgang Betz 67:93bec0baf1de 1801 address=PA_POWER8_BASE+7-cIndex;
Wolfgang Betz 67:93bec0baf1de 1802
Wolfgang Betz 67:93bec0baf1de 1803 /* Reads the PA_LEVEL[cIndex] register and return the value */
Wolfgang Betz 67:93bec0baf1de 1804 g_xStatus = SpiritSpiReadRegisters(address, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 1805 return tempRegValue;
Wolfgang Betz 67:93bec0baf1de 1806
Wolfgang Betz 67:93bec0baf1de 1807 }
Wolfgang Betz 67:93bec0baf1de 1808
Wolfgang Betz 67:93bec0baf1de 1809
Wolfgang Betz 67:93bec0baf1de 1810 /**
Wolfgang Betz 67:93bec0baf1de 1811 * @brief Sets the output stage additional load capacitor bank.
Wolfgang Betz 67:93bec0baf1de 1812 * @param xCLoad one of the possible value of the enum type PALoadCapacitor.
Wolfgang Betz 67:93bec0baf1de 1813 * @arg LOAD_0_PF No additional PA load capacitor
Wolfgang Betz 67:93bec0baf1de 1814 * @arg LOAD_1_2_PF 1.2pF additional PA load capacitor
Wolfgang Betz 67:93bec0baf1de 1815 * @arg LOAD_2_4_PF 2.4pF additional PA load capacitor
Wolfgang Betz 67:93bec0baf1de 1816 * @arg LOAD_3_6_PF 3.6pF additional PA load capacitor
Wolfgang Betz 67:93bec0baf1de 1817 * @retval None.
Wolfgang Betz 67:93bec0baf1de 1818 */
Wolfgang Betz 67:93bec0baf1de 1819 void SpiritRadioSetPACwc(PALoadCapacitor xCLoad)
Wolfgang Betz 67:93bec0baf1de 1820 {
Wolfgang Betz 67:93bec0baf1de 1821 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 1822
Wolfgang Betz 67:93bec0baf1de 1823 /* Check the parameters */
Wolfgang Betz 67:93bec0baf1de 1824 s_assert_param(IS_PA_LOAD_CAP(xCLoad));
Wolfgang Betz 67:93bec0baf1de 1825
Wolfgang Betz 67:93bec0baf1de 1826 /* Reads the PA_POWER_0 register */
Wolfgang Betz 67:93bec0baf1de 1827 SpiritSpiReadRegisters(PA_POWER0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 1828
Wolfgang Betz 67:93bec0baf1de 1829 /* Mask the CWC[1:0] field and write the new value */
Wolfgang Betz 67:93bec0baf1de 1830 tempRegValue &= 0x3F;
Wolfgang Betz 67:93bec0baf1de 1831 tempRegValue |= xCLoad;
Wolfgang Betz 67:93bec0baf1de 1832
Wolfgang Betz 67:93bec0baf1de 1833 /* Configures the PA_POWER_0 register */
Wolfgang Betz 67:93bec0baf1de 1834 g_xStatus = SpiritSpiWriteRegisters(PA_POWER0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 1835
Wolfgang Betz 67:93bec0baf1de 1836 }
Wolfgang Betz 67:93bec0baf1de 1837
Wolfgang Betz 67:93bec0baf1de 1838
Wolfgang Betz 67:93bec0baf1de 1839 /**
Wolfgang Betz 67:93bec0baf1de 1840 * @brief Returns the output stage additional load capacitor bank.
Wolfgang Betz 67:93bec0baf1de 1841 * @param None.
Wolfgang Betz 67:93bec0baf1de 1842 * @retval PALoadCapacitor Output stage additional load capacitor bank.
Wolfgang Betz 67:93bec0baf1de 1843 * This parameter can be:
Wolfgang Betz 67:93bec0baf1de 1844 * @arg LOAD_0_PF No additional PA load capacitor
Wolfgang Betz 67:93bec0baf1de 1845 * @arg LOAD_1_2_PF 1.2pF additional PA load capacitor
Wolfgang Betz 67:93bec0baf1de 1846 * @arg LOAD_2_4_PF 2.4pF additional PA load capacitor
Wolfgang Betz 67:93bec0baf1de 1847 * @arg LOAD_3_6_PF 3.6pF additional PA load capacitor
Wolfgang Betz 67:93bec0baf1de 1848 */
Wolfgang Betz 67:93bec0baf1de 1849 PALoadCapacitor SpiritRadioGetPACwc(void)
Wolfgang Betz 67:93bec0baf1de 1850 {
Wolfgang Betz 67:93bec0baf1de 1851 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 1852
Wolfgang Betz 67:93bec0baf1de 1853 /* Reads the PA_POWER_0 register */
Wolfgang Betz 67:93bec0baf1de 1854 g_xStatus = SpiritSpiReadRegisters(PA_POWER0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 1855
Wolfgang Betz 67:93bec0baf1de 1856 /* Mask the CWC[1:0] field and return the value*/
Wolfgang Betz 67:93bec0baf1de 1857 return (PALoadCapacitor)(tempRegValue & 0xC0);
Wolfgang Betz 67:93bec0baf1de 1858
Wolfgang Betz 67:93bec0baf1de 1859 }
Wolfgang Betz 67:93bec0baf1de 1860
Wolfgang Betz 67:93bec0baf1de 1861
Wolfgang Betz 67:93bec0baf1de 1862 /**
Wolfgang Betz 67:93bec0baf1de 1863 * @brief Sets a specific PA_LEVEL_MAX_INDEX.
Wolfgang Betz 67:93bec0baf1de 1864 * @param cIndex PA_LEVEL_MAX_INDEX to set. This parameter shall be in the range [0:7].
Wolfgang Betz 67:93bec0baf1de 1865 * @retval None
Wolfgang Betz 67:93bec0baf1de 1866 */
Wolfgang Betz 67:93bec0baf1de 1867 void SpiritRadioSetPALevelMaxIndex(uint8_t cIndex)
Wolfgang Betz 67:93bec0baf1de 1868 {
Wolfgang Betz 67:93bec0baf1de 1869 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 1870
Wolfgang Betz 67:93bec0baf1de 1871 /* Check the parameters */
Wolfgang Betz 67:93bec0baf1de 1872 s_assert_param(IS_PA_MAX_INDEX(cIndex));
Wolfgang Betz 67:93bec0baf1de 1873
Wolfgang Betz 67:93bec0baf1de 1874 /* Reads the PA_POWER_0 register */
Wolfgang Betz 67:93bec0baf1de 1875 SpiritSpiReadRegisters(PA_POWER0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 1876
Wolfgang Betz 67:93bec0baf1de 1877 /* Mask the PA_LEVEL_MAX_INDEX[1:0] field and write the new value */
Wolfgang Betz 67:93bec0baf1de 1878 tempRegValue &= 0xF8;
Wolfgang Betz 67:93bec0baf1de 1879 tempRegValue |= cIndex;
Wolfgang Betz 67:93bec0baf1de 1880
Wolfgang Betz 67:93bec0baf1de 1881 /* Configures the PA_POWER_0 register */
Wolfgang Betz 67:93bec0baf1de 1882 g_xStatus = SpiritSpiWriteRegisters(PA_POWER0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 1883
Wolfgang Betz 67:93bec0baf1de 1884 }
Wolfgang Betz 67:93bec0baf1de 1885
Wolfgang Betz 67:93bec0baf1de 1886
Wolfgang Betz 67:93bec0baf1de 1887 /**
Wolfgang Betz 67:93bec0baf1de 1888 * @brief Returns the actual PA_LEVEL_MAX_INDEX.
Wolfgang Betz 67:93bec0baf1de 1889 * @param None.
Wolfgang Betz 67:93bec0baf1de 1890 * @retval uint8_t Actual PA_LEVEL_MAX_INDEX. This parameter will be in the range [0:7].
Wolfgang Betz 67:93bec0baf1de 1891 */
Wolfgang Betz 67:93bec0baf1de 1892 uint8_t SpiritRadioGetPALevelMaxIndex(void)
Wolfgang Betz 67:93bec0baf1de 1893 {
Wolfgang Betz 67:93bec0baf1de 1894 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 1895
Wolfgang Betz 67:93bec0baf1de 1896 /* Reads the PA_POWER_0 register */
Wolfgang Betz 67:93bec0baf1de 1897 g_xStatus = SpiritSpiReadRegisters(PA_POWER0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 1898
Wolfgang Betz 67:93bec0baf1de 1899 /* Mask the PA_LEVEL_MAX_INDEX[1:0] field and return the value */
Wolfgang Betz 67:93bec0baf1de 1900 return (tempRegValue & 0x07);
Wolfgang Betz 67:93bec0baf1de 1901
Wolfgang Betz 67:93bec0baf1de 1902 }
Wolfgang Betz 67:93bec0baf1de 1903
Wolfgang Betz 67:93bec0baf1de 1904
Wolfgang Betz 67:93bec0baf1de 1905 /**
Wolfgang Betz 67:93bec0baf1de 1906 * @brief Sets a specific PA_RAMP_STEP_WIDTH.
Wolfgang Betz 67:93bec0baf1de 1907 * @param cWidth step width expressed in terms of bit period units Tb/8.
Wolfgang Betz 67:93bec0baf1de 1908 * This parameter shall be in the range [1:4].
Wolfgang Betz 67:93bec0baf1de 1909 * @retval None.
Wolfgang Betz 67:93bec0baf1de 1910 */
Wolfgang Betz 67:93bec0baf1de 1911 void SpiritRadioSetPAStepWidth(uint8_t cWidth)
Wolfgang Betz 67:93bec0baf1de 1912 {
Wolfgang Betz 67:93bec0baf1de 1913 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 1914
Wolfgang Betz 67:93bec0baf1de 1915 /* Check the parameters */
Wolfgang Betz 67:93bec0baf1de 1916 s_assert_param(IS_PA_STEP_WIDTH(cWidth));
Wolfgang Betz 67:93bec0baf1de 1917
Wolfgang Betz 67:93bec0baf1de 1918 /* Reads the PA_POWER_0 register */
Wolfgang Betz 67:93bec0baf1de 1919 SpiritSpiReadRegisters(PA_POWER0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 1920
Wolfgang Betz 67:93bec0baf1de 1921 /* Mask the PA_RAMP_STEP_WIDTH[1:0] field and write the new value */
Wolfgang Betz 67:93bec0baf1de 1922 tempRegValue &= 0xE7;
Wolfgang Betz 67:93bec0baf1de 1923 tempRegValue |= (cWidth-1)<<3;
Wolfgang Betz 67:93bec0baf1de 1924
Wolfgang Betz 67:93bec0baf1de 1925 /* Configures the PA_POWER_0 register */
Wolfgang Betz 67:93bec0baf1de 1926 g_xStatus = SpiritSpiWriteRegisters(PA_POWER0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 1927
Wolfgang Betz 67:93bec0baf1de 1928 }
Wolfgang Betz 67:93bec0baf1de 1929
Wolfgang Betz 67:93bec0baf1de 1930
Wolfgang Betz 67:93bec0baf1de 1931 /**
Wolfgang Betz 67:93bec0baf1de 1932 * @brief Returns the actual PA_RAMP_STEP_WIDTH.
Wolfgang Betz 67:93bec0baf1de 1933 * @param None.
Wolfgang Betz 67:93bec0baf1de 1934 * @retval uint8_t Step width value expressed in terms of bit period units Tb/8.
Wolfgang Betz 67:93bec0baf1de 1935 * This parameter will be in the range [1:4].
Wolfgang Betz 67:93bec0baf1de 1936 */
Wolfgang Betz 67:93bec0baf1de 1937 uint8_t SpiritRadioGetPAStepWidth(void)
Wolfgang Betz 67:93bec0baf1de 1938 {
Wolfgang Betz 67:93bec0baf1de 1939 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 1940
Wolfgang Betz 67:93bec0baf1de 1941 /* Reads the PA_POWER_0 register */
Wolfgang Betz 67:93bec0baf1de 1942 g_xStatus = SpiritSpiReadRegisters(PA_POWER0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 1943
Wolfgang Betz 67:93bec0baf1de 1944 /* Mask the PA_RAMP_STEP_WIDTH[1:0] field and return the value */
Wolfgang Betz 67:93bec0baf1de 1945 tempRegValue &= 0x18;
Wolfgang Betz 67:93bec0baf1de 1946 return ((tempRegValue>>3)+1);
Wolfgang Betz 67:93bec0baf1de 1947
Wolfgang Betz 67:93bec0baf1de 1948 }
Wolfgang Betz 67:93bec0baf1de 1949
Wolfgang Betz 67:93bec0baf1de 1950
Wolfgang Betz 67:93bec0baf1de 1951 /**
Wolfgang Betz 67:93bec0baf1de 1952 * @brief Enables or Disables the Power Ramping.
Wolfgang Betz 67:93bec0baf1de 1953 * @param xNewState new state for power ramping.
Wolfgang Betz 67:93bec0baf1de 1954 * This parameter can be: S_ENABLE or S_DISABLE.
Wolfgang Betz 67:93bec0baf1de 1955 * @retval None.
Wolfgang Betz 67:93bec0baf1de 1956 */
Wolfgang Betz 67:93bec0baf1de 1957 void SpiritRadioPARamping(SpiritFunctionalState xNewState)
Wolfgang Betz 67:93bec0baf1de 1958 {
Wolfgang Betz 67:93bec0baf1de 1959 uint8_t tempRegValue = 0x00;
Wolfgang Betz 67:93bec0baf1de 1960
Wolfgang Betz 67:93bec0baf1de 1961 /* Check the parameters */
Wolfgang Betz 67:93bec0baf1de 1962 s_assert_param(IS_SPIRIT_FUNCTIONAL_STATE(xNewState));
Wolfgang Betz 67:93bec0baf1de 1963
Wolfgang Betz 67:93bec0baf1de 1964 /* Reads the PA_POWER_0 register and configure the PA_RAMP_ENABLE field */
Wolfgang Betz 67:93bec0baf1de 1965 SpiritSpiReadRegisters(PA_POWER0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 1966 if(xNewState == S_ENABLE)
Wolfgang Betz 67:93bec0baf1de 1967 {
Wolfgang Betz 67:93bec0baf1de 1968 tempRegValue |= PA_POWER0_PA_RAMP_MASK;
Wolfgang Betz 67:93bec0baf1de 1969 }
Wolfgang Betz 67:93bec0baf1de 1970 else
Wolfgang Betz 67:93bec0baf1de 1971 {
Wolfgang Betz 67:93bec0baf1de 1972 tempRegValue &= (~PA_POWER0_PA_RAMP_MASK);
Wolfgang Betz 67:93bec0baf1de 1973 }
Wolfgang Betz 67:93bec0baf1de 1974
Wolfgang Betz 67:93bec0baf1de 1975 /* Sets the PA_POWER_0 register */
Wolfgang Betz 67:93bec0baf1de 1976 g_xStatus = SpiritSpiWriteRegisters(PA_POWER0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 1977
Wolfgang Betz 67:93bec0baf1de 1978 }
Wolfgang Betz 67:93bec0baf1de 1979
Wolfgang Betz 67:93bec0baf1de 1980 /**
Wolfgang Betz 67:93bec0baf1de 1981 * @brief Returns the Power Ramping enable bit.
Wolfgang Betz 67:93bec0baf1de 1982 * @param xNewState new state for power ramping.
Wolfgang Betz 67:93bec0baf1de 1983 * This parameter can be: S_ENABLE or S_DISABLE.
Wolfgang Betz 67:93bec0baf1de 1984 * @retval None.
Wolfgang Betz 67:93bec0baf1de 1985 */
Wolfgang Betz 67:93bec0baf1de 1986 SpiritFunctionalState SpiritRadioGetPARamping(void)
Wolfgang Betz 67:93bec0baf1de 1987 {
Wolfgang Betz 67:93bec0baf1de 1988 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 1989
Wolfgang Betz 67:93bec0baf1de 1990 /* Reads the PA_POWER_0 register and configure the PA_RAMP_ENABLE field */
Wolfgang Betz 67:93bec0baf1de 1991 g_xStatus = SpiritSpiReadRegisters(PA_POWER0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 1992
Wolfgang Betz 67:93bec0baf1de 1993 /* Mask and return data */
Wolfgang Betz 67:93bec0baf1de 1994 return (SpiritFunctionalState)((tempRegValue>>5) & 0x01);
Wolfgang Betz 67:93bec0baf1de 1995
Wolfgang Betz 67:93bec0baf1de 1996 }
Wolfgang Betz 67:93bec0baf1de 1997
Wolfgang Betz 67:93bec0baf1de 1998
Wolfgang Betz 67:93bec0baf1de 1999 /**
Wolfgang Betz 67:93bec0baf1de 2000 * @brief Enables or Disables the AFC.
Wolfgang Betz 67:93bec0baf1de 2001 * @param xNewState new state for AFC.
Wolfgang Betz 67:93bec0baf1de 2002 * This parameter can be: S_ENABLE or S_DISABLE.
Wolfgang Betz 67:93bec0baf1de 2003 * @retval None.
Wolfgang Betz 67:93bec0baf1de 2004 */
Wolfgang Betz 67:93bec0baf1de 2005 void SpiritRadioAFC(SpiritFunctionalState xNewState)
Wolfgang Betz 67:93bec0baf1de 2006 {
Wolfgang Betz 67:93bec0baf1de 2007 uint8_t tempRegValue = 0x00;
Wolfgang Betz 67:93bec0baf1de 2008
Wolfgang Betz 67:93bec0baf1de 2009 /* Check the parameters */
Wolfgang Betz 67:93bec0baf1de 2010 s_assert_param(IS_SPIRIT_FUNCTIONAL_STATE(xNewState));
Wolfgang Betz 67:93bec0baf1de 2011
Wolfgang Betz 67:93bec0baf1de 2012 /* Reads the AFC_2 register and configure the AFC Enabled field */
Wolfgang Betz 67:93bec0baf1de 2013 SpiritSpiReadRegisters(AFC2_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2014 if(xNewState == S_ENABLE)
Wolfgang Betz 67:93bec0baf1de 2015 {
Wolfgang Betz 67:93bec0baf1de 2016 tempRegValue |= AFC2_AFC_MASK;
Wolfgang Betz 67:93bec0baf1de 2017 }
Wolfgang Betz 67:93bec0baf1de 2018 else
Wolfgang Betz 67:93bec0baf1de 2019 {
Wolfgang Betz 67:93bec0baf1de 2020 tempRegValue &= (~AFC2_AFC_MASK);
Wolfgang Betz 67:93bec0baf1de 2021 }
Wolfgang Betz 67:93bec0baf1de 2022
Wolfgang Betz 67:93bec0baf1de 2023 /* Sets the AFC_2 register */
Wolfgang Betz 67:93bec0baf1de 2024 g_xStatus = SpiritSpiWriteRegisters(AFC2_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2025
Wolfgang Betz 67:93bec0baf1de 2026 }
Wolfgang Betz 67:93bec0baf1de 2027
Wolfgang Betz 67:93bec0baf1de 2028
Wolfgang Betz 67:93bec0baf1de 2029 /**
Wolfgang Betz 67:93bec0baf1de 2030 * @brief Enables or Disables the AFC freeze on sync word detection.
Wolfgang Betz 67:93bec0baf1de 2031 * @param xNewState new state for AFC freeze on sync word detection.
Wolfgang Betz 67:93bec0baf1de 2032 * This parameter can be: S_ENABLE or S_DISABLE.
Wolfgang Betz 67:93bec0baf1de 2033 * @retval None.
Wolfgang Betz 67:93bec0baf1de 2034 */
Wolfgang Betz 67:93bec0baf1de 2035 void SpiritRadioAFCFreezeOnSync(SpiritFunctionalState xNewState)
Wolfgang Betz 67:93bec0baf1de 2036 {
Wolfgang Betz 67:93bec0baf1de 2037 uint8_t tempRegValue = 0x00;
Wolfgang Betz 67:93bec0baf1de 2038
Wolfgang Betz 67:93bec0baf1de 2039 /* Check the parameters */
Wolfgang Betz 67:93bec0baf1de 2040 s_assert_param(IS_SPIRIT_FUNCTIONAL_STATE(xNewState));
Wolfgang Betz 67:93bec0baf1de 2041
Wolfgang Betz 67:93bec0baf1de 2042 /* Reads the AFC_2 register and configure the AFC Freeze on Sync field */
Wolfgang Betz 67:93bec0baf1de 2043 SpiritSpiReadRegisters(AFC2_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2044 if(xNewState == S_ENABLE)
Wolfgang Betz 67:93bec0baf1de 2045 {
Wolfgang Betz 67:93bec0baf1de 2046 tempRegValue |= AFC2_AFC_FREEZE_ON_SYNC_MASK;
Wolfgang Betz 67:93bec0baf1de 2047 }
Wolfgang Betz 67:93bec0baf1de 2048 else
Wolfgang Betz 67:93bec0baf1de 2049 {
Wolfgang Betz 67:93bec0baf1de 2050 tempRegValue &= (~AFC2_AFC_FREEZE_ON_SYNC_MASK);
Wolfgang Betz 67:93bec0baf1de 2051 }
Wolfgang Betz 67:93bec0baf1de 2052
Wolfgang Betz 67:93bec0baf1de 2053 /* Sets the AFC_2 register */
Wolfgang Betz 67:93bec0baf1de 2054 g_xStatus = SpiritSpiWriteRegisters(AFC2_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2055
Wolfgang Betz 67:93bec0baf1de 2056 }
Wolfgang Betz 67:93bec0baf1de 2057
Wolfgang Betz 67:93bec0baf1de 2058
Wolfgang Betz 67:93bec0baf1de 2059 /**
Wolfgang Betz 67:93bec0baf1de 2060 * @brief Sets the AFC working mode.
Wolfgang Betz 67:93bec0baf1de 2061 * @param xMode the AFC mode. This parameter can be one of the values defined in @ref AFCMode :
Wolfgang Betz 67:93bec0baf1de 2062 * @arg AFC_SLICER_CORRECTION AFC loop closed on slicer
Wolfgang Betz 67:93bec0baf1de 2063 * @arg AFC_2ND_IF_CORRECTION AFC loop closed on 2nd conversion stage
Wolfgang Betz 67:93bec0baf1de 2064 * @retval None.
Wolfgang Betz 67:93bec0baf1de 2065 */
Wolfgang Betz 67:93bec0baf1de 2066 void SpiritRadioSetAFCMode(AFCMode xMode)
Wolfgang Betz 67:93bec0baf1de 2067 {
Wolfgang Betz 67:93bec0baf1de 2068 uint8_t tempRegValue = 0x00;
Wolfgang Betz 67:93bec0baf1de 2069
Wolfgang Betz 67:93bec0baf1de 2070 /* Check the parameters */
Wolfgang Betz 67:93bec0baf1de 2071 s_assert_param(IS_AFC_MODE(xMode));
Wolfgang Betz 67:93bec0baf1de 2072
Wolfgang Betz 67:93bec0baf1de 2073 /* Reads the AFC_2 register and configure the AFC Mode field */
Wolfgang Betz 67:93bec0baf1de 2074 SpiritSpiReadRegisters(AFC2_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2075 if(xMode == AFC_2ND_IF_CORRECTION)
Wolfgang Betz 67:93bec0baf1de 2076 {
Wolfgang Betz 67:93bec0baf1de 2077 tempRegValue |= AFC_2ND_IF_CORRECTION;
Wolfgang Betz 67:93bec0baf1de 2078 }
Wolfgang Betz 67:93bec0baf1de 2079 else
Wolfgang Betz 67:93bec0baf1de 2080 {
Wolfgang Betz 67:93bec0baf1de 2081 tempRegValue &= (~AFC_2ND_IF_CORRECTION);
Wolfgang Betz 67:93bec0baf1de 2082 }
Wolfgang Betz 67:93bec0baf1de 2083
Wolfgang Betz 67:93bec0baf1de 2084 /* Sets the AFC_2 register */
Wolfgang Betz 67:93bec0baf1de 2085 g_xStatus = SpiritSpiWriteRegisters(AFC2_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2086
Wolfgang Betz 67:93bec0baf1de 2087 }
Wolfgang Betz 67:93bec0baf1de 2088
Wolfgang Betz 67:93bec0baf1de 2089
Wolfgang Betz 67:93bec0baf1de 2090 /**
Wolfgang Betz 67:93bec0baf1de 2091 * @brief Returns the AFC working mode.
Wolfgang Betz 67:93bec0baf1de 2092 * @param None.
Wolfgang Betz 67:93bec0baf1de 2093 * @retval AFCMode Settled AFC mode. This parameter will be one of the values defined in @ref AFCMode :
Wolfgang Betz 67:93bec0baf1de 2094 * @arg AFC_SLICER_CORRECTION AFC loop closed on slicer
Wolfgang Betz 67:93bec0baf1de 2095 * @arg AFC_2ND_IF_CORRECTION AFC loop closed on 2nd conversion stage
Wolfgang Betz 67:93bec0baf1de 2096 */
Wolfgang Betz 67:93bec0baf1de 2097 AFCMode SpiritRadioGetAFCMode(void)
Wolfgang Betz 67:93bec0baf1de 2098 {
Wolfgang Betz 67:93bec0baf1de 2099 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 2100
Wolfgang Betz 67:93bec0baf1de 2101 /* Reads the AFC_2 register */
Wolfgang Betz 67:93bec0baf1de 2102 g_xStatus = SpiritSpiReadRegisters(AFC2_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2103
Wolfgang Betz 67:93bec0baf1de 2104 /* Mask the AFC Mode field and returns the value */
Wolfgang Betz 67:93bec0baf1de 2105 return (AFCMode)(tempRegValue & 0x20);
Wolfgang Betz 67:93bec0baf1de 2106
Wolfgang Betz 67:93bec0baf1de 2107 }
Wolfgang Betz 67:93bec0baf1de 2108
Wolfgang Betz 67:93bec0baf1de 2109
Wolfgang Betz 67:93bec0baf1de 2110 /**
Wolfgang Betz 67:93bec0baf1de 2111 * @brief Sets the AFC peak detector leakage.
Wolfgang Betz 67:93bec0baf1de 2112 * @param cLeakage the peak detector leakage. This parameter shall be in the range:
Wolfgang Betz 67:93bec0baf1de 2113 * [0:31].
Wolfgang Betz 67:93bec0baf1de 2114 * @retval None.
Wolfgang Betz 67:93bec0baf1de 2115 */
Wolfgang Betz 67:93bec0baf1de 2116 void SpiritRadioSetAFCPDLeakage(uint8_t cLeakage)
Wolfgang Betz 67:93bec0baf1de 2117 {
Wolfgang Betz 67:93bec0baf1de 2118 uint8_t tempRegValue = 0x00;
Wolfgang Betz 67:93bec0baf1de 2119
Wolfgang Betz 67:93bec0baf1de 2120 /* Check the parameters */
Wolfgang Betz 67:93bec0baf1de 2121 s_assert_param(IS_AFC_PD_LEAKAGE(cLeakage));
Wolfgang Betz 67:93bec0baf1de 2122
Wolfgang Betz 67:93bec0baf1de 2123 /* Reads the AFC_2 register and configure the AFC PD leakage field */
Wolfgang Betz 67:93bec0baf1de 2124 SpiritSpiReadRegisters(AFC2_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2125 tempRegValue &= 0xE0;
Wolfgang Betz 67:93bec0baf1de 2126 tempRegValue |= cLeakage;
Wolfgang Betz 67:93bec0baf1de 2127
Wolfgang Betz 67:93bec0baf1de 2128 /* Sets the AFC_2 register */
Wolfgang Betz 67:93bec0baf1de 2129 g_xStatus = SpiritSpiWriteRegisters(AFC2_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2130
Wolfgang Betz 67:93bec0baf1de 2131 }
Wolfgang Betz 67:93bec0baf1de 2132
Wolfgang Betz 67:93bec0baf1de 2133
Wolfgang Betz 67:93bec0baf1de 2134 /**
Wolfgang Betz 67:93bec0baf1de 2135 * @brief Returns the AFC peak detector leakage.
Wolfgang Betz 67:93bec0baf1de 2136 * @param None.
Wolfgang Betz 67:93bec0baf1de 2137 * @retval uint8_t Peak detector leakage value. This parameter will be in the range:
Wolfgang Betz 67:93bec0baf1de 2138 * [0:31].
Wolfgang Betz 67:93bec0baf1de 2139 */
Wolfgang Betz 67:93bec0baf1de 2140 uint8_t SpiritRadioGetAFCPDLeakage(void)
Wolfgang Betz 67:93bec0baf1de 2141 {
Wolfgang Betz 67:93bec0baf1de 2142 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 2143
Wolfgang Betz 67:93bec0baf1de 2144 /* Reads the AFC_2 register */
Wolfgang Betz 67:93bec0baf1de 2145 g_xStatus = SpiritSpiReadRegisters(AFC2_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2146
Wolfgang Betz 67:93bec0baf1de 2147 /* Mask the AFC PD leakage field and return the value */
Wolfgang Betz 67:93bec0baf1de 2148 return (tempRegValue & 0x1F);
Wolfgang Betz 67:93bec0baf1de 2149
Wolfgang Betz 67:93bec0baf1de 2150 }
Wolfgang Betz 67:93bec0baf1de 2151
Wolfgang Betz 67:93bec0baf1de 2152
Wolfgang Betz 67:93bec0baf1de 2153 /**
Wolfgang Betz 67:93bec0baf1de 2154 * @brief Sets the length of the AFC fast period expressed as number of samples.
Wolfgang Betz 67:93bec0baf1de 2155 * @param cLength length of the fast period in number of samples.
Wolfgang Betz 67:93bec0baf1de 2156 * @retval None.
Wolfgang Betz 67:93bec0baf1de 2157 */
Wolfgang Betz 67:93bec0baf1de 2158 void SpiritRadioSetAFCFastPeriod(uint8_t cLength)
Wolfgang Betz 67:93bec0baf1de 2159 {
Wolfgang Betz 67:93bec0baf1de 2160 /* Sets the AFC_1 register */
Wolfgang Betz 67:93bec0baf1de 2161 g_xStatus = SpiritSpiWriteRegisters(AFC1_BASE, 1, &cLength);
Wolfgang Betz 67:93bec0baf1de 2162
Wolfgang Betz 67:93bec0baf1de 2163 }
Wolfgang Betz 67:93bec0baf1de 2164
Wolfgang Betz 67:93bec0baf1de 2165
Wolfgang Betz 67:93bec0baf1de 2166 /**
Wolfgang Betz 67:93bec0baf1de 2167 * @brief Returns the AFC fast period expressed as number of samples.
Wolfgang Betz 67:93bec0baf1de 2168 * @param None.
Wolfgang Betz 67:93bec0baf1de 2169 * @retval uint8_t Length of the fast period in number of samples.
Wolfgang Betz 67:93bec0baf1de 2170 */
Wolfgang Betz 67:93bec0baf1de 2171 uint8_t SpiritRadioGetAFCFastPeriod(void)
Wolfgang Betz 67:93bec0baf1de 2172 {
Wolfgang Betz 67:93bec0baf1de 2173 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 2174
Wolfgang Betz 67:93bec0baf1de 2175 /* Reads the AFC 1 register and return the value */
Wolfgang Betz 67:93bec0baf1de 2176 g_xStatus = SpiritSpiReadRegisters(AFC1_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2177
Wolfgang Betz 67:93bec0baf1de 2178 return tempRegValue;
Wolfgang Betz 67:93bec0baf1de 2179
Wolfgang Betz 67:93bec0baf1de 2180 }
Wolfgang Betz 67:93bec0baf1de 2181
Wolfgang Betz 67:93bec0baf1de 2182
Wolfgang Betz 67:93bec0baf1de 2183 /**
Wolfgang Betz 67:93bec0baf1de 2184 * @brief Sets the AFC loop gain in fast mode.
Wolfgang Betz 67:93bec0baf1de 2185 * @param cGain AFC loop gain in fast mode. This parameter shall be in the range:
Wolfgang Betz 67:93bec0baf1de 2186 * [0:15].
Wolfgang Betz 67:93bec0baf1de 2187 * @retval None.
Wolfgang Betz 67:93bec0baf1de 2188 */
Wolfgang Betz 67:93bec0baf1de 2189 void SpiritRadioSetAFCFastGain(uint8_t cGain)
Wolfgang Betz 67:93bec0baf1de 2190 {
Wolfgang Betz 67:93bec0baf1de 2191 uint8_t tempRegValue = 0x00;
Wolfgang Betz 67:93bec0baf1de 2192
Wolfgang Betz 67:93bec0baf1de 2193 /* Check the parameters */
Wolfgang Betz 67:93bec0baf1de 2194 s_assert_param(IS_AFC_FAST_GAIN(cGain));
Wolfgang Betz 67:93bec0baf1de 2195
Wolfgang Betz 67:93bec0baf1de 2196 /* Reads the AFC_0 register and configure the AFC Fast Gain field */
Wolfgang Betz 67:93bec0baf1de 2197 SpiritSpiReadRegisters(AFC0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2198 tempRegValue &= 0x0F;
Wolfgang Betz 67:93bec0baf1de 2199 tempRegValue |= cGain<<4;
Wolfgang Betz 67:93bec0baf1de 2200
Wolfgang Betz 67:93bec0baf1de 2201 /* Sets the AFC_0 register */
Wolfgang Betz 67:93bec0baf1de 2202 g_xStatus = SpiritSpiWriteRegisters(AFC0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2203
Wolfgang Betz 67:93bec0baf1de 2204 }
Wolfgang Betz 67:93bec0baf1de 2205
Wolfgang Betz 67:93bec0baf1de 2206
Wolfgang Betz 67:93bec0baf1de 2207 /**
Wolfgang Betz 67:93bec0baf1de 2208 * @brief Returns the AFC loop gain in fast mode.
Wolfgang Betz 67:93bec0baf1de 2209 * @param None.
Wolfgang Betz 67:93bec0baf1de 2210 * @retval uint8_t AFC loop gain in fast mode. This parameter will be in the range:
Wolfgang Betz 67:93bec0baf1de 2211 * [0:15].
Wolfgang Betz 67:93bec0baf1de 2212 */
Wolfgang Betz 67:93bec0baf1de 2213 uint8_t SpiritRadioGetAFCFastGain(void)
Wolfgang Betz 67:93bec0baf1de 2214 {
Wolfgang Betz 67:93bec0baf1de 2215 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 2216
Wolfgang Betz 67:93bec0baf1de 2217 /* Reads the AFC_0 register, mask the AFC Fast Gain field and return the value */
Wolfgang Betz 67:93bec0baf1de 2218 g_xStatus = SpiritSpiReadRegisters(AFC0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2219
Wolfgang Betz 67:93bec0baf1de 2220 return ((tempRegValue & 0xF0)>>4);
Wolfgang Betz 67:93bec0baf1de 2221
Wolfgang Betz 67:93bec0baf1de 2222 }
Wolfgang Betz 67:93bec0baf1de 2223
Wolfgang Betz 67:93bec0baf1de 2224
Wolfgang Betz 67:93bec0baf1de 2225 /**
Wolfgang Betz 67:93bec0baf1de 2226 * @brief Sets the AFC loop gain in slow mode.
Wolfgang Betz 67:93bec0baf1de 2227 * @param cGain AFC loop gain in slow mode. This parameter shall be in the range:
Wolfgang Betz 67:93bec0baf1de 2228 * [0:15].
Wolfgang Betz 67:93bec0baf1de 2229 * @retval None.
Wolfgang Betz 67:93bec0baf1de 2230 */
Wolfgang Betz 67:93bec0baf1de 2231 void SpiritRadioSetAFCSlowGain(uint8_t cGain)
Wolfgang Betz 67:93bec0baf1de 2232 {
Wolfgang Betz 67:93bec0baf1de 2233 uint8_t tempRegValue = 0x00;
Wolfgang Betz 67:93bec0baf1de 2234
Wolfgang Betz 67:93bec0baf1de 2235 /* Check the parameters */
Wolfgang Betz 67:93bec0baf1de 2236 s_assert_param(IS_AFC_SLOW_GAIN(cGain));
Wolfgang Betz 67:93bec0baf1de 2237
Wolfgang Betz 67:93bec0baf1de 2238 /* Reads the AFC_0 register and configure the AFC Slow Gain field */
Wolfgang Betz 67:93bec0baf1de 2239 SpiritSpiReadRegisters(AFC0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2240 tempRegValue &= 0xF0;
Wolfgang Betz 67:93bec0baf1de 2241 tempRegValue |= cGain;
Wolfgang Betz 67:93bec0baf1de 2242
Wolfgang Betz 67:93bec0baf1de 2243 /* Sets the AFC_0 register */
Wolfgang Betz 67:93bec0baf1de 2244 g_xStatus = SpiritSpiWriteRegisters(AFC0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2245
Wolfgang Betz 67:93bec0baf1de 2246 }
Wolfgang Betz 67:93bec0baf1de 2247
Wolfgang Betz 67:93bec0baf1de 2248
Wolfgang Betz 67:93bec0baf1de 2249 /**
Wolfgang Betz 67:93bec0baf1de 2250 * @brief Returns the AFC loop gain in slow mode.
Wolfgang Betz 67:93bec0baf1de 2251 * @param None.
Wolfgang Betz 67:93bec0baf1de 2252 * @retval uint8_t AFC loop gain in slow mode. This parameter will be in the range:
Wolfgang Betz 67:93bec0baf1de 2253 * [0:15].
Wolfgang Betz 67:93bec0baf1de 2254 */
Wolfgang Betz 67:93bec0baf1de 2255 uint8_t SpiritRadioGetAFCSlowGain(void)
Wolfgang Betz 67:93bec0baf1de 2256 {
Wolfgang Betz 67:93bec0baf1de 2257 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 2258
Wolfgang Betz 67:93bec0baf1de 2259 /* Reads the AFC_0 register, mask the AFC Slow Gain field and return the value */
Wolfgang Betz 67:93bec0baf1de 2260 g_xStatus = SpiritSpiReadRegisters(AFC0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2261
Wolfgang Betz 67:93bec0baf1de 2262 return (tempRegValue & 0x0F);
Wolfgang Betz 67:93bec0baf1de 2263
Wolfgang Betz 67:93bec0baf1de 2264 }
Wolfgang Betz 67:93bec0baf1de 2265
Wolfgang Betz 67:93bec0baf1de 2266
Wolfgang Betz 67:93bec0baf1de 2267 /**
Wolfgang Betz 67:93bec0baf1de 2268 * @brief Returns the AFC correction from the corresponding register.
Wolfgang Betz 67:93bec0baf1de 2269 * @param None.
Wolfgang Betz 67:93bec0baf1de 2270 * @retval int8_t AFC correction, read from the corresponding register.
Wolfgang Betz 67:93bec0baf1de 2271 * This parameter will be in the range [-128:127].
Wolfgang Betz 67:93bec0baf1de 2272 */
Wolfgang Betz 67:93bec0baf1de 2273 int8_t SpiritRadioGetAFCCorrectionReg(void)
Wolfgang Betz 67:93bec0baf1de 2274 {
Wolfgang Betz 67:93bec0baf1de 2275 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 2276
Wolfgang Betz 67:93bec0baf1de 2277 /* Reads the AFC_CORR register, cast the read value as signed char and return it */
Wolfgang Betz 67:93bec0baf1de 2278 g_xStatus = SpiritSpiReadRegisters(AFC_CORR_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2279
Wolfgang Betz 67:93bec0baf1de 2280 return (int8_t)tempRegValue;
Wolfgang Betz 67:93bec0baf1de 2281
Wolfgang Betz 67:93bec0baf1de 2282 }
Wolfgang Betz 67:93bec0baf1de 2283
Wolfgang Betz 67:93bec0baf1de 2284
Wolfgang Betz 67:93bec0baf1de 2285 /**
Wolfgang Betz 67:93bec0baf1de 2286 * @brief Returns the AFC correction expressed in Hz.
Wolfgang Betz 67:93bec0baf1de 2287 * @param None.
Wolfgang Betz 67:93bec0baf1de 2288 * @retval int32_t AFC correction expressed in Hz
Wolfgang Betz 67:93bec0baf1de 2289 * according to the following formula:<ul>
Wolfgang Betz 67:93bec0baf1de 2290 * <li> Fafc[Hz]= (Fdig/(12*2^10))*AFC_CORR where </li>
Wolfgang Betz 67:93bec0baf1de 2291 * <li> AFC_CORR is the value read in the AFC_CORR register </li> </ul>
Wolfgang Betz 67:93bec0baf1de 2292 */
Wolfgang Betz 67:93bec0baf1de 2293 int32_t SpiritRadioGetAFCCorrectionHz(void)
Wolfgang Betz 67:93bec0baf1de 2294 {
Wolfgang Betz 67:93bec0baf1de 2295 int8_t correction;
Wolfgang Betz 67:93bec0baf1de 2296 uint32_t xtal = s_lXtalFrequency;
Wolfgang Betz 67:93bec0baf1de 2297
Wolfgang Betz 67:93bec0baf1de 2298 /* Reads the AFC correction register */
Wolfgang Betz 67:93bec0baf1de 2299 correction = SpiritRadioGetAFCCorrectionReg();
Wolfgang Betz 67:93bec0baf1de 2300
Wolfgang Betz 67:93bec0baf1de 2301 if(xtal>DOUBLE_XTAL_THR)
Wolfgang Betz 67:93bec0baf1de 2302 {
Wolfgang Betz 67:93bec0baf1de 2303 xtal /= 2;
Wolfgang Betz 67:93bec0baf1de 2304 }
Wolfgang Betz 67:93bec0baf1de 2305
Wolfgang Betz 67:93bec0baf1de 2306 /* Calculates and return the Frequency Correction */
Wolfgang Betz 67:93bec0baf1de 2307 return (int32_t)(xtal/(12*pow(2,10))*correction);
Wolfgang Betz 67:93bec0baf1de 2308
Wolfgang Betz 67:93bec0baf1de 2309 }
Wolfgang Betz 67:93bec0baf1de 2310
Wolfgang Betz 67:93bec0baf1de 2311
Wolfgang Betz 67:93bec0baf1de 2312 /**
Wolfgang Betz 67:93bec0baf1de 2313 * @brief Enables or Disables the AGC.
Wolfgang Betz 67:93bec0baf1de 2314 * @param xNewState new state for AGC.
Wolfgang Betz 67:93bec0baf1de 2315 * This parameter can be: S_ENABLE or S_DISABLE
Wolfgang Betz 67:93bec0baf1de 2316 * @retval None.
Wolfgang Betz 67:93bec0baf1de 2317 */
Wolfgang Betz 67:93bec0baf1de 2318 void SpiritRadioAGC(SpiritFunctionalState xNewState)
Wolfgang Betz 67:93bec0baf1de 2319 {
Wolfgang Betz 67:93bec0baf1de 2320 uint8_t tempRegValue = 0x00;
Wolfgang Betz 67:93bec0baf1de 2321
Wolfgang Betz 67:93bec0baf1de 2322 /* Check the parameters */
Wolfgang Betz 67:93bec0baf1de 2323 s_assert_param(IS_SPIRIT_FUNCTIONAL_STATE(xNewState));
Wolfgang Betz 67:93bec0baf1de 2324
Wolfgang Betz 67:93bec0baf1de 2325 /* Reads the AGCCTRL_0 register and configure the AGC Enabled field */
Wolfgang Betz 67:93bec0baf1de 2326 SpiritSpiReadRegisters(AGCCTRL0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2327 if(xNewState == S_ENABLE)
Wolfgang Betz 67:93bec0baf1de 2328 {
Wolfgang Betz 67:93bec0baf1de 2329 tempRegValue |= AGCCTRL0_AGC_MASK;
Wolfgang Betz 67:93bec0baf1de 2330 }
Wolfgang Betz 67:93bec0baf1de 2331 else
Wolfgang Betz 67:93bec0baf1de 2332 {
Wolfgang Betz 67:93bec0baf1de 2333 tempRegValue &= (~AGCCTRL0_AGC_MASK);
Wolfgang Betz 67:93bec0baf1de 2334 }
Wolfgang Betz 67:93bec0baf1de 2335
Wolfgang Betz 67:93bec0baf1de 2336 /* Sets the AGCCTRL_0 register */
Wolfgang Betz 67:93bec0baf1de 2337 g_xStatus = SpiritSpiWriteRegisters(AGCCTRL0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2338
Wolfgang Betz 67:93bec0baf1de 2339 }
Wolfgang Betz 67:93bec0baf1de 2340
Wolfgang Betz 67:93bec0baf1de 2341
Wolfgang Betz 67:93bec0baf1de 2342 /**
Wolfgang Betz 67:93bec0baf1de 2343 * @brief Sets the AGC working mode.
Wolfgang Betz 67:93bec0baf1de 2344 * @param xMode the AGC mode. This parameter can be one of the values defined in @ref AGCMode :
Wolfgang Betz 67:93bec0baf1de 2345 * @arg AGC_LINEAR_MODE AGC works in linear mode
Wolfgang Betz 67:93bec0baf1de 2346 * @arg AGC_BINARY_MODE AGC works in binary mode
Wolfgang Betz 67:93bec0baf1de 2347 * @retval None.
Wolfgang Betz 67:93bec0baf1de 2348 */
Wolfgang Betz 67:93bec0baf1de 2349 void SpiritRadioSetAGCMode(AGCMode xMode)
Wolfgang Betz 67:93bec0baf1de 2350 {
Wolfgang Betz 67:93bec0baf1de 2351 uint8_t tempRegValue = 0x00;
Wolfgang Betz 67:93bec0baf1de 2352
Wolfgang Betz 67:93bec0baf1de 2353 /* Check the parameters */
Wolfgang Betz 67:93bec0baf1de 2354 s_assert_param(IS_AGC_MODE(xMode));
Wolfgang Betz 67:93bec0baf1de 2355
Wolfgang Betz 67:93bec0baf1de 2356 /* Reads the AGCCTRL_0 register and configure the AGC Mode field */
Wolfgang Betz 67:93bec0baf1de 2357 SpiritSpiReadRegisters(AGCCTRL0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2358 if(xMode == AGC_BINARY_MODE)
Wolfgang Betz 67:93bec0baf1de 2359 {
Wolfgang Betz 67:93bec0baf1de 2360 tempRegValue |= AGC_BINARY_MODE;
Wolfgang Betz 67:93bec0baf1de 2361 }
Wolfgang Betz 67:93bec0baf1de 2362 else
Wolfgang Betz 67:93bec0baf1de 2363 {
Wolfgang Betz 67:93bec0baf1de 2364 tempRegValue &= (~AGC_BINARY_MODE);
Wolfgang Betz 67:93bec0baf1de 2365 }
Wolfgang Betz 67:93bec0baf1de 2366
Wolfgang Betz 67:93bec0baf1de 2367 /* Sets the AGCCTRL_0 register */
Wolfgang Betz 67:93bec0baf1de 2368 g_xStatus = SpiritSpiWriteRegisters(AGCCTRL0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2369
Wolfgang Betz 67:93bec0baf1de 2370 }
Wolfgang Betz 67:93bec0baf1de 2371
Wolfgang Betz 67:93bec0baf1de 2372
Wolfgang Betz 67:93bec0baf1de 2373 /**
Wolfgang Betz 67:93bec0baf1de 2374 * @brief Returns the AGC working mode.
Wolfgang Betz 67:93bec0baf1de 2375 * @param None.
Wolfgang Betz 67:93bec0baf1de 2376 * @retval AGCMode Settled AGC mode. This parameter can be one of the values defined in @ref AGCMode :
Wolfgang Betz 67:93bec0baf1de 2377 * @arg AGC_LINEAR_MODE AGC works in linear mode
Wolfgang Betz 67:93bec0baf1de 2378 * @arg AGC_BINARY_MODE AGC works in binary mode
Wolfgang Betz 67:93bec0baf1de 2379 */
Wolfgang Betz 67:93bec0baf1de 2380 AGCMode SpiritRadioGetAGCMode(void)
Wolfgang Betz 67:93bec0baf1de 2381 {
Wolfgang Betz 67:93bec0baf1de 2382 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 2383
Wolfgang Betz 67:93bec0baf1de 2384 /* Reads the AGCCTRL_0 register, mask the AGC Mode field and return the value */
Wolfgang Betz 67:93bec0baf1de 2385 g_xStatus = SpiritSpiReadRegisters(AGCCTRL0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2386
Wolfgang Betz 67:93bec0baf1de 2387 return (AGCMode)(tempRegValue & 0x40);
Wolfgang Betz 67:93bec0baf1de 2388
Wolfgang Betz 67:93bec0baf1de 2389 }
Wolfgang Betz 67:93bec0baf1de 2390
Wolfgang Betz 67:93bec0baf1de 2391
Wolfgang Betz 67:93bec0baf1de 2392 /**
Wolfgang Betz 67:93bec0baf1de 2393 * @brief Enables or Disables the AGC freeze on steady state.
Wolfgang Betz 67:93bec0baf1de 2394 * @param xNewState new state for AGC freeze on steady state.
Wolfgang Betz 67:93bec0baf1de 2395 * This parameter can be: S_ENABLE or S_DISABLE.
Wolfgang Betz 67:93bec0baf1de 2396 * @retval None.
Wolfgang Betz 67:93bec0baf1de 2397 */
Wolfgang Betz 67:93bec0baf1de 2398 void SpiritRadioAGCFreezeOnSteady(SpiritFunctionalState xNewState)
Wolfgang Betz 67:93bec0baf1de 2399 {
Wolfgang Betz 67:93bec0baf1de 2400 uint8_t tempRegValue = 0x00;
Wolfgang Betz 67:93bec0baf1de 2401
Wolfgang Betz 67:93bec0baf1de 2402 /* Check the parameters */
Wolfgang Betz 67:93bec0baf1de 2403 s_assert_param(IS_SPIRIT_FUNCTIONAL_STATE(xNewState));
Wolfgang Betz 67:93bec0baf1de 2404
Wolfgang Betz 67:93bec0baf1de 2405 /* Reads the AGCCTRL_2 register and configure the AGC Freeze On Steady field */
Wolfgang Betz 67:93bec0baf1de 2406 SpiritSpiReadRegisters(AGCCTRL2_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2407 if(xNewState == S_ENABLE)
Wolfgang Betz 67:93bec0baf1de 2408 {
Wolfgang Betz 67:93bec0baf1de 2409 tempRegValue |= AGCCTRL2_FREEZE_ON_STEADY_MASK;
Wolfgang Betz 67:93bec0baf1de 2410 }
Wolfgang Betz 67:93bec0baf1de 2411 else
Wolfgang Betz 67:93bec0baf1de 2412 {
Wolfgang Betz 67:93bec0baf1de 2413 tempRegValue &= (~AGCCTRL2_FREEZE_ON_STEADY_MASK);
Wolfgang Betz 67:93bec0baf1de 2414 }
Wolfgang Betz 67:93bec0baf1de 2415
Wolfgang Betz 67:93bec0baf1de 2416 /* Sets the AGCCTRL_2 register */
Wolfgang Betz 67:93bec0baf1de 2417 g_xStatus = SpiritSpiWriteRegisters(AGCCTRL2_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2418
Wolfgang Betz 67:93bec0baf1de 2419 }
Wolfgang Betz 67:93bec0baf1de 2420
Wolfgang Betz 67:93bec0baf1de 2421
Wolfgang Betz 67:93bec0baf1de 2422 /**
Wolfgang Betz 67:93bec0baf1de 2423 * @brief Enable or Disable the AGC freeze on sync detection.
Wolfgang Betz 67:93bec0baf1de 2424 * @param xNewState new state for AGC freeze on sync detection.
Wolfgang Betz 67:93bec0baf1de 2425 * This parameter can be: S_ENABLE or S_DISABLE.
Wolfgang Betz 67:93bec0baf1de 2426 * @retval None.
Wolfgang Betz 67:93bec0baf1de 2427 */
Wolfgang Betz 67:93bec0baf1de 2428 void SpiritRadioAGCFreezeOnSync(SpiritFunctionalState xNewState)
Wolfgang Betz 67:93bec0baf1de 2429 {
Wolfgang Betz 67:93bec0baf1de 2430 uint8_t tempRegValue = 0x00;
Wolfgang Betz 67:93bec0baf1de 2431
Wolfgang Betz 67:93bec0baf1de 2432 /* Check the parameters */
Wolfgang Betz 67:93bec0baf1de 2433 s_assert_param(IS_SPIRIT_FUNCTIONAL_STATE(xNewState));
Wolfgang Betz 67:93bec0baf1de 2434
Wolfgang Betz 67:93bec0baf1de 2435 /* Reads the AGCCTRL_2 register and configure the AGC Freeze On Sync field */
Wolfgang Betz 67:93bec0baf1de 2436 SpiritSpiReadRegisters(AGCCTRL2_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2437 if(xNewState == S_ENABLE)
Wolfgang Betz 67:93bec0baf1de 2438 {
Wolfgang Betz 67:93bec0baf1de 2439 tempRegValue |= AGCCTRL2_FREEZE_ON_SYNC_MASK;
Wolfgang Betz 67:93bec0baf1de 2440 }
Wolfgang Betz 67:93bec0baf1de 2441 else
Wolfgang Betz 67:93bec0baf1de 2442 {
Wolfgang Betz 67:93bec0baf1de 2443 tempRegValue &= (~AGCCTRL2_FREEZE_ON_SYNC_MASK);
Wolfgang Betz 67:93bec0baf1de 2444 }
Wolfgang Betz 67:93bec0baf1de 2445
Wolfgang Betz 67:93bec0baf1de 2446 /* Sets the AGCCTRL_2 register */
Wolfgang Betz 67:93bec0baf1de 2447 g_xStatus = SpiritSpiWriteRegisters(AGCCTRL2_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2448
Wolfgang Betz 67:93bec0baf1de 2449 }
Wolfgang Betz 67:93bec0baf1de 2450
Wolfgang Betz 67:93bec0baf1de 2451
Wolfgang Betz 67:93bec0baf1de 2452 /**
Wolfgang Betz 67:93bec0baf1de 2453 * @brief Enable or Disable the AGC to start with max attenuation.
Wolfgang Betz 67:93bec0baf1de 2454 * @param xNewState new state for AGC start with max attenuation mode.
Wolfgang Betz 67:93bec0baf1de 2455 * This parameter can be: S_ENABLE or S_DISABLE.
Wolfgang Betz 67:93bec0baf1de 2456 * @retval None.
Wolfgang Betz 67:93bec0baf1de 2457 */
Wolfgang Betz 67:93bec0baf1de 2458 void SpiritRadioAGCStartMaxAttenuation(SpiritFunctionalState xNewState)
Wolfgang Betz 67:93bec0baf1de 2459 {
Wolfgang Betz 67:93bec0baf1de 2460 uint8_t tempRegValue = 0x00;
Wolfgang Betz 67:93bec0baf1de 2461
Wolfgang Betz 67:93bec0baf1de 2462 /* Check the parameters */
Wolfgang Betz 67:93bec0baf1de 2463 s_assert_param(IS_SPIRIT_FUNCTIONAL_STATE(xNewState));
Wolfgang Betz 67:93bec0baf1de 2464
Wolfgang Betz 67:93bec0baf1de 2465 /* Reads the AGCCTRL_2 register and configure the AGC Start Max Attenuation field */
Wolfgang Betz 67:93bec0baf1de 2466 SpiritSpiReadRegisters(AGCCTRL2_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2467 if(xNewState == S_ENABLE)
Wolfgang Betz 67:93bec0baf1de 2468 {
Wolfgang Betz 67:93bec0baf1de 2469 tempRegValue |= AGCCTRL2_START_MAX_ATTENUATION_MASK;
Wolfgang Betz 67:93bec0baf1de 2470 }
Wolfgang Betz 67:93bec0baf1de 2471 else
Wolfgang Betz 67:93bec0baf1de 2472 {
Wolfgang Betz 67:93bec0baf1de 2473 tempRegValue &= (~AGCCTRL2_START_MAX_ATTENUATION_MASK);
Wolfgang Betz 67:93bec0baf1de 2474 }
Wolfgang Betz 67:93bec0baf1de 2475
Wolfgang Betz 67:93bec0baf1de 2476 /* Sets the AGCCTRL_2 register */
Wolfgang Betz 67:93bec0baf1de 2477 g_xStatus = SpiritSpiWriteRegisters(AGCCTRL2_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2478
Wolfgang Betz 67:93bec0baf1de 2479 }
Wolfgang Betz 67:93bec0baf1de 2480
Wolfgang Betz 67:93bec0baf1de 2481
Wolfgang Betz 67:93bec0baf1de 2482 /**
Wolfgang Betz 67:93bec0baf1de 2483 * @brief Sets the AGC measure time.
Wolfgang Betz 67:93bec0baf1de 2484 * @param nTime AGC measure time expressed in us. This parameter shall be in the range [0, 393216/F_Xo].
Wolfgang Betz 67:93bec0baf1de 2485 * @retval None.
Wolfgang Betz 67:93bec0baf1de 2486 */
Wolfgang Betz 67:93bec0baf1de 2487 void SpiritRadioSetAGCMeasureTimeUs(uint16_t nTime)
Wolfgang Betz 67:93bec0baf1de 2488 {
Wolfgang Betz 67:93bec0baf1de 2489 uint8_t tempRegValue, measure;
Wolfgang Betz 67:93bec0baf1de 2490
Wolfgang Betz 67:93bec0baf1de 2491 /* Check the parameter */
Wolfgang Betz 67:93bec0baf1de 2492 s_assert_param(IS_AGC_MEASURE_TIME_US(nTime,s_lXtalFrequency));
Wolfgang Betz 67:93bec0baf1de 2493
Wolfgang Betz 67:93bec0baf1de 2494 /* Reads the AGCCTRL_2 register */
Wolfgang Betz 67:93bec0baf1de 2495 SpiritSpiReadRegisters(AGCCTRL2_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2496
Wolfgang Betz 67:93bec0baf1de 2497 /* Calculates the measure time value to write in the register */
Wolfgang Betz 67:93bec0baf1de 2498 measure = (uint8_t)lroundf(log2((float)nTime/1e6 * s_lXtalFrequency/12));
Wolfgang Betz 67:93bec0baf1de 2499 (measure>15) ? (measure=15):(measure);
Wolfgang Betz 67:93bec0baf1de 2500
Wolfgang Betz 67:93bec0baf1de 2501 /* Mask the MEAS_TIME field and write the new value */
Wolfgang Betz 67:93bec0baf1de 2502 tempRegValue &= 0xF0;
Wolfgang Betz 67:93bec0baf1de 2503 tempRegValue |= measure;
Wolfgang Betz 67:93bec0baf1de 2504
Wolfgang Betz 67:93bec0baf1de 2505 /* Sets the AGCCTRL_2 register */
Wolfgang Betz 67:93bec0baf1de 2506 g_xStatus = SpiritSpiWriteRegisters(AGCCTRL2_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2507
Wolfgang Betz 67:93bec0baf1de 2508 }
Wolfgang Betz 67:93bec0baf1de 2509
Wolfgang Betz 67:93bec0baf1de 2510
Wolfgang Betz 67:93bec0baf1de 2511 /**
Wolfgang Betz 67:93bec0baf1de 2512 * @brief Returns the AGC measure time.
Wolfgang Betz 67:93bec0baf1de 2513 * @param None.
Wolfgang Betz 67:93bec0baf1de 2514 * @retval uint16_t AGC measure time expressed in us. This parameter will be in the range [0, 393216/F_Xo].
Wolfgang Betz 67:93bec0baf1de 2515 */
Wolfgang Betz 67:93bec0baf1de 2516 uint16_t SpiritRadioGetAGCMeasureTimeUs(void)
Wolfgang Betz 67:93bec0baf1de 2517 {
Wolfgang Betz 67:93bec0baf1de 2518 uint8_t measure;
Wolfgang Betz 67:93bec0baf1de 2519
Wolfgang Betz 67:93bec0baf1de 2520 /* Reads the AGCCTRL_2 register */
Wolfgang Betz 67:93bec0baf1de 2521 g_xStatus = SpiritSpiReadRegisters(AGCCTRL2_BASE, 1, &measure);
Wolfgang Betz 67:93bec0baf1de 2522
Wolfgang Betz 67:93bec0baf1de 2523 /* Mask the MEAS_TIME field */
Wolfgang Betz 67:93bec0baf1de 2524 measure &= 0x0F;
Wolfgang Betz 67:93bec0baf1de 2525
Wolfgang Betz 67:93bec0baf1de 2526 /* Calculates the measure time value to write in the register */
Wolfgang Betz 67:93bec0baf1de 2527 return (uint16_t)((12.0/s_lXtalFrequency)*(float)pow(2,measure)*1e6);
Wolfgang Betz 67:93bec0baf1de 2528
Wolfgang Betz 67:93bec0baf1de 2529 }
Wolfgang Betz 67:93bec0baf1de 2530
Wolfgang Betz 67:93bec0baf1de 2531
Wolfgang Betz 67:93bec0baf1de 2532 /**
Wolfgang Betz 67:93bec0baf1de 2533 * @brief Sets the AGC measure time.
Wolfgang Betz 67:93bec0baf1de 2534 * @param cTime AGC measure time to write in the MEAS_TIME field of AGCCTRL_2 register.
Wolfgang Betz 67:93bec0baf1de 2535 * This parameter shall be in the range [0:15].
Wolfgang Betz 67:93bec0baf1de 2536 * @retval None.
Wolfgang Betz 67:93bec0baf1de 2537 */
Wolfgang Betz 67:93bec0baf1de 2538 void SpiritRadioSetAGCMeasureTime(uint8_t cTime)
Wolfgang Betz 67:93bec0baf1de 2539 {
Wolfgang Betz 67:93bec0baf1de 2540 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 2541
Wolfgang Betz 67:93bec0baf1de 2542 /* Check the parameter */
Wolfgang Betz 67:93bec0baf1de 2543 s_assert_param(IS_AGC_MEASURE_TIME(cTime));
Wolfgang Betz 67:93bec0baf1de 2544
Wolfgang Betz 67:93bec0baf1de 2545 /* Reads the AGCCTRL_2 register */
Wolfgang Betz 67:93bec0baf1de 2546 SpiritSpiReadRegisters(AGCCTRL2_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2547
Wolfgang Betz 67:93bec0baf1de 2548 /* Mask the MEAS_TIME field and write the new value */
Wolfgang Betz 67:93bec0baf1de 2549 tempRegValue &= 0xF0;
Wolfgang Betz 67:93bec0baf1de 2550 tempRegValue |= cTime;
Wolfgang Betz 67:93bec0baf1de 2551
Wolfgang Betz 67:93bec0baf1de 2552 /* Sets the AGCCTRL_2 register */
Wolfgang Betz 67:93bec0baf1de 2553 g_xStatus = SpiritSpiWriteRegisters(AGCCTRL2_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2554
Wolfgang Betz 67:93bec0baf1de 2555 }
Wolfgang Betz 67:93bec0baf1de 2556
Wolfgang Betz 67:93bec0baf1de 2557
Wolfgang Betz 67:93bec0baf1de 2558 /**
Wolfgang Betz 67:93bec0baf1de 2559 * @brief Returns the AGC measure time.
Wolfgang Betz 67:93bec0baf1de 2560 * @param None.
Wolfgang Betz 67:93bec0baf1de 2561 * @retval uint8_t AGC measure time read from the MEAS_TIME field of AGCCTRL_2 register.
Wolfgang Betz 67:93bec0baf1de 2562 * This parameter will be in the range [0:15].
Wolfgang Betz 67:93bec0baf1de 2563 */
Wolfgang Betz 67:93bec0baf1de 2564 uint8_t SpiritRadioGetAGCMeasureTime(void)
Wolfgang Betz 67:93bec0baf1de 2565 {
Wolfgang Betz 67:93bec0baf1de 2566 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 2567
Wolfgang Betz 67:93bec0baf1de 2568 /* Reads the AGCCTRL_2 register, mask the MEAS_TIME field and return the value */
Wolfgang Betz 67:93bec0baf1de 2569 g_xStatus = SpiritSpiReadRegisters(AGCCTRL2_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2570
Wolfgang Betz 67:93bec0baf1de 2571 return (tempRegValue & 0x0F);
Wolfgang Betz 67:93bec0baf1de 2572
Wolfgang Betz 67:93bec0baf1de 2573 }
Wolfgang Betz 67:93bec0baf1de 2574
Wolfgang Betz 67:93bec0baf1de 2575
Wolfgang Betz 67:93bec0baf1de 2576 /**
Wolfgang Betz 67:93bec0baf1de 2577 * @brief Sets the AGC hold time.
Wolfgang Betz 67:93bec0baf1de 2578 * @param cTime AGC hold time expressed in us. This parameter shall be in the range[0, 756/F_Xo].
Wolfgang Betz 67:93bec0baf1de 2579 * @retval None.
Wolfgang Betz 67:93bec0baf1de 2580 */
Wolfgang Betz 67:93bec0baf1de 2581 void SpiritRadioSetAGCHoldTimeUs(uint8_t cTime)
Wolfgang Betz 67:93bec0baf1de 2582 {
Wolfgang Betz 67:93bec0baf1de 2583 uint8_t tempRegValue, hold;
Wolfgang Betz 67:93bec0baf1de 2584
Wolfgang Betz 67:93bec0baf1de 2585 /* Check the parameter */
Wolfgang Betz 67:93bec0baf1de 2586 s_assert_param(IS_AGC_HOLD_TIME_US(cTime,s_lXtalFrequency));
Wolfgang Betz 67:93bec0baf1de 2587
Wolfgang Betz 67:93bec0baf1de 2588 /* Reads the AGCCTRL_0 register */
Wolfgang Betz 67:93bec0baf1de 2589 SpiritSpiReadRegisters(AGCCTRL0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2590
Wolfgang Betz 67:93bec0baf1de 2591 /* Calculates the hold time value to write in the register */
Wolfgang Betz 67:93bec0baf1de 2592 hold = (uint8_t)lroundf(((float)cTime/1e6 * s_lXtalFrequency)/12);
Wolfgang Betz 67:93bec0baf1de 2593 (hold>63) ? (hold=63):(hold);
Wolfgang Betz 67:93bec0baf1de 2594
Wolfgang Betz 67:93bec0baf1de 2595 /* Mask the HOLD_TIME field and write the new value */
Wolfgang Betz 67:93bec0baf1de 2596 tempRegValue &= 0xC0;
Wolfgang Betz 67:93bec0baf1de 2597 tempRegValue |= hold;
Wolfgang Betz 67:93bec0baf1de 2598
Wolfgang Betz 67:93bec0baf1de 2599 /* Sets the AGCCTRL_0 register */
Wolfgang Betz 67:93bec0baf1de 2600 g_xStatus = SpiritSpiWriteRegisters(AGCCTRL0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2601
Wolfgang Betz 67:93bec0baf1de 2602 }
Wolfgang Betz 67:93bec0baf1de 2603
Wolfgang Betz 67:93bec0baf1de 2604
Wolfgang Betz 67:93bec0baf1de 2605 /**
Wolfgang Betz 67:93bec0baf1de 2606 * @brief Returns the AGC hold time.
Wolfgang Betz 67:93bec0baf1de 2607 * @param None.
Wolfgang Betz 67:93bec0baf1de 2608 * @retval uint8_t AGC hold time expressed in us. This parameter will be in the range:
Wolfgang Betz 67:93bec0baf1de 2609 * [0, 756/F_Xo].
Wolfgang Betz 67:93bec0baf1de 2610 */
Wolfgang Betz 67:93bec0baf1de 2611 uint8_t SpiritRadioGetAGCHoldTimeUs(void)
Wolfgang Betz 67:93bec0baf1de 2612 {
Wolfgang Betz 67:93bec0baf1de 2613 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 2614
Wolfgang Betz 67:93bec0baf1de 2615 /* Reads the AGCCTRL_0 register */
Wolfgang Betz 67:93bec0baf1de 2616 g_xStatus = SpiritSpiReadRegisters(AGCCTRL0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2617
Wolfgang Betz 67:93bec0baf1de 2618 /* Mask the HOLD_TIME field */
Wolfgang Betz 67:93bec0baf1de 2619 tempRegValue &= 0x3F;
Wolfgang Betz 67:93bec0baf1de 2620
Wolfgang Betz 67:93bec0baf1de 2621 /* Calculates the hold time value and return it */
Wolfgang Betz 67:93bec0baf1de 2622 return (uint8_t)lroundf ((12.0/s_lXtalFrequency)*(tempRegValue*1e6));
Wolfgang Betz 67:93bec0baf1de 2623
Wolfgang Betz 67:93bec0baf1de 2624 }
Wolfgang Betz 67:93bec0baf1de 2625
Wolfgang Betz 67:93bec0baf1de 2626
Wolfgang Betz 67:93bec0baf1de 2627 /**
Wolfgang Betz 67:93bec0baf1de 2628 * @brief Sets the AGC hold time.
Wolfgang Betz 67:93bec0baf1de 2629 * @param cTime AGC hold time to write in the HOLD_TIME field of AGCCTRL_0 register.
Wolfgang Betz 67:93bec0baf1de 2630 * This parameter shall be in the range [0:63].
Wolfgang Betz 67:93bec0baf1de 2631 * @retval None.
Wolfgang Betz 67:93bec0baf1de 2632 */
Wolfgang Betz 67:93bec0baf1de 2633 void SpiritRadioSetAGCHoldTime(uint8_t cTime)
Wolfgang Betz 67:93bec0baf1de 2634 {
Wolfgang Betz 67:93bec0baf1de 2635 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 2636
Wolfgang Betz 67:93bec0baf1de 2637 /* Check the parameter */
Wolfgang Betz 67:93bec0baf1de 2638 s_assert_param(IS_AGC_HOLD_TIME(cTime));
Wolfgang Betz 67:93bec0baf1de 2639
Wolfgang Betz 67:93bec0baf1de 2640 /* Reads the AGCCTRL_0 register */
Wolfgang Betz 67:93bec0baf1de 2641 SpiritSpiReadRegisters(AGCCTRL0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2642
Wolfgang Betz 67:93bec0baf1de 2643 /* Mask the HOLD_TIME field and write the new value */
Wolfgang Betz 67:93bec0baf1de 2644 tempRegValue &= 0xC0;
Wolfgang Betz 67:93bec0baf1de 2645 tempRegValue |= cTime;
Wolfgang Betz 67:93bec0baf1de 2646
Wolfgang Betz 67:93bec0baf1de 2647 /* Sets the AGCCTRL_0 register */
Wolfgang Betz 67:93bec0baf1de 2648 g_xStatus = SpiritSpiWriteRegisters(AGCCTRL0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2649
Wolfgang Betz 67:93bec0baf1de 2650 }
Wolfgang Betz 67:93bec0baf1de 2651
Wolfgang Betz 67:93bec0baf1de 2652
Wolfgang Betz 67:93bec0baf1de 2653 /**
Wolfgang Betz 67:93bec0baf1de 2654 * @brief Returns the AGC hold time.
Wolfgang Betz 67:93bec0baf1de 2655 * @param None.
Wolfgang Betz 67:93bec0baf1de 2656 * @retval uint8_t AGC hold time read from the HOLD_TIME field of AGCCTRL_0 register.
Wolfgang Betz 67:93bec0baf1de 2657 * This parameter will be in the range [0:63].
Wolfgang Betz 67:93bec0baf1de 2658 */
Wolfgang Betz 67:93bec0baf1de 2659 uint8_t SpiritRadioGetAGCHoldTime(void)
Wolfgang Betz 67:93bec0baf1de 2660 {
Wolfgang Betz 67:93bec0baf1de 2661 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 2662
Wolfgang Betz 67:93bec0baf1de 2663 /* Reads the AGCCTRL_0 register, mask the MEAS_TIME field and return the value */
Wolfgang Betz 67:93bec0baf1de 2664 g_xStatus = SpiritSpiReadRegisters(AGCCTRL0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2665
Wolfgang Betz 67:93bec0baf1de 2666 return (tempRegValue & 0x3F);
Wolfgang Betz 67:93bec0baf1de 2667
Wolfgang Betz 67:93bec0baf1de 2668 }
Wolfgang Betz 67:93bec0baf1de 2669
Wolfgang Betz 67:93bec0baf1de 2670
Wolfgang Betz 67:93bec0baf1de 2671 /**
Wolfgang Betz 67:93bec0baf1de 2672 * @brief Sets the AGC high threshold.
Wolfgang Betz 67:93bec0baf1de 2673 * @param cHighThreshold AGC high threshold to write in the THRESHOLD_HIGH field of AGCCTRL_1 register.
Wolfgang Betz 67:93bec0baf1de 2674 * This parameter shall be in the range [0:15].
Wolfgang Betz 67:93bec0baf1de 2675 * @retval None.
Wolfgang Betz 67:93bec0baf1de 2676 */
Wolfgang Betz 67:93bec0baf1de 2677 void SpiritRadioSetAGCHighThreshold(uint8_t cHighThreshold)
Wolfgang Betz 67:93bec0baf1de 2678 {
Wolfgang Betz 67:93bec0baf1de 2679 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 2680
Wolfgang Betz 67:93bec0baf1de 2681 /* Check the parameter */
Wolfgang Betz 67:93bec0baf1de 2682 s_assert_param(IS_AGC_THRESHOLD(cHighThreshold));
Wolfgang Betz 67:93bec0baf1de 2683
Wolfgang Betz 67:93bec0baf1de 2684 /* Reads the AGCCTRL_1 register */
Wolfgang Betz 67:93bec0baf1de 2685 SpiritSpiReadRegisters(AGCCTRL1_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2686
Wolfgang Betz 67:93bec0baf1de 2687 /* Mask the THRESHOLD_HIGH field and write the new value */
Wolfgang Betz 67:93bec0baf1de 2688 tempRegValue &= 0x0F;
Wolfgang Betz 67:93bec0baf1de 2689 tempRegValue |= cHighThreshold<<4;
Wolfgang Betz 67:93bec0baf1de 2690
Wolfgang Betz 67:93bec0baf1de 2691 /* Sets the AGCCTRL_1 register */
Wolfgang Betz 67:93bec0baf1de 2692 g_xStatus = SpiritSpiWriteRegisters(AGCCTRL1_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2693
Wolfgang Betz 67:93bec0baf1de 2694 }
Wolfgang Betz 67:93bec0baf1de 2695
Wolfgang Betz 67:93bec0baf1de 2696
Wolfgang Betz 67:93bec0baf1de 2697 /**
Wolfgang Betz 67:93bec0baf1de 2698 * @brief Returns the AGC high threshold.
Wolfgang Betz 67:93bec0baf1de 2699 * @param None.
Wolfgang Betz 67:93bec0baf1de 2700 * @retval uint8_t AGC high threshold read from the THRESHOLD_HIGH field of AGCCTRL_1 register.
Wolfgang Betz 67:93bec0baf1de 2701 * This parameter will be in the range [0:15].
Wolfgang Betz 67:93bec0baf1de 2702 */
Wolfgang Betz 67:93bec0baf1de 2703 uint8_t SpiritRadioGetAGCHighThreshold(void)
Wolfgang Betz 67:93bec0baf1de 2704 {
Wolfgang Betz 67:93bec0baf1de 2705 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 2706
Wolfgang Betz 67:93bec0baf1de 2707 /* Reads the AGCCTRL_1 register, mask the THRESHOLD_HIGH field and return the value */
Wolfgang Betz 67:93bec0baf1de 2708 g_xStatus = SpiritSpiReadRegisters(AGCCTRL1_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2709
Wolfgang Betz 67:93bec0baf1de 2710 return ((tempRegValue & 0xF0)>>4);
Wolfgang Betz 67:93bec0baf1de 2711
Wolfgang Betz 67:93bec0baf1de 2712 }
Wolfgang Betz 67:93bec0baf1de 2713
Wolfgang Betz 67:93bec0baf1de 2714
Wolfgang Betz 67:93bec0baf1de 2715 /**
Wolfgang Betz 67:93bec0baf1de 2716 * @brief Sets the AGC low threshold.
Wolfgang Betz 67:93bec0baf1de 2717 * @param cLowThreshold AGC low threshold to write in the THRESHOLD_LOW field of AGCCTRL_1 register.
Wolfgang Betz 67:93bec0baf1de 2718 * This parameter shall be in the range [0:15].
Wolfgang Betz 67:93bec0baf1de 2719 * @retval None.
Wolfgang Betz 67:93bec0baf1de 2720 */
Wolfgang Betz 67:93bec0baf1de 2721 void SpiritRadioSetAGCLowThreshold(uint8_t cLowThreshold)
Wolfgang Betz 67:93bec0baf1de 2722 {
Wolfgang Betz 67:93bec0baf1de 2723 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 2724
Wolfgang Betz 67:93bec0baf1de 2725 /* Check the parameter */
Wolfgang Betz 67:93bec0baf1de 2726 s_assert_param(IS_AGC_THRESHOLD(cLowThreshold));
Wolfgang Betz 67:93bec0baf1de 2727
Wolfgang Betz 67:93bec0baf1de 2728 /* Reads the AGCCTRL_1 register */
Wolfgang Betz 67:93bec0baf1de 2729 SpiritSpiReadRegisters(AGCCTRL1_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2730
Wolfgang Betz 67:93bec0baf1de 2731 /* Mask the THRESHOLD_LOW field and write the new value */
Wolfgang Betz 67:93bec0baf1de 2732 tempRegValue &= 0xF0;
Wolfgang Betz 67:93bec0baf1de 2733 tempRegValue |= cLowThreshold;
Wolfgang Betz 67:93bec0baf1de 2734
Wolfgang Betz 67:93bec0baf1de 2735 /* Sets the AGCCTRL_1 register */
Wolfgang Betz 67:93bec0baf1de 2736 g_xStatus = SpiritSpiWriteRegisters(AGCCTRL1_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2737
Wolfgang Betz 67:93bec0baf1de 2738 }
Wolfgang Betz 67:93bec0baf1de 2739
Wolfgang Betz 67:93bec0baf1de 2740
Wolfgang Betz 67:93bec0baf1de 2741 /**
Wolfgang Betz 67:93bec0baf1de 2742 * @brief Returns the AGC low threshold.
Wolfgang Betz 67:93bec0baf1de 2743 * @param None.
Wolfgang Betz 67:93bec0baf1de 2744 * @retval uint8_t AGC low threshold read from the THRESHOLD_LOW field of AGCCTRL_1 register.
Wolfgang Betz 67:93bec0baf1de 2745 * This parameter will be in the range [0:15].
Wolfgang Betz 67:93bec0baf1de 2746 */
Wolfgang Betz 67:93bec0baf1de 2747 uint8_t SpiritRadioGetAGCLowThreshold(void)
Wolfgang Betz 67:93bec0baf1de 2748 {
Wolfgang Betz 67:93bec0baf1de 2749 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 2750
Wolfgang Betz 67:93bec0baf1de 2751 /* Reads the AGCCTRL_1 register, mask the THRESHOLD_LOW field and return the value */
Wolfgang Betz 67:93bec0baf1de 2752 g_xStatus = SpiritSpiReadRegisters(AGCCTRL1_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2753
Wolfgang Betz 67:93bec0baf1de 2754 return (tempRegValue & 0x0F);
Wolfgang Betz 67:93bec0baf1de 2755
Wolfgang Betz 67:93bec0baf1de 2756 }
Wolfgang Betz 67:93bec0baf1de 2757
Wolfgang Betz 67:93bec0baf1de 2758
Wolfgang Betz 67:93bec0baf1de 2759 /**
Wolfgang Betz 67:93bec0baf1de 2760 * @brief Sets the clock recovery algorithm.
Wolfgang Betz 67:93bec0baf1de 2761 * @param xMode the Clock Recovery mode. This parameter can be one of the values defined in @ref ClkRecMode :
Wolfgang Betz 67:93bec0baf1de 2762 * @arg CLK_REC_PLL PLL alogrithm for clock recovery
Wolfgang Betz 67:93bec0baf1de 2763 * @arg CLK_REC_DLL DLL alogrithm for clock recovery
Wolfgang Betz 67:93bec0baf1de 2764 * @retval None.
Wolfgang Betz 67:93bec0baf1de 2765 */
Wolfgang Betz 67:93bec0baf1de 2766 void SpiritRadioSetClkRecMode(ClkRecMode xMode)
Wolfgang Betz 67:93bec0baf1de 2767 {
Wolfgang Betz 67:93bec0baf1de 2768 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 2769
Wolfgang Betz 67:93bec0baf1de 2770 /* Check the parameter */
Wolfgang Betz 67:93bec0baf1de 2771 s_assert_param(IS_CLK_REC_MODE(xMode));
Wolfgang Betz 67:93bec0baf1de 2772
Wolfgang Betz 67:93bec0baf1de 2773 /* Reads the FDEV_0 register */
Wolfgang Betz 67:93bec0baf1de 2774 SpiritSpiReadRegisters(FDEV0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2775
Wolfgang Betz 67:93bec0baf1de 2776 /* Mask the CLOCK_REC_ALGO_SEL field and write the new value */
Wolfgang Betz 67:93bec0baf1de 2777 tempRegValue &= 0xF7;
Wolfgang Betz 67:93bec0baf1de 2778 tempRegValue |= (uint8_t)xMode;
Wolfgang Betz 67:93bec0baf1de 2779
Wolfgang Betz 67:93bec0baf1de 2780 /* Sets the FDEV_0 register */
Wolfgang Betz 67:93bec0baf1de 2781 g_xStatus = SpiritSpiWriteRegisters(FDEV0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2782
Wolfgang Betz 67:93bec0baf1de 2783 }
Wolfgang Betz 67:93bec0baf1de 2784
Wolfgang Betz 67:93bec0baf1de 2785
Wolfgang Betz 67:93bec0baf1de 2786 /**
Wolfgang Betz 67:93bec0baf1de 2787 * @brief Returns the Clock Recovery working mode.
Wolfgang Betz 67:93bec0baf1de 2788 * @param None.
Wolfgang Betz 67:93bec0baf1de 2789 * @retval ClkRecMode Clock Recovery mode. This parameter can be one of the values defined in @ref ClkRecMode :
Wolfgang Betz 67:93bec0baf1de 2790 * @arg CLK_REC_PLL PLL alogrithm for clock recovery
Wolfgang Betz 67:93bec0baf1de 2791 * @arg CLK_REC_DLL DLL alogrithm for clock recovery
Wolfgang Betz 67:93bec0baf1de 2792 */
Wolfgang Betz 67:93bec0baf1de 2793 ClkRecMode SpiritRadioGetClkRecMode(void)
Wolfgang Betz 67:93bec0baf1de 2794 {
Wolfgang Betz 67:93bec0baf1de 2795 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 2796
Wolfgang Betz 67:93bec0baf1de 2797 /* Reads the FDEV_0 register, mask the CLOCK_REC_ALGO_SEL field and return the value */
Wolfgang Betz 67:93bec0baf1de 2798 g_xStatus = SpiritSpiReadRegisters(FDEV0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2799
Wolfgang Betz 67:93bec0baf1de 2800 return (ClkRecMode)(tempRegValue & 0x08);
Wolfgang Betz 67:93bec0baf1de 2801
Wolfgang Betz 67:93bec0baf1de 2802 }
Wolfgang Betz 67:93bec0baf1de 2803
Wolfgang Betz 67:93bec0baf1de 2804
Wolfgang Betz 67:93bec0baf1de 2805 /**
Wolfgang Betz 67:93bec0baf1de 2806 * @brief Sets the clock recovery proportional gain.
Wolfgang Betz 67:93bec0baf1de 2807 * @param cPGain the Clock Recovery proportional gain to write in the CLK_REC_P_GAIN field of CLOCKREC register.
Wolfgang Betz 67:93bec0baf1de 2808 * It represents is log2 value of the clock recovery proportional gain.
Wolfgang Betz 67:93bec0baf1de 2809 * This parameter shall be in the range [0:7].
Wolfgang Betz 67:93bec0baf1de 2810 * @retval None.
Wolfgang Betz 67:93bec0baf1de 2811 */
Wolfgang Betz 67:93bec0baf1de 2812 void SpiritRadioSetClkRecPGain(uint8_t cPGain)
Wolfgang Betz 67:93bec0baf1de 2813 {
Wolfgang Betz 67:93bec0baf1de 2814 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 2815
Wolfgang Betz 67:93bec0baf1de 2816 /* Check the parameter */
Wolfgang Betz 67:93bec0baf1de 2817 s_assert_param(IS_CLK_REC_P_GAIN(cPGain));
Wolfgang Betz 67:93bec0baf1de 2818
Wolfgang Betz 67:93bec0baf1de 2819 /* Reads the CLOCKREC register */
Wolfgang Betz 67:93bec0baf1de 2820 SpiritSpiReadRegisters(CLOCKREC_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2821
Wolfgang Betz 67:93bec0baf1de 2822 /* Mask the CLK_REC_P_GAIN field and write the new value */
Wolfgang Betz 67:93bec0baf1de 2823 tempRegValue &= 0x1F;
Wolfgang Betz 67:93bec0baf1de 2824 tempRegValue |= (cPGain<<5);
Wolfgang Betz 67:93bec0baf1de 2825
Wolfgang Betz 67:93bec0baf1de 2826 /* Sets the CLOCKREC register */
Wolfgang Betz 67:93bec0baf1de 2827 g_xStatus = SpiritSpiWriteRegisters(CLOCKREC_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2828
Wolfgang Betz 67:93bec0baf1de 2829 }
Wolfgang Betz 67:93bec0baf1de 2830
Wolfgang Betz 67:93bec0baf1de 2831
Wolfgang Betz 67:93bec0baf1de 2832 /**
Wolfgang Betz 67:93bec0baf1de 2833 * @brief Returns the log2 of the clock recovery proportional gain.
Wolfgang Betz 67:93bec0baf1de 2834 * @param None.
Wolfgang Betz 67:93bec0baf1de 2835 * @retval uint8_t Clock Recovery proportional gain read from the CLK_REC_P_GAIN field of CLOCKREC register.
Wolfgang Betz 67:93bec0baf1de 2836 * This parameter will be in the range [0:7].
Wolfgang Betz 67:93bec0baf1de 2837 */
Wolfgang Betz 67:93bec0baf1de 2838 uint8_t SpiritRadioGetClkRecPGain(void)
Wolfgang Betz 67:93bec0baf1de 2839 {
Wolfgang Betz 67:93bec0baf1de 2840 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 2841
Wolfgang Betz 67:93bec0baf1de 2842 /* Reads the CLOCKREC register, mask the CLK_REC_P_GAIN field and return the value */
Wolfgang Betz 67:93bec0baf1de 2843 g_xStatus = SpiritSpiReadRegisters(CLOCKREC_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2844
Wolfgang Betz 67:93bec0baf1de 2845 return ((tempRegValue & 0xEF)>>5);
Wolfgang Betz 67:93bec0baf1de 2846
Wolfgang Betz 67:93bec0baf1de 2847 }
Wolfgang Betz 67:93bec0baf1de 2848
Wolfgang Betz 67:93bec0baf1de 2849
Wolfgang Betz 67:93bec0baf1de 2850 /**
Wolfgang Betz 67:93bec0baf1de 2851 * @brief Sets the clock recovery integral gain.
Wolfgang Betz 67:93bec0baf1de 2852 * @param cIGain the Clock Recovery integral gain to write in the CLK_REC_I_GAIN field of CLOCKREC register.
Wolfgang Betz 67:93bec0baf1de 2853 * This parameter shall be in the range [0:15].
Wolfgang Betz 67:93bec0baf1de 2854 * @retval None.
Wolfgang Betz 67:93bec0baf1de 2855 */
Wolfgang Betz 67:93bec0baf1de 2856 void SpiritRadioSetClkRecIGain(uint8_t cIGain)
Wolfgang Betz 67:93bec0baf1de 2857 {
Wolfgang Betz 67:93bec0baf1de 2858 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 2859
Wolfgang Betz 67:93bec0baf1de 2860 /* Check the parameter */
Wolfgang Betz 67:93bec0baf1de 2861 s_assert_param(IS_CLK_REC_I_GAIN(cIGain));
Wolfgang Betz 67:93bec0baf1de 2862
Wolfgang Betz 67:93bec0baf1de 2863 /* Reads the CLOCKREC register */
Wolfgang Betz 67:93bec0baf1de 2864 SpiritSpiReadRegisters(CLOCKREC_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2865
Wolfgang Betz 67:93bec0baf1de 2866 /* Mask the CLK_REC_P_GAIN field and write the new value */
Wolfgang Betz 67:93bec0baf1de 2867 tempRegValue &= 0xF0;
Wolfgang Betz 67:93bec0baf1de 2868 tempRegValue |= cIGain;
Wolfgang Betz 67:93bec0baf1de 2869
Wolfgang Betz 67:93bec0baf1de 2870 /* Sets the CLOCKREC register */
Wolfgang Betz 67:93bec0baf1de 2871 g_xStatus = SpiritSpiWriteRegisters(CLOCKREC_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2872
Wolfgang Betz 67:93bec0baf1de 2873 }
Wolfgang Betz 67:93bec0baf1de 2874
Wolfgang Betz 67:93bec0baf1de 2875
Wolfgang Betz 67:93bec0baf1de 2876 /**
Wolfgang Betz 67:93bec0baf1de 2877 * @brief Returns the clock recovery integral gain.
Wolfgang Betz 67:93bec0baf1de 2878 * @param None.
Wolfgang Betz 67:93bec0baf1de 2879 * @retval uint8_t Clock Recovery integral gain read from the
Wolfgang Betz 67:93bec0baf1de 2880 * CLK_REC_I_GAIN field of CLOCKREC register.
Wolfgang Betz 67:93bec0baf1de 2881 * This parameter will be in the range [0:15].
Wolfgang Betz 67:93bec0baf1de 2882 */
Wolfgang Betz 67:93bec0baf1de 2883 uint8_t SpiritRadioGetClkRecIGain(void)
Wolfgang Betz 67:93bec0baf1de 2884 {
Wolfgang Betz 67:93bec0baf1de 2885 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 2886
Wolfgang Betz 67:93bec0baf1de 2887 /* Reads the CLOCKREC register, mask the CLK_REC_I_GAIN field and return the value */
Wolfgang Betz 67:93bec0baf1de 2888 g_xStatus = SpiritSpiReadRegisters(CLOCKREC_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2889
Wolfgang Betz 67:93bec0baf1de 2890 return (tempRegValue & 0x0F);
Wolfgang Betz 67:93bec0baf1de 2891
Wolfgang Betz 67:93bec0baf1de 2892 }
Wolfgang Betz 67:93bec0baf1de 2893
Wolfgang Betz 67:93bec0baf1de 2894
Wolfgang Betz 67:93bec0baf1de 2895 /**
Wolfgang Betz 67:93bec0baf1de 2896 * @brief Sets the postfilter length for clock recovery algorithm.
Wolfgang Betz 67:93bec0baf1de 2897 * @param xLength the postfilter length in symbols. This parameter can be one of the values defined in @ref PstFltLength :
Wolfgang Betz 67:93bec0baf1de 2898 * @arg PSTFLT_LENGTH_8 Postfilter length is 8 symbols
Wolfgang Betz 67:93bec0baf1de 2899 * @arg PSTFLT_LENGTH_16 Postfilter length is 16 symbols
Wolfgang Betz 67:93bec0baf1de 2900 * @retval None.
Wolfgang Betz 67:93bec0baf1de 2901 */
Wolfgang Betz 67:93bec0baf1de 2902 void SpiritRadioSetClkRecPstFltLength(PstFltLength xLength)
Wolfgang Betz 67:93bec0baf1de 2903 {
Wolfgang Betz 67:93bec0baf1de 2904 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 2905
Wolfgang Betz 67:93bec0baf1de 2906 /* Check the parameter */
Wolfgang Betz 67:93bec0baf1de 2907 s_assert_param(IS_PST_FLT_LENGTH(xLength));
Wolfgang Betz 67:93bec0baf1de 2908
Wolfgang Betz 67:93bec0baf1de 2909 /* Reads the CLOCKREC register */
Wolfgang Betz 67:93bec0baf1de 2910 SpiritSpiReadRegisters(CLOCKREC_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2911
Wolfgang Betz 67:93bec0baf1de 2912 /* Mask the PSTFLT_LEN field and write the new value */
Wolfgang Betz 67:93bec0baf1de 2913 tempRegValue &= 0xEF;
Wolfgang Betz 67:93bec0baf1de 2914 tempRegValue |= (uint8_t)xLength;
Wolfgang Betz 67:93bec0baf1de 2915
Wolfgang Betz 67:93bec0baf1de 2916 /* Sets the CLOCKREC register */
Wolfgang Betz 67:93bec0baf1de 2917 g_xStatus = SpiritSpiWriteRegisters(CLOCKREC_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2918
Wolfgang Betz 67:93bec0baf1de 2919 }
Wolfgang Betz 67:93bec0baf1de 2920
Wolfgang Betz 67:93bec0baf1de 2921
Wolfgang Betz 67:93bec0baf1de 2922 /**
Wolfgang Betz 67:93bec0baf1de 2923 * @brief Returns the postfilter length for clock recovery algorithm.
Wolfgang Betz 67:93bec0baf1de 2924 * @param None.
Wolfgang Betz 67:93bec0baf1de 2925 * @retval PstFltLength Postfilter length in symbols. This parameter can be one of the values defined in @ref PstFltLength :
Wolfgang Betz 67:93bec0baf1de 2926 * @arg PSTFLT_LENGTH_8 Postfilter length is 8 symbols
Wolfgang Betz 67:93bec0baf1de 2927 * @arg PSTFLT_LENGTH_16 Postfilter length is 16 symbols
Wolfgang Betz 67:93bec0baf1de 2928 */
Wolfgang Betz 67:93bec0baf1de 2929 PstFltLength SpiritRadioGetClkRecPstFltLength(void)
Wolfgang Betz 67:93bec0baf1de 2930 {
Wolfgang Betz 67:93bec0baf1de 2931 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 2932
Wolfgang Betz 67:93bec0baf1de 2933 /* Reads the CLOCKREC register, mask the PSTFLT_LEN field and return the value */
Wolfgang Betz 67:93bec0baf1de 2934 g_xStatus = SpiritSpiReadRegisters(CLOCKREC_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2935
Wolfgang Betz 67:93bec0baf1de 2936 return (PstFltLength)(tempRegValue & 0x10);
Wolfgang Betz 67:93bec0baf1de 2937
Wolfgang Betz 67:93bec0baf1de 2938 }
Wolfgang Betz 67:93bec0baf1de 2939
Wolfgang Betz 67:93bec0baf1de 2940
Wolfgang Betz 67:93bec0baf1de 2941 /**
Wolfgang Betz 67:93bec0baf1de 2942 * @brief Enables or Disables the received data blanking when the CS is under the threshold.
Wolfgang Betz 67:93bec0baf1de 2943 * @param xNewState new state of this mode.
Wolfgang Betz 67:93bec0baf1de 2944 * This parameter can be: S_ENABLE or S_DISABLE .
Wolfgang Betz 67:93bec0baf1de 2945 * @retval None.
Wolfgang Betz 67:93bec0baf1de 2946 */
Wolfgang Betz 67:93bec0baf1de 2947 void SpiritRadioCsBlanking(SpiritFunctionalState xNewState)
Wolfgang Betz 67:93bec0baf1de 2948 {
Wolfgang Betz 67:93bec0baf1de 2949 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 2950
Wolfgang Betz 67:93bec0baf1de 2951 /* Check the parameters */
Wolfgang Betz 67:93bec0baf1de 2952 s_assert_param(IS_SPIRIT_FUNCTIONAL_STATE(xNewState));
Wolfgang Betz 67:93bec0baf1de 2953
Wolfgang Betz 67:93bec0baf1de 2954 /* Reads the ANT_SELECT_CONF_BASE and mask the CS_BLANKING BIT field */
Wolfgang Betz 67:93bec0baf1de 2955 SpiritSpiReadRegisters(ANT_SELECT_CONF_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2956
Wolfgang Betz 67:93bec0baf1de 2957 if(xNewState == S_ENABLE)
Wolfgang Betz 67:93bec0baf1de 2958 {
Wolfgang Betz 67:93bec0baf1de 2959 tempRegValue |= ANT_SELECT_CS_BLANKING_MASK;
Wolfgang Betz 67:93bec0baf1de 2960 }
Wolfgang Betz 67:93bec0baf1de 2961 else
Wolfgang Betz 67:93bec0baf1de 2962 {
Wolfgang Betz 67:93bec0baf1de 2963 tempRegValue &= (~ANT_SELECT_CS_BLANKING_MASK);
Wolfgang Betz 67:93bec0baf1de 2964 }
Wolfgang Betz 67:93bec0baf1de 2965
Wolfgang Betz 67:93bec0baf1de 2966 /* Writes the new value in the ANT_SELECT_CONF register */
Wolfgang Betz 67:93bec0baf1de 2967 g_xStatus = SpiritSpiWriteRegisters(ANT_SELECT_CONF_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2968
Wolfgang Betz 67:93bec0baf1de 2969
Wolfgang Betz 67:93bec0baf1de 2970 }
Wolfgang Betz 67:93bec0baf1de 2971
Wolfgang Betz 67:93bec0baf1de 2972 /**
Wolfgang Betz 67:93bec0baf1de 2973 * @brief Enables or Disables the persistent RX mode.
Wolfgang Betz 67:93bec0baf1de 2974 * @param xNewState new state of this mode.
Wolfgang Betz 67:93bec0baf1de 2975 * This parameter can be: S_ENABLE or S_DISABLE .
Wolfgang Betz 67:93bec0baf1de 2976 * @retval None.
Wolfgang Betz 67:93bec0baf1de 2977 */
Wolfgang Betz 67:93bec0baf1de 2978 void SpiritRadioPersistenRx(SpiritFunctionalState xNewState)
Wolfgang Betz 67:93bec0baf1de 2979 {
Wolfgang Betz 67:93bec0baf1de 2980 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 2981
Wolfgang Betz 67:93bec0baf1de 2982 /* Check the parameters */
Wolfgang Betz 67:93bec0baf1de 2983 s_assert_param(IS_SPIRIT_FUNCTIONAL_STATE(xNewState));
Wolfgang Betz 67:93bec0baf1de 2984
Wolfgang Betz 67:93bec0baf1de 2985 /* Reads the PROTOCOL0_BASE and mask the PROTOCOL0_PERS_RX_MASK bitfield */
Wolfgang Betz 67:93bec0baf1de 2986 SpiritSpiReadRegisters(PROTOCOL0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2987
Wolfgang Betz 67:93bec0baf1de 2988 if(xNewState == S_ENABLE)
Wolfgang Betz 67:93bec0baf1de 2989 {
Wolfgang Betz 67:93bec0baf1de 2990 tempRegValue |= PROTOCOL0_PERS_RX_MASK;
Wolfgang Betz 67:93bec0baf1de 2991 }
Wolfgang Betz 67:93bec0baf1de 2992 else
Wolfgang Betz 67:93bec0baf1de 2993 {
Wolfgang Betz 67:93bec0baf1de 2994 tempRegValue &= (~PROTOCOL0_PERS_RX_MASK);
Wolfgang Betz 67:93bec0baf1de 2995 }
Wolfgang Betz 67:93bec0baf1de 2996
Wolfgang Betz 67:93bec0baf1de 2997 /* Writes the new value in the PROTOCOL0_BASE register */
Wolfgang Betz 67:93bec0baf1de 2998 g_xStatus = SpiritSpiWriteRegisters(PROTOCOL0_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 2999
Wolfgang Betz 67:93bec0baf1de 3000 }
Wolfgang Betz 67:93bec0baf1de 3001
Wolfgang Betz 67:93bec0baf1de 3002 /**
Wolfgang Betz 67:93bec0baf1de 3003 * @brief Enables or Disables the synthesizer reference divider.
Wolfgang Betz 67:93bec0baf1de 3004 * @param xNewState new state for synthesizer reference divider.
Wolfgang Betz 67:93bec0baf1de 3005 * This parameter can be: S_ENABLE or S_DISABLE .
Wolfgang Betz 67:93bec0baf1de 3006 * @retval None.
Wolfgang Betz 67:93bec0baf1de 3007 */
Wolfgang Betz 67:93bec0baf1de 3008 void SpiritRadioSetRefDiv(SpiritFunctionalState xNewState)
Wolfgang Betz 67:93bec0baf1de 3009 {
Wolfgang Betz 67:93bec0baf1de 3010 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 3011
Wolfgang Betz 67:93bec0baf1de 3012 /* Check the parameters */
Wolfgang Betz 67:93bec0baf1de 3013 s_assert_param(IS_SPIRIT_FUNCTIONAL_STATE(xNewState));
Wolfgang Betz 67:93bec0baf1de 3014
Wolfgang Betz 67:93bec0baf1de 3015 /* Reads the SYNTH_CONFIG1_BASE and mask the REFDIV bit field */
Wolfgang Betz 67:93bec0baf1de 3016 SpiritSpiReadRegisters(SYNTH_CONFIG1_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 3017
Wolfgang Betz 67:93bec0baf1de 3018 if(xNewState == S_ENABLE)
Wolfgang Betz 67:93bec0baf1de 3019 {
Wolfgang Betz 67:93bec0baf1de 3020 tempRegValue |= 0x80;
Wolfgang Betz 67:93bec0baf1de 3021 }
Wolfgang Betz 67:93bec0baf1de 3022 else
Wolfgang Betz 67:93bec0baf1de 3023 {
Wolfgang Betz 67:93bec0baf1de 3024 tempRegValue &= 0x7F;
Wolfgang Betz 67:93bec0baf1de 3025 }
Wolfgang Betz 67:93bec0baf1de 3026
Wolfgang Betz 67:93bec0baf1de 3027 /* Writes the new value in the SYNTH_CONFIG1_BASE register */
Wolfgang Betz 67:93bec0baf1de 3028 g_xStatus = SpiritSpiWriteRegisters(SYNTH_CONFIG1_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 3029
Wolfgang Betz 67:93bec0baf1de 3030 }
Wolfgang Betz 67:93bec0baf1de 3031
Wolfgang Betz 67:93bec0baf1de 3032 /**
Wolfgang Betz 67:93bec0baf1de 3033 * @brief Get the the synthesizer reference divider state.
Wolfgang Betz 67:93bec0baf1de 3034 * @param void.
Wolfgang Betz 67:93bec0baf1de 3035 * @retval None.
Wolfgang Betz 67:93bec0baf1de 3036 */
Wolfgang Betz 67:93bec0baf1de 3037 SpiritFunctionalState SpiritRadioGetRefDiv(void)
Wolfgang Betz 67:93bec0baf1de 3038 {
Wolfgang Betz 67:93bec0baf1de 3039 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 3040
Wolfgang Betz 67:93bec0baf1de 3041 g_xStatus = SpiritSpiReadRegisters(SYNTH_CONFIG1_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 3042
Wolfgang Betz 67:93bec0baf1de 3043 if(((tempRegValue>>7)&0x1))
Wolfgang Betz 67:93bec0baf1de 3044 {
Wolfgang Betz 67:93bec0baf1de 3045 return S_ENABLE;
Wolfgang Betz 67:93bec0baf1de 3046 }
Wolfgang Betz 67:93bec0baf1de 3047 else
Wolfgang Betz 67:93bec0baf1de 3048 {
Wolfgang Betz 67:93bec0baf1de 3049 return S_DISABLE;
Wolfgang Betz 67:93bec0baf1de 3050 }
Wolfgang Betz 67:93bec0baf1de 3051
Wolfgang Betz 67:93bec0baf1de 3052 }
Wolfgang Betz 67:93bec0baf1de 3053
Wolfgang Betz 67:93bec0baf1de 3054 /**
Wolfgang Betz 67:93bec0baf1de 3055 * @brief Enables or Disables the synthesizer reference divider.
Wolfgang Betz 67:93bec0baf1de 3056 * @param xNewState new state for synthesizer reference divider.
Wolfgang Betz 67:93bec0baf1de 3057 * This parameter can be: S_ENABLE or S_DISABLE .
Wolfgang Betz 67:93bec0baf1de 3058 * @retval None.
Wolfgang Betz 67:93bec0baf1de 3059 */
Wolfgang Betz 67:93bec0baf1de 3060 void SpiritRadioSetDigDiv(SpiritFunctionalState xNewState)
Wolfgang Betz 67:93bec0baf1de 3061 {
Wolfgang Betz 67:93bec0baf1de 3062 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 3063
Wolfgang Betz 67:93bec0baf1de 3064 /* Check the parameters */
Wolfgang Betz 67:93bec0baf1de 3065 s_assert_param(IS_SPIRIT_FUNCTIONAL_STATE(xNewState));
Wolfgang Betz 67:93bec0baf1de 3066
Wolfgang Betz 67:93bec0baf1de 3067 /* Reads the XO_RCO_TEST_BASE and mask the PD_CLKDIV bit field */
Wolfgang Betz 67:93bec0baf1de 3068 SpiritSpiReadRegisters(XO_RCO_TEST_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 3069
Wolfgang Betz 67:93bec0baf1de 3070 if(xNewState == S_ENABLE)
Wolfgang Betz 67:93bec0baf1de 3071 {
Wolfgang Betz 67:93bec0baf1de 3072 tempRegValue &= 0xf7;
Wolfgang Betz 67:93bec0baf1de 3073 }
Wolfgang Betz 67:93bec0baf1de 3074 else
Wolfgang Betz 67:93bec0baf1de 3075 {
Wolfgang Betz 67:93bec0baf1de 3076
Wolfgang Betz 67:93bec0baf1de 3077 tempRegValue |= 0x08;
Wolfgang Betz 67:93bec0baf1de 3078 }
Wolfgang Betz 67:93bec0baf1de 3079
Wolfgang Betz 67:93bec0baf1de 3080 /* Writes the new value in the XO_RCO_TEST_BASE register */
Wolfgang Betz 67:93bec0baf1de 3081 g_xStatus = SpiritSpiWriteRegisters(XO_RCO_TEST_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 3082
Wolfgang Betz 67:93bec0baf1de 3083 }
Wolfgang Betz 67:93bec0baf1de 3084
Wolfgang Betz 67:93bec0baf1de 3085 /**
Wolfgang Betz 67:93bec0baf1de 3086 * @brief Get the the synthesizer reference divider state.
Wolfgang Betz 67:93bec0baf1de 3087 * @param void.
Wolfgang Betz 67:93bec0baf1de 3088 * @retval None.
Wolfgang Betz 67:93bec0baf1de 3089 */
Wolfgang Betz 67:93bec0baf1de 3090 SpiritFunctionalState SpiritRadioGetDigDiv(void)
Wolfgang Betz 67:93bec0baf1de 3091 {
Wolfgang Betz 67:93bec0baf1de 3092 uint8_t tempRegValue;
Wolfgang Betz 67:93bec0baf1de 3093
Wolfgang Betz 67:93bec0baf1de 3094 g_xStatus = SpiritSpiReadRegisters(XO_RCO_TEST_BASE, 1, &tempRegValue);
Wolfgang Betz 67:93bec0baf1de 3095
Wolfgang Betz 67:93bec0baf1de 3096 if(((tempRegValue>>3)&0x1))
Wolfgang Betz 67:93bec0baf1de 3097 {
Wolfgang Betz 67:93bec0baf1de 3098 return S_DISABLE;
Wolfgang Betz 67:93bec0baf1de 3099 }
Wolfgang Betz 67:93bec0baf1de 3100 else
Wolfgang Betz 67:93bec0baf1de 3101 {
Wolfgang Betz 67:93bec0baf1de 3102 return S_ENABLE;
Wolfgang Betz 67:93bec0baf1de 3103 }
Wolfgang Betz 67:93bec0baf1de 3104
Wolfgang Betz 67:93bec0baf1de 3105 }
Wolfgang Betz 67:93bec0baf1de 3106
Wolfgang Betz 67:93bec0baf1de 3107 /**
Wolfgang Betz 67:93bec0baf1de 3108 * @brief Returns the XTAL frequency.
Wolfgang Betz 67:93bec0baf1de 3109 * @param void.
Wolfgang Betz 67:93bec0baf1de 3110 * @retval uint32_t XTAL frequency.
Wolfgang Betz 67:93bec0baf1de 3111 */
Wolfgang Betz 67:93bec0baf1de 3112 uint32_t SpiritRadioGetXtalFrequency(void)
Wolfgang Betz 67:93bec0baf1de 3113 {
Wolfgang Betz 67:93bec0baf1de 3114 return s_lXtalFrequency;
Wolfgang Betz 67:93bec0baf1de 3115 }
Wolfgang Betz 67:93bec0baf1de 3116
Wolfgang Betz 67:93bec0baf1de 3117 /**
Wolfgang Betz 67:93bec0baf1de 3118 * @brief Sets the XTAL frequency.
Wolfgang Betz 67:93bec0baf1de 3119 * @param uint32_t XTAL frequency.
Wolfgang Betz 67:93bec0baf1de 3120 * @retval void.
Wolfgang Betz 67:93bec0baf1de 3121 */
Wolfgang Betz 67:93bec0baf1de 3122 void SpiritRadioSetXtalFrequency(uint32_t lXtalFrequency)
Wolfgang Betz 67:93bec0baf1de 3123 {
Wolfgang Betz 67:93bec0baf1de 3124 s_lXtalFrequency = lXtalFrequency;
Wolfgang Betz 67:93bec0baf1de 3125 }
Wolfgang Betz 67:93bec0baf1de 3126
Wolfgang Betz 67:93bec0baf1de 3127 /**
Wolfgang Betz 67:93bec0baf1de 3128 * @}
Wolfgang Betz 67:93bec0baf1de 3129 */
Wolfgang Betz 67:93bec0baf1de 3130
Wolfgang Betz 67:93bec0baf1de 3131
Wolfgang Betz 67:93bec0baf1de 3132 /**
Wolfgang Betz 67:93bec0baf1de 3133 * @}
Wolfgang Betz 67:93bec0baf1de 3134 */
Wolfgang Betz 67:93bec0baf1de 3135
Wolfgang Betz 67:93bec0baf1de 3136
Wolfgang Betz 67:93bec0baf1de 3137 /**
Wolfgang Betz 67:93bec0baf1de 3138 * @}
Wolfgang Betz 67:93bec0baf1de 3139 */
Wolfgang Betz 67:93bec0baf1de 3140
Wolfgang Betz 67:93bec0baf1de 3141
Wolfgang Betz 67:93bec0baf1de 3142
Wolfgang Betz 67:93bec0baf1de 3143 /******************* (C) COPYRIGHT 2015 STMicroelectronics *****END OF FILE****/
Wolfgang Betz 67:93bec0baf1de 3144