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

annotate gsm-fw/bsp/abb+spi/abb.c @ 992:a7b0b426f9ca

target-utils: boot ROM UART autodetection revamped The new implementation should work with both the familiar Calypso C035 boot ROM version found in our regular targets as well as the older Calypso F741979B version found on the vintage D-Sample board.

author	Mychaela Falconia <falcon@ivan.Harhan.ORG>
date	Wed, 30 Dec 2015 21:28:41 +0000
parents	1c0033c2fe33
children

rev	line source
588 1c0033c2fe33 gsm-fw/bsp/abb+spi/abb.c: formatting fixes (line length and tabs) Michael Spacefalcon <msokolov@ivan.Harhan.ORG>* parents: 540 diff changeset	1 /******************************************************************************/
1c0033c2fe33 gsm-fw/bsp/abb+spi/abb.c: formatting fixes (line length and tabs) Michael Spacefalcon <msokolov@ivan.Harhan.ORG>* parents: 540 diff changeset	2 /* TEXAS INSTRUMENTS INCORPORATED PROPRIETARY INFORMATION */
1c0033c2fe33 gsm-fw/bsp/abb+spi/abb.c: formatting fixes (line length and tabs) Michael Spacefalcon <msokolov@ivan.Harhan.ORG>* parents: 540 diff changeset	3 /* */
1c0033c2fe33 gsm-fw/bsp/abb+spi/abb.c: formatting fixes (line length and tabs) Michael Spacefalcon <msokolov@ivan.Harhan.ORG>* parents: 540 diff changeset	4 /* Property of Texas Instruments -- For Unrestricted Internal Use Only */
1c0033c2fe33 gsm-fw/bsp/abb+spi/abb.c: formatting fixes (line length and tabs) Michael Spacefalcon <msokolov@ivan.Harhan.ORG>* parents: 540 diff changeset	5 /* Unauthorized reproduction and/or distribution is strictly prohibited. This*/
1c0033c2fe33 gsm-fw/bsp/abb+spi/abb.c: formatting fixes (line length and tabs) Michael Spacefalcon <msokolov@ivan.Harhan.ORG>* parents: 540 diff changeset	6 /* product is protected under copyright law and trade secret law as an*/
1c0033c2fe33 gsm-fw/bsp/abb+spi/abb.c: formatting fixes (line length and tabs) Michael Spacefalcon <msokolov@ivan.Harhan.ORG>* parents: 540 diff changeset	7 /* unpublished work. Created 1987, (C) Copyright 1997 Texas Instruments. All*/
1c0033c2fe33 gsm-fw/bsp/abb+spi/abb.c: formatting fixes (line length and tabs) Michael Spacefalcon <msokolov@ivan.Harhan.ORG>* parents: 540 diff changeset	8 /* rights reserved. */
1c0033c2fe33 gsm-fw/bsp/abb+spi/abb.c: formatting fixes (line length and tabs) Michael Spacefalcon <msokolov@ivan.Harhan.ORG>* parents: 540 diff changeset	9 /* */
1c0033c2fe33 gsm-fw/bsp/abb+spi/abb.c: formatting fixes (line length and tabs) Michael Spacefalcon <msokolov@ivan.Harhan.ORG>* parents: 540 diff changeset	10 /* */
1c0033c2fe33 gsm-fw/bsp/abb+spi/abb.c: formatting fixes (line length and tabs) Michael Spacefalcon <msokolov@ivan.Harhan.ORG>* parents: 540 diff changeset	11 /* Filename : abb.c */
1c0033c2fe33 gsm-fw/bsp/abb+spi/abb.c: formatting fixes (line length and tabs) Michael Spacefalcon <msokolov@ivan.Harhan.ORG>* parents: 540 diff changeset	12 /* */
1c0033c2fe33 gsm-fw/bsp/abb+spi/abb.c: formatting fixes (line length and tabs) Michael Spacefalcon <msokolov@ivan.Harhan.ORG>* parents: 540 diff changeset	13 /* Description : Functions to drive the ABB device. */
1c0033c2fe33 gsm-fw/bsp/abb+spi/abb.c: formatting fixes (line length and tabs) Michael Spacefalcon <msokolov@ivan.Harhan.ORG>* parents: 540 diff changeset	14 /* The Serial Port Interface is used to connect the TI */
1c0033c2fe33 gsm-fw/bsp/abb+spi/abb.c: formatting fixes (line length and tabs) Michael Spacefalcon <msokolov@ivan.Harhan.ORG>* parents: 540 diff changeset	15 /* Analog BaseBand (ABB). */
1c0033c2fe33 gsm-fw/bsp/abb+spi/abb.c: formatting fixes (line length and tabs) Michael Spacefalcon <msokolov@ivan.Harhan.ORG>* parents: 540 diff changeset	16 /* It is assumed that the ABB is connected as the SPI */
1c0033c2fe33 gsm-fw/bsp/abb+spi/abb.c: formatting fixes (line length and tabs) Michael Spacefalcon <msokolov@ivan.Harhan.ORG>* parents: 540 diff changeset	17 /* device 0. */
1c0033c2fe33 gsm-fw/bsp/abb+spi/abb.c: formatting fixes (line length and tabs) Michael Spacefalcon <msokolov@ivan.Harhan.ORG>* parents: 540 diff changeset	18 /* */
1c0033c2fe33 gsm-fw/bsp/abb+spi/abb.c: formatting fixes (line length and tabs) Michael Spacefalcon <msokolov@ivan.Harhan.ORG>* parents: 540 diff changeset	19 /* Author : Pascal PUEL */
1c0033c2fe33 gsm-fw/bsp/abb+spi/abb.c: formatting fixes (line length and tabs) Michael Spacefalcon <msokolov@ivan.Harhan.ORG>* parents: 540 diff changeset	20 /* */
1c0033c2fe33 gsm-fw/bsp/abb+spi/abb.c: formatting fixes (line length and tabs) Michael Spacefalcon <msokolov@ivan.Harhan.ORG>* parents: 540 diff changeset	21 /* Version number : 1.3 */
1c0033c2fe33 gsm-fw/bsp/abb+spi/abb.c: formatting fixes (line length and tabs) Michael Spacefalcon <msokolov@ivan.Harhan.ORG>* parents: 540 diff changeset	22 /* */
1c0033c2fe33 gsm-fw/bsp/abb+spi/abb.c: formatting fixes (line length and tabs) Michael Spacefalcon <msokolov@ivan.Harhan.ORG>* parents: 540 diff changeset	23 /* Date and time : 08/22/03 */
1c0033c2fe33 gsm-fw/bsp/abb+spi/abb.c: formatting fixes (line length and tabs) Michael Spacefalcon <msokolov@ivan.Harhan.ORG>* parents: 540 diff changeset	24 /* */
1c0033c2fe33 gsm-fw/bsp/abb+spi/abb.c: formatting fixes (line length and tabs) Michael Spacefalcon <msokolov@ivan.Harhan.ORG>* parents: 540 diff changeset	25 /* Previous delta : Creation */
1c0033c2fe33 gsm-fw/bsp/abb+spi/abb.c: formatting fixes (line length and tabs) Michael Spacefalcon <msokolov@ivan.Harhan.ORG>* parents: 540 diff changeset	26 /* */
1c0033c2fe33 gsm-fw/bsp/abb+spi/abb.c: formatting fixes (line length and tabs) Michael Spacefalcon <msokolov@ivan.Harhan.ORG>* parents: 540 diff changeset	27 /******************************************************************************/
148 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.
588 1c0033c2fe33 gsm-fw/bsp/abb+spi/abb.c: formatting fixes (line length and tabs) Michael Spacefalcon <msokolov@ivan.Harhan.ORG>* parents: 540 diff changeset	607 // if the semaphore cannot be obtained, the task is suspended and then resumed
148 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.
588 1c0033c2fe33 gsm-fw/bsp/abb+spi/abb.c: formatting fixes (line length and tabs) Michael Spacefalcon <msokolov@ivan.Harhan.ORG>* parents: 540 diff changeset	673 // if the semaphore cannot be obtained, the task is suspended and then resumed
148 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 @ 992:a7b0b426f9ca