SilentSensors / mbed-dev

Important changes to repositories hosted on mbed.com

Mbed hosted mercurial repositories are deprecated and are due to be permanently deleted in July 2026.

To keep a copy of this software download the repository Zip archive or clone locally using Mercurial.

It is also possible to export all your personal repositories from the account settings page.

Fork of mbed-dev by mbed official

targets/TARGET_Analog_Devices/TARGET_ADUCM4X50/TARGET_ADUCM4050/api/us_ticker.c@184:08ed48f1de7f, 2018-04-19 (annotated)

Committer:
AnnaBridge
Date:
Thu Apr 19 17:12:19 2018 +0100
Revision:
184:08ed48f1de7f
Parent:
178:79309dc6340a
Child:
186:707f6e361f3e
mbed-dev library. Release version 161

Who changed what in which revision?

UserRevisionLine numberNew contents of line
AnnaBridge 178:79309dc6340a 1 /*******************************************************************************
AnnaBridge 184:08ed48f1de7f 2 * Copyright (c) 2010-2018 Analog Devices, Inc.
AnnaBridge 178:79309dc6340a 3 *
AnnaBridge 178:79309dc6340a 4 * All rights reserved.
AnnaBridge 178:79309dc6340a 5 *
AnnaBridge 178:79309dc6340a 6 * Redistribution and use in source and binary forms, with or without modification,
AnnaBridge 178:79309dc6340a 7 * are permitted provided that the following conditions are met:
AnnaBridge 178:79309dc6340a 8 * - Redistributions of source code must retain the above copyright notice,
AnnaBridge 178:79309dc6340a 9 * this list of conditions and the following disclaimer.
AnnaBridge 178:79309dc6340a 10 * - Redistributions in binary form must reproduce the above copyright notice,
AnnaBridge 178:79309dc6340a 11 * this list of conditions and the following disclaimer in the documentation
AnnaBridge 178:79309dc6340a 12 * and/or other materials provided with the distribution.
AnnaBridge 178:79309dc6340a 13 * - Modified versions of the software must be conspicuously marked as such.
AnnaBridge 178:79309dc6340a 14 * - This software is licensed solely and exclusively for use with processors
AnnaBridge 178:79309dc6340a 15 * manufactured by or for Analog Devices, Inc.
AnnaBridge 178:79309dc6340a 16 * - This software may not be combined or merged with other code in any manner
AnnaBridge 178:79309dc6340a 17 * that would cause the software to become subject to terms and conditions
AnnaBridge 178:79309dc6340a 18 * which differ from those listed here.
AnnaBridge 178:79309dc6340a 19 * - Neither the name of Analog Devices, Inc. nor the names of its
AnnaBridge 178:79309dc6340a 20 * contributors may be used to endorse or promote products derived
AnnaBridge 178:79309dc6340a 21 * from this software without specific prior written permission.
AnnaBridge 178:79309dc6340a 22 * - The use of this software may or may not infringe the patent rights of one
AnnaBridge 178:79309dc6340a 23 * or more patent holders. This license does not release you from the
AnnaBridge 178:79309dc6340a 24 * requirement that you obtain separate licenses from these patent holders
AnnaBridge 178:79309dc6340a 25 * to use this software.
AnnaBridge 178:79309dc6340a 26 *
AnnaBridge 178:79309dc6340a 27 * THIS SOFTWARE IS PROVIDED BY ANALOG DEVICES, INC. AND CONTRIBUTORS "AS IS"
AnnaBridge 178:79309dc6340a 28 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, NON-
AnnaBridge 178:79309dc6340a 29 * INFRINGEMENT, TITLE, MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
AnnaBridge 178:79309dc6340a 30 * DISCLAIMED. IN NO EVENT SHALL ANALOG DEVICES, INC. OR CONTRIBUTORS BE LIABLE
AnnaBridge 178:79309dc6340a 31 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, PUNITIVE OR
AnnaBridge 178:79309dc6340a 32 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, DAMAGES ARISING OUT OF
AnnaBridge 178:79309dc6340a 33 * CLAIMS OF INTELLECTUAL PROPERTY RIGHTS INFRINGEMENT; PROCUREMENT OF
AnnaBridge 178:79309dc6340a 34 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
AnnaBridge 178:79309dc6340a 35 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
AnnaBridge 178:79309dc6340a 36 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
AnnaBridge 178:79309dc6340a 37 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
AnnaBridge 178:79309dc6340a 38 * POSSIBILITY OF SUCH DAMAGE.
AnnaBridge 178:79309dc6340a 39 ******************************************************************************/
AnnaBridge 178:79309dc6340a 40
AnnaBridge 178:79309dc6340a 41 #include <stdint.h>
AnnaBridge 178:79309dc6340a 42 #include <stdio.h>
AnnaBridge 178:79309dc6340a 43 #include <drivers/tmr/adi_tmr.h>
AnnaBridge 178:79309dc6340a 44 #include <drivers/pwr/adi_pwr.h>
AnnaBridge 178:79309dc6340a 45 #include <drivers/gpio/adi_gpio.h>
AnnaBridge 178:79309dc6340a 46
AnnaBridge 178:79309dc6340a 47 #ifndef BITM_TMR_RGB_CTL_EN
AnnaBridge 178:79309dc6340a 48 #define BITM_TMR_RGB_CTL_EN BITM_TMR_CTL_EN
AnnaBridge 178:79309dc6340a 49 #endif
AnnaBridge 178:79309dc6340a 50
AnnaBridge 178:79309dc6340a 51 typedef uint32_t timestamp_t;
AnnaBridge 178:79309dc6340a 52
AnnaBridge 178:79309dc6340a 53 // defined in mbed_us_ticker_api.c which calls the ticker_irq_handler() routine
AnnaBridge 178:79309dc6340a 54 // defined in mbed_ticker_api.c
AnnaBridge 178:79309dc6340a 55 void us_ticker_irq_handler(void);
AnnaBridge 178:79309dc6340a 56
AnnaBridge 178:79309dc6340a 57 static int us_ticker_inited = 0;
AnnaBridge 178:79309dc6340a 58
AnnaBridge 178:79309dc6340a 59 static ADI_TMR_CONFIG tmrConfig, tmr2Config;
AnnaBridge 178:79309dc6340a 60
AnnaBridge 178:79309dc6340a 61 static volatile uint32_t Upper_count = 0, largecnt = 0;
AnnaBridge 178:79309dc6340a 62
AnnaBridge 178:79309dc6340a 63 static ADI_TMR_TypeDef * adi_tmr_registers[ADI_TMR_DEVICE_NUM] = {pADI_TMR0, pADI_TMR1, pADI_TMR2};
AnnaBridge 178:79309dc6340a 64
AnnaBridge 178:79309dc6340a 65 #if defined(__ADUCM302x__)
AnnaBridge 178:79309dc6340a 66 static const IRQn_Type adi_tmr_interrupt[ADI_TMR_DEVICE_NUM] = {TMR0_EVT_IRQn, TMR1_EVT_IRQn, TMR2_EVT_IRQn};
AnnaBridge 178:79309dc6340a 67 #elif defined(__ADUCM4x50__)
AnnaBridge 178:79309dc6340a 68 static const IRQn_Type adi_tmr_interrupt[ADI_TMR_DEVICE_NUM] = {TMR0_EVT_IRQn, TMR1_EVT_IRQn, TMR2_EVT_IRQn, TMR_RGB_EVT_IRQn};
AnnaBridge 178:79309dc6340a 69 #else
AnnaBridge 178:79309dc6340a 70 #error TMR is not ported for this processor
AnnaBridge 178:79309dc6340a 71 #endif
AnnaBridge 178:79309dc6340a 72
AnnaBridge 178:79309dc6340a 73
AnnaBridge 178:79309dc6340a 74 /*---------------------------------------------------------------------------*
AnnaBridge 178:79309dc6340a 75 Local functions
AnnaBridge 178:79309dc6340a 76 *---------------------------------------------------------------------------*/
AnnaBridge 178:79309dc6340a 77 static void GP1CallbackFunction(void *pCBParam, uint32_t Event, void * pArg)
AnnaBridge 178:79309dc6340a 78 {
AnnaBridge 178:79309dc6340a 79 Upper_count++;
AnnaBridge 178:79309dc6340a 80 }
AnnaBridge 178:79309dc6340a 81
AnnaBridge 178:79309dc6340a 82
AnnaBridge 178:79309dc6340a 83 static uint32_t get_current_time(void)
AnnaBridge 178:79309dc6340a 84 {
AnnaBridge 178:79309dc6340a 85 uint16_t tmrcnt0, tmrcnt1;
AnnaBridge 178:79309dc6340a 86 uint32_t totaltmr0, totaltmr1;
AnnaBridge 178:79309dc6340a 87 uint32_t uc1, tmrpend0, tmrpend1;
AnnaBridge 178:79309dc6340a 88
AnnaBridge 178:79309dc6340a 89 do {
AnnaBridge 178:79309dc6340a 90 volatile uint32_t *ucptr = &Upper_count;
AnnaBridge 178:79309dc6340a 91
AnnaBridge 178:79309dc6340a 92 /*
AnnaBridge 178:79309dc6340a 93 * Carefully coded to prevent race conditions. Do not make changes unless you understand all the
AnnaBridge 178:79309dc6340a 94 * implications.
AnnaBridge 178:79309dc6340a 95 *
AnnaBridge 178:79309dc6340a 96 * Note this function can be called with interrupts globally disabled or enabled. It has been coded to work in both cases.
AnnaBridge 178:79309dc6340a 97 *
AnnaBridge 178:79309dc6340a 98 * TMR0 and TMR1 both run from the same synchronous clock. TMR0 runs at 26MHz and TMR1 runs at 26/256MHz.
AnnaBridge 178:79309dc6340a 99 * TMR1 generates an interrupt every time it overflows its 16 bit counter. TMR0 runs faster and provides
AnnaBridge 178:79309dc6340a 100 * the lowest 8 bits of the current time count. When TMR0 and TMR1 are combined, they provide 24 bits of
AnnaBridge 178:79309dc6340a 101 * timer precision. i.e. (TMR0.CURCNT & 0xff) + (TMR1.CURCNT << 8)
AnnaBridge 178:79309dc6340a 102 *
AnnaBridge 178:79309dc6340a 103 * There are several race conditions protected against:
AnnaBridge 178:79309dc6340a 104 * 1. TMR0 and TMR1 are both read at the same time, however, on rare occasions, one will have incremented before the other.
AnnaBridge 178:79309dc6340a 105 * Therefore we read both timer counters, and check if the middle 8 bits match, if they don't then read the counts again
AnnaBridge 178:79309dc6340a 106 * until they do. This ensures that one or the other counters are stable with respect to each other.
AnnaBridge 178:79309dc6340a 107 *
AnnaBridge 178:79309dc6340a 108 * 2. TMR1.CURCNT and Upper_count racing. Prevent this by disabling the TMR1 interrupt, which stops Upper_count increment interrupt (GP1CallbackFunction).
AnnaBridge 178:79309dc6340a 109 * Then check pending bit of TMR1 to see if we missed Upper_count interrupt, and add it manually later.
AnnaBridge 178:79309dc6340a 110 *
AnnaBridge 178:79309dc6340a 111 * 3. Race between the TMR1 pend, and the TMR1.CURCNT read. Even with TMR1 interrupt disabled, the pend bit
AnnaBridge 178:79309dc6340a 112 * may be set while TMR1.CURCNT is being read. We don't know if the pend bit matches the TMR1 state.
AnnaBridge 178:79309dc6340a 113 * To prevent this, the pending bit is read twice, and we see if it matches; if it doesn't, loop around again.
AnnaBridge 178:79309dc6340a 114 *
AnnaBridge 178:79309dc6340a 115 * Note the TMR1 interrupt is enabled on each iteration of the loop to flush out any pending TMR1 interrupt,
AnnaBridge 178:79309dc6340a 116 * thereby clearing any TMR1 pend's. This have no effect if this routine is called with interrupts globally disabled.
AnnaBridge 178:79309dc6340a 117 */
AnnaBridge 178:79309dc6340a 118
AnnaBridge 184:08ed48f1de7f 119 NVIC_DisableIRQ(adi_tmr_interrupt[ADI_TMR_DEVICE_GP1]); // Prevent Upper_count increment
AnnaBridge 178:79309dc6340a 120 tmrpend0 = NVIC_GetPendingIRQ(adi_tmr_interrupt[ADI_TMR_DEVICE_GP1]);
AnnaBridge 178:79309dc6340a 121 // Check if there is a pending interrupt for timer 1
AnnaBridge 178:79309dc6340a 122
AnnaBridge 178:79309dc6340a 123 __DMB(); // memory barrier: read GP0 before GP1
AnnaBridge 178:79309dc6340a 124
AnnaBridge 178:79309dc6340a 125 tmrcnt0 = adi_tmr_registers[ADI_TMR_DEVICE_GP0]->CURCNT; // to minimize skew, read both timers manually
AnnaBridge 178:79309dc6340a 126
AnnaBridge 178:79309dc6340a 127 __DMB(); // memory barrier: read GP0 before GP1
AnnaBridge 178:79309dc6340a 128
AnnaBridge 178:79309dc6340a 129 tmrcnt1 = adi_tmr_registers[ADI_TMR_DEVICE_GP1]->CURCNT; // read both timers manually
AnnaBridge 178:79309dc6340a 130
AnnaBridge 184:08ed48f1de7f 131 totaltmr0 = tmrcnt0; // expand to u32 bits
AnnaBridge 184:08ed48f1de7f 132 totaltmr1 = tmrcnt1; // expand to u32 bits
AnnaBridge 178:79309dc6340a 133
AnnaBridge 178:79309dc6340a 134 tmrcnt0 &= 0xff00u;
AnnaBridge 178:79309dc6340a 135 tmrcnt1 <<= 8;
AnnaBridge 178:79309dc6340a 136
AnnaBridge 178:79309dc6340a 137 __DMB();
AnnaBridge 178:79309dc6340a 138
AnnaBridge 184:08ed48f1de7f 139 uc1 = *ucptr; // Read Upper_count
AnnaBridge 178:79309dc6340a 140
AnnaBridge 178:79309dc6340a 141 tmrpend1 = NVIC_GetPendingIRQ(adi_tmr_interrupt[ADI_TMR_DEVICE_GP1]);
AnnaBridge 178:79309dc6340a 142 // Check for a pending interrupt again. Only leave loop if they match
AnnaBridge 178:79309dc6340a 143
AnnaBridge 184:08ed48f1de7f 144 NVIC_EnableIRQ(adi_tmr_interrupt[ADI_TMR_DEVICE_GP1]); // enable interrupt on every loop to allow TMR1 interrupt to run
AnnaBridge 178:79309dc6340a 145 } while ((tmrcnt0 != tmrcnt1) || (tmrpend0 != tmrpend1));
AnnaBridge 178:79309dc6340a 146
AnnaBridge 178:79309dc6340a 147 totaltmr1 <<= 8; // Timer1 runs 256x slower
AnnaBridge 178:79309dc6340a 148 totaltmr1 += totaltmr0 & 0xffu; // Use last 8 bits of Timer0 as it runs faster
AnnaBridge 178:79309dc6340a 149 // totaltmr1 now contain 24 bits of significance
AnnaBridge 178:79309dc6340a 150
AnnaBridge 184:08ed48f1de7f 151 if (tmrpend0) { // If an interrupt is pending, then increment local copy of upper count
AnnaBridge 178:79309dc6340a 152 uc1++;
AnnaBridge 178:79309dc6340a 153 }
AnnaBridge 178:79309dc6340a 154
AnnaBridge 178:79309dc6340a 155 uint64_t Uc = totaltmr1; // expand out to 64 bits unsigned
AnnaBridge 178:79309dc6340a 156 Uc += ((uint64_t) uc1) << 24; // Add on the upper count to get the full precision count
AnnaBridge 178:79309dc6340a 157
AnnaBridge 178:79309dc6340a 158 // Divide Uc by 26 (26MHz converted to 1MHz) todo scale for other clock freqs
AnnaBridge 178:79309dc6340a 159
AnnaBridge 178:79309dc6340a 160 Uc *= 1290555u; // Divide total(1/26) << 25
AnnaBridge 184:08ed48f1de7f 161 Uc >>= 25; // shift back. Fixed point avoid use of floating point divide.
AnnaBridge 178:79309dc6340a 162 // Compiler does this inline using shifts and adds.
AnnaBridge 178:79309dc6340a 163
AnnaBridge 178:79309dc6340a 164 return Uc;
AnnaBridge 178:79309dc6340a 165 }
AnnaBridge 178:79309dc6340a 166
AnnaBridge 178:79309dc6340a 167
AnnaBridge 178:79309dc6340a 168 static void calc_event_counts(uint32_t timestamp)
AnnaBridge 178:79309dc6340a 169 {
AnnaBridge 178:79309dc6340a 170 uint32_t calc_time, blocks, offset;
AnnaBridge 178:79309dc6340a 171 uint64_t aa;
AnnaBridge 178:79309dc6340a 172
AnnaBridge 178:79309dc6340a 173 calc_time = get_current_time();
AnnaBridge 178:79309dc6340a 174 offset = timestamp - calc_time; // offset in useconds
AnnaBridge 178:79309dc6340a 175
AnnaBridge 178:79309dc6340a 176 if (offset > 0xf0000000u) // if offset is a really big number, assume that timer has already expired (i.e. negative)
AnnaBridge 178:79309dc6340a 177 offset = 0u;
AnnaBridge 178:79309dc6340a 178
AnnaBridge 178:79309dc6340a 179 if (offset > 10u) { // it takes 10us to user timer routine after interrupt. Offset timer to account for that.
AnnaBridge 178:79309dc6340a 180 offset -= 10u;
AnnaBridge 178:79309dc6340a 181 } else
AnnaBridge 178:79309dc6340a 182 offset = 0u;
AnnaBridge 178:79309dc6340a 183
AnnaBridge 178:79309dc6340a 184 aa = (uint64_t) offset;
AnnaBridge 178:79309dc6340a 185 aa *= 26u; // convert from 1MHz to 26MHz clock. todo scale for other clock freqs
AnnaBridge 178:79309dc6340a 186
AnnaBridge 178:79309dc6340a 187 blocks = aa >> 7;
AnnaBridge 178:79309dc6340a 188 blocks++; // round
AnnaBridge 178:79309dc6340a 189
AnnaBridge 178:79309dc6340a 190 largecnt = blocks>>1; // communicate to event_timer() routine
AnnaBridge 178:79309dc6340a 191 }
AnnaBridge 178:79309dc6340a 192
AnnaBridge 178:79309dc6340a 193 static void event_timer()
AnnaBridge 178:79309dc6340a 194 {
AnnaBridge 178:79309dc6340a 195 if (largecnt) {
AnnaBridge 178:79309dc6340a 196 uint32_t cnt = largecnt;
AnnaBridge 178:79309dc6340a 197
AnnaBridge 178:79309dc6340a 198 if (cnt > 65535u) {
AnnaBridge 178:79309dc6340a 199 cnt = 0u;
AnnaBridge 178:79309dc6340a 200 } else
AnnaBridge 178:79309dc6340a 201 cnt = 65536u - cnt;
AnnaBridge 178:79309dc6340a 202
AnnaBridge 178:79309dc6340a 203 tmr2Config.nLoad = cnt;
AnnaBridge 178:79309dc6340a 204 tmr2Config.nAsyncLoad = cnt;
AnnaBridge 178:79309dc6340a 205 adi_tmr_ConfigTimer(ADI_TMR_DEVICE_GP2, tmr2Config);
AnnaBridge 178:79309dc6340a 206 adi_tmr_Enable(ADI_TMR_DEVICE_GP2, true);
AnnaBridge 178:79309dc6340a 207 } else {
AnnaBridge 184:08ed48f1de7f 208 tmr2Config.nLoad = 65535u;
AnnaBridge 184:08ed48f1de7f 209 tmr2Config.nAsyncLoad = 65535u;
AnnaBridge 184:08ed48f1de7f 210 adi_tmr_ConfigTimer(ADI_TMR_DEVICE_GP2, tmr2Config);
AnnaBridge 184:08ed48f1de7f 211 adi_tmr_Enable(ADI_TMR_DEVICE_GP2, true);
AnnaBridge 178:79309dc6340a 212 }
AnnaBridge 178:79309dc6340a 213 }
AnnaBridge 178:79309dc6340a 214
AnnaBridge 178:79309dc6340a 215
AnnaBridge 178:79309dc6340a 216 /*
AnnaBridge 178:79309dc6340a 217 * Interrupt routine for timer 2
AnnaBridge 178:79309dc6340a 218 *
AnnaBridge 178:79309dc6340a 219 * largecnt counts how many timer ticks should be counted to reach timer event.
AnnaBridge 178:79309dc6340a 220 * Each interrupt happens every 65536 timer ticks, unless there are less than 65536 ticks to count.
AnnaBridge 178:79309dc6340a 221 * In that case do the remaining timers ticks.
AnnaBridge 178:79309dc6340a 222 *
AnnaBridge 178:79309dc6340a 223 * largecnt is a global that is used to communicate between event_timer and the interrupt routine
AnnaBridge 178:79309dc6340a 224 * On entry, largecnt will be any value larger than 0.
AnnaBridge 178:79309dc6340a 225 */
AnnaBridge 178:79309dc6340a 226 static void GP2CallbackFunction(void *pCBParam, uint32_t Event, void * pArg)
AnnaBridge 178:79309dc6340a 227 {
AnnaBridge 178:79309dc6340a 228 if (largecnt >= 65536u) {
AnnaBridge 178:79309dc6340a 229 largecnt -= 65536u;
AnnaBridge 178:79309dc6340a 230 } else
AnnaBridge 178:79309dc6340a 231 largecnt = 0;
AnnaBridge 178:79309dc6340a 232
AnnaBridge 178:79309dc6340a 233 if (largecnt < 65536u) {
AnnaBridge 178:79309dc6340a 234 adi_tmr_Enable(ADI_TMR_DEVICE_GP2, false);
AnnaBridge 184:08ed48f1de7f 235 if (largecnt) {
AnnaBridge 184:08ed48f1de7f 236 event_timer();
AnnaBridge 184:08ed48f1de7f 237 } else {
AnnaBridge 184:08ed48f1de7f 238 us_ticker_irq_handler();
AnnaBridge 184:08ed48f1de7f 239 }
AnnaBridge 178:79309dc6340a 240 }
AnnaBridge 178:79309dc6340a 241 }
AnnaBridge 178:79309dc6340a 242
AnnaBridge 178:79309dc6340a 243
AnnaBridge 178:79309dc6340a 244 /*---------------------------------------------------------------------------*
AnnaBridge 178:79309dc6340a 245 us_ticker HAL APIs
AnnaBridge 178:79309dc6340a 246 *---------------------------------------------------------------------------*/
AnnaBridge 178:79309dc6340a 247 void us_ticker_init(void)
AnnaBridge 178:79309dc6340a 248 {
AnnaBridge 178:79309dc6340a 249 if (us_ticker_inited) {
AnnaBridge 178:79309dc6340a 250 return;
AnnaBridge 178:79309dc6340a 251 }
AnnaBridge 178:79309dc6340a 252
AnnaBridge 178:79309dc6340a 253 us_ticker_inited = 1;
AnnaBridge 178:79309dc6340a 254
AnnaBridge 178:79309dc6340a 255 /*--------------------- GP TIMER INITIALIZATION --------------------------*/
AnnaBridge 178:79309dc6340a 256
AnnaBridge 178:79309dc6340a 257 /* Set up GP0 callback function */
AnnaBridge 178:79309dc6340a 258 adi_tmr_Init(ADI_TMR_DEVICE_GP0, NULL, NULL, false);
AnnaBridge 178:79309dc6340a 259
AnnaBridge 178:79309dc6340a 260 /* Set up GP1 callback function */
AnnaBridge 178:79309dc6340a 261 adi_tmr_Init(ADI_TMR_DEVICE_GP1, GP1CallbackFunction, NULL, true);
AnnaBridge 178:79309dc6340a 262
AnnaBridge 178:79309dc6340a 263 /* Set up GP1 callback function */
AnnaBridge 178:79309dc6340a 264 adi_tmr_Init(ADI_TMR_DEVICE_GP2, GP2CallbackFunction, NULL, true);
AnnaBridge 178:79309dc6340a 265
AnnaBridge 178:79309dc6340a 266 /* Configure GP0 to run at 26MHz */
AnnaBridge 178:79309dc6340a 267 tmrConfig.bCountingUp = true;
AnnaBridge 178:79309dc6340a 268 tmrConfig.bPeriodic = true;
AnnaBridge 178:79309dc6340a 269 tmrConfig.ePrescaler = ADI_TMR_PRESCALER_1; // TMR0 at 26MHz
AnnaBridge 178:79309dc6340a 270 tmrConfig.eClockSource = ADI_TMR_CLOCK_PCLK; // TMR source is PCLK (most examples use HFOSC)
AnnaBridge 178:79309dc6340a 271 tmrConfig.nLoad = 0;
AnnaBridge 178:79309dc6340a 272 tmrConfig.nAsyncLoad = 0;
AnnaBridge 178:79309dc6340a 273 tmrConfig.bReloading = false;
AnnaBridge 178:79309dc6340a 274 tmrConfig.bSyncBypass = true; // Allow x1 prescale: requires PCLK as a clk
AnnaBridge 178:79309dc6340a 275 adi_tmr_ConfigTimer(ADI_TMR_DEVICE_GP0, tmrConfig);
AnnaBridge 178:79309dc6340a 276
AnnaBridge 178:79309dc6340a 277 /* Configure GP1 to have a period 256 times longer than GP0 */
AnnaBridge 178:79309dc6340a 278 tmrConfig.nLoad = 0;
AnnaBridge 178:79309dc6340a 279 tmrConfig.nAsyncLoad = 0;
AnnaBridge 178:79309dc6340a 280 tmrConfig.ePrescaler = ADI_TMR_PRESCALER_256; // TMR1 = 26MHz/256
AnnaBridge 178:79309dc6340a 281 adi_tmr_ConfigTimer(ADI_TMR_DEVICE_GP1, tmrConfig);
AnnaBridge 178:79309dc6340a 282
AnnaBridge 178:79309dc6340a 283 /* Configure GP2 for doing event counts */
AnnaBridge 178:79309dc6340a 284 tmr2Config.bCountingUp = true;
AnnaBridge 178:79309dc6340a 285 tmr2Config.bPeriodic = true;
AnnaBridge 178:79309dc6340a 286 tmr2Config.ePrescaler = ADI_TMR_PRESCALER_256; // TMR2 at 26MHz/256
AnnaBridge 178:79309dc6340a 287 tmr2Config.eClockSource = ADI_TMR_CLOCK_PCLK; // TMR source is PCLK (most examples use HFOSC)
AnnaBridge 178:79309dc6340a 288 tmr2Config.nLoad = 0;
AnnaBridge 178:79309dc6340a 289 tmr2Config.nAsyncLoad = 0;
AnnaBridge 178:79309dc6340a 290 tmr2Config.bReloading = false;
AnnaBridge 178:79309dc6340a 291 tmr2Config.bSyncBypass = true; // Allow x1 prescale
AnnaBridge 178:79309dc6340a 292 adi_tmr_ConfigTimer(ADI_TMR_DEVICE_GP2, tmr2Config);
AnnaBridge 178:79309dc6340a 293
AnnaBridge 178:79309dc6340a 294
AnnaBridge 178:79309dc6340a 295 /*------------------------- GP TIMER ENABLE ------------------------------*/
AnnaBridge 178:79309dc6340a 296
AnnaBridge 178:79309dc6340a 297 /* Manually enable both timers to get them started at the same time
AnnaBridge 178:79309dc6340a 298 *
AnnaBridge 178:79309dc6340a 299 */
AnnaBridge 178:79309dc6340a 300 adi_tmr_registers[ADI_TMR_DEVICE_GP0]->CTL |= (uint16_t) BITM_TMR_RGB_CTL_EN;
AnnaBridge 178:79309dc6340a 301 adi_tmr_registers[ADI_TMR_DEVICE_GP1]->CTL |= (uint16_t) BITM_TMR_RGB_CTL_EN;
AnnaBridge 178:79309dc6340a 302 }
AnnaBridge 178:79309dc6340a 303
AnnaBridge 178:79309dc6340a 304 uint32_t us_ticker_read()
AnnaBridge 178:79309dc6340a 305 {
AnnaBridge 178:79309dc6340a 306 uint32_t curr_time;
AnnaBridge 178:79309dc6340a 307
AnnaBridge 178:79309dc6340a 308 if (!us_ticker_inited) {
AnnaBridge 178:79309dc6340a 309 us_ticker_init();
AnnaBridge 178:79309dc6340a 310 }
AnnaBridge 178:79309dc6340a 311
AnnaBridge 178:79309dc6340a 312 curr_time = get_current_time();
AnnaBridge 178:79309dc6340a 313
AnnaBridge 178:79309dc6340a 314 return curr_time;
AnnaBridge 178:79309dc6340a 315 }
AnnaBridge 178:79309dc6340a 316
AnnaBridge 178:79309dc6340a 317 void us_ticker_disable_interrupt(void)
AnnaBridge 178:79309dc6340a 318 {
AnnaBridge 178:79309dc6340a 319 adi_tmr_Enable(ADI_TMR_DEVICE_GP2, false);
AnnaBridge 178:79309dc6340a 320 }
AnnaBridge 178:79309dc6340a 321
AnnaBridge 178:79309dc6340a 322 void us_ticker_clear_interrupt(void)
AnnaBridge 178:79309dc6340a 323 {
AnnaBridge 178:79309dc6340a 324 NVIC_ClearPendingIRQ(TMR2_EVT_IRQn);
AnnaBridge 178:79309dc6340a 325 }
AnnaBridge 178:79309dc6340a 326
AnnaBridge 178:79309dc6340a 327 void us_ticker_set_interrupt(timestamp_t timestamp)
AnnaBridge 178:79309dc6340a 328 {
AnnaBridge 178:79309dc6340a 329
AnnaBridge 178:79309dc6340a 330 /* timestamp is when interrupt should fire.
AnnaBridge 178:79309dc6340a 331 *
AnnaBridge 178:79309dc6340a 332 * This MUST not be called if another timer event is currently enabled.
AnnaBridge 178:79309dc6340a 333 *
AnnaBridge 178:79309dc6340a 334 */
AnnaBridge 178:79309dc6340a 335 calc_event_counts(timestamp); // use timestamp to calculate largecnt to control number of timer interrupts
AnnaBridge 184:08ed48f1de7f 336 tmr2Config.ePrescaler = ADI_TMR_PRESCALER_256; // TMR2 at 26MHz/256
AnnaBridge 184:08ed48f1de7f 337 event_timer(); // uses largecnt to initiate timer interrupts
AnnaBridge 178:79309dc6340a 338 }
AnnaBridge 178:79309dc6340a 339
AnnaBridge 178:79309dc6340a 340 /** Set pending interrupt that should be fired right away.
AnnaBridge 178:79309dc6340a 341 *
AnnaBridge 178:79309dc6340a 342 * The ticker should be initialized prior calling this function.
AnnaBridge 178:79309dc6340a 343 *
AnnaBridge 178:79309dc6340a 344 * This MUST not be called if another timer event is currently enabled.
AnnaBridge 178:79309dc6340a 345 */
AnnaBridge 178:79309dc6340a 346 void us_ticker_fire_interrupt(void)
AnnaBridge 178:79309dc6340a 347 {
AnnaBridge 184:08ed48f1de7f 348 largecnt = 1; // set a minimal interval so interrupt fire immediately
AnnaBridge 184:08ed48f1de7f 349 tmr2Config.ePrescaler = ADI_TMR_PRESCALER_1; // TMR2 at 26MHz/1
AnnaBridge 184:08ed48f1de7f 350 event_timer(); // enable the timer and interrupt
AnnaBridge 178:79309dc6340a 351 }
AnnaBridge 178:79309dc6340a 352
AnnaBridge 178:79309dc6340a 353
AnnaBridge 178:79309dc6340a 354 /*
AnnaBridge 178:79309dc6340a 355 ** EOF
AnnaBridge 178:79309dc6340a 356 */