freecalypso-sw: gsm-fw/bsp/abb+spi/abb.c annotate

annotate gsm-fw/bsp/abb+spi/abb.c @ 563:a418c48046ad

L1: l1_init.c compiles

author	Michael Spacefalcon <msokolov@ivan.Harhan.ORG>
date	Fri, 08 Aug 2014 02:28:45 +0000
parents	99e44a92274c
children	1c0033c2fe33

rev	line source
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1 /**********************************************************************************/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	2 /* TEXAS INSTRUMENTS INCORPORATED PROPRIETARY INFORMATION */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	3 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	4 /* Property of Texas Instruments -- For Unrestricted Internal Use Only */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	5 /* Unauthorized reproduction and/or distribution is strictly prohibited. This */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	6 /* product is protected under copyright law and trade secret law as an */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	7 /* unpublished work. Created 1987, (C) Copyright 1997 Texas Instruments. All */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	8 /* rights reserved. */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	9 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	10 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	11 /* Filename : abb.c */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	12 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	13 /* Description : Functions to drive the ABB device. */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	14 /* The Serial Port Interface is used to connect the TI */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	15 /* Analog BaseBand (ABB). */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	16 /* It is assumed that the ABB is connected as the SPI */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	17 /* device 0. */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	18 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	19 /* Author : Pascal PUEL */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	20 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	21 /* Version number : 1.3 */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	22 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	23 /* Date and time : 08/22/03 */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	24 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	25 /* Previous delta : Creation */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	26 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	27 /**********************************************************************************/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	28
150 3c850b416c9a integrating more L1 header files needed by the abb+spi code Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 148 diff changeset	29 #include "../../include/config.h"
540 99e44a92274c gsm-fw/bsp/abb+spi/abb.c: reorder includes as necessitated by new L1 headers Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 154 diff changeset	30 #include "../../include/sys_types.h"
99e44a92274c gsm-fw/bsp/abb+spi/abb.c: reorder includes as necessitated by new L1 headers Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 154 diff changeset	31 #include "../../riviera/rv/general.h"
99e44a92274c gsm-fw/bsp/abb+spi/abb.c: reorder includes as necessitated by new L1 headers Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 154 diff changeset	32 #include "../../nucleus/nucleus.h" // for NUCLEUS functions and types
99e44a92274c gsm-fw/bsp/abb+spi/abb.c: reorder includes as necessitated by new L1 headers Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 154 diff changeset	33
151 d0de2d0a426d more L1 header files brought in Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 150 diff changeset	34 #include "../../L1/include/l1_confg.h"
d0de2d0a426d more L1 header files brought in Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 150 diff changeset	35 #include "../../L1/include/l1_macro.h"
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	36
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	37 #include "abb.h"
151 d0de2d0a426d more L1 header files brought in Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 150 diff changeset	38 #include "../clkm.h" // for wait_ARM_cycles function
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	39 #include "abb_inline.h"
151 d0de2d0a426d more L1 header files brought in Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 150 diff changeset	40 #include "../ulpd.h" // for FRAME_STOP definition
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	41
151 d0de2d0a426d more L1 header files brought in Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 150 diff changeset	42 #include "../../L1/include/l1_types.h"
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	43
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	44 #if 0 // FreeCalypso
151 d0de2d0a426d more L1 header files brought in Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 150 diff changeset	45 #include "buzzer/buzzer.h" // for BZ_KeyBeep_OFF function
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	46 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	47
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	48 #if (VCXO_ALGO == 1)
151 d0de2d0a426d more L1 header files brought in Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 150 diff changeset	49 #include "../../L1/include/l1_ctl.h"
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	50 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	51
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	52 #if (RF_FAM == 35)
152 26472940e5b0 l1_rf<N>.h headers preened Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 151 diff changeset	53 #include "../../L1/cust0/l1_rf35.h"
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	54 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	55
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	56 #if (RF_FAM == 12)
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	57 #include "../../L1/tpudrv/tpudrv12.h"
152 26472940e5b0 l1_rf<N>.h headers preened Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 151 diff changeset	58 #include "../../L1/cust0/l1_rf12.h"
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	59 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	60
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	61 #if (RF_FAM == 10)
152 26472940e5b0 l1_rf<N>.h headers preened Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 151 diff changeset	62 #include "../../L1/cust0/l1_rf10.h"
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	63 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	64
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	65 #if (RF_FAM == 8)
152 26472940e5b0 l1_rf<N>.h headers preened Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 151 diff changeset	66 #include "../../L1/cust0/l1_rf8.h"
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	67 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	68
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	69 #if (RF_FAM == 2)
152 26472940e5b0 l1_rf<N>.h headers preened Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 151 diff changeset	70 #include "../../L1/cust0/l1_rf2.h"
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	71 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	72
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	73 #if (ABB_SEMAPHORE_PROTECTION)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	74
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	75 static NU_SEMAPHORE abb_sem;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	76
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	77 /-----------------------------------------------------------------------/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	78 /* ABB_Sem_Create() */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	79 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	80 /* This function creates the Nucleus semaphore to protect ABB accesses */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	81 /* against preemption. */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	82 /* No check on the result. */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	83 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	84 /-----------------------------------------------------------------------/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	85 void ABB_Sem_Create(void)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	86 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	87 // create a semaphore with an initial count of 1 and with FIFO type suspension.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	88 NU_Create_Semaphore(&abb_sem, "ABB_SEM", 1, NU_FIFO);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	89 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	90
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	91 #endif // ABB_SEMAPHORE_PROTECTION
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	92
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	93 /-----------------------------------------------------------------------/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	94 /* ABB_Wait_IBIC_Access() */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	95 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	96 /* This function waits for the first IBIC access. */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	97 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	98 /-----------------------------------------------------------------------/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	99 void ABB_Wait_IBIC_Access(void)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	100 {
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	101 #if (ANALOG ==1)
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	102 // Wait 6 OSCAS cycles (100 KHz) for first IBIC access
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	103 // (i.e wait 60us + 10% security marge = 66us)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	104 wait_ARM_cycles(convert_nanosec_to_cycles(66000));
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	105 #elif ((ANALOG ==2) \|\| (ANALOG == 3))
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	106 // Wait 6 x 32 KHz clock cycles for first IBIC access
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	107 // (i.e wait 187us + 10% security marge = 210us)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	108 wait_ARM_cycles(convert_nanosec_to_cycles(210000));
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	109 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	110 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	111
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	112
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	113
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	114 /-----------------------------------------------------------------------/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	115 /* ABB_Write_Register_on_page() */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	116 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	117 /* This function manages all the spi serial transfer to write to an */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	118 /* ABB register on a specified page. */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	119 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	120 /-----------------------------------------------------------------------/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	121 void ABB_Write_Register_on_page(SYS_UWORD16 page, SYS_UWORD16 reg_id, SYS_UWORD16 value)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	122 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	123 volatile SYS_UWORD16 status;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	124
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	125 // Start spi clock, mask IT for WR and read SPI_REG_STATUS to reset the RE and WE flags.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	126 SPI_Ready_for_WR
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	127 status = * (volatile SYS_UWORD16 *) SPI_REG_STATUS;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	128
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	129 #if ((ABB_SEMAPHORE_PROTECTION == 1) \|\| (ABB_SEMAPHORE_PROTECTION == 2) \|\| (ABB_SEMAPHORE_PROTECTION == 3))
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	130
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	131 // check if the semaphore has been correctly created and try to obtain it.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	132 // if the semaphore cannot be obtained, the task is suspended and then resumed
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	133 // as soon as the semaphore is released.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	134 if(&abb_sem != 0)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	135 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	136 NU_Obtain_Semaphore(&abb_sem, NU_SUSPEND);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	137 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	138 #endif // ABB_SEMAPHORE_PROTECTION
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	139
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	140 // set the ABB page for register access
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	141 ABB_SetPage(page);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	142
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	143 // Write value in reg_id
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	144 ABB_WriteRegister(reg_id, value);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	145
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	146 // set the ABB page for register access at page 0
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	147 ABB_SetPage(PAGE0);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	148
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	149 #if ((ABB_SEMAPHORE_PROTECTION == 1) \|\| (ABB_SEMAPHORE_PROTECTION == 2) \|\| (ABB_SEMAPHORE_PROTECTION == 3))
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	150 // release the semaphore only if it has correctly been created.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	151 if(&abb_sem != 0)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	152 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	153 NU_Release_Semaphore(&abb_sem);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	154 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	155 #endif // ABB_SEMAPHORE_PROTECTION
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	156
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	157 // Stop the SPI clock
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	158 #ifdef SPI_CLK_LOW_POWER
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	159 SPI_CLK_DISABLE
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	160 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	161 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	162
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	163
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	164 /-----------------------------------------------------------------------/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	165 /* ABB_Read_Register_on_page() */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	166 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	167 /* This function manages all the spi serial transfer to read one */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	168 /* ABB register on a specified page. */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	169 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	170 /* Returns the real data value of the register. */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	171 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	172 /-----------------------------------------------------------------------/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	173 SYS_UWORD16 ABB_Read_Register_on_page(SYS_UWORD16 page, SYS_UWORD16 reg_id)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	174 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	175 volatile SYS_UWORD16 status;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	176 SYS_UWORD16 reg_val;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	177
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	178 // Start spi clock, mask IT for RD and WR and read SPI_REG_STATUS to reset the RE and WE flags.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	179 SPI_Ready_for_RDWR
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	180 status = * (volatile SYS_UWORD16 *) SPI_REG_STATUS;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	181
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	182 #if ((ABB_SEMAPHORE_PROTECTION == 1) \|\| (ABB_SEMAPHORE_PROTECTION == 2) \|\| (ABB_SEMAPHORE_PROTECTION == 3))
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	183
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	184 // check if the semaphore has been correctly created and try to obtain it.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	185 // if the semaphore cannot be obtained, the task is suspended and then resumed
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	186 // as soon as the semaphore is released.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	187 if(&abb_sem != 0)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	188 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	189 NU_Obtain_Semaphore(&abb_sem, NU_SUSPEND);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	190 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	191 #endif // ABB_SEMAPHORE_PROTECTION
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	192
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	193 /* set the ABB page for register access */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	194 ABB_SetPage(page);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	195
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	196 /* Read selected ABB register */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	197 reg_val = ABB_ReadRegister(reg_id);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	198
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	199 /* set the ABB page for register access at page 0 */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	200 ABB_SetPage(PAGE0);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	201
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	202 #if ((ABB_SEMAPHORE_PROTECTION == 1) \|\| (ABB_SEMAPHORE_PROTECTION == 2) \|\| (ABB_SEMAPHORE_PROTECTION == 3))
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	203 // release the semaphore only if it has correctly been created.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	204 if(&abb_sem != 0)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	205 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	206 NU_Release_Semaphore(&abb_sem);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	207 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	208 #endif // ABB_SEMAPHORE_PROTECTION
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	209
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	210 // Stop the SPI clock
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	211 #ifdef SPI_CLK_LOW_POWER
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	212 SPI_CLK_DISABLE
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	213 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	214
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	215 return (reg_val); // Return result
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	216 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	217
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	218 /------------------------------------------------------------------------/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	219 /* ABB_free_13M() */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	220 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	221 /* This function sets the 13M clock working in ABB. A wait loop */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	222 /* is required to allow first slow access to ABB clock register. */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	223 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	224 /* WARNING !! : this function must not be protected by semaphore !! */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	225 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	226 /------------------------------------------------------------------------/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	227 void ABB_free_13M(void)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	228 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	229 volatile SYS_UWORD16 status;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	230
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	231 // Start spi clock, mask IT for WR and read SPI_REG_STATUS to reset the RE and WE flags.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	232 SPI_Ready_for_WR
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	233 status = * (volatile SYS_UWORD16 *) SPI_REG_STATUS;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	234
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	235 ABB_SetPage(PAGE0);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	236
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	237 // This transmission frees the CLK13 in ABB.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	238 ABB_WriteRegister(TOGBR2, 0x08);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	239
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	240 // Wait for first IBIC access
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	241 ABB_Wait_IBIC_Access();
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	242
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	243 // SW Workaround : This transmission has to be done twice.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	244 ABB_WriteRegister(TOGBR2, 0x08);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	245
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	246 // Wait for first IBIC access
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	247 ABB_Wait_IBIC_Access();
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	248
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	249 // Stop the SPI clock
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	250 #ifdef SPI_CLK_LOW_POWER
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	251 SPI_CLK_DISABLE
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	252 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	253 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	254
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	255
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	256
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	257 /------------------------------------------------------------------------/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	258 /* ABB_stop_13M() */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	259 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	260 /* This function stops the 13M clock in ABB. */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	261 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	262 /------------------------------------------------------------------------/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	263 void ABB_stop_13M(void)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	264 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	265 volatile SYS_UWORD16 status;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	266
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	267 // Start spi clock, mask IT for WR and read SPI_REG_STATUS to reset the RE and WE flags.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	268 SPI_Ready_for_WR
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	269 status = * (volatile SYS_UWORD16 *) SPI_REG_STATUS;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	270
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	271 ABB_SetPage(PAGE0);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	272
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	273 // Set ACTIVMCLK = 0.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	274 ABB_WriteRegister(TOGBR2, 0x04);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	275
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	276 // Wait for first IBIC access
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	277 ABB_Wait_IBIC_Access();
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	278
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	279 // Stop the SPI clock
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	280 #ifdef SPI_CLK_LOW_POWER
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	281 SPI_CLK_DISABLE
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	282 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	283 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	284
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	285
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	286
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	287 /------------------------------------------------------------------------/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	288 /* ABB_Read_Status() */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	289 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	290 /* This function reads and returns the value of VRPCSTS ABB register. */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	291 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	292 /------------------------------------------------------------------------/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	293 SYS_UWORD16 ABB_Read_Status(void)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	294 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	295 volatile SYS_UWORD16 status;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	296 SYS_UWORD16 reg_val;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	297
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	298 // Start spi clock, mask IT for WR and read SPI_REG_STATUS to reset the RE and WE flags.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	299 SPI_Ready_for_WR
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	300 status = * (volatile SYS_UWORD16 *) SPI_REG_STATUS;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	301
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	302 #if ((ABB_SEMAPHORE_PROTECTION == 2) \|\| (ABB_SEMAPHORE_PROTECTION == 3))
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	303
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	304 // check if the semaphore has been correctly created and try to obtain it.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	305 // if the semaphore cannot be obtained, the task is suspended and then resumed
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	306 // as soon as the semaphore is released.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	307 if(&abb_sem != 0)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	308 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	309 NU_Obtain_Semaphore(&abb_sem, NU_SUSPEND);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	310 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	311 #endif // ABB_SEMAPHORE_PROTECTION
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	312
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	313 ABB_SetPage(PAGE0);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	314
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	315 #if (ANALOG == 1) \|\| (ANALOG == 2)
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	316 ABB_SetPage(PAGE0);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	317 reg_val = ABB_ReadRegister(VRPCSTS);
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	318 #elif (ANALOG == 3)
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	319 ABB_SetPage(PAGE1);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	320 reg_val = ABB_ReadRegister(VRPCCFG);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	321 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	322
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	323 #if ((ABB_SEMAPHORE_PROTECTION == 2) \|\| (ABB_SEMAPHORE_PROTECTION == 3))
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	324 // release the semaphore only if it has correctly been created.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	325 if(&abb_sem != 0)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	326 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	327 NU_Release_Semaphore(&abb_sem);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	328 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	329 #endif // ABB_SEMAPHORE_PROTECTION
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	330
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	331 // Stop the SPI clock
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	332 #ifdef SPI_CLK_LOW_POWER
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	333 SPI_CLK_DISABLE
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	334 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	335
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	336 return (reg_val);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	337 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	338
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	339 /------------------------------------------------------------------------/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	340 /* ABB_on() */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	341 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	342 /* This function configures ABB registers to work in ON condition */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	343 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	344 /------------------------------------------------------------------------/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	345 void ABB_on(SYS_UWORD16 modules, SYS_UWORD8 bRecoveryFlag)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	346 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	347 volatile SYS_UWORD16 status;
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	348 #if ((ANALOG ==2) \|\| (ANALOG == 3))
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	349 SYS_UWORD32 reg;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	350 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	351
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	352 // a possible cause of the recovery is that ABB is on Oscas => switch from Oscas to CLK13
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	353 if (bRecoveryFlag)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	354 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	355 // RESTITUTE 13MHZ CLOCK TO ABB
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	356 //---------------------------------------------------
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	357 ABB_free_13M();
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	358
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	359 // RESTITUTE 13MHZ CLOCK TO ABB AGAIN (C.F. BUG1719)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	360 //---------------------------------------------------
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	361 ABB_free_13M();
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	362 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	363
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	364 // Start spi clock, mask IT for RD and WR and read SPI_REG_STATUS to reset the RE and WE flags.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	365 SPI_Ready_for_RDWR
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	366 status = * (volatile SYS_UWORD16 *) SPI_REG_STATUS;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	367
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	368 #if (ABB_SEMAPHORE_PROTECTION == 3)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	369
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	370 // check if the semaphore has been correctly created and try to obtain it.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	371 // if the semaphore cannot be obtained, the task is suspended and then resumed
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	372 // as soon as the semaphore is released.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	373 if(&abb_sem != 0)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	374 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	375 NU_Obtain_Semaphore(&abb_sem, NU_SUSPEND);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	376 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	377 #endif // ABB_SEMAPHORE_PROTECTION
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	378
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	379 ABB_SetPage(PAGE0);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	380
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	381 // This transmission disables MADC,AFC,VDL,VUL modules.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	382 ABB_WriteRegister(TOGBR1, 0x0155);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	383
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	384 #if (ANALOG == 1)
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	385 // This transmission disables Band gap fast mode Enable BB charge.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	386 ABB_WriteRegister(VRPCCTL2, 0x1fc);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	387
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	388 /* ********* DC/DC enabling selection ************************************************************ */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	389 // This transmission changes the register page in OMEGA for usp to pg1.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	390 ABB_SetPage(PAGE1);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	391
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	392 /* Insert here accesses to modify DC/DC parameters. Default is a switching frequency of 240 Khz */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	393 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	394 SYS_UWORD8 vrpcctrl3_data;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	395
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	396 #if (CHIPSET == 9) \|\| (CHIPSET == 10) \|\| (CHIPSET == 11)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	397 vrpcctrl3_data = 0x007d; // core voltage 1.4V for C035
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	398 #else
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	399 vrpcctrl3_data = 0x00bd; // core voltage 1.8V for C05
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	400 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	401
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	402 if(modules & DCDC) // check if the DCDC is enabled
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	403 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	404 vrpcctrl3_data \|= 0x0002; // set DCDCEN
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	405 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	406
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	407 // This access disables the DCDC.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	408 ABB_WriteRegister(VRPCCTRL3, vrpcctrl3_data);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	409 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	410
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	411 /* ********************** SELECTION OF TEST MODE FOR ABB ************************************** */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	412 /* This test configuration allows visibility on BULENA,BULON,BDLON,BDLENA on test pins */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	413 /* ***************************************************************************************************/
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	414 #if (BOARD==6)&& (ANALOG==1) //BUG01967 to remove access to TAPCTRL (EVA4 board and Nausica)
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	415 // This transmission enables Omega test register.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	416 ABB_WriteRegister(TAPCTRL, 0x01);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	417
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	418 // This transmission select Omega test instruction.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	419 ABB_WriteRegister(TAPREG, TSPTEST1);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	420
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	421 // This transmission disables Omega test register.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	422 ABB_WriteRegister(TAPCTRL, 0x00);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	423 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	424 /* *************************************************************************************************** */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	425
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	426 if (!bRecoveryFlag) // Check recovery status from L1, prevent G23 SIM issue
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	427 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	428 // This transmission changes SIM power supply to 3 volts.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	429 ABB_WriteRegister(VRPCCTRL1, 0x45);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	430 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	431
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	432 ABB_SetPage(PAGE0);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	433
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	434 // This transmission enables selected OMEGA modules.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	435 ABB_WriteRegister(TOGBR1, (modules & ~DCDC) >> 6);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	436
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	437 if(modules & MADC) // check if the ADC is enabled
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	438 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	439 // This transmission connects the resistive divider to MB and BB.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	440 ABB_WriteRegister(BCICTL1, 0x0005);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	441 }
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	442 #elif ((ANALOG == 2) \|\| (ANALOG == 3))
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	443 // Restore the ABB checks and debouncing if start on TESTRESETZ
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	444
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	445 // This transmission changes the register page in the ABB for usp to pg1.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	446 ABB_SetPage(PAGE1);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	447
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	448 // This transmission sets the AFCCK to CKIN/2.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	449 ABB_WriteRegister(AFCCTLADD, 0x01);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	450
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	451 // This transmission enables the tapreg.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	452 ABB_WriteRegister(TAPCTRL, 0x01);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	453
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	454 // This transmission enables access to page 2.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	455 ABB_WriteRegister(TAPREG, 0x01b);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	456
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	457 // This transmission changes the register page in the ABB for usp to pg2.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	458 ABB_SetPage(PAGE2);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	459
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	460 #if (ANALOG == 2)
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	461 // Restore push button environment
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	462 ABB_WriteRegister(0x3C, 0x07);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	463
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	464 #elif (ANALOG == 3)
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	465
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	466 // Restore push button environment
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	467 ABB_WriteRegister(0x3C, 0xBF);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	468
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	469 /* ********************** SELECTION OF BBCFG CONFIG FOR ABB 3 PG1_0 *****************************/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	470 #if (ANLG_PG == S_PG_10) // SYREN PG1.0 ON ESAMPLE
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	471 ABB_WriteRegister(BBCFG, C_BBCFG); // Initialize transmit register
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	472 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	473 // This transmission enables access to page 0.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	474 ABB_SetPage(PAGE0);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	475
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	476 // reset bit MSKINT1 , if set by TESTRESET
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	477 reg=ABB_ReadRegister(VRPCSTS) & 0xffe;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	478
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	479 ABB_WriteRegister(VRPCSTS, reg);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	480
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	481 ABB_SetPage(PAGE2);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	482
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	483 // Restore default for BG behavior in sleep mode
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	484 ABB_WriteRegister(VRPCAUX, 0xBF);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	485
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	486 // Restore default for deboucing length
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	487 ABB_WriteRegister(VRPCLDO, 0x00F);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	488
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	489 // Restore default for INT1 generation, wait time in switch on, checks in switch on
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	490 ABB_WriteRegister(VRPCABBTST, 0x0002);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	491
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	492 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	493
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	494 // This transmission changes the register page in the ABB for usp to pg1.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	495 ABB_SetPage(PAGE1);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	496
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	497 // This transmission sets tapinst to id code.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	498 ABB_WriteRegister(TAPREG, 0x0001);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	499
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	500 // This transmission disables TAPREG access.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	501 ABB_WriteRegister(TAPCTRL, 0x00);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	502
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	503 // enable BB battery charge BCICONF register, enable test mode to track BDLEN and BULEN windows
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	504 // This transmission enables BB charge and BB bridge connection for BB measurements.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	505 ABB_WriteRegister(BCICONF, 0x060);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	506
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	507 /* ********************** SELECTION OF BBCFG CONFIG FOR ABB 3 PG2_0 *****************************/
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	508 #if (ANALOG == 3)
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	509 #if (ANLG_PG == S_PG_20) // SYREN PG2.0 ON EVACONSO
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	510 ABB_WriteRegister(BBCFG, C_BBCFG); // Initialize transmit register
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	511 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	512 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	513
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	514 /* ********************** SELECTION OF TEST MODE FOR ABB ****************************************/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	515 /* This test configuration allows visibility on test pins TAPCTRL has not to be reset */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	516 /* ****************************************************************************************************/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	517
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	518 // This transmission enables the tapreg.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	519 ABB_WriteRegister(TAPCTRL, 0x01);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	520
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	521 // This transmission select ABB test instruction.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	522 ABB_WriteRegister(TAPREG, TSPEN);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	523
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	524 // This transmission changes the register page in ABB for usp to pg0.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	525 ABB_SetPage(PAGE0);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	526
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	527 // This transmission enables selected ABB modules.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	528 ABB_WriteRegister(TOGBR1, modules >> 6);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	529
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	530 // enable MB & BB resistive bridges for measurements
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	531 if(modules & MADC) // check if the ADC is enabled
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	532 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	533 // This transmission connects the resistive divider to MB and BB.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	534 ABB_WriteRegister(BCICTL1, 0x0001);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	535 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	536
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	537 /******* Sleep definition part ****************/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	538 // This transmission changes the register page in the ABB for usp to pg1.
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	539 #if (ANALOG == 2)
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	540 ABB_SetPage(PAGE1);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	541
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	542 // update the Delay needed by the ABB before going in deep sleep, and clear previous delay value.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	543 reg = ABB_ReadRegister(VRPCCFG) & 0x1e0;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	544
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	545 ABB_WriteRegister(VRPCCFG, (SLPDLY \| reg));
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	546
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	547 // update the ABB mask sleep register (regulator disabled in deep sleep), and clear previous mask value.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	548 reg = ABB_ReadRegister(VRPCMSK) & 0x1e0;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	549 ABB_WriteRegister(VRPCMSK, (MASK_SLEEP_MODE \| reg));
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	550 #elif (ANALOG == 3)
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	551 Syren_Sleep_Config(NORMAL_SLEEP,SLEEP_BG,SLPDLY);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	552 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	553 // This transmission changes the register page in the ABB for usp to pg0.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	554 ABB_SetPage(PAGE0);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	555 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	556
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	557 // SW workaround for initialization of the audio parts of the ABB to avoid white noise
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	558 // C.f. BUG1941
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	559 // Set VDLR and VULR bits
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	560 // Write TOGBR1 register
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	561 // This transmission enables selected ABB modules.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	562 ABB_WriteRegister(TOGBR1, 0x0A);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	563
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	564 // wait for 1 ms
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	565 wait_ARM_cycles(convert_nanosec_to_cycles(1000000));
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	566
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	567 // Reset VDLS and VULS bits
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	568 // Write TOGBR1 register
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	569 // This transmission enables selected ABB modules.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	570 ABB_WriteRegister(TOGBR1, 0x05);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	571
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	572 #if (ABB_SEMAPHORE_PROTECTION == 3)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	573 // release the semaphore only if it has correctly been created.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	574 if(&abb_sem != 0)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	575 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	576 NU_Release_Semaphore(&abb_sem);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	577 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	578 #endif // ABB_SEMAPHORE_PROTECTION
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	579
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	580 // Stop the SPI clock
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	581 #ifdef SPI_CLK_LOW_POWER
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	582 SPI_CLK_DISABLE
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	583 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	584 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	585
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	586
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	587
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	588 /-----------------------------------------------------------------------/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	589 /* ABB_Read_ADC() */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	590 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	591 /* This function manages all the spi serial transfer to read all the */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	592 /* ABB ADC conversion channels. */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	593 /* Stores the result in Buff parameter. */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	594 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	595 /-----------------------------------------------------------------------/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	596 void ABB_Read_ADC(SYS_UWORD16 *Buff)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	597 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	598 volatile SYS_UWORD16 status;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	599
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	600 // Start spi clock, mask IT for RD and WR and read SPI_REG_STATUS to reset the RE and WE flags.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	601 SPI_Ready_for_RDWR
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	602 status = * (volatile SYS_UWORD16 *) SPI_REG_STATUS;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	603
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	604 #if (ABB_SEMAPHORE_PROTECTION == 3)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	605
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	606 // check if the semaphore has been correctly created and try to obtain it.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	607 // if the semaphore cannot be obtained, the task is suspended and then resumed
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	608 // as soon as the semaphore is released.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	609 if(&abb_sem != 0)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	610 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	611 NU_Obtain_Semaphore(&abb_sem, NU_SUSPEND);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	612 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	613 #endif // ABB_SEMAPHORE_PROTECTION
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	614
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	615 // This transmission changes the register page in the ABB for usp to pg0.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	616 ABB_SetPage(PAGE0);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	617
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	618 /* Read all ABB ADC registers */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	619 *Buff++ = ABB_ReadRegister(VBATREG);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	620 *Buff++ = ABB_ReadRegister(VCHGREG);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	621 *Buff++ = ABB_ReadRegister(ICHGREG);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	622 *Buff++ = ABB_ReadRegister(VBKPREG);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	623 *Buff++ = ABB_ReadRegister(ADIN1REG);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	624 *Buff++ = ABB_ReadRegister(ADIN2REG);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	625 *Buff++ = ABB_ReadRegister(ADIN3REG);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	626
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	627 #if (ANALOG ==1)
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	628 *Buff++ = ABB_ReadRegister(ADIN4XREG);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	629 *Buff++ = ABB_ReadRegister(ADIN5YREG);
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	630 #elif (ANALOG ==2)
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	631 *Buff++ = ABB_ReadRegister(ADIN4REG);
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	632 #elif (ANALOG == 3)
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	633 *Buff++ = ABB_ReadRegister(ADIN4REG);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	634 *Buff++ = ABB_ReadRegister(ADIN5REG);
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	635 #endif // ANALOG
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	636
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	637 #if (ABB_SEMAPHORE_PROTECTION == 3)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	638 // release the semaphore only if it has correctly been created.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	639 if(&abb_sem != 0)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	640 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	641 NU_Release_Semaphore(&abb_sem);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	642 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	643 #endif // ABB_SEMAPHORE_PROTECTION
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	644
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	645 // Stop the SPI clock
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	646 #ifdef SPI_CLK_LOW_POWER
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	647 SPI_CLK_DISABLE
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	648 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	649 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	650
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	651
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	652
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	653 /-----------------------------------------------------------------------/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	654 /* ABB_Conf_ADC() */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	655 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	656 /* This function manages all the spi serial transfer to: */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	657 /* - select the ABB ADC channels to be converted */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	658 /* - enable/disable EOC interrupt */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	659 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	660 /-----------------------------------------------------------------------/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	661 void ABB_Conf_ADC(SYS_UWORD16 Channels, SYS_UWORD16 ItVal)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	662 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	663 volatile SYS_UWORD16 status;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	664 SYS_UWORD16 reg_val;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	665
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	666 // Start spi clock, mask IT for RD and WR and read SPI_REG_STATUS to reset the RE and WE flags.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	667 SPI_Ready_for_RDWR
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	668 status = * (volatile SYS_UWORD16 *) SPI_REG_STATUS;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	669
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	670 #if (ABB_SEMAPHORE_PROTECTION == 3)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	671
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	672 // check if the semaphore has been correctly created and try to obtain it.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	673 // if the semaphore cannot be obtained, the task is suspended and then resumed
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	674 // as soon as the semaphore is released.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	675 if(&abb_sem != 0)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	676 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	677 NU_Obtain_Semaphore(&abb_sem, NU_SUSPEND);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	678 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	679 #endif // ABB_SEMAPHORE_PROTECTION
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	680
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	681 // This transmission changes the register page in the ABB for usp to pg0.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	682 ABB_SetPage(PAGE0);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	683
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	684 /* select ADC channels to be converted */
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	685 #if (ANALOG == 1)
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	686 ABB_WriteRegister(MADCCTRL1, Channels);
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	687 #elif ((ANALOG == 2) \|\| (ANALOG == 3))
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	688 ABB_WriteRegister(MADCCTRL, Channels);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	689 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	690
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	691 reg_val = ABB_ReadRegister(ITMASK);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	692
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	693 // This transmission configure the End Of Conversion IT without modifying other bits in the same register.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	694 if(ItVal == EOC_INTENA)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	695 ABB_WriteRegister(ITMASK, reg_val & EOC_INTENA);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	696 else if(ItVal == EOC_INTMASK)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	697 ABB_WriteRegister(ITMASK, reg_val \| EOC_INTMASK);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	698
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	699 #if (ABB_SEMAPHORE_PROTECTION == 3)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	700 // release the semaphore only if it has correctly been created.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	701 if(&abb_sem != 0)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	702 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	703 NU_Release_Semaphore(&abb_sem);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	704 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	705 #endif // ABB_SEMAPHORE_PROTECTION
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	706
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	707 // Stop the SPI clock
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	708 #ifdef SPI_CLK_LOW_POWER
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	709 SPI_CLK_DISABLE
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	710 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	711 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	712
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	713
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	714
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	715
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	716 /------------------------------------------------------------------------/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	717 /* ABB_sleep() */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	718 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	719 /* This function disables the DCDC and returns to PAGE 0. It stops then */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	720 /* the 13MHz clock in ABB. A wait loop s required to allow */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	721 /* first slow access to ABB clock register. */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	722 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	723 /* WARNING !! : this function must not be protected by semaphore !! */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	724 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	725 /* Returns AFC value. */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	726 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	727 /------------------------------------------------------------------------/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	728 SYS_UWORD32 ABB_sleep(SYS_UWORD8 sleep_performed, SYS_WORD16 afc)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	729 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	730 volatile SYS_UWORD16 status;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	731 SYS_UWORD32 afcout_index;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	732 volatile SYS_UWORD16 nb_it;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	733 SYS_UWORD16 reg_val;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	734
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	735 // table for AFC allowed values during Sleep mode. First 5th elements
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	736 // are related to positive AFC values, last 5th to negative ones.
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	737 static const SYS_UWORD32 Afcout_T[10] =
47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	738 {0x0f,0x1f,0x3f,0x7f,0xff,0x00,0x01,0x03,0x07,0x0f};
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	739
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	740 // Start spi clock, mask IT for RD and WR and read SPI_REG_STATUS to reset the RE and WE flags.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	741 SPI_Ready_for_RDWR
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	742 status = * (volatile SYS_UWORD16 *) SPI_REG_STATUS;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	743
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	744 // COMPUTATION AND PROGRAMMING OF AFC VALUE
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	745 //---------------------------------------------------
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	746 if(afc & 0x1000)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	747 afcout_index = ((afc + 512)>>10) + 1;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	748 else
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	749 afcout_index = (afc + 512)>>10;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	750
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	751 if (sleep_performed == FRAME_STOP) // Big sleep
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	752 {
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	753 #if ((ANALOG == 2) \|\| (ANALOG == 3))
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	754 //////////// ADD HERE IOTA or SYREN CONFIGURATION FOR BIG SLEEP ////////////////////////////
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	755 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	756
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	757 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	758 else // Deep sleep
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	759 {
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	760 #if(ANALOG == 1)
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	761 // SELECTION OF AFC TEST MODE FOR OMEGA
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	762 //---------------------------------------------------
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	763 // This test configuration allows access on the AFCOUT register
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	764 ABB_SetPage(PAGE1);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	765
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	766 // This transmission enables OMEGA test register.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	767 ABB_WriteRegister(TAPCTRL, 0x01);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	768
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	769 // This transmission selects OMEGA test instruction.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	770 ABB_WriteRegister(TAPREG, AFCTEST);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	771
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	772 // Set AFCOUT to 0.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	773 ABB_WriteRegister(AFCOUT, 0x00 >> 6);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	774
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	775 ABB_SetPage(PAGE0);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	776
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	777 #elif (ANALOG == 2)
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	778 // This configuration allows access on the AFCOUT register
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	779 ABB_SetPage(PAGE1);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	780
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	781 // Read AFCCTLADD value and enable USP access to AFCOUT register
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	782 reg_val = (ABB_ReadRegister(AFCCTLADD) \| 0x04);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	783
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	784 ABB_WriteRegister(AFCCTLADD, reg_val);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	785
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	786 // Set AFCOUT to 0.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	787 ABB_WriteRegister(AFCOUT, 0x00);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	788
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	789 // Read BCICONF value and cut the measurement bridge of BB cut the BB charge.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	790 reg_val = ABB_ReadRegister(BCICONF) & 0x039f;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	791
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	792 ABB_WriteRegister(BCICONF, reg_val);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	793
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	794 // Disable the ABB test mode
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	795 ABB_WriteRegister(TAPCTRL, 0x00);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	796
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	797 ABB_SetPage(PAGE0);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	798
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	799 // Read BCICTL1 value and cut the measurement bridge of MB.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	800 reg_val = ABB_ReadRegister(BCICTL1) & 0x03fe;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	801
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	802 ABB_WriteRegister(BCICTL1, reg_val);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	803 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	804
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	805 #if (ANALOG == 3) // Nothing to be done as MB and BB measurement bridges are automatically disconnected
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	806 // in Syren during sleep mode. BB charge stays enabled
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	807 ABB_SetPage(PAGE1); // Initialize transmit reg_num. This transmission
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	808 // change the register page in IOTA for usp to pg1
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	809
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	810 ABB_WriteRegister(TAPCTRL, 0x00); // Disable Syren test mode
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	811
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	812 ABB_SetPage(PAGE0);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	813 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	814
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	815 // switch off MADC, AFC, AUXDAC, VOICE.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	816 ABB_WriteRegister(TOGBR1, 0x155);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	817
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	818 // Switch off Analog supply LDO
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	819 //-----------------------------
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	820 #if (ANALOG == 1)
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	821 ABB_SetPage(PAGE1);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	822
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	823 // Read VRPCCTL3 register value and switch off VR3.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	824 reg_val = ABB_ReadRegister(VRPCCTRL3) & 0x3df;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	825
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	826 ABB_WriteRegister(VRPCCTRL3, reg_val);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	827
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	828 #elif (ANALOG == 2)
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	829 // Read VRPCSTS register value and extract status of meaningfull inputs.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	830 reg_val = ABB_ReadRegister(VRPCSTS) & 0x0070;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	831
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	832 if (reg_val == 0x30)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	833 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	834 // start the SLPDLY counter in order to switch the ABB in sleep mode. This transmission sets IOTA sleep bit.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	835 ABB_WriteRegister(VRPCDEV, 0x02);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	836 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	837
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	838 // Dummy transmission to clean of ABB bus. This transmission accesses IOTA address 0 in "read".
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	839 ABB_WriteRegister(0x0000 \| 0x0001, 0x0000);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	840
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	841 #elif (ANALOG == 3)
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	842 // In Syren there is no need to check for VRPCCFG as wake up prioritys are changed
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	843 // start the SLPDLY counter in order to switch the ABB in sleep mode
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	844 ABB_WriteRegister(VRPCDEV,0x02); // Initialize transmit reg_num. This transmission
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	845 // set Syren sleep bit
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	846 /*
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	847 // Dummy transmission to clean of ABB bus. This transmission accesses SYREN address 0 in "read".
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	848 ABB_WriteRegister(0x0000 \| 0x0001, 0x0000);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	849 */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	850 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	851
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	852 // Switch to low frequency clock
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	853 ABB_stop_13M();
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	854 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	855
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	856 // Stop the SPI clock
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	857 #ifdef SPI_CLK_LOW_POWER
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	858 SPI_CLK_DISABLE
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	859 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	860
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	861 #if (OP_L1_STANDALONE == 1)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	862 #if (CHIPSET == 12)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	863 // GPIO_InitAllPull(ALL_ONE); // enable all GPIO internal pull
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	864 // workaround to set APLL_DIV_CLK( internal PU) at high level
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	865 // by default APLL_DIV_CLK is low pulling 80uA on VRIO
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	866 // (SYS_UWORD16) (0xFFFFFD90)= 0x01;//CNTL_APLL_DIV_CLK -> APLL_CLK_DIV != 0
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	867 // (SYS_UWORD16) (0xFFFEF030)= 0x10;// DPLL mode
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	868 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	869 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	870 return(Afcout_T[afcout_index]);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	871 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	872
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	873
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	874 /------------------------------------------------------------------------/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	875 /* ABB_wakeup() */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	876 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	877 /* This function sets the 13MHz clock working in ABB. A wait loop */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	878 /* is required to allow first slow access to ABB clock register. */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	879 /* Then it re-enables DCDC and returns to PAGE 0. */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	880 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	881 /* WARNING !! : this function must not be protected by semaphore !! */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	882 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	883 /------------------------------------------------------------------------/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	884 void ABB_wakeup(SYS_UWORD8 sleep_performed, SYS_WORD16 afc)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	885 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	886 volatile SYS_UWORD16 status;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	887 SYS_UWORD16 reg_val;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	888
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	889 // Start spi clock, mask IT for RD and WR and read SPI_REG_STATUS to reset the RE and WE flags.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	890 SPI_Ready_for_RDWR
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	891 status = * (volatile SYS_UWORD16 *) SPI_REG_STATUS;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	892
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	893 if (sleep_performed == FRAME_STOP) // Big sleep
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	894 {
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	895 #if ((ANALOG == 2) \|\| (ANALOG == 3))
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	896 //////////// ADD HERE IOTA or SYREN CONFIGURATION FOR BIG SLEEP WAKEUP ////////////////////////////
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	897 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	898 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	899 else // Deep sleep
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	900 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	901 #if (OP_L1_STANDALONE == 1)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	902 #if (CHIPSET == 12)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	903 // restore context from
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	904 // workaround to set APLL_DIV_CLK( internal PU) at high level
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	905 // by default APLL_DIV_CLK is low pulling 80uA on VRIO
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	906 // (SYS_UWORD16) (0xFFFFFD90)= 0x00;//CNTL_APLL_DIV_CLK -> APLL_DIV_CLK != 0
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	907 // (SYS_UWORD16) (0xFFFEF030)= 0x00;// DPLL mode
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	908 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	909 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	910
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	911 // Restitutes 13MHZ Clock to ABB
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	912 ABB_free_13M();
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	913
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	914 // Switch ON Analog supply LDO
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	915 #if (ANALOG == 1)
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	916 ABB_SetPage(PAGE1);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	917
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	918 // Read VRPCCTL3 register value and switch on VR3.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	919 reg_val = ABB_ReadRegister(VRPCCTRL3) \| 0x020;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	920
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	921 ABB_WriteRegister(VRPCCTRL3, reg_val);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	922 ABB_SetPage(PAGE0);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	923 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	924
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	925 // This transmission switches on MADC, AFC.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	926 ABB_WriteRegister(TOGBR1, 0x280);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	927
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	928 // This transmission sets the AUXAFC2.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	929 ABB_WriteRegister(AUXAFC2, ((afc>>10) & 0x7));
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	930
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	931 // This transmission sets the AUXAFC1.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	932 ABB_WriteRegister(AUXAFC1, (afc & 0x3ff));
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	933
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	934 #if (ANALOG == 1)
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	935 // Remove AFC test mode
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	936 ABB_SetPage(PAGE1);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	937
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	938 // This transmission select Omega test instruction.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	939 ABB_WriteRegister(TAPREG, TSPTEST1);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	940
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	941 // Disable test mode selection
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	942 // This transmission disables Omega test register.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	943 ABB_WriteRegister(TAPCTRL, 0x00 >> 6);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	944
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	945 ABB_SetPage(PAGE0);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	946
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	947 #elif (ANALOG == 2)
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	948 ABB_SetPage(PAGE1);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	949
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	950 // Read AFCCTLADD register value and disable USP access to AFCOUT register.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	951 reg_val = ABB_ReadRegister(AFCCTLADD) & ~0x04;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	952
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	953 ABB_WriteRegister(AFCCTLADD, reg_val);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	954
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	955 // Read BCICONF register value and enable BB measurement bridge enable BB charge.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	956 reg_val = ABB_ReadRegister(BCICONF) \| 0x0060;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	957
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	958 ABB_WriteRegister(BCICONF, reg_val);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	959
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	960
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	961 /* *************************************************************************************************** */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	962 // update the Delay needed by the ABB before going in deep sleep, and clear previous delay value.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	963 reg_val = ABB_ReadRegister(VRPCCFG) & 0x1e0;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	964 ABB_WriteRegister(VRPCCFG, (SLPDLY \| reg_val));
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	965
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	966 // Enable the ABB test mode
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	967 ABB_WriteRegister(TAPCTRL, 0x01);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	968 ABB_WriteRegister(TAPREG, TSPEN);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	969 ABB_SetPage(PAGE0);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	970
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	971 // Read BCICTL1 register value and enable MB measurement bridge and cut the measurement bridge of MB.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	972 reg_val = ABB_ReadRegister(BCICTL1) \| 0x0001;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	973
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	974 ABB_WriteRegister(BCICTL1, reg_val);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	975 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	976
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	977 #if (ANALOG == 3)
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	978
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	979 ABB_SetPage(PAGE1);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	980
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	981 /* *************************************************************************************************** */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	982 // update the Delay needed by the ABB before going in deep sleep, and clear previous delay value.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	983 reg_val = ABB_ReadRegister(VRPCCFG) & 0x1e0;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	984 ABB_WriteRegister(VRPCCFG, (SLPDLY \| reg_val));
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	985
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	986 /* ********************** SELECTION OF TEST MODE FOR ABB=3 ***************************************/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	987 /* This test configuration allows visibility on test pins TAPCTRL has not to be reset */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	988 /* ****************************************************************************************************/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	989
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	990 ABB_WriteRegister(TAPCTRL, 0x01); // Initialize the transmit register
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	991 // This transmission enables IOTA test register
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	992
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	993 ABB_WriteRegister(TAPREG, TSPEN);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	994 // This transmission select IOTA test instruction
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	995 // This transmission select IOTA test instruction
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	996 /**************************************************************************************************** */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	997
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	998 ABB_SetPage(PAGE0); // Initialize transmit reg_num. This transmission
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	999 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1000 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1001
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1002 // Stop the SPI clock
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1003 #ifdef SPI_CLK_LOW_POWER
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1004 SPI_CLK_DISABLE
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1005 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1006 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1007
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1008 /------------------------------------------------------------------------/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1009 /* ABB_wa_VRPC() */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1010 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1011 /* This function initializes the VRPCCTRL1 or VRPCSIM register */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1012 /* according to the ABB used. */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1013 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1014 /------------------------------------------------------------------------/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1015 void ABB_wa_VRPC(SYS_UWORD16 value)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1016 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1017 volatile SYS_UWORD16 status;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1018
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1019 // Start spi clock, mask IT for WR and read SPI_REG_STATUS to reset the RE and WE flags.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1020 SPI_Ready_for_WR
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1021 status = * (volatile SYS_UWORD16 *) SPI_REG_STATUS;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1022
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1023 #if ((ABB_SEMAPHORE_PROTECTION == 1) \|\| (ABB_SEMAPHORE_PROTECTION == 2) \|\| (ABB_SEMAPHORE_PROTECTION == 3))
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1024
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1025 // check if the semaphore has been correctly created and try to obtain it.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1026 // if the semaphore cannot be obtained, the task is suspended and then resumed
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1027 // as soon as the semaphore is released.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1028 if(&abb_sem != 0)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1029 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1030 NU_Obtain_Semaphore(&abb_sem, NU_SUSPEND);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1031 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1032 #endif // ABB_SEMAPHORE_PROTECTION
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1033
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1034 ABB_SetPage(PAGE1);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1035
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	1036 #if (ANALOG == 1)
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1037 // This transmission initializes the VRPCCTL1 register.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1038 ABB_WriteRegister(VRPCCTRL1, value);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1039
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	1040 #elif (ANALOG == 2)
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1041 // This transmission initializes the VRPCSIM register.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1042 ABB_WriteRegister(VRPCSIM, value);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1043
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	1044 #elif (ANALOG == 3)
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1045 // This transmission initializes the VRPCSIMR register.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1046 ABB_WriteRegister(VRPCSIMR, value);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1047
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1048 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1049
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1050 ABB_SetPage(PAGE0);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1051
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1052 #if ((ABB_SEMAPHORE_PROTECTION == 1) \|\| (ABB_SEMAPHORE_PROTECTION == 2) \|\| (ABB_SEMAPHORE_PROTECTION == 3))
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1053 // release the semaphore only if it has correctly been created.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1054 if(&abb_sem != 0)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1055 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1056 NU_Release_Semaphore(&abb_sem);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1057 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1058 #endif // ABB_SEMAPHORE_PROTECTION
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1059
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1060 // Stop the SPI clock
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1061 #ifdef SPI_CLK_LOW_POWER
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1062 SPI_CLK_DISABLE
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1063 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1064 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1065
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1066
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1067 /-----------------------------------------------------------------------/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1068 /* ABB_Write_Uplink_Data() */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1069 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1070 /* This function uses the SPI to write to ABB uplink buffer. */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1071 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1072 /-----------------------------------------------------------------------/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1073 void ABB_Write_Uplink_Data(SYS_UWORD16 *TM_ul_data)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1074 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1075 SYS_UWORD8 i;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1076 volatile SYS_UWORD16 status;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1077
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1078 // Start spi clock, mask IT for WR and read SPI_REG_STATUS to reset the RE and WE flags.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1079 SPI_Ready_for_WR
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1080 status = * (volatile SYS_UWORD16 *) SPI_REG_STATUS;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1081
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1082 // Select Page 0 for TOGBR2
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1083 ABB_SetPage(PAGE0);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1084
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1085 // Initialize pointer of burst buffer 1 : IBUFPTR is bit 10 of TOGBR2
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1086 ABB_WriteRegister(TOGBR2, 0x10);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1087
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1088 // Clear, assuming that it works like IBUFPTR of Vega
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1089 ABB_WriteRegister(TOGBR2, 0x0);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1090
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1091 // Write the ramp data
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1092 for (i=0;i<16;i++)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1093 ABB_WriteRegister(BULDATA1_2, TM_ul_data[i]>>6);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1094
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1095 // Stop the SPI clock
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1096 #ifdef SPI_CLK_LOW_POWER
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1097 SPI_CLK_DISABLE
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1098 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1099 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1100
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1101 //////////////////////// IDEV-INLO integration of sleep mode for Syren ///////////////////////////////////////
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1102
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	1103 #if (ANALOG == 3)
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1104
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1105 // Syren Sleep configuration function --------------------------
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1106 void Syren_Sleep_Config(SYS_UWORD16 sleep_type,SYS_UWORD16 bg_select, SYS_UWORD16 sleep_delay)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1107 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1108 volatile SYS_UWORD16 status,sl_ldo_stat;
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1109
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1110 ABB_SetPage(PAGE1); // Initialize transmit register. This transmission
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1111 // change the register page in ABB for usp to pg1
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1112
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1113 ABB_WriteRegister(VRPCCFG, sleep_delay); // write delay value
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1114
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1115 sl_ldo_stat = ((sleep_type<<9\|bg_select<<8) & 0x0374);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1116
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1117 ABB_WriteRegister(VRPCMSKSLP, sl_ldo_stat); // write sleep ldo configuration
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1118
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1119 ABB_SetPage(PAGE0); // Initialize transmit register. This transmission
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1120 // change the register page in ABB for usp to pg0
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1121 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1122 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1123
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1124
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1125 #if (OP_L1_STANDALONE == 0)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1126 /-----------------------------------------------------------------------/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1127 /* ABB_Power_Off() */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1128 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1129 /* This function uses the SPI to switch off the ABB. */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1130 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1131 /-----------------------------------------------------------------------/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1132 void ABB_Power_Off(void)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1133 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1134 // Wait until all necessary actions are performed (write in FFS, etc...) to power-off the board (empirical value - 30 ticks).
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1135 NU_Sleep (30);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1136
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1137 // Wait also until <ON/OFF> key is released.
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1138 // This is needed to avoid, if the power key is pressed for a long time, to switch
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1139 // ON-switch OFF the mobile, until the power key is released.
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	1140 #if((ANALOG == 1) \|\| (ANALOG == 2))
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1141 while ((ABB_Read_Status() & ONREFLT) == PWR_OFF_KEY_PRESSED) {
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	1142 #elif(ANALOG == 3)
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1143 while ((ABB_Read_Register_on_page(PAGE1, VRPCCFG) & PWOND) == PWR_OFF_KEY_PRESSED) {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1144 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1145
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1146 NU_Sleep (1); }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1147
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	1148 #if 0 // FreeCalypso
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1149 BZ_KeyBeep_OFF();
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	1150 #endif
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1151
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	1152 #if(ANALOG == 1)
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1153 ABB_Write_Register_on_page(PAGE0, VRPCCTL2, 0x00EE);
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	1154 #elif((ANALOG == 2) \|\| (ANALOG == 3))
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1155 ABB_Write_Register_on_page(PAGE0, VRPCDEV, 0x0001);
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1156 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1157 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1158 #endif

FreeCalypso > hg > freecalypso-sw

annotate gsm-fw/bsp/abb+spi/abb.c @ 563:a418c48046ad