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

annotate gsm-fw/bsp/abb+spi/abb.c @ 215:517dd86b45b1

gsm-fw/services/ffs: fsck.c compiles

author	Michael Spacefalcon <msokolov@ivan.Harhan.ORG>
date	Mon, 06 Jan 2014 07:12:02 +0000
parents	47754cdb6248
children	99e44a92274c

rev	line source
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1 /**********************************************************************************/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	2 /* TEXAS INSTRUMENTS INCORPORATED PROPRIETARY INFORMATION */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	3 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	4 /* Property of Texas Instruments -- For Unrestricted Internal Use Only */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	5 /* Unauthorized reproduction and/or distribution is strictly prohibited. This */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	6 /* product is protected under copyright law and trade secret law as an */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	7 /* unpublished work. Created 1987, (C) Copyright 1997 Texas Instruments. All */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	8 /* rights reserved. */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	9 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	10 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	11 /* Filename : abb.c */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	12 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	13 /* Description : Functions to drive the ABB device. */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	14 /* The Serial Port Interface is used to connect the TI */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	15 /* Analog BaseBand (ABB). */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	16 /* It is assumed that the ABB is connected as the SPI */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	17 /* device 0. */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	18 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	19 /* Author : Pascal PUEL */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	20 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	21 /* Version number : 1.3 */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	22 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	23 /* Date and time : 08/22/03 */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	24 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	25 /* Previous delta : Creation */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	26 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	27 /**********************************************************************************/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	28
150 3c850b416c9a integrating more L1 header files needed by the abb+spi code Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 148 diff changeset	29 #include "../../include/config.h"
151 d0de2d0a426d more L1 header files brought in Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 150 diff changeset	30 #include "../../L1/include/l1_confg.h"
d0de2d0a426d more L1 header files brought in Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 150 diff changeset	31 #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	32
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	33 #include "abb.h"
151 d0de2d0a426d more L1 header files brought in Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 150 diff changeset	34 #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	35 #include "abb_inline.h"
151 d0de2d0a426d more L1 header files brought in Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 150 diff changeset	36 #include "../ulpd.h" // for FRAME_STOP definition
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	37
47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	38 #include "../../include/sys_types.h"
47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	39 #include "../../riviera/rv/general.h"
151 d0de2d0a426d more L1 header files brought in Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 150 diff changeset	40 #include "../../nucleus/nucleus.h" // for NUCLEUS functions and types
d0de2d0a426d more L1 header files brought in Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 150 diff changeset	41 #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	42
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	43 #if 0 // FreeCalypso
151 d0de2d0a426d more L1 header files brought in Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 150 diff changeset	44 #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	45 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	46
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	47 #if (VCXO_ALGO == 1)
151 d0de2d0a426d more L1 header files brought in Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 150 diff changeset	48 #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	49 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	50
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	51 #if (RF_FAM == 35)
152 26472940e5b0 l1_rf<N>.h headers preened Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 151 diff changeset	52 #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	53 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	54
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	55 #if (RF_FAM == 12)
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	56 #include "../../L1/tpudrv/tpudrv12.h"
152 26472940e5b0 l1_rf<N>.h headers preened Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 151 diff changeset	57 #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	58 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	59
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	60 #if (RF_FAM == 10)
152 26472940e5b0 l1_rf<N>.h headers preened Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 151 diff changeset	61 #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	62 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	63
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	64 #if (RF_FAM == 8)
152 26472940e5b0 l1_rf<N>.h headers preened Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 151 diff changeset	65 #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	66 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	67
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	68 #if (RF_FAM == 2)
152 26472940e5b0 l1_rf<N>.h headers preened Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 151 diff changeset	69 #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	70 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	71
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	72 #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	73
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	74 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	75
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 /* 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	78 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	79 /* 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	80 /* against preemption. */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	81 /* 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	82 /* */
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 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	85 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	86 // 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	87 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	88 }
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 #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	91
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 /* 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	94 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	95 /* 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	96 /* */
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 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	99 {
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	100 #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	101 // 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	102 // (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	103 wait_ARM_cycles(convert_nanosec_to_cycles(66000));
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	104 #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	105 // 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	106 // (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	107 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	108 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	109 }
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 /* 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	115 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	116 /* 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	117 /* 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	118 /* */
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 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	121 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	122 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	123
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	124 // 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	125 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	126 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	127
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	128 #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	129
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	130 // 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	131 // 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	132 // 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	133 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	134 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	135 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	136 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	137 #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	138
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	139 // 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	140 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	141
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	142 // 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	143 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	144
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	145 // 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	146 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	147
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	148 #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	149 // 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	150 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	151 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	152 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	153 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	154 #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	155
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	156 // 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	157 #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	158 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	159 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	160 }
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 /* 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	165 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	166 /* 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	167 /* 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	168 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	169 /* 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	170 /* */
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 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	173 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	174 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	175 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	176
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	177 // 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	178 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	179 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	180
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	181 #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	182
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	183 // 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	184 // 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	185 // 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	186 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	187 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	188 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	189 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	190 #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	191
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	192 /* 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	193 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	194
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	195 /* 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	196 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	197
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	198 /* 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	199 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	200
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	201 #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	202 // 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	203 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	204 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	205 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	206 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	207 #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	208
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	209 // 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	210 #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	211 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	212 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	213
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	214 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	215 }
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 /* 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	219 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	220 /* 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	221 /* 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	222 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	223 /* 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	224 /* */
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 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	227 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	228 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	229
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	230 // 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	231 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	232 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	233
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	234 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	235
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	236 // 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	237 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	238
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	239 // 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	240 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	241
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	242 // 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	243 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	244
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	245 // 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	246 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	247
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	248 // 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	249 #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	250 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	251 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	252 }
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 /* 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	258 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	259 /* 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	260 /* */
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 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	263 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	264 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	265
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	266 // 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	267 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	268 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	269
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	270 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	271
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	272 // 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	273 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	274
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	275 // 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	276 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	277
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	278 // 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	279 #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	280 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	281 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	282 }
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 /* 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	288 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	289 /* 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	290 /* */
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 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	293 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	294 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	295 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	296
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	297 // 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	298 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	299 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	300
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	301 #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	302
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	303 // 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	304 // 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	305 // 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	306 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	307 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	308 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	309 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	310 #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	311
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	312 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	313
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	314 #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	315 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	316 reg_val = ABB_ReadRegister(VRPCSTS);
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	317 #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	318 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	319 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	320 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	321
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	322 #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	323 // 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	324 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	325 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	326 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	327 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	328 #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	329
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	330 // 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	331 #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	332 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	333 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	334
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	335 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	336 }
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 /* ABB_on() */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	340 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	341 /* 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	342 /* */
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 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	345 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	346 volatile SYS_UWORD16 status;
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	347 #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	348 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	349 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	350
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	351 // 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	352 if (bRecoveryFlag)
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	353 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	354 // 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	355 //---------------------------------------------------
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	356 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	357
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	358 // 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	359 //---------------------------------------------------
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	360 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	361 }
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 // 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	364 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	365 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	366
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	367 #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	368
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	369 // 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	370 // 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	371 // 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	372 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	373 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	374 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	375 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	376 #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	377
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	378 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	379
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	380 // 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	381 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	382
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	383 #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	384 // 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	385 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	386
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	387 /* ********* 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	388 // 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	389 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	390
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	391 /* 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	392 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	393 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	394
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	395 #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	396 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	397 #else
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	398 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	399 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	400
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	401 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	402 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	403 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	404 }
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 // 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	407 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	408 }
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 /* ********************** 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	411 /* 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	412 /* ***************************************************************************************************/
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	413 #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	414 // 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	415 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	416
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	417 // 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	418 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	419
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	420 // 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	421 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	422 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	423 /* *************************************************************************************************** */
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 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	426 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	427 // 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	428 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	429 }
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 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	432
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	433 // 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	434 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	435
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	436 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	437 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	438 // 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	439 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	440 }
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	441 #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	442 // 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	443
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	444 // 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	445 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	446
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	447 // 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	448 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	449
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	450 // 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	451 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	452
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	453 // 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	454 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	455
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	456 // 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	457 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	458
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	459 #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	460 // 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	461 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	462
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	463 #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	464
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	465 // 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	466 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	467
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	468 /* ********************** 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	469 #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	470 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	471 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	472 // 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	473 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	474
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	475 // 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	476 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	477
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	478 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	479
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	480 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	481
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	482 // 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	483 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	484
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	485 // 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	486 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	487
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	488 // 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	489 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	490
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	491 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	492
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	493 // 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	494 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	495
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	496 // 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	497 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	498
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	499 // 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	500 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	501
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	502 // 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	503 // 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	504 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	505
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	506 /* ********************** SELECTION OF BBCFG CONFIG FOR ABB 3 PG2_0 *****************************/
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	507 #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	508 #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	509 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	510 #endif
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
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	513 /* ********************** 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	514 /* 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	515 /* ****************************************************************************************************/
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 // 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	518 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	519
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	520 // 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	521 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	522
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	523 // 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	524 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	525
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	526 // 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	527 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	528
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	529 // 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	530 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	531 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	532 // 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	533 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	534 }
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 /******* 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	537 // 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	538 #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	539 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	540
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	541 // 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	542 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	543
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	544 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	545
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	546 // 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	547 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	548 ABB_WriteRegister(VRPCMSK, (MASK_SLEEP_MODE \| reg));
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	549 #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	550 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	551 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	552 // 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	553 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	554 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	555
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	556 // 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	557 // 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	558 // 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	559 // 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	560 // 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	561 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	562
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	563 // 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	564 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	565
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	566 // 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	567 // 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	568 // 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	569 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	570
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	571 #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	572 // 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	573 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	574 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	575 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	576 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	577 #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	578
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	579 // 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	580 #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	581 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	582 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	583 }
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 /* 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	589 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	590 /* 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	591 /* 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	592 /* 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	593 /* */
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 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	596 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	597 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	598
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	599 // 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	600 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	601 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	602
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	603 #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	604
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	605 // 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	606 // 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	607 // 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	608 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	609 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	610 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	611 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	612 #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	613
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	614 // 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	615 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	616
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	617 /* 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	618 *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	619 *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	620 *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	621 *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	622 *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	623 *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	624 *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	625
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	626 #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	627 *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	628 *Buff++ = ABB_ReadRegister(ADIN5YREG);
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	629 #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	630 *Buff++ = ABB_ReadRegister(ADIN4REG);
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	631 #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	632 *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	633 *Buff++ = ABB_ReadRegister(ADIN5REG);
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	634 #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	635
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	636 #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	637 // 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	638 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	639 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	640 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	641 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	642 #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	643
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	644 // 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	645 #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	646 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	647 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	648 }
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 /* 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	654 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	655 /* 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	656 /* - 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	657 /* - 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	658 /* */
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 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	661 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	662 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	663 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	664
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	665 // 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	666 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	667 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	668
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	669 #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	670
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	671 // 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	672 // 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	673 // 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	674 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	675 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	676 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	677 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	678 #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	679
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	680 // 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	681 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	682
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	683 /* select ADC channels to be converted */
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	684 #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	685 ABB_WriteRegister(MADCCTRL1, Channels);
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	686 #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	687 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	688 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	689
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	690 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	691
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	692 // 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	693 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	694 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	695 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	696 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	697
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	698 #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	699 // 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	700 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	701 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	702 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	703 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	704 #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	705
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	706 // 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	707 #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	708 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	709 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	710 }
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 /* ABB_sleep() */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	717 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	718 /* 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	719 /* 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	720 /* 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	721 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	722 /* 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	723 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	724 /* 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	725 /* */
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 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	728 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	729 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	730 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	731 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	732 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	733
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	734 // 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	735 // 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	736 static const SYS_UWORD32 Afcout_T[10] =
47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	737 {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	738
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	739 // 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	740 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	741 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	742
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	743 // 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	744 //---------------------------------------------------
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	745 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	746 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	747 else
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	748 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	749
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	750 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	751 {
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	752 #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	753 //////////// 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	754 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	755
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 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	758 {
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	759 #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	760 // 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	761 //---------------------------------------------------
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	762 // 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	763 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	764
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	765 // 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	766 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	767
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	768 // 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	769 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	770
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	771 // 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	772 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	773
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	774 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	775
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	776 #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	777 // 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	778 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	779
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	780 // 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	781 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	782
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	783 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	784
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	785 // 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	786 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	787
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	788 // 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	789 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	790
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	791 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	792
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	793 // 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	794 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	795
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	796 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	797
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	798 // 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	799 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	800
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	801 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	802 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	803
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	804 #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	805 // 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	806 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	807 // 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	808
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	809 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	810
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	811 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	812 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	813
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	814 // 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	815 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	816
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	817 // 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	818 //-----------------------------
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	819 #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	820 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	821
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	822 // 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	823 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	824
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	825 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	826
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	827 #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	828 // 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	829 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	830
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	831 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	832 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	833 // 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	834 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	835 }
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 // 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	838 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	839
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	840 #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	841 // 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	842 // 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	843 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	844 // 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	845 /*
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	846 // 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	847 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	848 */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	849 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	850
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	851 // 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	852 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	853 }
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 // 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	856 #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	857 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	858 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	859
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	860 #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	861 #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	862 // 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	863 // 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	864 // 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	865 // (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	866 // (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	867 #endif
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 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	870 }
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 /* ABB_wakeup() */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	875 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	876 /* 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	877 /* 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	878 /* 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	879 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	880 /* 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	881 /* */
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 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	884 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	885 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	886 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	887
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	888 // 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	889 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	890 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	891
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	892 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	893 {
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	894 #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	895 //////////// 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	896 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	897 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	898 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	899 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	900 #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	901 #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	902 // 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	903 // 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	904 // 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	905 // (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	906 // (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	907 #endif
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
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	910 // 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	911 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	912
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	913 // Switch ON Analog supply LDO
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	914 #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	915 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	916
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	917 // 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	918 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	919
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	920 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	921 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	922 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	923
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	924 // 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	925 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	926
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	927 // 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	928 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	929
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	930 // 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	931 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	932
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	933 #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	934 // 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	935 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	936
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	937 // 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	938 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	939
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	940 // 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	941 // 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	942 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	943
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	944 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	945
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	946 #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	947 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	948
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	949 // 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	950 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	951
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	952 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	953
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	954 // 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	955 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	956
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	957 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	958
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 // 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	962 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	963 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	964
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	965 // 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	966 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	967 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	968 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	969
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	970 // 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	971 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	972
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	973 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	974 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	975
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	976 #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	977
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	978 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	979
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 // 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	982 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	983 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	984
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	985 /* ********************** 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	986 /* 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	987 /* ****************************************************************************************************/
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 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	990 // 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	991
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	992 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	993 // 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	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 /**************************************************************************************************** */
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 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	998 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	999 }
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 // 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	1002 #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	1003 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	1004 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1005 }
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 /* 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	1009 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1010 /* 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	1011 /* 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	1012 /* */
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 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	1015 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1016 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	1017
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1018 // 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	1019 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	1020 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	1021
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1022 #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	1023
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1024 // 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	1025 // 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	1026 // 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	1027 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	1028 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1029 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	1030 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1031 #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	1032
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1033 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	1034
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	1035 #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	1036 // 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	1037 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	1038
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	1039 #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	1040 // 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	1041 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	1042
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	1043 #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	1044 // 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	1045 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	1046
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1047 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1048
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1049 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	1050
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1051 #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	1052 // 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	1053 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	1054 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1055 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	1056 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1057 #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	1058
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1059 // 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	1060 #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	1061 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	1062 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1063 }
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 /* 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	1068 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1069 /* 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	1070 /* */
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 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	1073 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1074 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	1075 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	1076
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1077 // 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	1078 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	1079 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	1080
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1081 // 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	1082 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	1083
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1084 // 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	1085 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	1086
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1087 // 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	1088 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	1089
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1090 // 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	1091 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	1092 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	1093
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1094 // 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	1095 #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	1096 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	1097 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1098 }
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 //////////////////////// 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	1101
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	1102 #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	1103
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1104 // 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	1105 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	1106 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1107 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	1108
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1109 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	1110 // 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	1111
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1112 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	1113
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1114 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	1115
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1116 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	1117
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1118 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	1119 // 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	1120 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1121 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1122
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 #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	1125 /-----------------------------------------------------------------------/
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1126 /* 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	1127 /* */
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1128 /* 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	1129 /* */
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 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	1132 {
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1133 // 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	1134 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	1135
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1136 // 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	1137 // 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	1138 // 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	1139 #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	1140 while ((ABB_Read_Status() & ONREFLT) == PWR_OFF_KEY_PRESSED) {
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	1141 #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	1142 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	1143 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1144
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1145 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	1146
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	1147 #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	1148 BZ_KeyBeep_OFF();
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	1149 #endif
148 63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1150
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	1151 #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	1152 ABB_Write_Register_on_page(PAGE0, VRPCCTL2, 0x00EE);
154 47754cdb6248 abb.c compiles! Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: 152 diff changeset	1153 #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	1154 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	1155 #endif
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1156 }
63750f70796d gsm-fw/bsp/abb+spi: initial import from the Leonardo TCS211 version Michael Spacefalcon <msokolov@ivan.Harhan.ORG> parents: diff changeset	1157 #endif

FreeCalypso > hg > freecalypso-sw

annotate gsm-fw/bsp/abb+spi/abb.c @ 215:517dd86b45b1