annotate chipsetsw/layer1/cfile/l1_pwmgr.c @ 132:c721b9d301b9

l1_pwmgr.c: l1s_compute_wakeup_ticks() reconstructed
author Mychaela Falconia <falcon@ivan.Harhan.ORG>
date Sat, 14 May 2016 16:31:53 +0000
parents 244b007df481
children e6611ca0d054
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1 /************* Revision Controle System Header *************
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2 * GSM Layer 1 software
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
3 * L1_PWMGR.C
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
4 *
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
5 * Filename l1_pwmgr.c
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
6 * Copyright 2003 (C) Texas Instruments
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
7 *
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
8 ************* Revision Controle System Header *************/
122
9360d1f31c00 l1_pwmgr.c: import of sensible changes from freecalypso-sw/gsm-fw version
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 121
diff changeset
9
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
10 #define L1_PWMGR_C
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
11 //#pragma DUPLICATE_FOR_INTERNAL_RAM_START
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
12
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
13 #include "timer/timer2.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
14 #include "armio/armio.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
15
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
16 //omaps00090550 #include "l1_macro.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
17 #include "l1_confg.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
18
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
19 #if (OP_L1_STANDALONE == 1)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
20 #include "uart/serialswitch_core.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
21 #else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
22 #include "uart/serialswitch.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
23 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
24
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
25 #if (OP_L1_STANDALONE == 0)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
26 #include "sim/sim.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
27 #include "rv_swe.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
28 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
29
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
30
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
31 #if (CODE_VERSION == SIMULATION)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
32 #include "l1_types.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
33 #include "l1_const.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
34
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
35 #if (CHIPSET == 12) || (CHIPSET == 15)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
36 #include "inth/sys_inth.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
37 #include "sys_dma.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
38 #include "ulpd.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
39 #include "clkm.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
40
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
41 // typedef volatile unsigned short REG_UWORD16; //omaps00090550
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
42 #define REG16(A) (*(REG_UWORD16*)(A))
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
43
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
44 #else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
45 #include "inth/iq.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
46 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
47
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
48 #if TESTMODE
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
49 #include "l1tm_defty.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
50 #endif // TESTMODE
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
51
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
52 #if (AUDIO_TASK == 1)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
53 #include "l1audio_const.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
54 #include "l1audio_cust.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
55 #include "l1audio_defty.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
56 #endif // AUDIO_TASK
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
57
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
58 #if (L1_GTT == 1)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
59 #include "l1gtt_const.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
60 #include "l1gtt_defty.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
61 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
62
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
63 #if (L1_MP3 == 1)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
64 #include "l1mp3_defty.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
65 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
66
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
67 #if (L1_MIDI == 1)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
68 #include "l1midi_defty.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
69 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
70 //ADDED FOR AAC
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
71 #if (L1_AAC == 1)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
72 #include "l1aac_defty.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
73 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
74 #include "l1_defty.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
75 #include "l1_varex.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
76 #include "l1_tabs.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
77 #include "cust_os.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
78 #include "l1_msgty.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
79 #include "l1_proto.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
80 #include "ulpd.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
81 #include "l1_trace.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
82
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
83 #if L1_GPRS
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
84 #include "l1p_cons.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
85 #include "l1p_msgt.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
86 #include "l1p_deft.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
87 #include "l1p_vare.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
88 #endif // L1_GPRS
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
89
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
90 #include <stdio.h>
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
91 #include "sim_cfg.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
92 #include "sim_cons.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
93 #include "sim_def.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
94 #include "sim_var.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
95 //omaps00090550
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
96 #include "nucleus.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
97
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
98 extern NU_TASK L1S_task;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
99 STATUS status;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
100
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
101
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
102
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
103 #else // NO SIMULATION
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
104
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
105
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
106
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
107 #include "l1_types.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
108 #include "l1_const.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
109
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
110 #include "abb/abb.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
111 #include "dma/sys_dma.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
112
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
113 #if (OP_BT == 1)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
114 #include "hci_ll_simul.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
115 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
116
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
117 #if TESTMODE
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
118 #include "l1tm_defty.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
119 #endif // TESTMODE
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
120
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
121 #if (AUDIO_TASK == 1)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
122 #include "l1audio_const.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
123 #include "l1audio_cust.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
124 #include "l1audio_defty.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
125 #endif // AUDIO_TASK
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
126
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
127 #if (L1_GTT == 1)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
128 #include "l1gtt_const.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
129 #include "l1gtt_defty.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
130 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
131
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
132 #if (L1_MP3 == 1)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
133 #include "l1mp3_defty.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
134 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
135
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
136 #if (L1_MIDI == 1)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
137 #include "l1midi_defty.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
138 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
139 //ADDED FOR AAC
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
140 #if (L1_AAC == 1)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
141 #include "l1aac_defty.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
142 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
143 #include "l1_defty.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
144 #include "l1_varex.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
145 #include "l1_tabs.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
146 #include "sys_types.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
147 #include "tpudrv.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
148 #include "cust_os.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
149 #include "l1_msgty.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
150 #include "l1_proto.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
151 #include "l1_trace.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
152 #include "timer/timer.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
153
122
9360d1f31c00 l1_pwmgr.c: import of sensible changes from freecalypso-sw/gsm-fw version
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 121
diff changeset
154 #include "l1_pwmgr.h"
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
155
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
156 #if (CHIPSET == 12) || (CHIPSET == 15)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
157 #include "timer/timer_sec.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
158 #include "inth/sys_inth.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
159
126
c0a6b2f9723b l1_pwmgr.c: removed a bunch of dead LoCosto code
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 125
diff changeset
160 /* FreeCalypso: massive #if (CHIPSET == 15) chunk removed */
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
161
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
162 #else //(CHIPSET == 12) || (CHIPSET == 15)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
163 #include "inth/iq.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
164 #include "inth/inth.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
165 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
166 // #include "timer1.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
167 #include "ulpd/ulpd.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
168 #include "clkm/clkm.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
169 #include "memif/mem.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
170 #if L2_L3_SIMUL
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
171 #include "hw_debug.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
172 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
173
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
174 #if (OP_WCP == 1) && (OP_L1_STANDALONE != 1)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
175 #include "csmi/sleep.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
176 #endif // OP_WCP
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
177 #if (W_A_CALYPSO_PLUS_SPR_19599 == 1)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
178 #include "sys_memif.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
179 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
180
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
181 #if (GSM_IDLE_RAM != 0)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
182 #if (OP_L1_STANDALONE == 1)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
183 #include "csmi_simul.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
184 #else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
185 #include "csmi/csmi.h"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
186 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
187 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
188
122
9360d1f31c00 l1_pwmgr.c: import of sensible changes from freecalypso-sw/gsm-fw version
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 121
diff changeset
189 #if (CHIPSET == 15)
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
190 #include "drp_api.h"
122
9360d1f31c00 l1_pwmgr.c: import of sensible changes from freecalypso-sw/gsm-fw version
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 121
diff changeset
191 #endif
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
192
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
193 #endif // NO SIMULATION
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
194
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
195 #if (CODE_VERSION != SIMULATION)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
196 // for PTOOL compatibility
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
197 extern void INT_DisableIRQ(void);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
198 extern void INT_EnableIRQ(void);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
199 extern void l1dmacro_RF_sleep(void);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
200 extern void l1dmacro_RF_wakeup(void);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
201 WORD32 l1s_get_HWTimers_ticks(void);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
202
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
203 // file timer1.h
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
204 SYS_UWORD16 Dtimer1_Get_cntlreg(void);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
205 void Dtimer1_AR(unsigned short Ar);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
206 void Dtimer1_PTV(unsigned short Ptv);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
207 void Dtimer1_Clken(unsigned short En);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
208 void Dtimer1_Start (unsigned short startStop);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
209 void Dtimer1_Init_cntl (SYS_UWORD16 St, SYS_UWORD16 Reload, SYS_UWORD16 clockScale, SYS_UWORD16 clkon);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
210 SYS_UWORD16 Dtimer1_WriteValue (SYS_UWORD16 value);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
211 SYS_UWORD16 Dtimer1_ReadValue (void);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
212 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
213
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
214 void l1s_wakeup(void);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
215 BOOL l1s_compute_wakeup_ticks(void);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
216 void l1s_recover_Frame(void);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
217 UWORD8 Cust_recover_Os(void);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
218 void l1s_recover_HWTimers(void);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
219 UWORD8 Cust_check_system(void);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
220 void f_arm_sleep_cmd(UWORD8 d_sleep_mode);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
221
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
222 //#if (TRACE_TYPE == 2) || (TRACE_TYPE == 3)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
223 extern void L1_trace_string(char *s);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
224 extern void L1_trace_char (char s);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
225 //#endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
226 extern UWORD16 slp_debug_flag;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
227
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
228 #if (GSM_IDLE_RAM != 0)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
229 extern void l1s_trace_mftab(void);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
230 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
231
122
9360d1f31c00 l1_pwmgr.c: import of sensible changes from freecalypso-sw/gsm-fw version
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 121
diff changeset
232 #if (CODE_VERSION != SIMULATION) && (CHIPSET == 15)
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
233 extern T_DRP_REGS_STR *drp_regs;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
234 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
235
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
236 #if L1_GPRS
123
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
237 WORD32 l1s_get_next_gauging_in_Packet_Idle(void);
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
238 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
239 //#pragma DUPLICATE_FOR_INTERNAL_RAM_END
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
240
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
241 #if !((MOVE_IN_INTERNAL_RAM == 1) && (GSM_IDLE_RAM !=0)) // MOVE TO INTERNAL MEM IN CASE GSM_IDLE_RAM enabled
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
242 //#pragma GSM_IDLE_DUPLICATE_FOR_INTERNAL_RAM_START // KEEP IN EXTERNAL MEM otherwise
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
243
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
244 /************************************************************/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
245 /* Macros for power management */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
246 /************************************************************/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
247 #define MIN(min, operand1) \
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
248 if (operand1 <= min) min = operand1;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
249
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
250 // ex: RATIO T32khz/T4.33Mhz = 132.2428385417
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
251 // => root = integer part of the ratio
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
252 // = 132
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
253 // => frac = fractionnal part of the ratio multiplied by 65536 rounded to make it integer
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
254 // = 0.2428385417 * 65536 (Cf. ULPD specification)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
255 // = 0.2428385417 * 2^16
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
256 // = 15914.66666689 = 15914
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
257
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
258 #define RATIO(HF,LF, root, frac) \
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
259 root = (UWORD32)(HF/LF); \
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
260 frac = (UWORD32)(((HF - (root*LF)) << 16) / LF);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
261
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
262 // previous ratio with frac + 0.5
124
190c68fa5689 l1_pwmgr.c: l1ctl_pgm_clk32() reconstructed
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 123
diff changeset
263 #if 0 /* original LoCosto code */
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
264 #define RATIO2(HF,LF, root, frac) \
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
265 if(LF){ \
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
266 root = (UWORD32)(HF/LF); \
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
267 frac = (UWORD32)((((HF - (root*LF)) << 16) + 0.5*LF) / LF);}
124
190c68fa5689 l1_pwmgr.c: l1ctl_pgm_clk32() reconstructed
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 123
diff changeset
268 #else /* FreeCalypso TCS211 reconstruction */
190c68fa5689 l1_pwmgr.c: l1ctl_pgm_clk32() reconstructed
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 123
diff changeset
269 #define RATIO2(HF,LF, root, frac) \
190c68fa5689 l1_pwmgr.c: l1ctl_pgm_clk32() reconstructed
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 123
diff changeset
270 { \
190c68fa5689 l1_pwmgr.c: l1ctl_pgm_clk32() reconstructed
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 123
diff changeset
271 root = (UWORD32)(HF/LF); \
190c68fa5689 l1_pwmgr.c: l1ctl_pgm_clk32() reconstructed
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 123
diff changeset
272 frac = (UWORD32)((((HF - (root*LF)) << 16) + 0.5*LF) / LF);}
190c68fa5689 l1_pwmgr.c: l1ctl_pgm_clk32() reconstructed
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 123
diff changeset
273 #endif
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
274
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
275 #define HFTHEO(LF, root, frac, hftheo) \
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
276 hftheo = root*LF + ((frac*LF) >>16);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
277
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
278 #define SUM(HF, LF, nb, ind) \
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
279 LF=HF=0; \
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
280 for(ind=0; ind<nb; ind++) \
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
281 { \
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
282 LF = LF +l1s.pw_mgr.histo[ind][0]; \
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
283 HF = HF +l1s.pw_mgr.histo[ind][1]; \
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
284 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
285
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
286
128
a2f9560c1cf1 l1_pwmgr.c: began de-LoCosto-fication of l1s_sleep_manager()
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 127
diff changeset
287 #if 0 /* FreeCalypso TCS211 reconstruction */
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
288 T_PWMGR_DEBUG l1_pwmgr_debug;
128
a2f9560c1cf1 l1_pwmgr.c: began de-LoCosto-fication of l1s_sleep_manager()
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 127
diff changeset
289 #endif
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
290
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
291
126
c0a6b2f9723b l1_pwmgr.c: removed a bunch of dead LoCosto code
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 125
diff changeset
292 /* FreeCalypso: massive #if (CHIPSET == 15) chunk removed */
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
293
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
294
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
295 // l1ctl_pgm_clk32()
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
296 // convert ratio in 4.33Mhz and pgm INC_FRAC,INC_SIXTEEN.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
297
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
298 void l1ctl_pgm_clk32(UWORD32 nb_hf, UWORD32 nb_32khz)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
299 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
300 #if (CODE_VERSION != SIMULATION)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
301 if (l1_config.pwr_mngt == PWR_MNGT)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
302 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
303 UWORD32 inc_sixteen= 0, inc_frac=0, lf;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
304
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
305 // REM: nb_hf is the real value of the high frequency (ex in nbr of 65Mhz clock)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
306 // To compute the ratio, nb_hf must be expressed in nbr of clock 4.33 Mhz
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
307 // that's why nb_hf is divided by 3*l1_config.dpll
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
308 // RATIO2(nb_hf/(3*l1_config.dpll),nb_32khz,inc_sixteen,inc_frac);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
309 // this line above is equal to the ligne below:
124
190c68fa5689 l1_pwmgr.c: l1ctl_pgm_clk32() reconstructed
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 123
diff changeset
310 lf=(UWORD32)(3*l1_config.dpll*nb_32khz);
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
311 RATIO2(nb_hf,lf,inc_sixteen,inc_frac);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
312
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
313 // integer part
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
314 ULDP_INCSIXTEEN_UPDATE(inc_sixteen);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
315
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
316 // fractional part
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
317 ULDP_INCFRAC_UPDATE(inc_frac);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
318 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
319 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
320 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
321
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
322
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
323 // l1ctl_gauging()
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
324 // Description: management of the gauging results
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
325 // At RESET state reset histogram and then go to INIT.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
326 // At INIT state, go back to RESET on each */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
327 // gauging > +- 100 ppm. If NB_INIT good gauging go to ACQUIS state.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
328 // At ACQUIS state, go back to RESET on each gauging > (+- 20ppm +- 1us). If NB_ACQU good gauging */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
329 // go to UPDATE state. Allow deep sleep feature.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
330 // At UPDATE state, count consecutive gauging >+- 1 us.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
331 // If MAX_BAD_GAUGING results go back to RESET.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
332 // Otherwise re-enable deep sleep feature and reset bad results counter.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
333
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
334 void l1ctl_gauging ( UWORD32 nb_32khz, UWORD32 nb_hf)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
335 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
336 if (l1_config.pwr_mngt == PWR_MNGT)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
337 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
338 enum states
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
339 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
340 RESET = 0,
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
341 INIT = 1,
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
342 ACQUIS = 2,
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
343 UPDATE = 3
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
344 };
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
345
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
346 static UWORD8 bad_count; // bad gauging values
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
347 static UWORD8 gauging_state= RESET; // RESET,INIT, ACQUIS, UPDATE
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
348 static UWORD8 nb_gaug; // number of gauging in ACQUIS
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
349 static UWORD8 idx,i; // index
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
350 static UWORD32 root, frac; // ratio of HF and LF average
125
813c4bb83603 l1_pwmgr.c: l1ctl_gauging() reconstructed
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 124
diff changeset
351 UWORD32 sumLF, sumHF; // sum of HF and LF counts
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
352 double nbHF_theo;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
353
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
354
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
355 // AFC or TEMPERATURE variation
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
356
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
357 //if ( (ABS( (WORD32)(l1s.pw_mgr.previous_afc-l1s.afc) ) > AFC_VARIATION) ||
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
358 // (ABS( (WORD32)(l1s.pw_mgr.previous_temp-l1s.afc) > TEMP_VARIATION) )
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
359 // gauging_state = RESET;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
360
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
361 // reset state machine if not in IDLE mode
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
362 #if L1_GPRS
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
363 if ((l1a_l1s_com.l1s_en_task[NP] != TASK_ENABLED) && (l1a_l1s_com.l1s_en_task[PNP] != TASK_ENABLED))
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
364 gauging_state = RESET;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
365 #else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
366 if ((l1a_l1s_com.l1s_en_task[NP] != TASK_ENABLED) )
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
367 gauging_state = RESET;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
368
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
369 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
370
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
371 switch (gauging_state)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
372 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
373
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
374 case RESET:
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
375 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
376 UWORD8 i;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
377
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
378 // Reset Histogram
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
379 for (i=0; i < SIZE_HIST; i++)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
380 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
381 l1s.pw_mgr.histo[i][0] = 0;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
382 l1s.pw_mgr.histo[i][1] = 0;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
383 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
384 idx = 0;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
385 l1s.pw_mgr.enough_gaug= FALSE; // forbid Deep sleep
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
386 gauging_state = INIT;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
387 nb_gaug = NB_INIT; // counter for ACQUIS state
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
388 bad_count = 0; // reset count of BAD gauging
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
389
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
390 #if (TRACE_TYPE != 0)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
391 l1_trace_gauging_reset();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
392 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
393 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
394
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
395
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
396 case INIT:
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
397 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
398
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
399 // Acquire NB_INIT gauging wtw +- 100 ppm
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
400
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
401 if (l1a_l1s_com.mode != I_MODE) return;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
402
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
403 // compute clocks ratio from measurements.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
404 RATIO(nb_hf,nb_32khz,root,frac)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
405
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
406
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
407 // allow [-500ppm,+100ppm] derive on 32Khz at startup.
125
813c4bb83603 l1_pwmgr.c: l1ctl_gauging() reconstructed
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 124
diff changeset
408 #if 0 /* really old code, apparently */
813c4bb83603 l1_pwmgr.c: l1ctl_gauging() reconstructed
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 124
diff changeset
409 if (
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
410 (root > l1s.pw_mgr.c_clk_min ||
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
411 (root == l1s.pw_mgr.c_clk_min &&
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
412 frac >= l1s.pw_mgr.c_clk_init_min) ) &&
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
413 (root < l1s.pw_mgr.c_clk_max ||
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
414 (root == l1s.pw_mgr.c_clk_max &&
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
415 frac <= l1s.pw_mgr.c_clk_init_max ) )
125
813c4bb83603 l1_pwmgr.c: l1ctl_gauging() reconstructed
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 124
diff changeset
416 #elif 1 /* TCS211 reconstruction */
813c4bb83603 l1_pwmgr.c: l1ctl_gauging() reconstructed
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 124
diff changeset
417 if (
813c4bb83603 l1_pwmgr.c: l1ctl_gauging() reconstructed
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 124
diff changeset
418 (root == l1s.pw_mgr.c_clk_min &&
813c4bb83603 l1_pwmgr.c: l1ctl_gauging() reconstructed
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 124
diff changeset
419 frac >= l1s.pw_mgr.c_clk_init_min ) ||
813c4bb83603 l1_pwmgr.c: l1ctl_gauging() reconstructed
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 124
diff changeset
420 (root == l1s.pw_mgr.c_clk_max &&
813c4bb83603 l1_pwmgr.c: l1ctl_gauging() reconstructed
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 124
diff changeset
421 frac <= l1s.pw_mgr.c_clk_init_max )
813c4bb83603 l1_pwmgr.c: l1ctl_gauging() reconstructed
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 124
diff changeset
422 #else /* LoCosto code */
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
423 if (
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
424 ( l1s.pw_mgr.c_clk_min == l1s.pw_mgr.c_clk_max &&
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
425 frac >= l1s.pw_mgr.c_clk_init_min &&
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
426 frac <= l1s.pw_mgr.c_clk_init_max )
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
427 ||
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
428 ( l1s.pw_mgr.c_clk_min != l1s.pw_mgr.c_clk_max &&
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
429 ( (root == l1s.pw_mgr.c_clk_min &&
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
430 frac >= l1s.pw_mgr.c_clk_init_min ) ||
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
431 (root > l1s.pw_mgr.c_clk_min &&
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
432 root < l1s.pw_mgr.c_clk_max ) ||
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
433 (root == l1s.pw_mgr.c_clk_max &&
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
434 frac <= l1s.pw_mgr.c_clk_init_max ) ) )
125
813c4bb83603 l1_pwmgr.c: l1ctl_gauging() reconstructed
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 124
diff changeset
435 #endif
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
436 )
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
437 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
438 l1s.pw_mgr.histo[idx ][0] = nb_32khz; // init histo with the number of 32kHz
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
439 l1s.pw_mgr.histo[idx++][1] = nb_hf; // init histo with the number of hf (13Mhz)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
440
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
441 #if (CODE_VERSION == SIMULATION)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
442 #if (TRACE_TYPE==5)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
443 trace_ULPD("Gauging INIT Case ", l1s.actual_time.fn);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
444 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
445 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
446
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
447 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
448 else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
449 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
450 // out of the allowed derive -> reset
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
451 idx=0;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
452 #if (TRACE_TYPE != 0)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
453 l1_trace_gauging_reset();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
454 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
455 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
456
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
457 if (idx == NB_INIT)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
458 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
459 // enough measurement -> ACQUIS state
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
460 gauging_state = ACQUIS;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
461 // compute clk ratio on count average
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
462 SUM(sumHF,sumLF, NB_INIT,i) // returns sumHF and sumLF
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
463 RATIO(sumHF,sumLF,root, frac) // returns root and frac*2E16, computed on the average
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
464 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
465 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
466 break;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
467
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
468
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
469 case ACQUIS:
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
470 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
471 // Acquire NB_ACQU gauging at +-25ppm
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
472 // with jitter +- 1 us
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
473 UWORD8 n;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
474
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
475 // from nb_32khz "measured"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
476 // compute nbHF_theo
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
477 HFTHEO(nb_32khz,root,frac,nbHF_theo)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
478
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
479 if ( (nb_hf >= (nbHF_theo - l1s.pw_mgr.c_delta_hf_acquis)) &&
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
480 (nb_hf <= (nbHF_theo + l1s.pw_mgr.c_delta_hf_acquis)) )
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
481 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
482 l1s.pw_mgr.histo[idx][0] = nb_32khz;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
483 l1s.pw_mgr.histo[idx++][1] = nb_hf;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
484 idx = idx % SIZE_HIST;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
485
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
486 // compute clk ratio on count average
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
487 if(++nb_gaug >= SIZE_HIST) n=SIZE_HIST;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
488 else n= nb_gaug;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
489 SUM(sumHF,sumLF, n,i)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
490 RATIO(sumHF,sumLF,root, frac)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
491
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
492 #if (CODE_VERSION == SIMULATION)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
493 #if (TRACE_TYPE==5)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
494 trace_ULPD("Gauging ACQUIS Case ", l1s.actual_time.fn);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
495 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
496 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
497
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
498 if ( nb_gaug == (NB_INIT+NB_ACQU)) // NB_ACQU good gauging
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
499 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
500 gauging_state = UPDATE; // UPDATE state
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
501 l1s.pw_mgr.enough_gaug = TRUE; // allow Deep sleep
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
502 l1ctl_pgm_clk32(sumHF,sumLF); // clocks ratio in 4.33Mhz
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
503 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
504 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
505 else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
506 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
507 gauging_state = RESET;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
508 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
509 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
510 break;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
511
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
512 case UPDATE:
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
513 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
514
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
515 // Update gauging histogram
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
516 // compute nbHF theoric for ratio_avg
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
517 HFTHEO(nb_32khz,root,frac,nbHF_theo)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
518
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
519 if ( (nb_hf >= (nbHF_theo-l1s.pw_mgr.c_delta_hf_update)) &&
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
520 (nb_hf <= (nbHF_theo+l1s.pw_mgr.c_delta_hf_update)) )
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
521 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
522 l1s.pw_mgr.histo[idx][0] = nb_32khz;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
523 l1s.pw_mgr.histo[idx++][1] = nb_hf;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
524
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
525 // compute clk ratio on count average
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
526 SUM(sumHF,sumLF, SIZE_HIST,i)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
527 l1ctl_pgm_clk32(sumHF,sumLF); // clocks ratio in 4.33Mhz
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
528
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
529 l1s.pw_mgr.enough_gaug = TRUE; // allow Deep sleep
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
530 bad_count = 0; // reset count of BAD gauging
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
531
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
532 #if (CODE_VERSION == SIMULATION)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
533 #if (TRACE_TYPE==5)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
534 trace_ULPD("Gauging UPDATE Case ", l1s.actual_time.fn);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
535 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
536 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
537
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
538 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
539 else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
540 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
541 bad_count ++;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
542 if (bad_count >= MAX_BAD_GAUGING) gauging_state = RESET;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
543 l1s.pw_mgr.enough_gaug= FALSE; // forbid Deep sleep
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
544 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
545 idx = idx % SIZE_HIST;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
546 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
547 break;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
548 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
549 #if (TRACE_TYPE != 0) // Trace gauging
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
550 // save parameters in the corresponding structure
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
551 l1s.pw_mgr.state = gauging_state;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
552 l1s.pw_mgr.lf = nb_32khz ;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
553 // WARNING WARNING, this case gauging_state == UPDATE modify the algo.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
554 // In case of trace the parameter root and frac are refresh.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
555 // it is not the case if no trace and it seems there is mistake
125
813c4bb83603 l1_pwmgr.c: l1ctl_gauging() reconstructed
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 124
diff changeset
556 #if 0 /* FreeCalypso TCS211 reconstruction */
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
557 if (gauging_state == UPDATE)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
558 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
559 RATIO2(sumHF,sumLF,root,frac);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
560 }
125
813c4bb83603 l1_pwmgr.c: l1ctl_gauging() reconstructed
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 124
diff changeset
561 #endif
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
562 //End of Warning.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
563 l1s.pw_mgr.hf = nb_hf ;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
564 l1s.pw_mgr.root = root ;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
565 l1s.pw_mgr.frac = frac ;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
566 #endif // End Trace gauging
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
567 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
568 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
569
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
570
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
571 /* GAUGING_Handler() */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
572 /* Description: update increment counter for 32Khz */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
573 /* This interrupt function computes the ratio between */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
574 /* HF/32Khz gauging counters and program ULPD increment */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
575 /* values. */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
576
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
577 void GAUGING_Handler(void)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
578 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
579 #if (CODE_VERSION != SIMULATION)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
580 if (l1_config.pwr_mngt == PWR_MNGT)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
581 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
582 UWORD32 nb_32khz, nb_hf;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
583
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
584 // Gauging task is ended
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
585 l1s.pw_mgr.gauging_task = INACTIVE;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
586 #if (CHIPSET == 12) || (CHIPSET == 15)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
587 F_INTH_DISABLE_ONE_IT(C_INTH_ULPD_GAUGING_IT); // Mask ULPD GAUGING int.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
588 #else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
589 INTH_DISABLEONEIT(IQ_ULPD_GAUGING); // Mask ULPD GAUGING int.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
590 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
591
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
592 // Number of 32 Khz clock at the end of the gauging
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
593 nb_32khz = ((*( UWORD16 *)ULDP_COUNTER_32_MSB_REG) * 65536) +
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
594 (*( UWORD16 *)ULDP_COUNTER_32_LSB_REG);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
595
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
596 // Number of high frequency clock at the end of the gauging
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
597 // Convert it in nbr of 13 Mhz clocks (5*13=65Mhz)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
598 nb_hf = ( ((*( UWORD16 *)ULDP_COUNTER_HI_FREQ_MSB_REG) * 65536) +
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
599 (*( UWORD16 *)ULDP_COUNTER_HI_FREQ_LSB_REG) ); // Divide by PLL ratio
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
600
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
601 l1ctl_gauging(nb_32khz, nb_hf);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
602 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
603 #else //Simulation part
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
604
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
605 // Gauging task is ended
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
606 l1s.pw_mgr.gauging_task = INACTIVE;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
607
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
608 l1ctl_gauging(DEFAULT_32KHZ_VALUE,DEFAULT_HFMHZ_VALUE);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
609 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
610 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
611
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
612
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
613 // l1s_get_HWTimers_ticks()
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
614 // Description:
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
615 // evaluate the loading of the HW Timers for dep sleep
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
616 // BIG SLEEP: timers CLK may be stopped (user dependant)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
617 // DEEP SLEEP:timers CLK and WTCHDOG CLK are stopped
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
618 // CLKS are enabled after VTCX0+SLICER+13MHZ
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
619 // setup time
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
620
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
621 WORD32 l1s_get_HWTimers_ticks(void)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
622 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
623 #if (CODE_VERSION != SIMULATION)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
624 WORD32 timer1,timer2,watchdog,HWTimer;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
625 #if (CHIPSET == 12) || (CHIPSET == 15)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
626 WORD32 watchdog_sec;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
627 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
628 UWORD16 cntlreg;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
629 UWORD16 modereg;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
630 WORD32 old = 0;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
631
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
632 // read Hercules Timers & Watchdog
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
633 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
634 // Tint = Tclk * (LOAD_TIM+1) * 2^(PTV+1)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
635 // Tclk = 1.2308us for Fclk=13Mhz
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
636 // PTV = X (pre-scaler field)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
637 //-------------------------------------------------
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
638 timer1 = timer2 = watchdog = HWTimer = -1;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
639 #if (CHIPSET == 12) || (CHIPSET == 15)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
640 watchdog_sec = -1;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
641 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
642
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
643 cntlreg = Dtimer1_Get_cntlreg(); // AND 0x1F
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
644 if ( (cntlreg & D_TIMER_RUN) == D_TIMER_RUN)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
645 {
127
633cc67bebbc l1_pwmgr.c: l1s_get_HWTimers_ticks() reconstructed
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 126
diff changeset
646 #if 0 /* match TCS211 object */
633cc67bebbc l1_pwmgr.c: l1s_get_HWTimers_ticks() reconstructed
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 126
diff changeset
647 cntlreg = cntlreg&0x1F;
633cc67bebbc l1_pwmgr.c: l1s_get_HWTimers_ticks() reconstructed
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 126
diff changeset
648 #endif
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
649 cntlreg >>= 2; // take PTV
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
650 cntlreg = 1 << (cntlreg+1);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
651 timer1 = (WORD32) ( ((Dtimer1_ReadValue()+1) * cntlreg * 0.0012308) / 4.615 );
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
652 if (timer1 <= MIN_SLEEP_TIME) return(0);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
653 old = Dtimer1_ReadValue();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
654 HWTimer = timer1;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
655 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
656
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
657 cntlreg = Dtimer2_Get_cntlreg();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
658 if ( (cntlreg & D_TIMER_RUN) == D_TIMER_RUN)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
659 {
127
633cc67bebbc l1_pwmgr.c: l1s_get_HWTimers_ticks() reconstructed
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 126
diff changeset
660 #if 0 /* match TCS211 object */
633cc67bebbc l1_pwmgr.c: l1s_get_HWTimers_ticks() reconstructed
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 126
diff changeset
661 cntlreg = cntlreg&0x1F;
633cc67bebbc l1_pwmgr.c: l1s_get_HWTimers_ticks() reconstructed
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 126
diff changeset
662 #endif
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
663 cntlreg >>= 2; // take PTV
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
664 cntlreg = 1 << (cntlreg+1);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
665 timer2 = (WORD32) ( ((Dtimer2_ReadValue()+1) * cntlreg * 0.0012308) / 4.615 );
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
666 if (timer2 <= MIN_SLEEP_TIME) return(0);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
667 if (HWTimer == -1) HWTimer = timer2;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
668 else MIN(HWTimer,timer2)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
669 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
670
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
671 cntlreg = TIMER_Read(0); // AND 0x0f80
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
672 modereg = TIMER_Read(2);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
673
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
674 if ( (cntlreg & TIMER_ST) || (modereg & TIMER_WDOG))
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
675 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
676 // in watchdog mode PTV is forced to 7
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
677 if ( modereg & TIMER_WDOG )
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
678 cntlreg |= TIMER_PTV;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
679
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
680 cntlreg = (cntlreg & TIMER_PTV) >> 9; // take PTV
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
681 cntlreg = 1 << (cntlreg+1);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
682 watchdog = (WORD32) ( ((TIMER_ReadValue()+1) * cntlreg * 0.001078) / 4.615 );
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
683 if (watchdog <= MIN_SLEEP_TIME) return(0);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
684 if (HWTimer == -1) HWTimer = watchdog;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
685 else MIN(HWTimer,watchdog)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
686 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
687
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
688 #if (CHIPSET == 12) || (CHIPSET == 15)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
689 /*
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
690 * Secure Watchdog Timer management
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
691 */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
692 cntlreg = TIMER_SEC_Read(0); // AND 0x0f80
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
693 modereg = TIMER_SEC_Read(2);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
694 if ( (cntlreg & TIMER_ST) || (modereg & TIMER_WDOG))
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
695 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
696 // in watchdog mode PTV is forced to 7
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
697 if ( modereg & TIMER_WDOG )
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
698 cntlreg |= TIMER_PTV;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
699
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
700 cntlreg = (cntlreg & TIMER_PTV) >> 9; // take PTV
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
701 cntlreg = 1 << (cntlreg+1);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
702 watchdog_sec = (WORD32) ( ((TIMER_SEC_ReadValue()+1) * cntlreg * 0.001078) / 4.615 );
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
703 if (watchdog_sec <= MIN_SLEEP_TIME) return(0);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
704 if (HWTimer == -1) HWTimer = watchdog_sec;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
705 else MIN(HWTimer,watchdog_sec)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
706 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
707
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
708 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
709
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
710 return (HWTimer);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
711 #else // simulation part
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
712 return (-1); // no HW timer in simulation
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
713 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
714 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
715
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
716 #if (GSM_IDLE_RAM != 0) // Compile only if GSM_IDLE_RAM enabled
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
717
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
718 void l1s_adapt_traffic_controller(void)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
719 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
720 BOOL l1s_extram;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
721 UWORD8 nb_bitmap;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
722 T_L1S_GSM_IDLE_INTRAM * gsm_idle_ram_ctl;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
723
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
724 gsm_idle_ram_ctl = &(l1s.gsm_idle_ram_ctl);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
725
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
726 l1s_extram = FALSE;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
727
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
728 for(nb_bitmap=0; ((nb_bitmap < SIZE_TAB_L1S_MONITOR) && (l1s_extram == FALSE)); nb_bitmap++)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
729 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
730 if (nb_bitmap == 1)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
731 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
732 l1s_extram |= (((INT_RAM_GSM_IDLE_L1S_PROCESSES1 ^ gsm_idle_ram_ctl->task_bitmap_idle_ram[nb_bitmap]) & gsm_idle_ram_ctl->task_bitmap_idle_ram[nb_bitmap]) != 0);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
733 }else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
734 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
735 l1s_extram |= (gsm_idle_ram_ctl->task_bitmap_idle_ram[nb_bitmap] != 0);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
736 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
737 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
738
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
739 if ((l1s_extram != FALSE) && (!READ_TRAFFIC_CONT_STATE))
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
740 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
741 CSMI_TrafficControllerOn();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
742 #if (TRACE_TYPE==1) || (TRACE_TYPE==4)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
743 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
744 l1s_trace_mftab();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
745 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
746 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
747 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
748 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
749 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
750
131
244b007df481 l1_pwmgr.c: .bss and .cinit data sections reconstructed
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 130
diff changeset
751 UWORD32 last_wakeup = 0;
123
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
752 UWORD8 wakeup_type; // Type of the interrupt
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
753 UWORD8 why_big_sleep; // Type of the big sleep
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
754
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
755 extern UWORD16 int_id;
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
756
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
757 // l1s_sleep_manager()
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
758 // Description:
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
759 // evaluate the loading of the system
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
760 // - SIM, UART, LCD ....
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
761 // - Nucleus tasks, Hisrs, timers
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
762 // - Timer1, Timer2, Watchdog
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
763 // program Big or Deep sleep
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
764
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
765 void l1s_sleep_manager()
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
766 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
767 //UWORD8 temp=0; OMAPS00090550
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
768
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
769 UWORD16 temp_clear_intr;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
770
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
771 // fn when l1s_sleep_manager function is called
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
772 #if (CODE_VERSION != SIMULATION)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
773 UWORD32 sleep_time = l1s.actual_time.fn_mod42432;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
774 #else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
775 UWORD32 sleep_time = l1s.actual_time.fn;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
776 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
777
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
778 if (l1_config.pwr_mngt == PWR_MNGT)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
779 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
780 // Power management is enabled
129
419f638cf03b l1_pwmgr.c: l1s_sleep_manager(): logic apparently reconstructed,
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 128
diff changeset
781 WORD32 min_time, HWtimer,wake_up_time,min_time_gauging;
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
782 WORD32 afc_fix;
131
244b007df481 l1_pwmgr.c: .bss and .cinit data sections reconstructed
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 130
diff changeset
783 static UWORD32 previous_sleep = CLOCK_STOP;
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
784 #if (W_A_CALYPSO_PLUS_SPR_19599 == 1)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
785 BOOL extended_page_mode_state = 0; //Store state of extended page mode
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
786 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
787 WORD32 time_from_last_wakeup=0;
130
c4b922f2b593 l1_pwmgr.c: l1s_sleep_manager() fully reconstructed
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 129
diff changeset
788 UWORD32 sleep_mode;
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
789
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
790 #if (OP_BT == 1)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
791 WORD32 hci_ll_status;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
792 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
793
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
794 // init for trace and debug
123
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
795 why_big_sleep = BIG_SLEEP_DUE_TO_UNDEFINED;
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
796 wakeup_type = WAKEUP_FOR_UNDEFINED;
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
797
123
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
798 time_from_last_wakeup = (sleep_time - last_wakeup + 42432) % 42432;
128
a2f9560c1cf1 l1_pwmgr.c: began de-LoCosto-fication of l1s_sleep_manager()
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 127
diff changeset
799
a2f9560c1cf1 l1_pwmgr.c: began de-LoCosto-fication of l1s_sleep_manager()
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 127
diff changeset
800 //=================================================
a2f9560c1cf1 l1_pwmgr.c: began de-LoCosto-fication of l1s_sleep_manager()
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 127
diff changeset
801 // check System (SIM, UART, LDC ..... )
a2f9560c1cf1 l1_pwmgr.c: began de-LoCosto-fication of l1s_sleep_manager()
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 127
diff changeset
802 //=================================================
a2f9560c1cf1 l1_pwmgr.c: began de-LoCosto-fication of l1s_sleep_manager()
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 127
diff changeset
803 sleep_mode = Cust_check_system();
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
804
128
a2f9560c1cf1 l1_pwmgr.c: began de-LoCosto-fication of l1s_sleep_manager()
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 127
diff changeset
805 if (sleep_mode == DO_NOT_SLEEP)
a2f9560c1cf1 l1_pwmgr.c: began de-LoCosto-fication of l1s_sleep_manager()
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 127
diff changeset
806 return;
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
807
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
808 #if (CODE_VERSION != SIMULATION)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
809 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
810 // Protect System structures
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
811 // must be called BEFORE INT_DisableIRQ() while
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
812 // Nucleus does not restore IRQ/FIQ bits !!!!
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
813 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
814 OS_system_protect();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
815 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
816 // Disable IRQ
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
817 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
818 INT_DisableIRQ();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
819 #endif // NOT SIMULATION
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
820
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
821 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
822 // check OS loading
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
823 //=================================================
129
419f638cf03b l1_pwmgr.c: l1s_sleep_manager(): logic apparently reconstructed,
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 128
diff changeset
824 min_time = OS_get_inactivity_ticks();
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
825
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
826 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
827 // check HW Timers loading
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
828 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
829 HWtimer= l1s_get_HWTimers_ticks();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
830
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
831 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
832 // check next gauging task for Packet Idle
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
833 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
834 #if L1_GPRS
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
835 min_time_gauging = l1s_get_next_gauging_in_Packet_Idle();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
836 #else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
837 min_time_gauging = -1; // not used
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
838 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
839
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
840 #if (OP_BT == 1)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
841 hci_ll_status = hci_ll_ok_for_sleep();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
842 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
843 // check if immediate activity planned
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
844 // 0 means immediate activity
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
845 // in case big sleep is choosen (sleep mode == FRAME_STOP) because of UART or SIM,
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
846 // return and wait end of this activity (few TDMA frames) then check on next TDMA frames
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
847 // if MS can go in deep sleep
129
419f638cf03b l1_pwmgr.c: l1s_sleep_manager(): logic apparently reconstructed,
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 128
diff changeset
848 if ( !min_time
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
849 || !HWtimer
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
850 || !min_time_gauging
129
419f638cf03b l1_pwmgr.c: l1s_sleep_manager(): logic apparently reconstructed,
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 128
diff changeset
851 || (sleep_mode != CLOCK_STOP)
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
852 #if (OP_BT == 1)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
853 || !hci_ll_status
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
854 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
855 )
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
856 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
857
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
858
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
859 #if (CODE_VERSION != SIMULATION)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
860 OS_system_Unprotect();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
861 // free System structure
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
862 // Enable all IRQ
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
863 INT_EnableIRQ();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
864 // Wake up UART
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
865
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
866 SER_WakeUpUarts(); // Wake up Uarts
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
867
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
868 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
869 return;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
870 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
871 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
872 // Select sleep duration ....
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
873 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
874 // remember: -1 means no activity planned
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
875 //l1a_l1s_com.time_to_next_l1s_task is UW32, min_time is W32. Max value of l1a_l1s_com.time_to_next_l1s_task will be 2p31
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
876 //and ,min_time max value will be 2p30. If min_time > l1a_l1s_com.time_to_next_l1s_task,
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
877 //means MSB of l1a_l1s_com.time_to_next_l1s_task is zero. so, we can use- uw32_store_next_time & 0x7FFFFFFF
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
878
129
419f638cf03b l1_pwmgr.c: l1s_sleep_manager(): logic apparently reconstructed,
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 128
diff changeset
879 if (min_time == -1) min_time = l1a_l1s_com.time_to_next_l1s_task;
419f638cf03b l1_pwmgr.c: l1s_sleep_manager(): logic apparently reconstructed,
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 128
diff changeset
880 else MIN(min_time, l1a_l1s_com.time_to_next_l1s_task)
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
881 if (HWtimer != -1) MIN(min_time, HWtimer)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
882 if (min_time_gauging != -1) MIN(min_time, min_time_gauging)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
883
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
884 #if (TRACE_TYPE !=0 ) && (TRACE_TYPE != 2) && (TRACE_TYPE != 3)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
885 // to trace the Wake up source
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
886 // depending of min_time choose the wakeup_type
129
419f638cf03b l1_pwmgr.c: l1s_sleep_manager(): logic apparently reconstructed,
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 128
diff changeset
887 wakeup_type = WAKEUP_FOR_OS_TASK;
123
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
888 if (min_time == l1a_l1s_com.time_to_next_l1s_task) wakeup_type = WAKEUP_FOR_L1_TASK;
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
889 if (min_time == HWtimer) wakeup_type = WAKEUP_FOR_HW_TIMER_TASK;
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
890 if (min_time == min_time_gauging) wakeup_type = WAKEUP_FOR_GAUGING_TASK;
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
891 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
892
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
893 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
894 // Choose DEEP or BIG SLEEP
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
895 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
896 if ( ((l1s.pw_mgr.mode_authorized == DEEP_SLEEP) && (sleep_mode == CLOCK_STOP)) ||
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
897 ((l1s.pw_mgr.mode_authorized == ALL_SLEEP) && (sleep_mode == CLOCK_STOP)) )
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
898 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
899 // Check now gauging histogramme or if in inactive period of cell selection
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
900 #if (W_A_DSP_IDLE3 == 1) && (CODE_VERSION!=SIMULATION)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
901 if (((l1s.pw_mgr.enough_gaug == TRUE) || (l1a_l1s_com.mode == CS_MODE0)) &&
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
902 ( l1s_dsp_com.dsp_ndb_ptr->d_dsp_state == C_DSP_IDLE3))
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
903 #else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
904 #if (CHIPSET == 12) || (CHIPSET == 15)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
905 if (((l1s.pw_mgr.enough_gaug == TRUE) || (l1a_l1s_com.mode == CS_MODE0)) &&
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
906 !CLKM_READ_nIDLE3)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
907 #else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
908 if ((l1s.pw_mgr.enough_gaug == TRUE) || (l1a_l1s_com.mode == CS_MODE0))
122
9360d1f31c00 l1_pwmgr.c: import of sensible changes from freecalypso-sw/gsm-fw version
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 121
diff changeset
909 #endif
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
910 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
911 l1s.pw_mgr.sleep_performed = CLOCK_STOP;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
912 else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
913 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
914 // BIG SLEEP is chosen : check the reason
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
915 l1s.pw_mgr.sleep_performed = FRAME_STOP;
129
419f638cf03b l1_pwmgr.c: l1s_sleep_manager(): logic apparently reconstructed,
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 128
diff changeset
916 if (l1s.pw_mgr.enough_gaug != TRUE)
123
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
917 why_big_sleep = BIG_SLEEP_DUE_TO_GAUGING;
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
918 else
123
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
919 why_big_sleep = BIG_SLEEP_DUE_TO_DSP_TRACES;
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
920 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
921 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
922 if (l1s.pw_mgr.mode_authorized == BIG_SLEEP)
123
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
923 why_big_sleep = BIG_SLEEP_DUE_TO_SLEEP_MODE;
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
924
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
925 if ( ((l1s.pw_mgr.mode_authorized == BIG_SLEEP) && (sleep_mode >= FRAME_STOP)) ||
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
926 ((l1s.pw_mgr.mode_authorized >= DEEP_SLEEP) && (sleep_mode == FRAME_STOP)) )
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
927 l1s.pw_mgr.sleep_performed = FRAME_STOP;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
928
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
929
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
930 if ((previous_sleep == CLOCK_STOP) && (time_from_last_wakeup < 7))
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
931 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
932 #if (CODE_VERSION != SIMULATION)
129
419f638cf03b l1_pwmgr.c: l1s_sleep_manager(): logic apparently reconstructed,
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 128
diff changeset
933 OS_system_Unprotect(); // free System structure
419f638cf03b l1_pwmgr.c: l1s_sleep_manager(): logic apparently reconstructed,
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 128
diff changeset
934 INT_EnableIRQ(); // Enable all IRQ
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
935
129
419f638cf03b l1_pwmgr.c: l1s_sleep_manager(): logic apparently reconstructed,
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 128
diff changeset
936 SER_WakeUpUarts(); // Wake up Uarts
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
937
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
938 #endif // NOT SIMULATION
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
939 return;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
940 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
941
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
942 // update previous sleep
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
943 previous_sleep = l1s.pw_mgr.sleep_performed;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
944
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
945
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
946 #if (CODE_VERSION != SIMULATION)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
947
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
948 #if (CHIPSET == 12) || (CHIPSET == 15)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
949 F_INTH_DISABLE_ONE_IT(C_INTH_FRAME_IT); // mask Frame int.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
950 #else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
951 INTH_DISABLEONEIT(IQ_FRAME); // mask Frame int.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
952 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
953 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
954
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
955 //=====================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
956 // if CLOCK_STOP : stop RF, TPU, asleep Omega, DPLL, SPI
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
957 // if FRAME_STOP : asleep Omega, SPI
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
958 //=====================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
959 #if (CODE_VERSION != SIMULATION)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
960 if ( l1s.pw_mgr.sleep_performed == CLOCK_STOP )
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
961 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
962 // ==== STop RF and TPU..... ===================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
963
122
9360d1f31c00 l1_pwmgr.c: import of sensible changes from freecalypso-sw/gsm-fw version
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 121
diff changeset
964 //L1_trace_string("Proceeding to Deep Sleep\n");
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
965
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
966
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
967 l1dmacro_RF_sleep();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
968
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
969 // (*(volatile UWORD16 *)l1s_tpu_com.reg_cmd) =TPU_CTRL_RESET |
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
970 // TSP_CTRL_RESET |TPU_CTRL_CLK_EN;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
971 // (*(volatile UWORD16 *)l1s_tpu_com.reg_cmd) =0;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
972
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
973 //===== SET default value for gauging =========
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
974 // If we have come in here during the inactive period of cell
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
975 // selection, then load the ULPD timers with default values
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
976 // (used when the MS lost the network: in this case the deep sleep may be used)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
977 if (l1a_l1s_com.mode == CS_MODE0)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
978 {
129
419f638cf03b l1_pwmgr.c: l1s_sleep_manager(): logic apparently reconstructed,
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 128
diff changeset
979 l1ctl_pgm_clk32(DEFAULT_HFMHZ_VALUE, DEFAULT_32KHZ_VALUE);
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
980 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
981 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
982
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
983
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
984 //==============================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
985 // disable DPLL (do not provide clk to DSP & RIF (RIF))
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
986 //==============================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
987 #if ((CHIPSET ==4) || (CHIPSET == 7) || (CHIPSET == 8) || (CHIPSET == 10) || (CHIPSET == 11) || (CHIPSET == 12) || (CHIPSET == 15))
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
988 // disable DPLL (do not provide clk to DSP & RIF (Bridge))
129
419f638cf03b l1_pwmgr.c: l1s_sleep_manager(): logic apparently reconstructed,
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 128
diff changeset
989 ( * (volatile SYS_UWORD16 *) CLKM_CNTL_CLK) |= CLKM_DPLL_DIS | CLKM_BRIDGE_DIS;
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
990 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
991
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
992 //==============================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
993 // if CLOCK_STOP or FRAME-STOP : Asleep OMEGA (ABB)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
994 //==============================================
122
9360d1f31c00 l1_pwmgr.c: import of sensible changes from freecalypso-sw/gsm-fw version
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 121
diff changeset
995 afc_fix = ABB_sleep(l1s.pw_mgr.sleep_performed, l1s.afc);
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
996
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
997 #if (OP_BT == 1)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
998 hci_ll_go_to_sleep();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
999 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1000 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1001 // STop SPI .....
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1002 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1003
128
a2f9560c1cf1 l1_pwmgr.c: began de-LoCosto-fication of l1s_sleep_manager()
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 127
diff changeset
1004 *((volatile UWORD16 *)MEM_SPI)&=0xFFFE; // SPI CLK DISABLED
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1005 #endif // NOT SIMULATION
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1006
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1007
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1008 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1009 // CQ19599: For Calypso+ chipset, extended page mode
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1010 // shall be disabled before entering deep sleep and
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1011 // restored at wake up
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1012 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1013 #if (W_A_CALYPSO_PLUS_SPR_19599 == 1)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1014 extended_page_mode_state = (BOOL) f_memif_extended_page_mode_read_bit();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1015 f_memif_extended_page_mode_disable();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1016 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1017
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1018 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1019 // Init the timer :
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1020 //
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1021 // a margin of 4 frames (>MIN_SLEEP_TIME) is taken
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1022 // when evaluating system loading, because 1 frame
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1023 // is lost for wakeup only, and because sleep
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1024 // duration less than 1 frame is not worth ....
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1025 //
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1026 // 1 2 3 4 5 6 7 8
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1027 // SLEEP_CTRL SLEEP WAKEUP TASK (RF,Timer, ...)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1028 //
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1029 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1030 //ULPD Timer can be loaded up to MAX_GSM_TIMER (possible in CS_MODE0)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1031 if ( l1s.pw_mgr.sleep_performed == CLOCK_STOP )
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1032 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1033 // DEEP SLEEP -> need time to setup afc and rf
123
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
1034 wake_up_time = min_time - l1_config.params.setup_afc_and_rf;
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1035 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1036 else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1037 // BIG SLEEP
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1038 wake_up_time = min_time - 1;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1039
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1040
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1041
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1042 #if (CODE_VERSION != SIMULATION)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1043 if ( wake_up_time >= MAX_GSM_TIMER)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1044 ULDP_TIMER_INIT(MAX_GSM_TIMER);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1045 else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1046 ULDP_TIMER_INIT(wake_up_time);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1047
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1048 ULDP_TIMER_LD; // Load the timer
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1049
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1050 // BUG3060. Clear pending IQ_TGSM from ULPD. This could happen in case ULPD was frozen
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1051 // with zero into its GSM counter. In that case, the interrupt is still pending
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1052 // and if it is not cleared, it wakes the board up just after switching the clock.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1053 // Clear it into the ULPD...
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1054 // The ULDP_GSM_TIMER_IT_REG is a read only register and is cleared on
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1055 //reading the register.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1056 temp_clear_intr =(* (volatile UWORD16 *) ULDP_GSM_TIMER_IT_REG) & ULPD_IT_TIMER_GSM;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1057 // ... and next into the INTH. (must be done in this order
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1058
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1059 #if (CHIPSET == 12) || (CHIPSET == 15)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1060 F_INTH_RESET_ONE_IT(C_INTH_TGSM_IT);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1061 F_INTH_ENABLE_ONE_IT(C_INTH_TGSM_IT);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1062 #else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1063 INTH_RESETONEIT(IQ_TGSM); // clear TDMA IRQ
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1064 INTH_ENABLEONEIT(IQ_TGSM); // Unmask ULPD GSM int.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1065 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1066
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1067 #if (GSM_IDLE_RAM != 0)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1068 if (READ_TRAFFIC_CONT_STATE)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1069 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1070 CSMI_TrafficControllerOff();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1071 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1072 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1073
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1074 ULDP_TIMER_START; // start count down
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1075
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1076
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1077 #if (GSM_IDLE_RAM_DEBUG == 1)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1078 (*( volatile unsigned short* )(0xFFFE4802)) &= ~ (1 << 2); // GPIO-2=0
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1079 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1080
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1081 if ( l1s.pw_mgr.sleep_performed == CLOCK_STOP )
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1082 // DEEP SLEEP
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1083 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1084 #if (OP_WCP == 1) && (OP_L1_STANDALONE != 1)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1085 // specific sleep for WCP
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1086 arm7_deep_sleep();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1087 #else // NO OP_WCP
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1088 #if (W_A_CALYPSO_BUG_01435 == 1)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1089 f_arm_sleep_cmd(DEEP_SLEEP);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1090 #else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1091 *((volatile UWORD16 *)CLKM_ARM_CLK) &= ~(CLKM_DEEP_SLEEP); // set deep sleep mode
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1092 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1093 #endif // OP_WCP
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1094 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1095 else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1096 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1097 // BIG SLEEP / l1s.pw_mgr.sleep_performed == FRAME_STOP
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1098
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1099 //==========================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1100 //Shut down PERIPHERALS clocks UWIRE and ARMIO if authorized
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1101 //==========================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1102
128
a2f9560c1cf1 l1_pwmgr.c: began de-LoCosto-fication of l1s_sleep_manager()
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 127
diff changeset
1103 UWORD16 clocks_stopped; //OMAPS90550- new
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1104 clocks_stopped = (l1s.pw_mgr.clocks & l1s.pw_mgr.modules_status);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1105 if((clocks_stopped & ARMIO_CLK_CUT) == ARMIO_CLK_CUT)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1106 *((volatile UWORD16 *)ARMIO_CNTL_REG) &= ~(ARMIO_CLOCKEN);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1107 if((clocks_stopped & UWIRE_CLK_CUT) == UWIRE_CLK_CUT)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1108 *((volatile UWORD16 *)(MEM_UWIRE + 0x8)) &= ~(0x0001);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1109
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1110 #if (W_A_CALYPSO_BUG_01435 == 1)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1111 f_arm_sleep_cmd(BIG_SLEEP);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1112 #else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1113
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1114 *((volatile UWORD16 *)CLKM_ARM_CLK) &= ~(CLKM_MCLK_EN); // set big sleep mode
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1115 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1116 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1117 #else // Simulation part
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1118 l1s.pw_mgr.sleep_duration = wake_up_time;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1119 hw.deep_sleep_en = 1;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1120 status = NU_Suspend_Task(&L1S_task);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1121 // check status value...
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1122 if (status)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1123 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1124 #if (TRACE_TYPE==5)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1125 sprintf(errormsg,"Error somewhere in the L1S application to suspend : deep sleep\n");
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1126 log_sim_error(ERR);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1127 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1128 EXIT;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1129 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1130 #endif // SIMULATION
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1131
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1132 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1133 // Wake-up procedure
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1134 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1135 // Restore L1 data base, Nucleus, HW Timers ....
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1136 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1137
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1138 #if (GSM_IDLE_RAM_DEBUG == 1)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1139 (*( volatile unsigned short* )(0xFFFE4802)) |= (1 << 2); // GPIO-2=1
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1140 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1141
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1142
128
a2f9560c1cf1 l1_pwmgr.c: began de-LoCosto-fication of l1s_sleep_manager()
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 127
diff changeset
1143 l1s_wakeup();
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1144
123
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
1145 last_wakeup = l1s.actual_time.fn_mod42432;
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
1146
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
1147 if (last_wakeup == sleep_time)
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1148 // sleep duration == 0 -> wakeup in the same frame as sleep
123
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
1149 wakeup_type = WAKEUP_ASYNCHRONOUS_SLEEP_DURATION_0;
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1150
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1151 #if (GSM_IDLE_RAM != 0)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1152 // Update counters with sleep duration -> will be used case expiration in next wake up phase before traffic controller is enabled by msg sending
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1153 gsm_idle_ram_ctl->os_load -= (l1s.pw_mgr.sleep_duration);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1154 gsm_idle_ram_ctl->hw_timer -= (l1s.pw_mgr.sleep_duration);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1155
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1156 if (l1s.pw_mgr.wakeup_type != WAKEUP_FOR_L1_TASK)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1157 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1158 if (!READ_TRAFFIC_CONT_STATE)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1159 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1160 CSMI_TrafficControllerOn();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1161 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1162 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1163 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1164 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1165 //if CLOCK_STOP : restart TPU and RF....
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1166 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1167 #if (CODE_VERSION != SIMULATION)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1168 if ( l1s.pw_mgr.sleep_performed == CLOCK_STOP )
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1169 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1170 // (*(volatile UWORD16 *)l1s_tpu_com.reg_cmd) = TPU_CTRL_CLK_EN;
122
9360d1f31c00 l1_pwmgr.c: import of sensible changes from freecalypso-sw/gsm-fw version
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 121
diff changeset
1171 UWORD8 local_sleep_status;
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1172
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1173 l1dmacro_RF_wakeup();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1174
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1175 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1176
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1177 #if ((CHIPSET ==4) || (CHIPSET == 7) || (CHIPSET == 8) || (CHIPSET == 10) || (CHIPSET == 11))
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1178 // enable DPLL (provide clk to DSP & RIF(Bridge) in small/big sleep)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1179 // On CALYPSO, BRIDGE clock can be cut according to the ARM sleep mode even during DMA transfer
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1180 ( * (volatile SYS_UWORD16 *) CLKM_CNTL_CLK) &= ~(CLKM_DPLL_DIS | CLKM_BRIDGE_DIS);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1181 #elif (CHIPSET == 12)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1182 // Nothing to be done because if DSP wants clock, it will exit from IDLE3 mode, which wakes up the DPLL
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1183 #elif (CHIPSET == 15)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1184 ( * (volatile SYS_UWORD16 *) CLKM_CNTL_CLK) &= ~(CLKM_DPLL_DIS);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1185 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1186
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1187 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1188 //if CLOCK_STOP or FRAME-STOP : ReStart SPI
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1189 //=================================================
128
a2f9560c1cf1 l1_pwmgr.c: began de-LoCosto-fication of l1s_sleep_manager()
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 127
diff changeset
1190 *((volatile UWORD16 *)MEM_SPI)|=0x0001; // SPI CLK ENABLED
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1191
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1192 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1193 // Wake up ABB
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1194 //=================================================
122
9360d1f31c00 l1_pwmgr.c: import of sensible changes from freecalypso-sw/gsm-fw version
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 121
diff changeset
1195 ABB_wakeup(l1s.pw_mgr.sleep_performed, l1s.afc);
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1196
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1197 #if (OP_BT == 1)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1198 hci_ll_wake_up();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1199 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1200 #endif //CODE VERSION
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1201
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1202 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1203 // CQ19599: For Calypso+ chipset, restore the extended
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1204 // page mode if it was enabled before entering in sleep
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1205 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1206 #if (W_A_CALYPSO_PLUS_SPR_19599 == 1)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1207 if ( extended_page_mode_state != 0 )
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1208 f_memif_extended_page_mode_enable();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1209 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1210
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1211 #if (OP_L1_STANDALONE == 0)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1212 /*GC_Wakeup(); OMAPS00134004*/
122
9360d1f31c00 l1_pwmgr.c: import of sensible changes from freecalypso-sw/gsm-fw version
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 121
diff changeset
1213 #endif
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1214
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1215 #if (CODE_VERSION != SIMULATION)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1216 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1217 // enable IRQ
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1218 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1219 OS_system_Unprotect();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1220 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1221
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1222 #if (TRACE_TYPE != 0)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1223 if (l1a_l1s_com.mode != CS_MODE0) // in this mode the trace prevent from going to deep sleep due to UART activity
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1224 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1225 #if (GSM_IDLE_RAM == 0)
123
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
1226 l1_trace_sleep(sleep_time, l1s.actual_time.fn_mod42432, l1s.pw_mgr.sleep_performed, wakeup_type, why_big_sleep);
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1227 #else
123
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
1228 l1_trace_sleep_intram(sleep_time, l1s.actual_time.fn_mod42432, l1s.pw_mgr.sleep_performed, wakeup_type, why_big_sleep);
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1229 #if (TRACE_TYPE==1) || (TRACE_TYPE==4)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1230 l1s_trace_mftab();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1231 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1232 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1233 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1234 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1235
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1236 #if (TRACE_TYPE == 1) || (TRACE_TYPE == 4)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1237 trace_info.sleep_performed = TRUE;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1238 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1239
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1240 #if (CODE_VERSION != SIMULATION)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1241
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1242 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1243 // enable IRQ
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1244 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1245 INT_EnableIRQ();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1246
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1247 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1248 // Be careful:in case of asynchronous wake-up after sleep
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1249 // an IT_TDMA may be unmasked and executed just after OS_system_Unprotect().
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1250 // As we already are inside an hisr(), it implies the execution of an another hisr().
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1251 // In order to avoid issues with the execution of an hisr() inside the hisr()
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1252 // do not add code here after !!!
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1253 // if possible respect this rule !
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1254 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1255
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1256 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1257 // wake-up UARTs
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1258 //this function must be call after the UART interrupt,
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1259 //it means after the function INT_EnableIRQ()
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1260 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1261 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1262 #if (GSM_IDLE_RAM != 0)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1263 // Traffic controller has to be enabled before calling SER_WakeUpUarts
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1264 // as this function can access the external RAM.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1265 // Reset the flag that will indicates if an interrup will put the traffic
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1266 // controller ON during that time.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1267 l1s.gsm_idle_ram_ctl.trff_ctrl_enable_cause_int = FALSE;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1268 if (!READ_TRAFFIC_CONT_STATE)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1269 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1270 flag_traffic_controller_state = 1;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1271 CSMI_TrafficControllerOn();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1272 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1273 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1274
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1275
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1276 SER_WakeUpUarts(); // Wake up Uarts
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1277
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1278
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1279 #if (GSM_IDLE_RAM != 0)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1280 // The traffic controller state shall be restored as it was before
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1281 // calling SER_WakeUpUarts. Do not disable it if an interrup occured
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1282 // in between and activated the traffic controller.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1283 if ((flag_traffic_controller_state == 1) && (l1s.gsm_idle_ram_ctl.trff_ctrl_enable_cause_int == FALSE))
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1284 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1285 CSMI_TrafficControllerOff();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1286 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1287 flag_traffic_controller_state = 0;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1288 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1289 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1290 #endif // NOT SIMULATION
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1291 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1292 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1293
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1294 // l1s_wakeup() */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1295 // Description: wake-up of the MCU from GSM Timer it OR unscheduled wake-up
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1296 // This function read the TPU timer and fix the :
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1297 // - system clock
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1298 // - Nucleus timers
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1299 // - L1 frame counter
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1300 // - L1 next task counter
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1301 // - Hardware timers
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1302
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1303 void l1s_wakeup(void)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1304 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1305 #if (CODE_VERSION != SIMULATION)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1306 if (l1_config.pwr_mngt == PWR_MNGT)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1307 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1308 // Restore interrupts ....
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1309
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1310 #if (CHIPSET == 12) || (CHIPSET == 15)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1311 // mask TGSM int.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1312 F_INTH_DISABLE_ONE_IT(C_INTH_TGSM_IT);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1313 #else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1314 INTH_DISABLEONEIT(IQ_TGSM); // mask TGSM int.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1315 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1316
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1317 #if (CHIPSET == 12) || (CHIPSET == 15)
123
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
1318 int_id = ((* (SYS_UWORD16 *) C_INTH_B_IRQ_REG) & C_INTH_SRC_NUM);// For debug: Save IRQ that causes the waking up
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
1319 if ( int_id >= 256 )
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
1320 int_id = ((* (SYS_UWORD16 *) C_INTH_B_FIQ_REG) & C_INTH_SRC_NUM)+100;
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1321 #else
123
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
1322 int_id = ((* (SYS_UWORD16 *) INTH_B_IRQ_REG) & INTH_SRC_NUM);// For debug: Save IRQ that causes the waking up
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
1323 if ( int_id >= 256 )
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
1324 int_id = ((* (SYS_UWORD16 *) INTH_B_FIQ_REG) & INTH_SRC_NUM)+100;
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1325 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1326
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1327 // clear pending IQ_FRAME it and unmask it
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1328 #if (CHIPSET == 12) || (CHIPSET == 15)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1329 F_INTH_RESET_ONE_IT(C_INTH_FRAME_IT);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1330 F_INTH_ENABLE_ONE_IT(C_INTH_FRAME_IT); // Unmask FRAME int.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1331 #else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1332 INTH_RESETONEIT(IQ_FRAME); // clear TDMA IRQ
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1333 INTH_ENABLEONEIT(IQ_FRAME); // Unmask FRAME int.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1334 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1335
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1336 #if (CHIPSET == 8)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1337 // if deep sleep
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1338 if ( l1s.pw_mgr.sleep_performed == CLOCK_STOP )
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1339 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1340 UWORD8 i;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1341
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1342 // Loop with check whether DPLL is locked: 100 us max.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1343 for (i=0;i<16;i++)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1344 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1345 if (DPLL_READ_DPLL_LOCK)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1346 break;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1347 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1348 wait_ARM_cycles(convert_nanosec_to_cycles(50000)); // 50us
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1349
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1350 // Enable DPLL
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1351 //--------------------------------------------------
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1352 DPLL_SET_PLL_ENABLE;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1353
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1354 // Loop with check whether DPLL is locked: 100 us max.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1355 for (i=0;i<16;i++)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1356 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1357 if (DPLL_READ_DPLL_LOCK)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1358 break;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1359 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1360 wait_ARM_cycles(convert_nanosec_to_cycles(50000)); // 50us
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1361 } // if deep sleep
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1362
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1363 #endif // CHIPSET == 8
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1364
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1365 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1366 //Restart PERIPHERALS clocks if necessary after a big sleep period
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1367 // WARNING: restart other clocks modules!!!
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1368 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1369
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1370
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1371 #if(CHIPSET == 15)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1372 if(l1s.pw_mgr.sleep_performed == FRAME_STOP )
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1373 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1374
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1375 //ABB_Wakeup_BS(); //Not Used
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1376 //DBB_Wakeup_BS(); //Not Used
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1377 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1378 #else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1379 // if big sleep
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1380 if ( l1s.pw_mgr.sleep_performed == FRAME_STOP )
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1381 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1382
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1383 UWORD16 clocks_stopped;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1384 clocks_stopped = (l1s.pw_mgr.clocks & l1s.pw_mgr.modules_status);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1385 if((clocks_stopped & ARMIO_CLK_CUT) == ARMIO_CLK_CUT)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1386 *((volatile UWORD16 *)ARMIO_CNTL_REG) |= ARMIO_CLOCKEN;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1387 if((clocks_stopped & UWIRE_CLK_CUT) == UWIRE_CLK_CUT)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1388 *((volatile UWORD16 *)(MEM_UWIRE + 0x8)) |= 0x0001;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1389
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1390 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1391 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1392
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1393
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1394 /***************************************************/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1395 /* Compute effective sleeping time .... */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1396 /* */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1397 /* sleep duration is */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1398 /* - TIMER_INIT */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1399 /* - or TIMER_INIT - TIMER_VALUE */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1400 /* */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1401 /* "frame_adjust" = TRUE for unschedules wake-up */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1402 /* FALSE for scheduled wake-up */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1403 /***************************************************/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1404 l1s.pw_mgr.frame_adjust = l1s_compute_wakeup_ticks();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1405
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1406 #if (TRACE_TYPE !=0 ) && (TRACE_TYPE != 2) && (TRACE_TYPE != 3)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1407 if ((l1s.pw_mgr.frame_adjust == TRUE))
123
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
1408 wakeup_type = WAKEUP_BY_ASYNC_INTERRUPT;
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1409 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1410
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1411
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1412 /* Fix Frame */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1413
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1414 l1s_recover_Frame();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1415
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1416
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1417 /* Fix Hardware Timers */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1418 /* */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1419 /* GSM 1.0 : ntd - timer clock not cut */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1420 /* */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1421 /* GSM 1.5 : deep sleep - need to fix timers */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1422
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1423 if (l1s.pw_mgr.sleep_performed == CLOCK_STOP)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1424 l1s_recover_HWTimers();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1425
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1426
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1427 /* Fix Os */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1428
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1429 if (Cust_recover_Os()) l1s.pw_mgr.Os_ticks_required = TRUE;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1430 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1431 #else // SIMULATION part
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1432 // update L1 timers (FN,...)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1433 l1s_recover_Frame();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1434 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1435 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1436
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1437
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1438
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1439 /* l1s_wakeup_adjust() */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1440 /* Description: 1 frame adjust a fter unscheduled wake-up */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1441 /* This function fix the : */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1442 /* - system clock */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1443 /* - Nucleus timers */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1444 /* - L1 frame counter */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1445 /* - L1 next task counter */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1446 /* - Hardware timers */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1447
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1448
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1449 void l1s_wakeup_adjust ()
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1450 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1451 #if (CODE_VERSION != SIMULATION)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1452 if (l1_config.pwr_mngt == PWR_MNGT)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1453 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1454
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1455 UWORD32 previous_sleep_time;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1456
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1457 /***************************************************/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1458 // Freeze GSM Timer .... */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1459 /***************************************************/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1460 ULDP_TIMER_FREEZE;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1461
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1462 /***************************************************/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1463 // Compute effective sleeping time ....
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1464 //
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1465 // compute sleep duration
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1466 // - TIMER_INIT
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1467 // - or TIMER_INIT - TIMER_VALUE
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1468 /***************************************************/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1469 // save sleep duration that was computed at "unscheduled wakeup"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1470 previous_sleep_time = l1s.pw_mgr.sleep_duration;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1471
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1472 l1s_compute_wakeup_ticks();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1473
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1474 // reset flag for adjustment request ....
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1475 l1s.pw_mgr.frame_adjust = FALSE;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1476
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1477 // fix sleep duration
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1478 // => compute difference with duration computed at
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1479 // "unscheduled wakeup"
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1480 l1s.pw_mgr.sleep_duration -= previous_sleep_time;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1481
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1482 // adjust system with 1 frame IF NECESSARY ....
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1483 if (l1s.pw_mgr.sleep_duration)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1484 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1485 /***************************************************/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1486 /* Fix Frame */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1487 /***************************************************/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1488 l1s_recover_Frame();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1489
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1490 /***************************************************/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1491 /* Fix Os */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1492 /***************************************************/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1493 if (Cust_recover_Os()) l1s.pw_mgr.Os_ticks_required = TRUE;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1494 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1495 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1496 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1497 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1498
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1499
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1500 /*-------------------------------------------------------*/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1501 /* l1s_compute_wakeup_Ticks() */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1502 /*-------------------------------------------------------*/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1503 /* */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1504 /* Description: wake-up */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1505 /* ------------ */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1506 /* This function compute the sleep duration according to */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1507 /* current value of count down counter. */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1508 /* - if TIMER_VALUE = 0 it returns TIMER_INIT */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1509 /* - else it returns TIMER_INIT-TIMER_VALUE*/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1510 /* */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1511 /*-------------------------------------------------------*/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1512 BOOL l1s_compute_wakeup_ticks(void)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1513 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1514 UWORD16 temp_clear_intr;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1515 #if (CODE_VERSION != SIMULATION)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1516 // read current value of count down counter
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1517 l1s.pw_mgr.sleep_duration = READ_ULDP_TIMER_VALUE;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1518
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1519 // if count down=0 it's a scheduled wake-up....
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1520 if (l1s.pw_mgr.sleep_duration == 0)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1521 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1522 // read sleeping planned value in TPU INIT register
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1523 l1s.pw_mgr.sleep_duration = READ_ULDP_TIMER_INIT;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1524 // INTH is different from the ULPD interrupt -> aynchronous wakeup
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1525 #if (CHIPSET == 12) || (CHIPSET == 15)
123
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
1526 if (int_id != C_INTH_TGSM_IT)
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1527 #else
123
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
1528 if (int_id != IQ_TGSM)
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1529 #endif
123
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
1530 {
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
1531 wakeup_type = WAKEUP_ASYNCHRONOUS_ULPD_0;
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1532 // RESET IT_ULPD in ULPD module
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1533 // The ULDP_GSM_TIMER_IT_REG is a read only register and is cleared on reading the register
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1534 temp_clear_intr =(* (volatile UWORD16 *) ULDP_GSM_TIMER_IT_REG) & ULPD_IT_TIMER_GSM;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1535 #if (CHIPSET == 12) || (CHIPSET == 15)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1536 // RESET IQ_TGSM (IT_ULPD) in IT register
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1537 F_INTH_RESET_ONE_IT(C_INTH_TGSM_IT);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1538 // RESET IQ_FRAME in IT register
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1539 F_INTH_RESET_ONE_IT(C_INTH_FRAME_IT);
123
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
1540 int_id = C_INTH_TGSM_IT;
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1541 #else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1542 // RESET IQ_TGSM (IT_ULPD) in IT register
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1543 INTH_RESETONEIT(IQ_TGSM);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1544 // RESET IQ_FRAME in IT register
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1545 INTH_RESETONEIT(IQ_FRAME);
123
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
1546 int_id = IQ_TGSM;
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1547 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1548 return(FALSE);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1549 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1550 else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1551 return(FALSE);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1552 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1553 else // Unscheduled wakeup
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1554 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1555 // read sleeping planned value in TPU INIT register & compute time elapsed
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1556 l1s.pw_mgr.sleep_duration = READ_ULDP_TIMER_INIT - l1s.pw_mgr.sleep_duration;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1557 return(TRUE);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1558 }
132
c721b9d301b9 l1_pwmgr.c: l1s_compute_wakeup_ticks() reconstructed
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 131
diff changeset
1559 #else
c721b9d301b9 l1_pwmgr.c: l1s_compute_wakeup_ticks() reconstructed
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 131
diff changeset
1560 return(FALSE);//omaps00090550
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1561 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1562 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1563
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1564 /*-------------------------------------------------------*/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1565 /* l1s_recover_Frame() */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1566 /*-------------------------------------------------------*/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1567 /* */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1568 /* Description: adjust layer1 data from sleep duration */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1569 /* ------------ */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1570 /*-------------------------------------------------------*/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1571 void l1s_recover_Frame(void)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1572 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1573 if (l1_config.pwr_mngt == PWR_MNGT)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1574 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1575 /***************************************************/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1576 /* Fix Frame counters . */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1577 /***************************************************/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1578 l1s.debug_time += l1s.pw_mgr.sleep_duration; // used for debug and by L3 scenario.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1579
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1580 // Time...
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1581 // Update "actual time".
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1582 l1s_increment_time(&(l1s.actual_time), l1s.pw_mgr.sleep_duration);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1583
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1584 // Update "next time".
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1585 l1s.next_time = l1s.actual_time;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1586 l1s_increment_time(&(l1s.next_time), 1); // Next time is actual_time + 1
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1587
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1588 #if L1_GPRS
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1589 // Update "next plus time".
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1590 l1s.next_plus_time = l1s.next_time;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1591 l1s_increment_time(&(l1s.next_plus_time), 1); // Next_plus time is next_time + 1
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1592 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1593
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1594 #if (TRACE_TYPE == 1) || (TRACE_TYPE == 4)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1595 trace_fct(CST_L1S_ADJUST_TIME, (UWORD32)(-1));
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1596 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1597
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1598 // Multiframe table...
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1599 // Increment active frame % mftab size.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1600 l1s.afrm = (l1s.afrm + l1s.pw_mgr.sleep_duration) % MFTAB_SIZE;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1601
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1602 // Control function counters...
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1603 // Increment frame count from last AFC update.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1604 l1s.afc_frame_count+= l1s.pw_mgr.sleep_duration;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1605 // reset counter to mask SNR/TOA results for 2 fr.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1606 #if (TOA_ALGO == 2)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1607 l1s.toa_var.toa_snr_mask=0;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1608 #else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1609 l1s.toa_snr_mask=0;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1610 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1611
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1612 /***************************************************/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1613 /* Fix next L1S task counter */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1614 /***************************************************/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1615 // Decrement time to next L1S task.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1616 if((l1a_l1s_com.time_to_next_l1s_task > 0) &&
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1617 (l1a_l1s_com.time_to_next_l1s_task < MAX_FN))
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1618 l1a_l1s_com.time_to_next_l1s_task -= l1s.pw_mgr.sleep_duration;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1619 } // l1_config.pwr_mngt == PWR_MNGT
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1620 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1621
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1622
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1623 /*-------------------------------------------------------*/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1624 /* l1s_recover_HWTimers() */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1625 /*-------------------------------------------------------*/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1626 /* */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1627 /* Description: adjust hardware timers from sleep */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1628 /* ------------ duration */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1629 /* */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1630 /* Timers clocks are enabled after VTCX0+SLICER+13MHZ */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1631 /* setup times. So sleep duration is : */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1632 /* GSM TIMER - SETUP_FRAME + SETUP_SLICER + SETUP_VTCXO */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1633 /* + SETUP_CLK13 */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1634 /*-------------------------------------------------------*/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1635
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1636 void l1s_recover_HWTimers(void)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1637 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1638 #if (CODE_VERSION != SIMULATION)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1639
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1640 #define SETUP_FRAME_IN_CLK32 (SETUP_FRAME*4.615*32.768)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1641 #if (CHIPSET == 15)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1642 #define DELTA_TIME (0)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1643 #else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1644 #define DELTA_TIME (SETUP_FRAME_IN_CLK32 -SETUP_SLICER - SETUP_VTCXO)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1645 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1646
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1647
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1648 if (l1_config.pwr_mngt == PWR_MNGT)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1649 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1650 WORD32 timer1,timer2,timer;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1651 #if (CHIPSET == 12) || (CHIPSET == 15)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1652 WORD32 timer_sec;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1653 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1654 UWORD16 cntlreg;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1655 UWORD16 modereg;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1656 double duration;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1657
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1658
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1659 //WORD32 old;- OMAPS 90550 new
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1660
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1661 // read Hercules Timers & Watchdog
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1662 //=================================================
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1663 // Tint = Tclk * (LOAD_TIM+1) * 2^(PTV+1)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1664 // Tclk = 1.2308us for Fclk=13Mhz
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1665 // PTV = 7 (pre-scaler field)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1666 //-------------------------------------------------
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1667
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1668 cntlreg = Dtimer1_Get_cntlreg();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1669 if ( (cntlreg & D_TIMER_RUN) == D_TIMER_RUN)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1670 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1671 cntlreg = cntlreg&0x1F;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1672 cntlreg >>= 2; // take PTV
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1673 cntlreg = 1 << (cntlreg+1); // compute 2^(PTV+1)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1674 // convert sleep duration in HWTimers ticks....
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1675 duration = (l1s.pw_mgr.sleep_duration * 4.615 - (DELTA_TIME/32.768)) / (cntlreg * 0.0012308);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1676 if (duration < 0.0){
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1677 duration = 0.0; // This needs to be done for all the timers
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1678 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1679 timer1 = Dtimer1_ReadValue() - (UWORD16) duration;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1680
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1681 Dtimer1_Start(0);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1682 Dtimer1_WriteValue(timer1);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1683 Dtimer1_Start(1);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1684 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1685
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1686 cntlreg = Dtimer2_Get_cntlreg();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1687 if ( (cntlreg & D_TIMER_RUN) == D_TIMER_RUN)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1688 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1689 cntlreg = cntlreg&0x1F;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1690 cntlreg >>= 2; // take PTV
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1691 cntlreg = 1 << (cntlreg+1);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1692 // convert sleep duration in HWTimers ticks....
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1693 duration = (l1s.pw_mgr.sleep_duration * 4.615 - (DELTA_TIME/32.768)) / (cntlreg * 0.0012308);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1694 if (duration < 0.0){
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1695 duration = 0.0; // This needs to be done for all the timers
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1696 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1697 timer2 = Dtimer2_ReadValue() - (UWORD16) duration;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1698 Dtimer2_Start(0);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1699 Dtimer2_WriteValue(timer2);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1700 Dtimer2_Start(1);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1701 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1702
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1703 cntlreg = TIMER_Read(0);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1704 modereg = TIMER_Read(2);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1705 if ( (cntlreg & TIMER_ST) || (modereg & TIMER_WDOG))
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1706 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1707 // in watchdog mode PTV is forced to 7
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1708 if ( modereg & TIMER_WDOG )
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1709 cntlreg |= TIMER_PTV;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1710
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1711 cntlreg = (cntlreg & TIMER_PTV) >> 9; // take PTV
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1712 cntlreg = 1 << (cntlreg+1);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1713 // convert sleep duration in HWTimers ticks....
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1714 duration = (l1s.pw_mgr.sleep_duration * 4.615 - (DELTA_TIME/32.768)) / (cntlreg * 0.001078);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1715
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1716 timer = TIMER_ReadValue() - (UWORD16) duration;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1717 TIMER_START_STOP(0);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1718 TIMER_WriteValue(timer);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1719 TIMER_START_STOP(1);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1720 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1721
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1722 #if (CHIPSET == 12) || (CHIPSET == 15)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1723 cntlreg = TIMER_SEC_Read(0);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1724 modereg = TIMER_SEC_Read(2);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1725 if ( (cntlreg & TIMER_ST) || (modereg & TIMER_WDOG))
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1726 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1727 // in watchdog mode PTV is forced to 7
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1728 if ( modereg & TIMER_WDOG )
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1729 cntlreg |= TIMER_PTV;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1730
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1731 cntlreg = (cntlreg & TIMER_PTV) >> 9; // take PTV
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1732 cntlreg = 1 << (cntlreg+1);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1733 // convert sleep duration in HWTimers ticks....
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1734 duration = (l1s.pw_mgr.sleep_duration * 4.615 - (DELTA_TIME/32.768)) / (cntlreg * 0.001078);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1735
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1736 timer_sec = TIMER_SEC_ReadValue() - (UWORD16) duration;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1737 TIMER_SEC_START_STOP(0);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1738 TIMER_SEC_WriteValue(timer_sec);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1739 TIMER_SEC_START_STOP(1);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1740 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1741 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1742
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1743 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1744 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1745 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1746 /*-------------------------------------------------------*/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1747 /* l1s_get_next_gauging_in_Packet_Idle() */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1748 /*-------------------------------------------------------*/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1749 /* */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1750 /* Description: */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1751 /* ------------ */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1752 /* return the nbr of frames before the next gauging */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1753 /* return -1 means no activity planned */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1754 /*-------------------------------------------------------*/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1755 #if L1_GPRS
123
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
1756 UWORD32 next_gauging_scheduled_for_PNP; // gauging for Packet Idle
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
1757
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
1758 WORD32 l1s_get_next_gauging_in_Packet_Idle(void)
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1759 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1760 WORD32 next_gauging;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1761
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1762 // gauging performed with Normal Paging (we are in Idle mode)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1763 if (l1a_l1s_com.l1s_en_task[NP] == TASK_ENABLED)
123
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
1764 return (-1); // no activity planned
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1765
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1766 // we are not in Packet Idle Mode
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1767 if (l1a_l1s_com.l1s_en_task[PNP] != TASK_ENABLED)
123
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
1768 return (-1); // no activity planned
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
1769
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
1770 next_gauging = next_gauging_scheduled_for_PNP - l1s.actual_time.fn ;
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1771 if (next_gauging < 0)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1772 next_gauging+=MAX_FN;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1773
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1774 if (next_gauging <= MIN_SLEEP_TIME)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1775 return(0);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1776
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1777 return (next_gauging);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1778 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1779 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1780 /*-------------------------------------------------------*/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1781 /* l1s_gauging_decision_with_PNP() */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1782 /*-------------------------------------------------------*/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1783 /* */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1784 /* Description: */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1785 /* ------------ */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1786 /* */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1787 /*-------------------------------------------------------*/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1788 #if L1_GPRS
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1789 BOOL l1s_gauging_decision_with_PNP(void)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1790 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1791 #define TWO_SECONDS_IN_FRAME (UWORD16)(2000/4.615)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1792 WORD32 time_to_next_gauging=0; //changed to WORD32- sajal
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1793 // It's time to perform the next gauging
123
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
1794 time_to_next_gauging = next_gauging_scheduled_for_PNP - l1s.actual_time.fn;
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1795 if (time_to_next_gauging < 0)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1796 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1797 time_to_next_gauging += MAX_FN;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1798 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1799
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1800 if( (time_to_next_gauging == 0) || (time_to_next_gauging > TWO_SECONDS_IN_FRAME))
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1801 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1802
123
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
1803 next_gauging_scheduled_for_PNP = l1s.actual_time.fn + TWO_SECONDS_IN_FRAME;
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
1804 if (next_gauging_scheduled_for_PNP >= MAX_FN) next_gauging_scheduled_for_PNP -= MAX_FN;
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1805 return (TRUE);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1806 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1807
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1808 return (FALSE); // do not perform gauging
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1809 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1810 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1811 /*-------------------------------------------------------*/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1812 /* l1s_gauging_decision_with_NP() */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1813 /*-------------------------------------------------------*/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1814 /* */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1815 /* Description: */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1816 /* ------------ */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1817 /* */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1818 /*-------------------------------------------------------*/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1819 BOOL l1s_gauging_decision_with_NP(void)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1820 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1821
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1822 static UWORD8 time_to_gaug;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1823
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1824 // a paging is scheduled or , was scheduled but discarded by a higher priority task
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1825 if (l1s.pw_mgr.paging_scheduled == TRUE)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1826 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1827 l1s.pw_mgr.paging_scheduled = FALSE; // reset Flag.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1828
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1829 // A gauging session is needed : start gauging session with this paging bloc !
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1830
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1831 //Nina modify to save power, not forbid deep sleep, only force gauging in next paging
123
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
1832 // FreeCalypso TCS211 reconstruction: Nina's change reverted
63137aa0ad1f l1_pwmgr.c: passes compilation (but link fails)
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 122
diff changeset
1833 #if 1
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1834 if (l1s.pw_mgr.enough_gaug != TRUE)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1835 time_to_gaug = 0;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1836 #else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1837 if ((l1s.pw_mgr.enough_gaug != TRUE)||(l1s.force_gauging_next_paging_due_to_CCHR == 1))
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1838 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1839 time_to_gaug = 0;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1840 l1s.force_gauging_next_paging_due_to_CCHR = 0;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1841 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1842 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1843 if (time_to_gaug > 0)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1844 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1845 time_to_gaug--; // perform the gauging with an another paging.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1846 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1847 else // perform the gauging with this paging
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1848 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1849 if (l1s.task_status[NP].current_status == ACTIVE )
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1850 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1851 time_to_gaug = GAUG_VS_PAGING_RATE[l1a_l1s_com.bs_pa_mfrms-2]-1;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1852
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1853 return (TRUE); // gauging allowed
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1854 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1855 else // a gauging is scheduled to be perform here but the paging is missing
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1856 { // (paging discarded by a higher priority task ?)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1857 l1s.pw_mgr.enough_gaug= FALSE; // forbid Deep sleep until next gauging
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1858 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1859 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1860 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1861 return (FALSE); // gauging not allowed
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1862 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1863
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1864 /*************************************************************/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1865 /* Gauging task management : */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1866 /* */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1867 /* CALYPSO */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1868 /* */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1869 /* 9 8 7 6 5 4 3 2 1 0 */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1870 /* C0 C1 C2 C3 C4 W R - - - */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1871 /* | | */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1872 /* | | */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1873 /* |_ start gauging |_ stop gauging */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1874 /* */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1875 /*OTHERS: */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1876 /* */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1877 /* 11 10 9 8 7 6 5 4 3 2 1 0 */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1878 /* C0 C1 C2 C3 C4 W R - - - - - */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1879 /* | | | | | */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1880 /* | | |_ start gauging |_ stop gauging */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1881 /* | | | | */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1882 /* | |_ (ITCOM) | |(ITCOM) */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1883 /* | | */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1884 /* |_ pgm PLL |_restore PLL */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1885 /* */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1886 /* */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1887 /*************************************************************/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1888 void l1s_gauging_task(void)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1889 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1890 if (l1_config.pwr_mngt == PWR_MNGT)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1891 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1892 /*************************************************************/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1893 if (l1s.pw_mgr.gauging_task == ACTIVE)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1894 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1895 /*************************************************************/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1896 // COUNT = 10 ==> PLL is at 65 Mhz, start the gauging
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1897 /*************************************************************/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1898 #if (CHIPSET==7) || (CHIPSET == 8) || (CHIPSET == 10) || (CHIPSET == 11) || (CHIPSET == 12) || (CHIPSET == 15)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1899 // the gauging was started with the begining of the paging
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1900 #else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1901 if (l1s.pw_mgr.gaug_count == (l1s.pw_mgr.gaug_duration-1))
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1902 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1903 #if (CODE_VERSION != SIMULATION)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1904 ULDP_GAUGING_START; // start gauging
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1905 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1906
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1907 #if (TRACE_TYPE != 0)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1908 #if (GSM_IDLE_RAM != 0)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1909 l1_trace_gauging_intram();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1910 #else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1911 l1_trace_gauging();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1912 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1913 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1914 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1915 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1916
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1917 l1s.pw_mgr.gaug_count--; // decrement counter
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1918
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1919
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1920 // When a MISC task is enabled L1S must be ran every frame
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1921 // to be able to enable the frame interrupt for DSP
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1922 l1a_l1s_com.time_to_next_l1s_task = 0;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1923 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1924
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1925 /*************************************************************/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1926 // REQUEST A GAUGING PROCESS ON EACH PAGING BLOCK
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1927 // IN IDLE MODE .....
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1928 /*************************************************************/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1929
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1930 else if (l1s.pw_mgr.gauging_task == INACTIVE )
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1931 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1932 BOOL decision = FALSE;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1933
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1934 if (l1a_l1s_com.l1s_en_task[NP] == TASK_ENABLED)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1935 decision = l1s_gauging_decision_with_NP();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1936 #if L1_GPRS
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1937 else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1938 if (l1a_l1s_com.l1s_en_task[PNP] == TASK_ENABLED)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1939 decision = l1s_gauging_decision_with_PNP();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1940 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1941
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1942 if (decision == TRUE)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1943 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1944 // gauging duration
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1945 l1s.pw_mgr.gaug_count = l1s.pw_mgr.gaug_duration;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1946
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1947 #if (CHIPSET==7) || (CHIPSET == 8) || (CHIPSET == 10) || (CHIPSET == 11) || (CHIPSET == 12) || (CHIPSET == 15)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1948 // start ULPD gauging immediately with Calypso because we needn't IT_COM.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1949 #if (CODE_VERSION != SIMULATION)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1950 ULDP_GAUGING_START;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1951 #if (CHIPSET == 12) || (CHIPSET == 15)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1952 // Force the DPLL to be active
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1953 ( * (volatile SYS_UWORD16 *) CLKM_CNTL_CLK) &= ~(CLKM_DPLL_DIS);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1954 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1955 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1956
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1957 #if (TRACE_TYPE != 0)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1958 #if (GSM_IDLE_RAM != 0)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1959 l1_trace_gauging_intram();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1960 #else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1961 l1_trace_gauging();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1962 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1963 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1964 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1965
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1966 // DSP programmation .......
122
9360d1f31c00 l1_pwmgr.c: import of sensible changes from freecalypso-sw/gsm-fw version
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 121
diff changeset
1967 #if (DSP >= 33)
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1968 #if (CHIPSET==4)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1969 l1s_dsp_com.dsp_ndb_ptr->d_pll_config |= B_32KHZ_CALIB;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1970 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1971 #else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1972 l1s_dsp_com.dsp_ndb_ptr->d_pll_clkmod1 = CLKMOD2; // IDLE1 only for DSP
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1973 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1974
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1975 l1s.pw_mgr.gauging_task = ACTIVE;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1976 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1977 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1978 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1979 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1980 /*-------------------------------------------------------*/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1981 /* l1s_gauging_task_end() */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1982 /*-------------------------------------------------------*/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1983 /* */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1984 /* Description: */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1985 /* ------------ */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1986 /* stop the gauging activity */
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1987 /*-------------------------------------------------------*/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1988 void l1s_gauging_task_end(void)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1989 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1990 if (l1_config.pwr_mngt == PWR_MNGT)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1991 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1992 /*************************************************************/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1993 if (l1s.pw_mgr.gauging_task == ACTIVE)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1994 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1995 /*************************************************************/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1996 // COUNT = 1 ==> stop the gauging and free DSP idle modes....
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1997 /*************************************************************/
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1998 if (l1s.pw_mgr.gaug_count == 1)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
1999 {
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2000 // wait for end of gauging interrupt ...
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2001 l1s.pw_mgr.gauging_task = WAIT_IQ;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2002
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2003 // Unmask ULPD GAUGING int.
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2004 #if (CODE_VERSION != SIMULATION)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2005 #if (CHIPSET == 12) || (CHIPSET == 15)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2006 F_INTH_ENABLE_ONE_IT(C_INTH_ULPD_GAUGING_IT);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2007 #else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2008 INTH_ENABLEONEIT(IQ_ULPD_GAUGING);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2009 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2010 ULDP_GAUGING_STOP; // stop ULPD gauging
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2011 #if (CHIPSET == 12) || (CHIPSET == 15)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2012 // Allow the DPLL to be cut according to ARM sleep mode
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2013 //( * (volatile SYS_UWORD16 *) CLKM_CNTL_CLK) |= (CLKM_DPLL_DIS);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2014 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2015 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2016
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2017 // DSP programmation : free IDLE modes...
122
9360d1f31c00 l1_pwmgr.c: import of sensible changes from freecalypso-sw/gsm-fw version
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 121
diff changeset
2018 #if (DSP >= 33)
121
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2019 #if (CHIPSET==4)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2020 l1s_dsp_com.dsp_ndb_ptr->d_pll_config &= ~B_32KHZ_CALIB;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2021 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2022 #else
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2023 l1s_dsp_com.dsp_ndb_ptr->d_pll_clkmod1 = CLKMOD1;
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2024 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2025
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2026
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2027 #if (CODE_VERSION == SIMULATION)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2028 // in order to simulate the Gauging interrupt
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2029 GAUGING_Handler();
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2030
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2031 #if (TRACE_TYPE==5)
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2032 trace_ULPD("Stop Gauging", l1s.actual_time.fn);
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2033 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2034 #endif
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2035 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2036 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2037 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2038 }
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2039
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2040 //#pragma GSM_IDLE_DUPLICATE_FOR_INTERNAL_RAM_END
282e78e6e772 l1_pwmgr.c: initial import of LoCosto source
Mychaela Falconia <falcon@ivan.Harhan.ORG>
parents: 15
diff changeset
2041 #endif