JunMo Hong / stm-spirit1-rf-driver_for_cubebite

센서보드 RF IRQ 테스트 중 and bug fix?

Fork of EV-COG-AD3029LZ by JunMo Hong

source/libs/spirit1/SPIRIT1_Library/Src/SPIRIT_Radio.c@34:edda6a7238ec, 2016-11-22 (annotated)

Committer:
Wolfgang Betz
Date:
Tue Nov 22 11:40:10 2016 +0100
Revision:
34:edda6a7238ec
Child:
67:93bec0baf1de
Perform re-naming

Who changed what in which revision?

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